|
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: 19758 (0x4d2e)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »FAKTURA.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »FAKTURA.B«
0090 B=0;E=1;G=2;V=3;W=9 0100 DIM OP1$(12),OP2$(12),RES$(15),BLB2$(12),T2(W),K2$(17),K3$(17),K4$(17) 0110 DIM K1$(17),N$(6),K6$(17),K5$(17),DNAVN$(25),DSL1$(12),DKGR$(G) 0120 DIM DSL2$(12),DSL3$(12),DSL4$(12),DLK$(G),DGADE$(25) 0130 DIM DTLF$(W),DBY$(20),SLD$(12),FORS$(12),SVAR2$(E),GTOTAL$(12) 0140 DIM ÅRKØB$(12),MDNKØB$(12),K7$(17),A$(6),TAL1$(12) 0150 DIM MOMS$(12),FTOTAL$(12),KOD1$(E),KOD$(E),TAH$(12),TAL4$(14),T1(W) 0160 DIM VARTEKST$(50),VPRI$(12),BL$(12),TOTAL$(12),BB$(12) 0170 DIM SVAR1$(E),FAKKRE$(E),LEVTEKST$(52),ANTAL$(12),BK$(77),LAND$(W,12) 0180 DIM LTX1$(6),LTX2$(32),LTX3$(47),LTX4$(19),LTX5$(17),LTX6$(31),LTX7$(33) 0190 DIM LTX8$(W),LTX9$(25),LTX10$(26),LTX11$(28),LTX12$(39),LTX13$(33) 0200 TAL4$="0+";TOTAL$="0+";TAH$=" ,00+" 0210 BK$=" ";BK$=BK$+BK$+BK$+" " 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=B;FLAG=B;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:G)="00" THEN 0400 PRINT ANTAL$(5:4);BK$(E:10) 0410 ELSE 0420 PRINT ANTAL$(5:7);BK$(E: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$;BK$(77-XPOS1-LEN(LT1$)) 0500 CURSOR XPOS1+LEN(LT1$)-E,YPOS1 0510 INPUT " ",A$ 0520 EXEC NRT(A$) 0530 UNTIL P>LN4 AND P<LN5 AND TEST2=B 0540 ENDPROC 0550 PROC INDPUT2(XPOS2,YPOS2,LT2,VAR) 0560 REPEAT 0570 CURSOR XPOS2,YPOS2 0580 PRINT LT2$;BK$(77-XPOS2-LEN(LT2$)) 0590 CURSOR XPOS2+LEN(LT2$)-E,YPOS2 0600 INPUT " ",VAR$ 0610 IF LEN(VAR$)=B THEN VAR$="0" 0620 VAR$=VAR$+"+" 0630 EXEC CA(6,VAR$,TAH$,VAR$) 0640 UNTIL FLAG=B 0650 ENDPROC 0660 PROC FE(NR1,NR2,NR3) 0670 IF STATUS(NR3$)<>B THEN 0680 PRINT STATUS(NR3$),NR1,NR2,NR3$ 0690 STOP 0700 ENDIF 0710 ENDPROC 0720 PROC FPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8) 0730 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=E;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32 0740 REPEAT 0750 IF NØGL5=TAB4(PIL6) OR PIL1=E THEN EXIT 0760 PIL1=(PIL1+E) DIV G;PIL6=PIL6+PIL1*(E-G*(NØGL5<TAB4(PIL6))) 0770 IF PIL6<E THEN PIL6=E 0780 IF PIL6>MANT3 THEN PIL6=MANT3 0790 UNTIL PIL1=B 0800 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-E*(PIL6>E) 0810 PIL6=MANT4+PIL6 0820 GET L8$,PIL6:Q(E,E),Q(E,G),Q(G,E),Q(G,G),Q(V,E),Q(V,G),Q(4,E),Q(4,G) 0830 EXEC FE(E,E,L8$) 0840 FOR PIL6=E TO 4 0850 IF NØGL5=Q(PIL6,E) THEN EXIT 0860 NEXT PIL6 0870 IF PIL6<>5 THEN CEKS=B 0880 ENDPROC 0890 PROC INDTAB1(Z,MANT5,L7) 0900 PIL1=MANT5 DIV 32 0910 FOR I=E TO PIL1 0920 H=(I-E)*8+E 0930 GET L7$,I:Z(H),Z(H+E),Z(H+G),Z(H+V),Z(H+4),Z(H+5),Z(H+6),Z(H+7) 0940 EXEC FE(G,E,L7$) 0950 NEXT I 0960 ENDPROC 0970 PROC NRT(NUM1) 0980 P=B;TEST2=B;KTAL=B;L=LEN(NUM1$) 0990 IF L>6 THEN EXIT 1000 CASE L OF 1010 FOR J=E TO L 1020 P1=INT(ORD(NUM1$(J))-48) 1030 IF P1<B OR P1>W THEN 1040 TEST2=E 1050 ELSE 1060 P=P*10+P1 1070 ENDIF 1080 NEXT J 1090 KTAL=P DIV 10000 1100 WHEN B 1110 P=-E 1120 WHEN E 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=B THEN UBLB1$=UBLB1$(E:13) 1260 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN UBLB1$(LEN(UBLB1$))=" " 1270 IF STØR=E THEN UBLB1$=UBLB1$(4:LEN(UBLB1$)-V) 1280 PRINT UBLB1$ 1290 ENDPROC 1300 PROC HD 1310 S=DTAB(DPIL3,G) 1320 GET K4$,S:DNR,DNAVN$,DSL1$,DKGR$ 1330 EXEC FE(8,E,K4$) 1340 GET K4$,S+E:DSL2$,DSL3$,DSL4$,DPOSTNR,DLK$ 1350 EXEC FE(8,G,K4$) 1360 GET K4$,S+G:DGADE$,DTLF$,HPOST,HKUNDE 1370 EXEC FE(8,V,K4$) 1380 GET K4$,S+V:DBY$,ÅRKØB$,MDNKØB$ 1390 EXEC FE(8,4,K4$) 1400 ENDPROC 1410 PROC HV 1420 S=VTAB(VPIL3,G) 1430 GET K5$,S:VARENR,VARTEKST$,VPRI$,VARKONT 1440 EXEC FE(V,E,K5$) 1450 ENDPROC 1460 PROC KUNDEUD(HO) 1470 CURSOR W,5 1480 PRINT DNAVN$ 1490 CURSOR W,6 1500 PRINT DGADE$ 1510 CURSOR 6,7 1520 PRINT USING "#######":DPOSTNR 1530 CURSOR 14,7 1540 PRINT DBY$ 1550 IF HO=E THEN 1560 EXEC CA(B,DSL1$,DSL2$,SLD$) 1570 EXEC CA(B,SLD$,DSL3$,SLD$) 1580 EXEC CA(B,SLD$,DSL4$,SLD$) 1590 CURSOR W,14 1600 PRINT "Saldo: "; 1610 EXEC TUD(SLD$,TAL4$,E,B) 1620 CURSOR 12,16 1630 PRINT "0-30 dage 30-60 dage 60-90 dage ældre" 1640 CURSOR W,18 1650 EXEC TUD(DSL1$,TAL4$,E,B) 1660 CURSOR 25,18 1670 EXEC TUD(DSL2$,TAL4$,E,B) 1680 CURSOR 41,18 1690 EXEC TUD(DSL3$,TAL4$,E,B) 1700 CURSOR 57,18 1710 EXEC TUD(DSL4$,TAL4$,E,B) 1720 ENDIF 1730 ENDPROC 1740 PROC DATOINDT 1750 REPEAT 1760 EXEC INDPUT1(64,LIE,-2,1000000,BK$(1)) 1770 UNTIL KTAL=>80 AND (P DIV 100) MOD 100<13 AND P MOD 100<32 OR P=-E 1780 DAT=P 1790 IF DAT=-E THEN DAT=DATO 1800 CURSOR 67,LIE 1810 EXEC DATOUD(DAT) 1820 ENDPROC 1830 PROC DATOUD(DA) 1840 PRINT USING "###.##":(DA MOD 10000)/100 1850 CURSOR 64,LIE 1860 PRINT USING "###.#":(DA DIV 1000)/10 1870 ENDPROC 1880 PROC FAKHOVED 1890 CLEAR 1900 CURSOR G,E 1910 PRINT USING "Kundenr.:####### ":KUNDENR; 1920 PRINT " ";DNAVN$ 1930 CURSOR 54,E 1940 IF FAKKRE$="F" THEN 1950 PRINT USING "Fakturanr.: #######":FAKTNR+AFAKT 1960 ELSE 1970 PRINT USING "Kreditnotanr.: ######":KREDNR+AKRED 1980 ENDIF 1990 CURSOR G,V 2000 PRINT "Linie Vr.nr. Antal Tekst"; 2010 CURSOR 56,V 2020 PRINT "Pris Beløb" 2030 LIE=5 2040 ENDPROC 2050 PROC VARELINI 2060 REPEAT 2070 FE6=B;VARTEKST$=BK$ 2080 CURSOR V,LIE 2090 PRINT USING "###":VLIN; 2100 PRINT BK$(E:55) 2110 REPEAT 2120 EXEC INDPUT1(8,LIE,-1,1000000,BK$(1)) 2130 UNTIL NOT (P=V AND VLIN=E) 2140 VARENR=P 2150 IF VARENR<>B THEN 2160 CURSOR 8,LIE 2170 IF VARENR<5 THEN 2180 PRINT BK$(E:25) 2190 ELSE 2200 PRINT USING "####### ":VARENR 2210 ENDIF 2220 CASE VARENR OF 2230 EXEC FPOST1(VTAB1,VTAB,MVANTAL,VARENR,VPIL3,K3$) 2240 IF CEKS<>B THEN 2250 CURSOR 17,LIE 2260 INPUT "Varenummeret eksisterer ikke. Tast RETURN.",SVAR1$ 2270 LIE=LIE-E;VLIN=VLIN-E 2280 ELSE 2290 EXEC INDPUT2(17,LIE,BK$(1),ANTAL$) 2300 EXEC CA(4,ANTAL$,TAH$,TAH$) 2310 IF SI=B THEN FE6=E 2320 IF FE6=B THEN 2330 CURSOR 17,LIE 2340 EXEC ANT 2350 CURSOR E,23 2360 EXEC HV 2370 CURSOR 23,LIE 2380 IF ORD(VARTEKST$(E))=255 THEN 2390 INPUT " ",VARTEKST$ 2400 AKOD(VLIN,G)=E 2410 ENDIF 2420 CURSOR 24,LIE 2430 PRINT VARTEKST$(E:25);BK$(E:25) 2440 EXEC CA(4,VPRI$,TAH$,TAH$) 2450 IF SI=B THEN 2460 EXEC INDPUT2(50,LIE,BK$(1),VPRI$) 2470 AKOD(VLIN,E)=E 2480 ENDIF 2490 CURSOR 51,LIE 2500 EXEC TUD(VPRI$,TAL4$,E,B) 2510 EXEC CA(G,VPRI$,ANTAL$,BL$) 2520 CURSOR 66,LIE 2530 EXEC TUD(BL$,TAL4$,E,B) 2540 EXEC CA(B,BL$,TOTAL$,TOTAL$) 2550 VNARR(VLIN)=VARENR;VTARR$(VLIN)=VARTEKST$ 2560 VPARR$(VLIN)=VPRI$;VAARR$(VLIN)=ANTAL$ 2570 BLARR$(VLIN)=BL$ 2580 ENDIF 2590 ENDIF 2600 WHEN E,G 2610 VARTEKST$=BK$(E:50) 2620 IF VARENR=G THEN 2630 CURSOR 16,LIE 2640 ELSE 2650 CURSOR 23,LIE 2660 ENDIF 2670 INPUT " ",VARTEKST$ 2680 L2=LEN(VARTEKST$) 2690 IF L2=B THEN FE6=E 2700 IF L2>B THEN 2710 IF VARENR=G THEN 2720 CURSOR 17,LIE 2730 PRINT VARTEKST$;BK$(E:12) 2740 ELSE 2750 CURSOR 24,LIE 2760 PRINT VARTEKST$(E:25);BK$(E:25) 2770 ENDIF 2780 IF VARENR=E THEN 2790 EXEC INDPUT2(65,LIE,BK$(1),BL$) 2800 EXEC CA(B,BL$,TOTAL$,TOTAL$) 2810 CURSOR 66,LIE 2820 EXEC TUD(BL$,TAL4$,E,B) 2830 BLARR$(VLIN)=BL$ 2840 ELSE 2850 BLARR$(VLIN)="0+" 2860 ENDIF 2870 VNARR(VLIN)=VARENR;VTARR$(VLIN)=VARTEKST$ 2880 ENDIF 2890 WHEN V 2900 IF VNARR(VLIN-E)<>V THEN 2910 EXEC INDPUT2(24,LIE,LTX1$,VPRI$) 2920 EXEC CA(4,VPRI$,TAH$,TAH$) 2930 IF SI=B THEN FE6=E 2940 IF FE6=B THEN 2950 CURSOR 30,LIE 2960 PRINT VPRI$(7:5);" %";BK$(E:25) 2970 EXEC CA(G,VPRI$,BLARR$(VLIN-E),BL$) 2980 VTARR$(VLIN)="Rabat "+VPRI$(7:5)+" %" 2990 VNARR(VLIN)=VARENR;VPRI$="100-" 3000 EXEC CA(V,BL$,VPRI$,BL$) 3010 CURSOR 66,LIE 3020 EXEC TUD(BL$,TAL4$,E,B) 3030 BLARR$(VLIN)=BL$ 3040 EXEC CA(B,BL$,TOTAL$,TOTAL$) 3050 ENDIF 3060 ELSE 3070 LIE=LIE-E;VLIN=VLIN-E 3080 ENDIF 3090 WHEN 4 3100 CURSOR 24,LIE 3110 VARTEKST$="Subtotal " 3120 PRINT VARTEKST$ 3130 CURSOR 66,LIE 3140 EXEC TUD(TOTAL$,TAL4$,E,B) 3150 VNARR(VLIN)=VARENR;VTARR$(VLIN)=VARTEKST$ 3160 BLARR$(VLIN)=TOTAL$ 3170 ENDCASE 3180 ELSE 3190 VARENR=B 3200 CURSOR G,LIE 3210 PRINT BK$(E:25) 3220 ENDIF 3230 UNTIL FE6=B 3240 ENDPROC 3250 PROC LINITEST 3260 IF LIE>23 THEN 3270 EXEC FAKHOVED 3280 J=VLIN-E 3290 EXEC VUD(J) 3300 LIE=LIE+E 3310 ENDIF 3320 ENDPROC 3330 PROC VUD(LIN) 3340 CURSOR V,LIE 3350 PRINT USING "###":LIN 3360 IF VNARR(LIN)>4 THEN 3370 CURSOR 8,LIE 3380 PRINT USING "#######":VNARR(LIN) 3390 CURSOR 17,LIE 3400 IF VAARR$(LIN,6:G)="00" THEN 3410 PRINT VAARR$(LIN,E:4);" " 3420 ELSE 3430 PRINT VAARR$(LIN) 3440 ENDIF 3450 ENDIF 3460 IF VNARR(LIN)=G THEN 3470 CURSOR 17,LIE 3480 ELSE 3490 CURSOR 24,LIE 3500 ENDIF 3510 PRINT VTARR$(LIN) 3520 IF VNARR(LIN)>4 THEN 3530 CURSOR 51,LIE 3540 BB$=VPARR$(LIN) 3550 EXEC TUD(BB$,TAL4$,E,B) 3560 ENDIF 3570 CURSOR 66,LIE 3580 BB$=BLARR$(LIN) 3590 IF VNARR(LIN)<>G THEN EXEC TUD(BB$,TAL4$,E,B) 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,BK$(1),FORS$) 3700 CURSOR 21,21 3710 EXEC TUD(FORS$,TAL4$,E,B) 3720 CURSOR 36,21 3730 EXEC CA(B,FORS$,TOTAL$,TOTAL$) 3740 EXEC TUD(TOTAL$,TAL4$,E,B) 3750 IF DLK$="0" THEN 3760 EXEC CA(G,TOTAL$,MOMS$,FTOTAL$) 3770 ANTAL$="100+" 3780 EXEC CA(V,FTOTAL$,ANTAL$,ANTAL$) 3790 CURSOR 51,21 3800 EXEC TUD(ANTAL$,TAL4$,E,B) 3810 EXEC CA(B,ANTAL$,TOTAL$,FTOTAL$) 3820 ELSE 3830 FTOTAL$=TOTAL$ 3840 ENDIF 3850 CURSOR 66,21 3860 EXEC TUD(FTOTAL$,TAL4$,E,B) 3870 TOTAL$=GTOTAL$ 3880 EXEC INDPUT1(9,23,-9,-6,LTX2$) 3890 UNTIL P=-7 3900 ENDPROC 3910 PROC SLET 3920 CURSOR G,19 3930 PRINT BK$ 3940 CURSOR G,21 3950 PRINT BK$ 3960 CURSOR G,23 3970 PRINT BK$ 3980 ENDPROC 3990 PROC LUD 4000 CLEAR 4010 EXEC FAKHOVED 4020 FOR LIE=5 TO 16 4030 EXEC VUD(STARTL) 4040 STARTL=STARTL+E 4050 IF STARTL>SLUTL THEN EXIT 4060 NEXT LIE 4070 ENDPROC 4080 PROC AJOUR 4090 TOTAL$="0+" 4100 FOR M=E TO VLIN 4110 CASE VNARR(M) OF 4120 EXEC CA(B,TOTAL$,BLARR$(M),TOTAL$) 4130 WHEN G 4140 WHEN 4 4150 BLARR$(M)=TOTAL$ 4160 WHEN V 4170 VPRI$=" ,"+VTARR$(M,7:G)+VTARR$(M,10:G)+"-" 4180 IF VPRI$(8)=" " THEN VPRI$(8)="0" 4190 IF VPRI$(W)=" " THEN VPRI$(W)="0" 4200 EXEC CA(G,BLARR$(M-E),VPRI$,TAL1$) 4210 BLARR$(M)=TAL1$ 4220 EXEC CA(B,TOTAL$,TAL1$,TOTAL$) 4230 ENDCASE 4240 NEXT M 4250 ENDPROC 4260 PROC FAKTGEM 4270 I=APOS+E 4280 IF FAKKRE$="F" THEN 4290 AFAKT=AFAKT+E 4300 ELSE 4310 AKRED=AKRED+E 4320 ENDIF 4330 OPEN K6$,W 4340 EXEC FE(V,E,K6$) 4350 PUT K6$,I:KUNDENR,ORDREDAT,FAKKRE$,DIVD 4360 EXEC FE(V,G,K6$) 4370 I=I+G 4380 IF DIVD=E THEN 4390 PUT K6$,I:DNAVN$(E:13) 4400 EXEC FE(V,V,K6$) 4410 PUT K6$,I+E:DNAVN$(14:12) 4420 EXEC FE(V,4,K6$) 4430 PUT K6$,I+G:DGADE$(E:13) 4440 EXEC FE(V,5,K6$) 4450 PUT K6$,I+V:DGADE$(14:12) 4460 EXEC FE(V,6,K6$) 4470 PUT K6$,I+4:DPOSTNR,DBY$(E:W) 4480 EXEC FE(V,7,K6$) 4490 PUT K6$,I+5:DBY$(10:11) 4500 EXEC FE(V,8,K6$) 4510 I=I+6 4520 ENDIF 4530 IF LEVKODE=B THEN 4540 FOR J=I TO I+V 4550 PUT K6$,J:LEVTEKST$((J-I)*13+E:13) 4560 EXEC FE(V,8,K6$) 4570 NEXT J 4580 I=I+4 4590 ENDIF 4600 EXEC KODE(1) 4610 KOD1$=KOD$ 4620 FOR LIE=E TO VLIN 4630 J=LIE+E 4640 EXEC KODE(J) 4650 CASE KOD1$ OF 4660 STOP 4670 WHEN "A" 4680 EXEC VGEM 4690 WHEN "B" 4700 VTARR$(LIE,13)=KOD$ 4710 PUT K6$,I:VTARR$(LIE,E:13) 4720 EXEC FE(V,W,K6$) 4730 I=I+E 4740 WHEN "C" 4750 EXEC EGEM(BLARR$(LIE)) 4760 WHEN "D" 4770 EXEC TGEM 4780 WHEN "E" 4790 EXEC TGEM 4800 EXEC EGEM(BLARR$(LIE)) 4810 WHEN "F" 4820 EXEC VGEM 4830 EXEC EGEM(VPARR$(LIE)) 4840 WHEN "G","H" 4850 EXEC TGEM 4860 EXEC VGEM 4870 IF KOD1$="H" THEN 4880 EXEC EGEM(VPARR$(LIE)) 4890 ENDIF 4900 ENDCASE 4910 KOD1$=KOD$ 4920 NEXT LIE 4930 EXEC EGEM(FORS$) 4940 IF DLK$="0" THEN 4950 EXEC EGEM(MOMS$) 4960 ELSE 4970 EXEC EGEM(TAH$) 4980 ENDIF 4990 EXEC EGEM(FTOTAL$) 5000 I=I-E 5010 EXEC KODE(1) 5020 IF LEVKODE=11 THEN KOD$=CHR(11+ORD(KOD$)) 5030 PUT K6$,APOS+G:ORDRENR,FDATO,I-APOS,KOD$ 5040 EXEC FE(V,10,K6$) 5050 APOS=I 5060 CLOSE K6$ 5070 EXEC FE(V,11,K6$) 5080 ENDPROC 5090 PROC TGEM 5100 PUT K6$,I:VTARR$(LIE,E:13) 5110 EXEC FE(4,E,K6$) 5120 TAL4$=VTARR$(LIE,14:12)+KOD$;I=I+G 5130 PUT K6$,I-E:TAL4$(E:13) 5140 EXEC FE(4,G,K6$) 5145 LE=LEN(VTARR$(LIE)) 5150 IF VNARR(LIE)=G AND LE>24 THEN 5160 PUT K6$,I:VTARR$(LIE,26:13) 5170 EXEC FE(99,E,K6$) 5180 I=I+G 5190 PUT K6$,I-E:VTARR$(LIE,39:12) 5200 EXEC FE(99,G,K6$) 5210 ENDIF 5220 ENDPROC 5230 PROC EGEM(BEL) 5240 TAL4$=BEL$+KOD$;I=I+E 5250 PUT K6$,I-E:TAL4$(E:13) 5260 EXEC FE(5,E,K6$) 5270 ENDPROC 5280 PROC VGEM 5290 PUT K6$,I:VNARR(LIE),VAARR$(LIE),KOD$ 5300 EXEC FE(6,E,K6$) 5310 I=I+E 5320 ENDPROC 5330 PROC KODE(LI) 5340 IF AKOD(LI,E)=B AND AKOD(LI,G)=B THEN 5350 CASE VNARR(LI) OF 5360 KOD$="A" 5370 WHEN V 5380 KOD$="B" 5390 WHEN 4 5400 KOD$="C" 5410 WHEN G 5420 KOD$="D" 5430 WHEN E 5440 KOD$="E" 5450 ENDCASE 5460 ELSE 5470 IF AKOD(LI,E)=B THEN 5480 KOD$="G" 5490 ELSE 5500 IF AKOD(LI,G)=B THEN 5510 KOD$="F" 5520 ELSE 5530 KOD$="H" 5540 ENDIF 5550 ENDIF 5560 ENDIF 5570 ENDPROC 5580 PROC SYSGEM 5590 T1(E)=FAKTNR;T1(G)=KREDNR;T2(4)=APOS;T2(5)=AKRED;T2(6)=AFAKT 5600 T2(7)=AVKONTI;T2(8)=FJPOST 5610 OPEN K7$,W 5620 EXEC FE(W,E,K7$) 5630 PUT K7$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W) 5640 EXEC FE(W,G,K7$) 5650 PUT K7$,12:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W) 5660 EXEC FE(W,V,K7$) 5670 CLOSE K7$ 5680 EXEC FE(W,4,K7$) 5690 ENDPROC 5700 K1$="P641220:SYSTEM1" 5710 OPEN K1$,R 5720 EXEC FE(W,E,K1$) 5730 GET K1$,E:MFANTAL,MDANTAL,MKANTAL,MVANTAL 5740 EXEC FE(W,G,K1$) 5750 GET K1$,4:KPOST,MFAK,MVGR,MKGR 5760 EXEC FE(W,V,K1$) 5770 GET K1$,5:MKRGR,MFKL 5780 EXEC FE(W,25,K1$) 5790 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL 5800 EXEC FE(W,4,K1$) 5810 GET K1$,10:N$ 5820 EXEC FE(W,5,K1$) 5830 GET K1$,12:K2$ 5840 EXEC FE(W,6,K1$) 5850 GET K1$,14:K3$ 5860 EXEC FE(W,7,K1$) 5870 GET K1$,16:K4$ 5880 EXEC FE(W,8,K1$) 5890 GET K1$,18:K5$ 5900 EXEC FE(W,W,K1$) 5910 GET K1$,29:K6$ 5920 EXEC FE(W,10,K1$) 5930 GET K1$,36:K7$ 5940 EXEC FE(W,11,K1$) 5950 CLOSE K1$ 5960 EXEC FE(W,12,K1$) 5970 DIM VAARR$(MFKL,7),AKOD(E+MFKL,G),VNARR(MFKL) 5980 DIM VTARR$(MFKL,50),VPARR$(MFKL,12),BLARR$(MFKL,12) 5990 DIM VTAB1(MVANTAL DIV 4),DTAB1(MDANTAL DIV 4),VTAB(4,G),DTAB(4,G) 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(W,13,K7$) 6030 GET K7$,E:MOMS$ 6040 EXEC FE(W,14,K7$) 6050 GET K7$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W) 6060 EXEC FE(W,15,K7$) 6070 FOR I=E TO V 6080 H=(I-E)*V+E 6090 GET K7$,I+G:LAND$(H),LAND$(H+E),LAND$(H+G) 6100 EXEC FE(W,16,K7$) 6110 NEXT I 6120 GET K7$,12:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W) 6130 EXEC FE(W,17,K7$) 6140 CLOSE K7$ 6150 EXEC FE(W,18,K7$) 6160 OPEN K2$,R 6170 EXEC FE(W,19,K2$) 6180 OPEN K3$,R 6190 EXEC FE(W,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(W,19,K2$) 6260 OPEN K3$,R 6270 EXEC FE(W,20,K3$) 6280 OPEN K4$,R 6290 EXEC FE(W,21,K4$) 6300 OPEN K5$,R 6310 EXEC FE(W,22,K5$) 6320 FAKTNR=T1(E);KREDNR=T1(G);DATO=T1(7);APOS=T2(4) 6330 AKRED=T2(5);AFAKT=T2(6);AVKONTI=T2(7);FJPOST=T2(8) 6340 TOTAL$="0+";VLIN=E 6350 REPEAT 6360 REPEAT 6370 REPEAT 6380 CLEAR 6390 REPEAT 6400 EXEC INDPUT1(9,1,-1,100000,LTX3$) 6410 UNTIL KTAL=DTAL OR P=B 6420 KUNDENR=P 6430 IF KUNDENR=B THEN EXIT 6440 CURSOR 56,E 6450 PRINT USING "####### ":KUNDENR 6460 IF KUNDENR<>DIVDNR THEN 6470 DIVD=B 6480 EXEC FPOST1(DTAB1,DTAB,MDANTAL,KUNDENR,DPIL3,K2$) 6490 IF CEKS=E THEN 6500 CURSOR W,V 6510 INPUT "Kunden eksisterer ikke. Tast RETURN.",SVAR1$ 6520 ELSE 6530 EXEC HD 6540 ENDIF 6550 ELSE 6560 DIVD=E;CEKS=B 6570 EXEC FPOST1(DTAB1,DTAB,MDANTAL,DIVDNR,DPIL3,K2$) 6580 IF CEKS=E THEN STOP 6590 EXEC HD 6600 CURSOR 34,5 6610 PRINT "Navn." 6620 CURSOR 8,5 6630 INPUT " ",DNAVN$ 6640 CURSOR W,5 6650 PRINT DNAVN$;BK$(E:25) 6660 CURSOR 34,6 6670 PRINT "Gade." 6680 CURSOR 8,6 6690 INPUT " ",DGADE$ 6700 CURSOR W,6 6710 PRINT DGADE$;BK$(E:25) 6720 CURSOR 13,7 6730 PRINT "Postnummer." 6740 REPEAT 6750 CURSOR 8,7 6760 INPUT " ",TAL1$ 6770 EXEC NRT(TAL1$) 6780 UNTIL TEST2=B AND P>999 6790 DPOSTNR=P 6800 CURSOR 13,7 6810 PRINT BK$(E:25);TAB(22);"By." 6820 CURSOR 13,7 6830 INPUT " ",DBY$ 6840 CURSOR 34,7 6850 PRINT BK$(E:25) 6860 ENDIF 6870 UNTIL CEKS=B 6880 IF KUNDENR=B THEN EXIT 6890 EXEC KUNDEUD(1) 6900 EXEC INDPUT1(9,21,-9,-6,LTX4$) 6910 UNTIL P=-7 6920 IF KUNDENR=B THEN EXIT 6930 IF APOS>(MFKL+5)*MFAK+G*MFKL-15 OR FJPOST+AFAKT+AKRED=>MFAK THEN 6940 EXEC INDPUT1(9,23,-2,0,LTX7$) 6950 ELSE 6960 REPEAT 6970 CURSOR W,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 LIE=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 LIE=12 7240 EXEC DATOINDT 7250 FDATO=DAT 7260 CURSOR W,14 7270 INPUT "Levering: ",LEVTEKST$ 7280 LEVKODE=B 7290 IF LEN(LEVTEKST$)=B THEN LEVKODE=11 7300 EXEC INDPUT1(9,17,-9,-6,LTX6$) 7310 ENDIF 7320 UNTIL P=-7 7330 IF KUNDENR=B THEN EXIT 7340 IF APOS<=(MFKL+5)*MFAK+G*MFKL-15 AND FJPOST+AFAKT+AKRED<=MFAK THEN 7350 EXEC FAKHOVED 7360 VLIN=E 7370 REPEAT 7380 AKOD(VLIN,E)=B;AKOD(VLIN,G)=B 7390 EXEC VARELINI 7400 IF VARENR=B THEN EXIT 7410 VLIN=VLIN+E;LIE=LIE+E 7420 EXEC LINITEST 7430 UNTIL VARENR=B OR VLIN>MFKL 7440 VLIN=VLIN-E 7450 IF VLIN>B THEN 7460 IF LIE>16 THEN 7470 EXEC FAKHOVED 7480 FOR LIE=5 TO 16 7490 J=VLIN+LIE-16 7500 EXEC VUD(J) 7510 NEXT LIE 7520 ENDIF 7530 REPEAT 7540 CURSOR G,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+VLIN,LTX9$) 7620 J=P 7630 CURSOR 4,19 7640 LIE=19 7650 EXEC SLET 7660 EXEC VUD(J) 7670 CASE VNARR(J) OF 7680 EXEC INDPUT2(17,21,BK$(1),ANTAL$) 7690 CURSOR 17,21 7700 EXEC ANT 7710 CURSOR 24,21 7720 PRINT VTARR$(J) 7730 CURSOR 51,21 7740 VPRI$=VPARR$(J) 7750 EXEC TUD(VPRI$,TAL4$,E,B) 7760 EXEC CA(G,VPRI$,ANTAL$,BL$) 7770 CURSOR 66,21 7780 EXEC TUD(BL$,TAL4$,E,B) 7790 IF BL$<>BLARR$(J) THEN 7800 CURSOR E,23 7810 VAARR$(J)=ANTAL$;BLARR$(J)=BL$ 7820 EXEC AJOUR 7830 ENDIF 7840 WHEN E,G 7850 VARTEKST$=BK$;M=J 7860 IF VNARR(J)=G THEN 7870 CURSOR 16,21 7880 ELSE 7890 CURSOR 23,21 7900 ENDIF 7910 INPUT " ",VARTEKST$ 7920 IF LEN(VARTEKST$)>B THEN VTARR$(M)=VARTEKST$ 7930 IF VNARR(J)=G THEN 7940 CURSOR 17,21 7950 PRINT VTARR$(M);BK$(E:12) 7960 ELSE 7970 CURSOR 24,21 7980 PRINT VTARR$(M,E:25);BK$(E:25) 7990 ENDIF 8000 IF VNARR(M)=E THEN 8010 EXEC INDPUT2(65,21,BK$(1),BL$) 8020 EXEC CA(4,BL$,TAH$,TAH$) 8030 IF SI=B THEN 8040 BL$=BLARR$(M) 8050 ELSE 8060 BLARR$(M)=BL$ 8070 EXEC AJOUR 8080 ENDIF 8090 CURSOR 66,21 8100 EXEC TUD(BL$,TAL4$,E,B) 8110 ENDIF 8120 WHEN V 8130 M=J 8140 EXEC INDPUT2(24,21,LTX1$,VPRI$) 8150 CURSOR 30,21 8160 PRINT VPRI$(7:5);" %";BK$(E:25) 8170 EXEC CA(G,VPRI$,BLARR$(M-E),BL$) 8180 VTARR$(M,7:5)=VPRI$(7:5) 8190 VPRI$="100-" 8200 EXEC CA(V,BL$,VPRI$,BL$) 8210 CURSOR 66,21 8220 EXEC TUD(BL$,TAL4$,E,B) 8230 BLARR$(M)=BL$ 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+VLIN,LTX10$) 8310 J=P 8320 CURSOR 4,19 8330 LIE=19 8340 EXEC SLET 8350 EXEC VUD(J) 8360 IF J<VLIN THEN 8370 VARENR=VNARR(J+E) 8380 ELSE 8390 VARENR=B 8400 ENDIF 8410 EXEC INDPUT1(4,21,-9,-6,LTX11$) 8420 IF P=-7 AND VARENR<>V THEN 8430 VLIN=VLIN-E 8440 FOR M=J TO VLIN 8450 VNARR(M)=VNARR(M+E);VAARR$(M)=VAARR$(M+E) 8460 VTARR$(M)=VTARR$(M+E);VPARR$(M)=VPARR$(M+E) 8470 BLARR$(M)=BLARR$(M+E) 8480 AKOD(M,E)=AKOD(M+E,E);AKOD(M,G)=AKOD(M+E,G) 8490 NEXT M 8500 AKOD(E+VLIN,E)=B;AKOD(E+VLIN,G)=B 8510 EXEC AJOUR 8520 ENDIF 8530 WHEN "3" 8540 EXEC INDPUT1(4,23,0,1+VLIN,LTX12$) 8550 J=P 8560 EXEC SLET 8570 STARTL=J 8580 IF VLIN-J<12 THEN 8590 SLUTL=VLIN 8600 ELSE 8610 SLUTL=J+11 8620 ENDIF 8630 EXEC LUD 8640 WHEN "4" 8650 IF VLIN<MFKL THEN 8660 LIE=19;VLIN=VLIN+E 8670 EXEC INDPUT1(4,23,0,1+VLIN,LTX13$) 8680 EXEC SLET 8690 FOR M=VLIN TO P+E STEP -E 8700 VNARR(M)=VNARR(M-E);VAARR$(M)=VAARR$(M-E) 8710 VTARR$(M)=VTARR$(M-E);VPARR$(M)=VPARR$(M-E) 8720 BLARR$(M)=BLARR$(M-E) 8730 AKOD(M,E)=AKOD(M-E,E);AKOD(M,G)=AKOD(M-E,G) 8740 NEXT M 8750 EXEC SLET 8760 GVLIN=VLIN;VLIN=P;M=P 8770 AKOD(VLIN,E)=B;AKOD(VLIN,G)=B 8780 REPEAT 8790 EXEC VARELINI 8800 IF CEKS=E THEN VLIN=VLIN+E;LIE=LIE+E 8810 UNTIL VARENR<>B AND CEKS=B 8820 VLIN=GVLIN 8830 EXEC AJOUR 8840 ENDIF 8850 ENDCASE 8860 IF SVAR1$<>"3" AND SVAR1$<>"5" AND SVAR1$<>"6" THEN 8870 IF VLIN<=12 THEN 8880 STARTL=E;SLUTL=VLIN 8890 ELSE 8900 IF J<7 THEN 8910 STARTL=E;SLUTL=12 8920 ELSE 8930 IF VLIN-J<7 THEN 8940 STARTL=VLIN-12;SLUTL=VLIN 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 W,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=B 9150 CLEAR 9160 CHAIN "P641210:OPSTART"
0x0000…0031 (0,) 8d88 0090 B=0;E=1;G=2;V=3;W=9
0x0000…0031 LineComalBin {
0x0000…0031 ptr = 0x8d88 // 0x0 @0x0
0x0000…0031 lno = 0x005a // 0x2 @0x2
0x0000…0031 at0004 = ╱42╱B╱ // 0x4 @0x4
0x0000…0031 at0005 = ╱dc╱=╱ // 0x5 @0x5
0x0000…0031 at0006 = ╱30╱0╱ // 0x6 @0x6
0x0000…0031 at0007 = ╱fe00000000╱ // 0x7 @0x7
0x0000…0031 at000c = ╱eb╱;╱ // 0xc @0xc
0x0000…0031 at000d = ╱45╱E╱ // 0xd @0xd
0x0000…0031 at000e = ╱dc╱=╱ // 0xe @0xe
0x0000…0031 at000f = ╱31╱1╱ // 0xf @0xf
0x0000…0031 at0010 = ╱fe00008001╱ // 0x10 @0x10
0x0000…0031 at0015 = ╱eb╱;╱ // 0x15 @0x15
0x0000…0031 at0016 = ╱47╱G╱ // 0x16 @0x16
0x0000…0031 at0017 = ╱dc╱=╱ // 0x17 @0x17
0x0000…0031 at0018 = ╱32╱2╱ // 0x18 @0x18
0x0000…0031 at0019 = ╱fe00008002╱ // 0x19 @0x19
0x0000…0031 at001e = ╱eb╱;╱ // 0x1e @0x1e
0x0000…0031 at001f = ╱56╱V╱ // 0x1f @0x1f
0x0000…0031 at0020 = ╱dc╱=╱ // 0x20 @0x20
0x0000…0031 at0021 = ╱33╱3╱ // 0x21 @0x21
0x0000…0031 at0022 = ╱fe0000c002╱ // 0x22 @0x22
0x0000…0031 at0027 = ╱eb╱;╱ // 0x27 @0x27
0x0000…0031 at0028 = ╱57╱W╱ // 0x28 @0x28
0x0000…0031 at0029 = ╱dc╱=╱ // 0x29 @0x29
0x0000…0031 at002a = ╱39╱9╱ // 0x2a @0x2a
0x0000…0031 at002b = ╱fe00009004╱ // 0x2b @0x2b
0x0000…0031 at0030 = EOL // 0x30 @0x30
0x0000…0031 }
0x0031…009c 8df3 0100 DIM OP1$(12),OP2$(12),RES$(15),BLB2$(12),T2(W),K2$(17),K3$(17),K4$(17)
0x0031…009c LineComalBin {
0x0031…009c ptr = 0x8df3 // 0x31 @0x0
0x0031…009c lno = 0x0064 // 0x33 @0x2
0x0031…009c at0004 = ╱87╱ DIM ╱ // 0x35 @0x4
0x0031…009c at0005 = ╱4f╱O╱ // 0x36 @0x5
0x0031…009c at0006 = ╱50╱P╱ // 0x37 @0x6
0x0031…009c at0007 = ╱31╱1╱ // 0x38 @0x7
0x0031…009c at0008 = ╱ef╱$╱ // 0x39 @0x8
0x0031…009c at0009 = ╱ed╱(╱ // 0x3a @0x9
0x0031…009c at000a = ╱31╱1╱ // 0x3b @0xa
0x0031…009c at000b = ╱32╱2╱ // 0x3c @0xb
0x0031…009c at000c = ╱fe0000c004╱ // 0x3d @0xc
0x0031…009c at0011 = ╱ee╱)╱ // 0x42 @0x11
0x0031…009c at0012 = ╱ec╱,╱ // 0x43 @0x12
0x0031…009c at0013 = ╱4f╱O╱ // 0x44 @0x13
0x0031…009c at0014 = ╱50╱P╱ // 0x45 @0x14
0x0031…009c at0015 = ╱32╱2╱ // 0x46 @0x15
0x0031…009c at0016 = ╱ef╱$╱ // 0x47 @0x16
0x0031…009c at0017 = ╱ed╱(╱ // 0x48 @0x17
0x0031…009c at0018 = ╱31╱1╱ // 0x49 @0x18
0x0031…009c at0019 = ╱32╱2╱ // 0x4a @0x19
0x0031…009c at001a = ╱fe0000c004╱ // 0x4b @0x1a
0x0031…009c at001f = ╱ee╱)╱ // 0x50 @0x1f
0x0031…009c at0020 = ╱ec╱,╱ // 0x51 @0x20
0x0031…009c at0021 = ╱52╱R╱ // 0x52 @0x21
0x0031…009c at0022 = ╱45╱E╱ // 0x53 @0x22
0x0031…009c at0023 = ╱53╱S╱ // 0x54 @0x23
0x0031…009c at0024 = ╱ef╱$╱ // 0x55 @0x24
0x0031…009c at0025 = ╱ed╱(╱ // 0x56 @0x25
0x0031…009c at0026 = ╱31╱1╱ // 0x57 @0x26
0x0031…009c at0027 = ╱35╱5╱ // 0x58 @0x27
0x0031…009c at0028 = ╱fe0000f004╱ // 0x59 @0x28
0x0031…009c at002d = ╱ee╱)╱ // 0x5e @0x2d
0x0031…009c at002e = ╱ec╱,╱ // 0x5f @0x2e
0x0031…009c at002f = ╱42╱B╱ // 0x60 @0x2f
0x0031…009c at0030 = ╱4c╱L╱ // 0x61 @0x30
0x0031…009c at0031 = ╱42╱B╱ // 0x62 @0x31
0x0031…009c at0032 = ╱32╱2╱ // 0x63 @0x32
0x0031…009c at0033 = ╱ef╱$╱ // 0x64 @0x33
0x0031…009c at0034 = ╱ed╱(╱ // 0x65 @0x34
0x0031…009c at0035 = ╱31╱1╱ // 0x66 @0x35
0x0031…009c at0036 = ╱32╱2╱ // 0x67 @0x36
0x0031…009c at0037 = ╱fe0000c004╱ // 0x68 @0x37
0x0031…009c at003c = ╱ee╱)╱ // 0x6d @0x3c
0x0031…009c at003d = ╱ec╱,╱ // 0x6e @0x3d
0x0031…009c at003e = ╱54╱T╱ // 0x6f @0x3e
0x0031…009c at003f = ╱32╱2╱ // 0x70 @0x3f
0x0031…009c at0040 = ╱ed╱(╱ // 0x71 @0x40
0x0031…009c at0041 = ╱57╱W╱ // 0x72 @0x41
0x0031…009c at0042 = ╱ee╱)╱ // 0x73 @0x42
0x0031…009c at0043 = ╱ec╱,╱ // 0x74 @0x43
0x0031…009c at0044 = ╱4b╱K╱ // 0x75 @0x44
0x0031…009c at0045 = ╱32╱2╱ // 0x76 @0x45
0x0031…009c at0046 = ╱ef╱$╱ // 0x77 @0x46
0x0031…009c at0047 = ╱ed╱(╱ // 0x78 @0x47
0x0031…009c at0048 = ╱31╱1╱ // 0x79 @0x48
0x0031…009c at0049 = ╱37╱7╱ // 0x7a @0x49
0x0031…009c at004a = ╱fe00008805╱ // 0x7b @0x4a
0x0031…009c at004f = ╱ee╱)╱ // 0x80 @0x4f
0x0031…009c at0050 = ╱ec╱,╱ // 0x81 @0x50
0x0031…009c at0051 = ╱4b╱K╱ // 0x82 @0x51
0x0031…009c at0052 = ╱33╱3╱ // 0x83 @0x52
0x0031…009c at0053 = ╱ef╱$╱ // 0x84 @0x53
0x0031…009c at0054 = ╱ed╱(╱ // 0x85 @0x54
0x0031…009c at0055 = ╱31╱1╱ // 0x86 @0x55
0x0031…009c at0056 = ╱37╱7╱ // 0x87 @0x56
0x0031…009c at0057 = ╱fe00008805╱ // 0x88 @0x57
0x0031…009c at005c = ╱ee╱)╱ // 0x8d @0x5c
0x0031…009c at005d = ╱ec╱,╱ // 0x8e @0x5d
0x0031…009c at005e = ╱4b╱K╱ // 0x8f @0x5e
0x0031…009c at005f = ╱34╱4╱ // 0x90 @0x5f
0x0031…009c at0060 = ╱ef╱$╱ // 0x91 @0x60
0x0031…009c at0061 = ╱ed╱(╱ // 0x92 @0x61
0x0031…009c at0062 = ╱31╱1╱ // 0x93 @0x62
0x0031…009c at0063 = ╱37╱7╱ // 0x94 @0x63
0x0031…009c at0064 = ╱fe00008805╱ // 0x95 @0x64
0x0031…009c at0069 = ╱ee╱)╱ // 0x9a @0x69
0x0031…009c at006a = EOL // 0x9b @0x6a
0x0031…009c }
0x009c…00fb 8e52 0110 DIM K1$(17),N$(6),K6$(17),K5$(17),DNAVN$(25),DSL1$(12),DKGR$(G)
0x009c…00fb LineComalBin {
0x009c…00fb ptr = 0x8e52 // 0x9c @0x0
0x009c…00fb lno = 0x006e // 0x9e @0x2
0x009c…00fb at0004 = ╱87╱ DIM ╱ // 0xa0 @0x4
0x009c…00fb at0005 = ╱4b╱K╱ // 0xa1 @0x5
0x009c…00fb at0006 = ╱31╱1╱ // 0xa2 @0x6
0x009c…00fb at0007 = ╱ef╱$╱ // 0xa3 @0x7
0x009c…00fb at0008 = ╱ed╱(╱ // 0xa4 @0x8
0x009c…00fb at0009 = ╱31╱1╱ // 0xa5 @0x9
0x009c…00fb at000a = ╱37╱7╱ // 0xa6 @0xa
0x009c…00fb at000b = ╱fe00008805╱ // 0xa7 @0xb
0x009c…00fb at0010 = ╱ee╱)╱ // 0xac @0x10
0x009c…00fb at0011 = ╱ec╱,╱ // 0xad @0x11
0x009c…00fb at0012 = ╱4e╱N╱ // 0xae @0x12
0x009c…00fb at0013 = ╱ef╱$╱ // 0xaf @0x13
0x009c…00fb at0014 = ╱ed╱(╱ // 0xb0 @0x14
0x009c…00fb at0015 = ╱36╱6╱ // 0xb1 @0x15
0x009c…00fb at0016 = ╱fe0000c003╱ // 0xb2 @0x16
0x009c…00fb at001b = ╱ee╱)╱ // 0xb7 @0x1b
0x009c…00fb at001c = ╱ec╱,╱ // 0xb8 @0x1c
0x009c…00fb at001d = ╱4b╱K╱ // 0xb9 @0x1d
0x009c…00fb at001e = ╱36╱6╱ // 0xba @0x1e
0x009c…00fb at001f = ╱ef╱$╱ // 0xbb @0x1f
0x009c…00fb at0020 = ╱ed╱(╱ // 0xbc @0x20
0x009c…00fb at0021 = ╱31╱1╱ // 0xbd @0x21
0x009c…00fb at0022 = ╱37╱7╱ // 0xbe @0x22
0x009c…00fb at0023 = ╱fe00008805╱ // 0xbf @0x23
0x009c…00fb at0028 = ╱ee╱)╱ // 0xc4 @0x28
0x009c…00fb at0029 = ╱ec╱,╱ // 0xc5 @0x29
0x009c…00fb at002a = ╱4b╱K╱ // 0xc6 @0x2a
0x009c…00fb at002b = ╱35╱5╱ // 0xc7 @0x2b
0x009c…00fb at002c = ╱ef╱$╱ // 0xc8 @0x2c
0x009c…00fb at002d = ╱ed╱(╱ // 0xc9 @0x2d
0x009c…00fb at002e = ╱31╱1╱ // 0xca @0x2e
0x009c…00fb at002f = ╱37╱7╱ // 0xcb @0x2f
0x009c…00fb at0030 = ╱fe00008805╱ // 0xcc @0x30
0x009c…00fb at0035 = ╱ee╱)╱ // 0xd1 @0x35
0x009c…00fb at0036 = ╱ec╱,╱ // 0xd2 @0x36
0x009c…00fb at0037 = ╱44╱D╱ // 0xd3 @0x37
0x009c…00fb at0038 = ╱4e╱N╱ // 0xd4 @0x38
0x009c…00fb at0039 = ╱41╱A╱ // 0xd5 @0x39
0x009c…00fb at003a = ╱56╱V╱ // 0xd6 @0x3a
0x009c…00fb at003b = ╱4e╱N╱ // 0xd7 @0x3b
0x009c…00fb at003c = ╱ef╱$╱ // 0xd8 @0x3c
0x009c…00fb at003d = ╱ed╱(╱ // 0xd9 @0x3d
0x009c…00fb at003e = ╱32╱2╱ // 0xda @0x3e
0x009c…00fb at003f = ╱35╱5╱ // 0xdb @0x3f
0x009c…00fb at0040 = ╱fe0000c805╱ // 0xdc @0x40
0x009c…00fb at0045 = ╱ee╱)╱ // 0xe1 @0x45
0x009c…00fb at0046 = ╱ec╱,╱ // 0xe2 @0x46
0x009c…00fb at0047 = ╱44╱D╱ // 0xe3 @0x47
0x009c…00fb at0048 = ╱53╱S╱ // 0xe4 @0x48
0x009c…00fb at0049 = ╱4c╱L╱ // 0xe5 @0x49
0x009c…00fb at004a = ╱31╱1╱ // 0xe6 @0x4a
0x009c…00fb at004b = ╱ef╱$╱ // 0xe7 @0x4b
0x009c…00fb at004c = ╱ed╱(╱ // 0xe8 @0x4c
0x009c…00fb at004d = ╱31╱1╱ // 0xe9 @0x4d
0x009c…00fb at004e = ╱32╱2╱ // 0xea @0x4e
0x009c…00fb at004f = ╱fe0000c004╱ // 0xeb @0x4f
0x009c…00fb at0054 = ╱ee╱)╱ // 0xf0 @0x54
0x009c…00fb at0055 = ╱ec╱,╱ // 0xf1 @0x55
0x009c…00fb at0056 = ╱44╱D╱ // 0xf2 @0x56
0x009c…00fb at0057 = ╱4b╱K╱ // 0xf3 @0x57
0x009c…00fb at0058 = ╱47╱G╱ // 0xf4 @0x58
0x009c…00fb at0059 = ╱52╱R╱ // 0xf5 @0x59
0x009c…00fb at005a = ╱ef╱$╱ // 0xf6 @0x5a
0x009c…00fb at005b = ╱ed╱(╱ // 0xf7 @0x5b
0x009c…00fb at005c = ╱47╱G╱ // 0xf8 @0x5c
0x009c…00fb at005d = ╱ee╱)╱ // 0xf9 @0x5d
0x009c…00fb at005e = EOL // 0xfa @0x5e
0x009c…00fb }
0x00fb…0145 8e9c 0120 DIM DSL2$(12),DSL3$(12),DSL4$(12),DLK$(G),DGADE$(25)
0x00fb…0145 LineComalBin {
0x00fb…0145 ptr = 0x8e9c // 0xfb @0x0
0x00fb…0145 lno = 0x0078 // 0xfd @0x2
0x00fb…0145 at0004 = ╱87╱ DIM ╱ // 0xff @0x4
0x00fb…0145 at0005 = ╱44╱D╱ // 0x100 @0x5
0x00fb…0145 at0006 = ╱53╱S╱ // 0x101 @0x6
0x00fb…0145 at0007 = ╱4c╱L╱ // 0x102 @0x7
0x00fb…0145 at0008 = ╱32╱2╱ // 0x103 @0x8
0x00fb…0145 at0009 = ╱ef╱$╱ // 0x104 @0x9
0x00fb…0145 at000a = ╱ed╱(╱ // 0x105 @0xa
0x00fb…0145 at000b = ╱31╱1╱ // 0x106 @0xb
0x00fb…0145 at000c = ╱32╱2╱ // 0x107 @0xc
0x00fb…0145 at000d = ╱fe0000c004╱ // 0x108 @0xd
0x00fb…0145 at0012 = ╱ee╱)╱ // 0x10d @0x12
0x00fb…0145 at0013 = ╱ec╱,╱ // 0x10e @0x13
0x00fb…0145 at0014 = ╱44╱D╱ // 0x10f @0x14
0x00fb…0145 at0015 = ╱53╱S╱ // 0x110 @0x15
0x00fb…0145 at0016 = ╱4c╱L╱ // 0x111 @0x16
0x00fb…0145 at0017 = ╱33╱3╱ // 0x112 @0x17
0x00fb…0145 at0018 = ╱ef╱$╱ // 0x113 @0x18
0x00fb…0145 at0019 = ╱ed╱(╱ // 0x114 @0x19
0x00fb…0145 at001a = ╱31╱1╱ // 0x115 @0x1a
0x00fb…0145 at001b = ╱32╱2╱ // 0x116 @0x1b
0x00fb…0145 at001c = ╱fe0000c004╱ // 0x117 @0x1c
0x00fb…0145 at0021 = ╱ee╱)╱ // 0x11c @0x21
0x00fb…0145 at0022 = ╱ec╱,╱ // 0x11d @0x22
0x00fb…0145 at0023 = ╱44╱D╱ // 0x11e @0x23
0x00fb…0145 at0024 = ╱53╱S╱ // 0x11f @0x24
0x00fb…0145 at0025 = ╱4c╱L╱ // 0x120 @0x25
0x00fb…0145 at0026 = ╱34╱4╱ // 0x121 @0x26
0x00fb…0145 at0027 = ╱ef╱$╱ // 0x122 @0x27
0x00fb…0145 at0028 = ╱ed╱(╱ // 0x123 @0x28
0x00fb…0145 at0029 = ╱31╱1╱ // 0x124 @0x29
0x00fb…0145 at002a = ╱32╱2╱ // 0x125 @0x2a
0x00fb…0145 at002b = ╱fe0000c004╱ // 0x126 @0x2b
0x00fb…0145 at0030 = ╱ee╱)╱ // 0x12b @0x30
0x00fb…0145 at0031 = ╱ec╱,╱ // 0x12c @0x31
0x00fb…0145 at0032 = ╱44╱D╱ // 0x12d @0x32
0x00fb…0145 at0033 = ╱4c╱L╱ // 0x12e @0x33
0x00fb…0145 at0034 = ╱4b╱K╱ // 0x12f @0x34
0x00fb…0145 at0035 = ╱ef╱$╱ // 0x130 @0x35
0x00fb…0145 at0036 = ╱ed╱(╱ // 0x131 @0x36
0x00fb…0145 at0037 = ╱47╱G╱ // 0x132 @0x37
0x00fb…0145 at0038 = ╱ee╱)╱ // 0x133 @0x38
0x00fb…0145 at0039 = ╱ec╱,╱ // 0x134 @0x39
0x00fb…0145 at003a = ╱44╱D╱ // 0x135 @0x3a
0x00fb…0145 at003b = ╱47╱G╱ // 0x136 @0x3b
0x00fb…0145 at003c = ╱41╱A╱ // 0x137 @0x3c
0x00fb…0145 at003d = ╱44╱D╱ // 0x138 @0x3d
0x00fb…0145 at003e = ╱45╱E╱ // 0x139 @0x3e
0x00fb…0145 at003f = ╱ef╱$╱ // 0x13a @0x3f
0x00fb…0145 at0040 = ╱ed╱(╱ // 0x13b @0x40
0x00fb…0145 at0041 = ╱32╱2╱ // 0x13c @0x41
0x00fb…0145 at0042 = ╱35╱5╱ // 0x13d @0x42
0x00fb…0145 at0043 = ╱fe0000c805╱ // 0x13e @0x43
0x00fb…0145 at0048 = ╱ee╱)╱ // 0x143 @0x48
0x00fb…0145 at0049 = EOL // 0x144 @0x49
0x00fb…0145 }
0x0145…0199 8ef0 0130 DIM DTLF$(W),DBY$(20),SLD$(12),FORS$(12),SVAR2$(E),GTOTAL$(12)
0x0145…0199 LineComalBin {
0x0145…0199 ptr = 0x8ef0 // 0x145 @0x0
0x0145…0199 lno = 0x0082 // 0x147 @0x2
0x0145…0199 at0004 = ╱87╱ DIM ╱ // 0x149 @0x4
0x0145…0199 at0005 = ╱44╱D╱ // 0x14a @0x5
0x0145…0199 at0006 = ╱54╱T╱ // 0x14b @0x6
0x0145…0199 at0007 = ╱4c╱L╱ // 0x14c @0x7
0x0145…0199 at0008 = ╱46╱F╱ // 0x14d @0x8
0x0145…0199 at0009 = ╱ef╱$╱ // 0x14e @0x9
0x0145…0199 at000a = ╱ed╱(╱ // 0x14f @0xa
0x0145…0199 at000b = ╱57╱W╱ // 0x150 @0xb
0x0145…0199 at000c = ╱ee╱)╱ // 0x151 @0xc
0x0145…0199 at000d = ╱ec╱,╱ // 0x152 @0xd
0x0145…0199 at000e = ╱44╱D╱ // 0x153 @0xe
0x0145…0199 at000f = ╱42╱B╱ // 0x154 @0xf
0x0145…0199 at0010 = ╱59╱Y╱ // 0x155 @0x10
0x0145…0199 at0011 = ╱ef╱$╱ // 0x156 @0x11
0x0145…0199 at0012 = ╱ed╱(╱ // 0x157 @0x12
0x0145…0199 at0013 = ╱32╱2╱ // 0x158 @0x13
0x0145…0199 at0014 = ╱30╱0╱ // 0x159 @0x14
0x0145…0199 at0015 = ╱fe0000a005╱ // 0x15a @0x15
0x0145…0199 at001a = ╱ee╱)╱ // 0x15f @0x1a
0x0145…0199 at001b = ╱ec╱,╱ // 0x160 @0x1b
0x0145…0199 at001c = ╱53╱S╱ // 0x161 @0x1c
0x0145…0199 at001d = ╱4c╱L╱ // 0x162 @0x1d
0x0145…0199 at001e = ╱44╱D╱ // 0x163 @0x1e
0x0145…0199 at001f = ╱ef╱$╱ // 0x164 @0x1f
0x0145…0199 at0020 = ╱ed╱(╱ // 0x165 @0x20
0x0145…0199 at0021 = ╱31╱1╱ // 0x166 @0x21
0x0145…0199 at0022 = ╱32╱2╱ // 0x167 @0x22
0x0145…0199 at0023 = ╱fe0000c004╱ // 0x168 @0x23
0x0145…0199 at0028 = ╱ee╱)╱ // 0x16d @0x28
0x0145…0199 at0029 = ╱ec╱,╱ // 0x16e @0x29
0x0145…0199 at002a = ╱46╱F╱ // 0x16f @0x2a
0x0145…0199 at002b = ╱4f╱O╱ // 0x170 @0x2b
0x0145…0199 at002c = ╱52╱R╱ // 0x171 @0x2c
0x0145…0199 at002d = ╱53╱S╱ // 0x172 @0x2d
0x0145…0199 at002e = ╱ef╱$╱ // 0x173 @0x2e
0x0145…0199 at002f = ╱ed╱(╱ // 0x174 @0x2f
0x0145…0199 at0030 = ╱31╱1╱ // 0x175 @0x30
0x0145…0199 at0031 = ╱32╱2╱ // 0x176 @0x31
0x0145…0199 at0032 = ╱fe0000c004╱ // 0x177 @0x32
0x0145…0199 at0037 = ╱ee╱)╱ // 0x17c @0x37
0x0145…0199 at0038 = ╱ec╱,╱ // 0x17d @0x38
0x0145…0199 at0039 = ╱53╱S╱ // 0x17e @0x39
0x0145…0199 at003a = ╱56╱V╱ // 0x17f @0x3a
0x0145…0199 at003b = ╱41╱A╱ // 0x180 @0x3b
0x0145…0199 at003c = ╱52╱R╱ // 0x181 @0x3c
0x0145…0199 at003d = ╱32╱2╱ // 0x182 @0x3d
0x0145…0199 at003e = ╱ef╱$╱ // 0x183 @0x3e
0x0145…0199 at003f = ╱ed╱(╱ // 0x184 @0x3f
0x0145…0199 at0040 = ╱45╱E╱ // 0x185 @0x40
0x0145…0199 at0041 = ╱ee╱)╱ // 0x186 @0x41
0x0145…0199 at0042 = ╱ec╱,╱ // 0x187 @0x42
0x0145…0199 at0043 = ╱47╱G╱ // 0x188 @0x43
0x0145…0199 at0044 = ╱54╱T╱ // 0x189 @0x44
0x0145…0199 at0045 = ╱4f╱O╱ // 0x18a @0x45
0x0145…0199 at0046 = ╱54╱T╱ // 0x18b @0x46
0x0145…0199 at0047 = ╱41╱A╱ // 0x18c @0x47
0x0145…0199 at0048 = ╱4c╱L╱ // 0x18d @0x48
0x0145…0199 at0049 = ╱ef╱$╱ // 0x18e @0x49
0x0145…0199 at004a = ╱ed╱(╱ // 0x18f @0x4a
0x0145…0199 at004b = ╱31╱1╱ // 0x190 @0x4b
0x0145…0199 at004c = ╱32╱2╱ // 0x191 @0x4c
0x0145…0199 at004d = ╱fe0000c004╱ // 0x192 @0x4d
0x0145…0199 at0052 = ╱ee╱)╱ // 0x197 @0x52
0x0145…0199 at0053 = EOL // 0x198 @0x53
0x0145…0199 }
0x0199…01e6 8f3d 0140 DIM ÅRKØB$(12),MDNKØB$(12),K7$(17),A$(6),TAL1$(12)
0x0199…01e6 LineComalBin {
0x0199…01e6 ptr = 0x8f3d // 0x199 @0x0
0x0199…01e6 lno = 0x008c // 0x19b @0x2
0x0199…01e6 at0004 = ╱87╱ DIM ╱ // 0x19d @0x4
0x0199…01e6 at0005 = ╱5d╱Å╱ // 0x19e @0x5
0x0199…01e6 at0006 = ╱52╱R╱ // 0x19f @0x6
0x0199…01e6 at0007 = ╱4b╱K╱ // 0x1a0 @0x7
0x0199…01e6 at0008 = ╱5c╱Ø╱ // 0x1a1 @0x8
0x0199…01e6 at0009 = ╱42╱B╱ // 0x1a2 @0x9
0x0199…01e6 at000a = ╱ef╱$╱ // 0x1a3 @0xa
0x0199…01e6 at000b = ╱ed╱(╱ // 0x1a4 @0xb
0x0199…01e6 at000c = ╱31╱1╱ // 0x1a5 @0xc
0x0199…01e6 at000d = ╱32╱2╱ // 0x1a6 @0xd
0x0199…01e6 at000e = ╱fe0000c004╱ // 0x1a7 @0xe
0x0199…01e6 at0013 = ╱ee╱)╱ // 0x1ac @0x13
0x0199…01e6 at0014 = ╱ec╱,╱ // 0x1ad @0x14
0x0199…01e6 at0015 = ╱4d╱M╱ // 0x1ae @0x15
0x0199…01e6 at0016 = ╱44╱D╱ // 0x1af @0x16
0x0199…01e6 at0017 = ╱4e╱N╱ // 0x1b0 @0x17
0x0199…01e6 at0018 = ╱4b╱K╱ // 0x1b1 @0x18
0x0199…01e6 at0019 = ╱5c╱Ø╱ // 0x1b2 @0x19
0x0199…01e6 at001a = ╱42╱B╱ // 0x1b3 @0x1a
0x0199…01e6 at001b = ╱ef╱$╱ // 0x1b4 @0x1b
0x0199…01e6 at001c = ╱ed╱(╱ // 0x1b5 @0x1c
0x0199…01e6 at001d = ╱31╱1╱ // 0x1b6 @0x1d
0x0199…01e6 at001e = ╱32╱2╱ // 0x1b7 @0x1e
0x0199…01e6 at001f = ╱fe0000c004╱ // 0x1b8 @0x1f
0x0199…01e6 at0024 = ╱ee╱)╱ // 0x1bd @0x24
0x0199…01e6 at0025 = ╱ec╱,╱ // 0x1be @0x25
0x0199…01e6 at0026 = ╱4b╱K╱ // 0x1bf @0x26
0x0199…01e6 at0027 = ╱37╱7╱ // 0x1c0 @0x27
0x0199…01e6 at0028 = ╱ef╱$╱ // 0x1c1 @0x28
0x0199…01e6 at0029 = ╱ed╱(╱ // 0x1c2 @0x29
0x0199…01e6 at002a = ╱31╱1╱ // 0x1c3 @0x2a
0x0199…01e6 at002b = ╱37╱7╱ // 0x1c4 @0x2b
0x0199…01e6 at002c = ╱fe00008805╱ // 0x1c5 @0x2c
0x0199…01e6 at0031 = ╱ee╱)╱ // 0x1ca @0x31
0x0199…01e6 at0032 = ╱ec╱,╱ // 0x1cb @0x32
0x0199…01e6 at0033 = ╱41╱A╱ // 0x1cc @0x33
0x0199…01e6 at0034 = ╱ef╱$╱ // 0x1cd @0x34
0x0199…01e6 at0035 = ╱ed╱(╱ // 0x1ce @0x35
0x0199…01e6 at0036 = ╱36╱6╱ // 0x1cf @0x36
0x0199…01e6 at0037 = ╱fe0000c003╱ // 0x1d0 @0x37
0x0199…01e6 at003c = ╱ee╱)╱ // 0x1d5 @0x3c
0x0199…01e6 at003d = ╱ec╱,╱ // 0x1d6 @0x3d
0x0199…01e6 at003e = ╱54╱T╱ // 0x1d7 @0x3e
0x0199…01e6 at003f = ╱41╱A╱ // 0x1d8 @0x3f
0x0199…01e6 at0040 = ╱4c╱L╱ // 0x1d9 @0x40
0x0199…01e6 at0041 = ╱31╱1╱ // 0x1da @0x41
0x0199…01e6 at0042 = ╱ef╱$╱ // 0x1db @0x42
0x0199…01e6 at0043 = ╱ed╱(╱ // 0x1dc @0x43
0x0199…01e6 at0044 = ╱31╱1╱ // 0x1dd @0x44
0x0199…01e6 at0045 = ╱32╱2╱ // 0x1de @0x45
0x0199…01e6 at0046 = ╱fe0000c004╱ // 0x1df @0x46
0x0199…01e6 at004b = ╱ee╱)╱ // 0x1e4 @0x4b
0x0199…01e6 at004c = EOL // 0x1e5 @0x4c
0x0199…01e6 }
0x01e6…023f 8f96 0150 DIM MOMS$(12),FTOTAL$(12),KOD1$(E),KOD$(E),TAH$(12),TAL4$(14),T1(W)
0x01e6…023f LineComalBin {
0x01e6…023f ptr = 0x8f96 // 0x1e6 @0x0
0x01e6…023f lno = 0x0096 // 0x1e8 @0x2
0x01e6…023f at0004 = ╱87╱ DIM ╱ // 0x1ea @0x4
0x01e6…023f at0005 = ╱4d╱M╱ // 0x1eb @0x5
0x01e6…023f at0006 = ╱4f╱O╱ // 0x1ec @0x6
0x01e6…023f at0007 = ╱4d╱M╱ // 0x1ed @0x7
0x01e6…023f at0008 = ╱53╱S╱ // 0x1ee @0x8
0x01e6…023f at0009 = ╱ef╱$╱ // 0x1ef @0x9
0x01e6…023f at000a = ╱ed╱(╱ // 0x1f0 @0xa
0x01e6…023f at000b = ╱31╱1╱ // 0x1f1 @0xb
0x01e6…023f at000c = ╱32╱2╱ // 0x1f2 @0xc
0x01e6…023f at000d = ╱fe0000c004╱ // 0x1f3 @0xd
0x01e6…023f at0012 = ╱ee╱)╱ // 0x1f8 @0x12
0x01e6…023f at0013 = ╱ec╱,╱ // 0x1f9 @0x13
0x01e6…023f at0014 = ╱46╱F╱ // 0x1fa @0x14
0x01e6…023f at0015 = ╱54╱T╱ // 0x1fb @0x15
0x01e6…023f at0016 = ╱4f╱O╱ // 0x1fc @0x16
0x01e6…023f at0017 = ╱54╱T╱ // 0x1fd @0x17
0x01e6…023f at0018 = ╱41╱A╱ // 0x1fe @0x18
0x01e6…023f at0019 = ╱4c╱L╱ // 0x1ff @0x19
0x01e6…023f at001a = ╱ef╱$╱ // 0x200 @0x1a
0x01e6…023f at001b = ╱ed╱(╱ // 0x201 @0x1b
0x01e6…023f at001c = ╱31╱1╱ // 0x202 @0x1c
0x01e6…023f at001d = ╱32╱2╱ // 0x203 @0x1d
0x01e6…023f at001e = ╱fe0000c004╱ // 0x204 @0x1e
0x01e6…023f at0023 = ╱ee╱)╱ // 0x209 @0x23
0x01e6…023f at0024 = ╱ec╱,╱ // 0x20a @0x24
0x01e6…023f at0025 = ╱4b╱K╱ // 0x20b @0x25
0x01e6…023f at0026 = ╱4f╱O╱ // 0x20c @0x26
0x01e6…023f at0027 = ╱44╱D╱ // 0x20d @0x27
0x01e6…023f at0028 = ╱31╱1╱ // 0x20e @0x28
0x01e6…023f at0029 = ╱ef╱$╱ // 0x20f @0x29
0x01e6…023f at002a = ╱ed╱(╱ // 0x210 @0x2a
0x01e6…023f at002b = ╱45╱E╱ // 0x211 @0x2b
0x01e6…023f at002c = ╱ee╱)╱ // 0x212 @0x2c
0x01e6…023f at002d = ╱ec╱,╱ // 0x213 @0x2d
0x01e6…023f at002e = ╱4b╱K╱ // 0x214 @0x2e
0x01e6…023f at002f = ╱4f╱O╱ // 0x215 @0x2f
0x01e6…023f at0030 = ╱44╱D╱ // 0x216 @0x30
0x01e6…023f at0031 = ╱ef╱$╱ // 0x217 @0x31
0x01e6…023f at0032 = ╱ed╱(╱ // 0x218 @0x32
0x01e6…023f at0033 = ╱45╱E╱ // 0x219 @0x33
0x01e6…023f at0034 = ╱ee╱)╱ // 0x21a @0x34
0x01e6…023f at0035 = ╱ec╱,╱ // 0x21b @0x35
0x01e6…023f at0036 = ╱54╱T╱ // 0x21c @0x36
0x01e6…023f at0037 = ╱41╱A╱ // 0x21d @0x37
0x01e6…023f at0038 = ╱48╱H╱ // 0x21e @0x38
0x01e6…023f at0039 = ╱ef╱$╱ // 0x21f @0x39
0x01e6…023f at003a = ╱ed╱(╱ // 0x220 @0x3a
0x01e6…023f at003b = ╱31╱1╱ // 0x221 @0x3b
0x01e6…023f at003c = ╱32╱2╱ // 0x222 @0x3c
0x01e6…023f at003d = ╱fe0000c004╱ // 0x223 @0x3d
0x01e6…023f at0042 = ╱ee╱)╱ // 0x228 @0x42
0x01e6…023f at0043 = ╱ec╱,╱ // 0x229 @0x43
0x01e6…023f at0044 = ╱54╱T╱ // 0x22a @0x44
0x01e6…023f at0045 = ╱41╱A╱ // 0x22b @0x45
0x01e6…023f at0046 = ╱4c╱L╱ // 0x22c @0x46
0x01e6…023f at0047 = ╱34╱4╱ // 0x22d @0x47
0x01e6…023f at0048 = ╱ef╱$╱ // 0x22e @0x48
0x01e6…023f at0049 = ╱ed╱(╱ // 0x22f @0x49
0x01e6…023f at004a = ╱31╱1╱ // 0x230 @0x4a
0x01e6…023f at004b = ╱34╱4╱ // 0x231 @0x4b
0x01e6…023f at004c = ╱fe0000e004╱ // 0x232 @0x4c
0x01e6…023f at0051 = ╱ee╱)╱ // 0x237 @0x51
0x01e6…023f at0052 = ╱ec╱,╱ // 0x238 @0x52
0x01e6…023f at0053 = ╱54╱T╱ // 0x239 @0x53
0x01e6…023f at0054 = ╱31╱1╱ // 0x23a @0x54
0x01e6…023f at0055 = ╱ed╱(╱ // 0x23b @0x55
0x01e6…023f at0056 = ╱57╱W╱ // 0x23c @0x56
0x01e6…023f at0057 = ╱ee╱)╱ // 0x23d @0x57
0x01e6…023f at0058 = EOL // 0x23e @0x58
0x01e6…023f }
0x023f…0290 8fe7 0160 DIM VARTEKST$(50),VPRI$(12),BL$(12),TOTAL$(12),BB$(12)
0x023f…0290 LineComalBin {
0x023f…0290 ptr = 0x8fe7 // 0x23f @0x0
0x023f…0290 lno = 0x00a0 // 0x241 @0x2
0x023f…0290 at0004 = ╱87╱ DIM ╱ // 0x243 @0x4
0x023f…0290 at0005 = ╱56╱V╱ // 0x244 @0x5
0x023f…0290 at0006 = ╱41╱A╱ // 0x245 @0x6
0x023f…0290 at0007 = ╱52╱R╱ // 0x246 @0x7
0x023f…0290 at0008 = ╱54╱T╱ // 0x247 @0x8
0x023f…0290 at0009 = ╱45╱E╱ // 0x248 @0x9
0x023f…0290 at000a = ╱4b╱K╱ // 0x249 @0xa
0x023f…0290 at000b = ╱53╱S╱ // 0x24a @0xb
0x023f…0290 at000c = ╱54╱T╱ // 0x24b @0xc
0x023f…0290 at000d = ╱ef╱$╱ // 0x24c @0xd
0x023f…0290 at000e = ╱ed╱(╱ // 0x24d @0xe
0x023f…0290 at000f = ╱35╱5╱ // 0x24e @0xf
0x023f…0290 at0010 = ╱30╱0╱ // 0x24f @0x10
0x023f…0290 at0011 = ╱fe0000c806╱ // 0x250 @0x11
0x023f…0290 at0016 = ╱ee╱)╱ // 0x255 @0x16
0x023f…0290 at0017 = ╱ec╱,╱ // 0x256 @0x17
0x023f…0290 at0018 = ╱56╱V╱ // 0x257 @0x18
0x023f…0290 at0019 = ╱50╱P╱ // 0x258 @0x19
0x023f…0290 at001a = ╱52╱R╱ // 0x259 @0x1a
0x023f…0290 at001b = ╱49╱I╱ // 0x25a @0x1b
0x023f…0290 at001c = ╱ef╱$╱ // 0x25b @0x1c
0x023f…0290 at001d = ╱ed╱(╱ // 0x25c @0x1d
0x023f…0290 at001e = ╱31╱1╱ // 0x25d @0x1e
0x023f…0290 at001f = ╱32╱2╱ // 0x25e @0x1f
0x023f…0290 at0020 = ╱fe0000c004╱ // 0x25f @0x20
0x023f…0290 at0025 = ╱ee╱)╱ // 0x264 @0x25
0x023f…0290 at0026 = ╱ec╱,╱ // 0x265 @0x26
0x023f…0290 at0027 = ╱42╱B╱ // 0x266 @0x27
0x023f…0290 at0028 = ╱4c╱L╱ // 0x267 @0x28
0x023f…0290 at0029 = ╱ef╱$╱ // 0x268 @0x29
0x023f…0290 at002a = ╱ed╱(╱ // 0x269 @0x2a
0x023f…0290 at002b = ╱31╱1╱ // 0x26a @0x2b
0x023f…0290 at002c = ╱32╱2╱ // 0x26b @0x2c
0x023f…0290 at002d = ╱fe0000c004╱ // 0x26c @0x2d
0x023f…0290 at0032 = ╱ee╱)╱ // 0x271 @0x32
0x023f…0290 at0033 = ╱ec╱,╱ // 0x272 @0x33
0x023f…0290 at0034 = ╱54╱T╱ // 0x273 @0x34
0x023f…0290 at0035 = ╱4f╱O╱ // 0x274 @0x35
0x023f…0290 at0036 = ╱54╱T╱ // 0x275 @0x36
0x023f…0290 at0037 = ╱41╱A╱ // 0x276 @0x37
0x023f…0290 at0038 = ╱4c╱L╱ // 0x277 @0x38
0x023f…0290 at0039 = ╱ef╱$╱ // 0x278 @0x39
0x023f…0290 at003a = ╱ed╱(╱ // 0x279 @0x3a
0x023f…0290 at003b = ╱31╱1╱ // 0x27a @0x3b
0x023f…0290 at003c = ╱32╱2╱ // 0x27b @0x3c
0x023f…0290 at003d = ╱fe0000c004╱ // 0x27c @0x3d
0x023f…0290 at0042 = ╱ee╱)╱ // 0x281 @0x42
0x023f…0290 at0043 = ╱ec╱,╱ // 0x282 @0x43
0x023f…0290 at0044 = ╱42╱B╱ // 0x283 @0x44
0x023f…0290 at0045 = ╱42╱B╱ // 0x284 @0x45
0x023f…0290 at0046 = ╱ef╱$╱ // 0x285 @0x46
0x023f…0290 at0047 = ╱ed╱(╱ // 0x286 @0x47
0x023f…0290 at0048 = ╱31╱1╱ // 0x287 @0x48
0x023f…0290 at0049 = ╱32╱2╱ // 0x288 @0x49
0x023f…0290 at004a = ╱fe0000c004╱ // 0x289 @0x4a
0x023f…0290 at004f = ╱ee╱)╱ // 0x28e @0x4f
0x023f…0290 at0050 = EOL // 0x28f @0x50
0x023f…0290 }
0x0290…02eb 9042 0170 DIM SVAR1$(E),FAKKRE$(E),LEVTEKST$(52),ANTAL$(12),BK$(77),LAND$(W,12)
0x0290…02eb LineComalBin {
0x0290…02eb ptr = 0x9042 // 0x290 @0x0
0x0290…02eb lno = 0x00aa // 0x292 @0x2
0x0290…02eb at0004 = ╱87╱ DIM ╱ // 0x294 @0x4
0x0290…02eb at0005 = ╱53╱S╱ // 0x295 @0x5
0x0290…02eb at0006 = ╱56╱V╱ // 0x296 @0x6
0x0290…02eb at0007 = ╱41╱A╱ // 0x297 @0x7
0x0290…02eb at0008 = ╱52╱R╱ // 0x298 @0x8
0x0290…02eb at0009 = ╱31╱1╱ // 0x299 @0x9
0x0290…02eb at000a = ╱ef╱$╱ // 0x29a @0xa
0x0290…02eb at000b = ╱ed╱(╱ // 0x29b @0xb
0x0290…02eb at000c = ╱45╱E╱ // 0x29c @0xc
0x0290…02eb at000d = ╱ee╱)╱ // 0x29d @0xd
0x0290…02eb at000e = ╱ec╱,╱ // 0x29e @0xe
0x0290…02eb at000f = ╱46╱F╱ // 0x29f @0xf
0x0290…02eb at0010 = ╱41╱A╱ // 0x2a0 @0x10
0x0290…02eb at0011 = ╱4b╱K╱ // 0x2a1 @0x11
0x0290…02eb at0012 = ╱4b╱K╱ // 0x2a2 @0x12
0x0290…02eb at0013 = ╱52╱R╱ // 0x2a3 @0x13
0x0290…02eb at0014 = ╱45╱E╱ // 0x2a4 @0x14
0x0290…02eb at0015 = ╱ef╱$╱ // 0x2a5 @0x15
0x0290…02eb at0016 = ╱ed╱(╱ // 0x2a6 @0x16
0x0290…02eb at0017 = ╱45╱E╱ // 0x2a7 @0x17
0x0290…02eb at0018 = ╱ee╱)╱ // 0x2a8 @0x18
0x0290…02eb at0019 = ╱ec╱,╱ // 0x2a9 @0x19
0x0290…02eb at001a = ╱4c╱L╱ // 0x2aa @0x1a
0x0290…02eb at001b = ╱45╱E╱ // 0x2ab @0x1b
0x0290…02eb at001c = ╱56╱V╱ // 0x2ac @0x1c
0x0290…02eb at001d = ╱54╱T╱ // 0x2ad @0x1d
0x0290…02eb at001e = ╱45╱E╱ // 0x2ae @0x1e
0x0290…02eb at001f = ╱4b╱K╱ // 0x2af @0x1f
0x0290…02eb at0020 = ╱53╱S╱ // 0x2b0 @0x20
0x0290…02eb at0021 = ╱54╱T╱ // 0x2b1 @0x21
0x0290…02eb at0022 = ╱ef╱$╱ // 0x2b2 @0x22
0x0290…02eb at0023 = ╱ed╱(╱ // 0x2b3 @0x23
0x0290…02eb at0024 = ╱35╱5╱ // 0x2b4 @0x24
0x0290…02eb at0025 = ╱32╱2╱ // 0x2b5 @0x25
0x0290…02eb at0026 = ╱fe0000d006╱ // 0x2b6 @0x26
0x0290…02eb at002b = ╱ee╱)╱ // 0x2bb @0x2b
0x0290…02eb at002c = ╱ec╱,╱ // 0x2bc @0x2c
0x0290…02eb at002d = ╱41╱A╱ // 0x2bd @0x2d
0x0290…02eb at002e = ╱4e╱N╱ // 0x2be @0x2e
0x0290…02eb at002f = ╱54╱T╱ // 0x2bf @0x2f
0x0290…02eb at0030 = ╱41╱A╱ // 0x2c0 @0x30
0x0290…02eb at0031 = ╱4c╱L╱ // 0x2c1 @0x31
0x0290…02eb at0032 = ╱ef╱$╱ // 0x2c2 @0x32
0x0290…02eb at0033 = ╱ed╱(╱ // 0x2c3 @0x33
0x0290…02eb at0034 = ╱31╱1╱ // 0x2c4 @0x34
0x0290…02eb at0035 = ╱32╱2╱ // 0x2c5 @0x35
0x0290…02eb at0036 = ╱fe0000c004╱ // 0x2c6 @0x36
0x0290…02eb at003b = ╱ee╱)╱ // 0x2cb @0x3b
0x0290…02eb at003c = ╱ec╱,╱ // 0x2cc @0x3c
0x0290…02eb at003d = ╱42╱B╱ // 0x2cd @0x3d
0x0290…02eb at003e = ╱4b╱K╱ // 0x2ce @0x3e
0x0290…02eb at003f = ╱ef╱$╱ // 0x2cf @0x3f
0x0290…02eb at0040 = ╱ed╱(╱ // 0x2d0 @0x40
0x0290…02eb at0041 = ╱37╱7╱ // 0x2d1 @0x41
0x0290…02eb at0042 = ╱37╱7╱ // 0x2d2 @0x42
0x0290…02eb at0043 = ╱fe00009a07╱ // 0x2d3 @0x43
0x0290…02eb at0048 = ╱ee╱)╱ // 0x2d8 @0x48
0x0290…02eb at0049 = ╱ec╱,╱ // 0x2d9 @0x49
0x0290…02eb at004a = ╱4c╱L╱ // 0x2da @0x4a
0x0290…02eb at004b = ╱41╱A╱ // 0x2db @0x4b
0x0290…02eb at004c = ╱4e╱N╱ // 0x2dc @0x4c
0x0290…02eb at004d = ╱44╱D╱ // 0x2dd @0x4d
0x0290…02eb at004e = ╱ef╱$╱ // 0x2de @0x4e
0x0290…02eb at004f = ╱ed╱(╱ // 0x2df @0x4f
0x0290…02eb at0050 = ╱57╱W╱ // 0x2e0 @0x50
0x0290…02eb at0051 = ╱ec╱,╱ // 0x2e1 @0x51
0x0290…02eb at0052 = ╱31╱1╱ // 0x2e2 @0x52
0x0290…02eb at0053 = ╱32╱2╱ // 0x2e3 @0x53
0x0290…02eb at0054 = ╱fe0000c004╱ // 0x2e4 @0x54
0x0290…02eb at0059 = ╱ee╱)╱ // 0x2e9 @0x59
0x0290…02eb at005a = EOL // 0x2ea @0x5a
0x0290…02eb }
0x02eb…0358 90af 0180 DIM LTX1$(6),LTX2$(32),LTX3$(47),LTX4$(19),LTX5$(17),LTX6$(31),LTX7$(33)
0x02eb…0358 LineComalBin {
0x02eb…0358 ptr = 0x90af // 0x2eb @0x0
0x02eb…0358 lno = 0x00b4 // 0x2ed @0x2
0x02eb…0358 at0004 = ╱87╱ DIM ╱ // 0x2ef @0x4
0x02eb…0358 at0005 = ╱4c╱L╱ // 0x2f0 @0x5
0x02eb…0358 at0006 = ╱54╱T╱ // 0x2f1 @0x6
0x02eb…0358 at0007 = ╱58╱X╱ // 0x2f2 @0x7
0x02eb…0358 at0008 = ╱31╱1╱ // 0x2f3 @0x8
0x02eb…0358 at0009 = ╱ef╱$╱ // 0x2f4 @0x9
0x02eb…0358 at000a = ╱ed╱(╱ // 0x2f5 @0xa
0x02eb…0358 at000b = ╱36╱6╱ // 0x2f6 @0xb
0x02eb…0358 at000c = ╱fe0000c003╱ // 0x2f7 @0xc
0x02eb…0358 at0011 = ╱ee╱)╱ // 0x2fc @0x11
0x02eb…0358 at0012 = ╱ec╱,╱ // 0x2fd @0x12
0x02eb…0358 at0013 = ╱4c╱L╱ // 0x2fe @0x13
0x02eb…0358 at0014 = ╱54╱T╱ // 0x2ff @0x14
0x02eb…0358 at0015 = ╱58╱X╱ // 0x300 @0x15
0x02eb…0358 at0016 = ╱32╱2╱ // 0x301 @0x16
0x02eb…0358 at0017 = ╱ef╱$╱ // 0x302 @0x17
0x02eb…0358 at0018 = ╱ed╱(╱ // 0x303 @0x18
0x02eb…0358 at0019 = ╱33╱3╱ // 0x304 @0x19
0x02eb…0358 at001a = ╱32╱2╱ // 0x305 @0x1a
0x02eb…0358 at001b = ╱fe00008006╱ // 0x306 @0x1b
0x02eb…0358 at0020 = ╱ee╱)╱ // 0x30b @0x20
0x02eb…0358 at0021 = ╱ec╱,╱ // 0x30c @0x21
0x02eb…0358 at0022 = ╱4c╱L╱ // 0x30d @0x22
0x02eb…0358 at0023 = ╱54╱T╱ // 0x30e @0x23
0x02eb…0358 at0024 = ╱58╱X╱ // 0x30f @0x24
0x02eb…0358 at0025 = ╱33╱3╱ // 0x310 @0x25
0x02eb…0358 at0026 = ╱ef╱$╱ // 0x311 @0x26
0x02eb…0358 at0027 = ╱ed╱(╱ // 0x312 @0x27
0x02eb…0358 at0028 = ╱34╱4╱ // 0x313 @0x28
0x02eb…0358 at0029 = ╱37╱7╱ // 0x314 @0x29
0x02eb…0358 at002a = ╱fe0000bc06╱ // 0x315 @0x2a
0x02eb…0358 at002f = ╱ee╱)╱ // 0x31a @0x2f
0x02eb…0358 at0030 = ╱ec╱,╱ // 0x31b @0x30
0x02eb…0358 at0031 = ╱4c╱L╱ // 0x31c @0x31
0x02eb…0358 at0032 = ╱54╱T╱ // 0x31d @0x32
0x02eb…0358 at0033 = ╱58╱X╱ // 0x31e @0x33
0x02eb…0358 at0034 = ╱34╱4╱ // 0x31f @0x34
0x02eb…0358 at0035 = ╱ef╱$╱ // 0x320 @0x35
0x02eb…0358 at0036 = ╱ed╱(╱ // 0x321 @0x36
0x02eb…0358 at0037 = ╱31╱1╱ // 0x322 @0x37
0x02eb…0358 at0038 = ╱39╱9╱ // 0x323 @0x38
0x02eb…0358 at0039 = ╱fe00009805╱ // 0x324 @0x39
0x02eb…0358 at003e = ╱ee╱)╱ // 0x329 @0x3e
0x02eb…0358 at003f = ╱ec╱,╱ // 0x32a @0x3f
0x02eb…0358 at0040 = ╱4c╱L╱ // 0x32b @0x40
0x02eb…0358 at0041 = ╱54╱T╱ // 0x32c @0x41
0x02eb…0358 at0042 = ╱58╱X╱ // 0x32d @0x42
0x02eb…0358 at0043 = ╱35╱5╱ // 0x32e @0x43
0x02eb…0358 at0044 = ╱ef╱$╱ // 0x32f @0x44
0x02eb…0358 at0045 = ╱ed╱(╱ // 0x330 @0x45
0x02eb…0358 at0046 = ╱31╱1╱ // 0x331 @0x46
0x02eb…0358 at0047 = ╱37╱7╱ // 0x332 @0x47
0x02eb…0358 at0048 = ╱fe00008805╱ // 0x333 @0x48
0x02eb…0358 at004d = ╱ee╱)╱ // 0x338 @0x4d
0x02eb…0358 at004e = ╱ec╱,╱ // 0x339 @0x4e
0x02eb…0358 at004f = ╱4c╱L╱ // 0x33a @0x4f
0x02eb…0358 at0050 = ╱54╱T╱ // 0x33b @0x50
0x02eb…0358 at0051 = ╱58╱X╱ // 0x33c @0x51
0x02eb…0358 at0052 = ╱36╱6╱ // 0x33d @0x52
0x02eb…0358 at0053 = ╱ef╱$╱ // 0x33e @0x53
0x02eb…0358 at0054 = ╱ed╱(╱ // 0x33f @0x54
0x02eb…0358 at0055 = ╱33╱3╱ // 0x340 @0x55
0x02eb…0358 at0056 = ╱31╱1╱ // 0x341 @0x56
0x02eb…0358 at0057 = ╱fe0000f805╱ // 0x342 @0x57
0x02eb…0358 at005c = ╱ee╱)╱ // 0x347 @0x5c
0x02eb…0358 at005d = ╱ec╱,╱ // 0x348 @0x5d
0x02eb…0358 at005e = ╱4c╱L╱ // 0x349 @0x5e
0x02eb…0358 at005f = ╱54╱T╱ // 0x34a @0x5f
0x02eb…0358 at0060 = ╱58╱X╱ // 0x34b @0x60
0x02eb…0358 at0061 = ╱37╱7╱ // 0x34c @0x61
0x02eb…0358 at0062 = ╱ef╱$╱ // 0x34d @0x62
0x02eb…0358 at0063 = ╱ed╱(╱ // 0x34e @0x63
0x02eb…0358 at0064 = ╱33╱3╱ // 0x34f @0x64
0x02eb…0358 at0065 = ╱33╱3╱ // 0x350 @0x65
0x02eb…0358 at0066 = ╱fe00008406╱ // 0x351 @0x66
0x02eb…0358 at006b = ╱ee╱)╱ // 0x356 @0x6b
0x02eb…0358 at006c = EOL // 0x357 @0x6c
0x02eb…0358 }
0x0358…03b5 910c 0190 DIM LTX8$(W),LTX9$(25),LTX10$(26),LTX11$(28),LTX12$(39),LTX13$(33)
0x0358…03b5 LineComalBin {
0x0358…03b5 ptr = 0x910c // 0x358 @0x0
0x0358…03b5 lno = 0x00be // 0x35a @0x2
0x0358…03b5 at0004 = ╱87╱ DIM ╱ // 0x35c @0x4
0x0358…03b5 at0005 = ╱4c╱L╱ // 0x35d @0x5
0x0358…03b5 at0006 = ╱54╱T╱ // 0x35e @0x6
0x0358…03b5 at0007 = ╱58╱X╱ // 0x35f @0x7
0x0358…03b5 at0008 = ╱38╱8╱ // 0x360 @0x8
0x0358…03b5 at0009 = ╱ef╱$╱ // 0x361 @0x9
0x0358…03b5 at000a = ╱ed╱(╱ // 0x362 @0xa
0x0358…03b5 at000b = ╱57╱W╱ // 0x363 @0xb
0x0358…03b5 at000c = ╱ee╱)╱ // 0x364 @0xc
0x0358…03b5 at000d = ╱ec╱,╱ // 0x365 @0xd
0x0358…03b5 at000e = ╱4c╱L╱ // 0x366 @0xe
0x0358…03b5 at000f = ╱54╱T╱ // 0x367 @0xf
0x0358…03b5 at0010 = ╱58╱X╱ // 0x368 @0x10
0x0358…03b5 at0011 = ╱39╱9╱ // 0x369 @0x11
0x0358…03b5 at0012 = ╱ef╱$╱ // 0x36a @0x12
0x0358…03b5 at0013 = ╱ed╱(╱ // 0x36b @0x13
0x0358…03b5 at0014 = ╱32╱2╱ // 0x36c @0x14
0x0358…03b5 at0015 = ╱35╱5╱ // 0x36d @0x15
0x0358…03b5 at0016 = ╱fe0000c805╱ // 0x36e @0x16
0x0358…03b5 at001b = ╱ee╱)╱ // 0x373 @0x1b
0x0358…03b5 at001c = ╱ec╱,╱ // 0x374 @0x1c
0x0358…03b5 at001d = ╱4c╱L╱ // 0x375 @0x1d
0x0358…03b5 at001e = ╱54╱T╱ // 0x376 @0x1e
0x0358…03b5 at001f = ╱58╱X╱ // 0x377 @0x1f
0x0358…03b5 at0020 = ╱31╱1╱ // 0x378 @0x20
0x0358…03b5 at0021 = ╱30╱0╱ // 0x379 @0x21
0x0358…03b5 at0022 = ╱ef╱$╱ // 0x37a @0x22
0x0358…03b5 at0023 = ╱ed╱(╱ // 0x37b @0x23
0x0358…03b5 at0024 = ╱32╱2╱ // 0x37c @0x24
0x0358…03b5 at0025 = ╱36╱6╱ // 0x37d @0x25
0x0358…03b5 at0026 = ╱fe0000d005╱ // 0x37e @0x26
0x0358…03b5 at002b = ╱ee╱)╱ // 0x383 @0x2b
0x0358…03b5 at002c = ╱ec╱,╱ // 0x384 @0x2c
0x0358…03b5 at002d = ╱4c╱L╱ // 0x385 @0x2d
0x0358…03b5 at002e = ╱54╱T╱ // 0x386 @0x2e
0x0358…03b5 at002f = ╱58╱X╱ // 0x387 @0x2f
0x0358…03b5 at0030 = ╱31╱1╱ // 0x388 @0x30
0x0358…03b5 at0031 = ╱31╱1╱ // 0x389 @0x31
0x0358…03b5 at0032 = ╱ef╱$╱ // 0x38a @0x32
0x0358…03b5 at0033 = ╱ed╱(╱ // 0x38b @0x33
0x0358…03b5 at0034 = ╱32╱2╱ // 0x38c @0x34
0x0358…03b5 at0035 = ╱38╱8╱ // 0x38d @0x35
0x0358…03b5 at0036 = ╱fe0000e005╱ // 0x38e @0x36
0x0358…03b5 at003b = ╱ee╱)╱ // 0x393 @0x3b
0x0358…03b5 at003c = ╱ec╱,╱ // 0x394 @0x3c
0x0358…03b5 at003d = ╱4c╱L╱ // 0x395 @0x3d
0x0358…03b5 at003e = ╱54╱T╱ // 0x396 @0x3e
0x0358…03b5 at003f = ╱58╱X╱ // 0x397 @0x3f
0x0358…03b5 at0040 = ╱31╱1╱ // 0x398 @0x40
0x0358…03b5 at0041 = ╱32╱2╱ // 0x399 @0x41
0x0358…03b5 at0042 = ╱ef╱$╱ // 0x39a @0x42
0x0358…03b5 at0043 = ╱ed╱(╱ // 0x39b @0x43
0x0358…03b5 at0044 = ╱33╱3╱ // 0x39c @0x44
0x0358…03b5 at0045 = ╱39╱9╱ // 0x39d @0x45
0x0358…03b5 at0046 = ╱fe00009c06╱ // 0x39e @0x46
0x0358…03b5 at004b = ╱ee╱)╱ // 0x3a3 @0x4b
0x0358…03b5 at004c = ╱ec╱,╱ // 0x3a4 @0x4c
0x0358…03b5 at004d = ╱4c╱L╱ // 0x3a5 @0x4d
0x0358…03b5 at004e = ╱54╱T╱ // 0x3a6 @0x4e
0x0358…03b5 at004f = ╱58╱X╱ // 0x3a7 @0x4f
0x0358…03b5 at0050 = ╱31╱1╱ // 0x3a8 @0x50
0x0358…03b5 at0051 = ╱33╱3╱ // 0x3a9 @0x51
0x0358…03b5 at0052 = ╱ef╱$╱ // 0x3aa @0x52
0x0358…03b5 at0053 = ╱ed╱(╱ // 0x3ab @0x53
0x0358…03b5 at0054 = ╱33╱3╱ // 0x3ac @0x54
0x0358…03b5 at0055 = ╱33╱3╱ // 0x3ad @0x55
0x0358…03b5 at0056 = ╱fe00008406╱ // 0x3ae @0x56
0x0358…03b5 at005b = ╱ee╱)╱ // 0x3b3 @0x5b
0x0358…03b5 at005c = EOL // 0x3b4 @0x5c
0x0358…03b5 }
0x03b5…03e4 913b 0200 TAL4$="0+";TOTAL$="0+";TAH$=" ,00+"
0x03b5…03e4 LineComalBin {
0x03b5…03e4 ptr = 0x913b // 0x3b5 @0x0
0x03b5…03e4 lno = 0x00c8 // 0x3b7 @0x2
0x03b5…03e4 at0004 = ╱54╱T╱ // 0x3b9 @0x4
0x03b5…03e4 at0005 = ╱41╱A╱ // 0x3ba @0x5
0x03b5…03e4 at0006 = ╱4c╱L╱ // 0x3bb @0x6
0x03b5…03e4 at0007 = ╱34╱4╱ // 0x3bc @0x7
0x03b5…03e4 at0008 = ╱ef╱$╱ // 0x3bd @0x8
0x03b5…03e4 at0009 = ╱dc╱=╱ // 0x3be @0x9
0x03b5…03e4 at000a = ╱22╱"╱ // 0x3bf @0xa
0x03b5…03e4 at000b = ╱30╱0╱ // 0x3c0 @0xb
0x03b5…03e4 at000c = ╱2b╱+╱ // 0x3c1 @0xc
0x03b5…03e4 at000d = ╱22╱"╱ // 0x3c2 @0xd
0x03b5…03e4 at000e = ╱eb╱;╱ // 0x3c3 @0xe
0x03b5…03e4 at000f = ╱54╱T╱ // 0x3c4 @0xf
0x03b5…03e4 at0010 = ╱4f╱O╱ // 0x3c5 @0x10
0x03b5…03e4 at0011 = ╱54╱T╱ // 0x3c6 @0x11
0x03b5…03e4 at0012 = ╱41╱A╱ // 0x3c7 @0x12
0x03b5…03e4 at0013 = ╱4c╱L╱ // 0x3c8 @0x13
0x03b5…03e4 at0014 = ╱ef╱$╱ // 0x3c9 @0x14
0x03b5…03e4 at0015 = ╱dc╱=╱ // 0x3ca @0x15
0x03b5…03e4 at0016 = ╱22╱"╱ // 0x3cb @0x16
0x03b5…03e4 at0017 = ╱30╱0╱ // 0x3cc @0x17
0x03b5…03e4 at0018 = ╱2b╱+╱ // 0x3cd @0x18
0x03b5…03e4 at0019 = ╱22╱"╱ // 0x3ce @0x19
0x03b5…03e4 at001a = ╱eb╱;╱ // 0x3cf @0x1a
0x03b5…03e4 at001b = ╱54╱T╱ // 0x3d0 @0x1b
0x03b5…03e4 at001c = ╱41╱A╱ // 0x3d1 @0x1c
0x03b5…03e4 at001d = ╱48╱H╱ // 0x3d2 @0x1d
0x03b5…03e4 at001e = ╱ef╱$╱ // 0x3d3 @0x1e
0x03b5…03e4 at001f = ╱dc╱=╱ // 0x3d4 @0x1f
0x03b5…03e4 at0020 = ╱22╱"╱ // 0x3d5 @0x20
0x03b5…03e4 at0021 = ╱20╱…╱ // 0x3d6 @0x21
0x03b5…03e4 at0022 = ╱20╱…╱ // 0x3d7 @0x22
0x03b5…03e4 at0023 = ╱20╱…╱ // 0x3d8 @0x23
0x03b5…03e4 at0024 = ╱20╱…╱ // 0x3d9 @0x24
0x03b5…03e4 at0025 = ╱20╱…╱ // 0x3da @0x25
0x03b5…03e4 at0026 = ╱20╱…╱ // 0x3db @0x26
0x03b5…03e4 at0027 = ╱20╱…╱ // 0x3dc @0x27
0x03b5…03e4 at0028 = ╱20╱…╱ // 0x3dd @0x28
0x03b5…03e4 at0029 = ╱2c╱,╱ // 0x3de @0x29
0x03b5…03e4 at002a = ╱30╱0╱ // 0x3df @0x2a
0x03b5…03e4 at002b = ╱30╱0╱ // 0x3e0 @0x2b
0x03b5…03e4 at002c = ╱2b╱+╱ // 0x3e1 @0x2c
0x03b5…03e4 at002d = ╱22╱"╱ // 0x3e2 @0x2d
0x03b5…03e4 at002e = EOL // 0x3e3 @0x2e
0x03b5…03e4 }
0x03e4…041d 9174 0210 BK$=" ";BK$=BK$+BK$+BK$+" "
0x03e4…041d LineComalBin {
0x03e4…041d ptr = 0x9174 // 0x3e4 @0x0
0x03e4…041d lno = 0x00d2 // 0x3e6 @0x2
0x03e4…041d at0004 = ╱42╱B╱ // 0x3e8 @0x4
0x03e4…041d at0005 = ╱4b╱K╱ // 0x3e9 @0x5
0x03e4…041d at0006 = ╱ef╱$╱ // 0x3ea @0x6
0x03e4…041d at0007 = ╱dc╱=╱ // 0x3eb @0x7
0x03e4…041d at0008 = ╱22╱"╱ // 0x3ec @0x8
0x03e4…041d at0009 = ╱20╱…╱ // 0x3ed @0x9
0x03e4…041d at000a = ╱20╱…╱ // 0x3ee @0xa
0x03e4…041d at000b = ╱20╱…╱ // 0x3ef @0xb
0x03e4…041d at000c = ╱20╱…╱ // 0x3f0 @0xc
0x03e4…041d at000d = ╱20╱…╱ // 0x3f1 @0xd
0x03e4…041d at000e = ╱20╱…╱ // 0x3f2 @0xe
0x03e4…041d at000f = ╱20╱…╱ // 0x3f3 @0xf
0x03e4…041d at0010 = ╱20╱…╱ // 0x3f4 @0x10
0x03e4…041d at0011 = ╱20╱…╱ // 0x3f5 @0x11
0x03e4…041d at0012 = ╱20╱…╱ // 0x3f6 @0x12
0x03e4…041d at0013 = ╱20╱…╱ // 0x3f7 @0x13
0x03e4…041d at0014 = ╱20╱…╱ // 0x3f8 @0x14
0x03e4…041d at0015 = ╱20╱…╱ // 0x3f9 @0x15
0x03e4…041d at0016 = ╱20╱…╱ // 0x3fa @0x16
0x03e4…041d at0017 = ╱20╱…╱ // 0x3fb @0x17
0x03e4…041d at0018 = ╱20╱…╱ // 0x3fc @0x18
0x03e4…041d at0019 = ╱20╱…╱ // 0x3fd @0x19
0x03e4…041d at001a = ╱20╱…╱ // 0x3fe @0x1a
0x03e4…041d at001b = ╱20╱…╱ // 0x3ff @0x1b
0x03e4…041d at001c = ╱20╱…╱ // 0x400 @0x1c
0x03e4…041d at001d = ╱20╱…╱ // 0x401 @0x1d
0x03e4…041d at001e = ╱20╱…╱ // 0x402 @0x1e
0x03e4…041d at001f = ╱20╱…╱ // 0x403 @0x1f
0x03e4…041d at0020 = ╱20╱…╱ // 0x404 @0x20
0x03e4…041d at0021 = ╱20╱…╱ // 0x405 @0x21
0x03e4…041d at0022 = ╱22╱"╱ // 0x406 @0x22
0x03e4…041d at0023 = ╱eb╱;╱ // 0x407 @0x23
0x03e4…041d at0024 = ╱42╱B╱ // 0x408 @0x24
0x03e4…041d at0025 = ╱4b╱K╱ // 0x409 @0x25
0x03e4…041d at0026 = ╱ef╱$╱ // 0x40a @0x26
0x03e4…041d at0027 = ╱dc╱=╱ // 0x40b @0x27
0x03e4…041d at0028 = ╱42╱B╱ // 0x40c @0x28
0x03e4…041d at0029 = ╱4b╱K╱ // 0x40d @0x29
0x03e4…041d at002a = ╱ef╱$╱ // 0x40e @0x2a
0x03e4…041d at002b = ╱f1╱+╱ // 0x40f @0x2b
0x03e4…041d at002c = ╱42╱B╱ // 0x410 @0x2c
0x03e4…041d at002d = ╱4b╱K╱ // 0x411 @0x2d
0x03e4…041d at002e = ╱ef╱$╱ // 0x412 @0x2e
0x03e4…041d at002f = ╱f1╱+╱ // 0x413 @0x2f
0x03e4…041d at0030 = ╱42╱B╱ // 0x414 @0x30
0x03e4…041d at0031 = ╱4b╱K╱ // 0x415 @0x31
0x03e4…041d at0032 = ╱ef╱$╱ // 0x416 @0x32
0x03e4…041d at0033 = ╱f1╱+╱ // 0x417 @0x33
0x03e4…041d at0034 = ╱22╱"╱ // 0x418 @0x34
0x03e4…041d at0035 = ╱20╱…╱ // 0x419 @0x35
0x03e4…041d at0036 = ╱20╱…╱ // 0x41a @0x36
0x03e4…041d at0037 = ╱22╱"╱ // 0x41b @0x37
0x03e4…041d at0038 = EOL // 0x41c @0x38
0x03e4…041d }
0x041d…0468 91bf 0220 LTX1$="Rabat ";LTX3$="Fakturering. Indtast kundenummer, 0 for færdig:"
0x041d…0468 LineComalBin {
0x041d…0468 ptr = 0x91bf // 0x41d @0x0
0x041d…0468 lno = 0x00dc // 0x41f @0x2
0x041d…0468 at0004 = ╱4c╱L╱ // 0x421 @0x4
0x041d…0468 at0005 = ╱54╱T╱ // 0x422 @0x5
0x041d…0468 at0006 = ╱58╱X╱ // 0x423 @0x6
0x041d…0468 at0007 = ╱31╱1╱ // 0x424 @0x7
0x041d…0468 at0008 = ╱ef╱$╱ // 0x425 @0x8
0x041d…0468 at0009 = ╱dc╱=╱ // 0x426 @0x9
0x041d…0468 at000a = ╱22╱"╱ // 0x427 @0xa
0x041d…0468 at000b = ╱52╱R╱ // 0x428 @0xb
0x041d…0468 at000c = ╱61╱a╱ // 0x429 @0xc
0x041d…0468 at000d = ╱62╱b╱ // 0x42a @0xd
0x041d…0468 at000e = ╱61╱a╱ // 0x42b @0xe
0x041d…0468 at000f = ╱74╱t╱ // 0x42c @0xf
0x041d…0468 at0010 = ╱20╱…╱ // 0x42d @0x10
0x041d…0468 at0011 = ╱22╱"╱ // 0x42e @0x11
0x041d…0468 at0012 = ╱eb╱;╱ // 0x42f @0x12
0x041d…0468 at0013 = ╱4c╱L╱ // 0x430 @0x13
0x041d…0468 at0014 = ╱54╱T╱ // 0x431 @0x14
0x041d…0468 at0015 = ╱58╱X╱ // 0x432 @0x15
0x041d…0468 at0016 = ╱33╱3╱ // 0x433 @0x16
0x041d…0468 at0017 = ╱ef╱$╱ // 0x434 @0x17
0x041d…0468 at0018 = ╱dc╱=╱ // 0x435 @0x18
0x041d…0468 at0019 = ╱22╱"╱ // 0x436 @0x19
0x041d…0468 at001a = ╱46╱F╱ // 0x437 @0x1a
0x041d…0468 at001b = ╱61╱a╱ // 0x438 @0x1b
0x041d…0468 at001c = ╱6b╱k╱ // 0x439 @0x1c
0x041d…0468 at001d = ╱74╱t╱ // 0x43a @0x1d
0x041d…0468 at001e = ╱75╱u╱ // 0x43b @0x1e
0x041d…0468 at001f = ╱72╱r╱ // 0x43c @0x1f
0x041d…0468 at0020 = ╱65╱e╱ // 0x43d @0x20
0x041d…0468 at0021 = ╱72╱r╱ // 0x43e @0x21
0x041d…0468 at0022 = ╱69╱i╱ // 0x43f @0x22
0x041d…0468 at0023 = ╱6e╱n╱ // 0x440 @0x23
0x041d…0468 at0024 = ╱67╱g╱ // 0x441 @0x24
0x041d…0468 at0025 = ╱2e╱.╱ // 0x442 @0x25
0x041d…0468 at0026 = ╱20╱…╱ // 0x443 @0x26
0x041d…0468 at0027 = ╱49╱I╱ // 0x444 @0x27
0x041d…0468 at0028 = ╱6e╱n╱ // 0x445 @0x28
0x041d…0468 at0029 = ╱64╱d╱ // 0x446 @0x29
0x041d…0468 at002a = ╱74╱t╱ // 0x447 @0x2a
0x041d…0468 at002b = ╱61╱a╱ // 0x448 @0x2b
0x041d…0468 at002c = ╱73╱s╱ // 0x449 @0x2c
0x041d…0468 at002d = ╱74╱t╱ // 0x44a @0x2d
0x041d…0468 at002e = ╱20╱…╱ // 0x44b @0x2e
0x041d…0468 at002f = ╱6b╱k╱ // 0x44c @0x2f
0x041d…0468 at0030 = ╱75╱u╱ // 0x44d @0x30
0x041d…0468 at0031 = ╱6e╱n╱ // 0x44e @0x31
0x041d…0468 at0032 = ╱64╱d╱ // 0x44f @0x32
0x041d…0468 at0033 = ╱65╱e╱ // 0x450 @0x33
0x041d…0468 at0034 = ╱6e╱n╱ // 0x451 @0x34
0x041d…0468 at0035 = ╱75╱u╱ // 0x452 @0x35
0x041d…0468 at0036 = ╱6d╱m╱ // 0x453 @0x36
0x041d…0468 at0037 = ╱6d╱m╱ // 0x454 @0x37
0x041d…0468 at0038 = ╱65╱e╱ // 0x455 @0x38
0x041d…0468 at0039 = ╱72╱r╱ // 0x456 @0x39
0x041d…0468 at003a = ╱2c╱,╱ // 0x457 @0x3a
0x041d…0468 at003b = ╱20╱…╱ // 0x458 @0x3b
0x041d…0468 at003c = ╱30╱0╱ // 0x459 @0x3c
0x041d…0468 at003d = ╱20╱…╱ // 0x45a @0x3d
0x041d…0468 at003e = ╱66╱f╱ // 0x45b @0x3e
0x041d…0468 at003f = ╱6f╱o╱ // 0x45c @0x3f
0x041d…0468 at0040 = ╱72╱r╱ // 0x45d @0x40
0x041d…0468 at0041 = ╱20╱…╱ // 0x45e @0x41
0x041d…0468 at0042 = ╱66╱f╱ // 0x45f @0x42
0x041d…0468 at0043 = ╱7b╱æ╱ // 0x460 @0x43
0x041d…0468 at0044 = ╱72╱r╱ // 0x461 @0x44
0x041d…0468 at0045 = ╱64╱d╱ // 0x462 @0x45
0x041d…0468 at0046 = ╱69╱i╱ // 0x463 @0x46
0x041d…0468 at0047 = ╱67╱g╱ // 0x464 @0x47
0x041d…0468 at0048 = ╱3a╱:╱ // 0x465 @0x48
0x041d…0468 at0049 = ╱22╱"╱ // 0x466 @0x49
0x041d…0468 at004a = EOL // 0x467 @0x4a
0x041d…0468 }
0x0468…04b1 9208 0230 LTX2$="Korrekt forsendelsesbeløb (J/N):";LTX4$="Rigtig kunde (J/N):"
0x0468…04b1 LineComalBin {
0x0468…04b1 ptr = 0x9208 // 0x468 @0x0
0x0468…04b1 lno = 0x00e6 // 0x46a @0x2
0x0468…04b1 at0004 = ╱4c╱L╱ // 0x46c @0x4
0x0468…04b1 at0005 = ╱54╱T╱ // 0x46d @0x5
0x0468…04b1 at0006 = ╱58╱X╱ // 0x46e @0x6
0x0468…04b1 at0007 = ╱32╱2╱ // 0x46f @0x7
0x0468…04b1 at0008 = ╱ef╱$╱ // 0x470 @0x8
0x0468…04b1 at0009 = ╱dc╱=╱ // 0x471 @0x9
0x0468…04b1 at000a = ╱22╱"╱ // 0x472 @0xa
0x0468…04b1 at000b = ╱4b╱K╱ // 0x473 @0xb
0x0468…04b1 at000c = ╱6f╱o╱ // 0x474 @0xc
0x0468…04b1 at000d = ╱72╱r╱ // 0x475 @0xd
0x0468…04b1 at000e = ╱72╱r╱ // 0x476 @0xe
0x0468…04b1 at000f = ╱65╱e╱ // 0x477 @0xf
0x0468…04b1 at0010 = ╱6b╱k╱ // 0x478 @0x10
0x0468…04b1 at0011 = ╱74╱t╱ // 0x479 @0x11
0x0468…04b1 at0012 = ╱20╱…╱ // 0x47a @0x12
0x0468…04b1 at0013 = ╱66╱f╱ // 0x47b @0x13
0x0468…04b1 at0014 = ╱6f╱o╱ // 0x47c @0x14
0x0468…04b1 at0015 = ╱72╱r╱ // 0x47d @0x15
0x0468…04b1 at0016 = ╱73╱s╱ // 0x47e @0x16
0x0468…04b1 at0017 = ╱65╱e╱ // 0x47f @0x17
0x0468…04b1 at0018 = ╱6e╱n╱ // 0x480 @0x18
0x0468…04b1 at0019 = ╱64╱d╱ // 0x481 @0x19
0x0468…04b1 at001a = ╱65╱e╱ // 0x482 @0x1a
0x0468…04b1 at001b = ╱6c╱l╱ // 0x483 @0x1b
0x0468…04b1 at001c = ╱73╱s╱ // 0x484 @0x1c
0x0468…04b1 at001d = ╱65╱e╱ // 0x485 @0x1d
0x0468…04b1 at001e = ╱73╱s╱ // 0x486 @0x1e
0x0468…04b1 at001f = ╱62╱b╱ // 0x487 @0x1f
0x0468…04b1 at0020 = ╱65╱e╱ // 0x488 @0x20
0x0468…04b1 at0021 = ╱6c╱l╱ // 0x489 @0x21
0x0468…04b1 at0022 = ╱7c╱ø╱ // 0x48a @0x22
0x0468…04b1 at0023 = ╱62╱b╱ // 0x48b @0x23
0x0468…04b1 at0024 = ╱20╱…╱ // 0x48c @0x24
0x0468…04b1 at0025 = ╱28╱(╱ // 0x48d @0x25
0x0468…04b1 at0026 = ╱4a╱J╱ // 0x48e @0x26
0x0468…04b1 at0027 = ╱2f╱/╱ // 0x48f @0x27
0x0468…04b1 at0028 = ╱4e╱N╱ // 0x490 @0x28
0x0468…04b1 at0029 = ╱29╱)╱ // 0x491 @0x29
0x0468…04b1 at002a = ╱3a╱:╱ // 0x492 @0x2a
0x0468…04b1 at002b = ╱22╱"╱ // 0x493 @0x2b
0x0468…04b1 at002c = ╱eb╱;╱ // 0x494 @0x2c
0x0468…04b1 at002d = ╱4c╱L╱ // 0x495 @0x2d
0x0468…04b1 at002e = ╱54╱T╱ // 0x496 @0x2e
0x0468…04b1 at002f = ╱58╱X╱ // 0x497 @0x2f
0x0468…04b1 at0030 = ╱34╱4╱ // 0x498 @0x30
0x0468…04b1 at0031 = ╱ef╱$╱ // 0x499 @0x31
0x0468…04b1 at0032 = ╱dc╱=╱ // 0x49a @0x32
0x0468…04b1 at0033 = ╱22╱"╱ // 0x49b @0x33
0x0468…04b1 at0034 = ╱52╱R╱ // 0x49c @0x34
0x0468…04b1 at0035 = ╱69╱i╱ // 0x49d @0x35
0x0468…04b1 at0036 = ╱67╱g╱ // 0x49e @0x36
0x0468…04b1 at0037 = ╱74╱t╱ // 0x49f @0x37
0x0468…04b1 at0038 = ╱69╱i╱ // 0x4a0 @0x38
0x0468…04b1 at0039 = ╱67╱g╱ // 0x4a1 @0x39
0x0468…04b1 at003a = ╱20╱…╱ // 0x4a2 @0x3a
0x0468…04b1 at003b = ╱6b╱k╱ // 0x4a3 @0x3b
0x0468…04b1 at003c = ╱75╱u╱ // 0x4a4 @0x3c
0x0468…04b1 at003d = ╱6e╱n╱ // 0x4a5 @0x3d
0x0468…04b1 at003e = ╱64╱d╱ // 0x4a6 @0x3e
0x0468…04b1 at003f = ╱65╱e╱ // 0x4a7 @0x3f
0x0468…04b1 at0040 = ╱20╱…╱ // 0x4a8 @0x40
0x0468…04b1 at0041 = ╱28╱(╱ // 0x4a9 @0x41
0x0468…04b1 at0042 = ╱4a╱J╱ // 0x4aa @0x42
0x0468…04b1 at0043 = ╱2f╱/╱ // 0x4ab @0x43
0x0468…04b1 at0044 = ╱4e╱N╱ // 0x4ac @0x44
0x0468…04b1 at0045 = ╱29╱)╱ // 0x4ad @0x45
0x0468…04b1 at0046 = ╱3a╱:╱ // 0x4ae @0x46
0x0468…04b1 at0047 = ╱22╱"╱ // 0x4af @0x47
0x0468…04b1 at0048 = EOL // 0x4b0 @0x48
0x0468…04b1 }
0x04b1…04f8 924f 0240 LTX5$="Ordrenr.: ";LTX7$="Der er ikke plads til ny faktura."
0x04b1…04f8 LineComalBin {
0x04b1…04f8 ptr = 0x924f // 0x4b1 @0x0
0x04b1…04f8 lno = 0x00f0 // 0x4b3 @0x2
0x04b1…04f8 at0004 = ╱4c╱L╱ // 0x4b5 @0x4
0x04b1…04f8 at0005 = ╱54╱T╱ // 0x4b6 @0x5
0x04b1…04f8 at0006 = ╱58╱X╱ // 0x4b7 @0x6
0x04b1…04f8 at0007 = ╱35╱5╱ // 0x4b8 @0x7
0x04b1…04f8 at0008 = ╱ef╱$╱ // 0x4b9 @0x8
0x04b1…04f8 at0009 = ╱dc╱=╱ // 0x4ba @0x9
0x04b1…04f8 at000a = ╱22╱"╱ // 0x4bb @0xa
0x04b1…04f8 at000b = ╱4f╱O╱ // 0x4bc @0xb
0x04b1…04f8 at000c = ╱72╱r╱ // 0x4bd @0xc
0x04b1…04f8 at000d = ╱64╱d╱ // 0x4be @0xd
0x04b1…04f8 at000e = ╱72╱r╱ // 0x4bf @0xe
0x04b1…04f8 at000f = ╱65╱e╱ // 0x4c0 @0xf
0x04b1…04f8 at0010 = ╱6e╱n╱ // 0x4c1 @0x10
0x04b1…04f8 at0011 = ╱72╱r╱ // 0x4c2 @0x11
0x04b1…04f8 at0012 = ╱2e╱.╱ // 0x4c3 @0x12
0x04b1…04f8 at0013 = ╱3a╱:╱ // 0x4c4 @0x13
0x04b1…04f8 at0014 = ╱20╱…╱ // 0x4c5 @0x14
0x04b1…04f8 at0015 = ╱20╱…╱ // 0x4c6 @0x15
0x04b1…04f8 at0016 = ╱20╱…╱ // 0x4c7 @0x16
0x04b1…04f8 at0017 = ╱20╱…╱ // 0x4c8 @0x17
0x04b1…04f8 at0018 = ╱20╱…╱ // 0x4c9 @0x18
0x04b1…04f8 at0019 = ╱20╱…╱ // 0x4ca @0x19
0x04b1…04f8 at001a = ╱20╱…╱ // 0x4cb @0x1a
0x04b1…04f8 at001b = ╱22╱"╱ // 0x4cc @0x1b
0x04b1…04f8 at001c = ╱eb╱;╱ // 0x4cd @0x1c
0x04b1…04f8 at001d = ╱4c╱L╱ // 0x4ce @0x1d
0x04b1…04f8 at001e = ╱54╱T╱ // 0x4cf @0x1e
0x04b1…04f8 at001f = ╱58╱X╱ // 0x4d0 @0x1f
0x04b1…04f8 at0020 = ╱37╱7╱ // 0x4d1 @0x20
0x04b1…04f8 at0021 = ╱ef╱$╱ // 0x4d2 @0x21
0x04b1…04f8 at0022 = ╱dc╱=╱ // 0x4d3 @0x22
0x04b1…04f8 at0023 = ╱22╱"╱ // 0x4d4 @0x23
0x04b1…04f8 at0024 = ╱44╱D╱ // 0x4d5 @0x24
0x04b1…04f8 at0025 = ╱65╱e╱ // 0x4d6 @0x25
0x04b1…04f8 at0026 = ╱72╱r╱ // 0x4d7 @0x26
0x04b1…04f8 at0027 = ╱20╱…╱ // 0x4d8 @0x27
0x04b1…04f8 at0028 = ╱65╱e╱ // 0x4d9 @0x28
0x04b1…04f8 at0029 = ╱72╱r╱ // 0x4da @0x29
0x04b1…04f8 at002a = ╱20╱…╱ // 0x4db @0x2a
0x04b1…04f8 at002b = ╱69╱i╱ // 0x4dc @0x2b
0x04b1…04f8 at002c = ╱6b╱k╱ // 0x4dd @0x2c
0x04b1…04f8 at002d = ╱6b╱k╱ // 0x4de @0x2d
0x04b1…04f8 at002e = ╱65╱e╱ // 0x4df @0x2e
0x04b1…04f8 at002f = ╱20╱…╱ // 0x4e0 @0x2f
0x04b1…04f8 at0030 = ╱70╱p╱ // 0x4e1 @0x30
0x04b1…04f8 at0031 = ╱6c╱l╱ // 0x4e2 @0x31
0x04b1…04f8 at0032 = ╱61╱a╱ // 0x4e3 @0x32
0x04b1…04f8 at0033 = ╱64╱d╱ // 0x4e4 @0x33
0x04b1…04f8 at0034 = ╱73╱s╱ // 0x4e5 @0x34
0x04b1…04f8 at0035 = ╱20╱…╱ // 0x4e6 @0x35
0x04b1…04f8 at0036 = ╱74╱t╱ // 0x4e7 @0x36
0x04b1…04f8 at0037 = ╱69╱i╱ // 0x4e8 @0x37
0x04b1…04f8 at0038 = ╱6c╱l╱ // 0x4e9 @0x38
0x04b1…04f8 at0039 = ╱20╱…╱ // 0x4ea @0x39
0x04b1…04f8 at003a = ╱6e╱n╱ // 0x4eb @0x3a
0x04b1…04f8 at003b = ╱79╱y╱ // 0x4ec @0x3b
0x04b1…04f8 at003c = ╱20╱…╱ // 0x4ed @0x3c
0x04b1…04f8 at003d = ╱66╱f╱ // 0x4ee @0x3d
0x04b1…04f8 at003e = ╱61╱a╱ // 0x4ef @0x3e
0x04b1…04f8 at003f = ╱6b╱k╱ // 0x4f0 @0x3f
0x04b1…04f8 at0040 = ╱74╱t╱ // 0x4f1 @0x40
0x04b1…04f8 at0041 = ╱75╱u╱ // 0x4f2 @0x41
0x04b1…04f8 at0042 = ╱72╱r╱ // 0x4f3 @0x42
0x04b1…04f8 at0043 = ╱61╱a╱ // 0x4f4 @0x43
0x04b1…04f8 at0044 = ╱2e╱.╱ // 0x4f5 @0x44
0x04b1…04f8 at0045 = ╱22╱"╱ // 0x4f6 @0x45
0x04b1…04f8 at0046 = EOL // 0x4f7 @0x46
0x04b1…04f8 }
0x04f8…0544 929b 0250 LTX9$="Linie, som ønskes ændret:";LTX11$="Ønskes linien slettet (J/N):"
0x04f8…0544 LineComalBin {
0x04f8…0544 ptr = 0x929b // 0x4f8 @0x0
0x04f8…0544 lno = 0x00fa // 0x4fa @0x2
0x04f8…0544 at0004 = ╱4c╱L╱ // 0x4fc @0x4
0x04f8…0544 at0005 = ╱54╱T╱ // 0x4fd @0x5
0x04f8…0544 at0006 = ╱58╱X╱ // 0x4fe @0x6
0x04f8…0544 at0007 = ╱39╱9╱ // 0x4ff @0x7
0x04f8…0544 at0008 = ╱ef╱$╱ // 0x500 @0x8
0x04f8…0544 at0009 = ╱dc╱=╱ // 0x501 @0x9
0x04f8…0544 at000a = ╱22╱"╱ // 0x502 @0xa
0x04f8…0544 at000b = ╱4c╱L╱ // 0x503 @0xb
0x04f8…0544 at000c = ╱69╱i╱ // 0x504 @0xc
0x04f8…0544 at000d = ╱6e╱n╱ // 0x505 @0xd
0x04f8…0544 at000e = ╱69╱i╱ // 0x506 @0xe
0x04f8…0544 at000f = ╱65╱e╱ // 0x507 @0xf
0x04f8…0544 at0010 = ╱2c╱,╱ // 0x508 @0x10
0x04f8…0544 at0011 = ╱20╱…╱ // 0x509 @0x11
0x04f8…0544 at0012 = ╱73╱s╱ // 0x50a @0x12
0x04f8…0544 at0013 = ╱6f╱o╱ // 0x50b @0x13
0x04f8…0544 at0014 = ╱6d╱m╱ // 0x50c @0x14
0x04f8…0544 at0015 = ╱20╱…╱ // 0x50d @0x15
0x04f8…0544 at0016 = ╱7c╱ø╱ // 0x50e @0x16
0x04f8…0544 at0017 = ╱6e╱n╱ // 0x50f @0x17
0x04f8…0544 at0018 = ╱73╱s╱ // 0x510 @0x18
0x04f8…0544 at0019 = ╱6b╱k╱ // 0x511 @0x19
0x04f8…0544 at001a = ╱65╱e╱ // 0x512 @0x1a
0x04f8…0544 at001b = ╱73╱s╱ // 0x513 @0x1b
0x04f8…0544 at001c = ╱20╱…╱ // 0x514 @0x1c
0x04f8…0544 at001d = ╱7b╱æ╱ // 0x515 @0x1d
0x04f8…0544 at001e = ╱6e╱n╱ // 0x516 @0x1e
0x04f8…0544 at001f = ╱64╱d╱ // 0x517 @0x1f
0x04f8…0544 at0020 = ╱72╱r╱ // 0x518 @0x20
0x04f8…0544 at0021 = ╱65╱e╱ // 0x519 @0x21
0x04f8…0544 at0022 = ╱74╱t╱ // 0x51a @0x22
0x04f8…0544 at0023 = ╱3a╱:╱ // 0x51b @0x23
0x04f8…0544 at0024 = ╱22╱"╱ // 0x51c @0x24
0x04f8…0544 at0025 = ╱eb╱;╱ // 0x51d @0x25
0x04f8…0544 at0026 = ╱4c╱L╱ // 0x51e @0x26
0x04f8…0544 at0027 = ╱54╱T╱ // 0x51f @0x27
0x04f8…0544 at0028 = ╱58╱X╱ // 0x520 @0x28
0x04f8…0544 at0029 = ╱31╱1╱ // 0x521 @0x29
0x04f8…0544 at002a = ╱31╱1╱ // 0x522 @0x2a
0x04f8…0544 at002b = ╱ef╱$╱ // 0x523 @0x2b
0x04f8…0544 at002c = ╱dc╱=╱ // 0x524 @0x2c
0x04f8…0544 at002d = ╱22╱"╱ // 0x525 @0x2d
0x04f8…0544 at002e = ╱5c╱Ø╱ // 0x526 @0x2e
0x04f8…0544 at002f = ╱6e╱n╱ // 0x527 @0x2f
0x04f8…0544 at0030 = ╱73╱s╱ // 0x528 @0x30
0x04f8…0544 at0031 = ╱6b╱k╱ // 0x529 @0x31
0x04f8…0544 at0032 = ╱65╱e╱ // 0x52a @0x32
0x04f8…0544 at0033 = ╱73╱s╱ // 0x52b @0x33
0x04f8…0544 at0034 = ╱20╱…╱ // 0x52c @0x34
0x04f8…0544 at0035 = ╱6c╱l╱ // 0x52d @0x35
0x04f8…0544 at0036 = ╱69╱i╱ // 0x52e @0x36
0x04f8…0544 at0037 = ╱6e╱n╱ // 0x52f @0x37
0x04f8…0544 at0038 = ╱69╱i╱ // 0x530 @0x38
0x04f8…0544 at0039 = ╱65╱e╱ // 0x531 @0x39
0x04f8…0544 at003a = ╱6e╱n╱ // 0x532 @0x3a
0x04f8…0544 at003b = ╱20╱…╱ // 0x533 @0x3b
0x04f8…0544 at003c = ╱73╱s╱ // 0x534 @0x3c
0x04f8…0544 at003d = ╱6c╱l╱ // 0x535 @0x3d
0x04f8…0544 at003e = ╱65╱e╱ // 0x536 @0x3e
0x04f8…0544 at003f = ╱74╱t╱ // 0x537 @0x3f
0x04f8…0544 at0040 = ╱74╱t╱ // 0x538 @0x40
0x04f8…0544 at0041 = ╱65╱e╱ // 0x539 @0x41
0x04f8…0544 at0042 = ╱74╱t╱ // 0x53a @0x42
0x04f8…0544 at0043 = ╱20╱…╱ // 0x53b @0x43
0x04f8…0544 at0044 = ╱28╱(╱ // 0x53c @0x44
0x04f8…0544 at0045 = ╱4a╱J╱ // 0x53d @0x45
0x04f8…0544 at0046 = ╱2f╱/╱ // 0x53e @0x46
0x04f8…0544 at0047 = ╱4e╱N╱ // 0x53f @0x47
0x04f8…0544 at0048 = ╱29╱)╱ // 0x540 @0x48
0x04f8…0544 at0049 = ╱3a╱:╱ // 0x541 @0x49
0x04f8…0544 at004a = ╱22╱"╱ // 0x542 @0x4a
0x04f8…0544 at004b = EOL // 0x543 @0x4b
0x04f8…0544 }
0x0544…058b 92e2 0260 LTX8$="Vælg 1-5:";LTX12$="Linie fra hvilken der ønskes udskrevet:"
0x0544…058b LineComalBin {
0x0544…058b ptr = 0x92e2 // 0x544 @0x0
0x0544…058b lno = 0x0104 // 0x546 @0x2
0x0544…058b at0004 = ╱4c╱L╱ // 0x548 @0x4
0x0544…058b at0005 = ╱54╱T╱ // 0x549 @0x5
0x0544…058b at0006 = ╱58╱X╱ // 0x54a @0x6
0x0544…058b at0007 = ╱38╱8╱ // 0x54b @0x7
0x0544…058b at0008 = ╱ef╱$╱ // 0x54c @0x8
0x0544…058b at0009 = ╱dc╱=╱ // 0x54d @0x9
0x0544…058b at000a = ╱22╱"╱ // 0x54e @0xa
0x0544…058b at000b = ╱56╱V╱ // 0x54f @0xb
0x0544…058b at000c = ╱7b╱æ╱ // 0x550 @0xc
0x0544…058b at000d = ╱6c╱l╱ // 0x551 @0xd
0x0544…058b at000e = ╱67╱g╱ // 0x552 @0xe
0x0544…058b at000f = ╱20╱…╱ // 0x553 @0xf
0x0544…058b at0010 = ╱31╱1╱ // 0x554 @0x10
0x0544…058b at0011 = ╱2d╱-╱ // 0x555 @0x11
0x0544…058b at0012 = ╱35╱5╱ // 0x556 @0x12
0x0544…058b at0013 = ╱3a╱:╱ // 0x557 @0x13
0x0544…058b at0014 = ╱22╱"╱ // 0x558 @0x14
0x0544…058b at0015 = ╱eb╱;╱ // 0x559 @0x15
0x0544…058b at0016 = ╱4c╱L╱ // 0x55a @0x16
0x0544…058b at0017 = ╱54╱T╱ // 0x55b @0x17
0x0544…058b at0018 = ╱58╱X╱ // 0x55c @0x18
0x0544…058b at0019 = ╱31╱1╱ // 0x55d @0x19
0x0544…058b at001a = ╱32╱2╱ // 0x55e @0x1a
0x0544…058b at001b = ╱ef╱$╱ // 0x55f @0x1b
0x0544…058b at001c = ╱dc╱=╱ // 0x560 @0x1c
0x0544…058b at001d = ╱22╱"╱ // 0x561 @0x1d
0x0544…058b at001e = ╱4c╱L╱ // 0x562 @0x1e
0x0544…058b at001f = ╱69╱i╱ // 0x563 @0x1f
0x0544…058b at0020 = ╱6e╱n╱ // 0x564 @0x20
0x0544…058b at0021 = ╱69╱i╱ // 0x565 @0x21
0x0544…058b at0022 = ╱65╱e╱ // 0x566 @0x22
0x0544…058b at0023 = ╱20╱…╱ // 0x567 @0x23
0x0544…058b at0024 = ╱66╱f╱ // 0x568 @0x24
0x0544…058b at0025 = ╱72╱r╱ // 0x569 @0x25
0x0544…058b at0026 = ╱61╱a╱ // 0x56a @0x26
0x0544…058b at0027 = ╱20╱…╱ // 0x56b @0x27
0x0544…058b at0028 = ╱68╱h╱ // 0x56c @0x28
0x0544…058b at0029 = ╱76╱v╱ // 0x56d @0x29
0x0544…058b at002a = ╱69╱i╱ // 0x56e @0x2a
0x0544…058b at002b = ╱6c╱l╱ // 0x56f @0x2b
0x0544…058b at002c = ╱6b╱k╱ // 0x570 @0x2c
0x0544…058b at002d = ╱65╱e╱ // 0x571 @0x2d
0x0544…058b at002e = ╱6e╱n╱ // 0x572 @0x2e
0x0544…058b at002f = ╱20╱…╱ // 0x573 @0x2f
0x0544…058b at0030 = ╱64╱d╱ // 0x574 @0x30
0x0544…058b at0031 = ╱65╱e╱ // 0x575 @0x31
0x0544…058b at0032 = ╱72╱r╱ // 0x576 @0x32
0x0544…058b at0033 = ╱20╱…╱ // 0x577 @0x33
0x0544…058b at0034 = ╱7c╱ø╱ // 0x578 @0x34
0x0544…058b at0035 = ╱6e╱n╱ // 0x579 @0x35
0x0544…058b at0036 = ╱73╱s╱ // 0x57a @0x36
0x0544…058b at0037 = ╱6b╱k╱ // 0x57b @0x37
0x0544…058b at0038 = ╱65╱e╱ // 0x57c @0x38
0x0544…058b at0039 = ╱73╱s╱ // 0x57d @0x39
0x0544…058b at003a = ╱20╱…╱ // 0x57e @0x3a
0x0544…058b at003b = ╱75╱u╱ // 0x57f @0x3b
0x0544…058b at003c = ╱64╱d╱ // 0x580 @0x3c
0x0544…058b at003d = ╱73╱s╱ // 0x581 @0x3d
0x0544…058b at003e = ╱6b╱k╱ // 0x582 @0x3e
0x0544…058b at003f = ╱72╱r╱ // 0x583 @0x3f
0x0544…058b at0040 = ╱65╱e╱ // 0x584 @0x40
0x0544…058b at0041 = ╱76╱v╱ // 0x585 @0x41
0x0544…058b at0042 = ╱65╱e╱ // 0x586 @0x42
0x0544…058b at0043 = ╱74╱t╱ // 0x587 @0x43
0x0544…058b at0044 = ╱3a╱:╱ // 0x588 @0x44
0x0544…058b at0045 = ╱22╱"╱ // 0x589 @0x45
0x0544…058b at0046 = EOL // 0x58a @0x46
0x0544…058b }
0x058b…05b7 930e 0270 LTX6$="Fakturahoved godkendes (J/N): "
0x058b…05b7 LineComalBin {
0x058b…05b7 ptr = 0x930e // 0x58b @0x0
0x058b…05b7 lno = 0x010e // 0x58d @0x2
0x058b…05b7 at0004 = ╱4c╱L╱ // 0x58f @0x4
0x058b…05b7 at0005 = ╱54╱T╱ // 0x590 @0x5
0x058b…05b7 at0006 = ╱58╱X╱ // 0x591 @0x6
0x058b…05b7 at0007 = ╱36╱6╱ // 0x592 @0x7
0x058b…05b7 at0008 = ╱ef╱$╱ // 0x593 @0x8
0x058b…05b7 at0009 = ╱dc╱=╱ // 0x594 @0x9
0x058b…05b7 at000a = ╱22╱"╱ // 0x595 @0xa
0x058b…05b7 at000b = ╱46╱F╱ // 0x596 @0xb
0x058b…05b7 at000c = ╱61╱a╱ // 0x597 @0xc
0x058b…05b7 at000d = ╱6b╱k╱ // 0x598 @0xd
0x058b…05b7 at000e = ╱74╱t╱ // 0x599 @0xe
0x058b…05b7 at000f = ╱75╱u╱ // 0x59a @0xf
0x058b…05b7 at0010 = ╱72╱r╱ // 0x59b @0x10
0x058b…05b7 at0011 = ╱61╱a╱ // 0x59c @0x11
0x058b…05b7 at0012 = ╱68╱h╱ // 0x59d @0x12
0x058b…05b7 at0013 = ╱6f╱o╱ // 0x59e @0x13
0x058b…05b7 at0014 = ╱76╱v╱ // 0x59f @0x14
0x058b…05b7 at0015 = ╱65╱e╱ // 0x5a0 @0x15
0x058b…05b7 at0016 = ╱64╱d╱ // 0x5a1 @0x16
0x058b…05b7 at0017 = ╱20╱…╱ // 0x5a2 @0x17
0x058b…05b7 at0018 = ╱67╱g╱ // 0x5a3 @0x18
0x058b…05b7 at0019 = ╱6f╱o╱ // 0x5a4 @0x19
0x058b…05b7 at001a = ╱64╱d╱ // 0x5a5 @0x1a
0x058b…05b7 at001b = ╱6b╱k╱ // 0x5a6 @0x1b
0x058b…05b7 at001c = ╱65╱e╱ // 0x5a7 @0x1c
0x058b…05b7 at001d = ╱6e╱n╱ // 0x5a8 @0x1d
0x058b…05b7 at001e = ╱64╱d╱ // 0x5a9 @0x1e
0x058b…05b7 at001f = ╱65╱e╱ // 0x5aa @0x1f
0x058b…05b7 at0020 = ╱73╱s╱ // 0x5ab @0x20
0x058b…05b7 at0021 = ╱20╱…╱ // 0x5ac @0x21
0x058b…05b7 at0022 = ╱28╱(╱ // 0x5ad @0x22
0x058b…05b7 at0023 = ╱4a╱J╱ // 0x5ae @0x23
0x058b…05b7 at0024 = ╱2f╱/╱ // 0x5af @0x24
0x058b…05b7 at0025 = ╱4e╱N╱ // 0x5b0 @0x25
0x058b…05b7 at0026 = ╱29╱)╱ // 0x5b1 @0x26
0x058b…05b7 at0027 = ╱3a╱:╱ // 0x5b2 @0x27
0x058b…05b7 at0028 = ╱20╱…╱ // 0x5b3 @0x28
0x058b…05b7 at0029 = ╱20╱…╱ // 0x5b4 @0x29
0x058b…05b7 at002a = ╱22╱"╱ // 0x5b5 @0x2a
0x058b…05b7 at002b = EOL // 0x5b6 @0x2b
0x058b…05b7 }
0x05b7…05e6 (19,) 933d 0280 LTX13$="Hvilket linienummer for ny linie:"
0x05b7…05e6 LineComalBin {
0x05b7…05e6 ptr = 0x933d // 0x5b7 @0x0
0x05b7…05e6 lno = 0x0118 // 0x5b9 @0x2
0x05b7…05e6 at0004 = ╱4c╱L╱ // 0x5bb @0x4
0x05b7…05e6 at0005 = ╱54╱T╱ // 0x5bc @0x5
0x05b7…05e6 at0006 = ╱58╱X╱ // 0x5bd @0x6
0x05b7…05e6 at0007 = ╱31╱1╱ // 0x5be @0x7
0x05b7…05e6 at0008 = ╱33╱3╱ // 0x5bf @0x8
0x05b7…05e6 at0009 = ╱ef╱$╱ // 0x5c0 @0x9
0x05b7…05e6 at000a = ╱dc╱=╱ // 0x5c1 @0xa
0x05b7…05e6 at000b = ╱22╱"╱ // 0x5c2 @0xb
0x05b7…05e6 at000c = ╱48╱H╱ // 0x5c3 @0xc
0x05b7…05e6 at000d = ╱76╱v╱ // 0x5c4 @0xd
0x05b7…05e6 at000e = ╱69╱i╱ // 0x5c5 @0xe
0x05b7…05e6 at000f = ╱6c╱l╱ // 0x5c6 @0xf
0x05b7…05e6 at0010 = ╱6b╱k╱ // 0x5c7 @0x10
0x05b7…05e6 at0011 = ╱65╱e╱ // 0x5c8 @0x11
0x05b7…05e6 at0012 = ╱74╱t╱ // 0x5c9 @0x12
0x05b7…05e6 at0013 = ╱20╱…╱ // 0x5ca @0x13
0x05b7…05e6 at0014 = ╱6c╱l╱ // 0x5cb @0x14
0x05b7…05e6 at0015 = ╱69╱i╱ // 0x5cc @0x15
0x05b7…05e6 at0016 = ╱6e╱n╱ // 0x5cd @0x16
0x05b7…05e6 at0017 = ╱69╱i╱ // 0x5ce @0x17
0x05b7…05e6 at0018 = ╱65╱e╱ // 0x5cf @0x18
0x05b7…05e6 at0019 = ╱6e╱n╱ // 0x5d0 @0x19
0x05b7…05e6 at001a = ╱75╱u╱ // 0x5d1 @0x1a
0x05b7…05e6 at001b = ╱6d╱m╱ // 0x5d2 @0x1b
0x05b7…05e6 at001c = ╱6d╱m╱ // 0x5d3 @0x1c
0x05b7…05e6 at001d = ╱65╱e╱ // 0x5d4 @0x1d
0x05b7…05e6 at001e = ╱72╱r╱ // 0x5d5 @0x1e
0x05b7…05e6 at001f = ╱20╱…╱ // 0x5d6 @0x1f
0x05b7…05e6 at0020 = ╱66╱f╱ // 0x5d7 @0x20
0x05b7…05e6 at0021 = ╱6f╱o╱ // 0x5d8 @0x21
0x05b7…05e6 at0022 = ╱72╱r╱ // 0x5d9 @0x22
0x05b7…05e6 at0023 = ╱20╱…╱ // 0x5da @0x23
0x05b7…05e6 at0024 = ╱6e╱n╱ // 0x5db @0x24
0x05b7…05e6 at0025 = ╱79╱y╱ // 0x5dc @0x25
0x05b7…05e6 at0026 = ╱20╱…╱ // 0x5dd @0x26
0x05b7…05e6 at0027 = ╱6c╱l╱ // 0x5de @0x27
0x05b7…05e6 at0028 = ╱69╱i╱ // 0x5df @0x28
0x05b7…05e6 at0029 = ╱6e╱n╱ // 0x5e0 @0x29
0x05b7…05e6 at002a = ╱69╱i╱ // 0x5e1 @0x2a
0x05b7…05e6 at002b = ╱65╱e╱ // 0x5e2 @0x2b
0x05b7…05e6 at002c = ╱3a╱:╱ // 0x5e3 @0x2c
0x05b7…05e6 at002d = ╱22╱"╱ // 0x5e4 @0x2d
0x05b7…05e6 at002e = EOL // 0x5e5 @0x2e
0x05b7…05e6 }
0x05e6…060e 9365 0290 LTX10$="Linie, som ønskes slettet:"
0x05e6…060e LineComalBin {
0x05e6…060e ptr = 0x9365 // 0x5e6 @0x0
0x05e6…060e lno = 0x0122 // 0x5e8 @0x2
0x05e6…060e at0004 = ╱4c╱L╱ // 0x5ea @0x4
0x05e6…060e at0005 = ╱54╱T╱ // 0x5eb @0x5
0x05e6…060e at0006 = ╱58╱X╱ // 0x5ec @0x6
0x05e6…060e at0007 = ╱31╱1╱ // 0x5ed @0x7
0x05e6…060e at0008 = ╱30╱0╱ // 0x5ee @0x8
0x05e6…060e at0009 = ╱ef╱$╱ // 0x5ef @0x9
0x05e6…060e at000a = ╱dc╱=╱ // 0x5f0 @0xa
0x05e6…060e at000b = ╱22╱"╱ // 0x5f1 @0xb
0x05e6…060e at000c = ╱4c╱L╱ // 0x5f2 @0xc
0x05e6…060e at000d = ╱69╱i╱ // 0x5f3 @0xd
0x05e6…060e at000e = ╱6e╱n╱ // 0x5f4 @0xe
0x05e6…060e at000f = ╱69╱i╱ // 0x5f5 @0xf
0x05e6…060e at0010 = ╱65╱e╱ // 0x5f6 @0x10
0x05e6…060e at0011 = ╱2c╱,╱ // 0x5f7 @0x11
0x05e6…060e at0012 = ╱20╱…╱ // 0x5f8 @0x12
0x05e6…060e at0013 = ╱73╱s╱ // 0x5f9 @0x13
0x05e6…060e at0014 = ╱6f╱o╱ // 0x5fa @0x14
0x05e6…060e at0015 = ╱6d╱m╱ // 0x5fb @0x15
0x05e6…060e at0016 = ╱20╱…╱ // 0x5fc @0x16
0x05e6…060e at0017 = ╱7c╱ø╱ // 0x5fd @0x17
0x05e6…060e at0018 = ╱6e╱n╱ // 0x5fe @0x18
0x05e6…060e at0019 = ╱73╱s╱ // 0x5ff @0x19
0x05e6…060e at001a = ╱6b╱k╱ // 0x600 @0x1a
0x05e6…060e at001b = ╱65╱e╱ // 0x601 @0x1b
0x05e6…060e at001c = ╱73╱s╱ // 0x602 @0x1c
0x05e6…060e at001d = ╱20╱…╱ // 0x603 @0x1d
0x05e6…060e at001e = ╱73╱s╱ // 0x604 @0x1e
0x05e6…060e at001f = ╱6c╱l╱ // 0x605 @0x1f
0x05e6…060e at0020 = ╱65╱e╱ // 0x606 @0x20
0x05e6…060e at0021 = ╱74╱t╱ // 0x607 @0x21
0x05e6…060e at0022 = ╱74╱t╱ // 0x608 @0x22
0x05e6…060e at0023 = ╱65╱e╱ // 0x609 @0x23
0x05e6…060e at0024 = ╱74╱t╱ // 0x60a @0x24
0x05e6…060e at0025 = ╱3a╱:╱ // 0x60b @0x25
0x05e6…060e at0026 = ╱22╱"╱ // 0x60c @0x26
0x05e6…060e at0027 = EOL // 0x60d @0x27
0x05e6…060e }
0x060e…0624 937b 0300 PROC CA(AR3,B1,B2,ES)
0x060e…0624 LineComalBin {
0x060e…0624 ptr = 0x937b // 0x60e @0x0
0x060e…0624 lno = 0x012c // 0x610 @0x2
0x060e…0624 at0004 = ╱9e╱ PROC ╱ // 0x612 @0x4
0x060e…0624 at0005 = ╱43╱C╱ // 0x613 @0x5
0x060e…0624 at0006 = ╱41╱A╱ // 0x614 @0x6
0x060e…0624 at0007 = ╱ed╱(╱ // 0x615 @0x7
0x060e…0624 at0008 = ╱41╱A╱ // 0x616 @0x8
0x060e…0624 at0009 = ╱52╱R╱ // 0x617 @0x9
0x060e…0624 at000a = ╱33╱3╱ // 0x618 @0xa
0x060e…0624 at000b = ╱ec╱,╱ // 0x619 @0xb
0x060e…0624 at000c = ╱42╱B╱ // 0x61a @0xc
0x060e…0624 at000d = ╱31╱1╱ // 0x61b @0xd
0x060e…0624 at000e = ╱ec╱,╱ // 0x61c @0xe
0x060e…0624 at000f = ╱42╱B╱ // 0x61d @0xf
0x060e…0624 at0010 = ╱32╱2╱ // 0x61e @0x10
0x060e…0624 at0011 = ╱ec╱,╱ // 0x61f @0x11
0x060e…0624 at0012 = ╱45╱E╱ // 0x620 @0x12
0x060e…0624 at0013 = ╱53╱S╱ // 0x621 @0x13
0x060e…0624 at0014 = ╱ee╱)╱ // 0x622 @0x14
0x060e…0624 at0015 = EOL // 0x623 @0x15
0x060e…0624 }
0x0624…066b 93c2 0310 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B;ART=AR3-6*(AR3>5)
0x0624…066b LineComalBin {
0x0624…066b ptr = 0x93c2 // 0x624 @0x0
0x0624…066b lno = 0x0136 // 0x626 @0x2
0x0624…066b at0004 = ╱4f╱O╱ // 0x628 @0x4
0x0624…066b at0005 = ╱50╱P╱ // 0x629 @0x5
0x0624…066b at0006 = ╱31╱1╱ // 0x62a @0x6
0x0624…066b at0007 = ╱ef╱$╱ // 0x62b @0x7
0x0624…066b at0008 = ╱dc╱=╱ // 0x62c @0x8
0x0624…066b at0009 = ╱42╱B╱ // 0x62d @0x9
0x0624…066b at000a = ╱31╱1╱ // 0x62e @0xa
0x0624…066b at000b = ╱ef╱$╱ // 0x62f @0xb
0x0624…066b at000c = ╱eb╱;╱ // 0x630 @0xc
0x0624…066b at000d = ╱4f╱O╱ // 0x631 @0xd
0x0624…066b at000e = ╱50╱P╱ // 0x632 @0xe
0x0624…066b at000f = ╱32╱2╱ // 0x633 @0xf
0x0624…066b at0010 = ╱ef╱$╱ // 0x634 @0x10
0x0624…066b at0011 = ╱dc╱=╱ // 0x635 @0x11
0x0624…066b at0012 = ╱42╱B╱ // 0x636 @0x12
0x0624…066b at0013 = ╱32╱2╱ // 0x637 @0x13
0x0624…066b at0014 = ╱ef╱$╱ // 0x638 @0x14
0x0624…066b at0015 = ╱eb╱;╱ // 0x639 @0x15
0x0624…066b at0016 = ╱52╱R╱ // 0x63a @0x16
0x0624…066b at0017 = ╱45╱E╱ // 0x63b @0x17
0x0624…066b at0018 = ╱53╱S╱ // 0x63c @0x18
0x0624…066b at0019 = ╱ef╱$╱ // 0x63d @0x19
0x0624…066b at001a = ╱dc╱=╱ // 0x63e @0x1a
0x0624…066b at001b = ╱45╱E╱ // 0x63f @0x1b
0x0624…066b at001c = ╱53╱S╱ // 0x640 @0x1c
0x0624…066b at001d = ╱ef╱$╱ // 0x641 @0x1d
0x0624…066b at001e = ╱eb╱;╱ // 0x642 @0x1e
0x0624…066b at001f = ╱53╱S╱ // 0x643 @0x1f
0x0624…066b at0020 = ╱49╱I╱ // 0x644 @0x20
0x0624…066b at0021 = ╱dc╱=╱ // 0x645 @0x21
0x0624…066b at0022 = ╱42╱B╱ // 0x646 @0x22
0x0624…066b at0023 = ╱eb╱;╱ // 0x647 @0x23
0x0624…066b at0024 = ╱46╱F╱ // 0x648 @0x24
0x0624…066b at0025 = ╱4c╱L╱ // 0x649 @0x25
0x0624…066b at0026 = ╱41╱A╱ // 0x64a @0x26
0x0624…066b at0027 = ╱47╱G╱ // 0x64b @0x27
0x0624…066b at0028 = ╱dc╱=╱ // 0x64c @0x28
0x0624…066b at0029 = ╱42╱B╱ // 0x64d @0x29
0x0624…066b at002a = ╱eb╱;╱ // 0x64e @0x2a
0x0624…066b at002b = ╱41╱A╱ // 0x64f @0x2b
0x0624…066b at002c = ╱52╱R╱ // 0x650 @0x2c
0x0624…066b at002d = ╱54╱T╱ // 0x651 @0x2d
0x0624…066b at002e = ╱dc╱=╱ // 0x652 @0x2e
0x0624…066b at002f = ╱41╱A╱ // 0x653 @0x2f
0x0624…066b at0030 = ╱52╱R╱ // 0x654 @0x30
0x0624…066b at0031 = ╱33╱3╱ // 0x655 @0x31
0x0624…066b at0032 = ╱e3╱-╱ // 0x656 @0x32
0x0624…066b at0033 = ╱36╱6╱ // 0x657 @0x33
0x0624…066b at0034 = ╱fe0000c003╱ // 0x658 @0x34
0x0624…066b at0039 = ╱e4╱*╱ // 0x65d @0x39
0x0624…066b at003a = ╱ed╱(╱ // 0x65e @0x3a
0x0624…066b at003b = ╱41╱A╱ // 0x65f @0x3b
0x0624…066b at003c = ╱52╱R╱ // 0x660 @0x3c
0x0624…066b at003d = ╱33╱3╱ // 0x661 @0x3d
0x0624…066b at003e = ╱de╱>╱ // 0x662 @0x3e
0x0624…066b at003f = ╱35╱5╱ // 0x663 @0x3f
0x0624…066b at0040 = ╱fe0000a003╱ // 0x664 @0x40
0x0624…066b at0045 = ╱ee╱)╱ // 0x669 @0x45
0x0624…066b at0046 = EOL // 0x66a @0x46
0x0624…066b }
0x066b…0681 93d8 0320 CALL "P641210:REGN"
0x066b…0681 LineComalBin {
0x066b…0681 ptr = 0x93d8 // 0x66b @0x0
0x066b…0681 lno = 0x0140 // 0x66d @0x2
0x066b…0681 at0004 = ╱ad00f9╱ CALL ╱ // 0x66f @0x4
0x066b…0681 at0007 = ╱22╱"╱ // 0x672 @0x7
0x066b…0681 at0008 = ╱50╱P╱ // 0x673 @0x8
0x066b…0681 at0009 = ╱36╱6╱ // 0x674 @0x9
0x066b…0681 at000a = ╱34╱4╱ // 0x675 @0xa
0x066b…0681 at000b = ╱31╱1╱ // 0x676 @0xb
0x066b…0681 at000c = ╱32╱2╱ // 0x677 @0xc
0x066b…0681 at000d = ╱31╱1╱ // 0x678 @0xd
0x066b…0681 at000e = ╱30╱0╱ // 0x679 @0xe
0x066b…0681 at000f = ╱3a╱:╱ // 0x67a @0xf
0x066b…0681 at0010 = ╱52╱R╱ // 0x67b @0x10
0x066b…0681 at0011 = ╱45╱E╱ // 0x67c @0x11
0x066b…0681 at0012 = ╱47╱G╱ // 0x67d @0x12
0x066b…0681 at0013 = ╱4e╱N╱ // 0x67e @0x13
0x066b…0681 at0014 = ╱22╱"╱ // 0x67f @0x14
0x066b…0681 at0015 = EOL // 0x680 @0x15
0x066b…0681 }
0x0681…0692 93e9 0330 IF AR3<6 THEN
0x0681…0692 LineComalBin {
0x0681…0692 ptr = 0x93e9 // 0x681 @0x0
0x0681…0692 lno = 0x014a // 0x683 @0x2
0x0681…0692 at0004 = ╱9c╱ IF ╱ // 0x685 @0x4
0x0681…0692 at0005 = ╱41╱A╱ // 0x686 @0x5
0x0681…0692 at0006 = ╱52╱R╱ // 0x687 @0x6
0x0681…0692 at0007 = ╱33╱3╱ // 0x688 @0x7
0x0681…0692 at0008 = ╱dd╱<╱ // 0x689 @0x8
0x0681…0692 at0009 = ╱36╱6╱ // 0x68a @0x9
0x0681…0692 at000a = ╱fe0000c003╱ // 0x68b @0xa
0x0681…0692 at000f = ╱b6╱ THEN ╱ // 0x690 @0xf
0x0681…0692 at0010 = EOL // 0x691 @0x10
0x0681…0692 }
0x0692…069e 93f5 0340 IF FLAG THEN STOP
0x0692…069e LineComalBin {
0x0692…069e ptr = 0x93f5 // 0x692 @0x0
0x0692…069e lno = 0x0154 // 0x694 @0x2
0x0692…069e at0004 = ╱82╱ IF ╱ // 0x696 @0x4
0x0692…069e at0005 = ╱46╱F╱ // 0x697 @0x5
0x0692…069e at0006 = ╱4c╱L╱ // 0x698 @0x6
0x0692…069e at0007 = ╱41╱A╱ // 0x699 @0x7
0x0692…069e at0008 = ╱47╱G╱ // 0x69a @0x8
0x0692…069e at0009 = ╱b6╱ THEN ╱ // 0x69b @0x9
0x0692…069e at000a = ╱8d╱ STOP ╱ // 0x69c @0xa
0x0692…069e at000b = EOL // 0x69d @0xb
0x0692…069e }
0x069e…06a4 (22,) 93fb 0350 ENDIF
0x069e…06a4 LineComalBin {
0x069e…06a4 ptr = 0x93fb // 0x69e @0x0
0x069e…06a4 lno = 0x015e // 0x6a0 @0x2
0x069e…06a4 at0004 = ╱9b╱ ENDIF ╱ // 0x6a2 @0x4
0x069e…06a4 at0005 = EOL // 0x6a3 @0x5
0x069e…06a4 }
0x06a4…06b1 9408 0360 ES$=RES$
0x06a4…06b1 LineComalBin {
0x06a4…06b1 ptr = 0x9408 // 0x6a4 @0x0
0x06a4…06b1 lno = 0x0168 // 0x6a6 @0x2
0x06a4…06b1 at0004 = ╱45╱E╱ // 0x6a8 @0x4
0x06a4…06b1 at0005 = ╱53╱S╱ // 0x6a9 @0x5
0x06a4…06b1 at0006 = ╱ef╱$╱ // 0x6aa @0x6
0x06a4…06b1 at0007 = ╱dc╱=╱ // 0x6ab @0x7
0x06a4…06b1 at0008 = ╱52╱R╱ // 0x6ac @0x8
0x06a4…06b1 at0009 = ╱45╱E╱ // 0x6ad @0x9
0x06a4…06b1 at000a = ╱53╱S╱ // 0x6ae @0xa
0x06a4…06b1 at000b = ╱ef╱$╱ // 0x6af @0xb
0x06a4…06b1 at000c = EOL // 0x6b0 @0xc
0x06a4…06b1 }
0x06b1…06b7 940e 0370 ENDPROC
0x06b1…06b7 LineComalBin {
0x06b1…06b7 ptr = 0x940e // 0x6b1 @0x0
0x06b1…06b7 lno = 0x0172 // 0x6b3 @0x2
0x06b1…06b7 at0004 = ╱9f╱ ENDPROC ╱ // 0x6b5 @0x4
0x06b1…06b7 at0005 = EOL // 0x6b6 @0x5
0x06b1…06b7 }
0x06b7…06c0 9417 0380 PROC ANT
0x06b7…06c0 LineComalBin {
0x06b7…06c0 ptr = 0x9417 // 0x6b7 @0x0
0x06b7…06c0 lno = 0x017c // 0x6b9 @0x2
0x06b7…06c0 at0004 = ╱9e╱ PROC ╱ // 0x6bb @0x4
0x06b7…06c0 at0005 = ╱41╱A╱ // 0x6bc @0x5
0x06b7…06c0 at0006 = ╱4e╱N╱ // 0x6bd @0x6
0x06b7…06c0 at0007 = ╱54╱T╱ // 0x6be @0x7
0x06b7…06c0 at0008 = EOL // 0x6bf @0x8
0x06b7…06c0 }
0x06c0…06dd 9434 0390 IF ANTAL$(10:G)="00" THEN
0x06c0…06dd LineComalBin {
0x06c0…06dd ptr = 0x9434 // 0x6c0 @0x0
0x06c0…06dd lno = 0x0186 // 0x6c2 @0x2
0x06c0…06dd at0004 = ╱9c╱ IF ╱ // 0x6c4 @0x4
0x06c0…06dd at0005 = ╱41╱A╱ // 0x6c5 @0x5
0x06c0…06dd at0006 = ╱4e╱N╱ // 0x6c6 @0x6
0x06c0…06dd at0007 = ╱54╱T╱ // 0x6c7 @0x7
0x06c0…06dd at0008 = ╱41╱A╱ // 0x6c8 @0x8
0x06c0…06dd at0009 = ╱4c╱L╱ // 0x6c9 @0x9
0x06c0…06dd at000a = ╱ef╱$╱ // 0x6ca @0xa
0x06c0…06dd at000b = ╱ed╱(╱ // 0x6cb @0xb
0x06c0…06dd at000c = ╱31╱1╱ // 0x6cc @0xc
0x06c0…06dd at000d = ╱30╱0╱ // 0x6cd @0xd
0x06c0…06dd at000e = ╱fe0000a004╱ // 0x6ce @0xe
0x06c0…06dd at0013 = ╱f0╱:╱ // 0x6d3 @0x13
0x06c0…06dd at0014 = ╱47╱G╱ // 0x6d4 @0x14
0x06c0…06dd at0015 = ╱ee╱)╱ // 0x6d5 @0x15
0x06c0…06dd at0016 = ╱dc╱=╱ // 0x6d6 @0x16
0x06c0…06dd at0017 = ╱22╱"╱ // 0x6d7 @0x17
0x06c0…06dd at0018 = ╱30╱0╱ // 0x6d8 @0x18
0x06c0…06dd at0019 = ╱30╱0╱ // 0x6d9 @0x19
0x06c0…06dd at001a = ╱22╱"╱ // 0x6da @0x1a
0x06c0…06dd at001b = ╱b6╱ THEN ╱ // 0x6db @0x1b
0x06c0…06dd at001c = EOL // 0x6dc @0x1c
0x06c0…06dd }
0x06dd…0707 945e 0400 PRINT ANTAL$(5:4);BK$(E:10)
0x06dd…0707 LineComalBin {
0x06dd…0707 ptr = 0x945e // 0x6dd @0x0
0x06dd…0707 lno = 0x0190 // 0x6df @0x2
0x06dd…0707 at0004 = ╱92╱ PRINT ╱ // 0x6e1 @0x4
0x06dd…0707 at0005 = ╱41╱A╱ // 0x6e2 @0x5
0x06dd…0707 at0006 = ╱4e╱N╱ // 0x6e3 @0x6
0x06dd…0707 at0007 = ╱54╱T╱ // 0x6e4 @0x7
0x06dd…0707 at0008 = ╱41╱A╱ // 0x6e5 @0x8
0x06dd…0707 at0009 = ╱4c╱L╱ // 0x6e6 @0x9
0x06dd…0707 at000a = ╱ef╱$╱ // 0x6e7 @0xa
0x06dd…0707 at000b = ╱ed╱(╱ // 0x6e8 @0xb
0x06dd…0707 at000c = ╱35╱5╱ // 0x6e9 @0xc
0x06dd…0707 at000d = ╱fe0000a003╱ // 0x6ea @0xd
0x06dd…0707 at0012 = ╱f0╱:╱ // 0x6ef @0x12
0x06dd…0707 at0013 = ╱34╱4╱ // 0x6f0 @0x13
0x06dd…0707 at0014 = ╱fe00008003╱ // 0x6f1 @0x14
0x06dd…0707 at0019 = ╱ee╱)╱ // 0x6f6 @0x19
0x06dd…0707 at001a = ╱eb╱;╱ // 0x6f7 @0x1a
0x06dd…0707 at001b = ╱42╱B╱ // 0x6f8 @0x1b
0x06dd…0707 at001c = ╱4b╱K╱ // 0x6f9 @0x1c
0x06dd…0707 at001d = ╱ef╱$╱ // 0x6fa @0x1d
0x06dd…0707 at001e = ╱ed╱(╱ // 0x6fb @0x1e
0x06dd…0707 at001f = ╱45╱E╱ // 0x6fc @0x1f
0x06dd…0707 at0020 = ╱f0╱:╱ // 0x6fd @0x20
0x06dd…0707 at0021 = ╱31╱1╱ // 0x6fe @0x21
0x06dd…0707 at0022 = ╱30╱0╱ // 0x6ff @0x22
0x06dd…0707 at0023 = ╱fe0000a004╱ // 0x700 @0x23
0x06dd…0707 at0028 = ╱ee╱)╱ // 0x705 @0x28
0x06dd…0707 at0029 = EOL // 0x706 @0x29
0x06dd…0707 }
0x0707…070d 9464 0410 ELSE
0x0707…070d LineComalBin {
0x0707…070d ptr = 0x9464 // 0x707 @0x0
0x0707…070d lno = 0x019a // 0x709 @0x2
0x0707…070d at0004 = ╱9a╱ ELSE ╱ // 0x70b @0x4
0x0707…070d at0005 = EOL // 0x70c @0x5
0x0707…070d }
0x070d…0737 948e 0420 PRINT ANTAL$(5:7);BK$(E:10)
0x070d…0737 LineComalBin {
0x070d…0737 ptr = 0x948e // 0x70d @0x0
0x070d…0737 lno = 0x01a4 // 0x70f @0x2
0x070d…0737 at0004 = ╱92╱ PRINT ╱ // 0x711 @0x4
0x070d…0737 at0005 = ╱41╱A╱ // 0x712 @0x5
0x070d…0737 at0006 = ╱4e╱N╱ // 0x713 @0x6
0x070d…0737 at0007 = ╱54╱T╱ // 0x714 @0x7
0x070d…0737 at0008 = ╱41╱A╱ // 0x715 @0x8
0x070d…0737 at0009 = ╱4c╱L╱ // 0x716 @0x9
0x070d…0737 at000a = ╱ef╱$╱ // 0x717 @0xa
0x070d…0737 at000b = ╱ed╱(╱ // 0x718 @0xb
0x070d…0737 at000c = ╱35╱5╱ // 0x719 @0xc
0x070d…0737 at000d = ╱fe0000a003╱ // 0x71a @0xd
0x070d…0737 at0012 = ╱f0╱:╱ // 0x71f @0x12
0x070d…0737 at0013 = ╱37╱7╱ // 0x720 @0x13
0x070d…0737 at0014 = ╱fe0000e003╱ // 0x721 @0x14
0x070d…0737 at0019 = ╱ee╱)╱ // 0x726 @0x19
0x070d…0737 at001a = ╱eb╱;╱ // 0x727 @0x1a
0x070d…0737 at001b = ╱42╱B╱ // 0x728 @0x1b
0x070d…0737 at001c = ╱4b╱K╱ // 0x729 @0x1c
0x070d…0737 at001d = ╱ef╱$╱ // 0x72a @0x1d
0x070d…0737 at001e = ╱ed╱(╱ // 0x72b @0x1e
0x070d…0737 at001f = ╱45╱E╱ // 0x72c @0x1f
0x070d…0737 at0020 = ╱f0╱:╱ // 0x72d @0x20
0x070d…0737 at0021 = ╱31╱1╱ // 0x72e @0x21
0x070d…0737 at0022 = ╱30╱0╱ // 0x72f @0x22
0x070d…0737 at0023 = ╱fe0000a004╱ // 0x730 @0x23
0x070d…0737 at0028 = ╱ee╱)╱ // 0x735 @0x28
0x070d…0737 at0029 = EOL // 0x736 @0x29
0x070d…0737 }
0x0737…073d 9494 0430 ENDIF
0x0737…073d LineComalBin {
0x0737…073d ptr = 0x9494 // 0x737 @0x0
0x0737…073d lno = 0x01ae // 0x739 @0x2
0x0737…073d at0004 = ╱9b╱ ENDIF ╱ // 0x73b @0x4
0x0737…073d at0005 = EOL // 0x73c @0x5
0x0737…073d }
0x073d…075e 94b5 0440 ANTAL$=ANTAL$(5:8)
0x073d…075e LineComalBin {
0x073d…075e ptr = 0x94b5 // 0x73d @0x0
0x073d…075e lno = 0x01b8 // 0x73f @0x2
0x073d…075e at0004 = ╱41╱A╱ // 0x741 @0x4
0x073d…075e at0005 = ╱4e╱N╱ // 0x742 @0x5
0x073d…075e at0006 = ╱54╱T╱ // 0x743 @0x6
0x073d…075e at0007 = ╱41╱A╱ // 0x744 @0x7
0x073d…075e at0008 = ╱4c╱L╱ // 0x745 @0x8
0x073d…075e at0009 = ╱ef╱$╱ // 0x746 @0x9
0x073d…075e at000a = ╱dc╱=╱ // 0x747 @0xa
0x073d…075e at000b = ╱41╱A╱ // 0x748 @0xb
0x073d…075e at000c = ╱4e╱N╱ // 0x749 @0xc
0x073d…075e at000d = ╱54╱T╱ // 0x74a @0xd
0x073d…075e at000e = ╱41╱A╱ // 0x74b @0xe
0x073d…075e at000f = ╱4c╱L╱ // 0x74c @0xf
0x073d…075e at0010 = ╱ef╱$╱ // 0x74d @0x10
0x073d…075e at0011 = ╱ed╱(╱ // 0x74e @0x11
0x073d…075e at0012 = ╱35╱5╱ // 0x74f @0x12
0x073d…075e at0013 = ╱fe0000a003╱ // 0x750 @0x13
0x073d…075e at0018 = ╱f0╱:╱ // 0x755 @0x18
0x073d…075e at0019 = ╱38╱8╱ // 0x756 @0x19
0x073d…075e at001a = ╱fe00008004╱ // 0x757 @0x1a
0x073d…075e at001f = ╱ee╱)╱ // 0x75c @0x1f
0x073d…075e at0020 = EOL // 0x75d @0x20
0x073d…075e }
0x075e…0764 94bb 0450 ENDPROC
0x075e…0764 LineComalBin {
0x075e…0764 ptr = 0x94bb // 0x75e @0x0
0x075e…0764 lno = 0x01c2 // 0x760 @0x2
0x075e…0764 at0004 = ╱9f╱ ENDPROC ╱ // 0x762 @0x4
0x075e…0764 at0005 = EOL // 0x763 @0x5
0x075e…0764 }
0x0764…078a 94e1 0460 PROC INDPUT1(XPOS1,YPOS1,LN4,LN5,LT1)
0x0764…078a LineComalBin {
0x0764…078a ptr = 0x94e1 // 0x764 @0x0
0x0764…078a lno = 0x01cc // 0x766 @0x2
0x0764…078a at0004 = ╱9e╱ PROC ╱ // 0x768 @0x4
0x0764…078a at0005 = ╱49╱I╱ // 0x769 @0x5
0x0764…078a at0006 = ╱4e╱N╱ // 0x76a @0x6
0x0764…078a at0007 = ╱44╱D╱ // 0x76b @0x7
0x0764…078a at0008 = ╱50╱P╱ // 0x76c @0x8
0x0764…078a at0009 = ╱55╱U╱ // 0x76d @0x9
0x0764…078a at000a = ╱54╱T╱ // 0x76e @0xa
0x0764…078a at000b = ╱31╱1╱ // 0x76f @0xb
0x0764…078a at000c = ╱ed╱(╱ // 0x770 @0xc
0x0764…078a at000d = ╱58╱X╱ // 0x771 @0xd
0x0764…078a at000e = ╱50╱P╱ // 0x772 @0xe
0x0764…078a at000f = ╱4f╱O╱ // 0x773 @0xf
0x0764…078a at0010 = ╱53╱S╱ // 0x774 @0x10
0x0764…078a at0011 = ╱31╱1╱ // 0x775 @0x11
0x0764…078a at0012 = ╱ec╱,╱ // 0x776 @0x12
0x0764…078a at0013 = ╱59╱Y╱ // 0x777 @0x13
0x0764…078a at0014 = ╱50╱P╱ // 0x778 @0x14
0x0764…078a at0015 = ╱4f╱O╱ // 0x779 @0x15
0x0764…078a at0016 = ╱53╱S╱ // 0x77a @0x16
0x0764…078a at0017 = ╱31╱1╱ // 0x77b @0x17
0x0764…078a at0018 = ╱ec╱,╱ // 0x77c @0x18
0x0764…078a at0019 = ╱4c╱L╱ // 0x77d @0x19
0x0764…078a at001a = ╱4e╱N╱ // 0x77e @0x1a
0x0764…078a at001b = ╱34╱4╱ // 0x77f @0x1b
0x0764…078a at001c = ╱ec╱,╱ // 0x780 @0x1c
0x0764…078a at001d = ╱4c╱L╱ // 0x781 @0x1d
0x0764…078a at001e = ╱4e╱N╱ // 0x782 @0x1e
0x0764…078a at001f = ╱35╱5╱ // 0x783 @0x1f
0x0764…078a at0020 = ╱ec╱,╱ // 0x784 @0x20
0x0764…078a at0021 = ╱4c╱L╱ // 0x785 @0x21
0x0764…078a at0022 = ╱54╱T╱ // 0x786 @0x22
0x0764…078a at0023 = ╱31╱1╱ // 0x787 @0x23
0x0764…078a at0024 = ╱ee╱)╱ // 0x788 @0x24
0x0764…078a at0025 = EOL // 0x789 @0x25
0x0764…078a }
0x078a…0790 94e7 0470 REPEAT
0x078a…0790 LineComalBin {
0x078a…0790 ptr = 0x94e7 // 0x78a @0x0
0x078a…0790 lno = 0x01d6 // 0x78c @0x2
0x078a…0790 at0004 = ╱97╱ REPEAT ╱ // 0x78e @0x4
0x078a…0790 at0005 = EOL // 0x78f @0x5
0x078a…0790 }
0x0790…07a1 94f8 0480 CURSOR XPOS1,YPOS1
0x0790…07a1 LineComalBin {
0x0790…07a1 ptr = 0x94f8 // 0x790 @0x0
0x0790…07a1 lno = 0x01e0 // 0x792 @0x2
0x0790…07a1 at0004 = ╱a1╱ CURSOR ╱ // 0x794 @0x4
0x0790…07a1 at0005 = ╱58╱X╱ // 0x795 @0x5
0x0790…07a1 at0006 = ╱50╱P╱ // 0x796 @0x6
0x0790…07a1 at0007 = ╱4f╱O╱ // 0x797 @0x7
0x0790…07a1 at0008 = ╱53╱S╱ // 0x798 @0x8
0x0790…07a1 at0009 = ╱31╱1╱ // 0x799 @0x9
0x0790…07a1 at000a = ╱ec╱,╱ // 0x79a @0xa
0x0790…07a1 at000b = ╱59╱Y╱ // 0x79b @0xb
0x0790…07a1 at000c = ╱50╱P╱ // 0x79c @0xc
0x0790…07a1 at000d = ╱4f╱O╱ // 0x79d @0xd
0x0790…07a1 at000e = ╱53╱S╱ // 0x79e @0xe
0x0790…07a1 at000f = ╱31╱1╱ // 0x79f @0xf
0x0790…07a1 at0010 = EOL // 0x7a0 @0x10
0x0790…07a1 }
0x07a1…07c6 951d 0490 PRINT LT1$;BK$(77-XPOS1-LEN(LT1$))
0x07a1…07c6 LineComalBin {
0x07a1…07c6 ptr = 0x951d // 0x7a1 @0x0
0x07a1…07c6 lno = 0x01ea // 0x7a3 @0x2
0x07a1…07c6 at0004 = ╱92╱ PRINT ╱ // 0x7a5 @0x4
0x07a1…07c6 at0005 = ╱4c╱L╱ // 0x7a6 @0x5
0x07a1…07c6 at0006 = ╱54╱T╱ // 0x7a7 @0x6
0x07a1…07c6 at0007 = ╱31╱1╱ // 0x7a8 @0x7
0x07a1…07c6 at0008 = ╱ef╱$╱ // 0x7a9 @0x8
0x07a1…07c6 at0009 = ╱eb╱;╱ // 0x7aa @0x9
0x07a1…07c6 at000a = ╱42╱B╱ // 0x7ab @0xa
0x07a1…07c6 at000b = ╱4b╱K╱ // 0x7ac @0xb
0x07a1…07c6 at000c = ╱ef╱$╱ // 0x7ad @0xc
0x07a1…07c6 at000d = ╱ed╱(╱ // 0x7ae @0xd
0x07a1…07c6 at000e = ╱37╱7╱ // 0x7af @0xe
0x07a1…07c6 at000f = ╱37╱7╱ // 0x7b0 @0xf
0x07a1…07c6 at0010 = ╱fe00009a07╱ // 0x7b1 @0x10
0x07a1…07c6 at0015 = ╱e3╱-╱ // 0x7b6 @0x15
0x07a1…07c6 at0016 = ╱58╱X╱ // 0x7b7 @0x16
0x07a1…07c6 at0017 = ╱50╱P╱ // 0x7b8 @0x17
0x07a1…07c6 at0018 = ╱4f╱O╱ // 0x7b9 @0x18
0x07a1…07c6 at0019 = ╱53╱S╱ // 0x7ba @0x19
0x07a1…07c6 at001a = ╱31╱1╱ // 0x7bb @0x1a
0x07a1…07c6 at001b = ╱e3╱-╱ // 0x7bc @0x1b
0x07a1…07c6 at001c = ╱cc╱LEN╱ // 0x7bd @0x1c
0x07a1…07c6 at001d = ╱ed╱(╱ // 0x7be @0x1d
0x07a1…07c6 at001e = ╱4c╱L╱ // 0x7bf @0x1e
0x07a1…07c6 at001f = ╱54╱T╱ // 0x7c0 @0x1f
0x07a1…07c6 at0020 = ╱31╱1╱ // 0x7c1 @0x20
0x07a1…07c6 at0021 = ╱ef╱$╱ // 0x7c2 @0x21
0x07a1…07c6 at0022 = ╱ee╱)╱ // 0x7c3 @0x22
0x07a1…07c6 at0023 = ╱ee╱)╱ // 0x7c4 @0x23
0x07a1…07c6 at0024 = EOL // 0x7c5 @0x24
0x07a1…07c6 }
0x07c6…07e1 9538 0500 CURSOR XPOS1+LEN(LT1$)-E,YPOS1
0x07c6…07e1 LineComalBin {
0x07c6…07e1 ptr = 0x9538 // 0x7c6 @0x0
0x07c6…07e1 lno = 0x01f4 // 0x7c8 @0x2
0x07c6…07e1 at0004 = ╱a1╱ CURSOR ╱ // 0x7ca @0x4
0x07c6…07e1 at0005 = ╱58╱X╱ // 0x7cb @0x5
0x07c6…07e1 at0006 = ╱50╱P╱ // 0x7cc @0x6
0x07c6…07e1 at0007 = ╱4f╱O╱ // 0x7cd @0x7
0x07c6…07e1 at0008 = ╱53╱S╱ // 0x7ce @0x8
0x07c6…07e1 at0009 = ╱31╱1╱ // 0x7cf @0x9
0x07c6…07e1 at000a = ╱e2╱+╱ // 0x7d0 @0xa
0x07c6…07e1 at000b = ╱cc╱LEN╱ // 0x7d1 @0xb
0x07c6…07e1 at000c = ╱ed╱(╱ // 0x7d2 @0xc
0x07c6…07e1 at000d = ╱4c╱L╱ // 0x7d3 @0xd
0x07c6…07e1 at000e = ╱54╱T╱ // 0x7d4 @0xe
0x07c6…07e1 at000f = ╱31╱1╱ // 0x7d5 @0xf
0x07c6…07e1 at0010 = ╱ef╱$╱ // 0x7d6 @0x10
0x07c6…07e1 at0011 = ╱ee╱)╱ // 0x7d7 @0x11
0x07c6…07e1 at0012 = ╱e3╱-╱ // 0x7d8 @0x12
0x07c6…07e1 at0013 = ╱45╱E╱ // 0x7d9 @0x13
0x07c6…07e1 at0014 = ╱ec╱,╱ // 0x7da @0x14
0x07c6…07e1 at0015 = ╱59╱Y╱ // 0x7db @0x15
0x07c6…07e1 at0016 = ╱50╱P╱ // 0x7dc @0x16
0x07c6…07e1 at0017 = ╱4f╱O╱ // 0x7dd @0x17
0x07c6…07e1 at0018 = ╱53╱S╱ // 0x7de @0x18
0x07c6…07e1 at0019 = ╱31╱1╱ // 0x7df @0x19
0x07c6…07e1 at001a = EOL // 0x7e0 @0x1a
0x07c6…07e1 }
0x07e1…07ed 9544 0510 INPUT " ",A$
0x07e1…07ed LineComalBin {
0x07e1…07ed ptr = 0x9544 // 0x7e1 @0x0
0x07e1…07ed lno = 0x01fe // 0x7e3 @0x2
0x07e1…07ed at0004 = ╱91╱ INPUT ╱ // 0x7e5 @0x4
0x07e1…07ed at0005 = ╱22╱"╱ // 0x7e6 @0x5
0x07e1…07ed at0006 = ╱20╱…╱ // 0x7e7 @0x6
0x07e1…07ed at0007 = ╱22╱"╱ // 0x7e8 @0x7
0x07e1…07ed at0008 = ╱ec╱,╱ // 0x7e9 @0x8
0x07e1…07ed at0009 = ╱41╱A╱ // 0x7ea @0x9
0x07e1…07ed at000a = ╱ef╱$╱ // 0x7eb @0xa
0x07e1…07ed at000b = EOL // 0x7ec @0xb
0x07e1…07ed }
0x07ed…07fa 9551 0520 EXEC NRT(A$)
0x07ed…07fa LineComalBin {
0x07ed…07fa ptr = 0x9551 // 0x7ed @0x0
0x07ed…07fa lno = 0x0208 // 0x7ef @0x2
0x07ed…07fa at0004 = ╱9d╱ EXEC ╱ // 0x7f1 @0x4
0x07ed…07fa at0005 = ╱4e╱N╱ // 0x7f2 @0x5
0x07ed…07fa at0006 = ╱52╱R╱ // 0x7f3 @0x6
0x07ed…07fa at0007 = ╱54╱T╱ // 0x7f4 @0x7
0x07ed…07fa at0008 = ╱ed╱(╱ // 0x7f5 @0x8
0x07ed…07fa at0009 = ╱41╱A╱ // 0x7f6 @0x9
0x07ed…07fa at000a = ╱ef╱$╱ // 0x7f7 @0xa
0x07ed…07fa at000b = ╱ee╱)╱ // 0x7f8 @0xb
0x07ed…07fa at000c = EOL // 0x7f9 @0xc
0x07ed…07fa }
0x07fa…0813 956a 0530 UNTIL P>LN4 AND P<LN5 AND TEST2=B
0x07fa…0813 LineComalBin {
0x07fa…0813 ptr = 0x956a // 0x7fa @0x0
0x07fa…0813 lno = 0x0212 // 0x7fc @0x2
0x07fa…0813 at0004 = ╱98╱ UNTIL ╱ // 0x7fe @0x4
0x07fa…0813 at0005 = ╱50╱P╱ // 0x7ff @0x5
0x07fa…0813 at0006 = ╱de╱>╱ // 0x800 @0x6
0x07fa…0813 at0007 = ╱4c╱L╱ // 0x801 @0x7
0x07fa…0813 at0008 = ╱4e╱N╱ // 0x802 @0x8
0x07fa…0813 at0009 = ╱34╱4╱ // 0x803 @0x9
0x07fa…0813 at000a = ╱da╱ AND ╱ // 0x804 @0xa
0x07fa…0813 at000b = ╱50╱P╱ // 0x805 @0xb
0x07fa…0813 at000c = ╱dd╱<╱ // 0x806 @0xc
0x07fa…0813 at000d = ╱4c╱L╱ // 0x807 @0xd
0x07fa…0813 at000e = ╱4e╱N╱ // 0x808 @0xe
0x07fa…0813 at000f = ╱35╱5╱ // 0x809 @0xf
0x07fa…0813 at0010 = ╱da╱ AND ╱ // 0x80a @0x10
0x07fa…0813 at0011 = ╱54╱T╱ // 0x80b @0x11
0x07fa…0813 at0012 = ╱45╱E╱ // 0x80c @0x12
0x07fa…0813 at0013 = ╱53╱S╱ // 0x80d @0x13
0x07fa…0813 at0014 = ╱54╱T╱ // 0x80e @0x14
0x07fa…0813 at0015 = ╱32╱2╱ // 0x80f @0x15
0x07fa…0813 at0016 = ╱dc╱=╱ // 0x810 @0x16
0x07fa…0813 at0017 = ╱42╱B╱ // 0x811 @0x17
0x07fa…0813 at0018 = EOL // 0x812 @0x18
0x07fa…0813 }
0x0813…0819 9570 0540 ENDPROC
0x0813…0819 LineComalBin {
0x0813…0819 ptr = 0x9570 // 0x813 @0x0
0x0813…0819 lno = 0x021c // 0x815 @0x2
0x0813…0819 at0004 = ╱9f╱ ENDPROC ╱ // 0x817 @0x4
0x0813…0819 at0005 = EOL // 0x818 @0x5
0x0813…0819 }
0x0819…083b 9592 0550 PROC INDPUT2(XPOS2,YPOS2,LT2,VAR)
0x0819…083b LineComalBin {
0x0819…083b ptr = 0x9592 // 0x819 @0x0
0x0819…083b lno = 0x0226 // 0x81b @0x2
0x0819…083b at0004 = ╱9e╱ PROC ╱ // 0x81d @0x4
0x0819…083b at0005 = ╱49╱I╱ // 0x81e @0x5
0x0819…083b at0006 = ╱4e╱N╱ // 0x81f @0x6
0x0819…083b at0007 = ╱44╱D╱ // 0x820 @0x7
0x0819…083b at0008 = ╱50╱P╱ // 0x821 @0x8
0x0819…083b at0009 = ╱55╱U╱ // 0x822 @0x9
0x0819…083b at000a = ╱54╱T╱ // 0x823 @0xa
0x0819…083b at000b = ╱32╱2╱ // 0x824 @0xb
0x0819…083b at000c = ╱ed╱(╱ // 0x825 @0xc
0x0819…083b at000d = ╱58╱X╱ // 0x826 @0xd
0x0819…083b at000e = ╱50╱P╱ // 0x827 @0xe
0x0819…083b at000f = ╱4f╱O╱ // 0x828 @0xf
0x0819…083b at0010 = ╱53╱S╱ // 0x829 @0x10
0x0819…083b at0011 = ╱32╱2╱ // 0x82a @0x11
0x0819…083b at0012 = ╱ec╱,╱ // 0x82b @0x12
0x0819…083b at0013 = ╱59╱Y╱ // 0x82c @0x13
0x0819…083b at0014 = ╱50╱P╱ // 0x82d @0x14
0x0819…083b at0015 = ╱4f╱O╱ // 0x82e @0x15
0x0819…083b at0016 = ╱53╱S╱ // 0x82f @0x16
0x0819…083b at0017 = ╱32╱2╱ // 0x830 @0x17
0x0819…083b at0018 = ╱ec╱,╱ // 0x831 @0x18
0x0819…083b at0019 = ╱4c╱L╱ // 0x832 @0x19
0x0819…083b at001a = ╱54╱T╱ // 0x833 @0x1a
0x0819…083b at001b = ╱32╱2╱ // 0x834 @0x1b
0x0819…083b at001c = ╱ec╱,╱ // 0x835 @0x1c
0x0819…083b at001d = ╱56╱V╱ // 0x836 @0x1d
0x0819…083b at001e = ╱41╱A╱ // 0x837 @0x1e
0x0819…083b at001f = ╱52╱R╱ // 0x838 @0x1f
0x0819…083b at0020 = ╱ee╱)╱ // 0x839 @0x20
0x0819…083b at0021 = EOL // 0x83a @0x21
0x0819…083b }
0x083b…0841 9598 0560 REPEAT
0x083b…0841 LineComalBin {
0x083b…0841 ptr = 0x9598 // 0x83b @0x0
0x083b…0841 lno = 0x0230 // 0x83d @0x2
0x083b…0841 at0004 = ╱97╱ REPEAT ╱ // 0x83f @0x4
0x083b…0841 at0005 = EOL // 0x840 @0x5
0x083b…0841 }
0x0841…0852 95a9 0570 CURSOR XPOS2,YPOS2
0x0841…0852 LineComalBin {
0x0841…0852 ptr = 0x95a9 // 0x841 @0x0
0x0841…0852 lno = 0x023a // 0x843 @0x2
0x0841…0852 at0004 = ╱a1╱ CURSOR ╱ // 0x845 @0x4
0x0841…0852 at0005 = ╱58╱X╱ // 0x846 @0x5
0x0841…0852 at0006 = ╱50╱P╱ // 0x847 @0x6
0x0841…0852 at0007 = ╱4f╱O╱ // 0x848 @0x7
0x0841…0852 at0008 = ╱53╱S╱ // 0x849 @0x8
0x0841…0852 at0009 = ╱32╱2╱ // 0x84a @0x9
0x0841…0852 at000a = ╱ec╱,╱ // 0x84b @0xa
0x0841…0852 at000b = ╱59╱Y╱ // 0x84c @0xb
0x0841…0852 at000c = ╱50╱P╱ // 0x84d @0xc
0x0841…0852 at000d = ╱4f╱O╱ // 0x84e @0xd
0x0841…0852 at000e = ╱53╱S╱ // 0x84f @0xe
0x0841…0852 at000f = ╱32╱2╱ // 0x850 @0xf
0x0841…0852 at0010 = EOL // 0x851 @0x10
0x0841…0852 }
0x0852…0877 95ce 0580 PRINT LT2$;BK$(77-XPOS2-LEN(LT2$))
0x0852…0877 LineComalBin {
0x0852…0877 ptr = 0x95ce // 0x852 @0x0
0x0852…0877 lno = 0x0244 // 0x854 @0x2
0x0852…0877 at0004 = ╱92╱ PRINT ╱ // 0x856 @0x4
0x0852…0877 at0005 = ╱4c╱L╱ // 0x857 @0x5
0x0852…0877 at0006 = ╱54╱T╱ // 0x858 @0x6
0x0852…0877 at0007 = ╱32╱2╱ // 0x859 @0x7
0x0852…0877 at0008 = ╱ef╱$╱ // 0x85a @0x8
0x0852…0877 at0009 = ╱eb╱;╱ // 0x85b @0x9
0x0852…0877 at000a = ╱42╱B╱ // 0x85c @0xa
0x0852…0877 at000b = ╱4b╱K╱ // 0x85d @0xb
0x0852…0877 at000c = ╱ef╱$╱ // 0x85e @0xc
0x0852…0877 at000d = ╱ed╱(╱ // 0x85f @0xd
0x0852…0877 at000e = ╱37╱7╱ // 0x860 @0xe
0x0852…0877 at000f = ╱37╱7╱ // 0x861 @0xf
0x0852…0877 at0010 = ╱fe00009a07╱ // 0x862 @0x10
0x0852…0877 at0015 = ╱e3╱-╱ // 0x867 @0x15
0x0852…0877 at0016 = ╱58╱X╱ // 0x868 @0x16
0x0852…0877 at0017 = ╱50╱P╱ // 0x869 @0x17
0x0852…0877 at0018 = ╱4f╱O╱ // 0x86a @0x18
0x0852…0877 at0019 = ╱53╱S╱ // 0x86b @0x19
0x0852…0877 at001a = ╱32╱2╱ // 0x86c @0x1a
0x0852…0877 at001b = ╱e3╱-╱ // 0x86d @0x1b
0x0852…0877 at001c = ╱cc╱LEN╱ // 0x86e @0x1c
0x0852…0877 at001d = ╱ed╱(╱ // 0x86f @0x1d
0x0852…0877 at001e = ╱4c╱L╱ // 0x870 @0x1e
0x0852…0877 at001f = ╱54╱T╱ // 0x871 @0x1f
0x0852…0877 at0020 = ╱32╱2╱ // 0x872 @0x20
0x0852…0877 at0021 = ╱ef╱$╱ // 0x873 @0x21
0x0852…0877 at0022 = ╱ee╱)╱ // 0x874 @0x22
0x0852…0877 at0023 = ╱ee╱)╱ // 0x875 @0x23
0x0852…0877 at0024 = EOL // 0x876 @0x24
0x0852…0877 }
0x0877…0892 95e9 0590 CURSOR XPOS2+LEN(LT2$)-E,YPOS2
0x0877…0892 LineComalBin {
0x0877…0892 ptr = 0x95e9 // 0x877 @0x0
0x0877…0892 lno = 0x024e // 0x879 @0x2
0x0877…0892 at0004 = ╱a1╱ CURSOR ╱ // 0x87b @0x4
0x0877…0892 at0005 = ╱58╱X╱ // 0x87c @0x5
0x0877…0892 at0006 = ╱50╱P╱ // 0x87d @0x6
0x0877…0892 at0007 = ╱4f╱O╱ // 0x87e @0x7
0x0877…0892 at0008 = ╱53╱S╱ // 0x87f @0x8
0x0877…0892 at0009 = ╱32╱2╱ // 0x880 @0x9
0x0877…0892 at000a = ╱e2╱+╱ // 0x881 @0xa
0x0877…0892 at000b = ╱cc╱LEN╱ // 0x882 @0xb
0x0877…0892 at000c = ╱ed╱(╱ // 0x883 @0xc
0x0877…0892 at000d = ╱4c╱L╱ // 0x884 @0xd
0x0877…0892 at000e = ╱54╱T╱ // 0x885 @0xe
0x0877…0892 at000f = ╱32╱2╱ // 0x886 @0xf
0x0877…0892 at0010 = ╱ef╱$╱ // 0x887 @0x10
0x0877…0892 at0011 = ╱ee╱)╱ // 0x888 @0x11
0x0877…0892 at0012 = ╱e3╱-╱ // 0x889 @0x12
0x0877…0892 at0013 = ╱45╱E╱ // 0x88a @0x13
0x0877…0892 at0014 = ╱ec╱,╱ // 0x88b @0x14
0x0877…0892 at0015 = ╱59╱Y╱ // 0x88c @0x15
0x0877…0892 at0016 = ╱50╱P╱ // 0x88d @0x16
0x0877…0892 at0017 = ╱4f╱O╱ // 0x88e @0x17
0x0877…0892 at0018 = ╱53╱S╱ // 0x88f @0x18
0x0877…0892 at0019 = ╱32╱2╱ // 0x890 @0x19
0x0877…0892 at001a = EOL // 0x891 @0x1a
0x0877…0892 }
0x0892…08a0 95f7 0600 INPUT " ",VAR$
0x0892…08a0 LineComalBin {
0x0892…08a0 ptr = 0x95f7 // 0x892 @0x0
0x0892…08a0 lno = 0x0258 // 0x894 @0x2
0x0892…08a0 at0004 = ╱91╱ INPUT ╱ // 0x896 @0x4
0x0892…08a0 at0005 = ╱22╱"╱ // 0x897 @0x5
0x0892…08a0 at0006 = ╱20╱…╱ // 0x898 @0x6
0x0892…08a0 at0007 = ╱22╱"╱ // 0x899 @0x7
0x0892…08a0 at0008 = ╱ec╱,╱ // 0x89a @0x8
0x0892…08a0 at0009 = ╱56╱V╱ // 0x89b @0x9
0x0892…08a0 at000a = ╱41╱A╱ // 0x89c @0xa
0x0892…08a0 at000b = ╱52╱R╱ // 0x89d @0xb
0x0892…08a0 at000c = ╱ef╱$╱ // 0x89e @0xc
0x0892…08a0 at000d = EOL // 0x89f @0xd
0x0892…08a0 }
0x08a0…08b8 960f 0610 IF LEN(VAR$)=B THEN VAR$="0"
0x08a0…08b8 LineComalBin {
0x08a0…08b8 ptr = 0x960f // 0x8a0 @0x0
0x08a0…08b8 lno = 0x0262 // 0x8a2 @0x2
0x08a0…08b8 at0004 = ╱82╱ IF ╱ // 0x8a4 @0x4
0x08a0…08b8 at0005 = ╱cc╱LEN╱ // 0x8a5 @0x5
0x08a0…08b8 at0006 = ╱ed╱(╱ // 0x8a6 @0x6
0x08a0…08b8 at0007 = ╱56╱V╱ // 0x8a7 @0x7
0x08a0…08b8 at0008 = ╱41╱A╱ // 0x8a8 @0x8
0x08a0…08b8 at0009 = ╱52╱R╱ // 0x8a9 @0x9
0x08a0…08b8 at000a = ╱ef╱$╱ // 0x8aa @0xa
0x08a0…08b8 at000b = ╱ee╱)╱ // 0x8ab @0xb
0x08a0…08b8 at000c = ╱dc╱=╱ // 0x8ac @0xc
0x08a0…08b8 at000d = ╱42╱B╱ // 0x8ad @0xd
0x08a0…08b8 at000e = ╱b6╱ THEN ╱ // 0x8ae @0xe
0x08a0…08b8 at000f = ╱56╱V╱ // 0x8af @0xf
0x08a0…08b8 at0010 = ╱41╱A╱ // 0x8b0 @0x10
0x08a0…08b8 at0011 = ╱52╱R╱ // 0x8b1 @0x11
0x08a0…08b8 at0012 = ╱ef╱$╱ // 0x8b2 @0x12
0x08a0…08b8 at0013 = ╱dc╱=╱ // 0x8b3 @0x13
0x08a0…08b8 at0014 = ╱22╱"╱ // 0x8b4 @0x14
0x08a0…08b8 at0015 = ╱30╱0╱ // 0x8b5 @0x15
0x08a0…08b8 at0016 = ╱22╱"╱ // 0x8b6 @0x16
0x08a0…08b8 at0017 = EOL // 0x8b7 @0x17
0x08a0…08b8 }
0x08b8…08ca 9621 0620 VAR$=VAR$+"+"
0x08b8…08ca LineComalBin {
0x08b8…08ca ptr = 0x9621 // 0x8b8 @0x0
0x08b8…08ca lno = 0x026c // 0x8ba @0x2
0x08b8…08ca at0004 = ╱56╱V╱ // 0x8bc @0x4
0x08b8…08ca at0005 = ╱41╱A╱ // 0x8bd @0x5
0x08b8…08ca at0006 = ╱52╱R╱ // 0x8be @0x6
0x08b8…08ca at0007 = ╱ef╱$╱ // 0x8bf @0x7
0x08b8…08ca at0008 = ╱dc╱=╱ // 0x8c0 @0x8
0x08b8…08ca at0009 = ╱56╱V╱ // 0x8c1 @0x9
0x08b8…08ca at000a = ╱41╱A╱ // 0x8c2 @0xa
0x08b8…08ca at000b = ╱52╱R╱ // 0x8c3 @0xb
0x08b8…08ca at000c = ╱ef╱$╱ // 0x8c4 @0xc
0x08b8…08ca at000d = ╱f1╱+╱ // 0x8c5 @0xd
0x08b8…08ca at000e = ╱22╱"╱ // 0x8c6 @0xe
0x08b8…08ca at000f = ╱2b╱+╱ // 0x8c7 @0xf
0x08b8…08ca at0010 = ╱22╱"╱ // 0x8c8 @0x10
0x08b8…08ca at0011 = EOL // 0x8c9 @0x11
0x08b8…08ca }
0x08ca…08e9 9640 0630 EXEC CA(6,VAR$,TAH$,VAR$)
0x08ca…08e9 LineComalBin {
0x08ca…08e9 ptr = 0x9640 // 0x8ca @0x0
0x08ca…08e9 lno = 0x0276 // 0x8cc @0x2
0x08ca…08e9 at0004 = ╱9d╱ EXEC ╱ // 0x8ce @0x4
0x08ca…08e9 at0005 = ╱43╱C╱ // 0x8cf @0x5
0x08ca…08e9 at0006 = ╱41╱A╱ // 0x8d0 @0x6
0x08ca…08e9 at0007 = ╱ed╱(╱ // 0x8d1 @0x7
0x08ca…08e9 at0008 = ╱36╱6╱ // 0x8d2 @0x8
0x08ca…08e9 at0009 = ╱fe0000c003╱ // 0x8d3 @0x9
0x08ca…08e9 at000e = ╱ec╱,╱ // 0x8d8 @0xe
0x08ca…08e9 at000f = ╱56╱V╱ // 0x8d9 @0xf
0x08ca…08e9 at0010 = ╱41╱A╱ // 0x8da @0x10
0x08ca…08e9 at0011 = ╱52╱R╱ // 0x8db @0x11
0x08ca…08e9 at0012 = ╱ef╱$╱ // 0x8dc @0x12
0x08ca…08e9 at0013 = ╱ec╱,╱ // 0x8dd @0x13
0x08ca…08e9 at0014 = ╱54╱T╱ // 0x8de @0x14
0x08ca…08e9 at0015 = ╱41╱A╱ // 0x8df @0x15
0x08ca…08e9 at0016 = ╱48╱H╱ // 0x8e0 @0x16
0x08ca…08e9 at0017 = ╱ef╱$╱ // 0x8e1 @0x17
0x08ca…08e9 at0018 = ╱ec╱,╱ // 0x8e2 @0x18
0x08ca…08e9 at0019 = ╱56╱V╱ // 0x8e3 @0x19
0x08ca…08e9 at001a = ╱41╱A╱ // 0x8e4 @0x1a
0x08ca…08e9 at001b = ╱52╱R╱ // 0x8e5 @0x1b
0x08ca…08e9 at001c = ╱ef╱$╱ // 0x8e6 @0x1c
0x08ca…08e9 at001d = ╱ee╱)╱ // 0x8e7 @0x1d
0x08ca…08e9 at001e = EOL // 0x8e8 @0x1e
0x08ca…08e9 }
0x08e9…08f5 964c 0640 UNTIL FLAG=B
0x08e9…08f5 LineComalBin {
0x08e9…08f5 ptr = 0x964c // 0x8e9 @0x0
0x08e9…08f5 lno = 0x0280 // 0x8eb @0x2
0x08e9…08f5 at0004 = ╱98╱ UNTIL ╱ // 0x8ed @0x4
0x08e9…08f5 at0005 = ╱46╱F╱ // 0x8ee @0x5
0x08e9…08f5 at0006 = ╱4c╱L╱ // 0x8ef @0x6
0x08e9…08f5 at0007 = ╱41╱A╱ // 0x8f0 @0x7
0x08e9…08f5 at0008 = ╱47╱G╱ // 0x8f1 @0x8
0x08e9…08f5 at0009 = ╱dc╱=╱ // 0x8f2 @0x9
0x08e9…08f5 at000a = ╱42╱B╱ // 0x8f3 @0xa
0x08e9…08f5 at000b = EOL // 0x8f4 @0xb
0x08e9…08f5 }
0x08f5…08fb 9652 0650 ENDPROC
0x08f5…08fb LineComalBin {
0x08f5…08fb ptr = 0x9652 // 0x8f5 @0x0
0x08f5…08fb lno = 0x028a // 0x8f7 @0x2
0x08f5…08fb at0004 = ╱9f╱ ENDPROC ╱ // 0x8f9 @0x4
0x08f5…08fb at0005 = EOL // 0x8fa @0x5
0x08f5…08fb }
0x08fb…0910 9667 0660 PROC FE(NR1,NR2,NR3)
0x08fb…0910 LineComalBin {
0x08fb…0910 ptr = 0x9667 // 0x8fb @0x0
0x08fb…0910 lno = 0x0294 // 0x8fd @0x2
0x08fb…0910 at0004 = ╱9e╱ PROC ╱ // 0x8ff @0x4
0x08fb…0910 at0005 = ╱46╱F╱ // 0x900 @0x5
0x08fb…0910 at0006 = ╱45╱E╱ // 0x901 @0x6
0x08fb…0910 at0007 = ╱ed╱(╱ // 0x902 @0x7
0x08fb…0910 at0008 = ╱4e╱N╱ // 0x903 @0x8
0x08fb…0910 at0009 = ╱52╱R╱ // 0x904 @0x9
0x08fb…0910 at000a = ╱31╱1╱ // 0x905 @0xa
0x08fb…0910 at000b = ╱ec╱,╱ // 0x906 @0xb
0x08fb…0910 at000c = ╱4e╱N╱ // 0x907 @0xc
0x08fb…0910 at000d = ╱52╱R╱ // 0x908 @0xd
0x08fb…0910 at000e = ╱32╱2╱ // 0x909 @0xe
0x08fb…0910 at000f = ╱ec╱,╱ // 0x90a @0xf
0x08fb…0910 at0010 = ╱4e╱N╱ // 0x90b @0x10
0x08fb…0910 at0011 = ╱52╱R╱ // 0x90c @0x11
0x08fb…0910 at0012 = ╱33╱3╱ // 0x90d @0x12
0x08fb…0910 at0013 = ╱ee╱)╱ // 0x90e @0x13
0x08fb…0910 at0014 = EOL // 0x90f @0x14
0x08fb…0910 }
0x0910…0920 9677 0670 IF STATUS(NR3$)<>B THEN
0x0910…0920 LineComalBin {
0x0910…0920 ptr = 0x9677 // 0x910 @0x0
0x0910…0920 lno = 0x029e // 0x912 @0x2
0x0910…0920 at0004 = ╱9c╱ IF ╱ // 0x914 @0x4
0x0910…0920 at0005 = ╱ce╱STATUS╱ // 0x915 @0x5
0x0910…0920 at0006 = ╱ed╱(╱ // 0x916 @0x6
0x0910…0920 at0007 = ╱4e╱N╱ // 0x917 @0x7
0x0910…0920 at0008 = ╱52╱R╱ // 0x918 @0x8
0x0910…0920 at0009 = ╱33╱3╱ // 0x919 @0x9
0x0910…0920 at000a = ╱ef╱$╱ // 0x91a @0xa
0x0910…0920 at000b = ╱ee╱)╱ // 0x91b @0xb
0x0910…0920 at000c = ╱e1╱<>╱ // 0x91c @0xc
0x0910…0920 at000d = ╱42╱B╱ // 0x91d @0xd
0x0910…0920 at000e = ╱b6╱ THEN ╱ // 0x91e @0xe
0x0910…0920 at000f = EOL // 0x91f @0xf
0x0910…0920 }
0x0920…093a 9691 0680 PRINT STATUS(NR3$),NR1,NR2,NR3$
0x0920…093a LineComalBin {
0x0920…093a ptr = 0x9691 // 0x920 @0x0
0x0920…093a lno = 0x02a8 // 0x922 @0x2
0x0920…093a at0004 = ╱92╱ PRINT ╱ // 0x924 @0x4
0x0920…093a at0005 = ╱ce╱STATUS╱ // 0x925 @0x5
0x0920…093a at0006 = ╱ed╱(╱ // 0x926 @0x6
0x0920…093a at0007 = ╱4e╱N╱ // 0x927 @0x7
0x0920…093a at0008 = ╱52╱R╱ // 0x928 @0x8
0x0920…093a at0009 = ╱33╱3╱ // 0x929 @0x9
0x0920…093a at000a = ╱ef╱$╱ // 0x92a @0xa
0x0920…093a at000b = ╱ee╱)╱ // 0x92b @0xb
0x0920…093a at000c = ╱ec╱,╱ // 0x92c @0xc
0x0920…093a at000d = ╱4e╱N╱ // 0x92d @0xd
0x0920…093a at000e = ╱52╱R╱ // 0x92e @0xe
0x0920…093a at000f = ╱31╱1╱ // 0x92f @0xf
0x0920…093a at0010 = ╱ec╱,╱ // 0x930 @0x10
0x0920…093a at0011 = ╱4e╱N╱ // 0x931 @0x11
0x0920…093a at0012 = ╱52╱R╱ // 0x932 @0x12
0x0920…093a at0013 = ╱32╱2╱ // 0x933 @0x13
0x0920…093a at0014 = ╱ec╱,╱ // 0x934 @0x14
0x0920…093a at0015 = ╱4e╱N╱ // 0x935 @0x15
0x0920…093a at0016 = ╱52╱R╱ // 0x936 @0x16
0x0920…093a at0017 = ╱33╱3╱ // 0x937 @0x17
0x0920…093a at0018 = ╱ef╱$╱ // 0x938 @0x18
0x0920…093a at0019 = EOL // 0x939 @0x19
0x0920…093a }
0x093a…0940 9697 0690 STOP
0x093a…0940 LineComalBin {
0x093a…0940 ptr = 0x9697 // 0x93a @0x0
0x093a…0940 lno = 0x02b2 // 0x93c @0x2
0x093a…0940 at0004 = ╱8d╱ STOP ╱ // 0x93e @0x4
0x093a…0940 at0005 = EOL // 0x93f @0x5
0x093a…0940 }
0x0940…0946 969d 0700 ENDIF
0x0940…0946 LineComalBin {
0x0940…0946 ptr = 0x969d // 0x940 @0x0
0x0940…0946 lno = 0x02bc // 0x942 @0x2
0x0940…0946 at0004 = ╱9b╱ ENDIF ╱ // 0x944 @0x4
0x0940…0946 at0005 = EOL // 0x945 @0x5
0x0940…0946 }
0x0946…094c 96a3 0710 ENDPROC
0x0946…094c LineComalBin {
0x0946…094c ptr = 0x96a3 // 0x946 @0x0
0x0946…094c lno = 0x02c6 // 0x948 @0x2
0x0946…094c at0004 = ╱9f╱ ENDPROC ╱ // 0x94a @0x4
0x0946…094c at0005 = EOL // 0x94b @0x5
0x0946…094c }
0x094c…0974 96cb 0720 PROC FPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8)
0x094c…0974 LineComalBin {
0x094c…0974 ptr = 0x96cb // 0x94c @0x0
0x094c…0974 lno = 0x02d0 // 0x94e @0x2
0x094c…0974 at0004 = ╱9e╱ PROC ╱ // 0x950 @0x4
0x094c…0974 at0005 = ╱46╱F╱ // 0x951 @0x5
0x094c…0974 at0006 = ╱50╱P╱ // 0x952 @0x6
0x094c…0974 at0007 = ╱4f╱O╱ // 0x953 @0x7
0x094c…0974 at0008 = ╱53╱S╱ // 0x954 @0x8
0x094c…0974 at0009 = ╱54╱T╱ // 0x955 @0x9
0x094c…0974 at000a = ╱31╱1╱ // 0x956 @0xa
0x094c…0974 at000b = ╱ed╱(╱ // 0x957 @0xb
0x094c…0974 at000c = ╱54╱T╱ // 0x958 @0xc
0x094c…0974 at000d = ╱41╱A╱ // 0x959 @0xd
0x094c…0974 at000e = ╱42╱B╱ // 0x95a @0xe
0x094c…0974 at000f = ╱34╱4╱ // 0x95b @0xf
0x094c…0974 at0010 = ╱ec╱,╱ // 0x95c @0x10
0x094c…0974 at0011 = ╱51╱Q╱ // 0x95d @0x11
0x094c…0974 at0012 = ╱ec╱,╱ // 0x95e @0x12
0x094c…0974 at0013 = ╱4d╱M╱ // 0x95f @0x13
0x094c…0974 at0014 = ╱41╱A╱ // 0x960 @0x14
0x094c…0974 at0015 = ╱4e╱N╱ // 0x961 @0x15
0x094c…0974 at0016 = ╱54╱T╱ // 0x962 @0x16
0x094c…0974 at0017 = ╱32╱2╱ // 0x963 @0x17
0x094c…0974 at0018 = ╱ec╱,╱ // 0x964 @0x18
0x094c…0974 at0019 = ╱4e╱N╱ // 0x965 @0x19
0x094c…0974 at001a = ╱5c╱Ø╱ // 0x966 @0x1a
0x094c…0974 at001b = ╱47╱G╱ // 0x967 @0x1b
0x094c…0974 at001c = ╱4c╱L╱ // 0x968 @0x1c
0x094c…0974 at001d = ╱35╱5╱ // 0x969 @0x1d
0x094c…0974 at001e = ╱ec╱,╱ // 0x96a @0x1e
0x094c…0974 at001f = ╱50╱P╱ // 0x96b @0x1f
0x094c…0974 at0020 = ╱49╱I╱ // 0x96c @0x20
0x094c…0974 at0021 = ╱4c╱L╱ // 0x96d @0x21
0x094c…0974 at0022 = ╱36╱6╱ // 0x96e @0x22
0x094c…0974 at0023 = ╱ec╱,╱ // 0x96f @0x23
0x094c…0974 at0024 = ╱4c╱L╱ // 0x970 @0x24
0x094c…0974 at0025 = ╱38╱8╱ // 0x971 @0x25
0x094c…0974 at0026 = ╱ee╱)╱ // 0x972 @0x26
0x094c…0974 at0027 = EOL // 0x973 @0x27
0x094c…0974 }
0x0974…09c2 9719 0730 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=E;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32
0x0974…09c2 LineComalBin {
0x0974…09c2 ptr = 0x9719 // 0x974 @0x0
0x0974…09c2 lno = 0x02da // 0x976 @0x2
0x0974…09c2 at0004 = ╱50╱P╱ // 0x978 @0x4
0x0974…09c2 at0005 = ╱49╱I╱ // 0x979 @0x5
0x0974…09c2 at0006 = ╱4c╱L╱ // 0x97a @0x6
0x0974…09c2 at0007 = ╱31╱1╱ // 0x97b @0x7
0x0974…09c2 at0008 = ╱dc╱=╱ // 0x97c @0x8
0x0974…09c2 at0009 = ╱4d╱M╱ // 0x97d @0x9
0x0974…09c2 at000a = ╱41╱A╱ // 0x97e @0xa
0x0974…09c2 at000b = ╱4e╱N╱ // 0x97f @0xb
0x0974…09c2 at000c = ╱54╱T╱ // 0x980 @0xc
0x0974…09c2 at000d = ╱32╱2╱ // 0x981 @0xd
0x0974…09c2 at000e = ╱e7╱ DIV ╱ // 0x982 @0xe
0x0974…09c2 at000f = ╱38╱8╱ // 0x983 @0xf
0x0974…09c2 at0010 = ╱fe00008004╱ // 0x984 @0x10
0x0974…09c2 at0015 = ╱eb╱;╱ // 0x989 @0x15
0x0974…09c2 at0016 = ╱50╱P╱ // 0x98a @0x16
0x0974…09c2 at0017 = ╱49╱I╱ // 0x98b @0x17
0x0974…09c2 at0018 = ╱4c╱L╱ // 0x98c @0x18
0x0974…09c2 at0019 = ╱36╱6╱ // 0x98d @0x19
0x0974…09c2 at001a = ╱dc╱=╱ // 0x98e @0x1a
0x0974…09c2 at001b = ╱50╱P╱ // 0x98f @0x1b
0x0974…09c2 at001c = ╱49╱I╱ // 0x990 @0x1c
0x0974…09c2 at001d = ╱4c╱L╱ // 0x991 @0x1d
0x0974…09c2 at001e = ╱31╱1╱ // 0x992 @0x1e
0x0974…09c2 at001f = ╱eb╱;╱ // 0x993 @0x1f
0x0974…09c2 at0020 = ╱43╱C╱ // 0x994 @0x20
0x0974…09c2 at0021 = ╱45╱E╱ // 0x995 @0x21
0x0974…09c2 at0022 = ╱4b╱K╱ // 0x996 @0x22
0x0974…09c2 at0023 = ╱53╱S╱ // 0x997 @0x23
0x0974…09c2 at0024 = ╱dc╱=╱ // 0x998 @0x24
0x0974…09c2 at0025 = ╱45╱E╱ // 0x999 @0x25
0x0974…09c2 at0026 = ╱eb╱;╱ // 0x99a @0x26
0x0974…09c2 at0027 = ╱4d╱M╱ // 0x99b @0x27
0x0974…09c2 at0028 = ╱41╱A╱ // 0x99c @0x28
0x0974…09c2 at0029 = ╱4e╱N╱ // 0x99d @0x29
0x0974…09c2 at002a = ╱54╱T╱ // 0x99e @0x2a
0x0974…09c2 at002b = ╱33╱3╱ // 0x99f @0x2b
0x0974…09c2 at002c = ╱dc╱=╱ // 0x9a0 @0x2c
0x0974…09c2 at002d = ╱4d╱M╱ // 0x9a1 @0x2d
0x0974…09c2 at002e = ╱41╱A╱ // 0x9a2 @0x2e
0x0974…09c2 at002f = ╱4e╱N╱ // 0x9a3 @0x2f
0x0974…09c2 at0030 = ╱54╱T╱ // 0x9a4 @0x30
0x0974…09c2 at0031 = ╱32╱2╱ // 0x9a5 @0x31
0x0974…09c2 at0032 = ╱e7╱ DIV ╱ // 0x9a6 @0x32
0x0974…09c2 at0033 = ╱34╱4╱ // 0x9a7 @0x33
0x0974…09c2 at0034 = ╱fe00008003╱ // 0x9a8 @0x34
0x0974…09c2 at0039 = ╱eb╱;╱ // 0x9ad @0x39
0x0974…09c2 at003a = ╱4d╱M╱ // 0x9ae @0x3a
0x0974…09c2 at003b = ╱41╱A╱ // 0x9af @0x3b
0x0974…09c2 at003c = ╱4e╱N╱ // 0x9b0 @0x3c
0x0974…09c2 at003d = ╱54╱T╱ // 0x9b1 @0x3d
0x0974…09c2 at003e = ╱34╱4╱ // 0x9b2 @0x3e
0x0974…09c2 at003f = ╱dc╱=╱ // 0x9b3 @0x3f
0x0974…09c2 at0040 = ╱4d╱M╱ // 0x9b4 @0x40
0x0974…09c2 at0041 = ╱41╱A╱ // 0x9b5 @0x41
0x0974…09c2 at0042 = ╱4e╱N╱ // 0x9b6 @0x42
0x0974…09c2 at0043 = ╱54╱T╱ // 0x9b7 @0x43
0x0974…09c2 at0044 = ╱32╱2╱ // 0x9b8 @0x44
0x0974…09c2 at0045 = ╱e7╱ DIV ╱ // 0x9b9 @0x45
0x0974…09c2 at0046 = ╱33╱3╱ // 0x9ba @0x46
0x0974…09c2 at0047 = ╱32╱2╱ // 0x9bb @0x47
0x0974…09c2 at0048 = ╱fe00008006╱ // 0x9bc @0x48
0x0974…09c2 at004d = EOL // 0x9c1 @0x4d
0x0974…09c2 }
0x09c2…09c8 971f 0740 REPEAT
0x09c2…09c8 LineComalBin {
0x09c2…09c8 ptr = 0x971f // 0x9c2 @0x0
0x09c2…09c8 lno = 0x02e4 // 0x9c4 @0x2
0x09c2…09c8 at0004 = ╱97╱ REPEAT ╱ // 0x9c6 @0x4
0x09c2…09c8 at0005 = EOL // 0x9c7 @0x5
0x09c2…09c8 }
0x09c8…09e7 973e 0750 IF NØGL5=TAB4(PIL6) OR PIL1=E THEN EXIT
0x09c8…09e7 LineComalBin {
0x09c8…09e7 ptr = 0x973e // 0x9c8 @0x0
0x09c8…09e7 lno = 0x02ee // 0x9ca @0x2
0x09c8…09e7 at0004 = ╱82╱ IF ╱ // 0x9cc @0x4
0x09c8…09e7 at0005 = ╱4e╱N╱ // 0x9cd @0x5
0x09c8…09e7 at0006 = ╱5c╱Ø╱ // 0x9ce @0x6
0x09c8…09e7 at0007 = ╱47╱G╱ // 0x9cf @0x7
0x09c8…09e7 at0008 = ╱4c╱L╱ // 0x9d0 @0x8
0x09c8…09e7 at0009 = ╱35╱5╱ // 0x9d1 @0x9
0x09c8…09e7 at000a = ╱dc╱=╱ // 0x9d2 @0xa
0x09c8…09e7 at000b = ╱54╱T╱ // 0x9d3 @0xb
0x09c8…09e7 at000c = ╱41╱A╱ // 0x9d4 @0xc
0x09c8…09e7 at000d = ╱42╱B╱ // 0x9d5 @0xd
0x09c8…09e7 at000e = ╱34╱4╱ // 0x9d6 @0xe
0x09c8…09e7 at000f = ╱ed╱(╱ // 0x9d7 @0xf
0x09c8…09e7 at0010 = ╱50╱P╱ // 0x9d8 @0x10
0x09c8…09e7 at0011 = ╱49╱I╱ // 0x9d9 @0x11
0x09c8…09e7 at0012 = ╱4c╱L╱ // 0x9da @0x12
0x09c8…09e7 at0013 = ╱36╱6╱ // 0x9db @0x13
0x09c8…09e7 at0014 = ╱ee╱)╱ // 0x9dc @0x14
0x09c8…09e7 at0015 = ╱db╱ OR ╱ // 0x9dd @0x15
0x09c8…09e7 at0016 = ╱50╱P╱ // 0x9de @0x16
0x09c8…09e7 at0017 = ╱49╱I╱ // 0x9df @0x17
0x09c8…09e7 at0018 = ╱4c╱L╱ // 0x9e0 @0x18
0x09c8…09e7 at0019 = ╱31╱1╱ // 0x9e1 @0x19
0x09c8…09e7 at001a = ╱dc╱=╱ // 0x9e2 @0x1a
0x09c8…09e7 at001b = ╱45╱E╱ // 0x9e3 @0x1b
0x09c8…09e7 at001c = ╱b6╱ THEN ╱ // 0x9e4 @0x1c
0x09c8…09e7 at001d = ╱99╱ EXIT ╱ // 0x9e5 @0x1d
0x09c8…09e7 at001e = EOL // 0x9e6 @0x1e
0x09c8…09e7 }
0x09e7…0a23 977a 0760 PIL1=(PIL1+E) DIV G;PIL6=PIL6+PIL1*(E-G*(NØGL5<TAB4(PIL6)))
0x09e7…0a23 LineComalBin {
0x09e7…0a23 ptr = 0x977a // 0x9e7 @0x0
0x09e7…0a23 lno = 0x02f8 // 0x9e9 @0x2
0x09e7…0a23 at0004 = ╱50╱P╱ // 0x9eb @0x4
0x09e7…0a23 at0005 = ╱49╱I╱ // 0x9ec @0x5
0x09e7…0a23 at0006 = ╱4c╱L╱ // 0x9ed @0x6
0x09e7…0a23 at0007 = ╱31╱1╱ // 0x9ee @0x7
0x09e7…0a23 at0008 = ╱dc╱=╱ // 0x9ef @0x8
0x09e7…0a23 at0009 = ╱ed╱(╱ // 0x9f0 @0x9
0x09e7…0a23 at000a = ╱50╱P╱ // 0x9f1 @0xa
0x09e7…0a23 at000b = ╱49╱I╱ // 0x9f2 @0xb
0x09e7…0a23 at000c = ╱4c╱L╱ // 0x9f3 @0xc
0x09e7…0a23 at000d = ╱31╱1╱ // 0x9f4 @0xd
0x09e7…0a23 at000e = ╱e2╱+╱ // 0x9f5 @0xe
0x09e7…0a23 at000f = ╱45╱E╱ // 0x9f6 @0xf
0x09e7…0a23 at0010 = ╱ee╱)╱ // 0x9f7 @0x10
0x09e7…0a23 at0011 = ╱e7╱ DIV ╱ // 0x9f8 @0x11
0x09e7…0a23 at0012 = ╱47╱G╱ // 0x9f9 @0x12
0x09e7…0a23 at0013 = ╱eb╱;╱ // 0x9fa @0x13
0x09e7…0a23 at0014 = ╱50╱P╱ // 0x9fb @0x14
0x09e7…0a23 at0015 = ╱49╱I╱ // 0x9fc @0x15
0x09e7…0a23 at0016 = ╱4c╱L╱ // 0x9fd @0x16
0x09e7…0a23 at0017 = ╱36╱6╱ // 0x9fe @0x17
0x09e7…0a23 at0018 = ╱dc╱=╱ // 0x9ff @0x18
0x09e7…0a23 at0019 = ╱50╱P╱ // 0xa00 @0x19
0x09e7…0a23 at001a = ╱49╱I╱ // 0xa01 @0x1a
0x09e7…0a23 at001b = ╱4c╱L╱ // 0xa02 @0x1b
0x09e7…0a23 at001c = ╱36╱6╱ // 0xa03 @0x1c
0x09e7…0a23 at001d = ╱e2╱+╱ // 0xa04 @0x1d
0x09e7…0a23 at001e = ╱50╱P╱ // 0xa05 @0x1e
0x09e7…0a23 at001f = ╱49╱I╱ // 0xa06 @0x1f
0x09e7…0a23 at0020 = ╱4c╱L╱ // 0xa07 @0x20
0x09e7…0a23 at0021 = ╱31╱1╱ // 0xa08 @0x21
0x09e7…0a23 at0022 = ╱e4╱*╱ // 0xa09 @0x22
0x09e7…0a23 at0023 = ╱ed╱(╱ // 0xa0a @0x23
0x09e7…0a23 at0024 = ╱45╱E╱ // 0xa0b @0x24
0x09e7…0a23 at0025 = ╱e3╱-╱ // 0xa0c @0x25
0x09e7…0a23 at0026 = ╱47╱G╱ // 0xa0d @0x26
0x09e7…0a23 at0027 = ╱e4╱*╱ // 0xa0e @0x27
0x09e7…0a23 at0028 = ╱ed╱(╱ // 0xa0f @0x28
0x09e7…0a23 at0029 = ╱4e╱N╱ // 0xa10 @0x29
0x09e7…0a23 at002a = ╱5c╱Ø╱ // 0xa11 @0x2a
0x09e7…0a23 at002b = ╱47╱G╱ // 0xa12 @0x2b
0x09e7…0a23 at002c = ╱4c╱L╱ // 0xa13 @0x2c
0x09e7…0a23 at002d = ╱35╱5╱ // 0xa14 @0x2d
0x09e7…0a23 at002e = ╱dd╱<╱ // 0xa15 @0x2e
0x09e7…0a23 at002f = ╱54╱T╱ // 0xa16 @0x2f
0x09e7…0a23 at0030 = ╱41╱A╱ // 0xa17 @0x30
0x09e7…0a23 at0031 = ╱42╱B╱ // 0xa18 @0x31
0x09e7…0a23 at0032 = ╱34╱4╱ // 0xa19 @0x32
0x09e7…0a23 at0033 = ╱ed╱(╱ // 0xa1a @0x33
0x09e7…0a23 at0034 = ╱50╱P╱ // 0xa1b @0x34
0x09e7…0a23 at0035 = ╱49╱I╱ // 0xa1c @0x35
0x09e7…0a23 at0036 = ╱4c╱L╱ // 0xa1d @0x36
0x09e7…0a23 at0037 = ╱36╱6╱ // 0xa1e @0x37
0x09e7…0a23 at0038 = ╱ee╱)╱ // 0xa1f @0x38
0x09e7…0a23 at0039 = ╱ee╱)╱ // 0xa20 @0x39
0x09e7…0a23 at003a = ╱ee╱)╱ // 0xa21 @0x3a
0x09e7…0a23 at003b = EOL // 0xa22 @0x3b
0x09e7…0a23 }
0x0a23…0a36 978d 0770 IF PIL6<E THEN PIL6=E
0x0a23…0a36 LineComalBin {
0x0a23…0a36 ptr = 0x978d // 0xa23 @0x0
0x0a23…0a36 lno = 0x0302 // 0xa25 @0x2
0x0a23…0a36 at0004 = ╱82╱ IF ╱ // 0xa27 @0x4
0x0a23…0a36 at0005 = ╱50╱P╱ // 0xa28 @0x5
0x0a23…0a36 at0006 = ╱49╱I╱ // 0xa29 @0x6
0x0a23…0a36 at0007 = ╱4c╱L╱ // 0xa2a @0x7
0x0a23…0a36 at0008 = ╱36╱6╱ // 0xa2b @0x8
0x0a23…0a36 at0009 = ╱dd╱<╱ // 0xa2c @0x9
0x0a23…0a36 at000a = ╱45╱E╱ // 0xa2d @0xa
0x0a23…0a36 at000b = ╱b6╱ THEN ╱ // 0xa2e @0xb
0x0a23…0a36 at000c = ╱50╱P╱ // 0xa2f @0xc
0x0a23…0a36 at000d = ╱49╱I╱ // 0xa30 @0xd
0x0a23…0a36 at000e = ╱4c╱L╱ // 0xa31 @0xe
0x0a23…0a36 at000f = ╱36╱6╱ // 0xa32 @0xf
0x0a23…0a36 at0010 = ╱dc╱=╱ // 0xa33 @0x10
0x0a23…0a36 at0011 = ╱45╱E╱ // 0xa34 @0x11
0x0a23…0a36 at0012 = EOL // 0xa35 @0x12
0x0a23…0a36 }
0x0a36…0a51 97a8 0780 IF PIL6>MANT3 THEN PIL6=MANT3
0x0a36…0a51 LineComalBin {
0x0a36…0a51 ptr = 0x97a8 // 0xa36 @0x0
0x0a36…0a51 lno = 0x030c // 0xa38 @0x2
0x0a36…0a51 at0004 = ╱82╱ IF ╱ // 0xa3a @0x4
0x0a36…0a51 at0005 = ╱50╱P╱ // 0xa3b @0x5
0x0a36…0a51 at0006 = ╱49╱I╱ // 0xa3c @0x6
0x0a36…0a51 at0007 = ╱4c╱L╱ // 0xa3d @0x7
0x0a36…0a51 at0008 = ╱36╱6╱ // 0xa3e @0x8
0x0a36…0a51 at0009 = ╱de╱>╱ // 0xa3f @0x9
0x0a36…0a51 at000a = ╱4d╱M╱ // 0xa40 @0xa
0x0a36…0a51 at000b = ╱41╱A╱ // 0xa41 @0xb
0x0a36…0a51 at000c = ╱4e╱N╱ // 0xa42 @0xc
0x0a36…0a51 at000d = ╱54╱T╱ // 0xa43 @0xd
0x0a36…0a51 at000e = ╱33╱3╱ // 0xa44 @0xe
0x0a36…0a51 at000f = ╱b6╱ THEN ╱ // 0xa45 @0xf
0x0a36…0a51 at0010 = ╱50╱P╱ // 0xa46 @0x10
0x0a36…0a51 at0011 = ╱49╱I╱ // 0xa47 @0x11
0x0a36…0a51 at0012 = ╱4c╱L╱ // 0xa48 @0x12
0x0a36…0a51 at0013 = ╱36╱6╱ // 0xa49 @0x13
0x0a36…0a51 at0014 = ╱dc╱=╱ // 0xa4a @0x14
0x0a36…0a51 at0015 = ╱4d╱M╱ // 0xa4b @0x15
0x0a36…0a51 at0016 = ╱41╱A╱ // 0xa4c @0x16
0x0a36…0a51 at0017 = ╱4e╱N╱ // 0xa4d @0x17
0x0a36…0a51 at0018 = ╱54╱T╱ // 0xa4e @0x18
0x0a36…0a51 at0019 = ╱33╱3╱ // 0xa4f @0x19
0x0a36…0a51 at001a = EOL // 0xa50 @0x1a
0x0a36…0a51 }
0x0a51…0a5d 97b4 0790 UNTIL PIL1=B
0x0a51…0a5d LineComalBin {
0x0a51…0a5d ptr = 0x97b4 // 0xa51 @0x0
0x0a51…0a5d lno = 0x0316 // 0xa53 @0x2
0x0a51…0a5d at0004 = ╱98╱ UNTIL ╱ // 0xa55 @0x4
0x0a51…0a5d at0005 = ╱50╱P╱ // 0xa56 @0x5
0x0a51…0a5d at0006 = ╱49╱I╱ // 0xa57 @0x6
0x0a51…0a5d at0007 = ╱4c╱L╱ // 0xa58 @0x7
0x0a51…0a5d at0008 = ╱31╱1╱ // 0xa59 @0x8
0x0a51…0a5d at0009 = ╱dc╱=╱ // 0xa5a @0x9
0x0a51…0a5d at000a = ╱42╱B╱ // 0xa5b @0xa
0x0a51…0a5d at000b = EOL // 0xa5c @0xb
0x0a51…0a5d }
0x0a5d…0a88 97df 0800 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-E*(PIL6>E)
0x0a5d…0a88 LineComalBin {
0x0a5d…0a88 ptr = 0x97df // 0xa5d @0x0
0x0a5d…0a88 lno = 0x0320 // 0xa5f @0x2
0x0a5d…0a88 at0004 = ╱82╱ IF ╱ // 0xa61 @0x4
0x0a5d…0a88 at0005 = ╱54╱T╱ // 0xa62 @0x5
0x0a5d…0a88 at0006 = ╱41╱A╱ // 0xa63 @0x6
0x0a5d…0a88 at0007 = ╱42╱B╱ // 0xa64 @0x7
0x0a5d…0a88 at0008 = ╱34╱4╱ // 0xa65 @0x8
0x0a5d…0a88 at0009 = ╱ed╱(╱ // 0xa66 @0x9
0x0a5d…0a88 at000a = ╱50╱P╱ // 0xa67 @0xa
0x0a5d…0a88 at000b = ╱49╱I╱ // 0xa68 @0xb
0x0a5d…0a88 at000c = ╱4c╱L╱ // 0xa69 @0xc
0x0a5d…0a88 at000d = ╱36╱6╱ // 0xa6a @0xd
0x0a5d…0a88 at000e = ╱ee╱)╱ // 0xa6b @0xe
0x0a5d…0a88 at000f = ╱de╱>╱ // 0xa6c @0xf
0x0a5d…0a88 at0010 = ╱4e╱N╱ // 0xa6d @0x10
0x0a5d…0a88 at0011 = ╱5c╱Ø╱ // 0xa6e @0x11
0x0a5d…0a88 at0012 = ╱47╱G╱ // 0xa6f @0x12
0x0a5d…0a88 at0013 = ╱4c╱L╱ // 0xa70 @0x13
0x0a5d…0a88 at0014 = ╱35╱5╱ // 0xa71 @0x14
0x0a5d…0a88 at0015 = ╱b6╱ THEN ╱ // 0xa72 @0x15
0x0a5d…0a88 at0016 = ╱50╱P╱ // 0xa73 @0x16
0x0a5d…0a88 at0017 = ╱49╱I╱ // 0xa74 @0x17
0x0a5d…0a88 at0018 = ╱4c╱L╱ // 0xa75 @0x18
0x0a5d…0a88 at0019 = ╱36╱6╱ // 0xa76 @0x19
0x0a5d…0a88 at001a = ╱dc╱=╱ // 0xa77 @0x1a
0x0a5d…0a88 at001b = ╱50╱P╱ // 0xa78 @0x1b
0x0a5d…0a88 at001c = ╱49╱I╱ // 0xa79 @0x1c
0x0a5d…0a88 at001d = ╱4c╱L╱ // 0xa7a @0x1d
0x0a5d…0a88 at001e = ╱36╱6╱ // 0xa7b @0x1e
0x0a5d…0a88 at001f = ╱e3╱-╱ // 0xa7c @0x1f
0x0a5d…0a88 at0020 = ╱45╱E╱ // 0xa7d @0x20
0x0a5d…0a88 at0021 = ╱e4╱*╱ // 0xa7e @0x21
0x0a5d…0a88 at0022 = ╱ed╱(╱ // 0xa7f @0x22
0x0a5d…0a88 at0023 = ╱50╱P╱ // 0xa80 @0x23
0x0a5d…0a88 at0024 = ╱49╱I╱ // 0xa81 @0x24
0x0a5d…0a88 at0025 = ╱4c╱L╱ // 0xa82 @0x25
0x0a5d…0a88 at0026 = ╱36╱6╱ // 0xa83 @0x26
0x0a5d…0a88 at0027 = ╱de╱>╱ // 0xa84 @0x27
0x0a5d…0a88 at0028 = ╱45╱E╱ // 0xa85 @0x28
0x0a5d…0a88 at0029 = ╱ee╱)╱ // 0xa86 @0x29
0x0a5d…0a88 at002a = EOL // 0xa87 @0x2a
0x0a5d…0a88 }
0x0a88…0a9c 97f3 0810 PIL6=MANT4+PIL6
0x0a88…0a9c LineComalBin {
0x0a88…0a9c ptr = 0x97f3 // 0xa88 @0x0
0x0a88…0a9c lno = 0x032a // 0xa8a @0x2
0x0a88…0a9c at0004 = ╱50╱P╱ // 0xa8c @0x4
0x0a88…0a9c at0005 = ╱49╱I╱ // 0xa8d @0x5
0x0a88…0a9c at0006 = ╱4c╱L╱ // 0xa8e @0x6
0x0a88…0a9c at0007 = ╱36╱6╱ // 0xa8f @0x7
0x0a88…0a9c at0008 = ╱dc╱=╱ // 0xa90 @0x8
0x0a88…0a9c at0009 = ╱4d╱M╱ // 0xa91 @0x9
0x0a88…0a9c at000a = ╱41╱A╱ // 0xa92 @0xa
0x0a88…0a9c at000b = ╱4e╱N╱ // 0xa93 @0xb
0x0a88…0a9c at000c = ╱54╱T╱ // 0xa94 @0xc
0x0a88…0a9c at000d = ╱34╱4╱ // 0xa95 @0xd
0x0a88…0a9c at000e = ╱e2╱+╱ // 0xa96 @0xe
0x0a88…0a9c at000f = ╱50╱P╱ // 0xa97 @0xf
0x0a88…0a9c at0010 = ╱49╱I╱ // 0xa98 @0x10
0x0a88…0a9c at0011 = ╱4c╱L╱ // 0xa99 @0x11
0x0a88…0a9c at0012 = ╱36╱6╱ // 0xa9a @0x12
0x0a88…0a9c at0013 = EOL // 0xa9b @0x13
0x0a88…0a9c }
0x0a9c…0aec 9843 0820 GET L8$,PIL6:Q(E,E),Q(E,G),Q(G,E),Q(G,G),Q(V,E),Q(V,G),Q(4,E),Q(4,G)
0x0a9c…0aec LineComalBin {
0x0a9c…0aec ptr = 0x9843 // 0xa9c @0x0
0x0a9c…0aec lno = 0x0334 // 0xa9e @0x2
0x0a9c…0aec at0004 = ╱a9╱ GET ╱ // 0xaa0 @0x4
0x0a9c…0aec at0005 = ╱4c╱L╱ // 0xaa1 @0x5
0x0a9c…0aec at0006 = ╱38╱8╱ // 0xaa2 @0x6
0x0a9c…0aec at0007 = ╱ef╱$╱ // 0xaa3 @0x7
0x0a9c…0aec at0008 = ╱ec╱,╱ // 0xaa4 @0x8
0x0a9c…0aec at0009 = ╱50╱P╱ // 0xaa5 @0x9
0x0a9c…0aec at000a = ╱49╱I╱ // 0xaa6 @0xa
0x0a9c…0aec at000b = ╱4c╱L╱ // 0xaa7 @0xb
0x0a9c…0aec at000c = ╱36╱6╱ // 0xaa8 @0xc
0x0a9c…0aec at000d = ╱f0╱:╱ // 0xaa9 @0xd
0x0a9c…0aec at000e = ╱51╱Q╱ // 0xaaa @0xe
0x0a9c…0aec at000f = ╱ed╱(╱ // 0xaab @0xf
0x0a9c…0aec at0010 = ╱45╱E╱ // 0xaac @0x10
0x0a9c…0aec at0011 = ╱ec╱,╱ // 0xaad @0x11
0x0a9c…0aec at0012 = ╱45╱E╱ // 0xaae @0x12
0x0a9c…0aec at0013 = ╱ee╱)╱ // 0xaaf @0x13
0x0a9c…0aec at0014 = ╱ec╱,╱ // 0xab0 @0x14
0x0a9c…0aec at0015 = ╱51╱Q╱ // 0xab1 @0x15
0x0a9c…0aec at0016 = ╱ed╱(╱ // 0xab2 @0x16
0x0a9c…0aec at0017 = ╱45╱E╱ // 0xab3 @0x17
0x0a9c…0aec at0018 = ╱ec╱,╱ // 0xab4 @0x18
0x0a9c…0aec at0019 = ╱47╱G╱ // 0xab5 @0x19
0x0a9c…0aec at001a = ╱ee╱)╱ // 0xab6 @0x1a
0x0a9c…0aec at001b = ╱ec╱,╱ // 0xab7 @0x1b
0x0a9c…0aec at001c = ╱51╱Q╱ // 0xab8 @0x1c
0x0a9c…0aec at001d = ╱ed╱(╱ // 0xab9 @0x1d
0x0a9c…0aec at001e = ╱47╱G╱ // 0xaba @0x1e
0x0a9c…0aec at001f = ╱ec╱,╱ // 0xabb @0x1f
0x0a9c…0aec at0020 = ╱45╱E╱ // 0xabc @0x20
0x0a9c…0aec at0021 = ╱ee╱)╱ // 0xabd @0x21
0x0a9c…0aec at0022 = ╱ec╱,╱ // 0xabe @0x22
0x0a9c…0aec at0023 = ╱51╱Q╱ // 0xabf @0x23
0x0a9c…0aec at0024 = ╱ed╱(╱ // 0xac0 @0x24
0x0a9c…0aec at0025 = ╱47╱G╱ // 0xac1 @0x25
0x0a9c…0aec at0026 = ╱ec╱,╱ // 0xac2 @0x26
0x0a9c…0aec at0027 = ╱47╱G╱ // 0xac3 @0x27
0x0a9c…0aec at0028 = ╱ee╱)╱ // 0xac4 @0x28
0x0a9c…0aec at0029 = ╱ec╱,╱ // 0xac5 @0x29
0x0a9c…0aec at002a = ╱51╱Q╱ // 0xac6 @0x2a
0x0a9c…0aec at002b = ╱ed╱(╱ // 0xac7 @0x2b
0x0a9c…0aec at002c = ╱56╱V╱ // 0xac8 @0x2c
0x0a9c…0aec at002d = ╱ec╱,╱ // 0xac9 @0x2d
0x0a9c…0aec at002e = ╱45╱E╱ // 0xaca @0x2e
0x0a9c…0aec at002f = ╱ee╱)╱ // 0xacb @0x2f
0x0a9c…0aec at0030 = ╱ec╱,╱ // 0xacc @0x30
0x0a9c…0aec at0031 = ╱51╱Q╱ // 0xacd @0x31
0x0a9c…0aec at0032 = ╱ed╱(╱ // 0xace @0x32
0x0a9c…0aec at0033 = ╱56╱V╱ // 0xacf @0x33
0x0a9c…0aec at0034 = ╱ec╱,╱ // 0xad0 @0x34
0x0a9c…0aec at0035 = ╱47╱G╱ // 0xad1 @0x35
0x0a9c…0aec at0036 = ╱ee╱)╱ // 0xad2 @0x36
0x0a9c…0aec at0037 = ╱ec╱,╱ // 0xad3 @0x37
0x0a9c…0aec at0038 = ╱51╱Q╱ // 0xad4 @0x38
0x0a9c…0aec at0039 = ╱ed╱(╱ // 0xad5 @0x39
0x0a9c…0aec at003a = ╱34╱4╱ // 0xad6 @0x3a
0x0a9c…0aec at003b = ╱fe00008003╱ // 0xad7 @0x3b
0x0a9c…0aec at0040 = ╱ec╱,╱ // 0xadc @0x40
0x0a9c…0aec at0041 = ╱45╱E╱ // 0xadd @0x41
0x0a9c…0aec at0042 = ╱ee╱)╱ // 0xade @0x42
0x0a9c…0aec at0043 = ╱ec╱,╱ // 0xadf @0x43
0x0a9c…0aec at0044 = ╱51╱Q╱ // 0xae0 @0x44
0x0a9c…0aec at0045 = ╱ed╱(╱ // 0xae1 @0x45
0x0a9c…0aec at0046 = ╱34╱4╱ // 0xae2 @0x46
0x0a9c…0aec at0047 = ╱fe00008003╱ // 0xae3 @0x47
0x0a9c…0aec at004c = ╱ec╱,╱ // 0xae8 @0x4c
0x0a9c…0aec at004d = ╱47╱G╱ // 0xae9 @0x4d
0x0a9c…0aec at004e = ╱ee╱)╱ // 0xaea @0x4e
0x0a9c…0aec at004f = EOL // 0xaeb @0x4f
0x0a9c…0aec }
0x0aec…0afd 9854 0830 EXEC FE(E,E,L8$)
0x0aec…0afd LineComalBin {
0x0aec…0afd ptr = 0x9854 // 0xaec @0x0
0x0aec…0afd lno = 0x033e // 0xaee @0x2
0x0aec…0afd at0004 = ╱9d╱ EXEC ╱ // 0xaf0 @0x4
0x0aec…0afd at0005 = ╱46╱F╱ // 0xaf1 @0x5
0x0aec…0afd at0006 = ╱45╱E╱ // 0xaf2 @0x6
0x0aec…0afd at0007 = ╱ed╱(╱ // 0xaf3 @0x7
0x0aec…0afd at0008 = ╱45╱E╱ // 0xaf4 @0x8
0x0aec…0afd at0009 = ╱ec╱,╱ // 0xaf5 @0x9
0x0aec…0afd at000a = ╱45╱E╱ // 0xaf6 @0xa
0x0aec…0afd at000b = ╱ec╱,╱ // 0xaf7 @0xb
0x0aec…0afd at000c = ╱4c╱L╱ // 0xaf8 @0xc
0x0aec…0afd at000d = ╱38╱8╱ // 0xaf9 @0xd
0x0aec…0afd at000e = ╱ef╱$╱ // 0xafa @0xe
0x0aec…0afd at000f = ╱ee╱)╱ // 0xafb @0xf
0x0aec…0afd at0010 = EOL // 0xafc @0x10
0x0aec…0afd }
0x0afd…0b10 9867 0840 FOR PIL6=E TO 4
0x0afd…0b10 LineComalBin {
0x0afd…0b10 ptr = 0x9867 // 0xafd @0x0
0x0afd…0b10 lno = 0x0348 // 0xaff @0x2
0x0afd…0b10 at0004 = ╱83╱ FOR ╱ // 0xb01 @0x4
0x0afd…0b10 at0005 = ╱50╱P╱ // 0xb02 @0x5
0x0afd…0b10 at0006 = ╱49╱I╱ // 0xb03 @0x6
0x0afd…0b10 at0007 = ╱4c╱L╱ // 0xb04 @0x7
0x0afd…0b10 at0008 = ╱36╱6╱ // 0xb05 @0x8
0x0afd…0b10 at0009 = ╱dc╱=╱ // 0xb06 @0x9
0x0afd…0b10 at000a = ╱45╱E╱ // 0xb07 @0xa
0x0afd…0b10 at000b = ╱b7╱ TO ╱ // 0xb08 @0xb
0x0afd…0b10 at000c = ╱34╱4╱ // 0xb09 @0xc
0x0afd…0b10 at000d = ╱fe00008003╱ // 0xb0a @0xd
0x0afd…0b10 at0012 = EOL // 0xb0f @0x12
0x0afd…0b10 }
0x0b10…0b27 987e 0850 IF NØGL5=Q(PIL6,E) THEN EXIT
0x0b10…0b27 LineComalBin {
0x0b10…0b27 ptr = 0x987e // 0xb10 @0x0
0x0b10…0b27 lno = 0x0352 // 0xb12 @0x2
0x0b10…0b27 at0004 = ╱82╱ IF ╱ // 0xb14 @0x4
0x0b10…0b27 at0005 = ╱4e╱N╱ // 0xb15 @0x5
0x0b10…0b27 at0006 = ╱5c╱Ø╱ // 0xb16 @0x6
0x0b10…0b27 at0007 = ╱47╱G╱ // 0xb17 @0x7
0x0b10…0b27 at0008 = ╱4c╱L╱ // 0xb18 @0x8
0x0b10…0b27 at0009 = ╱35╱5╱ // 0xb19 @0x9
0x0b10…0b27 at000a = ╱dc╱=╱ // 0xb1a @0xa
0x0b10…0b27 at000b = ╱51╱Q╱ // 0xb1b @0xb
0x0b10…0b27 at000c = ╱ed╱(╱ // 0xb1c @0xc
0x0b10…0b27 at000d = ╱50╱P╱ // 0xb1d @0xd
0x0b10…0b27 at000e = ╱49╱I╱ // 0xb1e @0xe
0x0b10…0b27 at000f = ╱4c╱L╱ // 0xb1f @0xf
0x0b10…0b27 at0010 = ╱36╱6╱ // 0xb20 @0x10
0x0b10…0b27 at0011 = ╱ec╱,╱ // 0xb21 @0x11
0x0b10…0b27 at0012 = ╱45╱E╱ // 0xb22 @0x12
0x0b10…0b27 at0013 = ╱ee╱)╱ // 0xb23 @0x13
0x0b10…0b27 at0014 = ╱b6╱ THEN ╱ // 0xb24 @0x14
0x0b10…0b27 at0015 = ╱99╱ EXIT ╱ // 0xb25 @0x15
0x0b10…0b27 at0016 = EOL // 0xb26 @0x16
0x0b10…0b27 }
0x0b27…0b31 9888 0860 NEXT PIL6
0x0b27…0b31 LineComalBin {
0x0b27…0b31 ptr = 0x9888 // 0xb27 @0x0
0x0b27…0b31 lno = 0x035c // 0xb29 @0x2
0x0b27…0b31 at0004 = ╱84╱ NEXT ╱ // 0xb2b @0x4
0x0b27…0b31 at0005 = ╱50╱P╱ // 0xb2c @0x5
0x0b27…0b31 at0006 = ╱49╱I╱ // 0xb2d @0x6
0x0b27…0b31 at0007 = ╱4c╱L╱ // 0xb2e @0x7
0x0b27…0b31 at0008 = ╱36╱6╱ // 0xb2f @0x8
0x0b27…0b31 at0009 = EOL // 0xb30 @0x9
0x0b27…0b31 }
0x0b31…0b49 98a0 0870 IF PIL6<>5 THEN CEKS=B
0x0b31…0b49 LineComalBin {
0x0b31…0b49 ptr = 0x98a0 // 0xb31 @0x0
0x0b31…0b49 lno = 0x0366 // 0xb33 @0x2
0x0b31…0b49 at0004 = ╱82╱ IF ╱ // 0xb35 @0x4
0x0b31…0b49 at0005 = ╱50╱P╱ // 0xb36 @0x5
0x0b31…0b49 at0006 = ╱49╱I╱ // 0xb37 @0x6
0x0b31…0b49 at0007 = ╱4c╱L╱ // 0xb38 @0x7
0x0b31…0b49 at0008 = ╱36╱6╱ // 0xb39 @0x8
0x0b31…0b49 at0009 = ╱e1╱<>╱ // 0xb3a @0x9
0x0b31…0b49 at000a = ╱35╱5╱ // 0xb3b @0xa
0x0b31…0b49 at000b = ╱fe0000a003╱ // 0xb3c @0xb
0x0b31…0b49 at0010 = ╱b6╱ THEN ╱ // 0xb41 @0x10
0x0b31…0b49 at0011 = ╱43╱C╱ // 0xb42 @0x11
0x0b31…0b49 at0012 = ╱45╱E╱ // 0xb43 @0x12
0x0b31…0b49 at0013 = ╱4b╱K╱ // 0xb44 @0x13
0x0b31…0b49 at0014 = ╱53╱S╱ // 0xb45 @0x14
0x0b31…0b49 at0015 = ╱dc╱=╱ // 0xb46 @0x15
0x0b31…0b49 at0016 = ╱42╱B╱ // 0xb47 @0x16
0x0b31…0b49 at0017 = EOL // 0xb48 @0x17
0x0b31…0b49 }
0x0b49…0b4f 98a6 0880 ENDPROC
0x0b49…0b4f LineComalBin {
0x0b49…0b4f ptr = 0x98a6 // 0xb49 @0x0
0x0b49…0b4f lno = 0x0370 // 0xb4b @0x2
0x0b49…0b4f at0004 = ╱9f╱ ENDPROC ╱ // 0xb4d @0x4
0x0b49…0b4f at0005 = EOL // 0xb4e @0x5
0x0b49…0b4f }
0x0b4f…0b68 98bf 0890 PROC INDTAB1(Z,MANT5,L7)
0x0b4f…0b68 LineComalBin {
0x0b4f…0b68 ptr = 0x98bf // 0xb4f @0x0
0x0b4f…0b68 lno = 0x037a // 0xb51 @0x2
0x0b4f…0b68 at0004 = ╱9e╱ PROC ╱ // 0xb53 @0x4
0x0b4f…0b68 at0005 = ╱49╱I╱ // 0xb54 @0x5
0x0b4f…0b68 at0006 = ╱4e╱N╱ // 0xb55 @0x6
0x0b4f…0b68 at0007 = ╱44╱D╱ // 0xb56 @0x7
0x0b4f…0b68 at0008 = ╱54╱T╱ // 0xb57 @0x8
0x0b4f…0b68 at0009 = ╱41╱A╱ // 0xb58 @0x9
0x0b4f…0b68 at000a = ╱42╱B╱ // 0xb59 @0xa
0x0b4f…0b68 at000b = ╱31╱1╱ // 0xb5a @0xb
0x0b4f…0b68 at000c = ╱ed╱(╱ // 0xb5b @0xc
0x0b4f…0b68 at000d = ╱5a╱Z╱ // 0xb5c @0xd
0x0b4f…0b68 at000e = ╱ec╱,╱ // 0xb5d @0xe
0x0b4f…0b68 at000f = ╱4d╱M╱ // 0xb5e @0xf
0x0b4f…0b68 at0010 = ╱41╱A╱ // 0xb5f @0x10
0x0b4f…0b68 at0011 = ╱4e╱N╱ // 0xb60 @0x11
0x0b4f…0b68 at0012 = ╱54╱T╱ // 0xb61 @0x12
0x0b4f…0b68 at0013 = ╱35╱5╱ // 0xb62 @0x13
0x0b4f…0b68 at0014 = ╱ec╱,╱ // 0xb63 @0x14
0x0b4f…0b68 at0015 = ╱4c╱L╱ // 0xb64 @0x15
0x0b4f…0b68 at0016 = ╱37╱7╱ // 0xb65 @0x16
0x0b4f…0b68 at0017 = ╱ee╱)╱ // 0xb66 @0x17
0x0b4f…0b68 at0018 = EOL // 0xb67 @0x18
0x0b4f…0b68 }
0x0b68…0b7f 98d6 0900 PIL1=MANT5 DIV 32
0x0b68…0b7f LineComalBin {
0x0b68…0b7f ptr = 0x98d6 // 0xb68 @0x0
0x0b68…0b7f lno = 0x0384 // 0xb6a @0x2
0x0b68…0b7f at0004 = ╱50╱P╱ // 0xb6c @0x4
0x0b68…0b7f at0005 = ╱49╱I╱ // 0xb6d @0x5
0x0b68…0b7f at0006 = ╱4c╱L╱ // 0xb6e @0x6
0x0b68…0b7f at0007 = ╱31╱1╱ // 0xb6f @0x7
0x0b68…0b7f at0008 = ╱dc╱=╱ // 0xb70 @0x8
0x0b68…0b7f at0009 = ╱4d╱M╱ // 0xb71 @0x9
0x0b68…0b7f at000a = ╱41╱A╱ // 0xb72 @0xa
0x0b68…0b7f at000b = ╱4e╱N╱ // 0xb73 @0xb
0x0b68…0b7f at000c = ╱54╱T╱ // 0xb74 @0xc
0x0b68…0b7f at000d = ╱35╱5╱ // 0xb75 @0xd
0x0b68…0b7f at000e = ╱e7╱ DIV ╱ // 0xb76 @0xe
0x0b68…0b7f at000f = ╱33╱3╱ // 0xb77 @0xf
0x0b68…0b7f at0010 = ╱32╱2╱ // 0xb78 @0x10
0x0b68…0b7f at0011 = ╱fe00008006╱ // 0xb79 @0x11
0x0b68…0b7f at0016 = EOL // 0xb7e @0x16
0x0b68…0b7f }
0x0b7f…0b8d 98e4 0910 FOR I=E TO PIL1
0x0b7f…0b8d LineComalBin {
0x0b7f…0b8d ptr = 0x98e4 // 0xb7f @0x0
0x0b7f…0b8d lno = 0x038e // 0xb81 @0x2
0x0b7f…0b8d at0004 = ╱83╱ FOR ╱ // 0xb83 @0x4
0x0b7f…0b8d at0005 = ╱49╱I╱ // 0xb84 @0x5
0x0b7f…0b8d at0006 = ╱dc╱=╱ // 0xb85 @0x6
0x0b7f…0b8d at0007 = ╱45╱E╱ // 0xb86 @0x7
0x0b7f…0b8d at0008 = ╱b7╱ TO ╱ // 0xb87 @0x8
0x0b7f…0b8d at0009 = ╱50╱P╱ // 0xb88 @0x9
0x0b7f…0b8d at000a = ╱49╱I╱ // 0xb89 @0xa
0x0b7f…0b8d at000b = ╱4c╱L╱ // 0xb8a @0xb
0x0b7f…0b8d at000c = ╱31╱1╱ // 0xb8b @0xc
0x0b7f…0b8d at000d = EOL // 0xb8c @0xd
0x0b7f…0b8d }
0x0b8d…0ba2 98f9 0920 H=(I-E)*8+E
0x0b8d…0ba2 LineComalBin {
0x0b8d…0ba2 ptr = 0x98f9 // 0xb8d @0x0
0x0b8d…0ba2 lno = 0x0398 // 0xb8f @0x2
0x0b8d…0ba2 at0004 = ╱48╱H╱ // 0xb91 @0x4
0x0b8d…0ba2 at0005 = ╱dc╱=╱ // 0xb92 @0x5
0x0b8d…0ba2 at0006 = ╱ed╱(╱ // 0xb93 @0x6
0x0b8d…0ba2 at0007 = ╱49╱I╱ // 0xb94 @0x7
0x0b8d…0ba2 at0008 = ╱e3╱-╱ // 0xb95 @0x8
0x0b8d…0ba2 at0009 = ╱45╱E╱ // 0xb96 @0x9
0x0b8d…0ba2 at000a = ╱ee╱)╱ // 0xb97 @0xa
0x0b8d…0ba2 at000b = ╱e4╱*╱ // 0xb98 @0xb
0x0b8d…0ba2 at000c = ╱38╱8╱ // 0xb99 @0xc
0x0b8d…0ba2 at000d = ╱fe00008004╱ // 0xb9a @0xd
0x0b8d…0ba2 at0012 = ╱e2╱+╱ // 0xb9f @0x12
0x0b8d…0ba2 at0013 = ╱45╱E╱ // 0xba0 @0x13
0x0b8d…0ba2 at0014 = EOL // 0xba1 @0x14
0x0b8d…0ba2 }
0x0ba2…0bf7 994e 0930 GET L7$,I:Z(H),Z(H+E),Z(H+G),Z(H+V),Z(H+4),Z(H+5),Z(H+6),Z(H+7)
0x0ba2…0bf7 LineComalBin {
0x0ba2…0bf7 ptr = 0x994e // 0xba2 @0x0
0x0ba2…0bf7 lno = 0x03a2 // 0xba4 @0x2
0x0ba2…0bf7 at0004 = ╱a9╱ GET ╱ // 0xba6 @0x4
0x0ba2…0bf7 at0005 = ╱4c╱L╱ // 0xba7 @0x5
0x0ba2…0bf7 at0006 = ╱37╱7╱ // 0xba8 @0x6
0x0ba2…0bf7 at0007 = ╱ef╱$╱ // 0xba9 @0x7
0x0ba2…0bf7 at0008 = ╱ec╱,╱ // 0xbaa @0x8
0x0ba2…0bf7 at0009 = ╱49╱I╱ // 0xbab @0x9
0x0ba2…0bf7 at000a = ╱f0╱:╱ // 0xbac @0xa
0x0ba2…0bf7 at000b = ╱5a╱Z╱ // 0xbad @0xb
0x0ba2…0bf7 at000c = ╱ed╱(╱ // 0xbae @0xc
0x0ba2…0bf7 at000d = ╱48╱H╱ // 0xbaf @0xd
0x0ba2…0bf7 at000e = ╱ee╱)╱ // 0xbb0 @0xe
0x0ba2…0bf7 at000f = ╱ec╱,╱ // 0xbb1 @0xf
0x0ba2…0bf7 at0010 = ╱5a╱Z╱ // 0xbb2 @0x10
0x0ba2…0bf7 at0011 = ╱ed╱(╱ // 0xbb3 @0x11
0x0ba2…0bf7 at0012 = ╱48╱H╱ // 0xbb4 @0x12
0x0ba2…0bf7 at0013 = ╱e2╱+╱ // 0xbb5 @0x13
0x0ba2…0bf7 at0014 = ╱45╱E╱ // 0xbb6 @0x14
0x0ba2…0bf7 at0015 = ╱ee╱)╱ // 0xbb7 @0x15
0x0ba2…0bf7 at0016 = ╱ec╱,╱ // 0xbb8 @0x16
0x0ba2…0bf7 at0017 = ╱5a╱Z╱ // 0xbb9 @0x17
0x0ba2…0bf7 at0018 = ╱ed╱(╱ // 0xbba @0x18
0x0ba2…0bf7 at0019 = ╱48╱H╱ // 0xbbb @0x19
0x0ba2…0bf7 at001a = ╱e2╱+╱ // 0xbbc @0x1a
0x0ba2…0bf7 at001b = ╱47╱G╱ // 0xbbd @0x1b
0x0ba2…0bf7 at001c = ╱ee╱)╱ // 0xbbe @0x1c
0x0ba2…0bf7 at001d = ╱ec╱,╱ // 0xbbf @0x1d
0x0ba2…0bf7 at001e = ╱5a╱Z╱ // 0xbc0 @0x1e
0x0ba2…0bf7 at001f = ╱ed╱(╱ // 0xbc1 @0x1f
0x0ba2…0bf7 at0020 = ╱48╱H╱ // 0xbc2 @0x20
0x0ba2…0bf7 at0021 = ╱e2╱+╱ // 0xbc3 @0x21
0x0ba2…0bf7 at0022 = ╱56╱V╱ // 0xbc4 @0x22
0x0ba2…0bf7 at0023 = ╱ee╱)╱ // 0xbc5 @0x23
0x0ba2…0bf7 at0024 = ╱ec╱,╱ // 0xbc6 @0x24
0x0ba2…0bf7 at0025 = ╱5a╱Z╱ // 0xbc7 @0x25
0x0ba2…0bf7 at0026 = ╱ed╱(╱ // 0xbc8 @0x26
0x0ba2…0bf7 at0027 = ╱48╱H╱ // 0xbc9 @0x27
0x0ba2…0bf7 at0028 = ╱e2╱+╱ // 0xbca @0x28
0x0ba2…0bf7 at0029 = ╱34╱4╱ // 0xbcb @0x29
0x0ba2…0bf7 at002a = ╱fe00008003╱ // 0xbcc @0x2a
0x0ba2…0bf7 at002f = ╱ee╱)╱ // 0xbd1 @0x2f
0x0ba2…0bf7 at0030 = ╱ec╱,╱ // 0xbd2 @0x30
0x0ba2…0bf7 at0031 = ╱5a╱Z╱ // 0xbd3 @0x31
0x0ba2…0bf7 at0032 = ╱ed╱(╱ // 0xbd4 @0x32
0x0ba2…0bf7 at0033 = ╱48╱H╱ // 0xbd5 @0x33
0x0ba2…0bf7 at0034 = ╱e2╱+╱ // 0xbd6 @0x34
0x0ba2…0bf7 at0035 = ╱35╱5╱ // 0xbd7 @0x35
0x0ba2…0bf7 at0036 = ╱fe0000a003╱ // 0xbd8 @0x36
0x0ba2…0bf7 at003b = ╱ee╱)╱ // 0xbdd @0x3b
0x0ba2…0bf7 at003c = ╱ec╱,╱ // 0xbde @0x3c
0x0ba2…0bf7 at003d = ╱5a╱Z╱ // 0xbdf @0x3d
0x0ba2…0bf7 at003e = ╱ed╱(╱ // 0xbe0 @0x3e
0x0ba2…0bf7 at003f = ╱48╱H╱ // 0xbe1 @0x3f
0x0ba2…0bf7 at0040 = ╱e2╱+╱ // 0xbe2 @0x40
0x0ba2…0bf7 at0041 = ╱36╱6╱ // 0xbe3 @0x41
0x0ba2…0bf7 at0042 = ╱fe0000c003╱ // 0xbe4 @0x42
0x0ba2…0bf7 at0047 = ╱ee╱)╱ // 0xbe9 @0x47
0x0ba2…0bf7 at0048 = ╱ec╱,╱ // 0xbea @0x48
0x0ba2…0bf7 at0049 = ╱5a╱Z╱ // 0xbeb @0x49
0x0ba2…0bf7 at004a = ╱ed╱(╱ // 0xbec @0x4a
0x0ba2…0bf7 at004b = ╱48╱H╱ // 0xbed @0x4b
0x0ba2…0bf7 at004c = ╱e2╱+╱ // 0xbee @0x4c
0x0ba2…0bf7 at004d = ╱37╱7╱ // 0xbef @0x4d
0x0ba2…0bf7 at004e = ╱fe0000e003╱ // 0xbf0 @0x4e
0x0ba2…0bf7 at0053 = ╱ee╱)╱ // 0xbf5 @0x53
0x0ba2…0bf7 at0054 = EOL // 0xbf6 @0x54
0x0ba2…0bf7 }
0x0bf7…0c08 995f 0940 EXEC FE(G,E,L7$)
0x0bf7…0c08 LineComalBin {
0x0bf7…0c08 ptr = 0x995f // 0xbf7 @0x0
0x0bf7…0c08 lno = 0x03ac // 0xbf9 @0x2
0x0bf7…0c08 at0004 = ╱9d╱ EXEC ╱ // 0xbfb @0x4
0x0bf7…0c08 at0005 = ╱46╱F╱ // 0xbfc @0x5
0x0bf7…0c08 at0006 = ╱45╱E╱ // 0xbfd @0x6
0x0bf7…0c08 at0007 = ╱ed╱(╱ // 0xbfe @0x7
0x0bf7…0c08 at0008 = ╱47╱G╱ // 0xbff @0x8
0x0bf7…0c08 at0009 = ╱ec╱,╱ // 0xc00 @0x9
0x0bf7…0c08 at000a = ╱45╱E╱ // 0xc01 @0xa
0x0bf7…0c08 at000b = ╱ec╱,╱ // 0xc02 @0xb
0x0bf7…0c08 at000c = ╱4c╱L╱ // 0xc03 @0xc
0x0bf7…0c08 at000d = ╱37╱7╱ // 0xc04 @0xd
0x0bf7…0c08 at000e = ╱ef╱$╱ // 0xc05 @0xe
0x0bf7…0c08 at000f = ╱ee╱)╱ // 0xc06 @0xf
0x0bf7…0c08 at0010 = EOL // 0xc07 @0x10
0x0bf7…0c08 }
0x0c08…0c0f (40,) 9966 0950 NEXT I
0x0c08…0c0f LineComalBin {
0x0c08…0c0f ptr = 0x9966 // 0xc08 @0x0
0x0c08…0c0f lno = 0x03b6 // 0xc0a @0x2
0x0c08…0c0f at0004 = ╱84╱ NEXT ╱ // 0xc0c @0x4
0x0c08…0c0f at0005 = ╱49╱I╱ // 0xc0d @0x5
0x0c08…0c0f at0006 = EOL // 0xc0e @0x6
0x0c08…0c0f }
0x0c0f…0c15 996c 0960 ENDPROC
0x0c0f…0c15 LineComalBin {
0x0c0f…0c15 ptr = 0x996c // 0xc0f @0x0
0x0c0f…0c15 lno = 0x03c0 // 0xc11 @0x2
0x0c0f…0c15 at0004 = ╱9f╱ ENDPROC ╱ // 0xc13 @0x4
0x0c0f…0c15 at0005 = EOL // 0xc14 @0x5
0x0c0f…0c15 }
0x0c15…0c24 997b 0970 PROC NRT(NUM1)
0x0c15…0c24 LineComalBin {
0x0c15…0c24 ptr = 0x997b // 0xc15 @0x0
0x0c15…0c24 lno = 0x03ca // 0xc17 @0x2
0x0c15…0c24 at0004 = ╱9e╱ PROC ╱ // 0xc19 @0x4
0x0c15…0c24 at0005 = ╱4e╱N╱ // 0xc1a @0x5
0x0c15…0c24 at0006 = ╱52╱R╱ // 0xc1b @0x6
0x0c15…0c24 at0007 = ╱54╱T╱ // 0xc1c @0x7
0x0c15…0c24 at0008 = ╱ed╱(╱ // 0xc1d @0x8
0x0c15…0c24 at0009 = ╱4e╱N╱ // 0xc1e @0x9
0x0c15…0c24 at000a = ╱55╱U╱ // 0xc1f @0xa
0x0c15…0c24 at000b = ╱4d╱M╱ // 0xc20 @0xb
0x0c15…0c24 at000c = ╱31╱1╱ // 0xc21 @0xc
0x0c15…0c24 at000d = ╱ee╱)╱ // 0xc22 @0xd
0x0c15…0c24 at000e = EOL // 0xc23 @0xe
0x0c15…0c24 }
0x0c24…0c46 999d 0980 P=B;TEST2=B;KTAL=B;L=LEN(NUM1$)
0x0c24…0c46 LineComalBin {
0x0c24…0c46 ptr = 0x999d // 0xc24 @0x0
0x0c24…0c46 lno = 0x03d4 // 0xc26 @0x2
0x0c24…0c46 at0004 = ╱50╱P╱ // 0xc28 @0x4
0x0c24…0c46 at0005 = ╱dc╱=╱ // 0xc29 @0x5
0x0c24…0c46 at0006 = ╱42╱B╱ // 0xc2a @0x6
0x0c24…0c46 at0007 = ╱eb╱;╱ // 0xc2b @0x7
0x0c24…0c46 at0008 = ╱54╱T╱ // 0xc2c @0x8
0x0c24…0c46 at0009 = ╱45╱E╱ // 0xc2d @0x9
0x0c24…0c46 at000a = ╱53╱S╱ // 0xc2e @0xa
0x0c24…0c46 at000b = ╱54╱T╱ // 0xc2f @0xb
0x0c24…0c46 at000c = ╱32╱2╱ // 0xc30 @0xc
0x0c24…0c46 at000d = ╱dc╱=╱ // 0xc31 @0xd
0x0c24…0c46 at000e = ╱42╱B╱ // 0xc32 @0xe
0x0c24…0c46 at000f = ╱eb╱;╱ // 0xc33 @0xf
0x0c24…0c46 at0010 = ╱4b╱K╱ // 0xc34 @0x10
0x0c24…0c46 at0011 = ╱54╱T╱ // 0xc35 @0x11
0x0c24…0c46 at0012 = ╱41╱A╱ // 0xc36 @0x12
0x0c24…0c46 at0013 = ╱4c╱L╱ // 0xc37 @0x13
0x0c24…0c46 at0014 = ╱dc╱=╱ // 0xc38 @0x14
0x0c24…0c46 at0015 = ╱42╱B╱ // 0xc39 @0x15
0x0c24…0c46 at0016 = ╱eb╱;╱ // 0xc3a @0x16
0x0c24…0c46 at0017 = ╱4c╱L╱ // 0xc3b @0x17
0x0c24…0c46 at0018 = ╱dc╱=╱ // 0xc3c @0x18
0x0c24…0c46 at0019 = ╱cc╱LEN╱ // 0xc3d @0x19
0x0c24…0c46 at001a = ╱ed╱(╱ // 0xc3e @0x1a
0x0c24…0c46 at001b = ╱4e╱N╱ // 0xc3f @0x1b
0x0c24…0c46 at001c = ╱55╱U╱ // 0xc40 @0x1c
0x0c24…0c46 at001d = ╱4d╱M╱ // 0xc41 @0x1d
0x0c24…0c46 at001e = ╱31╱1╱ // 0xc42 @0x1e
0x0c24…0c46 at001f = ╱ef╱$╱ // 0xc43 @0x1f
0x0c24…0c46 at0020 = ╱ee╱)╱ // 0xc44 @0x20
0x0c24…0c46 at0021 = EOL // 0xc45 @0x21
0x0c24…0c46 }
0x0c46…0c56 99ad 0990 IF L>6 THEN EXIT
0x0c46…0c56 LineComalBin {
0x0c46…0c56 ptr = 0x99ad // 0xc46 @0x0
0x0c46…0c56 lno = 0x03de // 0xc48 @0x2
0x0c46…0c56 at0004 = ╱82╱ IF ╱ // 0xc4a @0x4
0x0c46…0c56 at0005 = ╱4c╱L╱ // 0xc4b @0x5
0x0c46…0c56 at0006 = ╱de╱>╱ // 0xc4c @0x6
0x0c46…0c56 at0007 = ╱36╱6╱ // 0xc4d @0x7
0x0c46…0c56 at0008 = ╱fe0000c003╱ // 0xc4e @0x8
0x0c46…0c56 at000d = ╱b6╱ THEN ╱ // 0xc53 @0xd
0x0c46…0c56 at000e = ╱99╱ EXIT ╱ // 0xc54 @0xe
0x0c46…0c56 at000f = EOL // 0xc55 @0xf
0x0c46…0c56 }
0x0c56…0c5f 99b6 1000 CASE L OF
0x0c56…0c5f LineComalBin {
0x0c56…0c5f ptr = 0x99b6 // 0xc56 @0x0
0x0c56…0c5f lno = 0x03e8 // 0xc58 @0x2
0x0c56…0c5f at0004 = ╱a201╱ CASE ╱ // 0xc5a @0x4
0x0c56…0c5f at0006 = ╱4c╱L╱ // 0xc5c @0x6
0x0c56…0c5f at0007 = ╱ba╱ OF ╱ // 0xc5d @0x7
0x0c56…0c5f at0008 = EOL // 0xc5e @0x8
0x0c56…0c5f }
0x0c5f…0c6a 99c1 1010 FOR J=E TO L
0x0c5f…0c6a LineComalBin {
0x0c5f…0c6a ptr = 0x99c1 // 0xc5f @0x0
0x0c5f…0c6a lno = 0x03f2 // 0xc61 @0x2
0x0c5f…0c6a at0004 = ╱83╱ FOR ╱ // 0xc63 @0x4
0x0c5f…0c6a at0005 = ╱4a╱J╱ // 0xc64 @0x5
0x0c5f…0c6a at0006 = ╱dc╱=╱ // 0xc65 @0x6
0x0c5f…0c6a at0007 = ╱45╱E╱ // 0xc66 @0x7
0x0c5f…0c6a at0008 = ╱b7╱ TO ╱ // 0xc67 @0x8
0x0c5f…0c6a at0009 = ╱4c╱L╱ // 0xc68 @0x9
0x0c5f…0c6a at000a = EOL // 0xc69 @0xa
0x0c5f…0c6a }
0x0c6a…0c88 99df 1020 P1=INT(ORD(NUM1$(J))-48)
0x0c6a…0c88 LineComalBin {
0x0c6a…0c88 ptr = 0x99df // 0xc6a @0x0
0x0c6a…0c88 lno = 0x03fc // 0xc6c @0x2
0x0c6a…0c88 at0004 = ╱50╱P╱ // 0xc6e @0x4
0x0c6a…0c88 at0005 = ╱31╱1╱ // 0xc6f @0x5
0x0c6a…0c88 at0006 = ╱dc╱=╱ // 0xc70 @0x6
0x0c6a…0c88 at0007 = ╱c6╱INT╱ // 0xc71 @0x7
0x0c6a…0c88 at0008 = ╱ed╱(╱ // 0xc72 @0x8
0x0c6a…0c88 at0009 = ╱cd╱ORD╱ // 0xc73 @0x9
0x0c6a…0c88 at000a = ╱ed╱(╱ // 0xc74 @0xa
0x0c6a…0c88 at000b = ╱4e╱N╱ // 0xc75 @0xb
0x0c6a…0c88 at000c = ╱55╱U╱ // 0xc76 @0xc
0x0c6a…0c88 at000d = ╱4d╱M╱ // 0xc77 @0xd
0x0c6a…0c88 at000e = ╱31╱1╱ // 0xc78 @0xe
0x0c6a…0c88 at000f = ╱ef╱$╱ // 0xc79 @0xf
0x0c6a…0c88 at0010 = ╱ed╱(╱ // 0xc7a @0x10
0x0c6a…0c88 at0011 = ╱4a╱J╱ // 0xc7b @0x11
0x0c6a…0c88 at0012 = ╱ee╱)╱ // 0xc7c @0x12
0x0c6a…0c88 at0013 = ╱ee╱)╱ // 0xc7d @0x13
0x0c6a…0c88 at0014 = ╱e3╱-╱ // 0xc7e @0x14
0x0c6a…0c88 at0015 = ╱34╱4╱ // 0xc7f @0x15
0x0c6a…0c88 at0016 = ╱38╱8╱ // 0xc80 @0x16
0x0c6a…0c88 at0017 = ╱fe0000c006╱ // 0xc81 @0x17
0x0c6a…0c88 at001c = ╱ee╱)╱ // 0xc86 @0x1c
0x0c6a…0c88 at001d = EOL // 0xc87 @0x1d
0x0c6a…0c88 }
0x0c88…0c98 99ef 1030 IF P1<B OR P1>W THEN
0x0c88…0c98 LineComalBin {
0x0c88…0c98 ptr = 0x99ef // 0xc88 @0x0
0x0c88…0c98 lno = 0x0406 // 0xc8a @0x2
0x0c88…0c98 at0004 = ╱9c╱ IF ╱ // 0xc8c @0x4
0x0c88…0c98 at0005 = ╱50╱P╱ // 0xc8d @0x5
0x0c88…0c98 at0006 = ╱31╱1╱ // 0xc8e @0x6
0x0c88…0c98 at0007 = ╱dd╱<╱ // 0xc8f @0x7
0x0c88…0c98 at0008 = ╱42╱B╱ // 0xc90 @0x8
0x0c88…0c98 at0009 = ╱db╱ OR ╱ // 0xc91 @0x9
0x0c88…0c98 at000a = ╱50╱P╱ // 0xc92 @0xa
0x0c88…0c98 at000b = ╱31╱1╱ // 0xc93 @0xb
0x0c88…0c98 at000c = ╱de╱>╱ // 0xc94 @0xc
0x0c88…0c98 at000d = ╱57╱W╱ // 0xc95 @0xd
0x0c88…0c98 at000e = ╱b6╱ THEN ╱ // 0xc96 @0xe
0x0c88…0c98 at000f = EOL // 0xc97 @0xf
0x0c88…0c98 }
0x0c98…0ca4 99fb 1040 TEST2=E
0x0c98…0ca4 LineComalBin {
0x0c98…0ca4 ptr = 0x99fb // 0xc98 @0x0
0x0c98…0ca4 lno = 0x0410 // 0xc9a @0x2
0x0c98…0ca4 at0004 = ╱54╱T╱ // 0xc9c @0x4
0x0c98…0ca4 at0005 = ╱45╱E╱ // 0xc9d @0x5
0x0c98…0ca4 at0006 = ╱53╱S╱ // 0xc9e @0x6
0x0c98…0ca4 at0007 = ╱54╱T╱ // 0xc9f @0x7
0x0c98…0ca4 at0008 = ╱32╱2╱ // 0xca0 @0x8
0x0c98…0ca4 at0009 = ╱dc╱=╱ // 0xca1 @0x9
0x0c98…0ca4 at000a = ╱45╱E╱ // 0xca2 @0xa
0x0c98…0ca4 at000b = EOL // 0xca3 @0xb
0x0c98…0ca4 }
0x0ca4…0caa 9a01 1050 ELSE
0x0ca4…0caa LineComalBin {
0x0ca4…0caa ptr = 0x9a01 // 0xca4 @0x0
0x0ca4…0caa lno = 0x041a // 0xca6 @0x2
0x0ca4…0caa at0004 = ╱9a╱ ELSE ╱ // 0xca8 @0x4
0x0ca4…0caa at0005 = EOL // 0xca9 @0x5
0x0ca4…0caa }
0x0caa…0cbd 9a14 1060 P=P*10+P1
0x0caa…0cbd LineComalBin {
0x0caa…0cbd ptr = 0x9a14 // 0xcaa @0x0
0x0caa…0cbd lno = 0x0424 // 0xcac @0x2
0x0caa…0cbd at0004 = ╱50╱P╱ // 0xcae @0x4
0x0caa…0cbd at0005 = ╱dc╱=╱ // 0xcaf @0x5
0x0caa…0cbd at0006 = ╱50╱P╱ // 0xcb0 @0x6
0x0caa…0cbd at0007 = ╱e4╱*╱ // 0xcb1 @0x7
0x0caa…0cbd at0008 = ╱31╱1╱ // 0xcb2 @0x8
0x0caa…0cbd at0009 = ╱30╱0╱ // 0xcb3 @0x9
0x0caa…0cbd at000a = ╱fe0000a004╱ // 0xcb4 @0xa
0x0caa…0cbd at000f = ╱e2╱+╱ // 0xcb9 @0xf
0x0caa…0cbd at0010 = ╱50╱P╱ // 0xcba @0x10
0x0caa…0cbd at0011 = ╱31╱1╱ // 0xcbb @0x11
0x0caa…0cbd at0012 = EOL // 0xcbc @0x12
0x0caa…0cbd }
0x0cbd…0cc3 9a1a 1070 ENDIF
0x0cbd…0cc3 LineComalBin {
0x0cbd…0cc3 ptr = 0x9a1a // 0xcbd @0x0
0x0cbd…0cc3 lno = 0x042e // 0xcbf @0x2
0x0cbd…0cc3 at0004 = ╱9b╱ ENDIF ╱ // 0xcc1 @0x4
0x0cbd…0cc3 at0005 = EOL // 0xcc2 @0x5
0x0cbd…0cc3 }
0x0cc3…0cca 9a21 1080 NEXT J
0x0cc3…0cca LineComalBin {
0x0cc3…0cca ptr = 0x9a21 // 0xcc3 @0x0
0x0cc3…0cca lno = 0x0438 // 0xcc5 @0x2
0x0cc3…0cca at0004 = ╱84╱ NEXT ╱ // 0xcc7 @0x4
0x0cc3…0cca at0005 = ╱4a╱J╱ // 0xcc8 @0x5
0x0cc3…0cca at0006 = EOL // 0xcc9 @0x6
0x0cc3…0cca }
0x0cca…0ce0 9a37 1090 KTAL=P DIV 10000
0x0cca…0ce0 LineComalBin {
0x0cca…0ce0 ptr = 0x9a37 // 0xcca @0x0
0x0cca…0ce0 lno = 0x0442 // 0xccc @0x2
0x0cca…0ce0 at0004 = ╱4b╱K╱ // 0xcce @0x4
0x0cca…0ce0 at0005 = ╱54╱T╱ // 0xccf @0x5
0x0cca…0ce0 at0006 = ╱41╱A╱ // 0xcd0 @0x6
0x0cca…0ce0 at0007 = ╱4c╱L╱ // 0xcd1 @0x7
0x0cca…0ce0 at0008 = ╱dc╱=╱ // 0xcd2 @0x8
0x0cca…0ce0 at0009 = ╱50╱P╱ // 0xcd3 @0x9
0x0cca…0ce0 at000a = ╱e7╱ DIV ╱ // 0xcd4 @0xa
0x0cca…0ce0 at000b = ╱31╱1╱ // 0xcd5 @0xb
0x0cca…0ce0 at000c = ╱30╱0╱ // 0xcd6 @0xc
0x0cca…0ce0 at000d = ╱30╱0╱ // 0xcd7 @0xd
0x0cca…0ce0 at000e = ╱30╱0╱ // 0xcd8 @0xe
0x0cca…0ce0 at000f = ╱30╱0╱ // 0xcd9 @0xf
0x0cca…0ce0 at0010 = ╱fe00409c0e╱ // 0xcda @0x10
0x0cca…0ce0 at0015 = EOL // 0xcdf @0x15
0x0cca…0ce0 }
0x0ce0…0ce8 9a3f 1100 WHEN B
0x0ce0…0ce8 LineComalBin {
0x0ce0…0ce8 ptr = 0x9a3f // 0xce0 @0x0
0x0ce0…0ce8 lno = 0x044c // 0xce2 @0x2
0x0ce0…0ce8 at0004 = ╱a301╱ WHEN ╱ // 0xce4 @0x4
0x0ce0…0ce8 at0006 = ╱42╱B╱ // 0xce6 @0x6
0x0ce0…0ce8 at0007 = EOL // 0xce7 @0x7
0x0ce0…0ce8 }
0x0ce8…0cf1 9a48 1110 P=-E
0x0ce8…0cf1 LineComalBin {
0x0ce8…0cf1 ptr = 0x9a48 // 0xce8 @0x0
0x0ce8…0cf1 lno = 0x0456 // 0xcea @0x2
0x0ce8…0cf1 at0004 = ╱50╱P╱ // 0xcec @0x4
0x0ce8…0cf1 at0005 = ╱dc╱=╱ // 0xced @0x5
0x0ce8…0cf1 at0006 = ╱e9╱-╱ // 0xcee @0x6
0x0ce8…0cf1 at0007 = ╱45╱E╱ // 0xcef @0x7
0x0ce8…0cf1 at0008 = EOL // 0xcf0 @0x8
0x0ce8…0cf1 }
0x0cf1…0cf9 9a50 1120 WHEN E
0x0cf1…0cf9 LineComalBin {
0x0cf1…0cf9 ptr = 0x9a50 // 0xcf1 @0x0
0x0cf1…0cf9 lno = 0x0460 // 0xcf3 @0x2
0x0cf1…0cf9 at0004 = ╱a301╱ WHEN ╱ // 0xcf5 @0x4
0x0cf1…0cf9 at0006 = ╱45╱E╱ // 0xcf7 @0x6
0x0cf1…0cf9 at0007 = EOL // 0xcf8 @0x7
0x0cf1…0cf9 }
0x0cf9…0d06 9a5d 1130 CASE NUM1$ OF
0x0cf9…0d06 LineComalBin {
0x0cf9…0d06 ptr = 0x9a5d // 0xcf9 @0x0
0x0cf9…0d06 lno = 0x046a // 0xcfb @0x2
0x0cf9…0d06 at0004 = ╱a200╱ CASE ╱ // 0xcfd @0x4
0x0cf9…0d06 at0006 = ╱4e╱N╱ // 0xcff @0x6
0x0cf9…0d06 at0007 = ╱55╱U╱ // 0xd00 @0x7
0x0cf9…0d06 at0008 = ╱4d╱M╱ // 0xd01 @0x8
0x0cf9…0d06 at0009 = ╱31╱1╱ // 0xd02 @0x9
0x0cf9…0d06 at000a = ╱ef╱$╱ // 0xd03 @0xa
0x0cf9…0d06 at000b = ╱ba╱ OF ╱ // 0xd04 @0xb
0x0cf9…0d06 at000c = EOL // 0xd05 @0xc
0x0cf9…0d06 }
0x0d06…0d20 9a77 1140 P=INT(ORD(NUM1$)-48)
0x0d06…0d20 LineComalBin {
0x0d06…0d20 ptr = 0x9a77 // 0xd06 @0x0
0x0d06…0d20 lno = 0x0474 // 0xd08 @0x2
0x0d06…0d20 at0004 = ╱50╱P╱ // 0xd0a @0x4
0x0d06…0d20 at0005 = ╱dc╱=╱ // 0xd0b @0x5
0x0d06…0d20 at0006 = ╱c6╱INT╱ // 0xd0c @0x6
0x0d06…0d20 at0007 = ╱ed╱(╱ // 0xd0d @0x7
0x0d06…0d20 at0008 = ╱cd╱ORD╱ // 0xd0e @0x8
0x0d06…0d20 at0009 = ╱ed╱(╱ // 0xd0f @0x9
0x0d06…0d20 at000a = ╱4e╱N╱ // 0xd10 @0xa
0x0d06…0d20 at000b = ╱55╱U╱ // 0xd11 @0xb
0x0d06…0d20 at000c = ╱4d╱M╱ // 0xd12 @0xc
0x0d06…0d20 at000d = ╱31╱1╱ // 0xd13 @0xd
0x0d06…0d20 at000e = ╱ef╱$╱ // 0xd14 @0xe
0x0d06…0d20 at000f = ╱ee╱)╱ // 0xd15 @0xf
0x0d06…0d20 at0010 = ╱e3╱-╱ // 0xd16 @0x10
0x0d06…0d20 at0011 = ╱34╱4╱ // 0xd17 @0x11
0x0d06…0d20 at0012 = ╱38╱8╱ // 0xd18 @0x12
0x0d06…0d20 at0013 = ╱fe0000c006╱ // 0xd19 @0x13
0x0d06…0d20 at0018 = ╱ee╱)╱ // 0xd1e @0x18
0x0d06…0d20 at0019 = EOL // 0xd1f @0x19
0x0d06…0d20 }
0x0d20…0d2e 9a85 1150 WHEN "J","j"
0x0d20…0d2e LineComalBin {
0x0d20…0d2e ptr = 0x9a85 // 0xd20 @0x0
0x0d20…0d2e lno = 0x047e // 0xd22 @0x2
0x0d20…0d2e at0004 = ╱a300╱ WHEN ╱ // 0xd24 @0x4
0x0d20…0d2e at0006 = ╱22╱"╱ // 0xd26 @0x6
0x0d20…0d2e at0007 = ╱4a╱J╱ // 0xd27 @0x7
0x0d20…0d2e at0008 = ╱22╱"╱ // 0xd28 @0x8
0x0d20…0d2e at0009 = ╱ec╱,╱ // 0xd29 @0x9
0x0d20…0d2e at000a = ╱22╱"╱ // 0xd2a @0xa
0x0d20…0d2e at000b = ╱6a╱j╱ // 0xd2b @0xb
0x0d20…0d2e at000c = ╱22╱"╱ // 0xd2c @0xc
0x0d20…0d2e at000d = EOL // 0xd2d @0xd
0x0d20…0d2e }
0x0d2e…0d3c 9a93 1160 P=-7
0x0d2e…0d3c LineComalBin {
0x0d2e…0d3c ptr = 0x9a93 // 0xd2e @0x0
0x0d2e…0d3c lno = 0x0488 // 0xd30 @0x2
0x0d2e…0d3c at0004 = ╱50╱P╱ // 0xd32 @0x4
0x0d2e…0d3c at0005 = ╱dc╱=╱ // 0xd33 @0x5
0x0d2e…0d3c at0006 = ╱e9╱-╱ // 0xd34 @0x6
0x0d2e…0d3c at0007 = ╱37╱7╱ // 0xd35 @0x7
0x0d2e…0d3c at0008 = ╱fe0000e003╱ // 0xd36 @0x8
0x0d2e…0d3c at000d = EOL // 0xd3b @0xd
0x0d2e…0d3c }
0x0d3c…0d4a (44,) 9aa1 1170 WHEN "N","n"
0x0d3c…0d4a LineComalBin {
0x0d3c…0d4a ptr = 0x9aa1 // 0xd3c @0x0
0x0d3c…0d4a lno = 0x0492 // 0xd3e @0x2
0x0d3c…0d4a at0004 = ╱a300╱ WHEN ╱ // 0xd40 @0x4
0x0d3c…0d4a at0006 = ╱22╱"╱ // 0xd42 @0x6
0x0d3c…0d4a at0007 = ╱4e╱N╱ // 0xd43 @0x7
0x0d3c…0d4a at0008 = ╱22╱"╱ // 0xd44 @0x8
0x0d3c…0d4a at0009 = ╱ec╱,╱ // 0xd45 @0x9
0x0d3c…0d4a at000a = ╱22╱"╱ // 0xd46 @0xa
0x0d3c…0d4a at000b = ╱6e╱n╱ // 0xd47 @0xb
0x0d3c…0d4a at000c = ╱22╱"╱ // 0xd48 @0xc
0x0d3c…0d4a at000d = EOL // 0xd49 @0xd
0x0d3c…0d4a }
0x0d4a…0d58 9aaf 1180 P=-8
0x0d4a…0d58 LineComalBin {
0x0d4a…0d58 ptr = 0x9aaf // 0xd4a @0x0
0x0d4a…0d58 lno = 0x049c // 0xd4c @0x2
0x0d4a…0d58 at0004 = ╱50╱P╱ // 0xd4e @0x4
0x0d4a…0d58 at0005 = ╱dc╱=╱ // 0xd4f @0x5
0x0d4a…0d58 at0006 = ╱e9╱-╱ // 0xd50 @0x6
0x0d4a…0d58 at0007 = ╱38╱8╱ // 0xd51 @0x7
0x0d4a…0d58 at0008 = ╱fe00008004╱ // 0xd52 @0x8
0x0d4a…0d58 at000d = EOL // 0xd57 @0xd
0x0d4a…0d58 }
0x0d58…0d5e 9ab5 1190 ENDCASE
0x0d58…0d5e LineComalBin {
0x0d58…0d5e ptr = 0x9ab5 // 0xd58 @0x0
0x0d58…0d5e lno = 0x04a6 // 0xd5a @0x2
0x0d58…0d5e at0004 = ╱a4╱ ENDCASE ╱ // 0xd5c @0x4
0x0d58…0d5e at0005 = EOL // 0xd5d @0x5
0x0d58…0d5e }
0x0d5e…0d64 9abb 1200 ENDCASE
0x0d5e…0d64 LineComalBin {
0x0d5e…0d64 ptr = 0x9abb // 0xd5e @0x0
0x0d5e…0d64 lno = 0x04b0 // 0xd60 @0x2
0x0d5e…0d64 at0004 = ╱a4╱ ENDCASE ╱ // 0xd62 @0x4
0x0d5e…0d64 at0005 = EOL // 0xd63 @0x5
0x0d5e…0d64 }
0x0d64…0d6a 9ac1 1210 ENDPROC
0x0d64…0d6a LineComalBin {
0x0d64…0d6a ptr = 0x9ac1 // 0xd64 @0x0
0x0d64…0d6a lno = 0x04ba // 0xd66 @0x2
0x0d64…0d6a at0004 = ╱9f╱ ENDPROC ╱ // 0xd68 @0x4
0x0d64…0d6a at0005 = EOL // 0xd69 @0x5
0x0d64…0d6a }
0x0d6a…0d89 9ae0 1220 PROC TUD(BLB1,UBLB1,TEGN,STØR)
0x0d6a…0d89 LineComalBin {
0x0d6a…0d89 ptr = 0x9ae0 // 0xd6a @0x0
0x0d6a…0d89 lno = 0x04c4 // 0xd6c @0x2
0x0d6a…0d89 at0004 = ╱9e╱ PROC ╱ // 0xd6e @0x4
0x0d6a…0d89 at0005 = ╱54╱T╱ // 0xd6f @0x5
0x0d6a…0d89 at0006 = ╱55╱U╱ // 0xd70 @0x6
0x0d6a…0d89 at0007 = ╱44╱D╱ // 0xd71 @0x7
0x0d6a…0d89 at0008 = ╱ed╱(╱ // 0xd72 @0x8
0x0d6a…0d89 at0009 = ╱42╱B╱ // 0xd73 @0x9
0x0d6a…0d89 at000a = ╱4c╱L╱ // 0xd74 @0xa
0x0d6a…0d89 at000b = ╱42╱B╱ // 0xd75 @0xb
0x0d6a…0d89 at000c = ╱31╱1╱ // 0xd76 @0xc
0x0d6a…0d89 at000d = ╱ec╱,╱ // 0xd77 @0xd
0x0d6a…0d89 at000e = ╱55╱U╱ // 0xd78 @0xe
0x0d6a…0d89 at000f = ╱42╱B╱ // 0xd79 @0xf
0x0d6a…0d89 at0010 = ╱4c╱L╱ // 0xd7a @0x10
0x0d6a…0d89 at0011 = ╱42╱B╱ // 0xd7b @0x11
0x0d6a…0d89 at0012 = ╱31╱1╱ // 0xd7c @0x12
0x0d6a…0d89 at0013 = ╱ec╱,╱ // 0xd7d @0x13
0x0d6a…0d89 at0014 = ╱54╱T╱ // 0xd7e @0x14
0x0d6a…0d89 at0015 = ╱45╱E╱ // 0xd7f @0x15
0x0d6a…0d89 at0016 = ╱47╱G╱ // 0xd80 @0x16
0x0d6a…0d89 at0017 = ╱4e╱N╱ // 0xd81 @0x17
0x0d6a…0d89 at0018 = ╱ec╱,╱ // 0xd82 @0x18
0x0d6a…0d89 at0019 = ╱53╱S╱ // 0xd83 @0x19
0x0d6a…0d89 at001a = ╱54╱T╱ // 0xd84 @0x1a
0x0d6a…0d89 at001b = ╱5c╱Ø╱ // 0xd85 @0x1b
0x0d6a…0d89 at001c = ╱52╱R╱ // 0xd86 @0x1c
0x0d6a…0d89 at001d = ╱ee╱)╱ // 0xd87 @0x1d
0x0d6a…0d89 at001e = EOL // 0xd88 @0x1e
0x0d6a…0d89 }
0x0d89…0d99 (45,) 9af0 1230 BLB2$=BLB1$
0x0d89…0d99 LineComalBin {
0x0d89…0d99 ptr = 0x9af0 // 0xd89 @0x0
0x0d89…0d99 lno = 0x04ce // 0xd8b @0x2
0x0d89…0d99 at0004 = ╱42╱B╱ // 0xd8d @0x4
0x0d89…0d99 at0005 = ╱4c╱L╱ // 0xd8e @0x5
0x0d89…0d99 at0006 = ╱42╱B╱ // 0xd8f @0x6
0x0d89…0d99 at0007 = ╱32╱2╱ // 0xd90 @0x7
0x0d89…0d99 at0008 = ╱ef╱$╱ // 0xd91 @0x8
0x0d89…0d99 at0009 = ╱dc╱=╱ // 0xd92 @0x9
0x0d89…0d99 at000a = ╱42╱B╱ // 0xd93 @0xa
0x0d89…0d99 at000b = ╱4c╱L╱ // 0xd94 @0xb
0x0d89…0d99 at000c = ╱42╱B╱ // 0xd95 @0xc
0x0d89…0d99 at000d = ╱31╱1╱ // 0xd96 @0xd
0x0d89…0d99 at000e = ╱ef╱$╱ // 0xd97 @0xe
0x0d89…0d99 at000f = EOL // 0xd98 @0xf
0x0d89…0d99 }
0x0d99…0dbb 9b12 1240 EXEC CA(5,BLB2$,TAH$,UBLB1$)
0x0d99…0dbb LineComalBin {
0x0d99…0dbb ptr = 0x9b12 // 0xd99 @0x0
0x0d99…0dbb lno = 0x04d8 // 0xd9b @0x2
0x0d99…0dbb at0004 = ╱9d╱ EXEC ╱ // 0xd9d @0x4
0x0d99…0dbb at0005 = ╱43╱C╱ // 0xd9e @0x5
0x0d99…0dbb at0006 = ╱41╱A╱ // 0xd9f @0x6
0x0d99…0dbb at0007 = ╱ed╱(╱ // 0xda0 @0x7
0x0d99…0dbb at0008 = ╱35╱5╱ // 0xda1 @0x8
0x0d99…0dbb at0009 = ╱fe0000a003╱ // 0xda2 @0x9
0x0d99…0dbb at000e = ╱ec╱,╱ // 0xda7 @0xe
0x0d99…0dbb at000f = ╱42╱B╱ // 0xda8 @0xf
0x0d99…0dbb at0010 = ╱4c╱L╱ // 0xda9 @0x10
0x0d99…0dbb at0011 = ╱42╱B╱ // 0xdaa @0x11
0x0d99…0dbb at0012 = ╱32╱2╱ // 0xdab @0x12
0x0d99…0dbb at0013 = ╱ef╱$╱ // 0xdac @0x13
0x0d99…0dbb at0014 = ╱ec╱,╱ // 0xdad @0x14
0x0d99…0dbb at0015 = ╱54╱T╱ // 0xdae @0x15
0x0d99…0dbb at0016 = ╱41╱A╱ // 0xdaf @0x16
0x0d99…0dbb at0017 = ╱48╱H╱ // 0xdb0 @0x17
0x0d99…0dbb at0018 = ╱ef╱$╱ // 0xdb1 @0x18
0x0d99…0dbb at0019 = ╱ec╱,╱ // 0xdb2 @0x19
0x0d99…0dbb at001a = ╱55╱U╱ // 0xdb3 @0x1a
0x0d99…0dbb at001b = ╱42╱B╱ // 0xdb4 @0x1b
0x0d99…0dbb at001c = ╱4c╱L╱ // 0xdb5 @0x1c
0x0d99…0dbb at001d = ╱42╱B╱ // 0xdb6 @0x1d
0x0d99…0dbb at001e = ╱31╱1╱ // 0xdb7 @0x1e
0x0d99…0dbb at001f = ╱ef╱$╱ // 0xdb8 @0x1f
0x0d99…0dbb at0020 = ╱ee╱)╱ // 0xdb9 @0x20
0x0d99…0dbb at0021 = EOL // 0xdba @0x21
0x0d99…0dbb }
0x0dbb…0de0 9b37 1250 IF TEGN=B THEN UBLB1$=UBLB1$(E:13)
0x0dbb…0de0 LineComalBin {
0x0dbb…0de0 ptr = 0x9b37 // 0xdbb @0x0
0x0dbb…0de0 lno = 0x04e2 // 0xdbd @0x2
0x0dbb…0de0 at0004 = ╱82╱ IF ╱ // 0xdbf @0x4
0x0dbb…0de0 at0005 = ╱54╱T╱ // 0xdc0 @0x5
0x0dbb…0de0 at0006 = ╱45╱E╱ // 0xdc1 @0x6
0x0dbb…0de0 at0007 = ╱47╱G╱ // 0xdc2 @0x7
0x0dbb…0de0 at0008 = ╱4e╱N╱ // 0xdc3 @0x8
0x0dbb…0de0 at0009 = ╱dc╱=╱ // 0xdc4 @0x9
0x0dbb…0de0 at000a = ╱42╱B╱ // 0xdc5 @0xa
0x0dbb…0de0 at000b = ╱b6╱ THEN ╱ // 0xdc6 @0xb
0x0dbb…0de0 at000c = ╱55╱U╱ // 0xdc7 @0xc
0x0dbb…0de0 at000d = ╱42╱B╱ // 0xdc8 @0xd
0x0dbb…0de0 at000e = ╱4c╱L╱ // 0xdc9 @0xe
0x0dbb…0de0 at000f = ╱42╱B╱ // 0xdca @0xf
0x0dbb…0de0 at0010 = ╱31╱1╱ // 0xdcb @0x10
0x0dbb…0de0 at0011 = ╱ef╱$╱ // 0xdcc @0x11
0x0dbb…0de0 at0012 = ╱dc╱=╱ // 0xdcd @0x12
0x0dbb…0de0 at0013 = ╱55╱U╱ // 0xdce @0x13
0x0dbb…0de0 at0014 = ╱42╱B╱ // 0xdcf @0x14
0x0dbb…0de0 at0015 = ╱4c╱L╱ // 0xdd0 @0x15
0x0dbb…0de0 at0016 = ╱42╱B╱ // 0xdd1 @0x16
0x0dbb…0de0 at0017 = ╱31╱1╱ // 0xdd2 @0x17
0x0dbb…0de0 at0018 = ╱ef╱$╱ // 0xdd3 @0x18
0x0dbb…0de0 at0019 = ╱ed╱(╱ // 0xdd4 @0x19
0x0dbb…0de0 at001a = ╱45╱E╱ // 0xdd5 @0x1a
0x0dbb…0de0 at001b = ╱f0╱:╱ // 0xdd6 @0x1b
0x0dbb…0de0 at001c = ╱31╱1╱ // 0xdd7 @0x1c
0x0dbb…0de0 at001d = ╱33╱3╱ // 0xdd8 @0x1d
0x0dbb…0de0 at001e = ╱fe0000d004╱ // 0xdd9 @0x1e
0x0dbb…0de0 at0023 = ╱ee╱)╱ // 0xdde @0x23
0x0dbb…0de0 at0024 = EOL // 0xddf @0x24
0x0dbb…0de0 }
0x0de0…0e18 9b6f 1260 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN UBLB1$(LEN(UBLB1$))=" "
0x0de0…0e18 LineComalBin {
0x0de0…0e18 ptr = 0x9b6f // 0xde0 @0x0
0x0de0…0e18 lno = 0x04ec // 0xde2 @0x2
0x0de0…0e18 at0004 = ╱82╱ IF ╱ // 0xde4 @0x4
0x0de0…0e18 at0005 = ╱54╱T╱ // 0xde5 @0x5
0x0de0…0e18 at0006 = ╱45╱E╱ // 0xde6 @0x6
0x0de0…0e18 at0007 = ╱47╱G╱ // 0xde7 @0x7
0x0de0…0e18 at0008 = ╱4e╱N╱ // 0xde8 @0x8
0x0de0…0e18 at0009 = ╱dc╱=╱ // 0xde9 @0x9
0x0de0…0e18 at000a = ╱45╱E╱ // 0xdea @0xa
0x0de0…0e18 at000b = ╱da╱ AND ╱ // 0xdeb @0xb
0x0de0…0e18 at000c = ╱55╱U╱ // 0xdec @0xc
0x0de0…0e18 at000d = ╱42╱B╱ // 0xded @0xd
0x0de0…0e18 at000e = ╱4c╱L╱ // 0xdee @0xe
0x0de0…0e18 at000f = ╱42╱B╱ // 0xdef @0xf
0x0de0…0e18 at0010 = ╱31╱1╱ // 0xdf0 @0x10
0x0de0…0e18 at0011 = ╱ef╱$╱ // 0xdf1 @0x11
0x0de0…0e18 at0012 = ╱ed╱(╱ // 0xdf2 @0x12
0x0de0…0e18 at0013 = ╱cc╱LEN╱ // 0xdf3 @0x13
0x0de0…0e18 at0014 = ╱ed╱(╱ // 0xdf4 @0x14
0x0de0…0e18 at0015 = ╱55╱U╱ // 0xdf5 @0x15
0x0de0…0e18 at0016 = ╱42╱B╱ // 0xdf6 @0x16
0x0de0…0e18 at0017 = ╱4c╱L╱ // 0xdf7 @0x17
0x0de0…0e18 at0018 = ╱42╱B╱ // 0xdf8 @0x18
0x0de0…0e18 at0019 = ╱31╱1╱ // 0xdf9 @0x19
0x0de0…0e18 at001a = ╱ef╱$╱ // 0xdfa @0x1a
0x0de0…0e18 at001b = ╱ee╱)╱ // 0xdfb @0x1b
0x0de0…0e18 at001c = ╱ee╱)╱ // 0xdfc @0x1c
0x0de0…0e18 at001d = ╱dc╱=╱ // 0xdfd @0x1d
0x0de0…0e18 at001e = ╱22╱"╱ // 0xdfe @0x1e
0x0de0…0e18 at001f = ╱2b╱+╱ // 0xdff @0x1f
0x0de0…0e18 at0020 = ╱22╱"╱ // 0xe00 @0x20
0x0de0…0e18 at0021 = ╱b6╱ THEN ╱ // 0xe01 @0x21
0x0de0…0e18 at0022 = ╱55╱U╱ // 0xe02 @0x22
0x0de0…0e18 at0023 = ╱42╱B╱ // 0xe03 @0x23
0x0de0…0e18 at0024 = ╱4c╱L╱ // 0xe04 @0x24
0x0de0…0e18 at0025 = ╱42╱B╱ // 0xe05 @0x25
0x0de0…0e18 at0026 = ╱31╱1╱ // 0xe06 @0x26
0x0de0…0e18 at0027 = ╱ef╱$╱ // 0xe07 @0x27
0x0de0…0e18 at0028 = ╱ed╱(╱ // 0xe08 @0x28
0x0de0…0e18 at0029 = ╱cc╱LEN╱ // 0xe09 @0x29
0x0de0…0e18 at002a = ╱ed╱(╱ // 0xe0a @0x2a
0x0de0…0e18 at002b = ╱55╱U╱ // 0xe0b @0x2b
0x0de0…0e18 at002c = ╱42╱B╱ // 0xe0c @0x2c
0x0de0…0e18 at002d = ╱4c╱L╱ // 0xe0d @0x2d
0x0de0…0e18 at002e = ╱42╱B╱ // 0xe0e @0x2e
0x0de0…0e18 at002f = ╱31╱1╱ // 0xe0f @0x2f
0x0de0…0e18 at0030 = ╱ef╱$╱ // 0xe10 @0x30
0x0de0…0e18 at0031 = ╱ee╱)╱ // 0xe11 @0x31
0x0de0…0e18 at0032 = ╱ee╱)╱ // 0xe12 @0x32
0x0de0…0e18 at0033 = ╱dc╱=╱ // 0xe13 @0x33
0x0de0…0e18 at0034 = ╱22╱"╱ // 0xe14 @0x34
0x0de0…0e18 at0035 = ╱20╱…╱ // 0xe15 @0x35
0x0de0…0e18 at0036 = ╱22╱"╱ // 0xe16 @0x36
0x0de0…0e18 at0037 = EOL // 0xe17 @0x37
0x0de0…0e18 }
0x0e18…0e46 9b9d 1270 IF STØR=E THEN UBLB1$=UBLB1$(4:LEN(UBLB1$)-V)
0x0e18…0e46 LineComalBin {
0x0e18…0e46 ptr = 0x9b9d // 0xe18 @0x0
0x0e18…0e46 lno = 0x04f6 // 0xe1a @0x2
0x0e18…0e46 at0004 = ╱82╱ IF ╱ // 0xe1c @0x4
0x0e18…0e46 at0005 = ╱53╱S╱ // 0xe1d @0x5
0x0e18…0e46 at0006 = ╱54╱T╱ // 0xe1e @0x6
0x0e18…0e46 at0007 = ╱5c╱Ø╱ // 0xe1f @0x7
0x0e18…0e46 at0008 = ╱52╱R╱ // 0xe20 @0x8
0x0e18…0e46 at0009 = ╱dc╱=╱ // 0xe21 @0x9
0x0e18…0e46 at000a = ╱45╱E╱ // 0xe22 @0xa
0x0e18…0e46 at000b = ╱b6╱ THEN ╱ // 0xe23 @0xb
0x0e18…0e46 at000c = ╱55╱U╱ // 0xe24 @0xc
0x0e18…0e46 at000d = ╱42╱B╱ // 0xe25 @0xd
0x0e18…0e46 at000e = ╱4c╱L╱ // 0xe26 @0xe
0x0e18…0e46 at000f = ╱42╱B╱ // 0xe27 @0xf
0x0e18…0e46 at0010 = ╱31╱1╱ // 0xe28 @0x10
0x0e18…0e46 at0011 = ╱ef╱$╱ // 0xe29 @0x11
0x0e18…0e46 at0012 = ╱dc╱=╱ // 0xe2a @0x12
0x0e18…0e46 at0013 = ╱55╱U╱ // 0xe2b @0x13
0x0e18…0e46 at0014 = ╱42╱B╱ // 0xe2c @0x14
0x0e18…0e46 at0015 = ╱4c╱L╱ // 0xe2d @0x15
0x0e18…0e46 at0016 = ╱42╱B╱ // 0xe2e @0x16
0x0e18…0e46 at0017 = ╱31╱1╱ // 0xe2f @0x17
0x0e18…0e46 at0018 = ╱ef╱$╱ // 0xe30 @0x18
0x0e18…0e46 at0019 = ╱ed╱(╱ // 0xe31 @0x19
0x0e18…0e46 at001a = ╱34╱4╱ // 0xe32 @0x1a
0x0e18…0e46 at001b = ╱fe00008003╱ // 0xe33 @0x1b
0x0e18…0e46 at0020 = ╱f0╱:╱ // 0xe38 @0x20
0x0e18…0e46 at0021 = ╱cc╱LEN╱ // 0xe39 @0x21
0x0e18…0e46 at0022 = ╱ed╱(╱ // 0xe3a @0x22
0x0e18…0e46 at0023 = ╱55╱U╱ // 0xe3b @0x23
0x0e18…0e46 at0024 = ╱42╱B╱ // 0xe3c @0x24
0x0e18…0e46 at0025 = ╱4c╱L╱ // 0xe3d @0x25
0x0e18…0e46 at0026 = ╱42╱B╱ // 0xe3e @0x26
0x0e18…0e46 at0027 = ╱31╱1╱ // 0xe3f @0x27
0x0e18…0e46 at0028 = ╱ef╱$╱ // 0xe40 @0x28
0x0e18…0e46 at0029 = ╱ee╱)╱ // 0xe41 @0x29
0x0e18…0e46 at002a = ╱e3╱-╱ // 0xe42 @0x2a
0x0e18…0e46 at002b = ╱56╱V╱ // 0xe43 @0x2b
0x0e18…0e46 at002c = ╱ee╱)╱ // 0xe44 @0x2c
0x0e18…0e46 at002d = EOL // 0xe45 @0x2d
0x0e18…0e46 }
0x0e46…0e52 9ba9 1280 PRINT UBLB1$
0x0e46…0e52 LineComalBin {
0x0e46…0e52 ptr = 0x9ba9 // 0xe46 @0x0
0x0e46…0e52 lno = 0x0500 // 0xe48 @0x2
0x0e46…0e52 at0004 = ╱92╱ PRINT ╱ // 0xe4a @0x4
0x0e46…0e52 at0005 = ╱55╱U╱ // 0xe4b @0x5
0x0e46…0e52 at0006 = ╱42╱B╱ // 0xe4c @0x6
0x0e46…0e52 at0007 = ╱4c╱L╱ // 0xe4d @0x7
0x0e46…0e52 at0008 = ╱42╱B╱ // 0xe4e @0x8
0x0e46…0e52 at0009 = ╱31╱1╱ // 0xe4f @0x9
0x0e46…0e52 at000a = ╱ef╱$╱ // 0xe50 @0xa
0x0e46…0e52 at000b = EOL // 0xe51 @0xb
0x0e46…0e52 }
0x0e52…0e58 9baf 1290 ENDPROC
0x0e52…0e58 LineComalBin {
0x0e52…0e58 ptr = 0x9baf // 0xe52 @0x0
0x0e52…0e58 lno = 0x050a // 0xe54 @0x2
0x0e52…0e58 at0004 = ╱9f╱ ENDPROC ╱ // 0xe56 @0x4
0x0e52…0e58 at0005 = EOL // 0xe57 @0x5
0x0e52…0e58 }
0x0e58…0e60 9bb7 1300 PROC HD
0x0e58…0e60 LineComalBin {
0x0e58…0e60 ptr = 0x9bb7 // 0xe58 @0x0
0x0e58…0e60 lno = 0x0514 // 0xe5a @0x2
0x0e58…0e60 at0004 = ╱9e╱ PROC ╱ // 0xe5c @0x4
0x0e58…0e60 at0005 = ╱48╱H╱ // 0xe5d @0x5
0x0e58…0e60 at0006 = ╱44╱D╱ // 0xe5e @0x6
0x0e58…0e60 at0007 = EOL // 0xe5f @0x7
0x0e58…0e60 }
0x0e60…0e74 9bcb 1310 S=DTAB(DPIL3,G)
0x0e60…0e74 LineComalBin {
0x0e60…0e74 ptr = 0x9bcb // 0xe60 @0x0
0x0e60…0e74 lno = 0x051e // 0xe62 @0x2
0x0e60…0e74 at0004 = ╱53╱S╱ // 0xe64 @0x4
0x0e60…0e74 at0005 = ╱dc╱=╱ // 0xe65 @0x5
0x0e60…0e74 at0006 = ╱44╱D╱ // 0xe66 @0x6
0x0e60…0e74 at0007 = ╱54╱T╱ // 0xe67 @0x7
0x0e60…0e74 at0008 = ╱41╱A╱ // 0xe68 @0x8
0x0e60…0e74 at0009 = ╱42╱B╱ // 0xe69 @0x9
0x0e60…0e74 at000a = ╱ed╱(╱ // 0xe6a @0xa
0x0e60…0e74 at000b = ╱44╱D╱ // 0xe6b @0xb
0x0e60…0e74 at000c = ╱50╱P╱ // 0xe6c @0xc
0x0e60…0e74 at000d = ╱49╱I╱ // 0xe6d @0xd
0x0e60…0e74 at000e = ╱4c╱L╱ // 0xe6e @0xe
0x0e60…0e74 at000f = ╱33╱3╱ // 0xe6f @0xf
0x0e60…0e74 at0010 = ╱ec╱,╱ // 0xe70 @0x10
0x0e60…0e74 at0011 = ╱47╱G╱ // 0xe71 @0x11
0x0e60…0e74 at0012 = ╱ee╱)╱ // 0xe72 @0x12
0x0e60…0e74 at0013 = EOL // 0xe73 @0x13
0x0e60…0e74 }
0x0e74…0e96 9bed 1320 GET K4$,S:DNR,DNAVN$,DSL1$,DKGR$
0x0e74…0e96 LineComalBin {
0x0e74…0e96 ptr = 0x9bed // 0xe74 @0x0
0x0e74…0e96 lno = 0x0528 // 0xe76 @0x2
0x0e74…0e96 at0004 = ╱a9╱ GET ╱ // 0xe78 @0x4
0x0e74…0e96 at0005 = ╱4b╱K╱ // 0xe79 @0x5
0x0e74…0e96 at0006 = ╱34╱4╱ // 0xe7a @0x6
0x0e74…0e96 at0007 = ╱ef╱$╱ // 0xe7b @0x7
0x0e74…0e96 at0008 = ╱ec╱,╱ // 0xe7c @0x8
0x0e74…0e96 at0009 = ╱53╱S╱ // 0xe7d @0x9
0x0e74…0e96 at000a = ╱f0╱:╱ // 0xe7e @0xa
0x0e74…0e96 at000b = ╱44╱D╱ // 0xe7f @0xb
0x0e74…0e96 at000c = ╱4e╱N╱ // 0xe80 @0xc
0x0e74…0e96 at000d = ╱52╱R╱ // 0xe81 @0xd
0x0e74…0e96 at000e = ╱ec╱,╱ // 0xe82 @0xe
0x0e74…0e96 at000f = ╱44╱D╱ // 0xe83 @0xf
0x0e74…0e96 at0010 = ╱4e╱N╱ // 0xe84 @0x10
0x0e74…0e96 at0011 = ╱41╱A╱ // 0xe85 @0x11
0x0e74…0e96 at0012 = ╱56╱V╱ // 0xe86 @0x12
0x0e74…0e96 at0013 = ╱4e╱N╱ // 0xe87 @0x13
0x0e74…0e96 at0014 = ╱ef╱$╱ // 0xe88 @0x14
0x0e74…0e96 at0015 = ╱ec╱,╱ // 0xe89 @0x15
0x0e74…0e96 at0016 = ╱44╱D╱ // 0xe8a @0x16
0x0e74…0e96 at0017 = ╱53╱S╱ // 0xe8b @0x17
0x0e74…0e96 at0018 = ╱4c╱L╱ // 0xe8c @0x18
0x0e74…0e96 at0019 = ╱31╱1╱ // 0xe8d @0x19
0x0e74…0e96 at001a = ╱ef╱$╱ // 0xe8e @0x1a
0x0e74…0e96 at001b = ╱ec╱,╱ // 0xe8f @0x1b
0x0e74…0e96 at001c = ╱44╱D╱ // 0xe90 @0x1c
0x0e74…0e96 at001d = ╱4b╱K╱ // 0xe91 @0x1d
0x0e74…0e96 at001e = ╱47╱G╱ // 0xe92 @0x1e
0x0e74…0e96 at001f = ╱52╱R╱ // 0xe93 @0x1f
0x0e74…0e96 at0020 = ╱ef╱$╱ // 0xe94 @0x20
0x0e74…0e96 at0021 = EOL // 0xe95 @0x21
0x0e74…0e96 }
0x0e96…0eac 9c03 1330 EXEC FE(8,E,K4$)
0x0e96…0eac LineComalBin {
0x0e96…0eac ptr = 0x9c03 // 0xe96 @0x0
0x0e96…0eac lno = 0x0532 // 0xe98 @0x2
0x0e96…0eac at0004 = ╱9d╱ EXEC ╱ // 0xe9a @0x4
0x0e96…0eac at0005 = ╱46╱F╱ // 0xe9b @0x5
0x0e96…0eac at0006 = ╱45╱E╱ // 0xe9c @0x6
0x0e96…0eac at0007 = ╱ed╱(╱ // 0xe9d @0x7
0x0e96…0eac at0008 = ╱38╱8╱ // 0xe9e @0x8
0x0e96…0eac at0009 = ╱fe00008004╱ // 0xe9f @0x9
0x0e96…0eac at000e = ╱ec╱,╱ // 0xea4 @0xe
0x0e96…0eac at000f = ╱45╱E╱ // 0xea5 @0xf
0x0e96…0eac at0010 = ╱ec╱,╱ // 0xea6 @0x10
0x0e96…0eac at0011 = ╱4b╱K╱ // 0xea7 @0x11
0x0e96…0eac at0012 = ╱34╱4╱ // 0xea8 @0x12
0x0e96…0eac at0013 = ╱ef╱$╱ // 0xea9 @0x13
0x0e96…0eac at0014 = ╱ee╱)╱ // 0xeaa @0x14
0x0e96…0eac at0015 = EOL // 0xeab @0x15
0x0e96…0eac }
0x0eac…0ed8 9c2f 1340 GET K4$,S+E:DSL2$,DSL3$,DSL4$,DPOSTNR,DLK$
0x0eac…0ed8 LineComalBin {
0x0eac…0ed8 ptr = 0x9c2f // 0xeac @0x0
0x0eac…0ed8 lno = 0x053c // 0xeae @0x2
0x0eac…0ed8 at0004 = ╱a9╱ GET ╱ // 0xeb0 @0x4
0x0eac…0ed8 at0005 = ╱4b╱K╱ // 0xeb1 @0x5
0x0eac…0ed8 at0006 = ╱34╱4╱ // 0xeb2 @0x6
0x0eac…0ed8 at0007 = ╱ef╱$╱ // 0xeb3 @0x7
0x0eac…0ed8 at0008 = ╱ec╱,╱ // 0xeb4 @0x8
0x0eac…0ed8 at0009 = ╱53╱S╱ // 0xeb5 @0x9
0x0eac…0ed8 at000a = ╱e2╱+╱ // 0xeb6 @0xa
0x0eac…0ed8 at000b = ╱45╱E╱ // 0xeb7 @0xb
0x0eac…0ed8 at000c = ╱f0╱:╱ // 0xeb8 @0xc
0x0eac…0ed8 at000d = ╱44╱D╱ // 0xeb9 @0xd
0x0eac…0ed8 at000e = ╱53╱S╱ // 0xeba @0xe
0x0eac…0ed8 at000f = ╱4c╱L╱ // 0xebb @0xf
0x0eac…0ed8 at0010 = ╱32╱2╱ // 0xebc @0x10
0x0eac…0ed8 at0011 = ╱ef╱$╱ // 0xebd @0x11
0x0eac…0ed8 at0012 = ╱ec╱,╱ // 0xebe @0x12
0x0eac…0ed8 at0013 = ╱44╱D╱ // 0xebf @0x13
0x0eac…0ed8 at0014 = ╱53╱S╱ // 0xec0 @0x14
0x0eac…0ed8 at0015 = ╱4c╱L╱ // 0xec1 @0x15
0x0eac…0ed8 at0016 = ╱33╱3╱ // 0xec2 @0x16
0x0eac…0ed8 at0017 = ╱ef╱$╱ // 0xec3 @0x17
0x0eac…0ed8 at0018 = ╱ec╱,╱ // 0xec4 @0x18
0x0eac…0ed8 at0019 = ╱44╱D╱ // 0xec5 @0x19
0x0eac…0ed8 at001a = ╱53╱S╱ // 0xec6 @0x1a
0x0eac…0ed8 at001b = ╱4c╱L╱ // 0xec7 @0x1b
0x0eac…0ed8 at001c = ╱34╱4╱ // 0xec8 @0x1c
0x0eac…0ed8 at001d = ╱ef╱$╱ // 0xec9 @0x1d
0x0eac…0ed8 at001e = ╱ec╱,╱ // 0xeca @0x1e
0x0eac…0ed8 at001f = ╱44╱D╱ // 0xecb @0x1f
0x0eac…0ed8 at0020 = ╱50╱P╱ // 0xecc @0x20
0x0eac…0ed8 at0021 = ╱4f╱O╱ // 0xecd @0x21
0x0eac…0ed8 at0022 = ╱53╱S╱ // 0xece @0x22
0x0eac…0ed8 at0023 = ╱54╱T╱ // 0xecf @0x23
0x0eac…0ed8 at0024 = ╱4e╱N╱ // 0xed0 @0x24
0x0eac…0ed8 at0025 = ╱52╱R╱ // 0xed1 @0x25
0x0eac…0ed8 at0026 = ╱ec╱,╱ // 0xed2 @0x26
0x0eac…0ed8 at0027 = ╱44╱D╱ // 0xed3 @0x27
0x0eac…0ed8 at0028 = ╱4c╱L╱ // 0xed4 @0x28
0x0eac…0ed8 at0029 = ╱4b╱K╱ // 0xed5 @0x29
0x0eac…0ed8 at002a = ╱ef╱$╱ // 0xed6 @0x2a
0x0eac…0ed8 at002b = EOL // 0xed7 @0x2b
0x0eac…0ed8 }
0x0ed8…0eee 9c45 1350 EXEC FE(8,G,K4$)
0x0ed8…0eee LineComalBin {
0x0ed8…0eee ptr = 0x9c45 // 0xed8 @0x0
0x0ed8…0eee lno = 0x0546 // 0xeda @0x2
0x0ed8…0eee at0004 = ╱9d╱ EXEC ╱ // 0xedc @0x4
0x0ed8…0eee at0005 = ╱46╱F╱ // 0xedd @0x5
0x0ed8…0eee at0006 = ╱45╱E╱ // 0xede @0x6
0x0ed8…0eee at0007 = ╱ed╱(╱ // 0xedf @0x7
0x0ed8…0eee at0008 = ╱38╱8╱ // 0xee0 @0x8
0x0ed8…0eee at0009 = ╱fe00008004╱ // 0xee1 @0x9
0x0ed8…0eee at000e = ╱ec╱,╱ // 0xee6 @0xe
0x0ed8…0eee at000f = ╱47╱G╱ // 0xee7 @0xf
0x0ed8…0eee at0010 = ╱ec╱,╱ // 0xee8 @0x10
0x0ed8…0eee at0011 = ╱4b╱K╱ // 0xee9 @0x11
0x0ed8…0eee at0012 = ╱34╱4╱ // 0xeea @0x12
0x0ed8…0eee at0013 = ╱ef╱$╱ // 0xeeb @0x13
0x0ed8…0eee at0014 = ╱ee╱)╱ // 0xeec @0x14
0x0ed8…0eee at0015 = EOL // 0xeed @0x15
0x0ed8…0eee }
0x0eee…0f15 9c6c 1360 GET K4$,S+G:DGADE$,DTLF$,HPOST,HKUNDE
0x0eee…0f15 LineComalBin {
0x0eee…0f15 ptr = 0x9c6c // 0xeee @0x0
0x0eee…0f15 lno = 0x0550 // 0xef0 @0x2
0x0eee…0f15 at0004 = ╱a9╱ GET ╱ // 0xef2 @0x4
0x0eee…0f15 at0005 = ╱4b╱K╱ // 0xef3 @0x5
0x0eee…0f15 at0006 = ╱34╱4╱ // 0xef4 @0x6
0x0eee…0f15 at0007 = ╱ef╱$╱ // 0xef5 @0x7
0x0eee…0f15 at0008 = ╱ec╱,╱ // 0xef6 @0x8
0x0eee…0f15 at0009 = ╱53╱S╱ // 0xef7 @0x9
0x0eee…0f15 at000a = ╱e2╱+╱ // 0xef8 @0xa
0x0eee…0f15 at000b = ╱47╱G╱ // 0xef9 @0xb
0x0eee…0f15 at000c = ╱f0╱:╱ // 0xefa @0xc
0x0eee…0f15 at000d = ╱44╱D╱ // 0xefb @0xd
0x0eee…0f15 at000e = ╱47╱G╱ // 0xefc @0xe
0x0eee…0f15 at000f = ╱41╱A╱ // 0xefd @0xf
0x0eee…0f15 at0010 = ╱44╱D╱ // 0xefe @0x10
0x0eee…0f15 at0011 = ╱45╱E╱ // 0xeff @0x11
0x0eee…0f15 at0012 = ╱ef╱$╱ // 0xf00 @0x12
0x0eee…0f15 at0013 = ╱ec╱,╱ // 0xf01 @0x13
0x0eee…0f15 at0014 = ╱44╱D╱ // 0xf02 @0x14
0x0eee…0f15 at0015 = ╱54╱T╱ // 0xf03 @0x15
0x0eee…0f15 at0016 = ╱4c╱L╱ // 0xf04 @0x16
0x0eee…0f15 at0017 = ╱46╱F╱ // 0xf05 @0x17
0x0eee…0f15 at0018 = ╱ef╱$╱ // 0xf06 @0x18
0x0eee…0f15 at0019 = ╱ec╱,╱ // 0xf07 @0x19
0x0eee…0f15 at001a = ╱48╱H╱ // 0xf08 @0x1a
0x0eee…0f15 at001b = ╱50╱P╱ // 0xf09 @0x1b
0x0eee…0f15 at001c = ╱4f╱O╱ // 0xf0a @0x1c
0x0eee…0f15 at001d = ╱53╱S╱ // 0xf0b @0x1d
0x0eee…0f15 at001e = ╱54╱T╱ // 0xf0c @0x1e
0x0eee…0f15 at001f = ╱ec╱,╱ // 0xf0d @0x1f
0x0eee…0f15 at0020 = ╱48╱H╱ // 0xf0e @0x20
0x0eee…0f15 at0021 = ╱4b╱K╱ // 0xf0f @0x21
0x0eee…0f15 at0022 = ╱55╱U╱ // 0xf10 @0x22
0x0eee…0f15 at0023 = ╱4e╱N╱ // 0xf11 @0x23
0x0eee…0f15 at0024 = ╱44╱D╱ // 0xf12 @0x24
0x0eee…0f15 at0025 = ╱45╱E╱ // 0xf13 @0x25
0x0eee…0f15 at0026 = EOL // 0xf14 @0x26
0x0eee…0f15 }
0x0f15…0f2b 9c82 1370 EXEC FE(8,V,K4$)
0x0f15…0f2b LineComalBin {
0x0f15…0f2b ptr = 0x9c82 // 0xf15 @0x0
0x0f15…0f2b lno = 0x055a // 0xf17 @0x2
0x0f15…0f2b at0004 = ╱9d╱ EXEC ╱ // 0xf19 @0x4
0x0f15…0f2b at0005 = ╱46╱F╱ // 0xf1a @0x5
0x0f15…0f2b at0006 = ╱45╱E╱ // 0xf1b @0x6
0x0f15…0f2b at0007 = ╱ed╱(╱ // 0xf1c @0x7
0x0f15…0f2b at0008 = ╱38╱8╱ // 0xf1d @0x8
0x0f15…0f2b at0009 = ╱fe00008004╱ // 0xf1e @0x9
0x0f15…0f2b at000e = ╱ec╱,╱ // 0xf23 @0xe
0x0f15…0f2b at000f = ╱56╱V╱ // 0xf24 @0xf
0x0f15…0f2b at0010 = ╱ec╱,╱ // 0xf25 @0x10
0x0f15…0f2b at0011 = ╱4b╱K╱ // 0xf26 @0x11
0x0f15…0f2b at0012 = ╱34╱4╱ // 0xf27 @0x12
0x0f15…0f2b at0013 = ╱ef╱$╱ // 0xf28 @0x13
0x0f15…0f2b at0014 = ╱ee╱)╱ // 0xf29 @0x14
0x0f15…0f2b at0015 = EOL // 0xf2a @0x15
0x0f15…0f2b }
0x0f2b…0f4c 9ca3 1380 GET K4$,S+V:DBY$,ÅRKØB$,MDNKØB$
0x0f2b…0f4c LineComalBin {
0x0f2b…0f4c ptr = 0x9ca3 // 0xf2b @0x0
0x0f2b…0f4c lno = 0x0564 // 0xf2d @0x2
0x0f2b…0f4c at0004 = ╱a9╱ GET ╱ // 0xf2f @0x4
0x0f2b…0f4c at0005 = ╱4b╱K╱ // 0xf30 @0x5
0x0f2b…0f4c at0006 = ╱34╱4╱ // 0xf31 @0x6
0x0f2b…0f4c at0007 = ╱ef╱$╱ // 0xf32 @0x7
0x0f2b…0f4c at0008 = ╱ec╱,╱ // 0xf33 @0x8
0x0f2b…0f4c at0009 = ╱53╱S╱ // 0xf34 @0x9
0x0f2b…0f4c at000a = ╱e2╱+╱ // 0xf35 @0xa
0x0f2b…0f4c at000b = ╱56╱V╱ // 0xf36 @0xb
0x0f2b…0f4c at000c = ╱f0╱:╱ // 0xf37 @0xc
0x0f2b…0f4c at000d = ╱44╱D╱ // 0xf38 @0xd
0x0f2b…0f4c at000e = ╱42╱B╱ // 0xf39 @0xe
0x0f2b…0f4c at000f = ╱59╱Y╱ // 0xf3a @0xf
0x0f2b…0f4c at0010 = ╱ef╱$╱ // 0xf3b @0x10
0x0f2b…0f4c at0011 = ╱ec╱,╱ // 0xf3c @0x11
0x0f2b…0f4c at0012 = ╱5d╱Å╱ // 0xf3d @0x12
0x0f2b…0f4c at0013 = ╱52╱R╱ // 0xf3e @0x13
0x0f2b…0f4c at0014 = ╱4b╱K╱ // 0xf3f @0x14
0x0f2b…0f4c at0015 = ╱5c╱Ø╱ // 0xf40 @0x15
0x0f2b…0f4c at0016 = ╱42╱B╱ // 0xf41 @0x16
0x0f2b…0f4c at0017 = ╱ef╱$╱ // 0xf42 @0x17
0x0f2b…0f4c at0018 = ╱ec╱,╱ // 0xf43 @0x18
0x0f2b…0f4c at0019 = ╱4d╱M╱ // 0xf44 @0x19
0x0f2b…0f4c at001a = ╱44╱D╱ // 0xf45 @0x1a
0x0f2b…0f4c at001b = ╱4e╱N╱ // 0xf46 @0x1b
0x0f2b…0f4c at001c = ╱4b╱K╱ // 0xf47 @0x1c
0x0f2b…0f4c at001d = ╱5c╱Ø╱ // 0xf48 @0x1d
0x0f2b…0f4c at001e = ╱42╱B╱ // 0xf49 @0x1e
0x0f2b…0f4c at001f = ╱ef╱$╱ // 0xf4a @0x1f
0x0f2b…0f4c at0020 = EOL // 0xf4b @0x20
0x0f2b…0f4c }
0x0f4c…0f67 9cbe 1390 EXEC FE(8,4,K4$)
0x0f4c…0f67 LineComalBin {
0x0f4c…0f67 ptr = 0x9cbe // 0xf4c @0x0
0x0f4c…0f67 lno = 0x056e // 0xf4e @0x2
0x0f4c…0f67 at0004 = ╱9d╱ EXEC ╱ // 0xf50 @0x4
0x0f4c…0f67 at0005 = ╱46╱F╱ // 0xf51 @0x5
0x0f4c…0f67 at0006 = ╱45╱E╱ // 0xf52 @0x6
0x0f4c…0f67 at0007 = ╱ed╱(╱ // 0xf53 @0x7
0x0f4c…0f67 at0008 = ╱38╱8╱ // 0xf54 @0x8
0x0f4c…0f67 at0009 = ╱fe00008004╱ // 0xf55 @0x9
0x0f4c…0f67 at000e = ╱ec╱,╱ // 0xf5a @0xe
0x0f4c…0f67 at000f = ╱34╱4╱ // 0xf5b @0xf
0x0f4c…0f67 at0010 = ╱fe00008003╱ // 0xf5c @0x10
0x0f4c…0f67 at0015 = ╱ec╱,╱ // 0xf61 @0x15
0x0f4c…0f67 at0016 = ╱4b╱K╱ // 0xf62 @0x16
0x0f4c…0f67 at0017 = ╱34╱4╱ // 0xf63 @0x17
0x0f4c…0f67 at0018 = ╱ef╱$╱ // 0xf64 @0x18
0x0f4c…0f67 at0019 = ╱ee╱)╱ // 0xf65 @0x19
0x0f4c…0f67 at001a = EOL // 0xf66 @0x1a
0x0f4c…0f67 }
0x0f67…0f6d 9cc4 1400 ENDPROC
0x0f67…0f6d LineComalBin {
0x0f67…0f6d ptr = 0x9cc4 // 0xf67 @0x0
0x0f67…0f6d lno = 0x0578 // 0xf69 @0x2
0x0f67…0f6d at0004 = ╱9f╱ ENDPROC ╱ // 0xf6b @0x4
0x0f67…0f6d at0005 = EOL // 0xf6c @0x5
0x0f67…0f6d }
0x0f6d…0f75 9ccc 1410 PROC HV
0x0f6d…0f75 LineComalBin {
0x0f6d…0f75 ptr = 0x9ccc // 0xf6d @0x0
0x0f6d…0f75 lno = 0x0582 // 0xf6f @0x2
0x0f6d…0f75 at0004 = ╱9e╱ PROC ╱ // 0xf71 @0x4
0x0f6d…0f75 at0005 = ╱48╱H╱ // 0xf72 @0x5
0x0f6d…0f75 at0006 = ╱56╱V╱ // 0xf73 @0x6
0x0f6d…0f75 at0007 = EOL // 0xf74 @0x7
0x0f6d…0f75 }
0x0f75…0f89 9ce0 1420 S=VTAB(VPIL3,G)
0x0f75…0f89 LineComalBin {
0x0f75…0f89 ptr = 0x9ce0 // 0xf75 @0x0
0x0f75…0f89 lno = 0x058c // 0xf77 @0x2
0x0f75…0f89 at0004 = ╱53╱S╱ // 0xf79 @0x4
0x0f75…0f89 at0005 = ╱dc╱=╱ // 0xf7a @0x5
0x0f75…0f89 at0006 = ╱56╱V╱ // 0xf7b @0x6
0x0f75…0f89 at0007 = ╱54╱T╱ // 0xf7c @0x7
0x0f75…0f89 at0008 = ╱41╱A╱ // 0xf7d @0x8
0x0f75…0f89 at0009 = ╱42╱B╱ // 0xf7e @0x9
0x0f75…0f89 at000a = ╱ed╱(╱ // 0xf7f @0xa
0x0f75…0f89 at000b = ╱56╱V╱ // 0xf80 @0xb
0x0f75…0f89 at000c = ╱50╱P╱ // 0xf81 @0xc
0x0f75…0f89 at000d = ╱49╱I╱ // 0xf82 @0xd
0x0f75…0f89 at000e = ╱4c╱L╱ // 0xf83 @0xe
0x0f75…0f89 at000f = ╱33╱3╱ // 0xf84 @0xf
0x0f75…0f89 at0010 = ╱ec╱,╱ // 0xf85 @0x10
0x0f75…0f89 at0011 = ╱47╱G╱ // 0xf86 @0x11
0x0f75…0f89 at0012 = ╱ee╱)╱ // 0xf87 @0x12
0x0f75…0f89 at0013 = EOL // 0xf88 @0x13
0x0f75…0f89 }
0x0f89…0fb3 9d0a 1430 GET K5$,S:VARENR,VARTEKST$,VPRI$,VARKONT
0x0f89…0fb3 LineComalBin {
0x0f89…0fb3 ptr = 0x9d0a // 0xf89 @0x0
0x0f89…0fb3 lno = 0x0596 // 0xf8b @0x2
0x0f89…0fb3 at0004 = ╱a9╱ GET ╱ // 0xf8d @0x4
0x0f89…0fb3 at0005 = ╱4b╱K╱ // 0xf8e @0x5
0x0f89…0fb3 at0006 = ╱35╱5╱ // 0xf8f @0x6
0x0f89…0fb3 at0007 = ╱ef╱$╱ // 0xf90 @0x7
0x0f89…0fb3 at0008 = ╱ec╱,╱ // 0xf91 @0x8
0x0f89…0fb3 at0009 = ╱53╱S╱ // 0xf92 @0x9
0x0f89…0fb3 at000a = ╱f0╱:╱ // 0xf93 @0xa
0x0f89…0fb3 at000b = ╱56╱V╱ // 0xf94 @0xb
0x0f89…0fb3 at000c = ╱41╱A╱ // 0xf95 @0xc
0x0f89…0fb3 at000d = ╱52╱R╱ // 0xf96 @0xd
0x0f89…0fb3 at000e = ╱45╱E╱ // 0xf97 @0xe
0x0f89…0fb3 at000f = ╱4e╱N╱ // 0xf98 @0xf
0x0f89…0fb3 at0010 = ╱52╱R╱ // 0xf99 @0x10
0x0f89…0fb3 at0011 = ╱ec╱,╱ // 0xf9a @0x11
0x0f89…0fb3 at0012 = ╱56╱V╱ // 0xf9b @0x12
0x0f89…0fb3 at0013 = ╱41╱A╱ // 0xf9c @0x13
0x0f89…0fb3 at0014 = ╱52╱R╱ // 0xf9d @0x14
0x0f89…0fb3 at0015 = ╱54╱T╱ // 0xf9e @0x15
0x0f89…0fb3 at0016 = ╱45╱E╱ // 0xf9f @0x16
0x0f89…0fb3 at0017 = ╱4b╱K╱ // 0xfa0 @0x17
0x0f89…0fb3 at0018 = ╱53╱S╱ // 0xfa1 @0x18
0x0f89…0fb3 at0019 = ╱54╱T╱ // 0xfa2 @0x19
0x0f89…0fb3 at001a = ╱ef╱$╱ // 0xfa3 @0x1a
0x0f89…0fb3 at001b = ╱ec╱,╱ // 0xfa4 @0x1b
0x0f89…0fb3 at001c = ╱56╱V╱ // 0xfa5 @0x1c
0x0f89…0fb3 at001d = ╱50╱P╱ // 0xfa6 @0x1d
0x0f89…0fb3 at001e = ╱52╱R╱ // 0xfa7 @0x1e
0x0f89…0fb3 at001f = ╱49╱I╱ // 0xfa8 @0x1f
0x0f89…0fb3 at0020 = ╱ef╱$╱ // 0xfa9 @0x20
0x0f89…0fb3 at0021 = ╱ec╱,╱ // 0xfaa @0x21
0x0f89…0fb3 at0022 = ╱56╱V╱ // 0xfab @0x22
0x0f89…0fb3 at0023 = ╱41╱A╱ // 0xfac @0x23
0x0f89…0fb3 at0024 = ╱52╱R╱ // 0xfad @0x24
0x0f89…0fb3 at0025 = ╱4b╱K╱ // 0xfae @0x25
0x0f89…0fb3 at0026 = ╱4f╱O╱ // 0xfaf @0x26
0x0f89…0fb3 at0027 = ╱4e╱N╱ // 0xfb0 @0x27
0x0f89…0fb3 at0028 = ╱54╱T╱ // 0xfb1 @0x28
0x0f89…0fb3 at0029 = EOL // 0xfb2 @0x29
0x0f89…0fb3 }
0x0fb3…0fc4 9d1b 1440 EXEC FE(V,E,K5$)
0x0fb3…0fc4 LineComalBin {
0x0fb3…0fc4 ptr = 0x9d1b // 0xfb3 @0x0
0x0fb3…0fc4 lno = 0x05a0 // 0xfb5 @0x2
0x0fb3…0fc4 at0004 = ╱9d╱ EXEC ╱ // 0xfb7 @0x4
0x0fb3…0fc4 at0005 = ╱46╱F╱ // 0xfb8 @0x5
0x0fb3…0fc4 at0006 = ╱45╱E╱ // 0xfb9 @0x6
0x0fb3…0fc4 at0007 = ╱ed╱(╱ // 0xfba @0x7
0x0fb3…0fc4 at0008 = ╱56╱V╱ // 0xfbb @0x8
0x0fb3…0fc4 at0009 = ╱ec╱,╱ // 0xfbc @0x9
0x0fb3…0fc4 at000a = ╱45╱E╱ // 0xfbd @0xa
0x0fb3…0fc4 at000b = ╱ec╱,╱ // 0xfbe @0xb
0x0fb3…0fc4 at000c = ╱4b╱K╱ // 0xfbf @0xc
0x0fb3…0fc4 at000d = ╱35╱5╱ // 0xfc0 @0xd
0x0fb3…0fc4 at000e = ╱ef╱$╱ // 0xfc1 @0xe
0x0fb3…0fc4 at000f = ╱ee╱)╱ // 0xfc2 @0xf
0x0fb3…0fc4 at0010 = EOL // 0xfc3 @0x10
0x0fb3…0fc4 }
0x0fc4…0fca 9d21 1450 ENDPROC
0x0fc4…0fca LineComalBin {
0x0fc4…0fca ptr = 0x9d21 // 0xfc4 @0x0
0x0fc4…0fca lno = 0x05aa // 0xfc6 @0x2
0x0fc4…0fca at0004 = ╱9f╱ ENDPROC ╱ // 0xfc8 @0x4
0x0fc4…0fca at0005 = EOL // 0xfc9 @0x5
0x0fc4…0fca }
0x0fca…0fdb 9d32 1460 PROC KUNDEUD(HO)
0x0fca…0fdb LineComalBin {
0x0fca…0fdb ptr = 0x9d32 // 0xfca @0x0
0x0fca…0fdb lno = 0x05b4 // 0xfcc @0x2
0x0fca…0fdb at0004 = ╱9e╱ PROC ╱ // 0xfce @0x4
0x0fca…0fdb at0005 = ╱4b╱K╱ // 0xfcf @0x5
0x0fca…0fdb at0006 = ╱55╱U╱ // 0xfd0 @0x6
0x0fca…0fdb at0007 = ╱4e╱N╱ // 0xfd1 @0x7
0x0fca…0fdb at0008 = ╱44╱D╱ // 0xfd2 @0x8
0x0fca…0fdb at0009 = ╱45╱E╱ // 0xfd3 @0x9
0x0fca…0fdb at000a = ╱55╱U╱ // 0xfd4 @0xa
0x0fca…0fdb at000b = ╱44╱D╱ // 0xfd5 @0xb
0x0fca…0fdb at000c = ╱ed╱(╱ // 0xfd6 @0xc
0x0fca…0fdb at000d = ╱48╱H╱ // 0xfd7 @0xd
0x0fca…0fdb at000e = ╱4f╱O╱ // 0xfd8 @0xe
0x0fca…0fdb at000f = ╱ee╱)╱ // 0xfd9 @0xf
0x0fca…0fdb at0010 = EOL // 0xfda @0x10
0x0fca…0fdb }
0x0fdb…0fe9 9d40 1470 CURSOR W,5
0x0fdb…0fe9 LineComalBin {
0x0fdb…0fe9 ptr = 0x9d40 // 0xfdb @0x0
0x0fdb…0fe9 lno = 0x05be // 0xfdd @0x2
0x0fdb…0fe9 at0004 = ╱a1╱ CURSOR ╱ // 0xfdf @0x4
0x0fdb…0fe9 at0005 = ╱57╱W╱ // 0xfe0 @0x5
0x0fdb…0fe9 at0006 = ╱ec╱,╱ // 0xfe1 @0x6
0x0fdb…0fe9 at0007 = ╱35╱5╱ // 0xfe2 @0x7
0x0fdb…0fe9 at0008 = ╱fe0000a003╱ // 0xfe3 @0x8
0x0fdb…0fe9 at000d = EOL // 0xfe8 @0xd
0x0fdb…0fe9 }
0x0fe9…0ff5 9d4c 1480 PRINT DNAVN$
0x0fe9…0ff5 LineComalBin {
0x0fe9…0ff5 ptr = 0x9d4c // 0xfe9 @0x0
0x0fe9…0ff5 lno = 0x05c8 // 0xfeb @0x2
0x0fe9…0ff5 at0004 = ╱92╱ PRINT ╱ // 0xfed @0x4
0x0fe9…0ff5 at0005 = ╱44╱D╱ // 0xfee @0x5
0x0fe9…0ff5 at0006 = ╱4e╱N╱ // 0xfef @0x6
0x0fe9…0ff5 at0007 = ╱41╱A╱ // 0xff0 @0x7
0x0fe9…0ff5 at0008 = ╱56╱V╱ // 0xff1 @0x8
0x0fe9…0ff5 at0009 = ╱4e╱N╱ // 0xff2 @0x9
0x0fe9…0ff5 at000a = ╱ef╱$╱ // 0xff3 @0xa
0x0fe9…0ff5 at000b = EOL // 0xff4 @0xb
0x0fe9…0ff5 }
0x0ff5…1003 9d5a 1490 CURSOR W,6
0x0ff5…1003 LineComalBin {
0x0ff5…1003 ptr = 0x9d5a // 0xff5 @0x0
0x0ff5…1003 lno = 0x05d2 // 0xff7 @0x2
0x0ff5…1003 at0004 = ╱a1╱ CURSOR ╱ // 0xff9 @0x4
0x0ff5…1003 at0005 = ╱57╱W╱ // 0xffa @0x5
0x0ff5…1003 at0006 = ╱ec╱,╱ // 0xffb @0x6
0x0ff5…1003 at0007 = ╱36╱6╱ // 0xffc @0x7
0x0ff5…1003 at0008 = ╱fe0000c003╱ // 0xffd @0x8
0x0ff5…1003 at000d = EOL // 0x1002 @0xd
0x0ff5…1003 }
0x1003…100f 9d66 1500 PRINT DGADE$
0x1003…100f LineComalBin {
0x1003…100f ptr = 0x9d66 // 0x1003 @0x0
0x1003…100f lno = 0x05dc // 0x1005 @0x2
0x1003…100f at0004 = ╱92╱ PRINT ╱ // 0x1007 @0x4
0x1003…100f at0005 = ╱44╱D╱ // 0x1008 @0x5
0x1003…100f at0006 = ╱47╱G╱ // 0x1009 @0x6
0x1003…100f at0007 = ╱41╱A╱ // 0x100a @0x7
0x1003…100f at0008 = ╱44╱D╱ // 0x100b @0x8
0x1003…100f at0009 = ╱45╱E╱ // 0x100c @0x9
0x1003…100f at000a = ╱ef╱$╱ // 0x100d @0xa
0x1003…100f at000b = EOL // 0x100e @0xb
0x1003…100f }
0x100f…1022 9d79 1510 CURSOR 6,7
0x100f…1022 LineComalBin {
0x100f…1022 ptr = 0x9d79 // 0x100f @0x0
0x100f…1022 lno = 0x05e6 // 0x1011 @0x2
0x100f…1022 at0004 = ╱a1╱ CURSOR ╱ // 0x1013 @0x4
0x100f…1022 at0005 = ╱36╱6╱ // 0x1014 @0x5
0x100f…1022 at0006 = ╱fe0000c003╱ // 0x1015 @0x6
0x100f…1022 at000b = ╱ec╱,╱ // 0x101a @0xb
0x100f…1022 at000c = ╱37╱7╱ // 0x101b @0xc
0x100f…1022 at000d = ╱fe0000e003╱ // 0x101c @0xd
0x100f…1022 at0012 = EOL // 0x1021 @0x12
0x100f…1022 }
0x1022…103a 9d91 1520 PRINT USING "#######":DPOSTNR
0x1022…103a LineComalBin {
0x1022…103a ptr = 0x9d91 // 0x1022 @0x0
0x1022…103a lno = 0x05f0 // 0x1024 @0x2
0x1022…103a at0004 = ╱92╱ PRINT ╱ // 0x1026 @0x4
0x1022…103a at0005 = ╱b9╱ USING ╱ // 0x1027 @0x5
0x1022…103a at0006 = ╱22╱"╱ // 0x1028 @0x6
0x1022…103a at0007 = ╱23╱#╱ // 0x1029 @0x7
0x1022…103a at0008 = ╱23╱#╱ // 0x102a @0x8
0x1022…103a at0009 = ╱23╱#╱ // 0x102b @0x9
0x1022…103a at000a = ╱23╱#╱ // 0x102c @0xa
0x1022…103a at000b = ╱23╱#╱ // 0x102d @0xb
0x1022…103a at000c = ╱23╱#╱ // 0x102e @0xc
0x1022…103a at000d = ╱23╱#╱ // 0x102f @0xd
0x1022…103a at000e = ╱22╱"╱ // 0x1030 @0xe
0x1022…103a at000f = ╱f0╱:╱ // 0x1031 @0xf
0x1022…103a at0010 = ╱44╱D╱ // 0x1032 @0x10
0x1022…103a at0011 = ╱50╱P╱ // 0x1033 @0x11
0x1022…103a at0012 = ╱4f╱O╱ // 0x1034 @0x12
0x1022…103a at0013 = ╱53╱S╱ // 0x1035 @0x13
0x1022…103a at0014 = ╱54╱T╱ // 0x1036 @0x14
0x1022…103a at0015 = ╱4e╱N╱ // 0x1037 @0x15
0x1022…103a at0016 = ╱52╱R╱ // 0x1038 @0x16
0x1022…103a at0017 = EOL // 0x1039 @0x17
0x1022…103a }
0x103a…104e 9da5 1530 CURSOR 14,7
0x103a…104e LineComalBin {
0x103a…104e ptr = 0x9da5 // 0x103a @0x0
0x103a…104e lno = 0x05fa // 0x103c @0x2
0x103a…104e at0004 = ╱a1╱ CURSOR ╱ // 0x103e @0x4
0x103a…104e at0005 = ╱31╱1╱ // 0x103f @0x5
0x103a…104e at0006 = ╱34╱4╱ // 0x1040 @0x6
0x103a…104e at0007 = ╱fe0000e004╱ // 0x1041 @0x7
0x103a…104e at000c = ╱ec╱,╱ // 0x1046 @0xc
0x103a…104e at000d = ╱37╱7╱ // 0x1047 @0xd
0x103a…104e at000e = ╱fe0000e003╱ // 0x1048 @0xe
0x103a…104e at0013 = EOL // 0x104d @0x13
0x103a…104e }
0x104e…1058 9daf 1540 PRINT DBY$
0x104e…1058 LineComalBin {
0x104e…1058 ptr = 0x9daf // 0x104e @0x0
0x104e…1058 lno = 0x0604 // 0x1050 @0x2
0x104e…1058 at0004 = ╱92╱ PRINT ╱ // 0x1052 @0x4
0x104e…1058 at0005 = ╱44╱D╱ // 0x1053 @0x5
0x104e…1058 at0006 = ╱42╱B╱ // 0x1054 @0x6
0x104e…1058 at0007 = ╱59╱Y╱ // 0x1055 @0x7
0x104e…1058 at0008 = ╱ef╱$╱ // 0x1056 @0x8
0x104e…1058 at0009 = EOL // 0x1057 @0x9
0x104e…1058 }
0x1058…1063 9dba 1550 IF HO=E THEN
0x1058…1063 LineComalBin {
0x1058…1063 ptr = 0x9dba // 0x1058 @0x0
0x1058…1063 lno = 0x060e // 0x105a @0x2
0x1058…1063 at0004 = ╱9c╱ IF ╱ // 0x105c @0x4
0x1058…1063 at0005 = ╱48╱H╱ // 0x105d @0x5
0x1058…1063 at0006 = ╱4f╱O╱ // 0x105e @0x6
0x1058…1063 at0007 = ╱dc╱=╱ // 0x105f @0x7
0x1058…1063 at0008 = ╱45╱E╱ // 0x1060 @0x8
0x1058…1063 at0009 = ╱b6╱ THEN ╱ // 0x1061 @0x9
0x1058…1063 at000a = EOL // 0x1062 @0xa
0x1058…1063 }
0x1063…107f 9dd6 1560 EXEC CA(B,DSL1$,DSL2$,SLD$)
0x1063…107f LineComalBin {
0x1063…107f ptr = 0x9dd6 // 0x1063 @0x0
0x1063…107f lno = 0x0618 // 0x1065 @0x2
0x1063…107f at0004 = ╱9d╱ EXEC ╱ // 0x1067 @0x4
0x1063…107f at0005 = ╱43╱C╱ // 0x1068 @0x5
0x1063…107f at0006 = ╱41╱A╱ // 0x1069 @0x6
0x1063…107f at0007 = ╱ed╱(╱ // 0x106a @0x7
0x1063…107f at0008 = ╱42╱B╱ // 0x106b @0x8
0x1063…107f at0009 = ╱ec╱,╱ // 0x106c @0x9
0x1063…107f at000a = ╱44╱D╱ // 0x106d @0xa
0x1063…107f at000b = ╱53╱S╱ // 0x106e @0xb
0x1063…107f at000c = ╱4c╱L╱ // 0x106f @0xc
0x1063…107f at000d = ╱31╱1╱ // 0x1070 @0xd
0x1063…107f at000e = ╱ef╱$╱ // 0x1071 @0xe
0x1063…107f at000f = ╱ec╱,╱ // 0x1072 @0xf
0x1063…107f at0010 = ╱44╱D╱ // 0x1073 @0x10
0x1063…107f at0011 = ╱53╱S╱ // 0x1074 @0x11
0x1063…107f at0012 = ╱4c╱L╱ // 0x1075 @0x12
0x1063…107f at0013 = ╱32╱2╱ // 0x1076 @0x13
0x1063…107f at0014 = ╱ef╱$╱ // 0x1077 @0x14
0x1063…107f at0015 = ╱ec╱,╱ // 0x1078 @0x15
0x1063…107f at0016 = ╱53╱S╱ // 0x1079 @0x16
0x1063…107f at0017 = ╱4c╱L╱ // 0x107a @0x17
0x1063…107f at0018 = ╱44╱D╱ // 0x107b @0x18
0x1063…107f at0019 = ╱ef╱$╱ // 0x107c @0x19
0x1063…107f at001a = ╱ee╱)╱ // 0x107d @0x1a
0x1063…107f at001b = EOL // 0x107e @0x1b
0x1063…107f }
0x107f…109a 9df1 1570 EXEC CA(B,SLD$,DSL3$,SLD$)
0x107f…109a LineComalBin {
0x107f…109a ptr = 0x9df1 // 0x107f @0x0
0x107f…109a lno = 0x0622 // 0x1081 @0x2
0x107f…109a at0004 = ╱9d╱ EXEC ╱ // 0x1083 @0x4
0x107f…109a at0005 = ╱43╱C╱ // 0x1084 @0x5
0x107f…109a at0006 = ╱41╱A╱ // 0x1085 @0x6
0x107f…109a at0007 = ╱ed╱(╱ // 0x1086 @0x7
0x107f…109a at0008 = ╱42╱B╱ // 0x1087 @0x8
0x107f…109a at0009 = ╱ec╱,╱ // 0x1088 @0x9
0x107f…109a at000a = ╱53╱S╱ // 0x1089 @0xa
0x107f…109a at000b = ╱4c╱L╱ // 0x108a @0xb
0x107f…109a at000c = ╱44╱D╱ // 0x108b @0xc
0x107f…109a at000d = ╱ef╱$╱ // 0x108c @0xd
0x107f…109a at000e = ╱ec╱,╱ // 0x108d @0xe
0x107f…109a at000f = ╱44╱D╱ // 0x108e @0xf
0x107f…109a at0010 = ╱53╱S╱ // 0x108f @0x10
0x107f…109a at0011 = ╱4c╱L╱ // 0x1090 @0x11
0x107f…109a at0012 = ╱33╱3╱ // 0x1091 @0x12
0x107f…109a at0013 = ╱ef╱$╱ // 0x1092 @0x13
0x107f…109a at0014 = ╱ec╱,╱ // 0x1093 @0x14
0x107f…109a at0015 = ╱53╱S╱ // 0x1094 @0x15
0x107f…109a at0016 = ╱4c╱L╱ // 0x1095 @0x16
0x107f…109a at0017 = ╱44╱D╱ // 0x1096 @0x17
0x107f…109a at0018 = ╱ef╱$╱ // 0x1097 @0x18
0x107f…109a at0019 = ╱ee╱)╱ // 0x1098 @0x19
0x107f…109a at001a = EOL // 0x1099 @0x1a
0x107f…109a }
0x109a…10b5 9e0c 1580 EXEC CA(B,SLD$,DSL4$,SLD$)
0x109a…10b5 LineComalBin {
0x109a…10b5 ptr = 0x9e0c // 0x109a @0x0
0x109a…10b5 lno = 0x062c // 0x109c @0x2
0x109a…10b5 at0004 = ╱9d╱ EXEC ╱ // 0x109e @0x4
0x109a…10b5 at0005 = ╱43╱C╱ // 0x109f @0x5
0x109a…10b5 at0006 = ╱41╱A╱ // 0x10a0 @0x6
0x109a…10b5 at0007 = ╱ed╱(╱ // 0x10a1 @0x7
0x109a…10b5 at0008 = ╱42╱B╱ // 0x10a2 @0x8
0x109a…10b5 at0009 = ╱ec╱,╱ // 0x10a3 @0x9
0x109a…10b5 at000a = ╱53╱S╱ // 0x10a4 @0xa
0x109a…10b5 at000b = ╱4c╱L╱ // 0x10a5 @0xb
0x109a…10b5 at000c = ╱44╱D╱ // 0x10a6 @0xc
0x109a…10b5 at000d = ╱ef╱$╱ // 0x10a7 @0xd
0x109a…10b5 at000e = ╱ec╱,╱ // 0x10a8 @0xe
0x109a…10b5 at000f = ╱44╱D╱ // 0x10a9 @0xf
0x109a…10b5 at0010 = ╱53╱S╱ // 0x10aa @0x10
0x109a…10b5 at0011 = ╱4c╱L╱ // 0x10ab @0x11
0x109a…10b5 at0012 = ╱34╱4╱ // 0x10ac @0x12
0x109a…10b5 at0013 = ╱ef╱$╱ // 0x10ad @0x13
0x109a…10b5 at0014 = ╱ec╱,╱ // 0x10ae @0x14
0x109a…10b5 at0015 = ╱53╱S╱ // 0x10af @0x15
0x109a…10b5 at0016 = ╱4c╱L╱ // 0x10b0 @0x16
0x109a…10b5 at0017 = ╱44╱D╱ // 0x10b1 @0x17
0x109a…10b5 at0018 = ╱ef╱$╱ // 0x10b2 @0x18
0x109a…10b5 at0019 = ╱ee╱)╱ // 0x10b3 @0x19
0x109a…10b5 at001a = EOL // 0x10b4 @0x1a
0x109a…10b5 }
0x10b5…10c4 9e1b 1590 CURSOR W,14
0x10b5…10c4 LineComalBin {
0x10b5…10c4 ptr = 0x9e1b // 0x10b5 @0x0
0x10b5…10c4 lno = 0x0636 // 0x10b7 @0x2
0x10b5…10c4 at0004 = ╱a1╱ CURSOR ╱ // 0x10b9 @0x4
0x10b5…10c4 at0005 = ╱57╱W╱ // 0x10ba @0x5
0x10b5…10c4 at0006 = ╱ec╱,╱ // 0x10bb @0x6
0x10b5…10c4 at0007 = ╱31╱1╱ // 0x10bc @0x7
0x10b5…10c4 at0008 = ╱34╱4╱ // 0x10bd @0x8
0x10b5…10c4 at0009 = ╱fe0000e004╱ // 0x10be @0x9
0x10b5…10c4 at000e = EOL // 0x10c3 @0xe
0x10b5…10c4 }
0x10c4…10d4 9e2b 1600 PRINT "Saldo: ";
0x10c4…10d4 LineComalBin {
0x10c4…10d4 ptr = 0x9e2b // 0x10c4 @0x0
0x10c4…10d4 lno = 0x0640 // 0x10c6 @0x2
0x10c4…10d4 at0004 = ╱92╱ PRINT ╱ // 0x10c8 @0x4
0x10c4…10d4 at0005 = ╱22╱"╱ // 0x10c9 @0x5
0x10c4…10d4 at0006 = ╱53╱S╱ // 0x10ca @0x6
0x10c4…10d4 at0007 = ╱61╱a╱ // 0x10cb @0x7
0x10c4…10d4 at0008 = ╱6c╱l╱ // 0x10cc @0x8
0x10c4…10d4 at0009 = ╱64╱d╱ // 0x10cd @0x9
0x10c4…10d4 at000a = ╱6f╱o╱ // 0x10ce @0xa
0x10c4…10d4 at000b = ╱3a╱:╱ // 0x10cf @0xb
0x10c4…10d4 at000c = ╱20╱…╱ // 0x10d0 @0xc
0x10c4…10d4 at000d = ╱22╱"╱ // 0x10d1 @0xd
0x10c4…10d4 at000e = ╱eb╱;╱ // 0x10d2 @0xe
0x10c4…10d4 at000f = EOL // 0x10d3 @0xf
0x10c4…10d4 }
0x10d4…10ed 9e44 1610 EXEC TUD(SLD$,TAL4$,E,B)
0x10d4…10ed LineComalBin {
0x10d4…10ed ptr = 0x9e44 // 0x10d4 @0x0
0x10d4…10ed lno = 0x064a // 0x10d6 @0x2
0x10d4…10ed at0004 = ╱9d╱ EXEC ╱ // 0x10d8 @0x4
0x10d4…10ed at0005 = ╱54╱T╱ // 0x10d9 @0x5
0x10d4…10ed at0006 = ╱55╱U╱ // 0x10da @0x6
0x10d4…10ed at0007 = ╱44╱D╱ // 0x10db @0x7
0x10d4…10ed at0008 = ╱ed╱(╱ // 0x10dc @0x8
0x10d4…10ed at0009 = ╱53╱S╱ // 0x10dd @0x9
0x10d4…10ed at000a = ╱4c╱L╱ // 0x10de @0xa
0x10d4…10ed at000b = ╱44╱D╱ // 0x10df @0xb
0x10d4…10ed at000c = ╱ef╱$╱ // 0x10e0 @0xc
0x10d4…10ed at000d = ╱ec╱,╱ // 0x10e1 @0xd
0x10d4…10ed at000e = ╱54╱T╱ // 0x10e2 @0xe
0x10d4…10ed at000f = ╱41╱A╱ // 0x10e3 @0xf
0x10d4…10ed at0010 = ╱4c╱L╱ // 0x10e4 @0x10
0x10d4…10ed at0011 = ╱34╱4╱ // 0x10e5 @0x11
0x10d4…10ed at0012 = ╱ef╱$╱ // 0x10e6 @0x12
0x10d4…10ed at0013 = ╱ec╱,╱ // 0x10e7 @0x13
0x10d4…10ed at0014 = ╱45╱E╱ // 0x10e8 @0x14
0x10d4…10ed at0015 = ╱ec╱,╱ // 0x10e9 @0x15
0x10d4…10ed at0016 = ╱42╱B╱ // 0x10ea @0x16
0x10d4…10ed at0017 = ╱ee╱)╱ // 0x10eb @0x17
0x10d4…10ed at0018 = EOL // 0x10ec @0x18
0x10d4…10ed }
0x10ed…1102 9e59 1620 CURSOR 12,16
0x10ed…1102 LineComalBin {
0x10ed…1102 ptr = 0x9e59 // 0x10ed @0x0
0x10ed…1102 lno = 0x0654 // 0x10ef @0x2
0x10ed…1102 at0004 = ╱a1╱ CURSOR ╱ // 0x10f1 @0x4
0x10ed…1102 at0005 = ╱31╱1╱ // 0x10f2 @0x5
0x10ed…1102 at0006 = ╱32╱2╱ // 0x10f3 @0x6
0x10ed…1102 at0007 = ╱fe0000c004╱ // 0x10f4 @0x7
0x10ed…1102 at000c = ╱ec╱,╱ // 0x10f9 @0xc
0x10ed…1102 at000d = ╱31╱1╱ // 0x10fa @0xd
0x10ed…1102 at000e = ╱36╱6╱ // 0x10fb @0xe
0x10ed…1102 at000f = ╱fe00008005╱ // 0x10fc @0xf
0x10ed…1102 at0014 = EOL // 0x1101 @0x14
0x10ed…1102 }
0x1102…1141 9e98 1630 PRINT "0-30 dage 30-60 dage 60-90 dage ældre"
0x1102…1141 LineComalBin {
0x1102…1141 ptr = 0x9e98 // 0x1102 @0x0
0x1102…1141 lno = 0x065e // 0x1104 @0x2
0x1102…1141 at0004 = ╱92╱ PRINT ╱ // 0x1106 @0x4
0x1102…1141 at0005 = ╱22╱"╱ // 0x1107 @0x5
0x1102…1141 at0006 = ╱30╱0╱ // 0x1108 @0x6
0x1102…1141 at0007 = ╱2d╱-╱ // 0x1109 @0x7
0x1102…1141 at0008 = ╱33╱3╱ // 0x110a @0x8
0x1102…1141 at0009 = ╱30╱0╱ // 0x110b @0x9
0x1102…1141 at000a = ╱20╱…╱ // 0x110c @0xa
0x1102…1141 at000b = ╱64╱d╱ // 0x110d @0xb
0x1102…1141 at000c = ╱61╱a╱ // 0x110e @0xc
0x1102…1141 at000d = ╱67╱g╱ // 0x110f @0xd
0x1102…1141 at000e = ╱65╱e╱ // 0x1110 @0xe
0x1102…1141 at000f = ╱20╱…╱ // 0x1111 @0xf
0x1102…1141 at0010 = ╱20╱…╱ // 0x1112 @0x10
0x1102…1141 at0011 = ╱20╱…╱ // 0x1113 @0x11
0x1102…1141 at0012 = ╱20╱…╱ // 0x1114 @0x12
0x1102…1141 at0013 = ╱20╱…╱ // 0x1115 @0x13
0x1102…1141 at0014 = ╱20╱…╱ // 0x1116 @0x14
0x1102…1141 at0015 = ╱33╱3╱ // 0x1117 @0x15
0x1102…1141 at0016 = ╱30╱0╱ // 0x1118 @0x16
0x1102…1141 at0017 = ╱2d╱-╱ // 0x1119 @0x17
0x1102…1141 at0018 = ╱36╱6╱ // 0x111a @0x18
0x1102…1141 at0019 = ╱30╱0╱ // 0x111b @0x19
0x1102…1141 at001a = ╱20╱…╱ // 0x111c @0x1a
0x1102…1141 at001b = ╱64╱d╱ // 0x111d @0x1b
0x1102…1141 at001c = ╱61╱a╱ // 0x111e @0x1c
0x1102…1141 at001d = ╱67╱g╱ // 0x111f @0x1d
0x1102…1141 at001e = ╱65╱e╱ // 0x1120 @0x1e
0x1102…1141 at001f = ╱20╱…╱ // 0x1121 @0x1f
0x1102…1141 at0020 = ╱20╱…╱ // 0x1122 @0x20
0x1102…1141 at0021 = ╱20╱…╱ // 0x1123 @0x21
0x1102…1141 at0022 = ╱20╱…╱ // 0x1124 @0x22
0x1102…1141 at0023 = ╱20╱…╱ // 0x1125 @0x23
0x1102…1141 at0024 = ╱20╱…╱ // 0x1126 @0x24
0x1102…1141 at0025 = ╱36╱6╱ // 0x1127 @0x25
0x1102…1141 at0026 = ╱30╱0╱ // 0x1128 @0x26
0x1102…1141 at0027 = ╱2d╱-╱ // 0x1129 @0x27
0x1102…1141 at0028 = ╱39╱9╱ // 0x112a @0x28
0x1102…1141 at0029 = ╱30╱0╱ // 0x112b @0x29
0x1102…1141 at002a = ╱20╱…╱ // 0x112c @0x2a
0x1102…1141 at002b = ╱64╱d╱ // 0x112d @0x2b
0x1102…1141 at002c = ╱61╱a╱ // 0x112e @0x2c
0x1102…1141 at002d = ╱67╱g╱ // 0x112f @0x2d
0x1102…1141 at002e = ╱65╱e╱ // 0x1130 @0x2e
0x1102…1141 at002f = ╱20╱…╱ // 0x1131 @0x2f
0x1102…1141 at0030 = ╱20╱…╱ // 0x1132 @0x30
0x1102…1141 at0031 = ╱20╱…╱ // 0x1133 @0x31
0x1102…1141 at0032 = ╱20╱…╱ // 0x1134 @0x32
0x1102…1141 at0033 = ╱20╱…╱ // 0x1135 @0x33
0x1102…1141 at0034 = ╱20╱…╱ // 0x1136 @0x34
0x1102…1141 at0035 = ╱20╱…╱ // 0x1137 @0x35
0x1102…1141 at0036 = ╱20╱…╱ // 0x1138 @0x36
0x1102…1141 at0037 = ╱20╱…╱ // 0x1139 @0x37
0x1102…1141 at0038 = ╱7b╱æ╱ // 0x113a @0x38
0x1102…1141 at0039 = ╱6c╱l╱ // 0x113b @0x39
0x1102…1141 at003a = ╱64╱d╱ // 0x113c @0x3a
0x1102…1141 at003b = ╱72╱r╱ // 0x113d @0x3b
0x1102…1141 at003c = ╱65╱e╱ // 0x113e @0x3c
0x1102…1141 at003d = ╱22╱"╱ // 0x113f @0x3d
0x1102…1141 at003e = EOL // 0x1140 @0x3e
0x1102…1141 }
0x1141…1150 9ea7 1640 CURSOR W,18
0x1141…1150 LineComalBin {
0x1141…1150 ptr = 0x9ea7 // 0x1141 @0x0
0x1141…1150 lno = 0x0668 // 0x1143 @0x2
0x1141…1150 at0004 = ╱a1╱ CURSOR ╱ // 0x1145 @0x4
0x1141…1150 at0005 = ╱57╱W╱ // 0x1146 @0x5
0x1141…1150 at0006 = ╱ec╱,╱ // 0x1147 @0x6
0x1141…1150 at0007 = ╱31╱1╱ // 0x1148 @0x7
0x1141…1150 at0008 = ╱38╱8╱ // 0x1149 @0x8
0x1141…1150 at0009 = ╱fe00009005╱ // 0x114a @0x9
0x1141…1150 at000e = EOL // 0x114f @0xe
0x1141…1150 }
0x1150…116a 9ec1 1650 EXEC TUD(DSL1$,TAL4$,E,B)
0x1150…116a LineComalBin {
0x1150…116a ptr = 0x9ec1 // 0x1150 @0x0
0x1150…116a lno = 0x0672 // 0x1152 @0x2
0x1150…116a at0004 = ╱9d╱ EXEC ╱ // 0x1154 @0x4
0x1150…116a at0005 = ╱54╱T╱ // 0x1155 @0x5
0x1150…116a at0006 = ╱55╱U╱ // 0x1156 @0x6
0x1150…116a at0007 = ╱44╱D╱ // 0x1157 @0x7
0x1150…116a at0008 = ╱ed╱(╱ // 0x1158 @0x8
0x1150…116a at0009 = ╱44╱D╱ // 0x1159 @0x9
0x1150…116a at000a = ╱53╱S╱ // 0x115a @0xa
0x1150…116a at000b = ╱4c╱L╱ // 0x115b @0xb
0x1150…116a at000c = ╱31╱1╱ // 0x115c @0xc
0x1150…116a at000d = ╱ef╱$╱ // 0x115d @0xd
0x1150…116a at000e = ╱ec╱,╱ // 0x115e @0xe
0x1150…116a at000f = ╱54╱T╱ // 0x115f @0xf
0x1150…116a at0010 = ╱41╱A╱ // 0x1160 @0x10
0x1150…116a at0011 = ╱4c╱L╱ // 0x1161 @0x11
0x1150…116a at0012 = ╱34╱4╱ // 0x1162 @0x12
0x1150…116a at0013 = ╱ef╱$╱ // 0x1163 @0x13
0x1150…116a at0014 = ╱ec╱,╱ // 0x1164 @0x14
0x1150…116a at0015 = ╱45╱E╱ // 0x1165 @0x15
0x1150…116a at0016 = ╱ec╱,╱ // 0x1166 @0x16
0x1150…116a at0017 = ╱42╱B╱ // 0x1167 @0x17
0x1150…116a at0018 = ╱ee╱)╱ // 0x1168 @0x18
0x1150…116a at0019 = EOL // 0x1169 @0x19
0x1150…116a }
0x116a…117f 9ed6 1660 CURSOR 25,18
0x116a…117f LineComalBin {
0x116a…117f ptr = 0x9ed6 // 0x116a @0x0
0x116a…117f lno = 0x067c // 0x116c @0x2
0x116a…117f at0004 = ╱a1╱ CURSOR ╱ // 0x116e @0x4
0x116a…117f at0005 = ╱32╱2╱ // 0x116f @0x5
0x116a…117f at0006 = ╱35╱5╱ // 0x1170 @0x6
0x116a…117f at0007 = ╱fe0000c805╱ // 0x1171 @0x7
0x116a…117f at000c = ╱ec╱,╱ // 0x1176 @0xc
0x116a…117f at000d = ╱31╱1╱ // 0x1177 @0xd
0x116a…117f at000e = ╱38╱8╱ // 0x1178 @0xe
0x116a…117f at000f = ╱fe00009005╱ // 0x1179 @0xf
0x116a…117f at0014 = EOL // 0x117e @0x14
0x116a…117f }
0x117f…1199 9ef0 1670 EXEC TUD(DSL2$,TAL4$,E,B)
0x117f…1199 LineComalBin {
0x117f…1199 ptr = 0x9ef0 // 0x117f @0x0
0x117f…1199 lno = 0x0686 // 0x1181 @0x2
0x117f…1199 at0004 = ╱9d╱ EXEC ╱ // 0x1183 @0x4
0x117f…1199 at0005 = ╱54╱T╱ // 0x1184 @0x5
0x117f…1199 at0006 = ╱55╱U╱ // 0x1185 @0x6
0x117f…1199 at0007 = ╱44╱D╱ // 0x1186 @0x7
0x117f…1199 at0008 = ╱ed╱(╱ // 0x1187 @0x8
0x117f…1199 at0009 = ╱44╱D╱ // 0x1188 @0x9
0x117f…1199 at000a = ╱53╱S╱ // 0x1189 @0xa
0x117f…1199 at000b = ╱4c╱L╱ // 0x118a @0xb
0x117f…1199 at000c = ╱32╱2╱ // 0x118b @0xc
0x117f…1199 at000d = ╱ef╱$╱ // 0x118c @0xd
0x117f…1199 at000e = ╱ec╱,╱ // 0x118d @0xe
0x117f…1199 at000f = ╱54╱T╱ // 0x118e @0xf
0x117f…1199 at0010 = ╱41╱A╱ // 0x118f @0x10
0x117f…1199 at0011 = ╱4c╱L╱ // 0x1190 @0x11
0x117f…1199 at0012 = ╱34╱4╱ // 0x1191 @0x12
0x117f…1199 at0013 = ╱ef╱$╱ // 0x1192 @0x13
0x117f…1199 at0014 = ╱ec╱,╱ // 0x1193 @0x14
0x117f…1199 at0015 = ╱45╱E╱ // 0x1194 @0x15
0x117f…1199 at0016 = ╱ec╱,╱ // 0x1195 @0x16
0x117f…1199 at0017 = ╱42╱B╱ // 0x1196 @0x17
0x117f…1199 at0018 = ╱ee╱)╱ // 0x1197 @0x18
0x117f…1199 at0019 = EOL // 0x1198 @0x19
0x117f…1199 }
0x1199…11ae 9f05 1680 CURSOR 41,18
0x1199…11ae LineComalBin {
0x1199…11ae ptr = 0x9f05 // 0x1199 @0x0
0x1199…11ae lno = 0x0690 // 0x119b @0x2
0x1199…11ae at0004 = ╱a1╱ CURSOR ╱ // 0x119d @0x4
0x1199…11ae at0005 = ╱34╱4╱ // 0x119e @0x5
0x1199…11ae at0006 = ╱31╱1╱ // 0x119f @0x6
0x1199…11ae at0007 = ╱fe0000a406╱ // 0x11a0 @0x7
0x1199…11ae at000c = ╱ec╱,╱ // 0x11a5 @0xc
0x1199…11ae at000d = ╱31╱1╱ // 0x11a6 @0xd
0x1199…11ae at000e = ╱38╱8╱ // 0x11a7 @0xe
0x1199…11ae at000f = ╱fe00009005╱ // 0x11a8 @0xf
0x1199…11ae at0014 = EOL // 0x11ad @0x14
0x1199…11ae }
0x11ae…11c8 9f1f 1690 EXEC TUD(DSL3$,TAL4$,E,B)
0x11ae…11c8 LineComalBin {
0x11ae…11c8 ptr = 0x9f1f // 0x11ae @0x0
0x11ae…11c8 lno = 0x069a // 0x11b0 @0x2
0x11ae…11c8 at0004 = ╱9d╱ EXEC ╱ // 0x11b2 @0x4
0x11ae…11c8 at0005 = ╱54╱T╱ // 0x11b3 @0x5
0x11ae…11c8 at0006 = ╱55╱U╱ // 0x11b4 @0x6
0x11ae…11c8 at0007 = ╱44╱D╱ // 0x11b5 @0x7
0x11ae…11c8 at0008 = ╱ed╱(╱ // 0x11b6 @0x8
0x11ae…11c8 at0009 = ╱44╱D╱ // 0x11b7 @0x9
0x11ae…11c8 at000a = ╱53╱S╱ // 0x11b8 @0xa
0x11ae…11c8 at000b = ╱4c╱L╱ // 0x11b9 @0xb
0x11ae…11c8 at000c = ╱33╱3╱ // 0x11ba @0xc
0x11ae…11c8 at000d = ╱ef╱$╱ // 0x11bb @0xd
0x11ae…11c8 at000e = ╱ec╱,╱ // 0x11bc @0xe
0x11ae…11c8 at000f = ╱54╱T╱ // 0x11bd @0xf
0x11ae…11c8 at0010 = ╱41╱A╱ // 0x11be @0x10
0x11ae…11c8 at0011 = ╱4c╱L╱ // 0x11bf @0x11
0x11ae…11c8 at0012 = ╱34╱4╱ // 0x11c0 @0x12
0x11ae…11c8 at0013 = ╱ef╱$╱ // 0x11c1 @0x13
0x11ae…11c8 at0014 = ╱ec╱,╱ // 0x11c2 @0x14
0x11ae…11c8 at0015 = ╱45╱E╱ // 0x11c3 @0x15
0x11ae…11c8 at0016 = ╱ec╱,╱ // 0x11c4 @0x16
0x11ae…11c8 at0017 = ╱42╱B╱ // 0x11c5 @0x17
0x11ae…11c8 at0018 = ╱ee╱)╱ // 0x11c6 @0x18
0x11ae…11c8 at0019 = EOL // 0x11c7 @0x19
0x11ae…11c8 }
0x11c8…11dd 9f34 1700 CURSOR 57,18
0x11c8…11dd LineComalBin {
0x11c8…11dd ptr = 0x9f34 // 0x11c8 @0x0
0x11c8…11dd lno = 0x06a4 // 0x11ca @0x2
0x11c8…11dd at0004 = ╱a1╱ CURSOR ╱ // 0x11cc @0x4
0x11c8…11dd at0005 = ╱35╱5╱ // 0x11cd @0x5
0x11c8…11dd at0006 = ╱37╱7╱ // 0x11ce @0x6
0x11c8…11dd at0007 = ╱fe0000e406╱ // 0x11cf @0x7
0x11c8…11dd at000c = ╱ec╱,╱ // 0x11d4 @0xc
0x11c8…11dd at000d = ╱31╱1╱ // 0x11d5 @0xd
0x11c8…11dd at000e = ╱38╱8╱ // 0x11d6 @0xe
0x11c8…11dd at000f = ╱fe00009005╱ // 0x11d7 @0xf
0x11c8…11dd at0014 = EOL // 0x11dc @0x14
0x11c8…11dd }
0x11dd…11f7 9f4e 1710 EXEC TUD(DSL4$,TAL4$,E,B)
0x11dd…11f7 LineComalBin {
0x11dd…11f7 ptr = 0x9f4e // 0x11dd @0x0
0x11dd…11f7 lno = 0x06ae // 0x11df @0x2
0x11dd…11f7 at0004 = ╱9d╱ EXEC ╱ // 0x11e1 @0x4
0x11dd…11f7 at0005 = ╱54╱T╱ // 0x11e2 @0x5
0x11dd…11f7 at0006 = ╱55╱U╱ // 0x11e3 @0x6
0x11dd…11f7 at0007 = ╱44╱D╱ // 0x11e4 @0x7
0x11dd…11f7 at0008 = ╱ed╱(╱ // 0x11e5 @0x8
0x11dd…11f7 at0009 = ╱44╱D╱ // 0x11e6 @0x9
0x11dd…11f7 at000a = ╱53╱S╱ // 0x11e7 @0xa
0x11dd…11f7 at000b = ╱4c╱L╱ // 0x11e8 @0xb
0x11dd…11f7 at000c = ╱34╱4╱ // 0x11e9 @0xc
0x11dd…11f7 at000d = ╱ef╱$╱ // 0x11ea @0xd
0x11dd…11f7 at000e = ╱ec╱,╱ // 0x11eb @0xe
0x11dd…11f7 at000f = ╱54╱T╱ // 0x11ec @0xf
0x11dd…11f7 at0010 = ╱41╱A╱ // 0x11ed @0x10
0x11dd…11f7 at0011 = ╱4c╱L╱ // 0x11ee @0x11
0x11dd…11f7 at0012 = ╱34╱4╱ // 0x11ef @0x12
0x11dd…11f7 at0013 = ╱ef╱$╱ // 0x11f0 @0x13
0x11dd…11f7 at0014 = ╱ec╱,╱ // 0x11f1 @0x14
0x11dd…11f7 at0015 = ╱45╱E╱ // 0x11f2 @0x15
0x11dd…11f7 at0016 = ╱ec╱,╱ // 0x11f3 @0x16
0x11dd…11f7 at0017 = ╱42╱B╱ // 0x11f4 @0x17
0x11dd…11f7 at0018 = ╱ee╱)╱ // 0x11f5 @0x18
0x11dd…11f7 at0019 = EOL // 0x11f6 @0x19
0x11dd…11f7 }
0x11f7…11fd 9f54 1720 ENDIF
0x11f7…11fd LineComalBin {
0x11f7…11fd ptr = 0x9f54 // 0x11f7 @0x0
0x11f7…11fd lno = 0x06b8 // 0x11f9 @0x2
0x11f7…11fd at0004 = ╱9b╱ ENDIF ╱ // 0x11fb @0x4
0x11f7…11fd at0005 = EOL // 0x11fc @0x5
0x11f7…11fd }
0x11fd…1203 9f5a 1730 ENDPROC
0x11fd…1203 LineComalBin {
0x11fd…1203 ptr = 0x9f5a // 0x11fd @0x0
0x11fd…1203 lno = 0x06c2 // 0x11ff @0x2
0x11fd…1203 at0004 = ╱9f╱ ENDPROC ╱ // 0x1201 @0x4
0x11fd…1203 at0005 = EOL // 0x1202 @0x5
0x11fd…1203 }
0x1203…1211 9f68 1740 PROC DATOINDT
0x1203…1211 LineComalBin {
0x1203…1211 ptr = 0x9f68 // 0x1203 @0x0
0x1203…1211 lno = 0x06cc // 0x1205 @0x2
0x1203…1211 at0004 = ╱9e╱ PROC ╱ // 0x1207 @0x4
0x1203…1211 at0005 = ╱44╱D╱ // 0x1208 @0x5
0x1203…1211 at0006 = ╱41╱A╱ // 0x1209 @0x6
0x1203…1211 at0007 = ╱54╱T╱ // 0x120a @0x7
0x1203…1211 at0008 = ╱4f╱O╱ // 0x120b @0x8
0x1203…1211 at0009 = ╱49╱I╱ // 0x120c @0x9
0x1203…1211 at000a = ╱4e╱N╱ // 0x120d @0xa
0x1203…1211 at000b = ╱44╱D╱ // 0x120e @0xb
0x1203…1211 at000c = ╱54╱T╱ // 0x120f @0xc
0x1203…1211 at000d = EOL // 0x1210 @0xd
0x1203…1211 }
0x1211…1217 9f6e 1750 REPEAT
0x1211…1217 LineComalBin {
0x1211…1217 ptr = 0x9f6e // 0x1211 @0x0
0x1211…1217 lno = 0x06d6 // 0x1213 @0x2
0x1211…1217 at0004 = ╱97╱ REPEAT ╱ // 0x1215 @0x4
0x1211…1217 at0005 = EOL // 0x1216 @0x5
0x1211…1217 }
0x1217…1252 9fa9 1760 EXEC INDPUT1(64,LIE,-2,1000000,BK$(1))
0x1217…1252 LineComalBin {
0x1217…1252 ptr = 0x9fa9 // 0x1217 @0x0
0x1217…1252 lno = 0x06e0 // 0x1219 @0x2
0x1217…1252 at0004 = ╱9d╱ EXEC ╱ // 0x121b @0x4
0x1217…1252 at0005 = ╱49╱I╱ // 0x121c @0x5
0x1217…1252 at0006 = ╱4e╱N╱ // 0x121d @0x6
0x1217…1252 at0007 = ╱44╱D╱ // 0x121e @0x7
0x1217…1252 at0008 = ╱50╱P╱ // 0x121f @0x8
0x1217…1252 at0009 = ╱55╱U╱ // 0x1220 @0x9
0x1217…1252 at000a = ╱54╱T╱ // 0x1221 @0xa
0x1217…1252 at000b = ╱31╱1╱ // 0x1222 @0xb
0x1217…1252 at000c = ╱ed╱(╱ // 0x1223 @0xc
0x1217…1252 at000d = ╱36╱6╱ // 0x1224 @0xd
0x1217…1252 at000e = ╱34╱4╱ // 0x1225 @0xe
0x1217…1252 at000f = ╱fe00008007╱ // 0x1226 @0xf
0x1217…1252 at0014 = ╱ec╱,╱ // 0x122b @0x14
0x1217…1252 at0015 = ╱4c╱L╱ // 0x122c @0x15
0x1217…1252 at0016 = ╱49╱I╱ // 0x122d @0x16
0x1217…1252 at0017 = ╱45╱E╱ // 0x122e @0x17
0x1217…1252 at0018 = ╱ec╱,╱ // 0x122f @0x18
0x1217…1252 at0019 = ╱e9╱-╱ // 0x1230 @0x19
0x1217…1252 at001a = ╱32╱2╱ // 0x1231 @0x1a
0x1217…1252 at001b = ╱fe00008002╱ // 0x1232 @0x1b
0x1217…1252 at0020 = ╱ec╱,╱ // 0x1237 @0x20
0x1217…1252 at0021 = ╱31╱1╱ // 0x1238 @0x21
0x1217…1252 at0022 = ╱30╱0╱ // 0x1239 @0x22
0x1217…1252 at0023 = ╱30╱0╱ // 0x123a @0x23
0x1217…1252 at0024 = ╱30╱0╱ // 0x123b @0x24
0x1217…1252 at0025 = ╱30╱0╱ // 0x123c @0x25
0x1217…1252 at0026 = ╱30╱0╱ // 0x123d @0x26
0x1217…1252 at0027 = ╱30╱0╱ // 0x123e @0x27
0x1217…1252 at0028 = ╱fe0024f414╱ // 0x123f @0x28
0x1217…1252 at002d = ╱ec╱,╱ // 0x1244 @0x2d
0x1217…1252 at002e = ╱42╱B╱ // 0x1245 @0x2e
0x1217…1252 at002f = ╱4b╱K╱ // 0x1246 @0x2f
0x1217…1252 at0030 = ╱ef╱$╱ // 0x1247 @0x30
0x1217…1252 at0031 = ╱ed╱(╱ // 0x1248 @0x31
0x1217…1252 at0032 = ╱31╱1╱ // 0x1249 @0x32
0x1217…1252 at0033 = ╱fe00008001╱ // 0x124a @0x33
0x1217…1252 at0038 = ╱ee╱)╱ // 0x124f @0x38
0x1217…1252 at0039 = ╱ee╱)╱ // 0x1250 @0x39
0x1217…1252 at003a = EOL // 0x1251 @0x3a
0x1217…1252 }
0x1252…129a 9ff1 1770 UNTIL KTAL=>80 AND (P DIV 100) MOD 100<13 AND P MOD 100<32 OR P=-E
0x1252…129a LineComalBin {
0x1252…129a ptr = 0x9ff1 // 0x1252 @0x0
0x1252…129a lno = 0x06ea // 0x1254 @0x2
0x1252…129a at0004 = ╱98╱ UNTIL ╱ // 0x1256 @0x4
0x1252…129a at0005 = ╱4b╱K╱ // 0x1257 @0x5
0x1252…129a at0006 = ╱54╱T╱ // 0x1258 @0x6
0x1252…129a at0007 = ╱41╱A╱ // 0x1259 @0x7
0x1252…129a at0008 = ╱4c╱L╱ // 0x125a @0x8
0x1252…129a at0009 = ╱e0╱=>╱ // 0x125b @0x9
0x1252…129a at000a = ╱38╱8╱ // 0x125c @0xa
0x1252…129a at000b = ╱30╱0╱ // 0x125d @0xb
0x1252…129a at000c = ╱fe0000a007╱ // 0x125e @0xc
0x1252…129a at0011 = ╱da╱ AND ╱ // 0x1263 @0x11
0x1252…129a at0012 = ╱ed╱(╱ // 0x1264 @0x12
0x1252…129a at0013 = ╱50╱P╱ // 0x1265 @0x13
0x1252…129a at0014 = ╱e7╱ DIV ╱ // 0x1266 @0x14
0x1252…129a at0015 = ╱31╱1╱ // 0x1267 @0x15
0x1252…129a at0016 = ╱30╱0╱ // 0x1268 @0x16
0x1252…129a at0017 = ╱30╱0╱ // 0x1269 @0x17
0x1252…129a at0018 = ╱fe0000c807╱ // 0x126a @0x18
0x1252…129a at001d = ╱ee╱)╱ // 0x126f @0x1d
0x1252…129a at001e = ╱e8╱ MOD ╱ // 0x1270 @0x1e
0x1252…129a at001f = ╱31╱1╱ // 0x1271 @0x1f
0x1252…129a at0020 = ╱30╱0╱ // 0x1272 @0x20
0x1252…129a at0021 = ╱30╱0╱ // 0x1273 @0x21
0x1252…129a at0022 = ╱fe0000c807╱ // 0x1274 @0x22
0x1252…129a at0027 = ╱dd╱<╱ // 0x1279 @0x27
0x1252…129a at0028 = ╱31╱1╱ // 0x127a @0x28
0x1252…129a at0029 = ╱33╱3╱ // 0x127b @0x29
0x1252…129a at002a = ╱fe0000d004╱ // 0x127c @0x2a
0x1252…129a at002f = ╱da╱ AND ╱ // 0x1281 @0x2f
0x1252…129a at0030 = ╱50╱P╱ // 0x1282 @0x30
0x1252…129a at0031 = ╱e8╱ MOD ╱ // 0x1283 @0x31
0x1252…129a at0032 = ╱31╱1╱ // 0x1284 @0x32
0x1252…129a at0033 = ╱30╱0╱ // 0x1285 @0x33
0x1252…129a at0034 = ╱30╱0╱ // 0x1286 @0x34
0x1252…129a at0035 = ╱fe0000c807╱ // 0x1287 @0x35
0x1252…129a at003a = ╱dd╱<╱ // 0x128c @0x3a
0x1252…129a at003b = ╱33╱3╱ // 0x128d @0x3b
0x1252…129a at003c = ╱32╱2╱ // 0x128e @0x3c
0x1252…129a at003d = ╱fe00008006╱ // 0x128f @0x3d
0x1252…129a at0042 = ╱db╱ OR ╱ // 0x1294 @0x42
0x1252…129a at0043 = ╱50╱P╱ // 0x1295 @0x43
0x1252…129a at0044 = ╱dc╱=╱ // 0x1296 @0x44
0x1252…129a at0045 = ╱e9╱-╱ // 0x1297 @0x45
0x1252…129a at0046 = ╱45╱E╱ // 0x1298 @0x46
0x1252…129a at0047 = EOL // 0x1299 @0x47
0x1252…129a }
0x129a…12a4 9ffb 1780 DAT=P
0x129a…12a4 LineComalBin {
0x129a…12a4 ptr = 0x9ffb // 0x129a @0x0
0x129a…12a4 lno = 0x06f4 // 0x129c @0x2
0x129a…12a4 at0004 = ╱44╱D╱ // 0x129e @0x4
0x129a…12a4 at0005 = ╱41╱A╱ // 0x129f @0x5
0x129a…12a4 at0006 = ╱54╱T╱ // 0x12a0 @0x6
0x129a…12a4 at0007 = ╱dc╱=╱ // 0x12a1 @0x7
0x129a…12a4 at0008 = ╱50╱P╱ // 0x12a2 @0x8
0x129a…12a4 at0009 = EOL // 0x12a3 @0x9
0x129a…12a4 }
0x12a4…12b9 a010 1790 IF DAT=-E THEN DAT=DATO
0x12a4…12b9 LineComalBin {
0x12a4…12b9 ptr = 0xa010 // 0x12a4 @0x0
0x12a4…12b9 lno = 0x06fe // 0x12a6 @0x2
0x12a4…12b9 at0004 = ╱82╱ IF ╱ // 0x12a8 @0x4
0x12a4…12b9 at0005 = ╱44╱D╱ // 0x12a9 @0x5
0x12a4…12b9 at0006 = ╱41╱A╱ // 0x12aa @0x6
0x12a4…12b9 at0007 = ╱54╱T╱ // 0x12ab @0x7
0x12a4…12b9 at0008 = ╱dc╱=╱ // 0x12ac @0x8
0x12a4…12b9 at0009 = ╱e9╱-╱ // 0x12ad @0x9
0x12a4…12b9 at000a = ╱45╱E╱ // 0x12ae @0xa
0x12a4…12b9 at000b = ╱b6╱ THEN ╱ // 0x12af @0xb
0x12a4…12b9 at000c = ╱44╱D╱ // 0x12b0 @0xc
0x12a4…12b9 at000d = ╱41╱A╱ // 0x12b1 @0xd
0x12a4…12b9 at000e = ╱54╱T╱ // 0x12b2 @0xe
0x12a4…12b9 at000f = ╱dc╱=╱ // 0x12b3 @0xf
0x12a4…12b9 at0010 = ╱44╱D╱ // 0x12b4 @0x10
0x12a4…12b9 at0011 = ╱41╱A╱ // 0x12b5 @0x11
0x12a4…12b9 at0012 = ╱54╱T╱ // 0x12b6 @0x12
0x12a4…12b9 at0013 = ╱4f╱O╱ // 0x12b7 @0x13
0x12a4…12b9 at0014 = EOL // 0x12b8 @0x14
0x12a4…12b9 }
0x12b9…12ca a021 1800 CURSOR 67,LIE
0x12b9…12ca LineComalBin {
0x12b9…12ca ptr = 0xa021 // 0x12b9 @0x0
0x12b9…12ca lno = 0x0708 // 0x12bb @0x2
0x12b9…12ca at0004 = ╱a1╱ CURSOR ╱ // 0x12bd @0x4
0x12b9…12ca at0005 = ╱36╱6╱ // 0x12be @0x5
0x12b9…12ca at0006 = ╱37╱7╱ // 0x12bf @0x6
0x12b9…12ca at0007 = ╱fe00008607╱ // 0x12c0 @0x7
0x12b9…12ca at000c = ╱ec╱,╱ // 0x12c5 @0xc
0x12b9…12ca at000d = ╱4c╱L╱ // 0x12c6 @0xd
0x12b9…12ca at000e = ╱49╱I╱ // 0x12c7 @0xe
0x12b9…12ca at000f = ╱45╱E╱ // 0x12c8 @0xf
0x12b9…12ca at0010 = EOL // 0x12c9 @0x10
0x12b9…12ca }
0x12ca…12db a032 1810 EXEC DATOUD(DAT)
0x12ca…12db LineComalBin {
0x12ca…12db ptr = 0xa032 // 0x12ca @0x0
0x12ca…12db lno = 0x0712 // 0x12cc @0x2
0x12ca…12db at0004 = ╱9d╱ EXEC ╱ // 0x12ce @0x4
0x12ca…12db at0005 = ╱44╱D╱ // 0x12cf @0x5
0x12ca…12db at0006 = ╱41╱A╱ // 0x12d0 @0x6
0x12ca…12db at0007 = ╱54╱T╱ // 0x12d1 @0x7
0x12ca…12db at0008 = ╱4f╱O╱ // 0x12d2 @0x8
0x12ca…12db at0009 = ╱55╱U╱ // 0x12d3 @0x9
0x12ca…12db at000a = ╱44╱D╱ // 0x12d4 @0xa
0x12ca…12db at000b = ╱ed╱(╱ // 0x12d5 @0xb
0x12ca…12db at000c = ╱44╱D╱ // 0x12d6 @0xc
0x12ca…12db at000d = ╱41╱A╱ // 0x12d7 @0xd
0x12ca…12db at000e = ╱54╱T╱ // 0x12d8 @0xe
0x12ca…12db at000f = ╱ee╱)╱ // 0x12d9 @0xf
0x12ca…12db at0010 = EOL // 0x12da @0x10
0x12ca…12db }
0x12db…12e1 a038 1820 ENDPROC
0x12db…12e1 LineComalBin {
0x12db…12e1 ptr = 0xa038 // 0x12db @0x0
0x12db…12e1 lno = 0x071c // 0x12dd @0x2
0x12db…12e1 at0004 = ╱9f╱ ENDPROC ╱ // 0x12df @0x4
0x12db…12e1 at0005 = EOL // 0x12e0 @0x5
0x12db…12e1 }
0x12e1…12f1 a048 1830 PROC DATOUD(DA)
0x12e1…12f1 LineComalBin {
0x12e1…12f1 ptr = 0xa048 // 0x12e1 @0x0
0x12e1…12f1 lno = 0x0726 // 0x12e3 @0x2
0x12e1…12f1 at0004 = ╱9e╱ PROC ╱ // 0x12e5 @0x4
0x12e1…12f1 at0005 = ╱44╱D╱ // 0x12e6 @0x5
0x12e1…12f1 at0006 = ╱41╱A╱ // 0x12e7 @0x6
0x12e1…12f1 at0007 = ╱54╱T╱ // 0x12e8 @0x7
0x12e1…12f1 at0008 = ╱4f╱O╱ // 0x12e9 @0x8
0x12e1…12f1 at0009 = ╱55╱U╱ // 0x12ea @0x9
0x12e1…12f1 at000a = ╱44╱D╱ // 0x12eb @0xa
0x12e1…12f1 at000b = ╱ed╱(╱ // 0x12ec @0xb
0x12e1…12f1 at000c = ╱44╱D╱ // 0x12ed @0xc
0x12e1…12f1 at000d = ╱41╱A╱ // 0x12ee @0xd
0x12e1…12f1 at000e = ╱ee╱)╱ // 0x12ef @0xe
0x12e1…12f1 at000f = EOL // 0x12f0 @0xf
0x12e1…12f1 }
0x12f1…1319 a070 1840 PRINT USING "###.##":(DA MOD 10000)/100
0x12f1…1319 LineComalBin {
0x12f1…1319 ptr = 0xa070 // 0x12f1 @0x0
0x12f1…1319 lno = 0x0730 // 0x12f3 @0x2
0x12f1…1319 at0004 = ╱92╱ PRINT ╱ // 0x12f5 @0x4
0x12f1…1319 at0005 = ╱b9╱ USING ╱ // 0x12f6 @0x5
0x12f1…1319 at0006 = ╱22╱"╱ // 0x12f7 @0x6
0x12f1…1319 at0007 = ╱23╱#╱ // 0x12f8 @0x7
0x12f1…1319 at0008 = ╱23╱#╱ // 0x12f9 @0x8
0x12f1…1319 at0009 = ╱23╱#╱ // 0x12fa @0x9
0x12f1…1319 at000a = ╱2e╱.╱ // 0x12fb @0xa
0x12f1…1319 at000b = ╱23╱#╱ // 0x12fc @0xb
0x12f1…1319 at000c = ╱23╱#╱ // 0x12fd @0xc
0x12f1…1319 at000d = ╱22╱"╱ // 0x12fe @0xd
0x12f1…1319 at000e = ╱f0╱:╱ // 0x12ff @0xe
0x12f1…1319 at000f = ╱ed╱(╱ // 0x1300 @0xf
0x12f1…1319 at0010 = ╱44╱D╱ // 0x1301 @0x10
0x12f1…1319 at0011 = ╱41╱A╱ // 0x1302 @0x11
0x12f1…1319 at0012 = ╱e8╱ MOD ╱ // 0x1303 @0x12
0x12f1…1319 at0013 = ╱31╱1╱ // 0x1304 @0x13
0x12f1…1319 at0014 = ╱30╱0╱ // 0x1305 @0x14
0x12f1…1319 at0015 = ╱30╱0╱ // 0x1306 @0x15
0x12f1…1319 at0016 = ╱30╱0╱ // 0x1307 @0x16
0x12f1…1319 at0017 = ╱30╱0╱ // 0x1308 @0x17
0x12f1…1319 at0018 = ╱fe00409c0e╱ // 0x1309 @0x18
0x12f1…1319 at001d = ╱ee╱)╱ // 0x130e @0x1d
0x12f1…1319 at001e = ╱e5╱/╱ // 0x130f @0x1e
0x12f1…1319 at001f = ╱31╱1╱ // 0x1310 @0x1f
0x12f1…1319 at0020 = ╱30╱0╱ // 0x1311 @0x20
0x12f1…1319 at0021 = ╱30╱0╱ // 0x1312 @0x21
0x12f1…1319 at0022 = ╱fe0000c807╱ // 0x1313 @0x22
0x12f1…1319 at0027 = EOL // 0x1318 @0x27
0x12f1…1319 }
0x1319…132a a081 1850 CURSOR 64,LIE
0x1319…132a LineComalBin {
0x1319…132a ptr = 0xa081 // 0x1319 @0x0
0x1319…132a lno = 0x073a // 0x131b @0x2
0x1319…132a at0004 = ╱a1╱ CURSOR ╱ // 0x131d @0x4
0x1319…132a at0005 = ╱36╱6╱ // 0x131e @0x5
0x1319…132a at0006 = ╱34╱4╱ // 0x131f @0x6
0x1319…132a at0007 = ╱fe00008007╱ // 0x1320 @0x7
0x1319…132a at000c = ╱ec╱,╱ // 0x1325 @0xc
0x1319…132a at000d = ╱4c╱L╱ // 0x1326 @0xd
0x1319…132a at000e = ╱49╱I╱ // 0x1327 @0xe
0x1319…132a at000f = ╱45╱E╱ // 0x1328 @0xf
0x1319…132a at0010 = EOL // 0x1329 @0x10
0x1319…132a }
0x132a…134f a0a6 1860 PRINT USING "###.#":(DA DIV 1000)/10
0x132a…134f LineComalBin {
0x132a…134f ptr = 0xa0a6 // 0x132a @0x0
0x132a…134f lno = 0x0744 // 0x132c @0x2
0x132a…134f at0004 = ╱92╱ PRINT ╱ // 0x132e @0x4
0x132a…134f at0005 = ╱b9╱ USING ╱ // 0x132f @0x5
0x132a…134f at0006 = ╱22╱"╱ // 0x1330 @0x6
0x132a…134f at0007 = ╱23╱#╱ // 0x1331 @0x7
0x132a…134f at0008 = ╱23╱#╱ // 0x1332 @0x8
0x132a…134f at0009 = ╱23╱#╱ // 0x1333 @0x9
0x132a…134f at000a = ╱2e╱.╱ // 0x1334 @0xa
0x132a…134f at000b = ╱23╱#╱ // 0x1335 @0xb
0x132a…134f at000c = ╱22╱"╱ // 0x1336 @0xc
0x132a…134f at000d = ╱f0╱:╱ // 0x1337 @0xd
0x132a…134f at000e = ╱ed╱(╱ // 0x1338 @0xe
0x132a…134f at000f = ╱44╱D╱ // 0x1339 @0xf
0x132a…134f at0010 = ╱41╱A╱ // 0x133a @0x10
0x132a…134f at0011 = ╱e7╱ DIV ╱ // 0x133b @0x11
0x132a…134f at0012 = ╱31╱1╱ // 0x133c @0x12
0x132a…134f at0013 = ╱30╱0╱ // 0x133d @0x13
0x132a…134f at0014 = ╱30╱0╱ // 0x133e @0x14
0x132a…134f at0015 = ╱30╱0╱ // 0x133f @0x15
0x132a…134f at0016 = ╱fe0000fa0a╱ // 0x1340 @0x16
0x132a…134f at001b = ╱ee╱)╱ // 0x1345 @0x1b
0x132a…134f at001c = ╱e5╱/╱ // 0x1346 @0x1c
0x132a…134f at001d = ╱31╱1╱ // 0x1347 @0x1d
0x132a…134f at001e = ╱30╱0╱ // 0x1348 @0x1e
0x132a…134f at001f = ╱fe0000a004╱ // 0x1349 @0x1f
0x132a…134f at0024 = EOL // 0x134e @0x24
0x132a…134f }
0x134f…1355 a0ac 1870 ENDPROC
0x134f…1355 LineComalBin {
0x134f…1355 ptr = 0xa0ac // 0x134f @0x0
0x134f…1355 lno = 0x074e // 0x1351 @0x2
0x134f…1355 at0004 = ╱9f╱ ENDPROC ╱ // 0x1353 @0x4
0x134f…1355 at0005 = EOL // 0x1354 @0x5
0x134f…1355 }
0x1355…1363 a0ba 1880 PROC FAKHOVED
0x1355…1363 LineComalBin {
0x1355…1363 ptr = 0xa0ba // 0x1355 @0x0
0x1355…1363 lno = 0x0758 // 0x1357 @0x2
0x1355…1363 at0004 = ╱9e╱ PROC ╱ // 0x1359 @0x4
0x1355…1363 at0005 = ╱46╱F╱ // 0x135a @0x5
0x1355…1363 at0006 = ╱41╱A╱ // 0x135b @0x6
0x1355…1363 at0007 = ╱4b╱K╱ // 0x135c @0x7
0x1355…1363 at0008 = ╱48╱H╱ // 0x135d @0x8
0x1355…1363 at0009 = ╱4f╱O╱ // 0x135e @0x9
0x1355…1363 at000a = ╱56╱V╱ // 0x135f @0xa
0x1355…1363 at000b = ╱45╱E╱ // 0x1360 @0xb
0x1355…1363 at000c = ╱44╱D╱ // 0x1361 @0xc
0x1355…1363 at000d = EOL // 0x1362 @0xd
0x1355…1363 }
0x1363…1369 a0c0 1890 CLEAR
0x1363…1369 LineComalBin {
0x1363…1369 ptr = 0xa0c0 // 0x1363 @0x0
0x1363…1369 lno = 0x0762 // 0x1365 @0x2
0x1363…1369 at0004 = ╱a0╱ CLEAR ╱ // 0x1367 @0x4
0x1363…1369 at0005 = EOL // 0x1368 @0x5
0x1363…1369 }
0x1369…1372 a0c9 1900 CURSOR G,E
0x1369…1372 LineComalBin {
0x1369…1372 ptr = 0xa0c9 // 0x1369 @0x0
0x1369…1372 lno = 0x076c // 0x136b @0x2
0x1369…1372 at0004 = ╱a1╱ CURSOR ╱ // 0x136d @0x4
0x1369…1372 at0005 = ╱47╱G╱ // 0x136e @0x5
0x1369…1372 at0006 = ╱ec╱,╱ // 0x136f @0x6
0x1369…1372 at0007 = ╱45╱E╱ // 0x1370 @0x7
0x1369…1372 at0008 = EOL // 0x1371 @0x8
0x1369…1372 }
0x1372…1397 a0ee 1910 PRINT USING "Kundenr.:####### ":KUNDENR;
0x1372…1397 LineComalBin {
0x1372…1397 ptr = 0xa0ee // 0x1372 @0x0
0x1372…1397 lno = 0x0776 // 0x1374 @0x2
0x1372…1397 at0004 = ╱92╱ PRINT ╱ // 0x1376 @0x4
0x1372…1397 at0005 = ╱b9╱ USING ╱ // 0x1377 @0x5
0x1372…1397 at0006 = ╱22╱"╱ // 0x1378 @0x6
0x1372…1397 at0007 = ╱4b╱K╱ // 0x1379 @0x7
0x1372…1397 at0008 = ╱75╱u╱ // 0x137a @0x8
0x1372…1397 at0009 = ╱6e╱n╱ // 0x137b @0x9
0x1372…1397 at000a = ╱64╱d╱ // 0x137c @0xa
0x1372…1397 at000b = ╱65╱e╱ // 0x137d @0xb
0x1372…1397 at000c = ╱6e╱n╱ // 0x137e @0xc
0x1372…1397 at000d = ╱72╱r╱ // 0x137f @0xd
0x1372…1397 at000e = ╱2e╱.╱ // 0x1380 @0xe
0x1372…1397 at000f = ╱3a╱:╱ // 0x1381 @0xf
0x1372…1397 at0010 = ╱23╱#╱ // 0x1382 @0x10
0x1372…1397 at0011 = ╱23╱#╱ // 0x1383 @0x11
0x1372…1397 at0012 = ╱23╱#╱ // 0x1384 @0x12
0x1372…1397 at0013 = ╱23╱#╱ // 0x1385 @0x13
0x1372…1397 at0014 = ╱23╱#╱ // 0x1386 @0x14
0x1372…1397 at0015 = ╱23╱#╱ // 0x1387 @0x15
0x1372…1397 at0016 = ╱23╱#╱ // 0x1388 @0x16
0x1372…1397 at0017 = ╱20╱…╱ // 0x1389 @0x17
0x1372…1397 at0018 = ╱20╱…╱ // 0x138a @0x18
0x1372…1397 at0019 = ╱20╱…╱ // 0x138b @0x19
0x1372…1397 at001a = ╱22╱"╱ // 0x138c @0x1a
0x1372…1397 at001b = ╱f0╱:╱ // 0x138d @0x1b
0x1372…1397 at001c = ╱4b╱K╱ // 0x138e @0x1c
0x1372…1397 at001d = ╱55╱U╱ // 0x138f @0x1d
0x1372…1397 at001e = ╱4e╱N╱ // 0x1390 @0x1e
0x1372…1397 at001f = ╱44╱D╱ // 0x1391 @0x1f
0x1372…1397 at0020 = ╱45╱E╱ // 0x1392 @0x20
0x1372…1397 at0021 = ╱4e╱N╱ // 0x1393 @0x21
0x1372…1397 at0022 = ╱52╱R╱ // 0x1394 @0x22
0x1372…1397 at0023 = ╱eb╱;╱ // 0x1395 @0x23
0x1372…1397 at0024 = EOL // 0x1396 @0x24
0x1372…1397 }
0x1397…13aa a101 1920 PRINT " ";DNAVN$
0x1397…13aa LineComalBin {
0x1397…13aa ptr = 0xa101 // 0x1397 @0x0
0x1397…13aa lno = 0x0780 // 0x1399 @0x2
0x1397…13aa at0004 = ╱92╱ PRINT ╱ // 0x139b @0x4
0x1397…13aa at0005 = ╱22╱"╱ // 0x139c @0x5
0x1397…13aa at0006 = ╱20╱…╱ // 0x139d @0x6
0x1397…13aa at0007 = ╱20╱…╱ // 0x139e @0x7
0x1397…13aa at0008 = ╱20╱…╱ // 0x139f @0x8
0x1397…13aa at0009 = ╱20╱…╱ // 0x13a0 @0x9
0x1397…13aa at000a = ╱22╱"╱ // 0x13a1 @0xa
0x1397…13aa at000b = ╱eb╱;╱ // 0x13a2 @0xb
0x1397…13aa at000c = ╱44╱D╱ // 0x13a3 @0xc
0x1397…13aa at000d = ╱4e╱N╱ // 0x13a4 @0xd
0x1397…13aa at000e = ╱41╱A╱ // 0x13a5 @0xe
0x1397…13aa at000f = ╱56╱V╱ // 0x13a6 @0xf
0x1397…13aa at0010 = ╱4e╱N╱ // 0x13a7 @0x10
0x1397…13aa at0011 = ╱ef╱$╱ // 0x13a8 @0x11
0x1397…13aa at0012 = EOL // 0x13a9 @0x12
0x1397…13aa }
0x13aa…13b9 a110 1930 CURSOR 54,E
0x13aa…13b9 LineComalBin {
0x13aa…13b9 ptr = 0xa110 // 0x13aa @0x0
0x13aa…13b9 lno = 0x078a // 0x13ac @0x2
0x13aa…13b9 at0004 = ╱a1╱ CURSOR ╱ // 0x13ae @0x4
0x13aa…13b9 at0005 = ╱35╱5╱ // 0x13af @0x5
0x13aa…13b9 at0006 = ╱34╱4╱ // 0x13b0 @0x6
0x13aa…13b9 at0007 = ╱fe0000d806╱ // 0x13b1 @0x7
0x13aa…13b9 at000c = ╱ec╱,╱ // 0x13b6 @0xc
0x13aa…13b9 at000d = ╱45╱E╱ // 0x13b7 @0xd
0x13aa…13b9 at000e = EOL // 0x13b8 @0xe
0x13aa…13b9 }
0x13b9…13cb a122 1940 IF FAKKRE$="F" THEN
0x13b9…13cb LineComalBin {
0x13b9…13cb ptr = 0xa122 // 0x13b9 @0x0
0x13b9…13cb lno = 0x0794 // 0x13bb @0x2
0x13b9…13cb at0004 = ╱9c╱ IF ╱ // 0x13bd @0x4
0x13b9…13cb at0005 = ╱46╱F╱ // 0x13be @0x5
0x13b9…13cb at0006 = ╱41╱A╱ // 0x13bf @0x6
0x13b9…13cb at0007 = ╱4b╱K╱ // 0x13c0 @0x7
0x13b9…13cb at0008 = ╱4b╱K╱ // 0x13c1 @0x8
0x13b9…13cb at0009 = ╱52╱R╱ // 0x13c2 @0x9
0x13b9…13cb at000a = ╱45╱E╱ // 0x13c3 @0xa
0x13b9…13cb at000b = ╱ef╱$╱ // 0x13c4 @0xb
0x13b9…13cb at000c = ╱dc╱=╱ // 0x13c5 @0xc
0x13b9…13cb at000d = ╱22╱"╱ // 0x13c6 @0xd
0x13b9…13cb at000e = ╱46╱F╱ // 0x13c7 @0xe
0x13b9…13cb at000f = ╱22╱"╱ // 0x13c8 @0xf
0x13b9…13cb at0010 = ╱b6╱ THEN ╱ // 0x13c9 @0x10
0x13b9…13cb at0011 = EOL // 0x13ca @0x11
0x13b9…13cb }
0x13cb…13f8 a14f 1950 PRINT USING "Fakturanr.: #######":FAKTNR+AFAKT
0x13cb…13f8 LineComalBin {
0x13cb…13f8 ptr = 0xa14f // 0x13cb @0x0
0x13cb…13f8 lno = 0x079e // 0x13cd @0x2
0x13cb…13f8 at0004 = ╱92╱ PRINT ╱ // 0x13cf @0x4
0x13cb…13f8 at0005 = ╱b9╱ USING ╱ // 0x13d0 @0x5
0x13cb…13f8 at0006 = ╱22╱"╱ // 0x13d1 @0x6
0x13cb…13f8 at0007 = ╱46╱F╱ // 0x13d2 @0x7
0x13cb…13f8 at0008 = ╱61╱a╱ // 0x13d3 @0x8
0x13cb…13f8 at0009 = ╱6b╱k╱ // 0x13d4 @0x9
0x13cb…13f8 at000a = ╱74╱t╱ // 0x13d5 @0xa
0x13cb…13f8 at000b = ╱75╱u╱ // 0x13d6 @0xb
0x13cb…13f8 at000c = ╱72╱r╱ // 0x13d7 @0xc
0x13cb…13f8 at000d = ╱61╱a╱ // 0x13d8 @0xd
0x13cb…13f8 at000e = ╱6e╱n╱ // 0x13d9 @0xe
0x13cb…13f8 at000f = ╱72╱r╱ // 0x13da @0xf
0x13cb…13f8 at0010 = ╱2e╱.╱ // 0x13db @0x10
0x13cb…13f8 at0011 = ╱3a╱:╱ // 0x13dc @0x11
0x13cb…13f8 at0012 = ╱20╱…╱ // 0x13dd @0x12
0x13cb…13f8 at0013 = ╱20╱…╱ // 0x13de @0x13
0x13cb…13f8 at0014 = ╱20╱…╱ // 0x13df @0x14
0x13cb…13f8 at0015 = ╱20╱…╱ // 0x13e0 @0x15
0x13cb…13f8 at0016 = ╱20╱…╱ // 0x13e1 @0x16
0x13cb…13f8 at0017 = ╱23╱#╱ // 0x13e2 @0x17
0x13cb…13f8 at0018 = ╱23╱#╱ // 0x13e3 @0x18
0x13cb…13f8 at0019 = ╱23╱#╱ // 0x13e4 @0x19
0x13cb…13f8 at001a = ╱23╱#╱ // 0x13e5 @0x1a
0x13cb…13f8 at001b = ╱23╱#╱ // 0x13e6 @0x1b
0x13cb…13f8 at001c = ╱23╱#╱ // 0x13e7 @0x1c
0x13cb…13f8 at001d = ╱23╱#╱ // 0x13e8 @0x1d
0x13cb…13f8 at001e = ╱22╱"╱ // 0x13e9 @0x1e
0x13cb…13f8 at001f = ╱f0╱:╱ // 0x13ea @0x1f
0x13cb…13f8 at0020 = ╱46╱F╱ // 0x13eb @0x20
0x13cb…13f8 at0021 = ╱41╱A╱ // 0x13ec @0x21
0x13cb…13f8 at0022 = ╱4b╱K╱ // 0x13ed @0x22
0x13cb…13f8 at0023 = ╱54╱T╱ // 0x13ee @0x23
0x13cb…13f8 at0024 = ╱4e╱N╱ // 0x13ef @0x24
0x13cb…13f8 at0025 = ╱52╱R╱ // 0x13f0 @0x25
0x13cb…13f8 at0026 = ╱e2╱+╱ // 0x13f1 @0x26
0x13cb…13f8 at0027 = ╱41╱A╱ // 0x13f2 @0x27
0x13cb…13f8 at0028 = ╱46╱F╱ // 0x13f3 @0x28
0x13cb…13f8 at0029 = ╱41╱A╱ // 0x13f4 @0x29
0x13cb…13f8 at002a = ╱4b╱K╱ // 0x13f5 @0x2a
0x13cb…13f8 at002b = ╱54╱T╱ // 0x13f6 @0x2b
0x13cb…13f8 at002c = EOL // 0x13f7 @0x2c
0x13cb…13f8 }
0x13f8…13fe a155 1960 ELSE
0x13f8…13fe LineComalBin {
0x13f8…13fe ptr = 0xa155 // 0x13f8 @0x0
0x13f8…13fe lno = 0x07a8 // 0x13fa @0x2
0x13f8…13fe at0004 = ╱9a╱ ELSE ╱ // 0x13fc @0x4
0x13f8…13fe at0005 = EOL // 0x13fd @0x5
0x13f8…13fe }
0x13fe…142a a181 1970 PRINT USING "Kreditnotanr.: ######":KREDNR+AKRED
0x13fe…142a LineComalBin {
0x13fe…142a ptr = 0xa181 // 0x13fe @0x0
0x13fe…142a lno = 0x07b2 // 0x1400 @0x2
0x13fe…142a at0004 = ╱92╱ PRINT ╱ // 0x1402 @0x4
0x13fe…142a at0005 = ╱b9╱ USING ╱ // 0x1403 @0x5
0x13fe…142a at0006 = ╱22╱"╱ // 0x1404 @0x6
0x13fe…142a at0007 = ╱4b╱K╱ // 0x1405 @0x7
0x13fe…142a at0008 = ╱72╱r╱ // 0x1406 @0x8
0x13fe…142a at0009 = ╱65╱e╱ // 0x1407 @0x9
0x13fe…142a at000a = ╱64╱d╱ // 0x1408 @0xa
0x13fe…142a at000b = ╱69╱i╱ // 0x1409 @0xb
0x13fe…142a at000c = ╱74╱t╱ // 0x140a @0xc
0x13fe…142a at000d = ╱6e╱n╱ // 0x140b @0xd
0x13fe…142a at000e = ╱6f╱o╱ // 0x140c @0xe
0x13fe…142a at000f = ╱74╱t╱ // 0x140d @0xf
0x13fe…142a at0010 = ╱61╱a╱ // 0x140e @0x10
0x13fe…142a at0011 = ╱6e╱n╱ // 0x140f @0x11
0x13fe…142a at0012 = ╱72╱r╱ // 0x1410 @0x12
0x13fe…142a at0013 = ╱2e╱.╱ // 0x1411 @0x13
0x13fe…142a at0014 = ╱3a╱:╱ // 0x1412 @0x14
0x13fe…142a at0015 = ╱20╱…╱ // 0x1413 @0x15
0x13fe…142a at0016 = ╱20╱…╱ // 0x1414 @0x16
0x13fe…142a at0017 = ╱23╱#╱ // 0x1415 @0x17
0x13fe…142a at0018 = ╱23╱#╱ // 0x1416 @0x18
0x13fe…142a at0019 = ╱23╱#╱ // 0x1417 @0x19
0x13fe…142a at001a = ╱23╱#╱ // 0x1418 @0x1a
0x13fe…142a at001b = ╱23╱#╱ // 0x1419 @0x1b
0x13fe…142a at001c = ╱23╱#╱ // 0x141a @0x1c
0x13fe…142a at001d = ╱22╱"╱ // 0x141b @0x1d
0x13fe…142a at001e = ╱f0╱:╱ // 0x141c @0x1e
0x13fe…142a at001f = ╱4b╱K╱ // 0x141d @0x1f
0x13fe…142a at0020 = ╱52╱R╱ // 0x141e @0x20
0x13fe…142a at0021 = ╱45╱E╱ // 0x141f @0x21
0x13fe…142a at0022 = ╱44╱D╱ // 0x1420 @0x22
0x13fe…142a at0023 = ╱4e╱N╱ // 0x1421 @0x23
0x13fe…142a at0024 = ╱52╱R╱ // 0x1422 @0x24
0x13fe…142a at0025 = ╱e2╱+╱ // 0x1423 @0x25
0x13fe…142a at0026 = ╱41╱A╱ // 0x1424 @0x26
0x13fe…142a at0027 = ╱4b╱K╱ // 0x1425 @0x27
0x13fe…142a at0028 = ╱52╱R╱ // 0x1426 @0x28
0x13fe…142a at0029 = ╱45╱E╱ // 0x1427 @0x29
0x13fe…142a at002a = ╱44╱D╱ // 0x1428 @0x2a
0x13fe…142a at002b = EOL // 0x1429 @0x2b
0x13fe…142a }
0x142a…1430 a187 1980 ENDIF
0x142a…1430 LineComalBin {
0x142a…1430 ptr = 0xa187 // 0x142a @0x0
0x142a…1430 lno = 0x07bc // 0x142c @0x2
0x142a…1430 at0004 = ╱9b╱ ENDIF ╱ // 0x142e @0x4
0x142a…1430 at0005 = EOL // 0x142f @0x5
0x142a…1430 }
0x1430…1439 a190 1990 CURSOR G,V
0x1430…1439 LineComalBin {
0x1430…1439 ptr = 0xa190 // 0x1430 @0x0
0x1430…1439 lno = 0x07c6 // 0x1432 @0x2
0x1430…1439 at0004 = ╱a1╱ CURSOR ╱ // 0x1434 @0x4
0x1430…1439 at0005 = ╱47╱G╱ // 0x1435 @0x5
0x1430…1439 at0006 = ╱ec╱,╱ // 0x1436 @0x6
0x1430…1439 at0007 = ╱56╱V╱ // 0x1437 @0x7
0x1430…1439 at0008 = EOL // 0x1438 @0x8
0x1430…1439 }
0x1439…145d a1b4 2000 PRINT "Linie Vr.nr. Antal Tekst";
0x1439…145d LineComalBin {
0x1439…145d ptr = 0xa1b4 // 0x1439 @0x0
0x1439…145d lno = 0x07d0 // 0x143b @0x2
0x1439…145d at0004 = ╱92╱ PRINT ╱ // 0x143d @0x4
0x1439…145d at0005 = ╱22╱"╱ // 0x143e @0x5
0x1439…145d at0006 = ╱4c╱L╱ // 0x143f @0x6
0x1439…145d at0007 = ╱69╱i╱ // 0x1440 @0x7
0x1439…145d at0008 = ╱6e╱n╱ // 0x1441 @0x8
0x1439…145d at0009 = ╱69╱i╱ // 0x1442 @0x9
0x1439…145d at000a = ╱65╱e╱ // 0x1443 @0xa
0x1439…145d at000b = ╱20╱…╱ // 0x1444 @0xb
0x1439…145d at000c = ╱20╱…╱ // 0x1445 @0xc
0x1439…145d at000d = ╱56╱V╱ // 0x1446 @0xd
0x1439…145d at000e = ╱72╱r╱ // 0x1447 @0xe
0x1439…145d at000f = ╱2e╱.╱ // 0x1448 @0xf
0x1439…145d at0010 = ╱6e╱n╱ // 0x1449 @0x10
0x1439…145d at0011 = ╱72╱r╱ // 0x144a @0x11
0x1439…145d at0012 = ╱2e╱.╱ // 0x144b @0x12
0x1439…145d at0013 = ╱20╱…╱ // 0x144c @0x13
0x1439…145d at0014 = ╱20╱…╱ // 0x144d @0x14
0x1439…145d at0015 = ╱41╱A╱ // 0x144e @0x15
0x1439…145d at0016 = ╱6e╱n╱ // 0x144f @0x16
0x1439…145d at0017 = ╱74╱t╱ // 0x1450 @0x17
0x1439…145d at0018 = ╱61╱a╱ // 0x1451 @0x18
0x1439…145d at0019 = ╱6c╱l╱ // 0x1452 @0x19
0x1439…145d at001a = ╱20╱…╱ // 0x1453 @0x1a
0x1439…145d at001b = ╱20╱…╱ // 0x1454 @0x1b
0x1439…145d at001c = ╱54╱T╱ // 0x1455 @0x1c
0x1439…145d at001d = ╱65╱e╱ // 0x1456 @0x1d
0x1439…145d at001e = ╱6b╱k╱ // 0x1457 @0x1e
0x1439…145d at001f = ╱73╱s╱ // 0x1458 @0x1f
0x1439…145d at0020 = ╱74╱t╱ // 0x1459 @0x20
0x1439…145d at0021 = ╱22╱"╱ // 0x145a @0x21
0x1439…145d at0022 = ╱eb╱;╱ // 0x145b @0x22
0x1439…145d at0023 = EOL // 0x145c @0x23
0x1439…145d }
0x145d…146c a1c3 2010 CURSOR 56,V
0x145d…146c LineComalBin {
0x145d…146c ptr = 0xa1c3 // 0x145d @0x0
0x145d…146c lno = 0x07da // 0x145f @0x2
0x145d…146c at0004 = ╱a1╱ CURSOR ╱ // 0x1461 @0x4
0x145d…146c at0005 = ╱35╱5╱ // 0x1462 @0x5
0x145d…146c at0006 = ╱36╱6╱ // 0x1463 @0x6
0x145d…146c at0007 = ╱fe0000e006╱ // 0x1464 @0x7
0x145d…146c at000c = ╱ec╱,╱ // 0x1469 @0xc
0x145d…146c at000d = ╱56╱V╱ // 0x146a @0xd
0x145d…146c at000e = EOL // 0x146b @0xe
0x145d…146c }
0x146c…1487 a1de 2020 PRINT "Pris Beløb"
0x146c…1487 LineComalBin {
0x146c…1487 ptr = 0xa1de // 0x146c @0x0
0x146c…1487 lno = 0x07e4 // 0x146e @0x2
0x146c…1487 at0004 = ╱92╱ PRINT ╱ // 0x1470 @0x4
0x146c…1487 at0005 = ╱22╱"╱ // 0x1471 @0x5
0x146c…1487 at0006 = ╱50╱P╱ // 0x1472 @0x6
0x146c…1487 at0007 = ╱72╱r╱ // 0x1473 @0x7
0x146c…1487 at0008 = ╱69╱i╱ // 0x1474 @0x8
0x146c…1487 at0009 = ╱73╱s╱ // 0x1475 @0x9
0x146c…1487 at000a = ╱20╱…╱ // 0x1476 @0xa
0x146c…1487 at000b = ╱20╱…╱ // 0x1477 @0xb
0x146c…1487 at000c = ╱20╱…╱ // 0x1478 @0xc
0x146c…1487 at000d = ╱20╱…╱ // 0x1479 @0xd
0x146c…1487 at000e = ╱20╱…╱ // 0x147a @0xe
0x146c…1487 at000f = ╱20╱…╱ // 0x147b @0xf
0x146c…1487 at0010 = ╱20╱…╱ // 0x147c @0x10
0x146c…1487 at0011 = ╱20╱…╱ // 0x147d @0x11
0x146c…1487 at0012 = ╱20╱…╱ // 0x147e @0x12
0x146c…1487 at0013 = ╱20╱…╱ // 0x147f @0x13
0x146c…1487 at0014 = ╱42╱B╱ // 0x1480 @0x14
0x146c…1487 at0015 = ╱65╱e╱ // 0x1481 @0x15
0x146c…1487 at0016 = ╱6c╱l╱ // 0x1482 @0x16
0x146c…1487 at0017 = ╱7c╱ø╱ // 0x1483 @0x17
0x146c…1487 at0018 = ╱62╱b╱ // 0x1484 @0x18
0x146c…1487 at0019 = ╱22╱"╱ // 0x1485 @0x19
0x146c…1487 at001a = EOL // 0x1486 @0x1a
0x146c…1487 }
0x1487…1496 a1ed 2030 LIE=5
0x1487…1496 LineComalBin {
0x1487…1496 ptr = 0xa1ed // 0x1487 @0x0
0x1487…1496 lno = 0x07ee // 0x1489 @0x2
0x1487…1496 at0004 = ╱4c╱L╱ // 0x148b @0x4
0x1487…1496 at0005 = ╱49╱I╱ // 0x148c @0x5
0x1487…1496 at0006 = ╱45╱E╱ // 0x148d @0x6
0x1487…1496 at0007 = ╱dc╱=╱ // 0x148e @0x7
0x1487…1496 at0008 = ╱35╱5╱ // 0x148f @0x8
0x1487…1496 at0009 = ╱fe0000a003╱ // 0x1490 @0x9
0x1487…1496 at000e = EOL // 0x1495 @0xe
0x1487…1496 }
0x1496…149c a1f3 2040 ENDPROC
0x1496…149c LineComalBin {
0x1496…149c ptr = 0xa1f3 // 0x1496 @0x0
0x1496…149c lno = 0x07f8 // 0x1498 @0x2
0x1496…149c at0004 = ╱9f╱ ENDPROC ╱ // 0x149a @0x4
0x1496…149c at0005 = EOL // 0x149b @0x5
0x1496…149c }
0x149c…14aa a201 2050 PROC VARELINI
0x149c…14aa LineComalBin {
0x149c…14aa ptr = 0xa201 // 0x149c @0x0
0x149c…14aa lno = 0x0802 // 0x149e @0x2
0x149c…14aa at0004 = ╱9e╱ PROC ╱ // 0x14a0 @0x4
0x149c…14aa at0005 = ╱56╱V╱ // 0x14a1 @0x5
0x149c…14aa at0006 = ╱41╱A╱ // 0x14a2 @0x6
0x149c…14aa at0007 = ╱52╱R╱ // 0x14a3 @0x7
0x149c…14aa at0008 = ╱45╱E╱ // 0x14a4 @0x8
0x149c…14aa at0009 = ╱4c╱L╱ // 0x14a5 @0x9
0x149c…14aa at000a = ╱49╱I╱ // 0x14a6 @0xa
0x149c…14aa at000b = ╱4e╱N╱ // 0x14a7 @0xb
0x149c…14aa at000c = ╱49╱I╱ // 0x14a8 @0xc
0x149c…14aa at000d = EOL // 0x14a9 @0xd
0x149c…14aa }
0x14aa…14b0 a207 2060 REPEAT
0x14aa…14b0 LineComalBin {
0x14aa…14b0 ptr = 0xa207 // 0x14aa @0x0
0x14aa…14b0 lno = 0x080c // 0x14ac @0x2
0x14aa…14b0 at0004 = ╱97╱ REPEAT ╱ // 0x14ae @0x4
0x14aa…14b0 at0005 = EOL // 0x14af @0x5
0x14aa…14b0 }
0x14b0…14c8 a21f 2070 FE6=B;VARTEKST$=BK$
0x14b0…14c8 LineComalBin {
0x14b0…14c8 ptr = 0xa21f // 0x14b0 @0x0
0x14b0…14c8 lno = 0x0816 // 0x14b2 @0x2
0x14b0…14c8 at0004 = ╱46╱F╱ // 0x14b4 @0x4
0x14b0…14c8 at0005 = ╱45╱E╱ // 0x14b5 @0x5
0x14b0…14c8 at0006 = ╱36╱6╱ // 0x14b6 @0x6
0x14b0…14c8 at0007 = ╱dc╱=╱ // 0x14b7 @0x7
0x14b0…14c8 at0008 = ╱42╱B╱ // 0x14b8 @0x8
0x14b0…14c8 at0009 = ╱eb╱;╱ // 0x14b9 @0x9
0x14b0…14c8 at000a = ╱56╱V╱ // 0x14ba @0xa
0x14b0…14c8 at000b = ╱41╱A╱ // 0x14bb @0xb
0x14b0…14c8 at000c = ╱52╱R╱ // 0x14bc @0xc
0x14b0…14c8 at000d = ╱54╱T╱ // 0x14bd @0xd
0x14b0…14c8 at000e = ╱45╱E╱ // 0x14be @0xe
0x14b0…14c8 at000f = ╱4b╱K╱ // 0x14bf @0xf
0x14b0…14c8 at0010 = ╱53╱S╱ // 0x14c0 @0x10
0x14b0…14c8 at0011 = ╱54╱T╱ // 0x14c1 @0x11
0x14b0…14c8 at0012 = ╱ef╱$╱ // 0x14c2 @0x12
0x14b0…14c8 at0013 = ╱dc╱=╱ // 0x14c3 @0x13
0x14b0…14c8 at0014 = ╱42╱B╱ // 0x14c4 @0x14
0x14b0…14c8 at0015 = ╱4b╱K╱ // 0x14c5 @0x15
0x14b0…14c8 at0016 = ╱ef╱$╱ // 0x14c6 @0x16
0x14b0…14c8 at0017 = EOL // 0x14c7 @0x17
0x14b0…14c8 }
0x14c8…14d3 a22a 2080 CURSOR V,LIE
0x14c8…14d3 LineComalBin {
0x14c8…14d3 ptr = 0xa22a // 0x14c8 @0x0
0x14c8…14d3 lno = 0x0820 // 0x14ca @0x2
0x14c8…14d3 at0004 = ╱a1╱ CURSOR ╱ // 0x14cc @0x4
0x14c8…14d3 at0005 = ╱56╱V╱ // 0x14cd @0x5
0x14c8…14d3 at0006 = ╱ec╱,╱ // 0x14ce @0x6
0x14c8…14d3 at0007 = ╱4c╱L╱ // 0x14cf @0x7
0x14c8…14d3 at0008 = ╱49╱I╱ // 0x14d0 @0x8
0x14c8…14d3 at0009 = ╱45╱E╱ // 0x14d1 @0x9
0x14c8…14d3 at000a = EOL // 0x14d2 @0xa
0x14c8…14d3 }
0x14d3…14e5 a23c 2090 PRINT USING "###":VLIN;
0x14d3…14e5 LineComalBin {
0x14d3…14e5 ptr = 0xa23c // 0x14d3 @0x0
0x14d3…14e5 lno = 0x082a // 0x14d5 @0x2
0x14d3…14e5 at0004 = ╱92╱ PRINT ╱ // 0x14d7 @0x4
0x14d3…14e5 at0005 = ╱b9╱ USING ╱ // 0x14d8 @0x5
0x14d3…14e5 at0006 = ╱22╱"╱ // 0x14d9 @0x6
0x14d3…14e5 at0007 = ╱23╱#╱ // 0x14da @0x7
0x14d3…14e5 at0008 = ╱23╱#╱ // 0x14db @0x8
0x14d3…14e5 at0009 = ╱23╱#╱ // 0x14dc @0x9
0x14d3…14e5 at000a = ╱22╱"╱ // 0x14dd @0xa
0x14d3…14e5 at000b = ╱f0╱:╱ // 0x14de @0xb
0x14d3…14e5 at000c = ╱56╱V╱ // 0x14df @0xc
0x14d3…14e5 at000d = ╱4c╱L╱ // 0x14e0 @0xd
0x14d3…14e5 at000e = ╱49╱I╱ // 0x14e1 @0xe
0x14d3…14e5 at000f = ╱4e╱N╱ // 0x14e2 @0xf
0x14d3…14e5 at0010 = ╱eb╱;╱ // 0x14e3 @0x10
0x14d3…14e5 at0011 = EOL // 0x14e4 @0x11
0x14d3…14e5 }
0x14e5…14f9 a250 2100 PRINT BK$(E:55)
0x14e5…14f9 LineComalBin {
0x14e5…14f9 ptr = 0xa250 // 0x14e5 @0x0
0x14e5…14f9 lno = 0x0834 // 0x14e7 @0x2
0x14e5…14f9 at0004 = ╱92╱ PRINT ╱ // 0x14e9 @0x4
0x14e5…14f9 at0005 = ╱42╱B╱ // 0x14ea @0x5
0x14e5…14f9 at0006 = ╱4b╱K╱ // 0x14eb @0x6
0x14e5…14f9 at0007 = ╱ef╱$╱ // 0x14ec @0x7
0x14e5…14f9 at0008 = ╱ed╱(╱ // 0x14ed @0x8
0x14e5…14f9 at0009 = ╱45╱E╱ // 0x14ee @0x9
0x14e5…14f9 at000a = ╱f0╱:╱ // 0x14ef @0xa
0x14e5…14f9 at000b = ╱35╱5╱ // 0x14f0 @0xb
0x14e5…14f9 at000c = ╱35╱5╱ // 0x14f1 @0xc
0x14e5…14f9 at000d = ╱fe0000dc06╱ // 0x14f2 @0xd
0x14e5…14f9 at0012 = ╱ee╱)╱ // 0x14f7 @0x12
0x14e5…14f9 at0013 = EOL // 0x14f8 @0x13
0x14e5…14f9 }
0x14f9…14ff a256 2110 REPEAT
0x14f9…14ff LineComalBin {
0x14f9…14ff ptr = 0xa256 // 0x14f9 @0x0
0x14f9…14ff lno = 0x083e // 0x14fb @0x2
0x14f9…14ff at0004 = ╱97╱ REPEAT ╱ // 0x14fd @0x4
0x14f9…14ff at0005 = EOL // 0x14fe @0x5
0x14f9…14ff }
0x14ff…1539 a290 2120 EXEC INDPUT1(8,LIE,-1,1000000,BK$(1))
0x14ff…1539 LineComalBin {
0x14ff…1539 ptr = 0xa290 // 0x14ff @0x0
0x14ff…1539 lno = 0x0848 // 0x1501 @0x2
0x14ff…1539 at0004 = ╱9d╱ EXEC ╱ // 0x1503 @0x4
0x14ff…1539 at0005 = ╱49╱I╱ // 0x1504 @0x5
0x14ff…1539 at0006 = ╱4e╱N╱ // 0x1505 @0x6
0x14ff…1539 at0007 = ╱44╱D╱ // 0x1506 @0x7
0x14ff…1539 at0008 = ╱50╱P╱ // 0x1507 @0x8
0x14ff…1539 at0009 = ╱55╱U╱ // 0x1508 @0x9
0x14ff…1539 at000a = ╱54╱T╱ // 0x1509 @0xa
0x14ff…1539 at000b = ╱31╱1╱ // 0x150a @0xb
0x14ff…1539 at000c = ╱ed╱(╱ // 0x150b @0xc
0x14ff…1539 at000d = ╱38╱8╱ // 0x150c @0xd
0x14ff…1539 at000e = ╱fe00008004╱ // 0x150d @0xe
0x14ff…1539 at0013 = ╱ec╱,╱ // 0x1512 @0x13
0x14ff…1539 at0014 = ╱4c╱L╱ // 0x1513 @0x14
0x14ff…1539 at0015 = ╱49╱I╱ // 0x1514 @0x15
0x14ff…1539 at0016 = ╱45╱E╱ // 0x1515 @0x16
0x14ff…1539 at0017 = ╱ec╱,╱ // 0x1516 @0x17
0x14ff…1539 at0018 = ╱e9╱-╱ // 0x1517 @0x18
0x14ff…1539 at0019 = ╱31╱1╱ // 0x1518 @0x19
0x14ff…1539 at001a = ╱fe00008001╱ // 0x1519 @0x1a
0x14ff…1539 at001f = ╱ec╱,╱ // 0x151e @0x1f
0x14ff…1539 at0020 = ╱31╱1╱ // 0x151f @0x20
0x14ff…1539 at0021 = ╱30╱0╱ // 0x1520 @0x21
0x14ff…1539 at0022 = ╱30╱0╱ // 0x1521 @0x22
0x14ff…1539 at0023 = ╱30╱0╱ // 0x1522 @0x23
0x14ff…1539 at0024 = ╱30╱0╱ // 0x1523 @0x24
0x14ff…1539 at0025 = ╱30╱0╱ // 0x1524 @0x25
0x14ff…1539 at0026 = ╱30╱0╱ // 0x1525 @0x26
0x14ff…1539 at0027 = ╱fe0024f414╱ // 0x1526 @0x27
0x14ff…1539 at002c = ╱ec╱,╱ // 0x152b @0x2c
0x14ff…1539 at002d = ╱42╱B╱ // 0x152c @0x2d
0x14ff…1539 at002e = ╱4b╱K╱ // 0x152d @0x2e
0x14ff…1539 at002f = ╱ef╱$╱ // 0x152e @0x2f
0x14ff…1539 at0030 = ╱ed╱(╱ // 0x152f @0x30
0x14ff…1539 at0031 = ╱31╱1╱ // 0x1530 @0x31
0x14ff…1539 at0032 = ╱fe00008001╱ // 0x1531 @0x32
0x14ff…1539 at0037 = ╱ee╱)╱ // 0x1536 @0x37
0x14ff…1539 at0038 = ╱ee╱)╱ // 0x1537 @0x38
0x14ff…1539 at0039 = EOL // 0x1538 @0x39
0x14ff…1539 }
0x1539…154c a2a3 2130 UNTIL NOT (P=V AND VLIN=E)
0x1539…154c LineComalBin {
0x1539…154c ptr = 0xa2a3 // 0x1539 @0x0
0x1539…154c lno = 0x0852 // 0x153b @0x2
0x1539…154c at0004 = ╱98╱ UNTIL ╱ // 0x153d @0x4
0x1539…154c at0005 = ╱d9╱ NOT ╱ // 0x153e @0x5
0x1539…154c at0006 = ╱ed╱(╱ // 0x153f @0x6
0x1539…154c at0007 = ╱50╱P╱ // 0x1540 @0x7
0x1539…154c at0008 = ╱dc╱=╱ // 0x1541 @0x8
0x1539…154c at0009 = ╱56╱V╱ // 0x1542 @0x9
0x1539…154c at000a = ╱da╱ AND ╱ // 0x1543 @0xa
0x1539…154c at000b = ╱56╱V╱ // 0x1544 @0xb
0x1539…154c at000c = ╱4c╱L╱ // 0x1545 @0xc
0x1539…154c at000d = ╱49╱I╱ // 0x1546 @0xd
0x1539…154c at000e = ╱4e╱N╱ // 0x1547 @0xe
0x1539…154c at000f = ╱dc╱=╱ // 0x1548 @0xf
0x1539…154c at0010 = ╱45╱E╱ // 0x1549 @0x10
0x1539…154c at0011 = ╱ee╱)╱ // 0x154a @0x11
0x1539…154c at0012 = EOL // 0x154b @0x12
0x1539…154c }
0x154c…1559 a2b0 2140 VARENR=P
0x154c…1559 LineComalBin {
0x154c…1559 ptr = 0xa2b0 // 0x154c @0x0
0x154c…1559 lno = 0x085c // 0x154e @0x2
0x154c…1559 at0004 = ╱56╱V╱ // 0x1550 @0x4
0x154c…1559 at0005 = ╱41╱A╱ // 0x1551 @0x5
0x154c…1559 at0006 = ╱52╱R╱ // 0x1552 @0x6
0x154c…1559 at0007 = ╱45╱E╱ // 0x1553 @0x7
0x154c…1559 at0008 = ╱4e╱N╱ // 0x1554 @0x8
0x154c…1559 at0009 = ╱52╱R╱ // 0x1555 @0x9
0x154c…1559 at000a = ╱dc╱=╱ // 0x1556 @0xa
0x154c…1559 at000b = ╱50╱P╱ // 0x1557 @0xb
0x154c…1559 at000c = EOL // 0x1558 @0xc
0x154c…1559 }
0x1559…1568 a2bf 2150 IF VARENR<>B THEN
0x1559…1568 LineComalBin {
0x1559…1568 ptr = 0xa2bf // 0x1559 @0x0
0x1559…1568 lno = 0x0866 // 0x155b @0x2
0x1559…1568 at0004 = ╱9c╱ IF ╱ // 0x155d @0x4
0x1559…1568 at0005 = ╱56╱V╱ // 0x155e @0x5
0x1559…1568 at0006 = ╱41╱A╱ // 0x155f @0x6
0x1559…1568 at0007 = ╱52╱R╱ // 0x1560 @0x7
0x1559…1568 at0008 = ╱45╱E╱ // 0x1561 @0x8
0x1559…1568 at0009 = ╱4e╱N╱ // 0x1562 @0x9
0x1559…1568 at000a = ╱52╱R╱ // 0x1563 @0xa
0x1559…1568 at000b = ╱e1╱<>╱ // 0x1564 @0xb
0x1559…1568 at000c = ╱42╱B╱ // 0x1565 @0xc
0x1559…1568 at000d = ╱b6╱ THEN ╱ // 0x1566 @0xd
0x1559…1568 at000e = EOL // 0x1567 @0xe
0x1559…1568 }
0x1568…1578 a2cf 2160 CURSOR 8,LIE
0x1568…1578 LineComalBin {
0x1568…1578 ptr = 0xa2cf // 0x1568 @0x0
0x1568…1578 lno = 0x0870 // 0x156a @0x2
0x1568…1578 at0004 = ╱a1╱ CURSOR ╱ // 0x156c @0x4
0x1568…1578 at0005 = ╱38╱8╱ // 0x156d @0x5
0x1568…1578 at0006 = ╱fe00008004╱ // 0x156e @0x6
0x1568…1578 at000b = ╱ec╱,╱ // 0x1573 @0xb
0x1568…1578 at000c = ╱4c╱L╱ // 0x1574 @0xc
0x1568…1578 at000d = ╱49╱I╱ // 0x1575 @0xd
0x1568…1578 at000e = ╱45╱E╱ // 0x1576 @0xe
0x1568…1578 at000f = EOL // 0x1577 @0xf
0x1568…1578 }
0x1578…158c a2e3 2170 IF VARENR<5 THEN
0x1578…158c LineComalBin {
0x1578…158c ptr = 0xa2e3 // 0x1578 @0x0
0x1578…158c lno = 0x087a // 0x157a @0x2
0x1578…158c at0004 = ╱9c╱ IF ╱ // 0x157c @0x4
0x1578…158c at0005 = ╱56╱V╱ // 0x157d @0x5
0x1578…158c at0006 = ╱41╱A╱ // 0x157e @0x6
0x1578…158c at0007 = ╱52╱R╱ // 0x157f @0x7
0x1578…158c at0008 = ╱45╱E╱ // 0x1580 @0x8
0x1578…158c at0009 = ╱4e╱N╱ // 0x1581 @0x9
0x1578…158c at000a = ╱52╱R╱ // 0x1582 @0xa
0x1578…158c at000b = ╱dd╱<╱ // 0x1583 @0xb
0x1578…158c at000c = ╱35╱5╱ // 0x1584 @0xc
0x1578…158c at000d = ╱fe0000a003╱ // 0x1585 @0xd
0x1578…158c at0012 = ╱b6╱ THEN ╱ // 0x158a @0x12
0x1578…158c at0013 = EOL // 0x158b @0x13
0x1578…158c }
0x158c…15a0 a2f7 2180 PRINT BK$(E:25)
0x158c…15a0 LineComalBin {
0x158c…15a0 ptr = 0xa2f7 // 0x158c @0x0
0x158c…15a0 lno = 0x0884 // 0x158e @0x2
0x158c…15a0 at0004 = ╱92╱ PRINT ╱ // 0x1590 @0x4
0x158c…15a0 at0005 = ╱42╱B╱ // 0x1591 @0x5
0x158c…15a0 at0006 = ╱4b╱K╱ // 0x1592 @0x6
0x158c…15a0 at0007 = ╱ef╱$╱ // 0x1593 @0x7
0x158c…15a0 at0008 = ╱ed╱(╱ // 0x1594 @0x8
0x158c…15a0 at0009 = ╱45╱E╱ // 0x1595 @0x9
0x158c…15a0 at000a = ╱f0╱:╱ // 0x1596 @0xa
0x158c…15a0 at000b = ╱32╱2╱ // 0x1597 @0xb
0x158c…15a0 at000c = ╱35╱5╱ // 0x1598 @0xc
0x158c…15a0 at000d = ╱fe0000c805╱ // 0x1599 @0xd
0x158c…15a0 at0012 = ╱ee╱)╱ // 0x159e @0x12
0x158c…15a0 at0013 = EOL // 0x159f @0x13
0x158c…15a0 }
0x15a0…15a6 a2fd 2190 ELSE
0x15a0…15a6 LineComalBin {
0x15a0…15a6 ptr = 0xa2fd // 0x15a0 @0x0
0x15a0…15a6 lno = 0x088e // 0x15a2 @0x2
0x15a0…15a6 at0004 = ╱9a╱ ELSE ╱ // 0x15a4 @0x4
0x15a0…15a6 at0005 = EOL // 0x15a5 @0x5
0x15a0…15a6 }
0x15a6…15be a315 2200 PRINT USING "####### ":VARENR
0x15a6…15be LineComalBin {
0x15a6…15be ptr = 0xa315 // 0x15a6 @0x0
0x15a6…15be lno = 0x0898 // 0x15a8 @0x2
0x15a6…15be at0004 = ╱92╱ PRINT ╱ // 0x15aa @0x4
0x15a6…15be at0005 = ╱b9╱ USING ╱ // 0x15ab @0x5
0x15a6…15be at0006 = ╱22╱"╱ // 0x15ac @0x6
0x15a6…15be at0007 = ╱23╱#╱ // 0x15ad @0x7
0x15a6…15be at0008 = ╱23╱#╱ // 0x15ae @0x8
0x15a6…15be at0009 = ╱23╱#╱ // 0x15af @0x9
0x15a6…15be at000a = ╱23╱#╱ // 0x15b0 @0xa
0x15a6…15be at000b = ╱23╱#╱ // 0x15b1 @0xb
0x15a6…15be at000c = ╱23╱#╱ // 0x15b2 @0xc
0x15a6…15be at000d = ╱23╱#╱ // 0x15b3 @0xd
0x15a6…15be at000e = ╱20╱…╱ // 0x15b4 @0xe
0x15a6…15be at000f = ╱22╱"╱ // 0x15b5 @0xf
0x15a6…15be at0010 = ╱f0╱:╱ // 0x15b6 @0x10
0x15a6…15be at0011 = ╱56╱V╱ // 0x15b7 @0x11
0x15a6…15be at0012 = ╱41╱A╱ // 0x15b8 @0x12
0x15a6…15be at0013 = ╱52╱R╱ // 0x15b9 @0x13
0x15a6…15be at0014 = ╱45╱E╱ // 0x15ba @0x14
0x15a6…15be at0015 = ╱4e╱N╱ // 0x15bb @0x15
0x15a6…15be at0016 = ╱52╱R╱ // 0x15bc @0x16
0x15a6…15be at0017 = EOL // 0x15bd @0x17
0x15a6…15be }
0x15be…15c4 a31b 2210 ENDIF
0x15be…15c4 LineComalBin {
0x15be…15c4 ptr = 0xa31b // 0x15be @0x0
0x15be…15c4 lno = 0x08a2 // 0x15c0 @0x2
0x15be…15c4 at0004 = ╱9b╱ ENDIF ╱ // 0x15c2 @0x4
0x15be…15c4 at0005 = EOL // 0x15c3 @0x5
0x15be…15c4 }
0x15c4…15d2 a329 2220 CASE VARENR OF
0x15c4…15d2 LineComalBin {
0x15c4…15d2 ptr = 0xa329 // 0x15c4 @0x0
0x15c4…15d2 lno = 0x08ac // 0x15c6 @0x2
0x15c4…15d2 at0004 = ╱a201╱ CASE ╱ // 0x15c8 @0x4
0x15c4…15d2 at0006 = ╱56╱V╱ // 0x15ca @0x6
0x15c4…15d2 at0007 = ╱41╱A╱ // 0x15cb @0x7
0x15c4…15d2 at0008 = ╱52╱R╱ // 0x15cc @0x8
0x15c4…15d2 at0009 = ╱45╱E╱ // 0x15cd @0x9
0x15c4…15d2 at000a = ╱4e╱N╱ // 0x15ce @0xa
0x15c4…15d2 at000b = ╱52╱R╱ // 0x15cf @0xb
0x15c4…15d2 at000c = ╱ba╱ OF ╱ // 0x15d0 @0xc
0x15c4…15d2 at000d = EOL // 0x15d1 @0xd
0x15c4…15d2 }
0x15d2…1603 a35a 2230 EXEC FPOST1(VTAB1,VTAB,MVANTAL,VARENR,VPIL3,K3$)
0x15d2…1603 LineComalBin {
0x15d2…1603 ptr = 0xa35a // 0x15d2 @0x0
0x15d2…1603 lno = 0x08b6 // 0x15d4 @0x2
0x15d2…1603 at0004 = ╱9d╱ EXEC ╱ // 0x15d6 @0x4
0x15d2…1603 at0005 = ╱46╱F╱ // 0x15d7 @0x5
0x15d2…1603 at0006 = ╱50╱P╱ // 0x15d8 @0x6
0x15d2…1603 at0007 = ╱4f╱O╱ // 0x15d9 @0x7
0x15d2…1603 at0008 = ╱53╱S╱ // 0x15da @0x8
0x15d2…1603 at0009 = ╱54╱T╱ // 0x15db @0x9
0x15d2…1603 at000a = ╱31╱1╱ // 0x15dc @0xa
0x15d2…1603 at000b = ╱ed╱(╱ // 0x15dd @0xb
0x15d2…1603 at000c = ╱56╱V╱ // 0x15de @0xc
0x15d2…1603 at000d = ╱54╱T╱ // 0x15df @0xd
0x15d2…1603 at000e = ╱41╱A╱ // 0x15e0 @0xe
0x15d2…1603 at000f = ╱42╱B╱ // 0x15e1 @0xf
0x15d2…1603 at0010 = ╱31╱1╱ // 0x15e2 @0x10
0x15d2…1603 at0011 = ╱ec╱,╱ // 0x15e3 @0x11
0x15d2…1603 at0012 = ╱56╱V╱ // 0x15e4 @0x12
0x15d2…1603 at0013 = ╱54╱T╱ // 0x15e5 @0x13
0x15d2…1603 at0014 = ╱41╱A╱ // 0x15e6 @0x14
0x15d2…1603 at0015 = ╱42╱B╱ // 0x15e7 @0x15
0x15d2…1603 at0016 = ╱ec╱,╱ // 0x15e8 @0x16
0x15d2…1603 at0017 = ╱4d╱M╱ // 0x15e9 @0x17
0x15d2…1603 at0018 = ╱56╱V╱ // 0x15ea @0x18
0x15d2…1603 at0019 = ╱41╱A╱ // 0x15eb @0x19
0x15d2…1603 at001a = ╱4e╱N╱ // 0x15ec @0x1a
0x15d2…1603 at001b = ╱54╱T╱ // 0x15ed @0x1b
0x15d2…1603 at001c = ╱41╱A╱ // 0x15ee @0x1c
0x15d2…1603 at001d = ╱4c╱L╱ // 0x15ef @0x1d
0x15d2…1603 at001e = ╱ec╱,╱ // 0x15f0 @0x1e
0x15d2…1603 at001f = ╱56╱V╱ // 0x15f1 @0x1f
0x15d2…1603 at0020 = ╱41╱A╱ // 0x15f2 @0x20
0x15d2…1603 at0021 = ╱52╱R╱ // 0x15f3 @0x21
0x15d2…1603 at0022 = ╱45╱E╱ // 0x15f4 @0x22
0x15d2…1603 at0023 = ╱4e╱N╱ // 0x15f5 @0x23
0x15d2…1603 at0024 = ╱52╱R╱ // 0x15f6 @0x24
0x15d2…1603 at0025 = ╱ec╱,╱ // 0x15f7 @0x25
0x15d2…1603 at0026 = ╱56╱V╱ // 0x15f8 @0x26
0x15d2…1603 at0027 = ╱50╱P╱ // 0x15f9 @0x27
0x15d2…1603 at0028 = ╱49╱I╱ // 0x15fa @0x28
0x15d2…1603 at0029 = ╱4c╱L╱ // 0x15fb @0x29
0x15d2…1603 at002a = ╱33╱3╱ // 0x15fc @0x2a
0x15d2…1603 at002b = ╱ec╱,╱ // 0x15fd @0x2b
0x15d2…1603 at002c = ╱4b╱K╱ // 0x15fe @0x2c
0x15d2…1603 at002d = ╱33╱3╱ // 0x15ff @0x2d
0x15d2…1603 at002e = ╱ef╱$╱ // 0x1600 @0x2e
0x15d2…1603 at002f = ╱ee╱)╱ // 0x1601 @0x2f
0x15d2…1603 at0030 = EOL // 0x1602 @0x30
0x15d2…1603 }
0x1603…1610 a367 2240 IF CEKS<>B THEN
0x1603…1610 LineComalBin {
0x1603…1610 ptr = 0xa367 // 0x1603 @0x0
0x1603…1610 lno = 0x08c0 // 0x1605 @0x2
0x1603…1610 at0004 = ╱9c╱ IF ╱ // 0x1607 @0x4
0x1603…1610 at0005 = ╱43╱C╱ // 0x1608 @0x5
0x1603…1610 at0006 = ╱45╱E╱ // 0x1609 @0x6
0x1603…1610 at0007 = ╱4b╱K╱ // 0x160a @0x7
0x1603…1610 at0008 = ╱53╱S╱ // 0x160b @0x8
0x1603…1610 at0009 = ╱e1╱<>╱ // 0x160c @0x9
0x1603…1610 at000a = ╱42╱B╱ // 0x160d @0xa
0x1603…1610 at000b = ╱b6╱ THEN ╱ // 0x160e @0xb
0x1603…1610 at000c = EOL // 0x160f @0xc
0x1603…1610 }
0x1610…1621 a378 2250 CURSOR 17,LIE
0x1610…1621 LineComalBin {
0x1610…1621 ptr = 0xa378 // 0x1610 @0x0
0x1610…1621 lno = 0x08ca // 0x1612 @0x2
0x1610…1621 at0004 = ╱a1╱ CURSOR ╱ // 0x1614 @0x4
0x1610…1621 at0005 = ╱31╱1╱ // 0x1615 @0x5
0x1610…1621 at0006 = ╱37╱7╱ // 0x1616 @0x6
0x1610…1621 at0007 = ╱fe00008805╱ // 0x1617 @0x7
0x1610…1621 at000c = ╱ec╱,╱ // 0x161c @0xc
0x1610…1621 at000d = ╱4c╱L╱ // 0x161d @0xd
0x1610…1621 at000e = ╱49╱I╱ // 0x161e @0xe
0x1610…1621 at000f = ╱45╱E╱ // 0x161f @0xf
0x1610…1621 at0010 = EOL // 0x1620 @0x10
0x1610…1621 }
0x1621…165a a3b1 2260 INPUT "Varenummeret eksisterer ikke. Tast RETURN.",SVAR1$
0x1621…165a LineComalBin {
0x1621…165a ptr = 0xa3b1 // 0x1621 @0x0
0x1621…165a lno = 0x08d4 // 0x1623 @0x2
0x1621…165a at0004 = ╱91╱ INPUT ╱ // 0x1625 @0x4
0x1621…165a at0005 = ╱22╱"╱ // 0x1626 @0x5
0x1621…165a at0006 = ╱56╱V╱ // 0x1627 @0x6
0x1621…165a at0007 = ╱61╱a╱ // 0x1628 @0x7
0x1621…165a at0008 = ╱72╱r╱ // 0x1629 @0x8
0x1621…165a at0009 = ╱65╱e╱ // 0x162a @0x9
0x1621…165a at000a = ╱6e╱n╱ // 0x162b @0xa
0x1621…165a at000b = ╱75╱u╱ // 0x162c @0xb
0x1621…165a at000c = ╱6d╱m╱ // 0x162d @0xc
0x1621…165a at000d = ╱6d╱m╱ // 0x162e @0xd
0x1621…165a at000e = ╱65╱e╱ // 0x162f @0xe
0x1621…165a at000f = ╱72╱r╱ // 0x1630 @0xf
0x1621…165a at0010 = ╱65╱e╱ // 0x1631 @0x10
0x1621…165a at0011 = ╱74╱t╱ // 0x1632 @0x11
0x1621…165a at0012 = ╱20╱…╱ // 0x1633 @0x12
0x1621…165a at0013 = ╱65╱e╱ // 0x1634 @0x13
0x1621…165a at0014 = ╱6b╱k╱ // 0x1635 @0x14
0x1621…165a at0015 = ╱73╱s╱ // 0x1636 @0x15
0x1621…165a at0016 = ╱69╱i╱ // 0x1637 @0x16
0x1621…165a at0017 = ╱73╱s╱ // 0x1638 @0x17
0x1621…165a at0018 = ╱74╱t╱ // 0x1639 @0x18
0x1621…165a at0019 = ╱65╱e╱ // 0x163a @0x19
0x1621…165a at001a = ╱72╱r╱ // 0x163b @0x1a
0x1621…165a at001b = ╱65╱e╱ // 0x163c @0x1b
0x1621…165a at001c = ╱72╱r╱ // 0x163d @0x1c
0x1621…165a at001d = ╱20╱…╱ // 0x163e @0x1d
0x1621…165a at001e = ╱69╱i╱ // 0x163f @0x1e
0x1621…165a at001f = ╱6b╱k╱ // 0x1640 @0x1f
0x1621…165a at0020 = ╱6b╱k╱ // 0x1641 @0x20
0x1621…165a at0021 = ╱65╱e╱ // 0x1642 @0x21
0x1621…165a at0022 = ╱2e╱.╱ // 0x1643 @0x22
0x1621…165a at0023 = ╱20╱…╱ // 0x1644 @0x23
0x1621…165a at0024 = ╱54╱T╱ // 0x1645 @0x24
0x1621…165a at0025 = ╱61╱a╱ // 0x1646 @0x25
0x1621…165a at0026 = ╱73╱s╱ // 0x1647 @0x26
0x1621…165a at0027 = ╱74╱t╱ // 0x1648 @0x27
0x1621…165a at0028 = ╱20╱…╱ // 0x1649 @0x28
0x1621…165a at0029 = ╱52╱R╱ // 0x164a @0x29
0x1621…165a at002a = ╱45╱E╱ // 0x164b @0x2a
0x1621…165a at002b = ╱54╱T╱ // 0x164c @0x2b
0x1621…165a at002c = ╱55╱U╱ // 0x164d @0x2c
0x1621…165a at002d = ╱52╱R╱ // 0x164e @0x2d
0x1621…165a at002e = ╱4e╱N╱ // 0x164f @0x2e
0x1621…165a at002f = ╱2e╱.╱ // 0x1650 @0x2f
0x1621…165a at0030 = ╱22╱"╱ // 0x1651 @0x30
0x1621…165a at0031 = ╱ec╱,╱ // 0x1652 @0x31
0x1621…165a at0032 = ╱53╱S╱ // 0x1653 @0x32
0x1621…165a at0033 = ╱56╱V╱ // 0x1654 @0x33
0x1621…165a at0034 = ╱41╱A╱ // 0x1655 @0x34
0x1621…165a at0035 = ╱52╱R╱ // 0x1656 @0x35
0x1621…165a at0036 = ╱31╱1╱ // 0x1657 @0x36
0x1621…165a at0037 = ╱ef╱$╱ // 0x1658 @0x37
0x1621…165a at0038 = EOL // 0x1659 @0x38
0x1621…165a }
0x165a…1674 a3cb 2270 LIE=LIE-E;VLIN=VLIN-E
0x165a…1674 LineComalBin {
0x165a…1674 ptr = 0xa3cb // 0x165a @0x0
0x165a…1674 lno = 0x08de // 0x165c @0x2
0x165a…1674 at0004 = ╱4c╱L╱ // 0x165e @0x4
0x165a…1674 at0005 = ╱49╱I╱ // 0x165f @0x5
0x165a…1674 at0006 = ╱45╱E╱ // 0x1660 @0x6
0x165a…1674 at0007 = ╱dc╱=╱ // 0x1661 @0x7
0x165a…1674 at0008 = ╱4c╱L╱ // 0x1662 @0x8
0x165a…1674 at0009 = ╱49╱I╱ // 0x1663 @0x9
0x165a…1674 at000a = ╱45╱E╱ // 0x1664 @0xa
0x165a…1674 at000b = ╱e3╱-╱ // 0x1665 @0xb
0x165a…1674 at000c = ╱45╱E╱ // 0x1666 @0xc
0x165a…1674 at000d = ╱eb╱;╱ // 0x1667 @0xd
0x165a…1674 at000e = ╱56╱V╱ // 0x1668 @0xe
0x165a…1674 at000f = ╱4c╱L╱ // 0x1669 @0xf
0x165a…1674 at0010 = ╱49╱I╱ // 0x166a @0x10
0x165a…1674 at0011 = ╱4e╱N╱ // 0x166b @0x11
0x165a…1674 at0012 = ╱dc╱=╱ // 0x166c @0x12
0x165a…1674 at0013 = ╱56╱V╱ // 0x166d @0x13
0x165a…1674 at0014 = ╱4c╱L╱ // 0x166e @0x14
0x165a…1674 at0015 = ╱49╱I╱ // 0x166f @0x15
0x165a…1674 at0016 = ╱4e╱N╱ // 0x1670 @0x16
0x165a…1674 at0017 = ╱e3╱-╱ // 0x1671 @0x17
0x165a…1674 at0018 = ╱45╱E╱ // 0x1672 @0x18
0x165a…1674 at0019 = EOL // 0x1673 @0x19
0x165a…1674 }
0x1674…167a a3d1 2280 ELSE
0x1674…167a LineComalBin {
0x1674…167a ptr = 0xa3d1 // 0x1674 @0x0
0x1674…167a lno = 0x08e8 // 0x1676 @0x2
0x1674…167a at0004 = ╱9a╱ ELSE ╱ // 0x1678 @0x4
0x1674…167a at0005 = EOL // 0x1679 @0x5
0x1674…167a }
0x167a…16a7 a3fe 2290 EXEC INDPUT2(17,LIE,BK$(1),ANTAL$)
0x167a…16a7 LineComalBin {
0x167a…16a7 ptr = 0xa3fe // 0x167a @0x0
0x167a…16a7 lno = 0x08f2 // 0x167c @0x2
0x167a…16a7 at0004 = ╱9d╱ EXEC ╱ // 0x167e @0x4
0x167a…16a7 at0005 = ╱49╱I╱ // 0x167f @0x5
0x167a…16a7 at0006 = ╱4e╱N╱ // 0x1680 @0x6
0x167a…16a7 at0007 = ╱44╱D╱ // 0x1681 @0x7
0x167a…16a7 at0008 = ╱50╱P╱ // 0x1682 @0x8
0x167a…16a7 at0009 = ╱55╱U╱ // 0x1683 @0x9
0x167a…16a7 at000a = ╱54╱T╱ // 0x1684 @0xa
0x167a…16a7 at000b = ╱32╱2╱ // 0x1685 @0xb
0x167a…16a7 at000c = ╱ed╱(╱ // 0x1686 @0xc
0x167a…16a7 at000d = ╱31╱1╱ // 0x1687 @0xd
0x167a…16a7 at000e = ╱37╱7╱ // 0x1688 @0xe
0x167a…16a7 at000f = ╱fe00008805╱ // 0x1689 @0xf
0x167a…16a7 at0014 = ╱ec╱,╱ // 0x168e @0x14
0x167a…16a7 at0015 = ╱4c╱L╱ // 0x168f @0x15
0x167a…16a7 at0016 = ╱49╱I╱ // 0x1690 @0x16
0x167a…16a7 at0017 = ╱45╱E╱ // 0x1691 @0x17
0x167a…16a7 at0018 = ╱ec╱,╱ // 0x1692 @0x18
0x167a…16a7 at0019 = ╱42╱B╱ // 0x1693 @0x19
0x167a…16a7 at001a = ╱4b╱K╱ // 0x1694 @0x1a
0x167a…16a7 at001b = ╱ef╱$╱ // 0x1695 @0x1b
0x167a…16a7 at001c = ╱ed╱(╱ // 0x1696 @0x1c
0x167a…16a7 at001d = ╱31╱1╱ // 0x1697 @0x1d
0x167a…16a7 at001e = ╱fe00008001╱ // 0x1698 @0x1e
0x167a…16a7 at0023 = ╱ee╱)╱ // 0x169d @0x23
0x167a…16a7 at0024 = ╱ec╱,╱ // 0x169e @0x24
0x167a…16a7 at0025 = ╱41╱A╱ // 0x169f @0x25
0x167a…16a7 at0026 = ╱4e╱N╱ // 0x16a0 @0x26
0x167a…16a7 at0027 = ╱54╱T╱ // 0x16a1 @0x27
0x167a…16a7 at0028 = ╱41╱A╱ // 0x16a2 @0x28
0x167a…16a7 at0029 = ╱4c╱L╱ // 0x16a3 @0x29
0x167a…16a7 at002a = ╱ef╱$╱ // 0x16a4 @0x2a
0x167a…16a7 at002b = ╱ee╱)╱ // 0x16a5 @0x2b
0x167a…16a7 at002c = EOL // 0x16a6 @0x2c
0x167a…16a7 }
0x16a7…16c8 a41f 2300 EXEC CA(4,ANTAL$,TAH$,TAH$)
0x16a7…16c8 LineComalBin {
0x16a7…16c8 ptr = 0xa41f // 0x16a7 @0x0
0x16a7…16c8 lno = 0x08fc // 0x16a9 @0x2
0x16a7…16c8 at0004 = ╱9d╱ EXEC ╱ // 0x16ab @0x4
0x16a7…16c8 at0005 = ╱43╱C╱ // 0x16ac @0x5
0x16a7…16c8 at0006 = ╱41╱A╱ // 0x16ad @0x6
0x16a7…16c8 at0007 = ╱ed╱(╱ // 0x16ae @0x7
0x16a7…16c8 at0008 = ╱34╱4╱ // 0x16af @0x8
0x16a7…16c8 at0009 = ╱fe00008003╱ // 0x16b0 @0x9
0x16a7…16c8 at000e = ╱ec╱,╱ // 0x16b5 @0xe
0x16a7…16c8 at000f = ╱41╱A╱ // 0x16b6 @0xf
0x16a7…16c8 at0010 = ╱4e╱N╱ // 0x16b7 @0x10
0x16a7…16c8 at0011 = ╱54╱T╱ // 0x16b8 @0x11
0x16a7…16c8 at0012 = ╱41╱A╱ // 0x16b9 @0x12
0x16a7…16c8 at0013 = ╱4c╱L╱ // 0x16ba @0x13
0x16a7…16c8 at0014 = ╱ef╱$╱ // 0x16bb @0x14
0x16a7…16c8 at0015 = ╱ec╱,╱ // 0x16bc @0x15
0x16a7…16c8 at0016 = ╱54╱T╱ // 0x16bd @0x16
0x16a7…16c8 at0017 = ╱41╱A╱ // 0x16be @0x17
0x16a7…16c8 at0018 = ╱48╱H╱ // 0x16bf @0x18
0x16a7…16c8 at0019 = ╱ef╱$╱ // 0x16c0 @0x19
0x16a7…16c8 at001a = ╱ec╱,╱ // 0x16c1 @0x1a
0x16a7…16c8 at001b = ╱54╱T╱ // 0x16c2 @0x1b
0x16a7…16c8 at001c = ╱41╱A╱ // 0x16c3 @0x1c
0x16a7…16c8 at001d = ╱48╱H╱ // 0x16c4 @0x1d
0x16a7…16c8 at001e = ╱ef╱$╱ // 0x16c5 @0x1e
0x16a7…16c8 at001f = ╱ee╱)╱ // 0x16c6 @0x1f
0x16a7…16c8 at0020 = EOL // 0x16c7 @0x20
0x16a7…16c8 }
0x16c8…16d8 a42f 2310 IF SI=B THEN FE6=E
0x16c8…16d8 LineComalBin {
0x16c8…16d8 ptr = 0xa42f // 0x16c8 @0x0
0x16c8…16d8 lno = 0x0906 // 0x16ca @0x2
0x16c8…16d8 at0004 = ╱82╱ IF ╱ // 0x16cc @0x4
0x16c8…16d8 at0005 = ╱53╱S╱ // 0x16cd @0x5
0x16c8…16d8 at0006 = ╱49╱I╱ // 0x16ce @0x6
0x16c8…16d8 at0007 = ╱dc╱=╱ // 0x16cf @0x7
0x16c8…16d8 at0008 = ╱42╱B╱ // 0x16d0 @0x8
0x16c8…16d8 at0009 = ╱b6╱ THEN ╱ // 0x16d1 @0x9
0x16c8…16d8 at000a = ╱46╱F╱ // 0x16d2 @0xa
0x16c8…16d8 at000b = ╱45╱E╱ // 0x16d3 @0xb
0x16c8…16d8 at000c = ╱36╱6╱ // 0x16d4 @0xc
0x16c8…16d8 at000d = ╱dc╱=╱ // 0x16d5 @0xd
0x16c8…16d8 at000e = ╱45╱E╱ // 0x16d6 @0xe
0x16c8…16d8 at000f = EOL // 0x16d7 @0xf
0x16c8…16d8 }
0x16d8…16e4 a43b 2320 IF FE6=B THEN
0x16d8…16e4 LineComalBin {
0x16d8…16e4 ptr = 0xa43b // 0x16d8 @0x0
0x16d8…16e4 lno = 0x0910 // 0x16da @0x2
0x16d8…16e4 at0004 = ╱9c╱ IF ╱ // 0x16dc @0x4
0x16d8…16e4 at0005 = ╱46╱F╱ // 0x16dd @0x5
0x16d8…16e4 at0006 = ╱45╱E╱ // 0x16de @0x6
0x16d8…16e4 at0007 = ╱36╱6╱ // 0x16df @0x7
0x16d8…16e4 at0008 = ╱dc╱=╱ // 0x16e0 @0x8
0x16d8…16e4 at0009 = ╱42╱B╱ // 0x16e1 @0x9
0x16d8…16e4 at000a = ╱b6╱ THEN ╱ // 0x16e2 @0xa
0x16d8…16e4 at000b = EOL // 0x16e3 @0xb
0x16d8…16e4 }
0x16e4…16f5 a44c 2330 CURSOR 17,LIE
0x16e4…16f5 LineComalBin {
0x16e4…16f5 ptr = 0xa44c // 0x16e4 @0x0
0x16e4…16f5 lno = 0x091a // 0x16e6 @0x2
0x16e4…16f5 at0004 = ╱a1╱ CURSOR ╱ // 0x16e8 @0x4
0x16e4…16f5 at0005 = ╱31╱1╱ // 0x16e9 @0x5
0x16e4…16f5 at0006 = ╱37╱7╱ // 0x16ea @0x6
0x16e4…16f5 at0007 = ╱fe00008805╱ // 0x16eb @0x7
0x16e4…16f5 at000c = ╱ec╱,╱ // 0x16f0 @0xc
0x16e4…16f5 at000d = ╱4c╱L╱ // 0x16f1 @0xd
0x16e4…16f5 at000e = ╱49╱I╱ // 0x16f2 @0xe
0x16e4…16f5 at000f = ╱45╱E╱ // 0x16f3 @0xf
0x16e4…16f5 at0010 = EOL // 0x16f4 @0x10
0x16e4…16f5 }
0x16f5…16fe a455 2340 EXEC ANT
0x16f5…16fe LineComalBin {
0x16f5…16fe ptr = 0xa455 // 0x16f5 @0x0
0x16f5…16fe lno = 0x0924 // 0x16f7 @0x2
0x16f5…16fe at0004 = ╱9d╱ EXEC ╱ // 0x16f9 @0x4
0x16f5…16fe at0005 = ╱41╱A╱ // 0x16fa @0x5
0x16f5…16fe at0006 = ╱4e╱N╱ // 0x16fb @0x6
0x16f5…16fe at0007 = ╱54╱T╱ // 0x16fc @0x7
0x16f5…16fe at0008 = EOL // 0x16fd @0x8
0x16f5…16fe }
0x16fe…170d a464 2350 CURSOR E,23
0x16fe…170d LineComalBin {
0x16fe…170d ptr = 0xa464 // 0x16fe @0x0
0x16fe…170d lno = 0x092e // 0x1700 @0x2
0x16fe…170d at0004 = ╱a1╱ CURSOR ╱ // 0x1702 @0x4
0x16fe…170d at0005 = ╱45╱E╱ // 0x1703 @0x5
0x16fe…170d at0006 = ╱ec╱,╱ // 0x1704 @0x6
0x16fe…170d at0007 = ╱32╱2╱ // 0x1705 @0x7
0x16fe…170d at0008 = ╱33╱3╱ // 0x1706 @0x8
0x16fe…170d at0009 = ╱fe0000b805╱ // 0x1707 @0x9
0x16fe…170d at000e = EOL // 0x170c @0xe
0x16fe…170d }
0x170d…1715 a46c 2360 EXEC HV
0x170d…1715 LineComalBin {
0x170d…1715 ptr = 0xa46c // 0x170d @0x0
0x170d…1715 lno = 0x0938 // 0x170f @0x2
0x170d…1715 at0004 = ╱9d╱ EXEC ╱ // 0x1711 @0x4
0x170d…1715 at0005 = ╱48╱H╱ // 0x1712 @0x5
0x170d…1715 at0006 = ╱56╱V╱ // 0x1713 @0x6
0x170d…1715 at0007 = EOL // 0x1714 @0x7
0x170d…1715 }
0x1715…1726 a47d 2370 CURSOR 23,LIE
0x1715…1726 LineComalBin {
0x1715…1726 ptr = 0xa47d // 0x1715 @0x0
0x1715…1726 lno = 0x0942 // 0x1717 @0x2
0x1715…1726 at0004 = ╱a1╱ CURSOR ╱ // 0x1719 @0x4
0x1715…1726 at0005 = ╱32╱2╱ // 0x171a @0x5
0x1715…1726 at0006 = ╱33╱3╱ // 0x171b @0x6
0x1715…1726 at0007 = ╱fe0000b805╱ // 0x171c @0x7
0x1715…1726 at000c = ╱ec╱,╱ // 0x1721 @0xc
0x1715…1726 at000d = ╱4c╱L╱ // 0x1722 @0xd
0x1715…1726 at000e = ╱49╱I╱ // 0x1723 @0xe
0x1715…1726 at000f = ╱45╱E╱ // 0x1724 @0xf
0x1715…1726 at0010 = EOL // 0x1725 @0x10
0x1715…1726 }
0x1726…1745 a49c 2380 IF ORD(VARTEKST$(E))=255 THEN
0x1726…1745 LineComalBin {
0x1726…1745 ptr = 0xa49c // 0x1726 @0x0
0x1726…1745 lno = 0x094c // 0x1728 @0x2
0x1726…1745 at0004 = ╱9c╱ IF ╱ // 0x172a @0x4
0x1726…1745 at0005 = ╱cd╱ORD╱ // 0x172b @0x5
0x1726…1745 at0006 = ╱ed╱(╱ // 0x172c @0x6
0x1726…1745 at0007 = ╱56╱V╱ // 0x172d @0x7
0x1726…1745 at0008 = ╱41╱A╱ // 0x172e @0x8
0x1726…1745 at0009 = ╱52╱R╱ // 0x172f @0x9
0x1726…1745 at000a = ╱54╱T╱ // 0x1730 @0xa
0x1726…1745 at000b = ╱45╱E╱ // 0x1731 @0xb
0x1726…1745 at000c = ╱4b╱K╱ // 0x1732 @0xc
0x1726…1745 at000d = ╱53╱S╱ // 0x1733 @0xd
0x1726…1745 at000e = ╱54╱T╱ // 0x1734 @0xe
0x1726…1745 at000f = ╱ef╱$╱ // 0x1735 @0xf
0x1726…1745 at0010 = ╱ed╱(╱ // 0x1736 @0x10
0x1726…1745 at0011 = ╱45╱E╱ // 0x1737 @0x11
0x1726…1745 at0012 = ╱ee╱)╱ // 0x1738 @0x12
0x1726…1745 at0013 = ╱ee╱)╱ // 0x1739 @0x13
0x1726…1745 at0014 = ╱dc╱=╱ // 0x173a @0x14
0x1726…1745 at0015 = ╱32╱2╱ // 0x173b @0x15
0x1726…1745 at0016 = ╱35╱5╱ // 0x173c @0x16
0x1726…1745 at0017 = ╱35╱5╱ // 0x173d @0x17
0x1726…1745 at0018 = ╱fe0000ff08╱ // 0x173e @0x18
0x1726…1745 at001d = ╱b6╱ THEN ╱ // 0x1743 @0x1d
0x1726…1745 at001e = EOL // 0x1744 @0x1e
0x1726…1745 }
0x1745…1758 a4af 2390 INPUT " ",VARTEKST$
0x1745…1758 LineComalBin {
0x1745…1758 ptr = 0xa4af // 0x1745 @0x0
0x1745…1758 lno = 0x0956 // 0x1747 @0x2
0x1745…1758 at0004 = ╱91╱ INPUT ╱ // 0x1749 @0x4
0x1745…1758 at0005 = ╱22╱"╱ // 0x174a @0x5
0x1745…1758 at0006 = ╱20╱…╱ // 0x174b @0x6
0x1745…1758 at0007 = ╱22╱"╱ // 0x174c @0x7
0x1745…1758 at0008 = ╱ec╱,╱ // 0x174d @0x8
0x1745…1758 at0009 = ╱56╱V╱ // 0x174e @0x9
0x1745…1758 at000a = ╱41╱A╱ // 0x174f @0xa
0x1745…1758 at000b = ╱52╱R╱ // 0x1750 @0xb
0x1745…1758 at000c = ╱54╱T╱ // 0x1751 @0xc
0x1745…1758 at000d = ╱45╱E╱ // 0x1752 @0xd
0x1745…1758 at000e = ╱4b╱K╱ // 0x1753 @0xe
0x1745…1758 at000f = ╱53╱S╱ // 0x1754 @0xf
0x1745…1758 at0010 = ╱54╱T╱ // 0x1755 @0x10
0x1745…1758 at0011 = ╱ef╱$╱ // 0x1756 @0x11
0x1745…1758 at0012 = EOL // 0x1757 @0x12
0x1745…1758 }
0x1758…176b a4c2 2400 AKOD(VLIN,G)=E
0x1758…176b LineComalBin {
0x1758…176b ptr = 0xa4c2 // 0x1758 @0x0
0x1758…176b lno = 0x0960 // 0x175a @0x2
0x1758…176b at0004 = ╱41╱A╱ // 0x175c @0x4
0x1758…176b at0005 = ╱4b╱K╱ // 0x175d @0x5
0x1758…176b at0006 = ╱4f╱O╱ // 0x175e @0x6
0x1758…176b at0007 = ╱44╱D╱ // 0x175f @0x7
0x1758…176b at0008 = ╱ed╱(╱ // 0x1760 @0x8
0x1758…176b at0009 = ╱56╱V╱ // 0x1761 @0x9
0x1758…176b at000a = ╱4c╱L╱ // 0x1762 @0xa
0x1758…176b at000b = ╱49╱I╱ // 0x1763 @0xb
0x1758…176b at000c = ╱4e╱N╱ // 0x1764 @0xc
0x1758…176b at000d = ╱ec╱,╱ // 0x1765 @0xd
0x1758…176b at000e = ╱47╱G╱ // 0x1766 @0xe
0x1758…176b at000f = ╱ee╱)╱ // 0x1767 @0xf
0x1758…176b at0010 = ╱dc╱=╱ // 0x1768 @0x10
0x1758…176b at0011 = ╱45╱E╱ // 0x1769 @0x11
0x1758…176b at0012 = EOL // 0x176a @0x12
0x1758…176b }
0x176b…1771 a4c8 2410 ENDIF
0x176b…1771 LineComalBin {
0x176b…1771 ptr = 0xa4c8 // 0x176b @0x0
0x176b…1771 lno = 0x096a // 0x176d @0x2
0x176b…1771 at0004 = ╱9b╱ ENDIF ╱ // 0x176f @0x4
0x176b…1771 at0005 = EOL // 0x1770 @0x5
0x176b…1771 }
0x1771…1782 a4d9 2420 CURSOR 24,LIE
0x1771…1782 LineComalBin {
0x1771…1782 ptr = 0xa4d9 // 0x1771 @0x0
0x1771…1782 lno = 0x0974 // 0x1773 @0x2
0x1771…1782 at0004 = ╱a1╱ CURSOR ╱ // 0x1775 @0x4
0x1771…1782 at0005 = ╱32╱2╱ // 0x1776 @0x5
0x1771…1782 at0006 = ╱34╱4╱ // 0x1777 @0x6
0x1771…1782 at0007 = ╱fe0000c005╱ // 0x1778 @0x7
0x1771…1782 at000c = ╱ec╱,╱ // 0x177d @0xc
0x1771…1782 at000d = ╱4c╱L╱ // 0x177e @0xd
0x1771…1782 at000e = ╱49╱I╱ // 0x177f @0xe
0x1771…1782 at000f = ╱45╱E╱ // 0x1780 @0xf
0x1771…1782 at0010 = EOL // 0x1781 @0x10
0x1771…1782 }
0x1782…17ab a502 2430 PRINT VARTEKST$(E:25);BK$(E:25)
0x1782…17ab LineComalBin {
0x1782…17ab ptr = 0xa502 // 0x1782 @0x0
0x1782…17ab lno = 0x097e // 0x1784 @0x2
0x1782…17ab at0004 = ╱92╱ PRINT ╱ // 0x1786 @0x4
0x1782…17ab at0005 = ╱56╱V╱ // 0x1787 @0x5
0x1782…17ab at0006 = ╱41╱A╱ // 0x1788 @0x6
0x1782…17ab at0007 = ╱52╱R╱ // 0x1789 @0x7
0x1782…17ab at0008 = ╱54╱T╱ // 0x178a @0x8
0x1782…17ab at0009 = ╱45╱E╱ // 0x178b @0x9
0x1782…17ab at000a = ╱4b╱K╱ // 0x178c @0xa
0x1782…17ab at000b = ╱53╱S╱ // 0x178d @0xb
0x1782…17ab at000c = ╱54╱T╱ // 0x178e @0xc
0x1782…17ab at000d = ╱ef╱$╱ // 0x178f @0xd
0x1782…17ab at000e = ╱ed╱(╱ // 0x1790 @0xe
0x1782…17ab at000f = ╱45╱E╱ // 0x1791 @0xf
0x1782…17ab at0010 = ╱f0╱:╱ // 0x1792 @0x10
0x1782…17ab at0011 = ╱32╱2╱ // 0x1793 @0x11
0x1782…17ab at0012 = ╱35╱5╱ // 0x1794 @0x12
0x1782…17ab at0013 = ╱fe0000c805╱ // 0x1795 @0x13
0x1782…17ab at0018 = ╱ee╱)╱ // 0x179a @0x18
0x1782…17ab at0019 = ╱eb╱;╱ // 0x179b @0x19
0x1782…17ab at001a = ╱42╱B╱ // 0x179c @0x1a
0x1782…17ab at001b = ╱4b╱K╱ // 0x179d @0x1b
0x1782…17ab at001c = ╱ef╱$╱ // 0x179e @0x1c
0x1782…17ab at001d = ╱ed╱(╱ // 0x179f @0x1d
0x1782…17ab at001e = ╱45╱E╱ // 0x17a0 @0x1e
0x1782…17ab at001f = ╱f0╱:╱ // 0x17a1 @0x1f
0x1782…17ab at0020 = ╱32╱2╱ // 0x17a2 @0x20
0x1782…17ab at0021 = ╱35╱5╱ // 0x17a3 @0x21
0x1782…17ab at0022 = ╱fe0000c805╱ // 0x17a4 @0x22
0x1782…17ab at0027 = ╱ee╱)╱ // 0x17a9 @0x27
0x1782…17ab at0028 = EOL // 0x17aa @0x28
0x1782…17ab }
0x17ab…17cb a522 2440 EXEC CA(4,VPRI$,TAH$,TAH$)
0x17ab…17cb LineComalBin {
0x17ab…17cb ptr = 0xa522 // 0x17ab @0x0
0x17ab…17cb lno = 0x0988 // 0x17ad @0x2
0x17ab…17cb at0004 = ╱9d╱ EXEC ╱ // 0x17af @0x4
0x17ab…17cb at0005 = ╱43╱C╱ // 0x17b0 @0x5
0x17ab…17cb at0006 = ╱41╱A╱ // 0x17b1 @0x6
0x17ab…17cb at0007 = ╱ed╱(╱ // 0x17b2 @0x7
0x17ab…17cb at0008 = ╱34╱4╱ // 0x17b3 @0x8
0x17ab…17cb at0009 = ╱fe00008003╱ // 0x17b4 @0x9
0x17ab…17cb at000e = ╱ec╱,╱ // 0x17b9 @0xe
0x17ab…17cb at000f = ╱56╱V╱ // 0x17ba @0xf
0x17ab…17cb at0010 = ╱50╱P╱ // 0x17bb @0x10
0x17ab…17cb at0011 = ╱52╱R╱ // 0x17bc @0x11
0x17ab…17cb at0012 = ╱49╱I╱ // 0x17bd @0x12
0x17ab…17cb at0013 = ╱ef╱$╱ // 0x17be @0x13
0x17ab…17cb at0014 = ╱ec╱,╱ // 0x17bf @0x14
0x17ab…17cb at0015 = ╱54╱T╱ // 0x17c0 @0x15
0x17ab…17cb at0016 = ╱41╱A╱ // 0x17c1 @0x16
0x17ab…17cb at0017 = ╱48╱H╱ // 0x17c2 @0x17
0x17ab…17cb at0018 = ╱ef╱$╱ // 0x17c3 @0x18
0x17ab…17cb at0019 = ╱ec╱,╱ // 0x17c4 @0x19
0x17ab…17cb at001a = ╱54╱T╱ // 0x17c5 @0x1a
0x17ab…17cb at001b = ╱41╱A╱ // 0x17c6 @0x1b
0x17ab…17cb at001c = ╱48╱H╱ // 0x17c7 @0x1c
0x17ab…17cb at001d = ╱ef╱$╱ // 0x17c8 @0x1d
0x17ab…17cb at001e = ╱ee╱)╱ // 0x17c9 @0x1e
0x17ab…17cb at001f = EOL // 0x17ca @0x1f
0x17ab…17cb }
0x17cb…17d6 a52d 2450 IF SI=B THEN
0x17cb…17d6 LineComalBin {
0x17cb…17d6 ptr = 0xa52d // 0x17cb @0x0
0x17cb…17d6 lno = 0x0992 // 0x17cd @0x2
0x17cb…17d6 at0004 = ╱9c╱ IF ╱ // 0x17cf @0x4
0x17cb…17d6 at0005 = ╱53╱S╱ // 0x17d0 @0x5
0x17cb…17d6 at0006 = ╱49╱I╱ // 0x17d1 @0x6
0x17cb…17d6 at0007 = ╱dc╱=╱ // 0x17d2 @0x7
0x17cb…17d6 at0008 = ╱42╱B╱ // 0x17d3 @0x8
0x17cb…17d6 at0009 = ╱b6╱ THEN ╱ // 0x17d4 @0x9
0x17cb…17d6 at000a = EOL // 0x17d5 @0xa
0x17cb…17d6 }
0x17d6…1802 a559 2460 EXEC INDPUT2(50,LIE,BK$(1),VPRI$)
0x17d6…1802 LineComalBin {
0x17d6…1802 ptr = 0xa559 // 0x17d6 @0x0
0x17d6…1802 lno = 0x099c // 0x17d8 @0x2
0x17d6…1802 at0004 = ╱9d╱ EXEC ╱ // 0x17da @0x4
0x17d6…1802 at0005 = ╱49╱I╱ // 0x17db @0x5
0x17d6…1802 at0006 = ╱4e╱N╱ // 0x17dc @0x6
0x17d6…1802 at0007 = ╱44╱D╱ // 0x17dd @0x7
0x17d6…1802 at0008 = ╱50╱P╱ // 0x17de @0x8
0x17d6…1802 at0009 = ╱55╱U╱ // 0x17df @0x9
0x17d6…1802 at000a = ╱54╱T╱ // 0x17e0 @0xa
0x17d6…1802 at000b = ╱32╱2╱ // 0x17e1 @0xb
0x17d6…1802 at000c = ╱ed╱(╱ // 0x17e2 @0xc
0x17d6…1802 at000d = ╱35╱5╱ // 0x17e3 @0xd
0x17d6…1802 at000e = ╱30╱0╱ // 0x17e4 @0xe
0x17d6…1802 at000f = ╱fe0000c806╱ // 0x17e5 @0xf
0x17d6…1802 at0014 = ╱ec╱,╱ // 0x17ea @0x14
0x17d6…1802 at0015 = ╱4c╱L╱ // 0x17eb @0x15
0x17d6…1802 at0016 = ╱49╱I╱ // 0x17ec @0x16
0x17d6…1802 at0017 = ╱45╱E╱ // 0x17ed @0x17
0x17d6…1802 at0018 = ╱ec╱,╱ // 0x17ee @0x18
0x17d6…1802 at0019 = ╱42╱B╱ // 0x17ef @0x19
0x17d6…1802 at001a = ╱4b╱K╱ // 0x17f0 @0x1a
0x17d6…1802 at001b = ╱ef╱$╱ // 0x17f1 @0x1b
0x17d6…1802 at001c = ╱ed╱(╱ // 0x17f2 @0x1c
0x17d6…1802 at001d = ╱31╱1╱ // 0x17f3 @0x1d
0x17d6…1802 at001e = ╱fe00008001╱ // 0x17f4 @0x1e
0x17d6…1802 at0023 = ╱ee╱)╱ // 0x17f9 @0x23
0x17d6…1802 at0024 = ╱ec╱,╱ // 0x17fa @0x24
0x17d6…1802 at0025 = ╱56╱V╱ // 0x17fb @0x25
0x17d6…1802 at0026 = ╱50╱P╱ // 0x17fc @0x26
0x17d6…1802 at0027 = ╱52╱R╱ // 0x17fd @0x27
0x17d6…1802 at0028 = ╱49╱I╱ // 0x17fe @0x28
0x17d6…1802 at0029 = ╱ef╱$╱ // 0x17ff @0x29
0x17d6…1802 at002a = ╱ee╱)╱ // 0x1800 @0x2a
0x17d6…1802 at002b = EOL // 0x1801 @0x2b
0x17d6…1802 }
0x1802…1815 a56c 2470 AKOD(VLIN,E)=E
0x1802…1815 LineComalBin {
0x1802…1815 ptr = 0xa56c // 0x1802 @0x0
0x1802…1815 lno = 0x09a6 // 0x1804 @0x2
0x1802…1815 at0004 = ╱41╱A╱ // 0x1806 @0x4
0x1802…1815 at0005 = ╱4b╱K╱ // 0x1807 @0x5
0x1802…1815 at0006 = ╱4f╱O╱ // 0x1808 @0x6
0x1802…1815 at0007 = ╱44╱D╱ // 0x1809 @0x7
0x1802…1815 at0008 = ╱ed╱(╱ // 0x180a @0x8
0x1802…1815 at0009 = ╱56╱V╱ // 0x180b @0x9
0x1802…1815 at000a = ╱4c╱L╱ // 0x180c @0xa
0x1802…1815 at000b = ╱49╱I╱ // 0x180d @0xb
0x1802…1815 at000c = ╱4e╱N╱ // 0x180e @0xc
0x1802…1815 at000d = ╱ec╱,╱ // 0x180f @0xd
0x1802…1815 at000e = ╱45╱E╱ // 0x1810 @0xe
0x1802…1815 at000f = ╱ee╱)╱ // 0x1811 @0xf
0x1802…1815 at0010 = ╱dc╱=╱ // 0x1812 @0x10
0x1802…1815 at0011 = ╱45╱E╱ // 0x1813 @0x11
0x1802…1815 at0012 = EOL // 0x1814 @0x12
0x1802…1815 }
0x1815…181b a572 2480 ENDIF
0x1815…181b LineComalBin {
0x1815…181b ptr = 0xa572 // 0x1815 @0x0
0x1815…181b lno = 0x09b0 // 0x1817 @0x2
0x1815…181b at0004 = ╱9b╱ ENDIF ╱ // 0x1819 @0x4
0x1815…181b at0005 = EOL // 0x181a @0x5
0x1815…181b }
0x181b…182c a583 2490 CURSOR 51,LIE
0x181b…182c LineComalBin {
0x181b…182c ptr = 0xa583 // 0x181b @0x0
0x181b…182c lno = 0x09ba // 0x181d @0x2
0x181b…182c at0004 = ╱a1╱ CURSOR ╱ // 0x181f @0x4
0x181b…182c at0005 = ╱35╱5╱ // 0x1820 @0x5
0x181b…182c at0006 = ╱31╱1╱ // 0x1821 @0x6
0x181b…182c at0007 = ╱fe0000cc06╱ // 0x1822 @0x7
0x181b…182c at000c = ╱ec╱,╱ // 0x1827 @0xc
0x181b…182c at000d = ╱4c╱L╱ // 0x1828 @0xd
0x181b…182c at000e = ╱49╱I╱ // 0x1829 @0xe
0x181b…182c at000f = ╱45╱E╱ // 0x182a @0xf
0x181b…182c at0010 = EOL // 0x182b @0x10
0x181b…182c }
0x182c…1846 a59d 2500 EXEC TUD(VPRI$,TAL4$,E,B)
0x182c…1846 LineComalBin {
0x182c…1846 ptr = 0xa59d // 0x182c @0x0
0x182c…1846 lno = 0x09c4 // 0x182e @0x2
0x182c…1846 at0004 = ╱9d╱ EXEC ╱ // 0x1830 @0x4
0x182c…1846 at0005 = ╱54╱T╱ // 0x1831 @0x5
0x182c…1846 at0006 = ╱55╱U╱ // 0x1832 @0x6
0x182c…1846 at0007 = ╱44╱D╱ // 0x1833 @0x7
0x182c…1846 at0008 = ╱ed╱(╱ // 0x1834 @0x8
0x182c…1846 at0009 = ╱56╱V╱ // 0x1835 @0x9
0x182c…1846 at000a = ╱50╱P╱ // 0x1836 @0xa
0x182c…1846 at000b = ╱52╱R╱ // 0x1837 @0xb
0x182c…1846 at000c = ╱49╱I╱ // 0x1838 @0xc
0x182c…1846 at000d = ╱ef╱$╱ // 0x1839 @0xd
0x182c…1846 at000e = ╱ec╱,╱ // 0x183a @0xe
0x182c…1846 at000f = ╱54╱T╱ // 0x183b @0xf
0x182c…1846 at0010 = ╱41╱A╱ // 0x183c @0x10
0x182c…1846 at0011 = ╱4c╱L╱ // 0x183d @0x11
0x182c…1846 at0012 = ╱34╱4╱ // 0x183e @0x12
0x182c…1846 at0013 = ╱ef╱$╱ // 0x183f @0x13
0x182c…1846 at0014 = ╱ec╱,╱ // 0x1840 @0x14
0x182c…1846 at0015 = ╱45╱E╱ // 0x1841 @0x15
0x182c…1846 at0016 = ╱ec╱,╱ // 0x1842 @0x16
0x182c…1846 at0017 = ╱42╱B╱ // 0x1843 @0x17
0x182c…1846 at0018 = ╱ee╱)╱ // 0x1844 @0x18
0x182c…1846 at0019 = EOL // 0x1845 @0x19
0x182c…1846 }
0x1846…1862 a5b9 2510 EXEC CA(G,VPRI$,ANTAL$,BL$)
0x1846…1862 LineComalBin {
0x1846…1862 ptr = 0xa5b9 // 0x1846 @0x0
0x1846…1862 lno = 0x09ce // 0x1848 @0x2
0x1846…1862 at0004 = ╱9d╱ EXEC ╱ // 0x184a @0x4
0x1846…1862 at0005 = ╱43╱C╱ // 0x184b @0x5
0x1846…1862 at0006 = ╱41╱A╱ // 0x184c @0x6
0x1846…1862 at0007 = ╱ed╱(╱ // 0x184d @0x7
0x1846…1862 at0008 = ╱47╱G╱ // 0x184e @0x8
0x1846…1862 at0009 = ╱ec╱,╱ // 0x184f @0x9
0x1846…1862 at000a = ╱56╱V╱ // 0x1850 @0xa
0x1846…1862 at000b = ╱50╱P╱ // 0x1851 @0xb
0x1846…1862 at000c = ╱52╱R╱ // 0x1852 @0xc
0x1846…1862 at000d = ╱49╱I╱ // 0x1853 @0xd
0x1846…1862 at000e = ╱ef╱$╱ // 0x1854 @0xe
0x1846…1862 at000f = ╱ec╱,╱ // 0x1855 @0xf
0x1846…1862 at0010 = ╱41╱A╱ // 0x1856 @0x10
0x1846…1862 at0011 = ╱4e╱N╱ // 0x1857 @0x11
0x1846…1862 at0012 = ╱54╱T╱ // 0x1858 @0x12
0x1846…1862 at0013 = ╱41╱A╱ // 0x1859 @0x13
0x1846…1862 at0014 = ╱4c╱L╱ // 0x185a @0x14
0x1846…1862 at0015 = ╱ef╱$╱ // 0x185b @0x15
0x1846…1862 at0016 = ╱ec╱,╱ // 0x185c @0x16
0x1846…1862 at0017 = ╱42╱B╱ // 0x185d @0x17
0x1846…1862 at0018 = ╱4c╱L╱ // 0x185e @0x18
0x1846…1862 at0019 = ╱ef╱$╱ // 0x185f @0x19
0x1846…1862 at001a = ╱ee╱)╱ // 0x1860 @0x1a
0x1846…1862 at001b = EOL // 0x1861 @0x1b
0x1846…1862 }
0x1862…1873 a5ca 2520 CURSOR 66,LIE
0x1862…1873 LineComalBin {
0x1862…1873 ptr = 0xa5ca // 0x1862 @0x0
0x1862…1873 lno = 0x09d8 // 0x1864 @0x2
0x1862…1873 at0004 = ╱a1╱ CURSOR ╱ // 0x1866 @0x4
0x1862…1873 at0005 = ╱36╱6╱ // 0x1867 @0x5
0x1862…1873 at0006 = ╱36╱6╱ // 0x1868 @0x6
0x1862…1873 at0007 = ╱fe00008407╱ // 0x1869 @0x7
0x1862…1873 at000c = ╱ec╱,╱ // 0x186e @0xc
0x1862…1873 at000d = ╱4c╱L╱ // 0x186f @0xd
0x1862…1873 at000e = ╱49╱I╱ // 0x1870 @0xe
0x1862…1873 at000f = ╱45╱E╱ // 0x1871 @0xf
0x1862…1873 at0010 = EOL // 0x1872 @0x10
0x1862…1873 }
0x1873…188b a5e2 2530 EXEC TUD(BL$,TAL4$,E,B)
0x1873…188b LineComalBin {
0x1873…188b ptr = 0xa5e2 // 0x1873 @0x0
0x1873…188b lno = 0x09e2 // 0x1875 @0x2
0x1873…188b at0004 = ╱9d╱ EXEC ╱ // 0x1877 @0x4
0x1873…188b at0005 = ╱54╱T╱ // 0x1878 @0x5
0x1873…188b at0006 = ╱55╱U╱ // 0x1879 @0x6
0x1873…188b at0007 = ╱44╱D╱ // 0x187a @0x7
0x1873…188b at0008 = ╱ed╱(╱ // 0x187b @0x8
0x1873…188b at0009 = ╱42╱B╱ // 0x187c @0x9
0x1873…188b at000a = ╱4c╱L╱ // 0x187d @0xa
0x1873…188b at000b = ╱ef╱$╱ // 0x187e @0xb
0x1873…188b at000c = ╱ec╱,╱ // 0x187f @0xc
0x1873…188b at000d = ╱54╱T╱ // 0x1880 @0xd
0x1873…188b at000e = ╱41╱A╱ // 0x1881 @0xe
0x1873…188b at000f = ╱4c╱L╱ // 0x1882 @0xf
0x1873…188b at0010 = ╱34╱4╱ // 0x1883 @0x10
0x1873…188b at0011 = ╱ef╱$╱ // 0x1884 @0x11
0x1873…188b at0012 = ╱ec╱,╱ // 0x1885 @0x12
0x1873…188b at0013 = ╱45╱E╱ // 0x1886 @0x13
0x1873…188b at0014 = ╱ec╱,╱ // 0x1887 @0x14
0x1873…188b at0015 = ╱42╱B╱ // 0x1888 @0x15
0x1873…188b at0016 = ╱ee╱)╱ // 0x1889 @0x16
0x1873…188b at0017 = EOL // 0x188a @0x17
0x1873…188b }
0x188b…18a8 a5ff 2540 EXEC CA(B,BL$,TOTAL$,TOTAL$)
0x188b…18a8 LineComalBin {
0x188b…18a8 ptr = 0xa5ff // 0x188b @0x0
0x188b…18a8 lno = 0x09ec // 0x188d @0x2
0x188b…18a8 at0004 = ╱9d╱ EXEC ╱ // 0x188f @0x4
0x188b…18a8 at0005 = ╱43╱C╱ // 0x1890 @0x5
0x188b…18a8 at0006 = ╱41╱A╱ // 0x1891 @0x6
0x188b…18a8 at0007 = ╱ed╱(╱ // 0x1892 @0x7
0x188b…18a8 at0008 = ╱42╱B╱ // 0x1893 @0x8
0x188b…18a8 at0009 = ╱ec╱,╱ // 0x1894 @0x9
0x188b…18a8 at000a = ╱42╱B╱ // 0x1895 @0xa
0x188b…18a8 at000b = ╱4c╱L╱ // 0x1896 @0xb
0x188b…18a8 at000c = ╱ef╱$╱ // 0x1897 @0xc
0x188b…18a8 at000d = ╱ec╱,╱ // 0x1898 @0xd
0x188b…18a8 at000e = ╱54╱T╱ // 0x1899 @0xe
0x188b…18a8 at000f = ╱4f╱O╱ // 0x189a @0xf
0x188b…18a8 at0010 = ╱54╱T╱ // 0x189b @0x10
0x188b…18a8 at0011 = ╱41╱A╱ // 0x189c @0x11
0x188b…18a8 at0012 = ╱4c╱L╱ // 0x189d @0x12
0x188b…18a8 at0013 = ╱ef╱$╱ // 0x189e @0x13
0x188b…18a8 at0014 = ╱ec╱,╱ // 0x189f @0x14
0x188b…18a8 at0015 = ╱54╱T╱ // 0x18a0 @0x15
0x188b…18a8 at0016 = ╱4f╱O╱ // 0x18a1 @0x16
0x188b…18a8 at0017 = ╱54╱T╱ // 0x18a2 @0x17
0x188b…18a8 at0018 = ╱41╱A╱ // 0x18a3 @0x18
0x188b…18a8 at0019 = ╱4c╱L╱ // 0x18a4 @0x19
0x188b…18a8 at001a = ╱ef╱$╱ // 0x18a5 @0x1a
0x188b…18a8 at001b = ╱ee╱)╱ // 0x18a6 @0x1b
0x188b…18a8 at001c = EOL // 0x18a7 @0x1c
0x188b…18a8 }
0x18a8…18d6 a62d 2550 VNARR(VLIN)=VARENR;VTARR$(VLIN)=VARTEKST$
0x18a8…18d6 LineComalBin {
0x18a8…18d6 ptr = 0xa62d // 0x18a8 @0x0
0x18a8…18d6 lno = 0x09f6 // 0x18aa @0x2
0x18a8…18d6 at0004 = ╱56╱V╱ // 0x18ac @0x4
0x18a8…18d6 at0005 = ╱4e╱N╱ // 0x18ad @0x5
0x18a8…18d6 at0006 = ╱41╱A╱ // 0x18ae @0x6
0x18a8…18d6 at0007 = ╱52╱R╱ // 0x18af @0x7
0x18a8…18d6 at0008 = ╱52╱R╱ // 0x18b0 @0x8
0x18a8…18d6 at0009 = ╱ed╱(╱ // 0x18b1 @0x9
0x18a8…18d6 at000a = ╱56╱V╱ // 0x18b2 @0xa
0x18a8…18d6 at000b = ╱4c╱L╱ // 0x18b3 @0xb
0x18a8…18d6 at000c = ╱49╱I╱ // 0x18b4 @0xc
0x18a8…18d6 at000d = ╱4e╱N╱ // 0x18b5 @0xd
0x18a8…18d6 at000e = ╱ee╱)╱ // 0x18b6 @0xe
0x18a8…18d6 at000f = ╱dc╱=╱ // 0x18b7 @0xf
0x18a8…18d6 at0010 = ╱56╱V╱ // 0x18b8 @0x10
0x18a8…18d6 at0011 = ╱41╱A╱ // 0x18b9 @0x11
0x18a8…18d6 at0012 = ╱52╱R╱ // 0x18ba @0x12
0x18a8…18d6 at0013 = ╱45╱E╱ // 0x18bb @0x13
0x18a8…18d6 at0014 = ╱4e╱N╱ // 0x18bc @0x14
0x18a8…18d6 at0015 = ╱52╱R╱ // 0x18bd @0x15
0x18a8…18d6 at0016 = ╱eb╱;╱ // 0x18be @0x16
0x18a8…18d6 at0017 = ╱56╱V╱ // 0x18bf @0x17
0x18a8…18d6 at0018 = ╱54╱T╱ // 0x18c0 @0x18
0x18a8…18d6 at0019 = ╱41╱A╱ // 0x18c1 @0x19
0x18a8…18d6 at001a = ╱52╱R╱ // 0x18c2 @0x1a
0x18a8…18d6 at001b = ╱52╱R╱ // 0x18c3 @0x1b
0x18a8…18d6 at001c = ╱ef╱$╱ // 0x18c4 @0x1c
0x18a8…18d6 at001d = ╱ed╱(╱ // 0x18c5 @0x1d
0x18a8…18d6 at001e = ╱56╱V╱ // 0x18c6 @0x1e
0x18a8…18d6 at001f = ╱4c╱L╱ // 0x18c7 @0x1f
0x18a8…18d6 at0020 = ╱49╱I╱ // 0x18c8 @0x20
0x18a8…18d6 at0021 = ╱4e╱N╱ // 0x18c9 @0x21
0x18a8…18d6 at0022 = ╱ee╱)╱ // 0x18ca @0x22
0x18a8…18d6 at0023 = ╱dc╱=╱ // 0x18cb @0x23
0x18a8…18d6 at0024 = ╱56╱V╱ // 0x18cc @0x24
0x18a8…18d6 at0025 = ╱41╱A╱ // 0x18cd @0x25
0x18a8…18d6 at0026 = ╱52╱R╱ // 0x18ce @0x26
0x18a8…18d6 at0027 = ╱54╱T╱ // 0x18cf @0x27
0x18a8…18d6 at0028 = ╱45╱E╱ // 0x18d0 @0x28
0x18a8…18d6 at0029 = ╱4b╱K╱ // 0x18d1 @0x29
0x18a8…18d6 at002a = ╱53╱S╱ // 0x18d2 @0x2a
0x18a8…18d6 at002b = ╱54╱T╱ // 0x18d3 @0x2b
0x18a8…18d6 at002c = ╱ef╱$╱ // 0x18d4 @0x2c
0x18a8…18d6 at002d = EOL // 0x18d5 @0x2d
0x18a8…18d6 }
0x18d6…1901 a658 2560 VPARR$(VLIN)=VPRI$;VAARR$(VLIN)=ANTAL$
0x18d6…1901 LineComalBin {
0x18d6…1901 ptr = 0xa658 // 0x18d6 @0x0
0x18d6…1901 lno = 0x0a00 // 0x18d8 @0x2
0x18d6…1901 at0004 = ╱56╱V╱ // 0x18da @0x4
0x18d6…1901 at0005 = ╱50╱P╱ // 0x18db @0x5
0x18d6…1901 at0006 = ╱41╱A╱ // 0x18dc @0x6
0x18d6…1901 at0007 = ╱52╱R╱ // 0x18dd @0x7
0x18d6…1901 at0008 = ╱52╱R╱ // 0x18de @0x8
0x18d6…1901 at0009 = ╱ef╱$╱ // 0x18df @0x9
0x18d6…1901 at000a = ╱ed╱(╱ // 0x18e0 @0xa
0x18d6…1901 at000b = ╱56╱V╱ // 0x18e1 @0xb
0x18d6…1901 at000c = ╱4c╱L╱ // 0x18e2 @0xc
0x18d6…1901 at000d = ╱49╱I╱ // 0x18e3 @0xd
0x18d6…1901 at000e = ╱4e╱N╱ // 0x18e4 @0xe
0x18d6…1901 at000f = ╱ee╱)╱ // 0x18e5 @0xf
0x18d6…1901 at0010 = ╱dc╱=╱ // 0x18e6 @0x10
0x18d6…1901 at0011 = ╱56╱V╱ // 0x18e7 @0x11
0x18d6…1901 at0012 = ╱50╱P╱ // 0x18e8 @0x12
0x18d6…1901 at0013 = ╱52╱R╱ // 0x18e9 @0x13
0x18d6…1901 at0014 = ╱49╱I╱ // 0x18ea @0x14
0x18d6…1901 at0015 = ╱ef╱$╱ // 0x18eb @0x15
0x18d6…1901 at0016 = ╱eb╱;╱ // 0x18ec @0x16
0x18d6…1901 at0017 = ╱56╱V╱ // 0x18ed @0x17
0x18d6…1901 at0018 = ╱41╱A╱ // 0x18ee @0x18
0x18d6…1901 at0019 = ╱41╱A╱ // 0x18ef @0x19
0x18d6…1901 at001a = ╱52╱R╱ // 0x18f0 @0x1a
0x18d6…1901 at001b = ╱52╱R╱ // 0x18f1 @0x1b
0x18d6…1901 at001c = ╱ef╱$╱ // 0x18f2 @0x1c
0x18d6…1901 at001d = ╱ed╱(╱ // 0x18f3 @0x1d
0x18d6…1901 at001e = ╱56╱V╱ // 0x18f4 @0x1e
0x18d6…1901 at001f = ╱4c╱L╱ // 0x18f5 @0x1f
0x18d6…1901 at0020 = ╱49╱I╱ // 0x18f6 @0x20
0x18d6…1901 at0021 = ╱4e╱N╱ // 0x18f7 @0x21
0x18d6…1901 at0022 = ╱ee╱)╱ // 0x18f8 @0x22
0x18d6…1901 at0023 = ╱dc╱=╱ // 0x18f9 @0x23
0x18d6…1901 at0024 = ╱41╱A╱ // 0x18fa @0x24
0x18d6…1901 at0025 = ╱4e╱N╱ // 0x18fb @0x25
0x18d6…1901 at0026 = ╱54╱T╱ // 0x18fc @0x26
0x18d6…1901 at0027 = ╱41╱A╱ // 0x18fd @0x27
0x18d6…1901 at0028 = ╱4c╱L╱ // 0x18fe @0x28
0x18d6…1901 at0029 = ╱ef╱$╱ // 0x18ff @0x29
0x18d6…1901 at002a = EOL // 0x1900 @0x2a
0x18d6…1901 }
0x1901…1916 a66d 2570 BLARR$(VLIN)=BL$
0x1901…1916 LineComalBin {
0x1901…1916 ptr = 0xa66d // 0x1901 @0x0
0x1901…1916 lno = 0x0a0a // 0x1903 @0x2
0x1901…1916 at0004 = ╱42╱B╱ // 0x1905 @0x4
0x1901…1916 at0005 = ╱4c╱L╱ // 0x1906 @0x5
0x1901…1916 at0006 = ╱41╱A╱ // 0x1907 @0x6
0x1901…1916 at0007 = ╱52╱R╱ // 0x1908 @0x7
0x1901…1916 at0008 = ╱52╱R╱ // 0x1909 @0x8
0x1901…1916 at0009 = ╱ef╱$╱ // 0x190a @0x9
0x1901…1916 at000a = ╱ed╱(╱ // 0x190b @0xa
0x1901…1916 at000b = ╱56╱V╱ // 0x190c @0xb
0x1901…1916 at000c = ╱4c╱L╱ // 0x190d @0xc
0x1901…1916 at000d = ╱49╱I╱ // 0x190e @0xd
0x1901…1916 at000e = ╱4e╱N╱ // 0x190f @0xe
0x1901…1916 at000f = ╱ee╱)╱ // 0x1910 @0xf
0x1901…1916 at0010 = ╱dc╱=╱ // 0x1911 @0x10
0x1901…1916 at0011 = ╱42╱B╱ // 0x1912 @0x11
0x1901…1916 at0012 = ╱4c╱L╱ // 0x1913 @0x12
0x1901…1916 at0013 = ╱ef╱$╱ // 0x1914 @0x13
0x1901…1916 at0014 = EOL // 0x1915 @0x14
0x1901…1916 }
0x1916…191c a673 2580 ENDIF
0x1916…191c LineComalBin {
0x1916…191c ptr = 0xa673 // 0x1916 @0x0
0x1916…191c lno = 0x0a14 // 0x1918 @0x2
0x1916…191c at0004 = ╱9b╱ ENDIF ╱ // 0x191a @0x4
0x1916…191c at0005 = EOL // 0x191b @0x5
0x1916…191c }
0x191c…1922 a679 2590 ENDIF
0x191c…1922 LineComalBin {
0x191c…1922 ptr = 0xa679 // 0x191c @0x0
0x191c…1922 lno = 0x0a1e // 0x191e @0x2
0x191c…1922 at0004 = ╱9b╱ ENDIF ╱ // 0x1920 @0x4
0x191c…1922 at0005 = EOL // 0x1921 @0x5
0x191c…1922 }
0x1922…192c a683 2600 WHEN E,G
0x1922…192c LineComalBin {
0x1922…192c ptr = 0xa683 // 0x1922 @0x0
0x1922…192c lno = 0x0a28 // 0x1924 @0x2
0x1922…192c at0004 = ╱a301╱ WHEN ╱ // 0x1926 @0x4
0x1922…192c at0006 = ╱45╱E╱ // 0x1928 @0x6
0x1922…192c at0007 = ╱ec╱,╱ // 0x1929 @0x7
0x1922…192c at0008 = ╱47╱G╱ // 0x192a @0x8
0x1922…192c at0009 = EOL // 0x192b @0x9
0x1922…192c }
0x192c…1949 a6a0 2610 VARTEKST$=BK$(E:50)
0x192c…1949 LineComalBin {
0x192c…1949 ptr = 0xa6a0 // 0x192c @0x0
0x192c…1949 lno = 0x0a32 // 0x192e @0x2
0x192c…1949 at0004 = ╱56╱V╱ // 0x1930 @0x4
0x192c…1949 at0005 = ╱41╱A╱ // 0x1931 @0x5
0x192c…1949 at0006 = ╱52╱R╱ // 0x1932 @0x6
0x192c…1949 at0007 = ╱54╱T╱ // 0x1933 @0x7
0x192c…1949 at0008 = ╱45╱E╱ // 0x1934 @0x8
0x192c…1949 at0009 = ╱4b╱K╱ // 0x1935 @0x9
0x192c…1949 at000a = ╱53╱S╱ // 0x1936 @0xa
0x192c…1949 at000b = ╱54╱T╱ // 0x1937 @0xb
0x192c…1949 at000c = ╱ef╱$╱ // 0x1938 @0xc
0x192c…1949 at000d = ╱dc╱=╱ // 0x1939 @0xd
0x192c…1949 at000e = ╱42╱B╱ // 0x193a @0xe
0x192c…1949 at000f = ╱4b╱K╱ // 0x193b @0xf
0x192c…1949 at0010 = ╱ef╱$╱ // 0x193c @0x10
0x192c…1949 at0011 = ╱ed╱(╱ // 0x193d @0x11
0x192c…1949 at0012 = ╱45╱E╱ // 0x193e @0x12
0x192c…1949 at0013 = ╱f0╱:╱ // 0x193f @0x13
0x192c…1949 at0014 = ╱35╱5╱ // 0x1940 @0x14
0x192c…1949 at0015 = ╱30╱0╱ // 0x1941 @0x15
0x192c…1949 at0016 = ╱fe0000c806╱ // 0x1942 @0x16
0x192c…1949 at001b = ╱ee╱)╱ // 0x1947 @0x1b
0x192c…1949 at001c = EOL // 0x1948 @0x1c
0x192c…1949 }
0x1949…1958 a6af 2620 IF VARENR=G THEN
0x1949…1958 LineComalBin {
0x1949…1958 ptr = 0xa6af // 0x1949 @0x0
0x1949…1958 lno = 0x0a3c // 0x194b @0x2
0x1949…1958 at0004 = ╱9c╱ IF ╱ // 0x194d @0x4
0x1949…1958 at0005 = ╱56╱V╱ // 0x194e @0x5
0x1949…1958 at0006 = ╱41╱A╱ // 0x194f @0x6
0x1949…1958 at0007 = ╱52╱R╱ // 0x1950 @0x7
0x1949…1958 at0008 = ╱45╱E╱ // 0x1951 @0x8
0x1949…1958 at0009 = ╱4e╱N╱ // 0x1952 @0x9
0x1949…1958 at000a = ╱52╱R╱ // 0x1953 @0xa
0x1949…1958 at000b = ╱dc╱=╱ // 0x1954 @0xb
0x1949…1958 at000c = ╱47╱G╱ // 0x1955 @0xc
0x1949…1958 at000d = ╱b6╱ THEN ╱ // 0x1956 @0xd
0x1949…1958 at000e = EOL // 0x1957 @0xe
0x1949…1958 }
0x1958…1969 a6c0 2630 CURSOR 16,LIE
0x1958…1969 LineComalBin {
0x1958…1969 ptr = 0xa6c0 // 0x1958 @0x0
0x1958…1969 lno = 0x0a46 // 0x195a @0x2
0x1958…1969 at0004 = ╱a1╱ CURSOR ╱ // 0x195c @0x4
0x1958…1969 at0005 = ╱31╱1╱ // 0x195d @0x5
0x1958…1969 at0006 = ╱36╱6╱ // 0x195e @0x6
0x1958…1969 at0007 = ╱fe00008005╱ // 0x195f @0x7
0x1958…1969 at000c = ╱ec╱,╱ // 0x1964 @0xc
0x1958…1969 at000d = ╱4c╱L╱ // 0x1965 @0xd
0x1958…1969 at000e = ╱49╱I╱ // 0x1966 @0xe
0x1958…1969 at000f = ╱45╱E╱ // 0x1967 @0xf
0x1958…1969 at0010 = EOL // 0x1968 @0x10
0x1958…1969 }
0x1969…196f a6c6 2640 ELSE
0x1969…196f LineComalBin {
0x1969…196f ptr = 0xa6c6 // 0x1969 @0x0
0x1969…196f lno = 0x0a50 // 0x196b @0x2
0x1969…196f at0004 = ╱9a╱ ELSE ╱ // 0x196d @0x4
0x1969…196f at0005 = EOL // 0x196e @0x5
0x1969…196f }
0x196f…1980 a6d7 2650 CURSOR 23,LIE
0x196f…1980 LineComalBin {
0x196f…1980 ptr = 0xa6d7 // 0x196f @0x0
0x196f…1980 lno = 0x0a5a // 0x1971 @0x2
0x196f…1980 at0004 = ╱a1╱ CURSOR ╱ // 0x1973 @0x4
0x196f…1980 at0005 = ╱32╱2╱ // 0x1974 @0x5
0x196f…1980 at0006 = ╱33╱3╱ // 0x1975 @0x6
0x196f…1980 at0007 = ╱fe0000b805╱ // 0x1976 @0x7
0x196f…1980 at000c = ╱ec╱,╱ // 0x197b @0xc
0x196f…1980 at000d = ╱4c╱L╱ // 0x197c @0xd
0x196f…1980 at000e = ╱49╱I╱ // 0x197d @0xe
0x196f…1980 at000f = ╱45╱E╱ // 0x197e @0xf
0x196f…1980 at0010 = EOL // 0x197f @0x10
0x196f…1980 }
0x1980…1986 a6dd 2660 ENDIF
0x1980…1986 LineComalBin {
0x1980…1986 ptr = 0xa6dd // 0x1980 @0x0
0x1980…1986 lno = 0x0a64 // 0x1982 @0x2
0x1980…1986 at0004 = ╱9b╱ ENDIF ╱ // 0x1984 @0x4
0x1980…1986 at0005 = EOL // 0x1985 @0x5
0x1980…1986 }
0x1986…1999 a6f0 2670 INPUT " ",VARTEKST$
0x1986…1999 LineComalBin {
0x1986…1999 ptr = 0xa6f0 // 0x1986 @0x0
0x1986…1999 lno = 0x0a6e // 0x1988 @0x2
0x1986…1999 at0004 = ╱91╱ INPUT ╱ // 0x198a @0x4
0x1986…1999 at0005 = ╱22╱"╱ // 0x198b @0x5
0x1986…1999 at0006 = ╱20╱…╱ // 0x198c @0x6
0x1986…1999 at0007 = ╱22╱"╱ // 0x198d @0x7
0x1986…1999 at0008 = ╱ec╱,╱ // 0x198e @0x8
0x1986…1999 at0009 = ╱56╱V╱ // 0x198f @0x9
0x1986…1999 at000a = ╱41╱A╱ // 0x1990 @0xa
0x1986…1999 at000b = ╱52╱R╱ // 0x1991 @0xb
0x1986…1999 at000c = ╱54╱T╱ // 0x1992 @0xc
0x1986…1999 at000d = ╱45╱E╱ // 0x1993 @0xd
0x1986…1999 at000e = ╱4b╱K╱ // 0x1994 @0xe
0x1986…1999 at000f = ╱53╱S╱ // 0x1995 @0xf
0x1986…1999 at0010 = ╱54╱T╱ // 0x1996 @0x10
0x1986…1999 at0011 = ╱ef╱$╱ // 0x1997 @0x11
0x1986…1999 at0012 = EOL // 0x1998 @0x12
0x1986…1999 }
0x1999…19ad a704 2680 L2=LEN(VARTEKST$)
0x1999…19ad LineComalBin {
0x1999…19ad ptr = 0xa704 // 0x1999 @0x0
0x1999…19ad lno = 0x0a78 // 0x199b @0x2
0x1999…19ad at0004 = ╱4c╱L╱ // 0x199d @0x4
0x1999…19ad at0005 = ╱32╱2╱ // 0x199e @0x5
0x1999…19ad at0006 = ╱dc╱=╱ // 0x199f @0x6
0x1999…19ad at0007 = ╱cc╱LEN╱ // 0x19a0 @0x7
0x1999…19ad at0008 = ╱ed╱(╱ // 0x19a1 @0x8
0x1999…19ad at0009 = ╱56╱V╱ // 0x19a2 @0x9
0x1999…19ad at000a = ╱41╱A╱ // 0x19a3 @0xa
0x1999…19ad at000b = ╱52╱R╱ // 0x19a4 @0xb
0x1999…19ad at000c = ╱54╱T╱ // 0x19a5 @0xc
0x1999…19ad at000d = ╱45╱E╱ // 0x19a6 @0xd
0x1999…19ad at000e = ╱4b╱K╱ // 0x19a7 @0xe
0x1999…19ad at000f = ╱53╱S╱ // 0x19a8 @0xf
0x1999…19ad at0010 = ╱54╱T╱ // 0x19a9 @0x10
0x1999…19ad at0011 = ╱ef╱$╱ // 0x19aa @0x11
0x1999…19ad at0012 = ╱ee╱)╱ // 0x19ab @0x12
0x1999…19ad at0013 = EOL // 0x19ac @0x13
0x1999…19ad }
0x19ad…19bd a714 2690 IF L2=B THEN FE6=E
0x19ad…19bd LineComalBin {
0x19ad…19bd ptr = 0xa714 // 0x19ad @0x0
0x19ad…19bd lno = 0x0a82 // 0x19af @0x2
0x19ad…19bd at0004 = ╱82╱ IF ╱ // 0x19b1 @0x4
0x19ad…19bd at0005 = ╱4c╱L╱ // 0x19b2 @0x5
0x19ad…19bd at0006 = ╱32╱2╱ // 0x19b3 @0x6
0x19ad…19bd at0007 = ╱dc╱=╱ // 0x19b4 @0x7
0x19ad…19bd at0008 = ╱42╱B╱ // 0x19b5 @0x8
0x19ad…19bd at0009 = ╱b6╱ THEN ╱ // 0x19b6 @0x9
0x19ad…19bd at000a = ╱46╱F╱ // 0x19b7 @0xa
0x19ad…19bd at000b = ╱45╱E╱ // 0x19b8 @0xb
0x19ad…19bd at000c = ╱36╱6╱ // 0x19b9 @0xc
0x19ad…19bd at000d = ╱dc╱=╱ // 0x19ba @0xd
0x19ad…19bd at000e = ╱45╱E╱ // 0x19bb @0xe
0x19ad…19bd at000f = EOL // 0x19bc @0xf
0x19ad…19bd }
0x19bd…19c8 a71f 2700 IF L2>B THEN
0x19bd…19c8 LineComalBin {
0x19bd…19c8 ptr = 0xa71f // 0x19bd @0x0
0x19bd…19c8 lno = 0x0a8c // 0x19bf @0x2
0x19bd…19c8 at0004 = ╱9c╱ IF ╱ // 0x19c1 @0x4
0x19bd…19c8 at0005 = ╱4c╱L╱ // 0x19c2 @0x5
0x19bd…19c8 at0006 = ╱32╱2╱ // 0x19c3 @0x6
0x19bd…19c8 at0007 = ╱de╱>╱ // 0x19c4 @0x7
0x19bd…19c8 at0008 = ╱42╱B╱ // 0x19c5 @0x8
0x19bd…19c8 at0009 = ╱b6╱ THEN ╱ // 0x19c6 @0x9
0x19bd…19c8 at000a = EOL // 0x19c7 @0xa
0x19bd…19c8 }
0x19c8…19d7 a72e 2710 IF VARENR=G THEN
0x19c8…19d7 LineComalBin {
0x19c8…19d7 ptr = 0xa72e // 0x19c8 @0x0
0x19c8…19d7 lno = 0x0a96 // 0x19ca @0x2
0x19c8…19d7 at0004 = ╱9c╱ IF ╱ // 0x19cc @0x4
0x19c8…19d7 at0005 = ╱56╱V╱ // 0x19cd @0x5
0x19c8…19d7 at0006 = ╱41╱A╱ // 0x19ce @0x6
0x19c8…19d7 at0007 = ╱52╱R╱ // 0x19cf @0x7
0x19c8…19d7 at0008 = ╱45╱E╱ // 0x19d0 @0x8
0x19c8…19d7 at0009 = ╱4e╱N╱ // 0x19d1 @0x9
0x19c8…19d7 at000a = ╱52╱R╱ // 0x19d2 @0xa
0x19c8…19d7 at000b = ╱dc╱=╱ // 0x19d3 @0xb
0x19c8…19d7 at000c = ╱47╱G╱ // 0x19d4 @0xc
0x19c8…19d7 at000d = ╱b6╱ THEN ╱ // 0x19d5 @0xd
0x19c8…19d7 at000e = EOL // 0x19d6 @0xe
0x19c8…19d7 }
0x19d7…19e8 a73f 2720 CURSOR 17,LIE
0x19d7…19e8 LineComalBin {
0x19d7…19e8 ptr = 0xa73f // 0x19d7 @0x0
0x19d7…19e8 lno = 0x0aa0 // 0x19d9 @0x2
0x19d7…19e8 at0004 = ╱a1╱ CURSOR ╱ // 0x19db @0x4
0x19d7…19e8 at0005 = ╱31╱1╱ // 0x19dc @0x5
0x19d7…19e8 at0006 = ╱37╱7╱ // 0x19dd @0x6
0x19d7…19e8 at0007 = ╱fe00008805╱ // 0x19de @0x7
0x19d7…19e8 at000c = ╱ec╱,╱ // 0x19e3 @0xc
0x19d7…19e8 at000d = ╱4c╱L╱ // 0x19e4 @0xd
0x19d7…19e8 at000e = ╱49╱I╱ // 0x19e5 @0xe
0x19d7…19e8 at000f = ╱45╱E╱ // 0x19e6 @0xf
0x19d7…19e8 at0010 = EOL // 0x19e7 @0x10
0x19d7…19e8 }
0x19e8…1a06 a75d 2730 PRINT VARTEKST$;BK$(E:12)
0x19e8…1a06 LineComalBin {
0x19e8…1a06 ptr = 0xa75d // 0x19e8 @0x0
0x19e8…1a06 lno = 0x0aaa // 0x19ea @0x2
0x19e8…1a06 at0004 = ╱92╱ PRINT ╱ // 0x19ec @0x4
0x19e8…1a06 at0005 = ╱56╱V╱ // 0x19ed @0x5
0x19e8…1a06 at0006 = ╱41╱A╱ // 0x19ee @0x6
0x19e8…1a06 at0007 = ╱52╱R╱ // 0x19ef @0x7
0x19e8…1a06 at0008 = ╱54╱T╱ // 0x19f0 @0x8
0x19e8…1a06 at0009 = ╱45╱E╱ // 0x19f1 @0x9
0x19e8…1a06 at000a = ╱4b╱K╱ // 0x19f2 @0xa
0x19e8…1a06 at000b = ╱53╱S╱ // 0x19f3 @0xb
0x19e8…1a06 at000c = ╱54╱T╱ // 0x19f4 @0xc
0x19e8…1a06 at000d = ╱ef╱$╱ // 0x19f5 @0xd
0x19e8…1a06 at000e = ╱eb╱;╱ // 0x19f6 @0xe
0x19e8…1a06 at000f = ╱42╱B╱ // 0x19f7 @0xf
0x19e8…1a06 at0010 = ╱4b╱K╱ // 0x19f8 @0x10
0x19e8…1a06 at0011 = ╱ef╱$╱ // 0x19f9 @0x11
0x19e8…1a06 at0012 = ╱ed╱(╱ // 0x19fa @0x12
0x19e8…1a06 at0013 = ╱45╱E╱ // 0x19fb @0x13
0x19e8…1a06 at0014 = ╱f0╱:╱ // 0x19fc @0x14
0x19e8…1a06 at0015 = ╱31╱1╱ // 0x19fd @0x15
0x19e8…1a06 at0016 = ╱32╱2╱ // 0x19fe @0x16
0x19e8…1a06 at0017 = ╱fe0000c004╱ // 0x19ff @0x17
0x19e8…1a06 at001c = ╱ee╱)╱ // 0x1a04 @0x1c
0x19e8…1a06 at001d = EOL // 0x1a05 @0x1d
0x19e8…1a06 }
0x1a06…1a0c a763 2740 ELSE
0x1a06…1a0c LineComalBin {
0x1a06…1a0c ptr = 0xa763 // 0x1a06 @0x0
0x1a06…1a0c lno = 0x0ab4 // 0x1a08 @0x2
0x1a06…1a0c at0004 = ╱9a╱ ELSE ╱ // 0x1a0a @0x4
0x1a06…1a0c at0005 = EOL // 0x1a0b @0x5
0x1a06…1a0c }
0x1a0c…1a1d a774 2750 CURSOR 24,LIE
0x1a0c…1a1d LineComalBin {
0x1a0c…1a1d ptr = 0xa774 // 0x1a0c @0x0
0x1a0c…1a1d lno = 0x0abe // 0x1a0e @0x2
0x1a0c…1a1d at0004 = ╱a1╱ CURSOR ╱ // 0x1a10 @0x4
0x1a0c…1a1d at0005 = ╱32╱2╱ // 0x1a11 @0x5
0x1a0c…1a1d at0006 = ╱34╱4╱ // 0x1a12 @0x6
0x1a0c…1a1d at0007 = ╱fe0000c005╱ // 0x1a13 @0x7
0x1a0c…1a1d at000c = ╱ec╱,╱ // 0x1a18 @0xc
0x1a0c…1a1d at000d = ╱4c╱L╱ // 0x1a19 @0xd
0x1a0c…1a1d at000e = ╱49╱I╱ // 0x1a1a @0xe
0x1a0c…1a1d at000f = ╱45╱E╱ // 0x1a1b @0xf
0x1a0c…1a1d at0010 = EOL // 0x1a1c @0x10
0x1a0c…1a1d }
0x1a1d…1a46 a79d 2760 PRINT VARTEKST$(E:25);BK$(E:25)
0x1a1d…1a46 LineComalBin {
0x1a1d…1a46 ptr = 0xa79d // 0x1a1d @0x0
0x1a1d…1a46 lno = 0x0ac8 // 0x1a1f @0x2
0x1a1d…1a46 at0004 = ╱92╱ PRINT ╱ // 0x1a21 @0x4
0x1a1d…1a46 at0005 = ╱56╱V╱ // 0x1a22 @0x5
0x1a1d…1a46 at0006 = ╱41╱A╱ // 0x1a23 @0x6
0x1a1d…1a46 at0007 = ╱52╱R╱ // 0x1a24 @0x7
0x1a1d…1a46 at0008 = ╱54╱T╱ // 0x1a25 @0x8
0x1a1d…1a46 at0009 = ╱45╱E╱ // 0x1a26 @0x9
0x1a1d…1a46 at000a = ╱4b╱K╱ // 0x1a27 @0xa
0x1a1d…1a46 at000b = ╱53╱S╱ // 0x1a28 @0xb
0x1a1d…1a46 at000c = ╱54╱T╱ // 0x1a29 @0xc
0x1a1d…1a46 at000d = ╱ef╱$╱ // 0x1a2a @0xd
0x1a1d…1a46 at000e = ╱ed╱(╱ // 0x1a2b @0xe
0x1a1d…1a46 at000f = ╱45╱E╱ // 0x1a2c @0xf
0x1a1d…1a46 at0010 = ╱f0╱:╱ // 0x1a2d @0x10
0x1a1d…1a46 at0011 = ╱32╱2╱ // 0x1a2e @0x11
0x1a1d…1a46 at0012 = ╱35╱5╱ // 0x1a2f @0x12
0x1a1d…1a46 at0013 = ╱fe0000c805╱ // 0x1a30 @0x13
0x1a1d…1a46 at0018 = ╱ee╱)╱ // 0x1a35 @0x18
0x1a1d…1a46 at0019 = ╱eb╱;╱ // 0x1a36 @0x19
0x1a1d…1a46 at001a = ╱42╱B╱ // 0x1a37 @0x1a
0x1a1d…1a46 at001b = ╱4b╱K╱ // 0x1a38 @0x1b
0x1a1d…1a46 at001c = ╱ef╱$╱ // 0x1a39 @0x1c
0x1a1d…1a46 at001d = ╱ed╱(╱ // 0x1a3a @0x1d
0x1a1d…1a46 at001e = ╱45╱E╱ // 0x1a3b @0x1e
0x1a1d…1a46 at001f = ╱f0╱:╱ // 0x1a3c @0x1f
0x1a1d…1a46 at0020 = ╱32╱2╱ // 0x1a3d @0x20
0x1a1d…1a46 at0021 = ╱35╱5╱ // 0x1a3e @0x21
0x1a1d…1a46 at0022 = ╱fe0000c805╱ // 0x1a3f @0x22
0x1a1d…1a46 at0027 = ╱ee╱)╱ // 0x1a44 @0x27
0x1a1d…1a46 at0028 = EOL // 0x1a45 @0x28
0x1a1d…1a46 }
0x1a46…1a4c a7a3 2770 ENDIF
0x1a46…1a4c LineComalBin {
0x1a46…1a4c ptr = 0xa7a3 // 0x1a46 @0x0
0x1a46…1a4c lno = 0x0ad2 // 0x1a48 @0x2
0x1a46…1a4c at0004 = ╱9b╱ ENDIF ╱ // 0x1a4a @0x4
0x1a46…1a4c at0005 = EOL // 0x1a4b @0x5
0x1a46…1a4c }
0x1a4c…1a5b a7b2 2780 IF VARENR=E THEN
0x1a4c…1a5b LineComalBin {
0x1a4c…1a5b ptr = 0xa7b2 // 0x1a4c @0x0
0x1a4c…1a5b lno = 0x0adc // 0x1a4e @0x2
0x1a4c…1a5b at0004 = ╱9c╱ IF ╱ // 0x1a50 @0x4
0x1a4c…1a5b at0005 = ╱56╱V╱ // 0x1a51 @0x5
0x1a4c…1a5b at0006 = ╱41╱A╱ // 0x1a52 @0x6
0x1a4c…1a5b at0007 = ╱52╱R╱ // 0x1a53 @0x7
0x1a4c…1a5b at0008 = ╱45╱E╱ // 0x1a54 @0x8
0x1a4c…1a5b at0009 = ╱4e╱N╱ // 0x1a55 @0x9
0x1a4c…1a5b at000a = ╱52╱R╱ // 0x1a56 @0xa
0x1a4c…1a5b at000b = ╱dc╱=╱ // 0x1a57 @0xb
0x1a4c…1a5b at000c = ╱45╱E╱ // 0x1a58 @0xc
0x1a4c…1a5b at000d = ╱b6╱ THEN ╱ // 0x1a59 @0xd
0x1a4c…1a5b at000e = EOL // 0x1a5a @0xe
0x1a4c…1a5b }
0x1a5b…1a85 a7dc 2790 EXEC INDPUT2(65,LIE,BK$(1),BL$)
0x1a5b…1a85 LineComalBin {
0x1a5b…1a85 ptr = 0xa7dc // 0x1a5b @0x0
0x1a5b…1a85 lno = 0x0ae6 // 0x1a5d @0x2
0x1a5b…1a85 at0004 = ╱9d╱ EXEC ╱ // 0x1a5f @0x4
0x1a5b…1a85 at0005 = ╱49╱I╱ // 0x1a60 @0x5
0x1a5b…1a85 at0006 = ╱4e╱N╱ // 0x1a61 @0x6
0x1a5b…1a85 at0007 = ╱44╱D╱ // 0x1a62 @0x7
0x1a5b…1a85 at0008 = ╱50╱P╱ // 0x1a63 @0x8
0x1a5b…1a85 at0009 = ╱55╱U╱ // 0x1a64 @0x9
0x1a5b…1a85 at000a = ╱54╱T╱ // 0x1a65 @0xa
0x1a5b…1a85 at000b = ╱32╱2╱ // 0x1a66 @0xb
0x1a5b…1a85 at000c = ╱ed╱(╱ // 0x1a67 @0xc
0x1a5b…1a85 at000d = ╱36╱6╱ // 0x1a68 @0xd
0x1a5b…1a85 at000e = ╱35╱5╱ // 0x1a69 @0xe
0x1a5b…1a85 at000f = ╱fe00008207╱ // 0x1a6a @0xf
0x1a5b…1a85 at0014 = ╱ec╱,╱ // 0x1a6f @0x14
0x1a5b…1a85 at0015 = ╱4c╱L╱ // 0x1a70 @0x15
0x1a5b…1a85 at0016 = ╱49╱I╱ // 0x1a71 @0x16
0x1a5b…1a85 at0017 = ╱45╱E╱ // 0x1a72 @0x17
0x1a5b…1a85 at0018 = ╱ec╱,╱ // 0x1a73 @0x18
0x1a5b…1a85 at0019 = ╱42╱B╱ // 0x1a74 @0x19
0x1a5b…1a85 at001a = ╱4b╱K╱ // 0x1a75 @0x1a
0x1a5b…1a85 at001b = ╱ef╱$╱ // 0x1a76 @0x1b
0x1a5b…1a85 at001c = ╱ed╱(╱ // 0x1a77 @0x1c
0x1a5b…1a85 at001d = ╱31╱1╱ // 0x1a78 @0x1d
0x1a5b…1a85 at001e = ╱fe00008001╱ // 0x1a79 @0x1e
0x1a5b…1a85 at0023 = ╱ee╱)╱ // 0x1a7e @0x23
0x1a5b…1a85 at0024 = ╱ec╱,╱ // 0x1a7f @0x24
0x1a5b…1a85 at0025 = ╱42╱B╱ // 0x1a80 @0x25
0x1a5b…1a85 at0026 = ╱4c╱L╱ // 0x1a81 @0x26
0x1a5b…1a85 at0027 = ╱ef╱$╱ // 0x1a82 @0x27
0x1a5b…1a85 at0028 = ╱ee╱)╱ // 0x1a83 @0x28
0x1a5b…1a85 at0029 = EOL // 0x1a84 @0x29
0x1a5b…1a85 }
0x1a85…1aa2 a7f9 2800 EXEC CA(B,BL$,TOTAL$,TOTAL$)
0x1a85…1aa2 LineComalBin {
0x1a85…1aa2 ptr = 0xa7f9 // 0x1a85 @0x0
0x1a85…1aa2 lno = 0x0af0 // 0x1a87 @0x2
0x1a85…1aa2 at0004 = ╱9d╱ EXEC ╱ // 0x1a89 @0x4
0x1a85…1aa2 at0005 = ╱43╱C╱ // 0x1a8a @0x5
0x1a85…1aa2 at0006 = ╱41╱A╱ // 0x1a8b @0x6
0x1a85…1aa2 at0007 = ╱ed╱(╱ // 0x1a8c @0x7
0x1a85…1aa2 at0008 = ╱42╱B╱ // 0x1a8d @0x8
0x1a85…1aa2 at0009 = ╱ec╱,╱ // 0x1a8e @0x9
0x1a85…1aa2 at000a = ╱42╱B╱ // 0x1a8f @0xa
0x1a85…1aa2 at000b = ╱4c╱L╱ // 0x1a90 @0xb
0x1a85…1aa2 at000c = ╱ef╱$╱ // 0x1a91 @0xc
0x1a85…1aa2 at000d = ╱ec╱,╱ // 0x1a92 @0xd
0x1a85…1aa2 at000e = ╱54╱T╱ // 0x1a93 @0xe
0x1a85…1aa2 at000f = ╱4f╱O╱ // 0x1a94 @0xf
0x1a85…1aa2 at0010 = ╱54╱T╱ // 0x1a95 @0x10
0x1a85…1aa2 at0011 = ╱41╱A╱ // 0x1a96 @0x11
0x1a85…1aa2 at0012 = ╱4c╱L╱ // 0x1a97 @0x12
0x1a85…1aa2 at0013 = ╱ef╱$╱ // 0x1a98 @0x13
0x1a85…1aa2 at0014 = ╱ec╱,╱ // 0x1a99 @0x14
0x1a85…1aa2 at0015 = ╱54╱T╱ // 0x1a9a @0x15
0x1a85…1aa2 at0016 = ╱4f╱O╱ // 0x1a9b @0x16
0x1a85…1aa2 at0017 = ╱54╱T╱ // 0x1a9c @0x17
0x1a85…1aa2 at0018 = ╱41╱A╱ // 0x1a9d @0x18
0x1a85…1aa2 at0019 = ╱4c╱L╱ // 0x1a9e @0x19
0x1a85…1aa2 at001a = ╱ef╱$╱ // 0x1a9f @0x1a
0x1a85…1aa2 at001b = ╱ee╱)╱ // 0x1aa0 @0x1b
0x1a85…1aa2 at001c = EOL // 0x1aa1 @0x1c
0x1a85…1aa2 }
0x1aa2…1ab3 a80a 2810 CURSOR 66,LIE
0x1aa2…1ab3 LineComalBin {
0x1aa2…1ab3 ptr = 0xa80a // 0x1aa2 @0x0
0x1aa2…1ab3 lno = 0x0afa // 0x1aa4 @0x2
0x1aa2…1ab3 at0004 = ╱a1╱ CURSOR ╱ // 0x1aa6 @0x4
0x1aa2…1ab3 at0005 = ╱36╱6╱ // 0x1aa7 @0x5
0x1aa2…1ab3 at0006 = ╱36╱6╱ // 0x1aa8 @0x6
0x1aa2…1ab3 at0007 = ╱fe00008407╱ // 0x1aa9 @0x7
0x1aa2…1ab3 at000c = ╱ec╱,╱ // 0x1aae @0xc
0x1aa2…1ab3 at000d = ╱4c╱L╱ // 0x1aaf @0xd
0x1aa2…1ab3 at000e = ╱49╱I╱ // 0x1ab0 @0xe
0x1aa2…1ab3 at000f = ╱45╱E╱ // 0x1ab1 @0xf
0x1aa2…1ab3 at0010 = EOL // 0x1ab2 @0x10
0x1aa2…1ab3 }
0x1ab3…1acb a822 2820 EXEC TUD(BL$,TAL4$,E,B)
0x1ab3…1acb LineComalBin {
0x1ab3…1acb ptr = 0xa822 // 0x1ab3 @0x0
0x1ab3…1acb lno = 0x0b04 // 0x1ab5 @0x2
0x1ab3…1acb at0004 = ╱9d╱ EXEC ╱ // 0x1ab7 @0x4
0x1ab3…1acb at0005 = ╱54╱T╱ // 0x1ab8 @0x5
0x1ab3…1acb at0006 = ╱55╱U╱ // 0x1ab9 @0x6
0x1ab3…1acb at0007 = ╱44╱D╱ // 0x1aba @0x7
0x1ab3…1acb at0008 = ╱ed╱(╱ // 0x1abb @0x8
0x1ab3…1acb at0009 = ╱42╱B╱ // 0x1abc @0x9
0x1ab3…1acb at000a = ╱4c╱L╱ // 0x1abd @0xa
0x1ab3…1acb at000b = ╱ef╱$╱ // 0x1abe @0xb
0x1ab3…1acb at000c = ╱ec╱,╱ // 0x1abf @0xc
0x1ab3…1acb at000d = ╱54╱T╱ // 0x1ac0 @0xd
0x1ab3…1acb at000e = ╱41╱A╱ // 0x1ac1 @0xe
0x1ab3…1acb at000f = ╱4c╱L╱ // 0x1ac2 @0xf
0x1ab3…1acb at0010 = ╱34╱4╱ // 0x1ac3 @0x10
0x1ab3…1acb at0011 = ╱ef╱$╱ // 0x1ac4 @0x11
0x1ab3…1acb at0012 = ╱ec╱,╱ // 0x1ac5 @0x12
0x1ab3…1acb at0013 = ╱45╱E╱ // 0x1ac6 @0x13
0x1ab3…1acb at0014 = ╱ec╱,╱ // 0x1ac7 @0x14
0x1ab3…1acb at0015 = ╱42╱B╱ // 0x1ac8 @0x15
0x1ab3…1acb at0016 = ╱ee╱)╱ // 0x1ac9 @0x16
0x1ab3…1acb at0017 = EOL // 0x1aca @0x17
0x1ab3…1acb }
0x1acb…1ae0 a837 2830 BLARR$(VLIN)=BL$
0x1acb…1ae0 LineComalBin {
0x1acb…1ae0 ptr = 0xa837 // 0x1acb @0x0
0x1acb…1ae0 lno = 0x0b0e // 0x1acd @0x2
0x1acb…1ae0 at0004 = ╱42╱B╱ // 0x1acf @0x4
0x1acb…1ae0 at0005 = ╱4c╱L╱ // 0x1ad0 @0x5
0x1acb…1ae0 at0006 = ╱41╱A╱ // 0x1ad1 @0x6
0x1acb…1ae0 at0007 = ╱52╱R╱ // 0x1ad2 @0x7
0x1acb…1ae0 at0008 = ╱52╱R╱ // 0x1ad3 @0x8
0x1acb…1ae0 at0009 = ╱ef╱$╱ // 0x1ad4 @0x9
0x1acb…1ae0 at000a = ╱ed╱(╱ // 0x1ad5 @0xa
0x1acb…1ae0 at000b = ╱56╱V╱ // 0x1ad6 @0xb
0x1acb…1ae0 at000c = ╱4c╱L╱ // 0x1ad7 @0xc
0x1acb…1ae0 at000d = ╱49╱I╱ // 0x1ad8 @0xd
0x1acb…1ae0 at000e = ╱4e╱N╱ // 0x1ad9 @0xe
0x1acb…1ae0 at000f = ╱ee╱)╱ // 0x1ada @0xf
0x1acb…1ae0 at0010 = ╱dc╱=╱ // 0x1adb @0x10
0x1acb…1ae0 at0011 = ╱42╱B╱ // 0x1adc @0x11
0x1acb…1ae0 at0012 = ╱4c╱L╱ // 0x1add @0x12
0x1acb…1ae0 at0013 = ╱ef╱$╱ // 0x1ade @0x13
0x1acb…1ae0 at0014 = EOL // 0x1adf @0x14
0x1acb…1ae0 }
0x1ae0…1ae6 a83d 2840 ELSE
0x1ae0…1ae6 LineComalBin {
0x1ae0…1ae6 ptr = 0xa83d // 0x1ae0 @0x0
0x1ae0…1ae6 lno = 0x0b18 // 0x1ae2 @0x2
0x1ae0…1ae6 at0004 = ╱9a╱ ELSE ╱ // 0x1ae4 @0x4
0x1ae0…1ae6 at0005 = EOL // 0x1ae5 @0x5
0x1ae0…1ae6 }
0x1ae6…1afc a853 2850 BLARR$(VLIN)="0+"
0x1ae6…1afc LineComalBin {
0x1ae6…1afc ptr = 0xa853 // 0x1ae6 @0x0
0x1ae6…1afc lno = 0x0b22 // 0x1ae8 @0x2
0x1ae6…1afc at0004 = ╱42╱B╱ // 0x1aea @0x4
0x1ae6…1afc at0005 = ╱4c╱L╱ // 0x1aeb @0x5
0x1ae6…1afc at0006 = ╱41╱A╱ // 0x1aec @0x6
0x1ae6…1afc at0007 = ╱52╱R╱ // 0x1aed @0x7
0x1ae6…1afc at0008 = ╱52╱R╱ // 0x1aee @0x8
0x1ae6…1afc at0009 = ╱ef╱$╱ // 0x1aef @0x9
0x1ae6…1afc at000a = ╱ed╱(╱ // 0x1af0 @0xa
0x1ae6…1afc at000b = ╱56╱V╱ // 0x1af1 @0xb
0x1ae6…1afc at000c = ╱4c╱L╱ // 0x1af2 @0xc
0x1ae6…1afc at000d = ╱49╱I╱ // 0x1af3 @0xd
0x1ae6…1afc at000e = ╱4e╱N╱ // 0x1af4 @0xe
0x1ae6…1afc at000f = ╱ee╱)╱ // 0x1af5 @0xf
0x1ae6…1afc at0010 = ╱dc╱=╱ // 0x1af6 @0x10
0x1ae6…1afc at0011 = ╱22╱"╱ // 0x1af7 @0x11
0x1ae6…1afc at0012 = ╱30╱0╱ // 0x1af8 @0x12
0x1ae6…1afc at0013 = ╱2b╱+╱ // 0x1af9 @0x13
0x1ae6…1afc at0014 = ╱22╱"╱ // 0x1afa @0x14
0x1ae6…1afc at0015 = EOL // 0x1afb @0x15
0x1ae6…1afc }
0x1afc…1b02 a859 2860 ENDIF
0x1afc…1b02 LineComalBin {
0x1afc…1b02 ptr = 0xa859 // 0x1afc @0x0
0x1afc…1b02 lno = 0x0b2c // 0x1afe @0x2
0x1afc…1b02 at0004 = ╱9b╱ ENDIF ╱ // 0x1b00 @0x4
0x1afc…1b02 at0005 = EOL // 0x1b01 @0x5
0x1afc…1b02 }
0x1b02…1b30 a887 2870 VNARR(VLIN)=VARENR;VTARR$(VLIN)=VARTEKST$
0x1b02…1b30 LineComalBin {
0x1b02…1b30 ptr = 0xa887 // 0x1b02 @0x0
0x1b02…1b30 lno = 0x0b36 // 0x1b04 @0x2
0x1b02…1b30 at0004 = ╱56╱V╱ // 0x1b06 @0x4
0x1b02…1b30 at0005 = ╱4e╱N╱ // 0x1b07 @0x5
0x1b02…1b30 at0006 = ╱41╱A╱ // 0x1b08 @0x6
0x1b02…1b30 at0007 = ╱52╱R╱ // 0x1b09 @0x7
0x1b02…1b30 at0008 = ╱52╱R╱ // 0x1b0a @0x8
0x1b02…1b30 at0009 = ╱ed╱(╱ // 0x1b0b @0x9
0x1b02…1b30 at000a = ╱56╱V╱ // 0x1b0c @0xa
0x1b02…1b30 at000b = ╱4c╱L╱ // 0x1b0d @0xb
0x1b02…1b30 at000c = ╱49╱I╱ // 0x1b0e @0xc
0x1b02…1b30 at000d = ╱4e╱N╱ // 0x1b0f @0xd
0x1b02…1b30 at000e = ╱ee╱)╱ // 0x1b10 @0xe
0x1b02…1b30 at000f = ╱dc╱=╱ // 0x1b11 @0xf
0x1b02…1b30 at0010 = ╱56╱V╱ // 0x1b12 @0x10
0x1b02…1b30 at0011 = ╱41╱A╱ // 0x1b13 @0x11
0x1b02…1b30 at0012 = ╱52╱R╱ // 0x1b14 @0x12
0x1b02…1b30 at0013 = ╱45╱E╱ // 0x1b15 @0x13
0x1b02…1b30 at0014 = ╱4e╱N╱ // 0x1b16 @0x14
0x1b02…1b30 at0015 = ╱52╱R╱ // 0x1b17 @0x15
0x1b02…1b30 at0016 = ╱eb╱;╱ // 0x1b18 @0x16
0x1b02…1b30 at0017 = ╱56╱V╱ // 0x1b19 @0x17
0x1b02…1b30 at0018 = ╱54╱T╱ // 0x1b1a @0x18
0x1b02…1b30 at0019 = ╱41╱A╱ // 0x1b1b @0x19
0x1b02…1b30 at001a = ╱52╱R╱ // 0x1b1c @0x1a
0x1b02…1b30 at001b = ╱52╱R╱ // 0x1b1d @0x1b
0x1b02…1b30 at001c = ╱ef╱$╱ // 0x1b1e @0x1c
0x1b02…1b30 at001d = ╱ed╱(╱ // 0x1b1f @0x1d
0x1b02…1b30 at001e = ╱56╱V╱ // 0x1b20 @0x1e
0x1b02…1b30 at001f = ╱4c╱L╱ // 0x1b21 @0x1f
0x1b02…1b30 at0020 = ╱49╱I╱ // 0x1b22 @0x20
0x1b02…1b30 at0021 = ╱4e╱N╱ // 0x1b23 @0x21
0x1b02…1b30 at0022 = ╱ee╱)╱ // 0x1b24 @0x22
0x1b02…1b30 at0023 = ╱dc╱=╱ // 0x1b25 @0x23
0x1b02…1b30 at0024 = ╱56╱V╱ // 0x1b26 @0x24
0x1b02…1b30 at0025 = ╱41╱A╱ // 0x1b27 @0x25
0x1b02…1b30 at0026 = ╱52╱R╱ // 0x1b28 @0x26
0x1b02…1b30 at0027 = ╱54╱T╱ // 0x1b29 @0x27
0x1b02…1b30 at0028 = ╱45╱E╱ // 0x1b2a @0x28
0x1b02…1b30 at0029 = ╱4b╱K╱ // 0x1b2b @0x29
0x1b02…1b30 at002a = ╱53╱S╱ // 0x1b2c @0x2a
0x1b02…1b30 at002b = ╱54╱T╱ // 0x1b2d @0x2b
0x1b02…1b30 at002c = ╱ef╱$╱ // 0x1b2e @0x2c
0x1b02…1b30 at002d = EOL // 0x1b2f @0x2d
0x1b02…1b30 }
0x1b30…1b36 a88d 2880 ENDIF
0x1b30…1b36 LineComalBin {
0x1b30…1b36 ptr = 0xa88d // 0x1b30 @0x0
0x1b30…1b36 lno = 0x0b40 // 0x1b32 @0x2
0x1b30…1b36 at0004 = ╱9b╱ ENDIF ╱ // 0x1b34 @0x4
0x1b30…1b36 at0005 = EOL // 0x1b35 @0x5
0x1b30…1b36 }
0x1b36…1b3e a895 2890 WHEN V
0x1b36…1b3e LineComalBin {
0x1b36…1b3e ptr = 0xa895 // 0x1b36 @0x0
0x1b36…1b3e lno = 0x0b4a // 0x1b38 @0x2
0x1b36…1b3e at0004 = ╱a301╱ WHEN ╱ // 0x1b3a @0x4
0x1b36…1b3e at0006 = ╱56╱V╱ // 0x1b3c @0x6
0x1b36…1b3e at0007 = EOL // 0x1b3d @0x7
0x1b36…1b3e }
0x1b3e…1b54 a8ab 2900 IF VNARR(VLIN-E)<>V THEN
0x1b3e…1b54 LineComalBin {
0x1b3e…1b54 ptr = 0xa8ab // 0x1b3e @0x0
0x1b3e…1b54 lno = 0x0b54 // 0x1b40 @0x2
0x1b3e…1b54 at0004 = ╱9c╱ IF ╱ // 0x1b42 @0x4
0x1b3e…1b54 at0005 = ╱56╱V╱ // 0x1b43 @0x5
0x1b3e…1b54 at0006 = ╱4e╱N╱ // 0x1b44 @0x6
0x1b3e…1b54 at0007 = ╱41╱A╱ // 0x1b45 @0x7
0x1b3e…1b54 at0008 = ╱52╱R╱ // 0x1b46 @0x8
0x1b3e…1b54 at0009 = ╱52╱R╱ // 0x1b47 @0x9
0x1b3e…1b54 at000a = ╱ed╱(╱ // 0x1b48 @0xa
0x1b3e…1b54 at000b = ╱56╱V╱ // 0x1b49 @0xb
0x1b3e…1b54 at000c = ╱4c╱L╱ // 0x1b4a @0xc
0x1b3e…1b54 at000d = ╱49╱I╱ // 0x1b4b @0xd
0x1b3e…1b54 at000e = ╱4e╱N╱ // 0x1b4c @0xe
0x1b3e…1b54 at000f = ╱e3╱-╱ // 0x1b4d @0xf
0x1b3e…1b54 at0010 = ╱45╱E╱ // 0x1b4e @0x10
0x1b3e…1b54 at0011 = ╱ee╱)╱ // 0x1b4f @0x11
0x1b3e…1b54 at0012 = ╱e1╱<>╱ // 0x1b50 @0x12
0x1b3e…1b54 at0013 = ╱56╱V╱ // 0x1b51 @0x13
0x1b3e…1b54 at0014 = ╱b6╱ THEN ╱ // 0x1b52 @0x14
0x1b3e…1b54 at0015 = EOL // 0x1b53 @0x15
0x1b3e…1b54 }
0x1b54…1b7a a8d1 2910 EXEC INDPUT2(24,LIE,LTX1$,VPRI$)
0x1b54…1b7a LineComalBin {
0x1b54…1b7a ptr = 0xa8d1 // 0x1b54 @0x0
0x1b54…1b7a lno = 0x0b5e // 0x1b56 @0x2
0x1b54…1b7a at0004 = ╱9d╱ EXEC ╱ // 0x1b58 @0x4
0x1b54…1b7a at0005 = ╱49╱I╱ // 0x1b59 @0x5
0x1b54…1b7a at0006 = ╱4e╱N╱ // 0x1b5a @0x6
0x1b54…1b7a at0007 = ╱44╱D╱ // 0x1b5b @0x7
0x1b54…1b7a at0008 = ╱50╱P╱ // 0x1b5c @0x8
0x1b54…1b7a at0009 = ╱55╱U╱ // 0x1b5d @0x9
0x1b54…1b7a at000a = ╱54╱T╱ // 0x1b5e @0xa
0x1b54…1b7a at000b = ╱32╱2╱ // 0x1b5f @0xb
0x1b54…1b7a at000c = ╱ed╱(╱ // 0x1b60 @0xc
0x1b54…1b7a at000d = ╱32╱2╱ // 0x1b61 @0xd
0x1b54…1b7a at000e = ╱34╱4╱ // 0x1b62 @0xe
0x1b54…1b7a at000f = ╱fe0000c005╱ // 0x1b63 @0xf
0x1b54…1b7a at0014 = ╱ec╱,╱ // 0x1b68 @0x14
0x1b54…1b7a at0015 = ╱4c╱L╱ // 0x1b69 @0x15
0x1b54…1b7a at0016 = ╱49╱I╱ // 0x1b6a @0x16
0x1b54…1b7a at0017 = ╱45╱E╱ // 0x1b6b @0x17
0x1b54…1b7a at0018 = ╱ec╱,╱ // 0x1b6c @0x18
0x1b54…1b7a at0019 = ╱4c╱L╱ // 0x1b6d @0x19
0x1b54…1b7a at001a = ╱54╱T╱ // 0x1b6e @0x1a
0x1b54…1b7a at001b = ╱58╱X╱ // 0x1b6f @0x1b
0x1b54…1b7a at001c = ╱31╱1╱ // 0x1b70 @0x1c
0x1b54…1b7a at001d = ╱ef╱$╱ // 0x1b71 @0x1d
0x1b54…1b7a at001e = ╱ec╱,╱ // 0x1b72 @0x1e
0x1b54…1b7a at001f = ╱56╱V╱ // 0x1b73 @0x1f
0x1b54…1b7a at0020 = ╱50╱P╱ // 0x1b74 @0x20
0x1b54…1b7a at0021 = ╱52╱R╱ // 0x1b75 @0x21
0x1b54…1b7a at0022 = ╱49╱I╱ // 0x1b76 @0x22
0x1b54…1b7a at0023 = ╱ef╱$╱ // 0x1b77 @0x23
0x1b54…1b7a at0024 = ╱ee╱)╱ // 0x1b78 @0x24
0x1b54…1b7a at0025 = EOL // 0x1b79 @0x25
0x1b54…1b7a }
0x1b7a…1b9a a8f1 2920 EXEC CA(4,VPRI$,TAH$,TAH$)
0x1b7a…1b9a LineComalBin {
0x1b7a…1b9a ptr = 0xa8f1 // 0x1b7a @0x0
0x1b7a…1b9a lno = 0x0b68 // 0x1b7c @0x2
0x1b7a…1b9a at0004 = ╱9d╱ EXEC ╱ // 0x1b7e @0x4
0x1b7a…1b9a at0005 = ╱43╱C╱ // 0x1b7f @0x5
0x1b7a…1b9a at0006 = ╱41╱A╱ // 0x1b80 @0x6
0x1b7a…1b9a at0007 = ╱ed╱(╱ // 0x1b81 @0x7
0x1b7a…1b9a at0008 = ╱34╱4╱ // 0x1b82 @0x8
0x1b7a…1b9a at0009 = ╱fe00008003╱ // 0x1b83 @0x9
0x1b7a…1b9a at000e = ╱ec╱,╱ // 0x1b88 @0xe
0x1b7a…1b9a at000f = ╱56╱V╱ // 0x1b89 @0xf
0x1b7a…1b9a at0010 = ╱50╱P╱ // 0x1b8a @0x10
0x1b7a…1b9a at0011 = ╱52╱R╱ // 0x1b8b @0x11
0x1b7a…1b9a at0012 = ╱49╱I╱ // 0x1b8c @0x12
0x1b7a…1b9a at0013 = ╱ef╱$╱ // 0x1b8d @0x13
0x1b7a…1b9a at0014 = ╱ec╱,╱ // 0x1b8e @0x14
0x1b7a…1b9a at0015 = ╱54╱T╱ // 0x1b8f @0x15
0x1b7a…1b9a at0016 = ╱41╱A╱ // 0x1b90 @0x16
0x1b7a…1b9a at0017 = ╱48╱H╱ // 0x1b91 @0x17
0x1b7a…1b9a at0018 = ╱ef╱$╱ // 0x1b92 @0x18
0x1b7a…1b9a at0019 = ╱ec╱,╱ // 0x1b93 @0x19
0x1b7a…1b9a at001a = ╱54╱T╱ // 0x1b94 @0x1a
0x1b7a…1b9a at001b = ╱41╱A╱ // 0x1b95 @0x1b
0x1b7a…1b9a at001c = ╱48╱H╱ // 0x1b96 @0x1c
0x1b7a…1b9a at001d = ╱ef╱$╱ // 0x1b97 @0x1d
0x1b7a…1b9a at001e = ╱ee╱)╱ // 0x1b98 @0x1e
0x1b7a…1b9a at001f = EOL // 0x1b99 @0x1f
0x1b7a…1b9a }
0x1b9a…1baa a901 2930 IF SI=B THEN FE6=E
0x1b9a…1baa LineComalBin {
0x1b9a…1baa ptr = 0xa901 // 0x1b9a @0x0
0x1b9a…1baa lno = 0x0b72 // 0x1b9c @0x2
0x1b9a…1baa at0004 = ╱82╱ IF ╱ // 0x1b9e @0x4
0x1b9a…1baa at0005 = ╱53╱S╱ // 0x1b9f @0x5
0x1b9a…1baa at0006 = ╱49╱I╱ // 0x1ba0 @0x6
0x1b9a…1baa at0007 = ╱dc╱=╱ // 0x1ba1 @0x7
0x1b9a…1baa at0008 = ╱42╱B╱ // 0x1ba2 @0x8
0x1b9a…1baa at0009 = ╱b6╱ THEN ╱ // 0x1ba3 @0x9
0x1b9a…1baa at000a = ╱46╱F╱ // 0x1ba4 @0xa
0x1b9a…1baa at000b = ╱45╱E╱ // 0x1ba5 @0xb
0x1b9a…1baa at000c = ╱36╱6╱ // 0x1ba6 @0xc
0x1b9a…1baa at000d = ╱dc╱=╱ // 0x1ba7 @0xd
0x1b9a…1baa at000e = ╱45╱E╱ // 0x1ba8 @0xe
0x1b9a…1baa at000f = EOL // 0x1ba9 @0xf
0x1b9a…1baa }
0x1baa…1bb6 a90d 2940 IF FE6=B THEN
0x1baa…1bb6 LineComalBin {
0x1baa…1bb6 ptr = 0xa90d // 0x1baa @0x0
0x1baa…1bb6 lno = 0x0b7c // 0x1bac @0x2
0x1baa…1bb6 at0004 = ╱9c╱ IF ╱ // 0x1bae @0x4
0x1baa…1bb6 at0005 = ╱46╱F╱ // 0x1baf @0x5
0x1baa…1bb6 at0006 = ╱45╱E╱ // 0x1bb0 @0x6
0x1baa…1bb6 at0007 = ╱36╱6╱ // 0x1bb1 @0x7
0x1baa…1bb6 at0008 = ╱dc╱=╱ // 0x1bb2 @0x8
0x1baa…1bb6 at0009 = ╱42╱B╱ // 0x1bb3 @0x9
0x1baa…1bb6 at000a = ╱b6╱ THEN ╱ // 0x1bb4 @0xa
0x1baa…1bb6 at000b = EOL // 0x1bb5 @0xb
0x1baa…1bb6 }
0x1bb6…1bc7 a91e 2950 CURSOR 30,LIE
0x1bb6…1bc7 LineComalBin {
0x1bb6…1bc7 ptr = 0xa91e // 0x1bb6 @0x0
0x1bb6…1bc7 lno = 0x0b86 // 0x1bb8 @0x2
0x1bb6…1bc7 at0004 = ╱a1╱ CURSOR ╱ // 0x1bba @0x4
0x1bb6…1bc7 at0005 = ╱33╱3╱ // 0x1bbb @0x5
0x1bb6…1bc7 at0006 = ╱30╱0╱ // 0x1bbc @0x6
0x1bb6…1bc7 at0007 = ╱fe0000f005╱ // 0x1bbd @0x7
0x1bb6…1bc7 at000c = ╱ec╱,╱ // 0x1bc2 @0xc
0x1bb6…1bc7 at000d = ╱4c╱L╱ // 0x1bc3 @0xd
0x1bb6…1bc7 at000e = ╱49╱I╱ // 0x1bc4 @0xe
0x1bb6…1bc7 at000f = ╱45╱E╱ // 0x1bc5 @0xf
0x1bb6…1bc7 at0010 = EOL // 0x1bc6 @0x10
0x1bb6…1bc7 }
0x1bc7…1bf5 a94c 2960 PRINT VPRI$(7:5);" %";BK$(E:25)
0x1bc7…1bf5 LineComalBin {
0x1bc7…1bf5 ptr = 0xa94c // 0x1bc7 @0x0
0x1bc7…1bf5 lno = 0x0b90 // 0x1bc9 @0x2
0x1bc7…1bf5 at0004 = ╱92╱ PRINT ╱ // 0x1bcb @0x4
0x1bc7…1bf5 at0005 = ╱56╱V╱ // 0x1bcc @0x5
0x1bc7…1bf5 at0006 = ╱50╱P╱ // 0x1bcd @0x6
0x1bc7…1bf5 at0007 = ╱52╱R╱ // 0x1bce @0x7
0x1bc7…1bf5 at0008 = ╱49╱I╱ // 0x1bcf @0x8
0x1bc7…1bf5 at0009 = ╱ef╱$╱ // 0x1bd0 @0x9
0x1bc7…1bf5 at000a = ╱ed╱(╱ // 0x1bd1 @0xa
0x1bc7…1bf5 at000b = ╱37╱7╱ // 0x1bd2 @0xb
0x1bc7…1bf5 at000c = ╱fe0000e003╱ // 0x1bd3 @0xc
0x1bc7…1bf5 at0011 = ╱f0╱:╱ // 0x1bd8 @0x11
0x1bc7…1bf5 at0012 = ╱35╱5╱ // 0x1bd9 @0x12
0x1bc7…1bf5 at0013 = ╱fe0000a003╱ // 0x1bda @0x13
0x1bc7…1bf5 at0018 = ╱ee╱)╱ // 0x1bdf @0x18
0x1bc7…1bf5 at0019 = ╱eb╱;╱ // 0x1be0 @0x19
0x1bc7…1bf5 at001a = ╱22╱"╱ // 0x1be1 @0x1a
0x1bc7…1bf5 at001b = ╱20╱…╱ // 0x1be2 @0x1b
0x1bc7…1bf5 at001c = ╱25╱%╱ // 0x1be3 @0x1c
0x1bc7…1bf5 at001d = ╱22╱"╱ // 0x1be4 @0x1d
0x1bc7…1bf5 at001e = ╱eb╱;╱ // 0x1be5 @0x1e
0x1bc7…1bf5 at001f = ╱42╱B╱ // 0x1be6 @0x1f
0x1bc7…1bf5 at0020 = ╱4b╱K╱ // 0x1be7 @0x20
0x1bc7…1bf5 at0021 = ╱ef╱$╱ // 0x1be8 @0x21
0x1bc7…1bf5 at0022 = ╱ed╱(╱ // 0x1be9 @0x22
0x1bc7…1bf5 at0023 = ╱45╱E╱ // 0x1bea @0x23
0x1bc7…1bf5 at0024 = ╱f0╱:╱ // 0x1beb @0x24
0x1bc7…1bf5 at0025 = ╱32╱2╱ // 0x1bec @0x25
0x1bc7…1bf5 at0026 = ╱35╱5╱ // 0x1bed @0x26
0x1bc7…1bf5 at0027 = ╱fe0000c805╱ // 0x1bee @0x27
0x1bc7…1bf5 at002c = ╱ee╱)╱ // 0x1bf3 @0x2c
0x1bc7…1bf5 at002d = EOL // 0x1bf4 @0x2d
0x1bc7…1bf5 }
0x1bf5…1c19 a970 2970 EXEC CA(G,VPRI$,BLARR$(VLIN-E),BL$)
0x1bf5…1c19 LineComalBin {
0x1bf5…1c19 ptr = 0xa970 // 0x1bf5 @0x0
0x1bf5…1c19 lno = 0x0b9a // 0x1bf7 @0x2
0x1bf5…1c19 at0004 = ╱9d╱ EXEC ╱ // 0x1bf9 @0x4
0x1bf5…1c19 at0005 = ╱43╱C╱ // 0x1bfa @0x5
0x1bf5…1c19 at0006 = ╱41╱A╱ // 0x1bfb @0x6
0x1bf5…1c19 at0007 = ╱ed╱(╱ // 0x1bfc @0x7
0x1bf5…1c19 at0008 = ╱47╱G╱ // 0x1bfd @0x8
0x1bf5…1c19 at0009 = ╱ec╱,╱ // 0x1bfe @0x9
0x1bf5…1c19 at000a = ╱56╱V╱ // 0x1bff @0xa
0x1bf5…1c19 at000b = ╱50╱P╱ // 0x1c00 @0xb
0x1bf5…1c19 at000c = ╱52╱R╱ // 0x1c01 @0xc
0x1bf5…1c19 at000d = ╱49╱I╱ // 0x1c02 @0xd
0x1bf5…1c19 at000e = ╱ef╱$╱ // 0x1c03 @0xe
0x1bf5…1c19 at000f = ╱ec╱,╱ // 0x1c04 @0xf
0x1bf5…1c19 at0010 = ╱42╱B╱ // 0x1c05 @0x10
0x1bf5…1c19 at0011 = ╱4c╱L╱ // 0x1c06 @0x11
0x1bf5…1c19 at0012 = ╱41╱A╱ // 0x1c07 @0x12
0x1bf5…1c19 at0013 = ╱52╱R╱ // 0x1c08 @0x13
0x1bf5…1c19 at0014 = ╱52╱R╱ // 0x1c09 @0x14
0x1bf5…1c19 at0015 = ╱ef╱$╱ // 0x1c0a @0x15
0x1bf5…1c19 at0016 = ╱ed╱(╱ // 0x1c0b @0x16
0x1bf5…1c19 at0017 = ╱56╱V╱ // 0x1c0c @0x17
0x1bf5…1c19 at0018 = ╱4c╱L╱ // 0x1c0d @0x18
0x1bf5…1c19 at0019 = ╱49╱I╱ // 0x1c0e @0x19
0x1bf5…1c19 at001a = ╱4e╱N╱ // 0x1c0f @0x1a
0x1bf5…1c19 at001b = ╱e3╱-╱ // 0x1c10 @0x1b
0x1bf5…1c19 at001c = ╱45╱E╱ // 0x1c11 @0x1c
0x1bf5…1c19 at001d = ╱ee╱)╱ // 0x1c12 @0x1d
0x1bf5…1c19 at001e = ╱ec╱,╱ // 0x1c13 @0x1e
0x1bf5…1c19 at001f = ╱42╱B╱ // 0x1c14 @0x1f
0x1bf5…1c19 at0020 = ╱4c╱L╱ // 0x1c15 @0x20
0x1bf5…1c19 at0021 = ╱ef╱$╱ // 0x1c16 @0x21
0x1bf5…1c19 at0022 = ╱ee╱)╱ // 0x1c17 @0x22
0x1bf5…1c19 at0023 = EOL // 0x1c18 @0x23
0x1bf5…1c19 }
0x1c19…1c4d a9a4 2980 VTARR$(VLIN)="Rabat "+VPRI$(7:5)+" %"
0x1c19…1c4d LineComalBin {
0x1c19…1c4d ptr = 0xa9a4 // 0x1c19 @0x0
0x1c19…1c4d lno = 0x0ba4 // 0x1c1b @0x2
0x1c19…1c4d at0004 = ╱56╱V╱ // 0x1c1d @0x4
0x1c19…1c4d at0005 = ╱54╱T╱ // 0x1c1e @0x5
0x1c19…1c4d at0006 = ╱41╱A╱ // 0x1c1f @0x6
0x1c19…1c4d at0007 = ╱52╱R╱ // 0x1c20 @0x7
0x1c19…1c4d at0008 = ╱52╱R╱ // 0x1c21 @0x8
0x1c19…1c4d at0009 = ╱ef╱$╱ // 0x1c22 @0x9
0x1c19…1c4d at000a = ╱ed╱(╱ // 0x1c23 @0xa
0x1c19…1c4d at000b = ╱56╱V╱ // 0x1c24 @0xb
0x1c19…1c4d at000c = ╱4c╱L╱ // 0x1c25 @0xc
0x1c19…1c4d at000d = ╱49╱I╱ // 0x1c26 @0xd
0x1c19…1c4d at000e = ╱4e╱N╱ // 0x1c27 @0xe
0x1c19…1c4d at000f = ╱ee╱)╱ // 0x1c28 @0xf
0x1c19…1c4d at0010 = ╱dc╱=╱ // 0x1c29 @0x10
0x1c19…1c4d at0011 = ╱22╱"╱ // 0x1c2a @0x11
0x1c19…1c4d at0012 = ╱52╱R╱ // 0x1c2b @0x12
0x1c19…1c4d at0013 = ╱61╱a╱ // 0x1c2c @0x13
0x1c19…1c4d at0014 = ╱62╱b╱ // 0x1c2d @0x14
0x1c19…1c4d at0015 = ╱61╱a╱ // 0x1c2e @0x15
0x1c19…1c4d at0016 = ╱74╱t╱ // 0x1c2f @0x16
0x1c19…1c4d at0017 = ╱20╱…╱ // 0x1c30 @0x17
0x1c19…1c4d at0018 = ╱22╱"╱ // 0x1c31 @0x18
0x1c19…1c4d at0019 = ╱f1╱+╱ // 0x1c32 @0x19
0x1c19…1c4d at001a = ╱56╱V╱ // 0x1c33 @0x1a
0x1c19…1c4d at001b = ╱50╱P╱ // 0x1c34 @0x1b
0x1c19…1c4d at001c = ╱52╱R╱ // 0x1c35 @0x1c
0x1c19…1c4d at001d = ╱49╱I╱ // 0x1c36 @0x1d
0x1c19…1c4d at001e = ╱ef╱$╱ // 0x1c37 @0x1e
0x1c19…1c4d at001f = ╱ed╱(╱ // 0x1c38 @0x1f
0x1c19…1c4d at0020 = ╱37╱7╱ // 0x1c39 @0x20
0x1c19…1c4d at0021 = ╱fe0000e003╱ // 0x1c3a @0x21
0x1c19…1c4d at0026 = ╱f0╱:╱ // 0x1c3f @0x26
0x1c19…1c4d at0027 = ╱35╱5╱ // 0x1c40 @0x27
0x1c19…1c4d at0028 = ╱fe0000a003╱ // 0x1c41 @0x28
0x1c19…1c4d at002d = ╱ee╱)╱ // 0x1c46 @0x2d
0x1c19…1c4d at002e = ╱f1╱+╱ // 0x1c47 @0x2e
0x1c19…1c4d at002f = ╱22╱"╱ // 0x1c48 @0x2f
0x1c19…1c4d at0030 = ╱20╱…╱ // 0x1c49 @0x30
0x1c19…1c4d at0031 = ╱25╱%╱ // 0x1c4a @0x31
0x1c19…1c4d at0032 = ╱22╱"╱ // 0x1c4b @0x32
0x1c19…1c4d at0033 = EOL // 0x1c4c @0x33
0x1c19…1c4d }
0x1c4d…1c71 a9c8 2990 VNARR(VLIN)=VARENR;VPRI$="100-"
0x1c4d…1c71 LineComalBin {
0x1c4d…1c71 ptr = 0xa9c8 // 0x1c4d @0x0
0x1c4d…1c71 lno = 0x0bae // 0x1c4f @0x2
0x1c4d…1c71 at0004 = ╱56╱V╱ // 0x1c51 @0x4
0x1c4d…1c71 at0005 = ╱4e╱N╱ // 0x1c52 @0x5
0x1c4d…1c71 at0006 = ╱41╱A╱ // 0x1c53 @0x6
0x1c4d…1c71 at0007 = ╱52╱R╱ // 0x1c54 @0x7
0x1c4d…1c71 at0008 = ╱52╱R╱ // 0x1c55 @0x8
0x1c4d…1c71 at0009 = ╱ed╱(╱ // 0x1c56 @0x9
0x1c4d…1c71 at000a = ╱56╱V╱ // 0x1c57 @0xa
0x1c4d…1c71 at000b = ╱4c╱L╱ // 0x1c58 @0xb
0x1c4d…1c71 at000c = ╱49╱I╱ // 0x1c59 @0xc
0x1c4d…1c71 at000d = ╱4e╱N╱ // 0x1c5a @0xd
0x1c4d…1c71 at000e = ╱ee╱)╱ // 0x1c5b @0xe
0x1c4d…1c71 at000f = ╱dc╱=╱ // 0x1c5c @0xf
0x1c4d…1c71 at0010 = ╱56╱V╱ // 0x1c5d @0x10
0x1c4d…1c71 at0011 = ╱41╱A╱ // 0x1c5e @0x11
0x1c4d…1c71 at0012 = ╱52╱R╱ // 0x1c5f @0x12
0x1c4d…1c71 at0013 = ╱45╱E╱ // 0x1c60 @0x13
0x1c4d…1c71 at0014 = ╱4e╱N╱ // 0x1c61 @0x14
0x1c4d…1c71 at0015 = ╱52╱R╱ // 0x1c62 @0x15
0x1c4d…1c71 at0016 = ╱eb╱;╱ // 0x1c63 @0x16
0x1c4d…1c71 at0017 = ╱56╱V╱ // 0x1c64 @0x17
0x1c4d…1c71 at0018 = ╱50╱P╱ // 0x1c65 @0x18
0x1c4d…1c71 at0019 = ╱52╱R╱ // 0x1c66 @0x19
0x1c4d…1c71 at001a = ╱49╱I╱ // 0x1c67 @0x1a
0x1c4d…1c71 at001b = ╱ef╱$╱ // 0x1c68 @0x1b
0x1c4d…1c71 at001c = ╱dc╱=╱ // 0x1c69 @0x1c
0x1c4d…1c71 at001d = ╱22╱"╱ // 0x1c6a @0x1d
0x1c4d…1c71 at001e = ╱31╱1╱ // 0x1c6b @0x1e
0x1c4d…1c71 at001f = ╱30╱0╱ // 0x1c6c @0x1f
0x1c4d…1c71 at0020 = ╱30╱0╱ // 0x1c6d @0x20
0x1c4d…1c71 at0021 = ╱2d╱-╱ // 0x1c6e @0x21
0x1c4d…1c71 at0022 = ╱22╱"╱ // 0x1c6f @0x22
0x1c4d…1c71 at0023 = EOL // 0x1c70 @0x23
0x1c4d…1c71 }
0x1c71…1c8a a9e1 3000 EXEC CA(V,BL$,VPRI$,BL$)
0x1c71…1c8a LineComalBin {
0x1c71…1c8a ptr = 0xa9e1 // 0x1c71 @0x0
0x1c71…1c8a lno = 0x0bb8 // 0x1c73 @0x2
0x1c71…1c8a at0004 = ╱9d╱ EXEC ╱ // 0x1c75 @0x4
0x1c71…1c8a at0005 = ╱43╱C╱ // 0x1c76 @0x5
0x1c71…1c8a at0006 = ╱41╱A╱ // 0x1c77 @0x6
0x1c71…1c8a at0007 = ╱ed╱(╱ // 0x1c78 @0x7
0x1c71…1c8a at0008 = ╱56╱V╱ // 0x1c79 @0x8
0x1c71…1c8a at0009 = ╱ec╱,╱ // 0x1c7a @0x9
0x1c71…1c8a at000a = ╱42╱B╱ // 0x1c7b @0xa
0x1c71…1c8a at000b = ╱4c╱L╱ // 0x1c7c @0xb
0x1c71…1c8a at000c = ╱ef╱$╱ // 0x1c7d @0xc
0x1c71…1c8a at000d = ╱ec╱,╱ // 0x1c7e @0xd
0x1c71…1c8a at000e = ╱56╱V╱ // 0x1c7f @0xe
0x1c71…1c8a at000f = ╱50╱P╱ // 0x1c80 @0xf
0x1c71…1c8a at0010 = ╱52╱R╱ // 0x1c81 @0x10
0x1c71…1c8a at0011 = ╱49╱I╱ // 0x1c82 @0x11
0x1c71…1c8a at0012 = ╱ef╱$╱ // 0x1c83 @0x12
0x1c71…1c8a at0013 = ╱ec╱,╱ // 0x1c84 @0x13
0x1c71…1c8a at0014 = ╱42╱B╱ // 0x1c85 @0x14
0x1c71…1c8a at0015 = ╱4c╱L╱ // 0x1c86 @0x15
0x1c71…1c8a at0016 = ╱ef╱$╱ // 0x1c87 @0x16
0x1c71…1c8a at0017 = ╱ee╱)╱ // 0x1c88 @0x17
0x1c71…1c8a at0018 = EOL // 0x1c89 @0x18
0x1c71…1c8a }
0x1c8a…1c9b a9f2 3010 CURSOR 66,LIE
0x1c8a…1c9b LineComalBin {
0x1c8a…1c9b ptr = 0xa9f2 // 0x1c8a @0x0
0x1c8a…1c9b lno = 0x0bc2 // 0x1c8c @0x2
0x1c8a…1c9b at0004 = ╱a1╱ CURSOR ╱ // 0x1c8e @0x4
0x1c8a…1c9b at0005 = ╱36╱6╱ // 0x1c8f @0x5
0x1c8a…1c9b at0006 = ╱36╱6╱ // 0x1c90 @0x6
0x1c8a…1c9b at0007 = ╱fe00008407╱ // 0x1c91 @0x7
0x1c8a…1c9b at000c = ╱ec╱,╱ // 0x1c96 @0xc
0x1c8a…1c9b at000d = ╱4c╱L╱ // 0x1c97 @0xd
0x1c8a…1c9b at000e = ╱49╱I╱ // 0x1c98 @0xe
0x1c8a…1c9b at000f = ╱45╱E╱ // 0x1c99 @0xf
0x1c8a…1c9b at0010 = EOL // 0x1c9a @0x10
0x1c8a…1c9b }
0x1c9b…1cb3 aa0a 3020 EXEC TUD(BL$,TAL4$,E,B)
0x1c9b…1cb3 LineComalBin {
0x1c9b…1cb3 ptr = 0xaa0a // 0x1c9b @0x0
0x1c9b…1cb3 lno = 0x0bcc // 0x1c9d @0x2
0x1c9b…1cb3 at0004 = ╱9d╱ EXEC ╱ // 0x1c9f @0x4
0x1c9b…1cb3 at0005 = ╱54╱T╱ // 0x1ca0 @0x5
0x1c9b…1cb3 at0006 = ╱55╱U╱ // 0x1ca1 @0x6
0x1c9b…1cb3 at0007 = ╱44╱D╱ // 0x1ca2 @0x7
0x1c9b…1cb3 at0008 = ╱ed╱(╱ // 0x1ca3 @0x8
0x1c9b…1cb3 at0009 = ╱42╱B╱ // 0x1ca4 @0x9
0x1c9b…1cb3 at000a = ╱4c╱L╱ // 0x1ca5 @0xa
0x1c9b…1cb3 at000b = ╱ef╱$╱ // 0x1ca6 @0xb
0x1c9b…1cb3 at000c = ╱ec╱,╱ // 0x1ca7 @0xc
0x1c9b…1cb3 at000d = ╱54╱T╱ // 0x1ca8 @0xd
0x1c9b…1cb3 at000e = ╱41╱A╱ // 0x1ca9 @0xe
0x1c9b…1cb3 at000f = ╱4c╱L╱ // 0x1caa @0xf
0x1c9b…1cb3 at0010 = ╱34╱4╱ // 0x1cab @0x10
0x1c9b…1cb3 at0011 = ╱ef╱$╱ // 0x1cac @0x11
0x1c9b…1cb3 at0012 = ╱ec╱,╱ // 0x1cad @0x12
0x1c9b…1cb3 at0013 = ╱45╱E╱ // 0x1cae @0x13
0x1c9b…1cb3 at0014 = ╱ec╱,╱ // 0x1caf @0x14
0x1c9b…1cb3 at0015 = ╱42╱B╱ // 0x1cb0 @0x15
0x1c9b…1cb3 at0016 = ╱ee╱)╱ // 0x1cb1 @0x16
0x1c9b…1cb3 at0017 = EOL // 0x1cb2 @0x17
0x1c9b…1cb3 }
0x1cb3…1cc8 aa1f 3030 BLARR$(VLIN)=BL$
0x1cb3…1cc8 LineComalBin {
0x1cb3…1cc8 ptr = 0xaa1f // 0x1cb3 @0x0
0x1cb3…1cc8 lno = 0x0bd6 // 0x1cb5 @0x2
0x1cb3…1cc8 at0004 = ╱42╱B╱ // 0x1cb7 @0x4
0x1cb3…1cc8 at0005 = ╱4c╱L╱ // 0x1cb8 @0x5
0x1cb3…1cc8 at0006 = ╱41╱A╱ // 0x1cb9 @0x6
0x1cb3…1cc8 at0007 = ╱52╱R╱ // 0x1cba @0x7
0x1cb3…1cc8 at0008 = ╱52╱R╱ // 0x1cbb @0x8
0x1cb3…1cc8 at0009 = ╱ef╱$╱ // 0x1cbc @0x9
0x1cb3…1cc8 at000a = ╱ed╱(╱ // 0x1cbd @0xa
0x1cb3…1cc8 at000b = ╱56╱V╱ // 0x1cbe @0xb
0x1cb3…1cc8 at000c = ╱4c╱L╱ // 0x1cbf @0xc
0x1cb3…1cc8 at000d = ╱49╱I╱ // 0x1cc0 @0xd
0x1cb3…1cc8 at000e = ╱4e╱N╱ // 0x1cc1 @0xe
0x1cb3…1cc8 at000f = ╱ee╱)╱ // 0x1cc2 @0xf
0x1cb3…1cc8 at0010 = ╱dc╱=╱ // 0x1cc3 @0x10
0x1cb3…1cc8 at0011 = ╱42╱B╱ // 0x1cc4 @0x11
0x1cb3…1cc8 at0012 = ╱4c╱L╱ // 0x1cc5 @0x12
0x1cb3…1cc8 at0013 = ╱ef╱$╱ // 0x1cc6 @0x13
0x1cb3…1cc8 at0014 = EOL // 0x1cc7 @0x14
0x1cb3…1cc8 }
0x1cc8…1ce5 aa3c 3040 EXEC CA(B,BL$,TOTAL$,TOTAL$)
0x1cc8…1ce5 LineComalBin {
0x1cc8…1ce5 ptr = 0xaa3c // 0x1cc8 @0x0
0x1cc8…1ce5 lno = 0x0be0 // 0x1cca @0x2
0x1cc8…1ce5 at0004 = ╱9d╱ EXEC ╱ // 0x1ccc @0x4
0x1cc8…1ce5 at0005 = ╱43╱C╱ // 0x1ccd @0x5
0x1cc8…1ce5 at0006 = ╱41╱A╱ // 0x1cce @0x6
0x1cc8…1ce5 at0007 = ╱ed╱(╱ // 0x1ccf @0x7
0x1cc8…1ce5 at0008 = ╱42╱B╱ // 0x1cd0 @0x8
0x1cc8…1ce5 at0009 = ╱ec╱,╱ // 0x1cd1 @0x9
0x1cc8…1ce5 at000a = ╱42╱B╱ // 0x1cd2 @0xa
0x1cc8…1ce5 at000b = ╱4c╱L╱ // 0x1cd3 @0xb
0x1cc8…1ce5 at000c = ╱ef╱$╱ // 0x1cd4 @0xc
0x1cc8…1ce5 at000d = ╱ec╱,╱ // 0x1cd5 @0xd
0x1cc8…1ce5 at000e = ╱54╱T╱ // 0x1cd6 @0xe
0x1cc8…1ce5 at000f = ╱4f╱O╱ // 0x1cd7 @0xf
0x1cc8…1ce5 at0010 = ╱54╱T╱ // 0x1cd8 @0x10
0x1cc8…1ce5 at0011 = ╱41╱A╱ // 0x1cd9 @0x11
0x1cc8…1ce5 at0012 = ╱4c╱L╱ // 0x1cda @0x12
0x1cc8…1ce5 at0013 = ╱ef╱$╱ // 0x1cdb @0x13
0x1cc8…1ce5 at0014 = ╱ec╱,╱ // 0x1cdc @0x14
0x1cc8…1ce5 at0015 = ╱54╱T╱ // 0x1cdd @0x15
0x1cc8…1ce5 at0016 = ╱4f╱O╱ // 0x1cde @0x16
0x1cc8…1ce5 at0017 = ╱54╱T╱ // 0x1cdf @0x17
0x1cc8…1ce5 at0018 = ╱41╱A╱ // 0x1ce0 @0x18
0x1cc8…1ce5 at0019 = ╱4c╱L╱ // 0x1ce1 @0x19
0x1cc8…1ce5 at001a = ╱ef╱$╱ // 0x1ce2 @0x1a
0x1cc8…1ce5 at001b = ╱ee╱)╱ // 0x1ce3 @0x1b
0x1cc8…1ce5 at001c = EOL // 0x1ce4 @0x1c
0x1cc8…1ce5 }
0x1ce5…1ceb aa42 3050 ENDIF
0x1ce5…1ceb LineComalBin {
0x1ce5…1ceb ptr = 0xaa42 // 0x1ce5 @0x0
0x1ce5…1ceb lno = 0x0bea // 0x1ce7 @0x2
0x1ce5…1ceb at0004 = ╱9b╱ ENDIF ╱ // 0x1ce9 @0x4
0x1ce5…1ceb at0005 = EOL // 0x1cea @0x5
0x1ce5…1ceb }
0x1ceb…1cf1 aa48 3060 ELSE
0x1ceb…1cf1 LineComalBin {
0x1ceb…1cf1 ptr = 0xaa48 // 0x1ceb @0x0
0x1ceb…1cf1 lno = 0x0bf4 // 0x1ced @0x2
0x1ceb…1cf1 at0004 = ╱9a╱ ELSE ╱ // 0x1cef @0x4
0x1ceb…1cf1 at0005 = EOL // 0x1cf0 @0x5
0x1ceb…1cf1 }
0x1cf1…1d0b aa62 3070 LIE=LIE-E;VLIN=VLIN-E
0x1cf1…1d0b LineComalBin {
0x1cf1…1d0b ptr = 0xaa62 // 0x1cf1 @0x0
0x1cf1…1d0b lno = 0x0bfe // 0x1cf3 @0x2
0x1cf1…1d0b at0004 = ╱4c╱L╱ // 0x1cf5 @0x4
0x1cf1…1d0b at0005 = ╱49╱I╱ // 0x1cf6 @0x5
0x1cf1…1d0b at0006 = ╱45╱E╱ // 0x1cf7 @0x6
0x1cf1…1d0b at0007 = ╱dc╱=╱ // 0x1cf8 @0x7
0x1cf1…1d0b at0008 = ╱4c╱L╱ // 0x1cf9 @0x8
0x1cf1…1d0b at0009 = ╱49╱I╱ // 0x1cfa @0x9
0x1cf1…1d0b at000a = ╱45╱E╱ // 0x1cfb @0xa
0x1cf1…1d0b at000b = ╱e3╱-╱ // 0x1cfc @0xb
0x1cf1…1d0b at000c = ╱45╱E╱ // 0x1cfd @0xc
0x1cf1…1d0b at000d = ╱eb╱;╱ // 0x1cfe @0xd
0x1cf1…1d0b at000e = ╱56╱V╱ // 0x1cff @0xe
0x1cf1…1d0b at000f = ╱4c╱L╱ // 0x1d00 @0xf
0x1cf1…1d0b at0010 = ╱49╱I╱ // 0x1d01 @0x10
0x1cf1…1d0b at0011 = ╱4e╱N╱ // 0x1d02 @0x11
0x1cf1…1d0b at0012 = ╱dc╱=╱ // 0x1d03 @0x12
0x1cf1…1d0b at0013 = ╱56╱V╱ // 0x1d04 @0x13
0x1cf1…1d0b at0014 = ╱4c╱L╱ // 0x1d05 @0x14
0x1cf1…1d0b at0015 = ╱49╱I╱ // 0x1d06 @0x15
0x1cf1…1d0b at0016 = ╱4e╱N╱ // 0x1d07 @0x16
0x1cf1…1d0b at0017 = ╱e3╱-╱ // 0x1d08 @0x17
0x1cf1…1d0b at0018 = ╱45╱E╱ // 0x1d09 @0x18
0x1cf1…1d0b at0019 = EOL // 0x1d0a @0x19
0x1cf1…1d0b }
0x1d0b…1d11 aa68 3080 ENDIF
0x1d0b…1d11 LineComalBin {
0x1d0b…1d11 ptr = 0xaa68 // 0x1d0b @0x0
0x1d0b…1d11 lno = 0x0c08 // 0x1d0d @0x2
0x1d0b…1d11 at0004 = ╱9b╱ ENDIF ╱ // 0x1d0f @0x4
0x1d0b…1d11 at0005 = EOL // 0x1d10 @0x5
0x1d0b…1d11 }
0x1d11…1d1e aa75 3090 WHEN 4
0x1d11…1d1e LineComalBin {
0x1d11…1d1e ptr = 0xaa75 // 0x1d11 @0x0
0x1d11…1d1e lno = 0x0c12 // 0x1d13 @0x2
0x1d11…1d1e at0004 = ╱a301╱ WHEN ╱ // 0x1d15 @0x4
0x1d11…1d1e at0006 = ╱34╱4╱ // 0x1d17 @0x6
0x1d11…1d1e at0007 = ╱fe00008003╱ // 0x1d18 @0x7
0x1d11…1d1e at000c = EOL // 0x1d1d @0xc
0x1d11…1d1e }
0x1d1e…1d2f aa86 3100 CURSOR 24,LIE
0x1d1e…1d2f LineComalBin {
0x1d1e…1d2f ptr = 0xaa86 // 0x1d1e @0x0
0x1d1e…1d2f lno = 0x0c1c // 0x1d20 @0x2
0x1d1e…1d2f at0004 = ╱a1╱ CURSOR ╱ // 0x1d22 @0x4
0x1d1e…1d2f at0005 = ╱32╱2╱ // 0x1d23 @0x5
0x1d1e…1d2f at0006 = ╱34╱4╱ // 0x1d24 @0x6
0x1d1e…1d2f at0007 = ╱fe0000c005╱ // 0x1d25 @0x7
0x1d1e…1d2f at000c = ╱ec╱,╱ // 0x1d2a @0xc
0x1d1e…1d2f at000d = ╱4c╱L╱ // 0x1d2b @0xd
0x1d1e…1d2f at000e = ╱49╱I╱ // 0x1d2c @0xe
0x1d1e…1d2f at000f = ╱45╱E╱ // 0x1d2d @0xf
0x1d1e…1d2f at0010 = EOL // 0x1d2e @0x10
0x1d1e…1d2f }
0x1d2f…1d59 aab0 3110 VARTEKST$="Subtotal "
0x1d2f…1d59 LineComalBin {
0x1d2f…1d59 ptr = 0xaab0 // 0x1d2f @0x0
0x1d2f…1d59 lno = 0x0c26 // 0x1d31 @0x2
0x1d2f…1d59 at0004 = ╱56╱V╱ // 0x1d33 @0x4
0x1d2f…1d59 at0005 = ╱41╱A╱ // 0x1d34 @0x5
0x1d2f…1d59 at0006 = ╱52╱R╱ // 0x1d35 @0x6
0x1d2f…1d59 at0007 = ╱54╱T╱ // 0x1d36 @0x7
0x1d2f…1d59 at0008 = ╱45╱E╱ // 0x1d37 @0x8
0x1d2f…1d59 at0009 = ╱4b╱K╱ // 0x1d38 @0x9
0x1d2f…1d59 at000a = ╱53╱S╱ // 0x1d39 @0xa
0x1d2f…1d59 at000b = ╱54╱T╱ // 0x1d3a @0xb
0x1d2f…1d59 at000c = ╱ef╱$╱ // 0x1d3b @0xc
0x1d2f…1d59 at000d = ╱dc╱=╱ // 0x1d3c @0xd
0x1d2f…1d59 at000e = ╱22╱"╱ // 0x1d3d @0xe
0x1d2f…1d59 at000f = ╱53╱S╱ // 0x1d3e @0xf
0x1d2f…1d59 at0010 = ╱75╱u╱ // 0x1d3f @0x10
0x1d2f…1d59 at0011 = ╱62╱b╱ // 0x1d40 @0x11
0x1d2f…1d59 at0012 = ╱74╱t╱ // 0x1d41 @0x12
0x1d2f…1d59 at0013 = ╱6f╱o╱ // 0x1d42 @0x13
0x1d2f…1d59 at0014 = ╱74╱t╱ // 0x1d43 @0x14
0x1d2f…1d59 at0015 = ╱61╱a╱ // 0x1d44 @0x15
0x1d2f…1d59 at0016 = ╱6c╱l╱ // 0x1d45 @0x16
0x1d2f…1d59 at0017 = ╱20╱…╱ // 0x1d46 @0x17
0x1d2f…1d59 at0018 = ╱20╱…╱ // 0x1d47 @0x18
0x1d2f…1d59 at0019 = ╱20╱…╱ // 0x1d48 @0x19
0x1d2f…1d59 at001a = ╱20╱…╱ // 0x1d49 @0x1a
0x1d2f…1d59 at001b = ╱20╱…╱ // 0x1d4a @0x1b
0x1d2f…1d59 at001c = ╱20╱…╱ // 0x1d4b @0x1c
0x1d2f…1d59 at001d = ╱20╱…╱ // 0x1d4c @0x1d
0x1d2f…1d59 at001e = ╱20╱…╱ // 0x1d4d @0x1e
0x1d2f…1d59 at001f = ╱20╱…╱ // 0x1d4e @0x1f
0x1d2f…1d59 at0020 = ╱20╱…╱ // 0x1d4f @0x20
0x1d2f…1d59 at0021 = ╱20╱…╱ // 0x1d50 @0x21
0x1d2f…1d59 at0022 = ╱20╱…╱ // 0x1d51 @0x22
0x1d2f…1d59 at0023 = ╱20╱…╱ // 0x1d52 @0x23
0x1d2f…1d59 at0024 = ╱20╱…╱ // 0x1d53 @0x24
0x1d2f…1d59 at0025 = ╱20╱…╱ // 0x1d54 @0x25
0x1d2f…1d59 at0026 = ╱20╱…╱ // 0x1d55 @0x26
0x1d2f…1d59 at0027 = ╱20╱…╱ // 0x1d56 @0x27
0x1d2f…1d59 at0028 = ╱22╱"╱ // 0x1d57 @0x28
0x1d2f…1d59 at0029 = EOL // 0x1d58 @0x29
0x1d2f…1d59 }
0x1d59…1d68 aabf 3120 PRINT VARTEKST$
0x1d59…1d68 LineComalBin {
0x1d59…1d68 ptr = 0xaabf // 0x1d59 @0x0
0x1d59…1d68 lno = 0x0c30 // 0x1d5b @0x2
0x1d59…1d68 at0004 = ╱92╱ PRINT ╱ // 0x1d5d @0x4
0x1d59…1d68 at0005 = ╱56╱V╱ // 0x1d5e @0x5
0x1d59…1d68 at0006 = ╱41╱A╱ // 0x1d5f @0x6
0x1d59…1d68 at0007 = ╱52╱R╱ // 0x1d60 @0x7
0x1d59…1d68 at0008 = ╱54╱T╱ // 0x1d61 @0x8
0x1d59…1d68 at0009 = ╱45╱E╱ // 0x1d62 @0x9
0x1d59…1d68 at000a = ╱4b╱K╱ // 0x1d63 @0xa
0x1d59…1d68 at000b = ╱53╱S╱ // 0x1d64 @0xb
0x1d59…1d68 at000c = ╱54╱T╱ // 0x1d65 @0xc
0x1d59…1d68 at000d = ╱ef╱$╱ // 0x1d66 @0xd
0x1d59…1d68 at000e = EOL // 0x1d67 @0xe
0x1d59…1d68 }
0x1d68…1d79 aad0 3130 CURSOR 66,LIE
0x1d68…1d79 LineComalBin {
0x1d68…1d79 ptr = 0xaad0 // 0x1d68 @0x0
0x1d68…1d79 lno = 0x0c3a // 0x1d6a @0x2
0x1d68…1d79 at0004 = ╱a1╱ CURSOR ╱ // 0x1d6c @0x4
0x1d68…1d79 at0005 = ╱36╱6╱ // 0x1d6d @0x5
0x1d68…1d79 at0006 = ╱36╱6╱ // 0x1d6e @0x6
0x1d68…1d79 at0007 = ╱fe00008407╱ // 0x1d6f @0x7
0x1d68…1d79 at000c = ╱ec╱,╱ // 0x1d74 @0xc
0x1d68…1d79 at000d = ╱4c╱L╱ // 0x1d75 @0xd
0x1d68…1d79 at000e = ╱49╱I╱ // 0x1d76 @0xe
0x1d68…1d79 at000f = ╱45╱E╱ // 0x1d77 @0xf
0x1d68…1d79 at0010 = EOL // 0x1d78 @0x10
0x1d68…1d79 }
0x1d79…1d94 aaeb 3140 EXEC TUD(TOTAL$,TAL4$,E,B)
0x1d79…1d94 LineComalBin {
0x1d79…1d94 ptr = 0xaaeb // 0x1d79 @0x0
0x1d79…1d94 lno = 0x0c44 // 0x1d7b @0x2
0x1d79…1d94 at0004 = ╱9d╱ EXEC ╱ // 0x1d7d @0x4
0x1d79…1d94 at0005 = ╱54╱T╱ // 0x1d7e @0x5
0x1d79…1d94 at0006 = ╱55╱U╱ // 0x1d7f @0x6
0x1d79…1d94 at0007 = ╱44╱D╱ // 0x1d80 @0x7
0x1d79…1d94 at0008 = ╱ed╱(╱ // 0x1d81 @0x8
0x1d79…1d94 at0009 = ╱54╱T╱ // 0x1d82 @0x9
0x1d79…1d94 at000a = ╱4f╱O╱ // 0x1d83 @0xa
0x1d79…1d94 at000b = ╱54╱T╱ // 0x1d84 @0xb
0x1d79…1d94 at000c = ╱41╱A╱ // 0x1d85 @0xc
0x1d79…1d94 at000d = ╱4c╱L╱ // 0x1d86 @0xd
0x1d79…1d94 at000e = ╱ef╱$╱ // 0x1d87 @0xe
0x1d79…1d94 at000f = ╱ec╱,╱ // 0x1d88 @0xf
0x1d79…1d94 at0010 = ╱54╱T╱ // 0x1d89 @0x10
0x1d79…1d94 at0011 = ╱41╱A╱ // 0x1d8a @0x11
0x1d79…1d94 at0012 = ╱4c╱L╱ // 0x1d8b @0x12
0x1d79…1d94 at0013 = ╱34╱4╱ // 0x1d8c @0x13
0x1d79…1d94 at0014 = ╱ef╱$╱ // 0x1d8d @0x14
0x1d79…1d94 at0015 = ╱ec╱,╱ // 0x1d8e @0x15
0x1d79…1d94 at0016 = ╱45╱E╱ // 0x1d8f @0x16
0x1d79…1d94 at0017 = ╱ec╱,╱ // 0x1d90 @0x17
0x1d79…1d94 at0018 = ╱42╱B╱ // 0x1d91 @0x18
0x1d79…1d94 at0019 = ╱ee╱)╱ // 0x1d92 @0x19
0x1d79…1d94 at001a = EOL // 0x1d93 @0x1a
0x1d79…1d94 }
0x1d94…1dc2 ab19 3150 VNARR(VLIN)=VARENR;VTARR$(VLIN)=VARTEKST$
0x1d94…1dc2 LineComalBin {
0x1d94…1dc2 ptr = 0xab19 // 0x1d94 @0x0
0x1d94…1dc2 lno = 0x0c4e // 0x1d96 @0x2
0x1d94…1dc2 at0004 = ╱56╱V╱ // 0x1d98 @0x4
0x1d94…1dc2 at0005 = ╱4e╱N╱ // 0x1d99 @0x5
0x1d94…1dc2 at0006 = ╱41╱A╱ // 0x1d9a @0x6
0x1d94…1dc2 at0007 = ╱52╱R╱ // 0x1d9b @0x7
0x1d94…1dc2 at0008 = ╱52╱R╱ // 0x1d9c @0x8
0x1d94…1dc2 at0009 = ╱ed╱(╱ // 0x1d9d @0x9
0x1d94…1dc2 at000a = ╱56╱V╱ // 0x1d9e @0xa
0x1d94…1dc2 at000b = ╱4c╱L╱ // 0x1d9f @0xb
0x1d94…1dc2 at000c = ╱49╱I╱ // 0x1da0 @0xc
0x1d94…1dc2 at000d = ╱4e╱N╱ // 0x1da1 @0xd
0x1d94…1dc2 at000e = ╱ee╱)╱ // 0x1da2 @0xe
0x1d94…1dc2 at000f = ╱dc╱=╱ // 0x1da3 @0xf
0x1d94…1dc2 at0010 = ╱56╱V╱ // 0x1da4 @0x10
0x1d94…1dc2 at0011 = ╱41╱A╱ // 0x1da5 @0x11
0x1d94…1dc2 at0012 = ╱52╱R╱ // 0x1da6 @0x12
0x1d94…1dc2 at0013 = ╱45╱E╱ // 0x1da7 @0x13
0x1d94…1dc2 at0014 = ╱4e╱N╱ // 0x1da8 @0x14
0x1d94…1dc2 at0015 = ╱52╱R╱ // 0x1da9 @0x15
0x1d94…1dc2 at0016 = ╱eb╱;╱ // 0x1daa @0x16
0x1d94…1dc2 at0017 = ╱56╱V╱ // 0x1dab @0x17
0x1d94…1dc2 at0018 = ╱54╱T╱ // 0x1dac @0x18
0x1d94…1dc2 at0019 = ╱41╱A╱ // 0x1dad @0x19
0x1d94…1dc2 at001a = ╱52╱R╱ // 0x1dae @0x1a
0x1d94…1dc2 at001b = ╱52╱R╱ // 0x1daf @0x1b
0x1d94…1dc2 at001c = ╱ef╱$╱ // 0x1db0 @0x1c
0x1d94…1dc2 at001d = ╱ed╱(╱ // 0x1db1 @0x1d
0x1d94…1dc2 at001e = ╱56╱V╱ // 0x1db2 @0x1e
0x1d94…1dc2 at001f = ╱4c╱L╱ // 0x1db3 @0x1f
0x1d94…1dc2 at0020 = ╱49╱I╱ // 0x1db4 @0x20
0x1d94…1dc2 at0021 = ╱4e╱N╱ // 0x1db5 @0x21
0x1d94…1dc2 at0022 = ╱ee╱)╱ // 0x1db6 @0x22
0x1d94…1dc2 at0023 = ╱dc╱=╱ // 0x1db7 @0x23
0x1d94…1dc2 at0024 = ╱56╱V╱ // 0x1db8 @0x24
0x1d94…1dc2 at0025 = ╱41╱A╱ // 0x1db9 @0x25
0x1d94…1dc2 at0026 = ╱52╱R╱ // 0x1dba @0x26
0x1d94…1dc2 at0027 = ╱54╱T╱ // 0x1dbb @0x27
0x1d94…1dc2 at0028 = ╱45╱E╱ // 0x1dbc @0x28
0x1d94…1dc2 at0029 = ╱4b╱K╱ // 0x1dbd @0x29
0x1d94…1dc2 at002a = ╱53╱S╱ // 0x1dbe @0x2a
0x1d94…1dc2 at002b = ╱54╱T╱ // 0x1dbf @0x2b
0x1d94…1dc2 at002c = ╱ef╱$╱ // 0x1dc0 @0x2c
0x1d94…1dc2 at002d = EOL // 0x1dc1 @0x2d
0x1d94…1dc2 }
0x1dc2…1dda ab31 3160 BLARR$(VLIN)=TOTAL$
0x1dc2…1dda LineComalBin {
0x1dc2…1dda ptr = 0xab31 // 0x1dc2 @0x0
0x1dc2…1dda lno = 0x0c58 // 0x1dc4 @0x2
0x1dc2…1dda at0004 = ╱42╱B╱ // 0x1dc6 @0x4
0x1dc2…1dda at0005 = ╱4c╱L╱ // 0x1dc7 @0x5
0x1dc2…1dda at0006 = ╱41╱A╱ // 0x1dc8 @0x6
0x1dc2…1dda at0007 = ╱52╱R╱ // 0x1dc9 @0x7
0x1dc2…1dda at0008 = ╱52╱R╱ // 0x1dca @0x8
0x1dc2…1dda at0009 = ╱ef╱$╱ // 0x1dcb @0x9
0x1dc2…1dda at000a = ╱ed╱(╱ // 0x1dcc @0xa
0x1dc2…1dda at000b = ╱56╱V╱ // 0x1dcd @0xb
0x1dc2…1dda at000c = ╱4c╱L╱ // 0x1dce @0xc
0x1dc2…1dda at000d = ╱49╱I╱ // 0x1dcf @0xd
0x1dc2…1dda at000e = ╱4e╱N╱ // 0x1dd0 @0xe
0x1dc2…1dda at000f = ╱ee╱)╱ // 0x1dd1 @0xf
0x1dc2…1dda at0010 = ╱dc╱=╱ // 0x1dd2 @0x10
0x1dc2…1dda at0011 = ╱54╱T╱ // 0x1dd3 @0x11
0x1dc2…1dda at0012 = ╱4f╱O╱ // 0x1dd4 @0x12
0x1dc2…1dda at0013 = ╱54╱T╱ // 0x1dd5 @0x13
0x1dc2…1dda at0014 = ╱41╱A╱ // 0x1dd6 @0x14
0x1dc2…1dda at0015 = ╱4c╱L╱ // 0x1dd7 @0x15
0x1dc2…1dda at0016 = ╱ef╱$╱ // 0x1dd8 @0x16
0x1dc2…1dda at0017 = EOL // 0x1dd9 @0x17
0x1dc2…1dda }
0x1dda…1de0 ab37 3170 ENDCASE
0x1dda…1de0 LineComalBin {
0x1dda…1de0 ptr = 0xab37 // 0x1dda @0x0
0x1dda…1de0 lno = 0x0c62 // 0x1ddc @0x2
0x1dda…1de0 at0004 = ╱a4╱ ENDCASE ╱ // 0x1dde @0x4
0x1dda…1de0 at0005 = EOL // 0x1ddf @0x5
0x1dda…1de0 }
0x1de0…1de6 ab3d 3180 ELSE
0x1de0…1de6 LineComalBin {
0x1de0…1de6 ptr = 0xab3d // 0x1de0 @0x0
0x1de0…1de6 lno = 0x0c6c // 0x1de2 @0x2
0x1de0…1de6 at0004 = ╱9a╱ ELSE ╱ // 0x1de4 @0x4
0x1de0…1de6 at0005 = EOL // 0x1de5 @0x5
0x1de0…1de6 }
0x1de6…1df3 ab4a 3190 VARENR=B
0x1de6…1df3 LineComalBin {
0x1de6…1df3 ptr = 0xab4a // 0x1de6 @0x0
0x1de6…1df3 lno = 0x0c76 // 0x1de8 @0x2
0x1de6…1df3 at0004 = ╱56╱V╱ // 0x1dea @0x4
0x1de6…1df3 at0005 = ╱41╱A╱ // 0x1deb @0x5
0x1de6…1df3 at0006 = ╱52╱R╱ // 0x1dec @0x6
0x1de6…1df3 at0007 = ╱45╱E╱ // 0x1ded @0x7
0x1de6…1df3 at0008 = ╱4e╱N╱ // 0x1dee @0x8
0x1de6…1df3 at0009 = ╱52╱R╱ // 0x1def @0x9
0x1de6…1df3 at000a = ╱dc╱=╱ // 0x1df0 @0xa
0x1de6…1df3 at000b = ╱42╱B╱ // 0x1df1 @0xb
0x1de6…1df3 at000c = EOL // 0x1df2 @0xc
0x1de6…1df3 }
0x1df3…1dfe ab55 3200 CURSOR G,LIE
0x1df3…1dfe LineComalBin {
0x1df3…1dfe ptr = 0xab55 // 0x1df3 @0x0
0x1df3…1dfe lno = 0x0c80 // 0x1df5 @0x2
0x1df3…1dfe at0004 = ╱a1╱ CURSOR ╱ // 0x1df7 @0x4
0x1df3…1dfe at0005 = ╱47╱G╱ // 0x1df8 @0x5
0x1df3…1dfe at0006 = ╱ec╱,╱ // 0x1df9 @0x6
0x1df3…1dfe at0007 = ╱4c╱L╱ // 0x1dfa @0x7
0x1df3…1dfe at0008 = ╱49╱I╱ // 0x1dfb @0x8
0x1df3…1dfe at0009 = ╱45╱E╱ // 0x1dfc @0x9
0x1df3…1dfe at000a = EOL // 0x1dfd @0xa
0x1df3…1dfe }
0x1dfe…1e12 ab69 3210 PRINT BK$(E:25)
0x1dfe…1e12 LineComalBin {
0x1dfe…1e12 ptr = 0xab69 // 0x1dfe @0x0
0x1dfe…1e12 lno = 0x0c8a // 0x1e00 @0x2
0x1dfe…1e12 at0004 = ╱92╱ PRINT ╱ // 0x1e02 @0x4
0x1dfe…1e12 at0005 = ╱42╱B╱ // 0x1e03 @0x5
0x1dfe…1e12 at0006 = ╱4b╱K╱ // 0x1e04 @0x6
0x1dfe…1e12 at0007 = ╱ef╱$╱ // 0x1e05 @0x7
0x1dfe…1e12 at0008 = ╱ed╱(╱ // 0x1e06 @0x8
0x1dfe…1e12 at0009 = ╱45╱E╱ // 0x1e07 @0x9
0x1dfe…1e12 at000a = ╱f0╱:╱ // 0x1e08 @0xa
0x1dfe…1e12 at000b = ╱32╱2╱ // 0x1e09 @0xb
0x1dfe…1e12 at000c = ╱35╱5╱ // 0x1e0a @0xc
0x1dfe…1e12 at000d = ╱fe0000c805╱ // 0x1e0b @0xd
0x1dfe…1e12 at0012 = ╱ee╱)╱ // 0x1e10 @0x12
0x1dfe…1e12 at0013 = EOL // 0x1e11 @0x13
0x1dfe…1e12 }
0x1e12…1e18 ab6f 3220 ENDIF
0x1e12…1e18 LineComalBin {
0x1e12…1e18 ptr = 0xab6f // 0x1e12 @0x0
0x1e12…1e18 lno = 0x0c94 // 0x1e14 @0x2
0x1e12…1e18 at0004 = ╱9b╱ ENDIF ╱ // 0x1e16 @0x4
0x1e12…1e18 at0005 = EOL // 0x1e17 @0x5
0x1e12…1e18 }
0x1e18…1e23 ab7a 3230 UNTIL FE6=B
0x1e18…1e23 LineComalBin {
0x1e18…1e23 ptr = 0xab7a // 0x1e18 @0x0
0x1e18…1e23 lno = 0x0c9e // 0x1e1a @0x2
0x1e18…1e23 at0004 = ╱98╱ UNTIL ╱ // 0x1e1c @0x4
0x1e18…1e23 at0005 = ╱46╱F╱ // 0x1e1d @0x5
0x1e18…1e23 at0006 = ╱45╱E╱ // 0x1e1e @0x6
0x1e18…1e23 at0007 = ╱36╱6╱ // 0x1e1f @0x7
0x1e18…1e23 at0008 = ╱dc╱=╱ // 0x1e20 @0x8
0x1e18…1e23 at0009 = ╱42╱B╱ // 0x1e21 @0x9
0x1e18…1e23 at000a = EOL // 0x1e22 @0xa
0x1e18…1e23 }
0x1e23…1e29 ab80 3240 ENDPROC
0x1e23…1e29 LineComalBin {
0x1e23…1e29 ptr = 0xab80 // 0x1e23 @0x0
0x1e23…1e29 lno = 0x0ca8 // 0x1e25 @0x2
0x1e23…1e29 at0004 = ╱9f╱ ENDPROC ╱ // 0x1e27 @0x4
0x1e23…1e29 at0005 = EOL // 0x1e28 @0x5
0x1e23…1e29 }
0x1e29…1e37 ab8e 3250 PROC LINITEST
0x1e29…1e37 LineComalBin {
0x1e29…1e37 ptr = 0xab8e // 0x1e29 @0x0
0x1e29…1e37 lno = 0x0cb2 // 0x1e2b @0x2
0x1e29…1e37 at0004 = ╱9e╱ PROC ╱ // 0x1e2d @0x4
0x1e29…1e37 at0005 = ╱4c╱L╱ // 0x1e2e @0x5
0x1e29…1e37 at0006 = ╱49╱I╱ // 0x1e2f @0x6
0x1e29…1e37 at0007 = ╱4e╱N╱ // 0x1e30 @0x7
0x1e29…1e37 at0008 = ╱49╱I╱ // 0x1e31 @0x8
0x1e29…1e37 at0009 = ╱54╱T╱ // 0x1e32 @0x9
0x1e29…1e37 at000a = ╱45╱E╱ // 0x1e33 @0xa
0x1e29…1e37 at000b = ╱53╱S╱ // 0x1e34 @0xb
0x1e29…1e37 at000c = ╱54╱T╱ // 0x1e35 @0xc
0x1e29…1e37 at000d = EOL // 0x1e36 @0xd
0x1e29…1e37 }
0x1e37…1e49 aba0 3260 IF LIE>23 THEN
0x1e37…1e49 LineComalBin {
0x1e37…1e49 ptr = 0xaba0 // 0x1e37 @0x0
0x1e37…1e49 lno = 0x0cbc // 0x1e39 @0x2
0x1e37…1e49 at0004 = ╱9c╱ IF ╱ // 0x1e3b @0x4
0x1e37…1e49 at0005 = ╱4c╱L╱ // 0x1e3c @0x5
0x1e37…1e49 at0006 = ╱49╱I╱ // 0x1e3d @0x6
0x1e37…1e49 at0007 = ╱45╱E╱ // 0x1e3e @0x7
0x1e37…1e49 at0008 = ╱de╱>╱ // 0x1e3f @0x8
0x1e37…1e49 at0009 = ╱32╱2╱ // 0x1e40 @0x9
0x1e37…1e49 at000a = ╱33╱3╱ // 0x1e41 @0xa
0x1e37…1e49 at000b = ╱fe0000b805╱ // 0x1e42 @0xb
0x1e37…1e49 at0010 = ╱b6╱ THEN ╱ // 0x1e47 @0x10
0x1e37…1e49 at0011 = EOL // 0x1e48 @0x11
0x1e37…1e49 }
0x1e49…1e57 abae 3270 EXEC FAKHOVED
0x1e49…1e57 LineComalBin {
0x1e49…1e57 ptr = 0xabae // 0x1e49 @0x0
0x1e49…1e57 lno = 0x0cc6 // 0x1e4b @0x2
0x1e49…1e57 at0004 = ╱9d╱ EXEC ╱ // 0x1e4d @0x4
0x1e49…1e57 at0005 = ╱46╱F╱ // 0x1e4e @0x5
0x1e49…1e57 at0006 = ╱41╱A╱ // 0x1e4f @0x6
0x1e49…1e57 at0007 = ╱4b╱K╱ // 0x1e50 @0x7
0x1e49…1e57 at0008 = ╱48╱H╱ // 0x1e51 @0x8
0x1e49…1e57 at0009 = ╱4f╱O╱ // 0x1e52 @0x9
0x1e49…1e57 at000a = ╱56╱V╱ // 0x1e53 @0xa
0x1e49…1e57 at000b = ╱45╱E╱ // 0x1e54 @0xb
0x1e49…1e57 at000c = ╱44╱D╱ // 0x1e55 @0xc
0x1e49…1e57 at000d = EOL // 0x1e56 @0xd
0x1e49…1e57 }
0x1e57…1e64 abbb 3280 J=VLIN-E
0x1e57…1e64 LineComalBin {
0x1e57…1e64 ptr = 0xabbb // 0x1e57 @0x0
0x1e57…1e64 lno = 0x0cd0 // 0x1e59 @0x2
0x1e57…1e64 at0004 = ╱4a╱J╱ // 0x1e5b @0x4
0x1e57…1e64 at0005 = ╱dc╱=╱ // 0x1e5c @0x5
0x1e57…1e64 at0006 = ╱56╱V╱ // 0x1e5d @0x6
0x1e57…1e64 at0007 = ╱4c╱L╱ // 0x1e5e @0x7
0x1e57…1e64 at0008 = ╱49╱I╱ // 0x1e5f @0x8
0x1e57…1e64 at0009 = ╱4e╱N╱ // 0x1e60 @0x9
0x1e57…1e64 at000a = ╱e3╱-╱ // 0x1e61 @0xa
0x1e57…1e64 at000b = ╱45╱E╱ // 0x1e62 @0xb
0x1e57…1e64 at000c = EOL // 0x1e63 @0xc
0x1e57…1e64 }
0x1e64…1e70 abc7 3290 EXEC VUD(J)
0x1e64…1e70 LineComalBin {
0x1e64…1e70 ptr = 0xabc7 // 0x1e64 @0x0
0x1e64…1e70 lno = 0x0cda // 0x1e66 @0x2
0x1e64…1e70 at0004 = ╱9d╱ EXEC ╱ // 0x1e68 @0x4
0x1e64…1e70 at0005 = ╱56╱V╱ // 0x1e69 @0x5
0x1e64…1e70 at0006 = ╱55╱U╱ // 0x1e6a @0x6
0x1e64…1e70 at0007 = ╱44╱D╱ // 0x1e6b @0x7
0x1e64…1e70 at0008 = ╱ed╱(╱ // 0x1e6c @0x8
0x1e64…1e70 at0009 = ╱4a╱J╱ // 0x1e6d @0x9
0x1e64…1e70 at000a = ╱ee╱)╱ // 0x1e6e @0xa
0x1e64…1e70 at000b = EOL // 0x1e6f @0xb
0x1e64…1e70 }
0x1e70…1e7e abd5 3300 LIE=LIE+E
0x1e70…1e7e LineComalBin {
0x1e70…1e7e ptr = 0xabd5 // 0x1e70 @0x0
0x1e70…1e7e lno = 0x0ce4 // 0x1e72 @0x2
0x1e70…1e7e at0004 = ╱4c╱L╱ // 0x1e74 @0x4
0x1e70…1e7e at0005 = ╱49╱I╱ // 0x1e75 @0x5
0x1e70…1e7e at0006 = ╱45╱E╱ // 0x1e76 @0x6
0x1e70…1e7e at0007 = ╱dc╱=╱ // 0x1e77 @0x7
0x1e70…1e7e at0008 = ╱4c╱L╱ // 0x1e78 @0x8
0x1e70…1e7e at0009 = ╱49╱I╱ // 0x1e79 @0x9
0x1e70…1e7e at000a = ╱45╱E╱ // 0x1e7a @0xa
0x1e70…1e7e at000b = ╱e2╱+╱ // 0x1e7b @0xb
0x1e70…1e7e at000c = ╱45╱E╱ // 0x1e7c @0xc
0x1e70…1e7e at000d = EOL // 0x1e7d @0xd
0x1e70…1e7e }
0x1e7e…1e84 abdb 3310 ENDIF
0x1e7e…1e84 LineComalBin {
0x1e7e…1e84 ptr = 0xabdb // 0x1e7e @0x0
0x1e7e…1e84 lno = 0x0cee // 0x1e80 @0x2
0x1e7e…1e84 at0004 = ╱9b╱ ENDIF ╱ // 0x1e82 @0x4
0x1e7e…1e84 at0005 = EOL // 0x1e83 @0x5
0x1e7e…1e84 }
0x1e84…1e8a abe1 3320 ENDPROC
0x1e84…1e8a LineComalBin {
0x1e84…1e8a ptr = 0xabe1 // 0x1e84 @0x0
0x1e84…1e8a lno = 0x0cf8 // 0x1e86 @0x2
0x1e84…1e8a at0004 = ╱9f╱ ENDPROC ╱ // 0x1e88 @0x4
0x1e84…1e8a at0005 = EOL // 0x1e89 @0x5
0x1e84…1e8a }
0x1e8a…1e98 abef 3330 PROC VUD(LIN)
0x1e8a…1e98 LineComalBin {
0x1e8a…1e98 ptr = 0xabef // 0x1e8a @0x0
0x1e8a…1e98 lno = 0x0d02 // 0x1e8c @0x2
0x1e8a…1e98 at0004 = ╱9e╱ PROC ╱ // 0x1e8e @0x4
0x1e8a…1e98 at0005 = ╱56╱V╱ // 0x1e8f @0x5
0x1e8a…1e98 at0006 = ╱55╱U╱ // 0x1e90 @0x6
0x1e8a…1e98 at0007 = ╱44╱D╱ // 0x1e91 @0x7
0x1e8a…1e98 at0008 = ╱ed╱(╱ // 0x1e92 @0x8
0x1e8a…1e98 at0009 = ╱4c╱L╱ // 0x1e93 @0x9
0x1e8a…1e98 at000a = ╱49╱I╱ // 0x1e94 @0xa
0x1e8a…1e98 at000b = ╱4e╱N╱ // 0x1e95 @0xb
0x1e8a…1e98 at000c = ╱ee╱)╱ // 0x1e96 @0xc
0x1e8a…1e98 at000d = EOL // 0x1e97 @0xd
0x1e8a…1e98 }
0x1e98…1ea3 abfa 3340 CURSOR V,LIE
0x1e98…1ea3 LineComalBin {
0x1e98…1ea3 ptr = 0xabfa // 0x1e98 @0x0
0x1e98…1ea3 lno = 0x0d0c // 0x1e9a @0x2
0x1e98…1ea3 at0004 = ╱a1╱ CURSOR ╱ // 0x1e9c @0x4
0x1e98…1ea3 at0005 = ╱56╱V╱ // 0x1e9d @0x5
0x1e98…1ea3 at0006 = ╱ec╱,╱ // 0x1e9e @0x6
0x1e98…1ea3 at0007 = ╱4c╱L╱ // 0x1e9f @0x7
0x1e98…1ea3 at0008 = ╱49╱I╱ // 0x1ea0 @0x8
0x1e98…1ea3 at0009 = ╱45╱E╱ // 0x1ea1 @0x9
0x1e98…1ea3 at000a = EOL // 0x1ea2 @0xa
0x1e98…1ea3 }
0x1ea3…1eb3 ac0a 3350 PRINT USING "###":LIN
0x1ea3…1eb3 LineComalBin {
0x1ea3…1eb3 ptr = 0xac0a // 0x1ea3 @0x0
0x1ea3…1eb3 lno = 0x0d16 // 0x1ea5 @0x2
0x1ea3…1eb3 at0004 = ╱92╱ PRINT ╱ // 0x1ea7 @0x4
0x1ea3…1eb3 at0005 = ╱b9╱ USING ╱ // 0x1ea8 @0x5
0x1ea3…1eb3 at0006 = ╱22╱"╱ // 0x1ea9 @0x6
0x1ea3…1eb3 at0007 = ╱23╱#╱ // 0x1eaa @0x7
0x1ea3…1eb3 at0008 = ╱23╱#╱ // 0x1eab @0x8
0x1ea3…1eb3 at0009 = ╱23╱#╱ // 0x1eac @0x9
0x1ea3…1eb3 at000a = ╱22╱"╱ // 0x1ead @0xa
0x1ea3…1eb3 at000b = ╱f0╱:╱ // 0x1eae @0xb
0x1ea3…1eb3 at000c = ╱4c╱L╱ // 0x1eaf @0xc
0x1ea3…1eb3 at000d = ╱49╱I╱ // 0x1eb0 @0xd
0x1ea3…1eb3 at000e = ╱4e╱N╱ // 0x1eb1 @0xe
0x1ea3…1eb3 at000f = EOL // 0x1eb2 @0xf
0x1ea3…1eb3 }
0x1eb3…1ecb ac22 3360 IF VNARR(LIN)>4 THEN
0x1eb3…1ecb LineComalBin {
0x1eb3…1ecb ptr = 0xac22 // 0x1eb3 @0x0
0x1eb3…1ecb lno = 0x0d20 // 0x1eb5 @0x2
0x1eb3…1ecb at0004 = ╱9c╱ IF ╱ // 0x1eb7 @0x4
0x1eb3…1ecb at0005 = ╱56╱V╱ // 0x1eb8 @0x5
0x1eb3…1ecb at0006 = ╱4e╱N╱ // 0x1eb9 @0x6
0x1eb3…1ecb at0007 = ╱41╱A╱ // 0x1eba @0x7
0x1eb3…1ecb at0008 = ╱52╱R╱ // 0x1ebb @0x8
0x1eb3…1ecb at0009 = ╱52╱R╱ // 0x1ebc @0x9
0x1eb3…1ecb at000a = ╱ed╱(╱ // 0x1ebd @0xa
0x1eb3…1ecb at000b = ╱4c╱L╱ // 0x1ebe @0xb
0x1eb3…1ecb at000c = ╱49╱I╱ // 0x1ebf @0xc
0x1eb3…1ecb at000d = ╱4e╱N╱ // 0x1ec0 @0xd
0x1eb3…1ecb at000e = ╱ee╱)╱ // 0x1ec1 @0xe
0x1eb3…1ecb at000f = ╱de╱>╱ // 0x1ec2 @0xf
0x1eb3…1ecb at0010 = ╱34╱4╱ // 0x1ec3 @0x10
0x1eb3…1ecb at0011 = ╱fe00008003╱ // 0x1ec4 @0x11
0x1eb3…1ecb at0016 = ╱b6╱ THEN ╱ // 0x1ec9 @0x16
0x1eb3…1ecb at0017 = EOL // 0x1eca @0x17
0x1eb3…1ecb }
0x1ecb…1edb ac32 3370 CURSOR 8,LIE
0x1ecb…1edb LineComalBin {
0x1ecb…1edb ptr = 0xac32 // 0x1ecb @0x0
0x1ecb…1edb lno = 0x0d2a // 0x1ecd @0x2
0x1ecb…1edb at0004 = ╱a1╱ CURSOR ╱ // 0x1ecf @0x4
0x1ecb…1edb at0005 = ╱38╱8╱ // 0x1ed0 @0x5
0x1ecb…1edb at0006 = ╱fe00008004╱ // 0x1ed1 @0x6
0x1ecb…1edb at000b = ╱ec╱,╱ // 0x1ed6 @0xb
0x1ecb…1edb at000c = ╱4c╱L╱ // 0x1ed7 @0xc
0x1ecb…1edb at000d = ╱49╱I╱ // 0x1ed8 @0xd
0x1ecb…1edb at000e = ╱45╱E╱ // 0x1ed9 @0xe
0x1ecb…1edb at000f = EOL // 0x1eda @0xf
0x1ecb…1edb }
0x1edb…1ef6 ac4d 3380 PRINT USING "#######":VNARR(LIN)
0x1edb…1ef6 LineComalBin {
0x1edb…1ef6 ptr = 0xac4d // 0x1edb @0x0
0x1edb…1ef6 lno = 0x0d34 // 0x1edd @0x2
0x1edb…1ef6 at0004 = ╱92╱ PRINT ╱ // 0x1edf @0x4
0x1edb…1ef6 at0005 = ╱b9╱ USING ╱ // 0x1ee0 @0x5
0x1edb…1ef6 at0006 = ╱22╱"╱ // 0x1ee1 @0x6
0x1edb…1ef6 at0007 = ╱23╱#╱ // 0x1ee2 @0x7
0x1edb…1ef6 at0008 = ╱23╱#╱ // 0x1ee3 @0x8
0x1edb…1ef6 at0009 = ╱23╱#╱ // 0x1ee4 @0x9
0x1edb…1ef6 at000a = ╱23╱#╱ // 0x1ee5 @0xa
0x1edb…1ef6 at000b = ╱23╱#╱ // 0x1ee6 @0xb
0x1edb…1ef6 at000c = ╱23╱#╱ // 0x1ee7 @0xc
0x1edb…1ef6 at000d = ╱23╱#╱ // 0x1ee8 @0xd
0x1edb…1ef6 at000e = ╱22╱"╱ // 0x1ee9 @0xe
0x1edb…1ef6 at000f = ╱f0╱:╱ // 0x1eea @0xf
0x1edb…1ef6 at0010 = ╱56╱V╱ // 0x1eeb @0x10
0x1edb…1ef6 at0011 = ╱4e╱N╱ // 0x1eec @0x11
0x1edb…1ef6 at0012 = ╱41╱A╱ // 0x1eed @0x12
0x1edb…1ef6 at0013 = ╱52╱R╱ // 0x1eee @0x13
0x1edb…1ef6 at0014 = ╱52╱R╱ // 0x1eef @0x14
0x1edb…1ef6 at0015 = ╱ed╱(╱ // 0x1ef0 @0x15
0x1edb…1ef6 at0016 = ╱4c╱L╱ // 0x1ef1 @0x16
0x1edb…1ef6 at0017 = ╱49╱I╱ // 0x1ef2 @0x17
0x1edb…1ef6 at0018 = ╱4e╱N╱ // 0x1ef3 @0x18
0x1edb…1ef6 at0019 = ╱ee╱)╱ // 0x1ef4 @0x19
0x1edb…1ef6 at001a = EOL // 0x1ef5 @0x1a
0x1edb…1ef6 }
0x1ef6…1f07 ac5e 3390 CURSOR 17,LIE
0x1ef6…1f07 LineComalBin {
0x1ef6…1f07 ptr = 0xac5e // 0x1ef6 @0x0
0x1ef6…1f07 lno = 0x0d3e // 0x1ef8 @0x2
0x1ef6…1f07 at0004 = ╱a1╱ CURSOR ╱ // 0x1efa @0x4
0x1ef6…1f07 at0005 = ╱31╱1╱ // 0x1efb @0x5
0x1ef6…1f07 at0006 = ╱37╱7╱ // 0x1efc @0x6
0x1ef6…1f07 at0007 = ╱fe00008805╱ // 0x1efd @0x7
0x1ef6…1f07 at000c = ╱ec╱,╱ // 0x1f02 @0xc
0x1ef6…1f07 at000d = ╱4c╱L╱ // 0x1f03 @0xd
0x1ef6…1f07 at000e = ╱49╱I╱ // 0x1f04 @0xe
0x1ef6…1f07 at000f = ╱45╱E╱ // 0x1f05 @0xf
0x1ef6…1f07 at0010 = EOL // 0x1f06 @0x10
0x1ef6…1f07 }
0x1f07…1f27 ac7e 3400 IF VAARR$(LIN,6:G)="00" THEN
0x1f07…1f27 LineComalBin {
0x1f07…1f27 ptr = 0xac7e // 0x1f07 @0x0
0x1f07…1f27 lno = 0x0d48 // 0x1f09 @0x2
0x1f07…1f27 at0004 = ╱9c╱ IF ╱ // 0x1f0b @0x4
0x1f07…1f27 at0005 = ╱56╱V╱ // 0x1f0c @0x5
0x1f07…1f27 at0006 = ╱41╱A╱ // 0x1f0d @0x6
0x1f07…1f27 at0007 = ╱41╱A╱ // 0x1f0e @0x7
0x1f07…1f27 at0008 = ╱52╱R╱ // 0x1f0f @0x8
0x1f07…1f27 at0009 = ╱52╱R╱ // 0x1f10 @0x9
0x1f07…1f27 at000a = ╱ef╱$╱ // 0x1f11 @0xa
0x1f07…1f27 at000b = ╱ed╱(╱ // 0x1f12 @0xb
0x1f07…1f27 at000c = ╱4c╱L╱ // 0x1f13 @0xc
0x1f07…1f27 at000d = ╱49╱I╱ // 0x1f14 @0xd
0x1f07…1f27 at000e = ╱4e╱N╱ // 0x1f15 @0xe
0x1f07…1f27 at000f = ╱ec╱,╱ // 0x1f16 @0xf
0x1f07…1f27 at0010 = ╱36╱6╱ // 0x1f17 @0x10
0x1f07…1f27 at0011 = ╱fe0000c003╱ // 0x1f18 @0x11
0x1f07…1f27 at0016 = ╱f0╱:╱ // 0x1f1d @0x16
0x1f07…1f27 at0017 = ╱47╱G╱ // 0x1f1e @0x17
0x1f07…1f27 at0018 = ╱ee╱)╱ // 0x1f1f @0x18
0x1f07…1f27 at0019 = ╱dc╱=╱ // 0x1f20 @0x19
0x1f07…1f27 at001a = ╱22╱"╱ // 0x1f21 @0x1a
0x1f07…1f27 at001b = ╱30╱0╱ // 0x1f22 @0x1b
0x1f07…1f27 at001c = ╱30╱0╱ // 0x1f23 @0x1c
0x1f07…1f27 at001d = ╱22╱"╱ // 0x1f24 @0x1d
0x1f07…1f27 at001e = ╱b6╱ THEN ╱ // 0x1f25 @0x1e
0x1f07…1f27 at001f = EOL // 0x1f26 @0x1f
0x1f07…1f27 }
0x1f27…1f47 ac9e 3410 PRINT VAARR$(LIN,E:4);" "
0x1f27…1f47 LineComalBin {
0x1f27…1f47 ptr = 0xac9e // 0x1f27 @0x0
0x1f27…1f47 lno = 0x0d52 // 0x1f29 @0x2
0x1f27…1f47 at0004 = ╱92╱ PRINT ╱ // 0x1f2b @0x4
0x1f27…1f47 at0005 = ╱56╱V╱ // 0x1f2c @0x5
0x1f27…1f47 at0006 = ╱41╱A╱ // 0x1f2d @0x6
0x1f27…1f47 at0007 = ╱41╱A╱ // 0x1f2e @0x7
0x1f27…1f47 at0008 = ╱52╱R╱ // 0x1f2f @0x8
0x1f27…1f47 at0009 = ╱52╱R╱ // 0x1f30 @0x9
0x1f27…1f47 at000a = ╱ef╱$╱ // 0x1f31 @0xa
0x1f27…1f47 at000b = ╱ed╱(╱ // 0x1f32 @0xb
0x1f27…1f47 at000c = ╱4c╱L╱ // 0x1f33 @0xc
0x1f27…1f47 at000d = ╱49╱I╱ // 0x1f34 @0xd
0x1f27…1f47 at000e = ╱4e╱N╱ // 0x1f35 @0xe
0x1f27…1f47 at000f = ╱ec╱,╱ // 0x1f36 @0xf
0x1f27…1f47 at0010 = ╱45╱E╱ // 0x1f37 @0x10
0x1f27…1f47 at0011 = ╱f0╱:╱ // 0x1f38 @0x11
0x1f27…1f47 at0012 = ╱34╱4╱ // 0x1f39 @0x12
0x1f27…1f47 at0013 = ╱fe00008003╱ // 0x1f3a @0x13
0x1f27…1f47 at0018 = ╱ee╱)╱ // 0x1f3f @0x18
0x1f27…1f47 at0019 = ╱eb╱;╱ // 0x1f40 @0x19
0x1f27…1f47 at001a = ╱22╱"╱ // 0x1f41 @0x1a
0x1f27…1f47 at001b = ╱20╱…╱ // 0x1f42 @0x1b
0x1f27…1f47 at001c = ╱20╱…╱ // 0x1f43 @0x1c
0x1f27…1f47 at001d = ╱20╱…╱ // 0x1f44 @0x1d
0x1f27…1f47 at001e = ╱22╱"╱ // 0x1f45 @0x1e
0x1f27…1f47 at001f = EOL // 0x1f46 @0x1f
0x1f27…1f47 }
0x1f47…1f4d aca4 3420 ELSE
0x1f47…1f4d LineComalBin {
0x1f47…1f4d ptr = 0xaca4 // 0x1f47 @0x0
0x1f47…1f4d lno = 0x0d5c // 0x1f49 @0x2
0x1f47…1f4d at0004 = ╱9a╱ ELSE ╱ // 0x1f4b @0x4
0x1f47…1f4d at0005 = EOL // 0x1f4c @0x5
0x1f47…1f4d }
0x1f4d…1f5e acb5 3430 PRINT VAARR$(LIN)
0x1f4d…1f5e LineComalBin {
0x1f4d…1f5e ptr = 0xacb5 // 0x1f4d @0x0
0x1f4d…1f5e lno = 0x0d66 // 0x1f4f @0x2
0x1f4d…1f5e at0004 = ╱92╱ PRINT ╱ // 0x1f51 @0x4
0x1f4d…1f5e at0005 = ╱56╱V╱ // 0x1f52 @0x5
0x1f4d…1f5e at0006 = ╱41╱A╱ // 0x1f53 @0x6
0x1f4d…1f5e at0007 = ╱41╱A╱ // 0x1f54 @0x7
0x1f4d…1f5e at0008 = ╱52╱R╱ // 0x1f55 @0x8
0x1f4d…1f5e at0009 = ╱52╱R╱ // 0x1f56 @0x9
0x1f4d…1f5e at000a = ╱ef╱$╱ // 0x1f57 @0xa
0x1f4d…1f5e at000b = ╱ed╱(╱ // 0x1f58 @0xb
0x1f4d…1f5e at000c = ╱4c╱L╱ // 0x1f59 @0xc
0x1f4d…1f5e at000d = ╱49╱I╱ // 0x1f5a @0xd
0x1f4d…1f5e at000e = ╱4e╱N╱ // 0x1f5b @0xe
0x1f4d…1f5e at000f = ╱ee╱)╱ // 0x1f5c @0xf
0x1f4d…1f5e at0010 = EOL // 0x1f5d @0x10
0x1f4d…1f5e }
0x1f5e…1f64 acbb 3440 ENDIF
0x1f5e…1f64 LineComalBin {
0x1f5e…1f64 ptr = 0xacbb // 0x1f5e @0x0
0x1f5e…1f64 lno = 0x0d70 // 0x1f60 @0x2
0x1f5e…1f64 at0004 = ╱9b╱ ENDIF ╱ // 0x1f62 @0x4
0x1f5e…1f64 at0005 = EOL // 0x1f63 @0x5
0x1f5e…1f64 }
0x1f64…1f6a acc1 3450 ENDIF
0x1f64…1f6a LineComalBin {
0x1f64…1f6a ptr = 0xacc1 // 0x1f64 @0x0
0x1f64…1f6a lno = 0x0d7a // 0x1f66 @0x2
0x1f64…1f6a at0004 = ╱9b╱ ENDIF ╱ // 0x1f68 @0x4
0x1f64…1f6a at0005 = EOL // 0x1f69 @0x5
0x1f64…1f6a }
0x1f6a…1f7d acd4 3460 IF VNARR(LIN)=G THEN
0x1f6a…1f7d LineComalBin {
0x1f6a…1f7d ptr = 0xacd4 // 0x1f6a @0x0
0x1f6a…1f7d lno = 0x0d84 // 0x1f6c @0x2
0x1f6a…1f7d at0004 = ╱9c╱ IF ╱ // 0x1f6e @0x4
0x1f6a…1f7d at0005 = ╱56╱V╱ // 0x1f6f @0x5
0x1f6a…1f7d at0006 = ╱4e╱N╱ // 0x1f70 @0x6
0x1f6a…1f7d at0007 = ╱41╱A╱ // 0x1f71 @0x7
0x1f6a…1f7d at0008 = ╱52╱R╱ // 0x1f72 @0x8
0x1f6a…1f7d at0009 = ╱52╱R╱ // 0x1f73 @0x9
0x1f6a…1f7d at000a = ╱ed╱(╱ // 0x1f74 @0xa
0x1f6a…1f7d at000b = ╱4c╱L╱ // 0x1f75 @0xb
0x1f6a…1f7d at000c = ╱49╱I╱ // 0x1f76 @0xc
0x1f6a…1f7d at000d = ╱4e╱N╱ // 0x1f77 @0xd
0x1f6a…1f7d at000e = ╱ee╱)╱ // 0x1f78 @0xe
0x1f6a…1f7d at000f = ╱dc╱=╱ // 0x1f79 @0xf
0x1f6a…1f7d at0010 = ╱47╱G╱ // 0x1f7a @0x10
0x1f6a…1f7d at0011 = ╱b6╱ THEN ╱ // 0x1f7b @0x11
0x1f6a…1f7d at0012 = EOL // 0x1f7c @0x12
0x1f6a…1f7d }
0x1f7d…1f8e ace5 3470 CURSOR 17,LIE
0x1f7d…1f8e LineComalBin {
0x1f7d…1f8e ptr = 0xace5 // 0x1f7d @0x0
0x1f7d…1f8e lno = 0x0d8e // 0x1f7f @0x2
0x1f7d…1f8e at0004 = ╱a1╱ CURSOR ╱ // 0x1f81 @0x4
0x1f7d…1f8e at0005 = ╱31╱1╱ // 0x1f82 @0x5
0x1f7d…1f8e at0006 = ╱37╱7╱ // 0x1f83 @0x6
0x1f7d…1f8e at0007 = ╱fe00008805╱ // 0x1f84 @0x7
0x1f7d…1f8e at000c = ╱ec╱,╱ // 0x1f89 @0xc
0x1f7d…1f8e at000d = ╱4c╱L╱ // 0x1f8a @0xd
0x1f7d…1f8e at000e = ╱49╱I╱ // 0x1f8b @0xe
0x1f7d…1f8e at000f = ╱45╱E╱ // 0x1f8c @0xf
0x1f7d…1f8e at0010 = EOL // 0x1f8d @0x10
0x1f7d…1f8e }
0x1f8e…1f94 aceb 3480 ELSE
0x1f8e…1f94 LineComalBin {
0x1f8e…1f94 ptr = 0xaceb // 0x1f8e @0x0
0x1f8e…1f94 lno = 0x0d98 // 0x1f90 @0x2
0x1f8e…1f94 at0004 = ╱9a╱ ELSE ╱ // 0x1f92 @0x4
0x1f8e…1f94 at0005 = EOL // 0x1f93 @0x5
0x1f8e…1f94 }
0x1f94…1fa5 acfc 3490 CURSOR 24,LIE
0x1f94…1fa5 LineComalBin {
0x1f94…1fa5 ptr = 0xacfc // 0x1f94 @0x0
0x1f94…1fa5 lno = 0x0da2 // 0x1f96 @0x2
0x1f94…1fa5 at0004 = ╱a1╱ CURSOR ╱ // 0x1f98 @0x4
0x1f94…1fa5 at0005 = ╱32╱2╱ // 0x1f99 @0x5
0x1f94…1fa5 at0006 = ╱34╱4╱ // 0x1f9a @0x6
0x1f94…1fa5 at0007 = ╱fe0000c005╱ // 0x1f9b @0x7
0x1f94…1fa5 at000c = ╱ec╱,╱ // 0x1fa0 @0xc
0x1f94…1fa5 at000d = ╱4c╱L╱ // 0x1fa1 @0xd
0x1f94…1fa5 at000e = ╱49╱I╱ // 0x1fa2 @0xe
0x1f94…1fa5 at000f = ╱45╱E╱ // 0x1fa3 @0xf
0x1f94…1fa5 at0010 = EOL // 0x1fa4 @0x10
0x1f94…1fa5 }
0x1fa5…1fab ad02 3500 ENDIF
0x1fa5…1fab LineComalBin {
0x1fa5…1fab ptr = 0xad02 // 0x1fa5 @0x0
0x1fa5…1fab lno = 0x0dac // 0x1fa7 @0x2
0x1fa5…1fab at0004 = ╱9b╱ ENDIF ╱ // 0x1fa9 @0x4
0x1fa5…1fab at0005 = EOL // 0x1faa @0x5
0x1fa5…1fab }
0x1fab…1fbc ad13 3510 PRINT VTARR$(LIN)
0x1fab…1fbc LineComalBin {
0x1fab…1fbc ptr = 0xad13 // 0x1fab @0x0
0x1fab…1fbc lno = 0x0db6 // 0x1fad @0x2
0x1fab…1fbc at0004 = ╱92╱ PRINT ╱ // 0x1faf @0x4
0x1fab…1fbc at0005 = ╱56╱V╱ // 0x1fb0 @0x5
0x1fab…1fbc at0006 = ╱54╱T╱ // 0x1fb1 @0x6
0x1fab…1fbc at0007 = ╱41╱A╱ // 0x1fb2 @0x7
0x1fab…1fbc at0008 = ╱52╱R╱ // 0x1fb3 @0x8
0x1fab…1fbc at0009 = ╱52╱R╱ // 0x1fb4 @0x9
0x1fab…1fbc at000a = ╱ef╱$╱ // 0x1fb5 @0xa
0x1fab…1fbc at000b = ╱ed╱(╱ // 0x1fb6 @0xb
0x1fab…1fbc at000c = ╱4c╱L╱ // 0x1fb7 @0xc
0x1fab…1fbc at000d = ╱49╱I╱ // 0x1fb8 @0xd
0x1fab…1fbc at000e = ╱4e╱N╱ // 0x1fb9 @0xe
0x1fab…1fbc at000f = ╱ee╱)╱ // 0x1fba @0xf
0x1fab…1fbc at0010 = EOL // 0x1fbb @0x10
0x1fab…1fbc }
0x1fbc…1fd4 ad2b 3520 IF VNARR(LIN)>4 THEN
0x1fbc…1fd4 LineComalBin {
0x1fbc…1fd4 ptr = 0xad2b // 0x1fbc @0x0
0x1fbc…1fd4 lno = 0x0dc0 // 0x1fbe @0x2
0x1fbc…1fd4 at0004 = ╱9c╱ IF ╱ // 0x1fc0 @0x4
0x1fbc…1fd4 at0005 = ╱56╱V╱ // 0x1fc1 @0x5
0x1fbc…1fd4 at0006 = ╱4e╱N╱ // 0x1fc2 @0x6
0x1fbc…1fd4 at0007 = ╱41╱A╱ // 0x1fc3 @0x7
0x1fbc…1fd4 at0008 = ╱52╱R╱ // 0x1fc4 @0x8
0x1fbc…1fd4 at0009 = ╱52╱R╱ // 0x1fc5 @0x9
0x1fbc…1fd4 at000a = ╱ed╱(╱ // 0x1fc6 @0xa
0x1fbc…1fd4 at000b = ╱4c╱L╱ // 0x1fc7 @0xb
0x1fbc…1fd4 at000c = ╱49╱I╱ // 0x1fc8 @0xc
0x1fbc…1fd4 at000d = ╱4e╱N╱ // 0x1fc9 @0xd
0x1fbc…1fd4 at000e = ╱ee╱)╱ // 0x1fca @0xe
0x1fbc…1fd4 at000f = ╱de╱>╱ // 0x1fcb @0xf
0x1fbc…1fd4 at0010 = ╱34╱4╱ // 0x1fcc @0x10
0x1fbc…1fd4 at0011 = ╱fe00008003╱ // 0x1fcd @0x11
0x1fbc…1fd4 at0016 = ╱b6╱ THEN ╱ // 0x1fd2 @0x16
0x1fbc…1fd4 at0017 = EOL // 0x1fd3 @0x17
0x1fbc…1fd4 }
0x1fd4…1fe5 ad3c 3530 CURSOR 51,LIE
0x1fd4…1fe5 LineComalBin {
0x1fd4…1fe5 ptr = 0xad3c // 0x1fd4 @0x0
0x1fd4…1fe5 lno = 0x0dca // 0x1fd6 @0x2
0x1fd4…1fe5 at0004 = ╱a1╱ CURSOR ╱ // 0x1fd8 @0x4
0x1fd4…1fe5 at0005 = ╱35╱5╱ // 0x1fd9 @0x5
0x1fd4…1fe5 at0006 = ╱31╱1╱ // 0x1fda @0x6
0x1fd4…1fe5 at0007 = ╱fe0000cc06╱ // 0x1fdb @0x7
0x1fd4…1fe5 at000c = ╱ec╱,╱ // 0x1fe0 @0xc
0x1fd4…1fe5 at000d = ╱4c╱L╱ // 0x1fe1 @0xd
0x1fd4…1fe5 at000e = ╱49╱I╱ // 0x1fe2 @0xe
0x1fd4…1fe5 at000f = ╱45╱E╱ // 0x1fe3 @0xf
0x1fd4…1fe5 at0010 = EOL // 0x1fe4 @0x10
0x1fd4…1fe5 }
0x1fe5…1ff9 ad50 3540 BB$=VPARR$(LIN)
0x1fe5…1ff9 LineComalBin {
0x1fe5…1ff9 ptr = 0xad50 // 0x1fe5 @0x0
0x1fe5…1ff9 lno = 0x0dd4 // 0x1fe7 @0x2
0x1fe5…1ff9 at0004 = ╱42╱B╱ // 0x1fe9 @0x4
0x1fe5…1ff9 at0005 = ╱42╱B╱ // 0x1fea @0x5
0x1fe5…1ff9 at0006 = ╱ef╱$╱ // 0x1feb @0x6
0x1fe5…1ff9 at0007 = ╱dc╱=╱ // 0x1fec @0x7
0x1fe5…1ff9 at0008 = ╱56╱V╱ // 0x1fed @0x8
0x1fe5…1ff9 at0009 = ╱50╱P╱ // 0x1fee @0x9
0x1fe5…1ff9 at000a = ╱41╱A╱ // 0x1fef @0xa
0x1fe5…1ff9 at000b = ╱52╱R╱ // 0x1ff0 @0xb
0x1fe5…1ff9 at000c = ╱52╱R╱ // 0x1ff1 @0xc
0x1fe5…1ff9 at000d = ╱ef╱$╱ // 0x1ff2 @0xd
0x1fe5…1ff9 at000e = ╱ed╱(╱ // 0x1ff3 @0xe
0x1fe5…1ff9 at000f = ╱4c╱L╱ // 0x1ff4 @0xf
0x1fe5…1ff9 at0010 = ╱49╱I╱ // 0x1ff5 @0x10
0x1fe5…1ff9 at0011 = ╱4e╱N╱ // 0x1ff6 @0x11
0x1fe5…1ff9 at0012 = ╱ee╱)╱ // 0x1ff7 @0x12
0x1fe5…1ff9 at0013 = EOL // 0x1ff8 @0x13
0x1fe5…1ff9 }
0x1ff9…2011 ad68 3550 EXEC TUD(BB$,TAL4$,E,B)
0x1ff9…2011 LineComalBin {
0x1ff9…2011 ptr = 0xad68 // 0x1ff9 @0x0
0x1ff9…2011 lno = 0x0dde // 0x1ffb @0x2
0x1ff9…2011 at0004 = ╱9d╱ EXEC ╱ // 0x1ffd @0x4
0x1ff9…2011 at0005 = ╱54╱T╱ // 0x1ffe @0x5
0x1ff9…2011 at0006 = ╱55╱U╱ // 0x1fff @0x6
0x1ff9…2011 at0007 = ╱44╱D╱ // 0x2000 @0x7
0x1ff9…2011 at0008 = ╱ed╱(╱ // 0x2001 @0x8
0x1ff9…2011 at0009 = ╱42╱B╱ // 0x2002 @0x9
0x1ff9…2011 at000a = ╱42╱B╱ // 0x2003 @0xa
0x1ff9…2011 at000b = ╱ef╱$╱ // 0x2004 @0xb
0x1ff9…2011 at000c = ╱ec╱,╱ // 0x2005 @0xc
0x1ff9…2011 at000d = ╱54╱T╱ // 0x2006 @0xd
0x1ff9…2011 at000e = ╱41╱A╱ // 0x2007 @0xe
0x1ff9…2011 at000f = ╱4c╱L╱ // 0x2008 @0xf
0x1ff9…2011 at0010 = ╱34╱4╱ // 0x2009 @0x10
0x1ff9…2011 at0011 = ╱ef╱$╱ // 0x200a @0x11
0x1ff9…2011 at0012 = ╱ec╱,╱ // 0x200b @0x12
0x1ff9…2011 at0013 = ╱45╱E╱ // 0x200c @0x13
0x1ff9…2011 at0014 = ╱ec╱,╱ // 0x200d @0x14
0x1ff9…2011 at0015 = ╱42╱B╱ // 0x200e @0x15
0x1ff9…2011 at0016 = ╱ee╱)╱ // 0x200f @0x16
0x1ff9…2011 at0017 = EOL // 0x2010 @0x17
0x1ff9…2011 }
0x2011…2017 ad6e 3560 ENDIF
0x2011…2017 LineComalBin {
0x2011…2017 ptr = 0xad6e // 0x2011 @0x0
0x2011…2017 lno = 0x0de8 // 0x2013 @0x2
0x2011…2017 at0004 = ╱9b╱ ENDIF ╱ // 0x2015 @0x4
0x2011…2017 at0005 = EOL // 0x2016 @0x5
0x2011…2017 }
0x2017…2028 ad7f 3570 CURSOR 66,LIE
0x2017…2028 LineComalBin {
0x2017…2028 ptr = 0xad7f // 0x2017 @0x0
0x2017…2028 lno = 0x0df2 // 0x2019 @0x2
0x2017…2028 at0004 = ╱a1╱ CURSOR ╱ // 0x201b @0x4
0x2017…2028 at0005 = ╱36╱6╱ // 0x201c @0x5
0x2017…2028 at0006 = ╱36╱6╱ // 0x201d @0x6
0x2017…2028 at0007 = ╱fe00008407╱ // 0x201e @0x7
0x2017…2028 at000c = ╱ec╱,╱ // 0x2023 @0xc
0x2017…2028 at000d = ╱4c╱L╱ // 0x2024 @0xd
0x2017…2028 at000e = ╱49╱I╱ // 0x2025 @0xe
0x2017…2028 at000f = ╱45╱E╱ // 0x2026 @0xf
0x2017…2028 at0010 = EOL // 0x2027 @0x10
0x2017…2028 }
0x2028…203c ad93 3580 BB$=BLARR$(LIN)
0x2028…203c LineComalBin {
0x2028…203c ptr = 0xad93 // 0x2028 @0x0
0x2028…203c lno = 0x0dfc // 0x202a @0x2
0x2028…203c at0004 = ╱42╱B╱ // 0x202c @0x4
0x2028…203c at0005 = ╱42╱B╱ // 0x202d @0x5
0x2028…203c at0006 = ╱ef╱$╱ // 0x202e @0x6
0x2028…203c at0007 = ╱dc╱=╱ // 0x202f @0x7
0x2028…203c at0008 = ╱42╱B╱ // 0x2030 @0x8
0x2028…203c at0009 = ╱4c╱L╱ // 0x2031 @0x9
0x2028…203c at000a = ╱41╱A╱ // 0x2032 @0xa
0x2028…203c at000b = ╱52╱R╱ // 0x2033 @0xb
0x2028…203c at000c = ╱52╱R╱ // 0x2034 @0xc
0x2028…203c at000d = ╱ef╱$╱ // 0x2035 @0xd
0x2028…203c at000e = ╱ed╱(╱ // 0x2036 @0xe
0x2028…203c at000f = ╱4c╱L╱ // 0x2037 @0xf
0x2028…203c at0010 = ╱49╱I╱ // 0x2038 @0x10
0x2028…203c at0011 = ╱4e╱N╱ // 0x2039 @0x11
0x2028…203c at0012 = ╱ee╱)╱ // 0x203a @0x12
0x2028…203c at0013 = EOL // 0x203b @0x13
0x2028…203c }
0x203c…2062 adb9 3590 IF VNARR(LIN)<>G THEN EXEC TUD(BB$,TAL4$,E,B)
0x203c…2062 LineComalBin {
0x203c…2062 ptr = 0xadb9 // 0x203c @0x0
0x203c…2062 lno = 0x0e06 // 0x203e @0x2
0x203c…2062 at0004 = ╱82╱ IF ╱ // 0x2040 @0x4
0x203c…2062 at0005 = ╱56╱V╱ // 0x2041 @0x5
0x203c…2062 at0006 = ╱4e╱N╱ // 0x2042 @0x6
0x203c…2062 at0007 = ╱41╱A╱ // 0x2043 @0x7
0x203c…2062 at0008 = ╱52╱R╱ // 0x2044 @0x8
0x203c…2062 at0009 = ╱52╱R╱ // 0x2045 @0x9
0x203c…2062 at000a = ╱ed╱(╱ // 0x2046 @0xa
0x203c…2062 at000b = ╱4c╱L╱ // 0x2047 @0xb
0x203c…2062 at000c = ╱49╱I╱ // 0x2048 @0xc
0x203c…2062 at000d = ╱4e╱N╱ // 0x2049 @0xd
0x203c…2062 at000e = ╱ee╱)╱ // 0x204a @0xe
0x203c…2062 at000f = ╱e1╱<>╱ // 0x204b @0xf
0x203c…2062 at0010 = ╱47╱G╱ // 0x204c @0x10
0x203c…2062 at0011 = ╱b6╱ THEN ╱ // 0x204d @0x11
0x203c…2062 at0012 = ╱9d╱ EXEC ╱ // 0x204e @0x12
0x203c…2062 at0013 = ╱54╱T╱ // 0x204f @0x13
0x203c…2062 at0014 = ╱55╱U╱ // 0x2050 @0x14
0x203c…2062 at0015 = ╱44╱D╱ // 0x2051 @0x15
0x203c…2062 at0016 = ╱ed╱(╱ // 0x2052 @0x16
0x203c…2062 at0017 = ╱42╱B╱ // 0x2053 @0x17
0x203c…2062 at0018 = ╱42╱B╱ // 0x2054 @0x18
0x203c…2062 at0019 = ╱ef╱$╱ // 0x2055 @0x19
0x203c…2062 at001a = ╱ec╱,╱ // 0x2056 @0x1a
0x203c…2062 at001b = ╱54╱T╱ // 0x2057 @0x1b
0x203c…2062 at001c = ╱41╱A╱ // 0x2058 @0x1c
0x203c…2062 at001d = ╱4c╱L╱ // 0x2059 @0x1d
0x203c…2062 at001e = ╱34╱4╱ // 0x205a @0x1e
0x203c…2062 at001f = ╱ef╱$╱ // 0x205b @0x1f
0x203c…2062 at0020 = ╱ec╱,╱ // 0x205c @0x20
0x203c…2062 at0021 = ╱45╱E╱ // 0x205d @0x21
0x203c…2062 at0022 = ╱ec╱,╱ // 0x205e @0x22
0x203c…2062 at0023 = ╱42╱B╱ // 0x205f @0x23
0x203c…2062 at0024 = ╱ee╱)╱ // 0x2060 @0x24
0x203c…2062 at0025 = EOL // 0x2061 @0x25
0x203c…2062 }
0x2062…2068 adbf 3600 ENDPROC
0x2062…2068 LineComalBin {
0x2062…2068 ptr = 0xadbf // 0x2062 @0x0
0x2062…2068 lno = 0x0e10 // 0x2064 @0x2
0x2062…2068 at0004 = ╱9f╱ ENDPROC ╱ // 0x2066 @0x4
0x2062…2068 at0005 = EOL // 0x2067 @0x5
0x2062…2068 }
0x2068…2076 adcd 3610 PROC FAKTBUND
0x2068…2076 LineComalBin {
0x2068…2076 ptr = 0xadcd // 0x2068 @0x0
0x2068…2076 lno = 0x0e1a // 0x206a @0x2
0x2068…2076 at0004 = ╱9e╱ PROC ╱ // 0x206c @0x4
0x2068…2076 at0005 = ╱46╱F╱ // 0x206d @0x5
0x2068…2076 at0006 = ╱41╱A╱ // 0x206e @0x6
0x2068…2076 at0007 = ╱4b╱K╱ // 0x206f @0x7
0x2068…2076 at0008 = ╱54╱T╱ // 0x2070 @0x8
0x2068…2076 at0009 = ╱42╱B╱ // 0x2071 @0x9
0x2068…2076 at000a = ╱55╱U╱ // 0x2072 @0xa
0x2068…2076 at000b = ╱4e╱N╱ // 0x2073 @0xb
0x2068…2076 at000c = ╱44╱D╱ // 0x2074 @0xc
0x2068…2076 at000d = EOL // 0x2075 @0xd
0x2068…2076 }
0x2076…2089 ade0 3620 GTOTAL$=TOTAL$
0x2076…2089 LineComalBin {
0x2076…2089 ptr = 0xade0 // 0x2076 @0x0
0x2076…2089 lno = 0x0e24 // 0x2078 @0x2
0x2076…2089 at0004 = ╱47╱G╱ // 0x207a @0x4
0x2076…2089 at0005 = ╱54╱T╱ // 0x207b @0x5
0x2076…2089 at0006 = ╱4f╱O╱ // 0x207c @0x6
0x2076…2089 at0007 = ╱54╱T╱ // 0x207d @0x7
0x2076…2089 at0008 = ╱41╱A╱ // 0x207e @0x8
0x2076…2089 at0009 = ╱4c╱L╱ // 0x207f @0x9
0x2076…2089 at000a = ╱ef╱$╱ // 0x2080 @0xa
0x2076…2089 at000b = ╱dc╱=╱ // 0x2081 @0xb
0x2076…2089 at000c = ╱54╱T╱ // 0x2082 @0xc
0x2076…2089 at000d = ╱4f╱O╱ // 0x2083 @0xd
0x2076…2089 at000e = ╱54╱T╱ // 0x2084 @0xe
0x2076…2089 at000f = ╱41╱A╱ // 0x2085 @0xf
0x2076…2089 at0010 = ╱4c╱L╱ // 0x2086 @0x10
0x2076…2089 at0011 = ╱ef╱$╱ // 0x2087 @0x11
0x2076…2089 at0012 = EOL // 0x2088 @0x12
0x2076…2089 }
0x2089…208f ade6 3630 REPEAT
0x2089…208f LineComalBin {
0x2089…208f ptr = 0xade6 // 0x2089 @0x0
0x2089…208f lno = 0x0e2e // 0x208b @0x2
0x2089…208f at0004 = ╱97╱ REPEAT ╱ // 0x208d @0x4
0x2089…208f at0005 = EOL // 0x208e @0x5
0x2089…208f }
0x208f…2099 adf0 3640 EXEC SLET
0x208f…2099 LineComalBin {
0x208f…2099 ptr = 0xadf0 // 0x208f @0x0
0x208f…2099 lno = 0x0e38 // 0x2091 @0x2
0x208f…2099 at0004 = ╱9d╱ EXEC ╱ // 0x2093 @0x4
0x208f…2099 at0005 = ╱53╱S╱ // 0x2094 @0x5
0x208f…2099 at0006 = ╱4c╱L╱ // 0x2095 @0x6
0x208f…2099 at0007 = ╱45╱E╱ // 0x2096 @0x7
0x208f…2099 at0008 = ╱54╱T╱ // 0x2097 @0x8
0x208f…2099 at0009 = EOL // 0x2098 @0x9
0x208f…2099 }
0x2099…20ae ae05 3650 CURSOR 22,19
0x2099…20ae LineComalBin {
0x2099…20ae ptr = 0xae05 // 0x2099 @0x0
0x2099…20ae lno = 0x0e42 // 0x209b @0x2
0x2099…20ae at0004 = ╱a1╱ CURSOR ╱ // 0x209d @0x4
0x2099…20ae at0005 = ╱32╱2╱ // 0x209e @0x5
0x2099…20ae at0006 = ╱32╱2╱ // 0x209f @0x6
0x2099…20ae at0007 = ╱fe0000b005╱ // 0x20a0 @0x7
0x2099…20ae at000c = ╱ec╱,╱ // 0x20a5 @0xc
0x2099…20ae at000d = ╱31╱1╱ // 0x20a6 @0xd
0x2099…20ae at000e = ╱39╱9╱ // 0x20a7 @0xe
0x2099…20ae at000f = ╱fe00009805╱ // 0x20a8 @0xf
0x2099…20ae at0014 = EOL // 0x20ad @0x14
0x2099…20ae }
0x20ae…20cd ae24 3660 PRINT "Forsendelse Netto"
0x20ae…20cd LineComalBin {
0x20ae…20cd ptr = 0xae24 // 0x20ae @0x0
0x20ae…20cd lno = 0x0e4c // 0x20b0 @0x2
0x20ae…20cd at0004 = ╱92╱ PRINT ╱ // 0x20b2 @0x4
0x20ae…20cd at0005 = ╱22╱"╱ // 0x20b3 @0x5
0x20ae…20cd at0006 = ╱46╱F╱ // 0x20b4 @0x6
0x20ae…20cd at0007 = ╱6f╱o╱ // 0x20b5 @0x7
0x20ae…20cd at0008 = ╱72╱r╱ // 0x20b6 @0x8
0x20ae…20cd at0009 = ╱73╱s╱ // 0x20b7 @0x9
0x20ae…20cd at000a = ╱65╱e╱ // 0x20b8 @0xa
0x20ae…20cd at000b = ╱6e╱n╱ // 0x20b9 @0xb
0x20ae…20cd at000c = ╱64╱d╱ // 0x20ba @0xc
0x20ae…20cd at000d = ╱65╱e╱ // 0x20bb @0xd
0x20ae…20cd at000e = ╱6c╱l╱ // 0x20bc @0xe
0x20ae…20cd at000f = ╱73╱s╱ // 0x20bd @0xf
0x20ae…20cd at0010 = ╱65╱e╱ // 0x20be @0x10
0x20ae…20cd at0011 = ╱20╱…╱ // 0x20bf @0x11
0x20ae…20cd at0012 = ╱20╱…╱ // 0x20c0 @0x12
0x20ae…20cd at0013 = ╱20╱…╱ // 0x20c1 @0x13
0x20ae…20cd at0014 = ╱20╱…╱ // 0x20c2 @0x14
0x20ae…20cd at0015 = ╱20╱…╱ // 0x20c3 @0x15
0x20ae…20cd at0016 = ╱20╱…╱ // 0x20c4 @0x16
0x20ae…20cd at0017 = ╱20╱…╱ // 0x20c5 @0x17
0x20ae…20cd at0018 = ╱4e╱N╱ // 0x20c6 @0x18
0x20ae…20cd at0019 = ╱65╱e╱ // 0x20c7 @0x19
0x20ae…20cd at001a = ╱74╱t╱ // 0x20c8 @0x1a
0x20ae…20cd at001b = ╱74╱t╱ // 0x20c9 @0x1b
0x20ae…20cd at001c = ╱6f╱o╱ // 0x20ca @0x1c
0x20ae…20cd at001d = ╱22╱"╱ // 0x20cb @0x1d
0x20ae…20cd at001e = EOL // 0x20cc @0x1e
0x20ae…20cd }
0x20cd…20e2 ae39 3670 CURSOR 56,19
0x20cd…20e2 LineComalBin {
0x20cd…20e2 ptr = 0xae39 // 0x20cd @0x0
0x20cd…20e2 lno = 0x0e56 // 0x20cf @0x2
0x20cd…20e2 at0004 = ╱a1╱ CURSOR ╱ // 0x20d1 @0x4
0x20cd…20e2 at0005 = ╱35╱5╱ // 0x20d2 @0x5
0x20cd…20e2 at0006 = ╱36╱6╱ // 0x20d3 @0x6
0x20cd…20e2 at0007 = ╱fe0000e006╱ // 0x20d4 @0x7
0x20cd…20e2 at000c = ╱ec╱,╱ // 0x20d9 @0xc
0x20cd…20e2 at000d = ╱31╱1╱ // 0x20da @0xd
0x20cd…20e2 at000e = ╱39╱9╱ // 0x20db @0xe
0x20cd…20e2 at000f = ╱fe00009805╱ // 0x20dc @0xf
0x20cd…20e2 at0014 = EOL // 0x20e1 @0x14
0x20cd…20e2 }
0x20e2…20fd ae54 3680 PRINT "Moms Total"
0x20e2…20fd LineComalBin {
0x20e2…20fd ptr = 0xae54 // 0x20e2 @0x0
0x20e2…20fd lno = 0x0e60 // 0x20e4 @0x2
0x20e2…20fd at0004 = ╱92╱ PRINT ╱ // 0x20e6 @0x4
0x20e2…20fd at0005 = ╱22╱"╱ // 0x20e7 @0x5
0x20e2…20fd at0006 = ╱4d╱M╱ // 0x20e8 @0x6
0x20e2…20fd at0007 = ╱6f╱o╱ // 0x20e9 @0x7
0x20e2…20fd at0008 = ╱6d╱m╱ // 0x20ea @0x8
0x20e2…20fd at0009 = ╱73╱s╱ // 0x20eb @0x9
0x20e2…20fd at000a = ╱20╱…╱ // 0x20ec @0xa
0x20e2…20fd at000b = ╱20╱…╱ // 0x20ed @0xb
0x20e2…20fd at000c = ╱20╱…╱ // 0x20ee @0xc
0x20e2…20fd at000d = ╱20╱…╱ // 0x20ef @0xd
0x20e2…20fd at000e = ╱20╱…╱ // 0x20f0 @0xe
0x20e2…20fd at000f = ╱20╱…╱ // 0x20f1 @0xf
0x20e2…20fd at0010 = ╱20╱…╱ // 0x20f2 @0x10
0x20e2…20fd at0011 = ╱20╱…╱ // 0x20f3 @0x11
0x20e2…20fd at0012 = ╱20╱…╱ // 0x20f4 @0x12
0x20e2…20fd at0013 = ╱20╱…╱ // 0x20f5 @0x13
0x20e2…20fd at0014 = ╱54╱T╱ // 0x20f6 @0x14
0x20e2…20fd at0015 = ╱6f╱o╱ // 0x20f7 @0x15
0x20e2…20fd at0016 = ╱74╱t╱ // 0x20f8 @0x16
0x20e2…20fd at0017 = ╱61╱a╱ // 0x20f9 @0x17
0x20e2…20fd at0018 = ╱6c╱l╱ // 0x20fa @0x18
0x20e2…20fd at0019 = ╱22╱"╱ // 0x20fb @0x19
0x20e2…20fd at001a = EOL // 0x20fc @0x1a
0x20e2…20fd }
0x20fd…212d ae84 3690 EXEC INDPUT2(20,21,BK$(1),FORS$)
0x20fd…212d LineComalBin {
0x20fd…212d ptr = 0xae84 // 0x20fd @0x0
0x20fd…212d lno = 0x0e6a // 0x20ff @0x2
0x20fd…212d at0004 = ╱9d╱ EXEC ╱ // 0x2101 @0x4
0x20fd…212d at0005 = ╱49╱I╱ // 0x2102 @0x5
0x20fd…212d at0006 = ╱4e╱N╱ // 0x2103 @0x6
0x20fd…212d at0007 = ╱44╱D╱ // 0x2104 @0x7
0x20fd…212d at0008 = ╱50╱P╱ // 0x2105 @0x8
0x20fd…212d at0009 = ╱55╱U╱ // 0x2106 @0x9
0x20fd…212d at000a = ╱54╱T╱ // 0x2107 @0xa
0x20fd…212d at000b = ╱32╱2╱ // 0x2108 @0xb
0x20fd…212d at000c = ╱ed╱(╱ // 0x2109 @0xc
0x20fd…212d at000d = ╱32╱2╱ // 0x210a @0xd
0x20fd…212d at000e = ╱30╱0╱ // 0x210b @0xe
0x20fd…212d at000f = ╱fe0000a005╱ // 0x210c @0xf
0x20fd…212d at0014 = ╱ec╱,╱ // 0x2111 @0x14
0x20fd…212d at0015 = ╱32╱2╱ // 0x2112 @0x15
0x20fd…212d at0016 = ╱31╱1╱ // 0x2113 @0x16
0x20fd…212d at0017 = ╱fe0000a805╱ // 0x2114 @0x17
0x20fd…212d at001c = ╱ec╱,╱ // 0x2119 @0x1c
0x20fd…212d at001d = ╱42╱B╱ // 0x211a @0x1d
0x20fd…212d at001e = ╱4b╱K╱ // 0x211b @0x1e
0x20fd…212d at001f = ╱ef╱$╱ // 0x211c @0x1f
0x20fd…212d at0020 = ╱ed╱(╱ // 0x211d @0x20
0x20fd…212d at0021 = ╱31╱1╱ // 0x211e @0x21
0x20fd…212d at0022 = ╱fe00008001╱ // 0x211f @0x22
0x20fd…212d at0027 = ╱ee╱)╱ // 0x2124 @0x27
0x20fd…212d at0028 = ╱ec╱,╱ // 0x2125 @0x28
0x20fd…212d at0029 = ╱46╱F╱ // 0x2126 @0x29
0x20fd…212d at002a = ╱4f╱O╱ // 0x2127 @0x2a
0x20fd…212d at002b = ╱52╱R╱ // 0x2128 @0x2b
0x20fd…212d at002c = ╱53╱S╱ // 0x2129 @0x2c
0x20fd…212d at002d = ╱ef╱$╱ // 0x212a @0x2d
0x20fd…212d at002e = ╱ee╱)╱ // 0x212b @0x2e
0x20fd…212d at002f = EOL // 0x212c @0x2f
0x20fd…212d }
0x212d…2142 ae99 3700 CURSOR 21,21
0x212d…2142 LineComalBin {
0x212d…2142 ptr = 0xae99 // 0x212d @0x0
0x212d…2142 lno = 0x0e74 // 0x212f @0x2
0x212d…2142 at0004 = ╱a1╱ CURSOR ╱ // 0x2131 @0x4
0x212d…2142 at0005 = ╱32╱2╱ // 0x2132 @0x5
0x212d…2142 at0006 = ╱31╱1╱ // 0x2133 @0x6
0x212d…2142 at0007 = ╱fe0000a805╱ // 0x2134 @0x7
0x212d…2142 at000c = ╱ec╱,╱ // 0x2139 @0xc
0x212d…2142 at000d = ╱32╱2╱ // 0x213a @0xd
0x212d…2142 at000e = ╱31╱1╱ // 0x213b @0xe
0x212d…2142 at000f = ╱fe0000a805╱ // 0x213c @0xf
0x212d…2142 at0014 = EOL // 0x2141 @0x14
0x212d…2142 }
0x2142…215c aeb3 3710 EXEC TUD(FORS$,TAL4$,E,B)
0x2142…215c LineComalBin {
0x2142…215c ptr = 0xaeb3 // 0x2142 @0x0
0x2142…215c lno = 0x0e7e // 0x2144 @0x2
0x2142…215c at0004 = ╱9d╱ EXEC ╱ // 0x2146 @0x4
0x2142…215c at0005 = ╱54╱T╱ // 0x2147 @0x5
0x2142…215c at0006 = ╱55╱U╱ // 0x2148 @0x6
0x2142…215c at0007 = ╱44╱D╱ // 0x2149 @0x7
0x2142…215c at0008 = ╱ed╱(╱ // 0x214a @0x8
0x2142…215c at0009 = ╱46╱F╱ // 0x214b @0x9
0x2142…215c at000a = ╱4f╱O╱ // 0x214c @0xa
0x2142…215c at000b = ╱52╱R╱ // 0x214d @0xb
0x2142…215c at000c = ╱53╱S╱ // 0x214e @0xc
0x2142…215c at000d = ╱ef╱$╱ // 0x214f @0xd
0x2142…215c at000e = ╱ec╱,╱ // 0x2150 @0xe
0x2142…215c at000f = ╱54╱T╱ // 0x2151 @0xf
0x2142…215c at0010 = ╱41╱A╱ // 0x2152 @0x10
0x2142…215c at0011 = ╱4c╱L╱ // 0x2153 @0x11
0x2142…215c at0012 = ╱34╱4╱ // 0x2154 @0x12
0x2142…215c at0013 = ╱ef╱$╱ // 0x2155 @0x13
0x2142…215c at0014 = ╱ec╱,╱ // 0x2156 @0x14
0x2142…215c at0015 = ╱45╱E╱ // 0x2157 @0x15
0x2142…215c at0016 = ╱ec╱,╱ // 0x2158 @0x16
0x2142…215c at0017 = ╱42╱B╱ // 0x2159 @0x17
0x2142…215c at0018 = ╱ee╱)╱ // 0x215a @0x18
0x2142…215c at0019 = EOL // 0x215b @0x19
0x2142…215c }
0x215c…2171 aec8 3720 CURSOR 36,21
0x215c…2171 LineComalBin {
0x215c…2171 ptr = 0xaec8 // 0x215c @0x0
0x215c…2171 lno = 0x0e88 // 0x215e @0x2
0x215c…2171 at0004 = ╱a1╱ CURSOR ╱ // 0x2160 @0x4
0x215c…2171 at0005 = ╱33╱3╱ // 0x2161 @0x5
0x215c…2171 at0006 = ╱36╱6╱ // 0x2162 @0x6
0x215c…2171 at0007 = ╱fe00009006╱ // 0x2163 @0x7
0x215c…2171 at000c = ╱ec╱,╱ // 0x2168 @0xc
0x215c…2171 at000d = ╱32╱2╱ // 0x2169 @0xd
0x215c…2171 at000e = ╱31╱1╱ // 0x216a @0xe
0x215c…2171 at000f = ╱fe0000a805╱ // 0x216b @0xf
0x215c…2171 at0014 = EOL // 0x2170 @0x14
0x215c…2171 }
0x2171…2190 aee7 3730 EXEC CA(B,FORS$,TOTAL$,TOTAL$)
0x2171…2190 LineComalBin {
0x2171…2190 ptr = 0xaee7 // 0x2171 @0x0
0x2171…2190 lno = 0x0e92 // 0x2173 @0x2
0x2171…2190 at0004 = ╱9d╱ EXEC ╱ // 0x2175 @0x4
0x2171…2190 at0005 = ╱43╱C╱ // 0x2176 @0x5
0x2171…2190 at0006 = ╱41╱A╱ // 0x2177 @0x6
0x2171…2190 at0007 = ╱ed╱(╱ // 0x2178 @0x7
0x2171…2190 at0008 = ╱42╱B╱ // 0x2179 @0x8
0x2171…2190 at0009 = ╱ec╱,╱ // 0x217a @0x9
0x2171…2190 at000a = ╱46╱F╱ // 0x217b @0xa
0x2171…2190 at000b = ╱4f╱O╱ // 0x217c @0xb
0x2171…2190 at000c = ╱52╱R╱ // 0x217d @0xc
0x2171…2190 at000d = ╱53╱S╱ // 0x217e @0xd
0x2171…2190 at000e = ╱ef╱$╱ // 0x217f @0xe
0x2171…2190 at000f = ╱ec╱,╱ // 0x2180 @0xf
0x2171…2190 at0010 = ╱54╱T╱ // 0x2181 @0x10
0x2171…2190 at0011 = ╱4f╱O╱ // 0x2182 @0x11
0x2171…2190 at0012 = ╱54╱T╱ // 0x2183 @0x12
0x2171…2190 at0013 = ╱41╱A╱ // 0x2184 @0x13
0x2171…2190 at0014 = ╱4c╱L╱ // 0x2185 @0x14
0x2171…2190 at0015 = ╱ef╱$╱ // 0x2186 @0x15
0x2171…2190 at0016 = ╱ec╱,╱ // 0x2187 @0x16
0x2171…2190 at0017 = ╱54╱T╱ // 0x2188 @0x17
0x2171…2190 at0018 = ╱4f╱O╱ // 0x2189 @0x18
0x2171…2190 at0019 = ╱54╱T╱ // 0x218a @0x19
0x2171…2190 at001a = ╱41╱A╱ // 0x218b @0x1a
0x2171…2190 at001b = ╱4c╱L╱ // 0x218c @0x1b
0x2171…2190 at001c = ╱ef╱$╱ // 0x218d @0x1c
0x2171…2190 at001d = ╱ee╱)╱ // 0x218e @0x1d
0x2171…2190 at001e = EOL // 0x218f @0x1e
0x2171…2190 }
0x2190…21ab af02 3740 EXEC TUD(TOTAL$,TAL4$,E,B)
0x2190…21ab LineComalBin {
0x2190…21ab ptr = 0xaf02 // 0x2190 @0x0
0x2190…21ab lno = 0x0e9c // 0x2192 @0x2
0x2190…21ab at0004 = ╱9d╱ EXEC ╱ // 0x2194 @0x4
0x2190…21ab at0005 = ╱54╱T╱ // 0x2195 @0x5
0x2190…21ab at0006 = ╱55╱U╱ // 0x2196 @0x6
0x2190…21ab at0007 = ╱44╱D╱ // 0x2197 @0x7
0x2190…21ab at0008 = ╱ed╱(╱ // 0x2198 @0x8
0x2190…21ab at0009 = ╱54╱T╱ // 0x2199 @0x9
0x2190…21ab at000a = ╱4f╱O╱ // 0x219a @0xa
0x2190…21ab at000b = ╱54╱T╱ // 0x219b @0xb
0x2190…21ab at000c = ╱41╱A╱ // 0x219c @0xc
0x2190…21ab at000d = ╱4c╱L╱ // 0x219d @0xd
0x2190…21ab at000e = ╱ef╱$╱ // 0x219e @0xe
0x2190…21ab at000f = ╱ec╱,╱ // 0x219f @0xf
0x2190…21ab at0010 = ╱54╱T╱ // 0x21a0 @0x10
0x2190…21ab at0011 = ╱41╱A╱ // 0x21a1 @0x11
0x2190…21ab at0012 = ╱4c╱L╱ // 0x21a2 @0x12
0x2190…21ab at0013 = ╱34╱4╱ // 0x21a3 @0x13
0x2190…21ab at0014 = ╱ef╱$╱ // 0x21a4 @0x14
0x2190…21ab at0015 = ╱ec╱,╱ // 0x21a5 @0x15
0x2190…21ab at0016 = ╱45╱E╱ // 0x21a6 @0x16
0x2190…21ab at0017 = ╱ec╱,╱ // 0x21a7 @0x17
0x2190…21ab at0018 = ╱42╱B╱ // 0x21a8 @0x18
0x2190…21ab at0019 = ╱ee╱)╱ // 0x21a9 @0x19
0x2190…21ab at001a = EOL // 0x21aa @0x1a
0x2190…21ab }
0x21ab…21ba af11 3750 IF DLK$="0" THEN
0x21ab…21ba LineComalBin {
0x21ab…21ba ptr = 0xaf11 // 0x21ab @0x0
0x21ab…21ba lno = 0x0ea6 // 0x21ad @0x2
0x21ab…21ba at0004 = ╱9c╱ IF ╱ // 0x21af @0x4
0x21ab…21ba at0005 = ╱44╱D╱ // 0x21b0 @0x5
0x21ab…21ba at0006 = ╱4c╱L╱ // 0x21b1 @0x6
0x21ab…21ba at0007 = ╱4b╱K╱ // 0x21b2 @0x7
0x21ab…21ba at0008 = ╱ef╱$╱ // 0x21b3 @0x8
0x21ab…21ba at0009 = ╱dc╱=╱ // 0x21b4 @0x9
0x21ab…21ba at000a = ╱22╱"╱ // 0x21b5 @0xa
0x21ab…21ba at000b = ╱30╱0╱ // 0x21b6 @0xb
0x21ab…21ba at000c = ╱22╱"╱ // 0x21b7 @0xc
0x21ab…21ba at000d = ╱b6╱ THEN ╱ // 0x21b8 @0xd
0x21ab…21ba at000e = EOL // 0x21b9 @0xe
0x21ab…21ba }
0x21ba…21da af31 3760 EXEC CA(G,TOTAL$,MOMS$,FTOTAL$)
0x21ba…21da LineComalBin {
0x21ba…21da ptr = 0xaf31 // 0x21ba @0x0
0x21ba…21da lno = 0x0eb0 // 0x21bc @0x2
0x21ba…21da at0004 = ╱9d╱ EXEC ╱ // 0x21be @0x4
0x21ba…21da at0005 = ╱43╱C╱ // 0x21bf @0x5
0x21ba…21da at0006 = ╱41╱A╱ // 0x21c0 @0x6
0x21ba…21da at0007 = ╱ed╱(╱ // 0x21c1 @0x7
0x21ba…21da at0008 = ╱47╱G╱ // 0x21c2 @0x8
0x21ba…21da at0009 = ╱ec╱,╱ // 0x21c3 @0x9
0x21ba…21da at000a = ╱54╱T╱ // 0x21c4 @0xa
0x21ba…21da at000b = ╱4f╱O╱ // 0x21c5 @0xb
0x21ba…21da at000c = ╱54╱T╱ // 0x21c6 @0xc
0x21ba…21da at000d = ╱41╱A╱ // 0x21c7 @0xd
0x21ba…21da at000e = ╱4c╱L╱ // 0x21c8 @0xe
0x21ba…21da at000f = ╱ef╱$╱ // 0x21c9 @0xf
0x21ba…21da at0010 = ╱ec╱,╱ // 0x21ca @0x10
0x21ba…21da at0011 = ╱4d╱M╱ // 0x21cb @0x11
0x21ba…21da at0012 = ╱4f╱O╱ // 0x21cc @0x12
0x21ba…21da at0013 = ╱4d╱M╱ // 0x21cd @0x13
0x21ba…21da at0014 = ╱53╱S╱ // 0x21ce @0x14
0x21ba…21da at0015 = ╱ef╱$╱ // 0x21cf @0x15
0x21ba…21da at0016 = ╱ec╱,╱ // 0x21d0 @0x16
0x21ba…21da at0017 = ╱46╱F╱ // 0x21d1 @0x17
0x21ba…21da at0018 = ╱54╱T╱ // 0x21d2 @0x18
0x21ba…21da at0019 = ╱4f╱O╱ // 0x21d3 @0x19
0x21ba…21da at001a = ╱54╱T╱ // 0x21d4 @0x1a
0x21ba…21da at001b = ╱41╱A╱ // 0x21d5 @0x1b
0x21ba…21da at001c = ╱4c╱L╱ // 0x21d6 @0x1c
0x21ba…21da at001d = ╱ef╱$╱ // 0x21d7 @0x1d
0x21ba…21da at001e = ╱ee╱)╱ // 0x21d8 @0x1e
0x21ba…21da at001f = EOL // 0x21d9 @0x1f
0x21ba…21da }
0x21da…21ec af43 3770 ANTAL$="100+"
0x21da…21ec LineComalBin {
0x21da…21ec ptr = 0xaf43 // 0x21da @0x0
0x21da…21ec lno = 0x0eba // 0x21dc @0x2
0x21da…21ec at0004 = ╱41╱A╱ // 0x21de @0x4
0x21da…21ec at0005 = ╱4e╱N╱ // 0x21df @0x5
0x21da…21ec at0006 = ╱54╱T╱ // 0x21e0 @0x6
0x21da…21ec at0007 = ╱41╱A╱ // 0x21e1 @0x7
0x21da…21ec at0008 = ╱4c╱L╱ // 0x21e2 @0x8
0x21da…21ec at0009 = ╱ef╱$╱ // 0x21e3 @0x9
0x21da…21ec at000a = ╱dc╱=╱ // 0x21e4 @0xa
0x21da…21ec at000b = ╱22╱"╱ // 0x21e5 @0xb
0x21da…21ec at000c = ╱31╱1╱ // 0x21e6 @0xc
0x21da…21ec at000d = ╱30╱0╱ // 0x21e7 @0xd
0x21da…21ec at000e = ╱30╱0╱ // 0x21e8 @0xe
0x21da…21ec at000f = ╱2b╱+╱ // 0x21e9 @0xf
0x21da…21ec at0010 = ╱22╱"╱ // 0x21ea @0x10
0x21da…21ec at0011 = EOL // 0x21eb @0x11
0x21da…21ec }
0x21ec…220d af64 3780 EXEC CA(V,FTOTAL$,ANTAL$,ANTAL$)
0x21ec…220d LineComalBin {
0x21ec…220d ptr = 0xaf64 // 0x21ec @0x0
0x21ec…220d lno = 0x0ec4 // 0x21ee @0x2
0x21ec…220d at0004 = ╱9d╱ EXEC ╱ // 0x21f0 @0x4
0x21ec…220d at0005 = ╱43╱C╱ // 0x21f1 @0x5
0x21ec…220d at0006 = ╱41╱A╱ // 0x21f2 @0x6
0x21ec…220d at0007 = ╱ed╱(╱ // 0x21f3 @0x7
0x21ec…220d at0008 = ╱56╱V╱ // 0x21f4 @0x8
0x21ec…220d at0009 = ╱ec╱,╱ // 0x21f5 @0x9
0x21ec…220d at000a = ╱46╱F╱ // 0x21f6 @0xa
0x21ec…220d at000b = ╱54╱T╱ // 0x21f7 @0xb
0x21ec…220d at000c = ╱4f╱O╱ // 0x21f8 @0xc
0x21ec…220d at000d = ╱54╱T╱ // 0x21f9 @0xd
0x21ec…220d at000e = ╱41╱A╱ // 0x21fa @0xe
0x21ec…220d at000f = ╱4c╱L╱ // 0x21fb @0xf
0x21ec…220d at0010 = ╱ef╱$╱ // 0x21fc @0x10
0x21ec…220d at0011 = ╱ec╱,╱ // 0x21fd @0x11
0x21ec…220d at0012 = ╱41╱A╱ // 0x21fe @0x12
0x21ec…220d at0013 = ╱4e╱N╱ // 0x21ff @0x13
0x21ec…220d at0014 = ╱54╱T╱ // 0x2200 @0x14
0x21ec…220d at0015 = ╱41╱A╱ // 0x2201 @0x15
0x21ec…220d at0016 = ╱4c╱L╱ // 0x2202 @0x16
0x21ec…220d at0017 = ╱ef╱$╱ // 0x2203 @0x17
0x21ec…220d at0018 = ╱ec╱,╱ // 0x2204 @0x18
0x21ec…220d at0019 = ╱41╱A╱ // 0x2205 @0x19
0x21ec…220d at001a = ╱4e╱N╱ // 0x2206 @0x1a
0x21ec…220d at001b = ╱54╱T╱ // 0x2207 @0x1b
0x21ec…220d at001c = ╱41╱A╱ // 0x2208 @0x1c
0x21ec…220d at001d = ╱4c╱L╱ // 0x2209 @0x1d
0x21ec…220d at001e = ╱ef╱$╱ // 0x220a @0x1e
0x21ec…220d at001f = ╱ee╱)╱ // 0x220b @0x1f
0x21ec…220d at0020 = EOL // 0x220c @0x20
0x21ec…220d }
0x220d…2222 af79 3790 CURSOR 51,21
0x220d…2222 LineComalBin {
0x220d…2222 ptr = 0xaf79 // 0x220d @0x0
0x220d…2222 lno = 0x0ece // 0x220f @0x2
0x220d…2222 at0004 = ╱a1╱ CURSOR ╱ // 0x2211 @0x4
0x220d…2222 at0005 = ╱35╱5╱ // 0x2212 @0x5
0x220d…2222 at0006 = ╱31╱1╱ // 0x2213 @0x6
0x220d…2222 at0007 = ╱fe0000cc06╱ // 0x2214 @0x7
0x220d…2222 at000c = ╱ec╱,╱ // 0x2219 @0xc
0x220d…2222 at000d = ╱32╱2╱ // 0x221a @0xd
0x220d…2222 at000e = ╱31╱1╱ // 0x221b @0xe
0x220d…2222 at000f = ╱fe0000a805╱ // 0x221c @0xf
0x220d…2222 at0014 = EOL // 0x2221 @0x14
0x220d…2222 }
0x2222…223d af94 3800 EXEC TUD(ANTAL$,TAL4$,E,B)
0x2222…223d LineComalBin {
0x2222…223d ptr = 0xaf94 // 0x2222 @0x0
0x2222…223d lno = 0x0ed8 // 0x2224 @0x2
0x2222…223d at0004 = ╱9d╱ EXEC ╱ // 0x2226 @0x4
0x2222…223d at0005 = ╱54╱T╱ // 0x2227 @0x5
0x2222…223d at0006 = ╱55╱U╱ // 0x2228 @0x6
0x2222…223d at0007 = ╱44╱D╱ // 0x2229 @0x7
0x2222…223d at0008 = ╱ed╱(╱ // 0x222a @0x8
0x2222…223d at0009 = ╱41╱A╱ // 0x222b @0x9
0x2222…223d at000a = ╱4e╱N╱ // 0x222c @0xa
0x2222…223d at000b = ╱54╱T╱ // 0x222d @0xb
0x2222…223d at000c = ╱41╱A╱ // 0x222e @0xc
0x2222…223d at000d = ╱4c╱L╱ // 0x222f @0xd
0x2222…223d at000e = ╱ef╱$╱ // 0x2230 @0xe
0x2222…223d at000f = ╱ec╱,╱ // 0x2231 @0xf
0x2222…223d at0010 = ╱54╱T╱ // 0x2232 @0x10
0x2222…223d at0011 = ╱41╱A╱ // 0x2233 @0x11
0x2222…223d at0012 = ╱4c╱L╱ // 0x2234 @0x12
0x2222…223d at0013 = ╱34╱4╱ // 0x2235 @0x13
0x2222…223d at0014 = ╱ef╱$╱ // 0x2236 @0x14
0x2222…223d at0015 = ╱ec╱,╱ // 0x2237 @0x15
0x2222…223d at0016 = ╱45╱E╱ // 0x2238 @0x16
0x2222…223d at0017 = ╱ec╱,╱ // 0x2239 @0x17
0x2222…223d at0018 = ╱42╱B╱ // 0x223a @0x18
0x2222…223d at0019 = ╱ee╱)╱ // 0x223b @0x19
0x2222…223d at001a = EOL // 0x223c @0x1a
0x2222…223d }
0x223d…225e afb5 3810 EXEC CA(B,ANTAL$,TOTAL$,FTOTAL$)
0x223d…225e LineComalBin {
0x223d…225e ptr = 0xafb5 // 0x223d @0x0
0x223d…225e lno = 0x0ee2 // 0x223f @0x2
0x223d…225e at0004 = ╱9d╱ EXEC ╱ // 0x2241 @0x4
0x223d…225e at0005 = ╱43╱C╱ // 0x2242 @0x5
0x223d…225e at0006 = ╱41╱A╱ // 0x2243 @0x6
0x223d…225e at0007 = ╱ed╱(╱ // 0x2244 @0x7
0x223d…225e at0008 = ╱42╱B╱ // 0x2245 @0x8
0x223d…225e at0009 = ╱ec╱,╱ // 0x2246 @0x9
0x223d…225e at000a = ╱41╱A╱ // 0x2247 @0xa
0x223d…225e at000b = ╱4e╱N╱ // 0x2248 @0xb
0x223d…225e at000c = ╱54╱T╱ // 0x2249 @0xc
0x223d…225e at000d = ╱41╱A╱ // 0x224a @0xd
0x223d…225e at000e = ╱4c╱L╱ // 0x224b @0xe
0x223d…225e at000f = ╱ef╱$╱ // 0x224c @0xf
0x223d…225e at0010 = ╱ec╱,╱ // 0x224d @0x10
0x223d…225e at0011 = ╱54╱T╱ // 0x224e @0x11
0x223d…225e at0012 = ╱4f╱O╱ // 0x224f @0x12
0x223d…225e at0013 = ╱54╱T╱ // 0x2250 @0x13
0x223d…225e at0014 = ╱41╱A╱ // 0x2251 @0x14
0x223d…225e at0015 = ╱4c╱L╱ // 0x2252 @0x15
0x223d…225e at0016 = ╱ef╱$╱ // 0x2253 @0x16
0x223d…225e at0017 = ╱ec╱,╱ // 0x2254 @0x17
0x223d…225e at0018 = ╱46╱F╱ // 0x2255 @0x18
0x223d…225e at0019 = ╱54╱T╱ // 0x2256 @0x19
0x223d…225e at001a = ╱4f╱O╱ // 0x2257 @0x1a
0x223d…225e at001b = ╱54╱T╱ // 0x2258 @0x1b
0x223d…225e at001c = ╱41╱A╱ // 0x2259 @0x1c
0x223d…225e at001d = ╱4c╱L╱ // 0x225a @0x1d
0x223d…225e at001e = ╱ef╱$╱ // 0x225b @0x1e
0x223d…225e at001f = ╱ee╱)╱ // 0x225c @0x1f
0x223d…225e at0020 = EOL // 0x225d @0x20
0x223d…225e }
0x225e…2264 afbb 3820 ELSE
0x225e…2264 LineComalBin {
0x225e…2264 ptr = 0xafbb // 0x225e @0x0
0x225e…2264 lno = 0x0eec // 0x2260 @0x2
0x225e…2264 at0004 = ╱9a╱ ELSE ╱ // 0x2262 @0x4
0x225e…2264 at0005 = EOL // 0x2263 @0x5
0x225e…2264 }
0x2264…2277 afce 3830 FTOTAL$=TOTAL$
0x2264…2277 LineComalBin {
0x2264…2277 ptr = 0xafce // 0x2264 @0x0
0x2264…2277 lno = 0x0ef6 // 0x2266 @0x2
0x2264…2277 at0004 = ╱46╱F╱ // 0x2268 @0x4
0x2264…2277 at0005 = ╱54╱T╱ // 0x2269 @0x5
0x2264…2277 at0006 = ╱4f╱O╱ // 0x226a @0x6
0x2264…2277 at0007 = ╱54╱T╱ // 0x226b @0x7
0x2264…2277 at0008 = ╱41╱A╱ // 0x226c @0x8
0x2264…2277 at0009 = ╱4c╱L╱ // 0x226d @0x9
0x2264…2277 at000a = ╱ef╱$╱ // 0x226e @0xa
0x2264…2277 at000b = ╱dc╱=╱ // 0x226f @0xb
0x2264…2277 at000c = ╱54╱T╱ // 0x2270 @0xc
0x2264…2277 at000d = ╱4f╱O╱ // 0x2271 @0xd
0x2264…2277 at000e = ╱54╱T╱ // 0x2272 @0xe
0x2264…2277 at000f = ╱41╱A╱ // 0x2273 @0xf
0x2264…2277 at0010 = ╱4c╱L╱ // 0x2274 @0x10
0x2264…2277 at0011 = ╱ef╱$╱ // 0x2275 @0x11
0x2264…2277 at0012 = EOL // 0x2276 @0x12
0x2264…2277 }
0x2277…227d afd4 3840 ENDIF
0x2277…227d LineComalBin {
0x2277…227d ptr = 0xafd4 // 0x2277 @0x0
0x2277…227d lno = 0x0f00 // 0x2279 @0x2
0x2277…227d at0004 = ╱9b╱ ENDIF ╱ // 0x227b @0x4
0x2277…227d at0005 = EOL // 0x227c @0x5
0x2277…227d }
0x227d…2292 afe9 3850 CURSOR 66,21
0x227d…2292 LineComalBin {
0x227d…2292 ptr = 0xafe9 // 0x227d @0x0
0x227d…2292 lno = 0x0f0a // 0x227f @0x2
0x227d…2292 at0004 = ╱a1╱ CURSOR ╱ // 0x2281 @0x4
0x227d…2292 at0005 = ╱36╱6╱ // 0x2282 @0x5
0x227d…2292 at0006 = ╱36╱6╱ // 0x2283 @0x6
0x227d…2292 at0007 = ╱fe00008407╱ // 0x2284 @0x7
0x227d…2292 at000c = ╱ec╱,╱ // 0x2289 @0xc
0x227d…2292 at000d = ╱32╱2╱ // 0x228a @0xd
0x227d…2292 at000e = ╱31╱1╱ // 0x228b @0xe
0x227d…2292 at000f = ╱fe0000a805╱ // 0x228c @0xf
0x227d…2292 at0014 = EOL // 0x2291 @0x14
0x227d…2292 }
0x2292…22ae b005 3860 EXEC TUD(FTOTAL$,TAL4$,E,B)
0x2292…22ae LineComalBin {
0x2292…22ae ptr = 0xb005 // 0x2292 @0x0
0x2292…22ae lno = 0x0f14 // 0x2294 @0x2
0x2292…22ae at0004 = ╱9d╱ EXEC ╱ // 0x2296 @0x4
0x2292…22ae at0005 = ╱54╱T╱ // 0x2297 @0x5
0x2292…22ae at0006 = ╱55╱U╱ // 0x2298 @0x6
0x2292…22ae at0007 = ╱44╱D╱ // 0x2299 @0x7
0x2292…22ae at0008 = ╱ed╱(╱ // 0x229a @0x8
0x2292…22ae at0009 = ╱46╱F╱ // 0x229b @0x9
0x2292…22ae at000a = ╱54╱T╱ // 0x229c @0xa
0x2292…22ae at000b = ╱4f╱O╱ // 0x229d @0xb
0x2292…22ae at000c = ╱54╱T╱ // 0x229e @0xc
0x2292…22ae at000d = ╱41╱A╱ // 0x229f @0xd
0x2292…22ae at000e = ╱4c╱L╱ // 0x22a0 @0xe
0x2292…22ae at000f = ╱ef╱$╱ // 0x22a1 @0xf
0x2292…22ae at0010 = ╱ec╱,╱ // 0x22a2 @0x10
0x2292…22ae at0011 = ╱54╱T╱ // 0x22a3 @0x11
0x2292…22ae at0012 = ╱41╱A╱ // 0x22a4 @0x12
0x2292…22ae at0013 = ╱4c╱L╱ // 0x22a5 @0x13
0x2292…22ae at0014 = ╱34╱4╱ // 0x22a6 @0x14
0x2292…22ae at0015 = ╱ef╱$╱ // 0x22a7 @0x15
0x2292…22ae at0016 = ╱ec╱,╱ // 0x22a8 @0x16
0x2292…22ae at0017 = ╱45╱E╱ // 0x22a9 @0x17
0x2292…22ae at0018 = ╱ec╱,╱ // 0x22aa @0x18
0x2292…22ae at0019 = ╱42╱B╱ // 0x22ab @0x19
0x2292…22ae at001a = ╱ee╱)╱ // 0x22ac @0x1a
0x2292…22ae at001b = EOL // 0x22ad @0x1b
0x2292…22ae }
0x22ae…22c1 b018 3870 TOTAL$=GTOTAL$
0x22ae…22c1 LineComalBin {
0x22ae…22c1 ptr = 0xb018 // 0x22ae @0x0
0x22ae…22c1 lno = 0x0f1e // 0x22b0 @0x2
0x22ae…22c1 at0004 = ╱54╱T╱ // 0x22b2 @0x4
0x22ae…22c1 at0005 = ╱4f╱O╱ // 0x22b3 @0x5
0x22ae…22c1 at0006 = ╱54╱T╱ // 0x22b4 @0x6
0x22ae…22c1 at0007 = ╱41╱A╱ // 0x22b5 @0x7
0x22ae…22c1 at0008 = ╱4c╱L╱ // 0x22b6 @0x8
0x22ae…22c1 at0009 = ╱ef╱$╱ // 0x22b7 @0x9
0x22ae…22c1 at000a = ╱dc╱=╱ // 0x22b8 @0xa
0x22ae…22c1 at000b = ╱47╱G╱ // 0x22b9 @0xb
0x22ae…22c1 at000c = ╱54╱T╱ // 0x22ba @0xc
0x22ae…22c1 at000d = ╱4f╱O╱ // 0x22bb @0xd
0x22ae…22c1 at000e = ╱54╱T╱ // 0x22bc @0xe
0x22ae…22c1 at000f = ╱41╱A╱ // 0x22bd @0xf
0x22ae…22c1 at0010 = ╱4c╱L╱ // 0x22be @0x10
0x22ae…22c1 at0011 = ╱ef╱$╱ // 0x22bf @0x11
0x22ae…22c1 at0012 = EOL // 0x22c0 @0x12
0x22ae…22c1 }
0x22c1…22f4 b04b 3880 EXEC INDPUT1(9,23,-9,-6,LTX2$)
0x22c1…22f4 LineComalBin {
0x22c1…22f4 ptr = 0xb04b // 0x22c1 @0x0
0x22c1…22f4 lno = 0x0f28 // 0x22c3 @0x2
0x22c1…22f4 at0004 = ╱9d╱ EXEC ╱ // 0x22c5 @0x4
0x22c1…22f4 at0005 = ╱49╱I╱ // 0x22c6 @0x5
0x22c1…22f4 at0006 = ╱4e╱N╱ // 0x22c7 @0x6
0x22c1…22f4 at0007 = ╱44╱D╱ // 0x22c8 @0x7
0x22c1…22f4 at0008 = ╱50╱P╱ // 0x22c9 @0x8
0x22c1…22f4 at0009 = ╱55╱U╱ // 0x22ca @0x9
0x22c1…22f4 at000a = ╱54╱T╱ // 0x22cb @0xa
0x22c1…22f4 at000b = ╱31╱1╱ // 0x22cc @0xb
0x22c1…22f4 at000c = ╱ed╱(╱ // 0x22cd @0xc
0x22c1…22f4 at000d = ╱39╱9╱ // 0x22ce @0xd
0x22c1…22f4 at000e = ╱fe00009004╱ // 0x22cf @0xe
0x22c1…22f4 at0013 = ╱ec╱,╱ // 0x22d4 @0x13
0x22c1…22f4 at0014 = ╱32╱2╱ // 0x22d5 @0x14
0x22c1…22f4 at0015 = ╱33╱3╱ // 0x22d6 @0x15
0x22c1…22f4 at0016 = ╱fe0000b805╱ // 0x22d7 @0x16
0x22c1…22f4 at001b = ╱ec╱,╱ // 0x22dc @0x1b
0x22c1…22f4 at001c = ╱e9╱-╱ // 0x22dd @0x1c
0x22c1…22f4 at001d = ╱39╱9╱ // 0x22de @0x1d
0x22c1…22f4 at001e = ╱fe00009004╱ // 0x22df @0x1e
0x22c1…22f4 at0023 = ╱ec╱,╱ // 0x22e4 @0x23
0x22c1…22f4 at0024 = ╱e9╱-╱ // 0x22e5 @0x24
0x22c1…22f4 at0025 = ╱36╱6╱ // 0x22e6 @0x25
0x22c1…22f4 at0026 = ╱fe0000c003╱ // 0x22e7 @0x26
0x22c1…22f4 at002b = ╱ec╱,╱ // 0x22ec @0x2b
0x22c1…22f4 at002c = ╱4c╱L╱ // 0x22ed @0x2c
0x22c1…22f4 at002d = ╱54╱T╱ // 0x22ee @0x2d
0x22c1…22f4 at002e = ╱58╱X╱ // 0x22ef @0x2e
0x22c1…22f4 at002f = ╱32╱2╱ // 0x22f0 @0x2f
0x22c1…22f4 at0030 = ╱ef╱$╱ // 0x22f1 @0x30
0x22c1…22f4 at0031 = ╱ee╱)╱ // 0x22f2 @0x31
0x22c1…22f4 at0032 = EOL // 0x22f3 @0x32
0x22c1…22f4 }
0x22f4…2303 b05a 3890 UNTIL P=-7
0x22f4…2303 LineComalBin {
0x22f4…2303 ptr = 0xb05a // 0x22f4 @0x0
0x22f4…2303 lno = 0x0f32 // 0x22f6 @0x2
0x22f4…2303 at0004 = ╱98╱ UNTIL ╱ // 0x22f8 @0x4
0x22f4…2303 at0005 = ╱50╱P╱ // 0x22f9 @0x5
0x22f4…2303 at0006 = ╱dc╱=╱ // 0x22fa @0x6
0x22f4…2303 at0007 = ╱e9╱-╱ // 0x22fb @0x7
0x22f4…2303 at0008 = ╱37╱7╱ // 0x22fc @0x8
0x22f4…2303 at0009 = ╱fe0000e003╱ // 0x22fd @0x9
0x22f4…2303 at000e = EOL // 0x2302 @0xe
0x22f4…2303 }
0x2303…2309 b060 3900 ENDPROC
0x2303…2309 LineComalBin {
0x2303…2309 ptr = 0xb060 // 0x2303 @0x0
0x2303…2309 lno = 0x0f3c // 0x2305 @0x2
0x2303…2309 at0004 = ╱9f╱ ENDPROC ╱ // 0x2307 @0x4
0x2303…2309 at0005 = EOL // 0x2308 @0x5
0x2303…2309 }
0x2309…2313 b06a 3910 PROC SLET
0x2309…2313 LineComalBin {
0x2309…2313 ptr = 0xb06a // 0x2309 @0x0
0x2309…2313 lno = 0x0f46 // 0x230b @0x2
0x2309…2313 at0004 = ╱9e╱ PROC ╱ // 0x230d @0x4
0x2309…2313 at0005 = ╱53╱S╱ // 0x230e @0x5
0x2309…2313 at0006 = ╱4c╱L╱ // 0x230f @0x6
0x2309…2313 at0007 = ╱45╱E╱ // 0x2310 @0x7
0x2309…2313 at0008 = ╱54╱T╱ // 0x2311 @0x8
0x2309…2313 at0009 = EOL // 0x2312 @0x9
0x2309…2313 }
0x2313…2322 b079 3920 CURSOR G,19
0x2313…2322 LineComalBin {
0x2313…2322 ptr = 0xb079 // 0x2313 @0x0
0x2313…2322 lno = 0x0f50 // 0x2315 @0x2
0x2313…2322 at0004 = ╱a1╱ CURSOR ╱ // 0x2317 @0x4
0x2313…2322 at0005 = ╱47╱G╱ // 0x2318 @0x5
0x2313…2322 at0006 = ╱ec╱,╱ // 0x2319 @0x6
0x2313…2322 at0007 = ╱31╱1╱ // 0x231a @0x7
0x2313…2322 at0008 = ╱39╱9╱ // 0x231b @0x8
0x2313…2322 at0009 = ╱fe00009805╱ // 0x231c @0x9
0x2313…2322 at000e = EOL // 0x2321 @0xe
0x2313…2322 }
0x2322…232b b082 3930 PRINT BK$
0x2322…232b LineComalBin {
0x2322…232b ptr = 0xb082 // 0x2322 @0x0
0x2322…232b lno = 0x0f5a // 0x2324 @0x2
0x2322…232b at0004 = ╱92╱ PRINT ╱ // 0x2326 @0x4
0x2322…232b at0005 = ╱42╱B╱ // 0x2327 @0x5
0x2322…232b at0006 = ╱4b╱K╱ // 0x2328 @0x6
0x2322…232b at0007 = ╱ef╱$╱ // 0x2329 @0x7
0x2322…232b at0008 = EOL // 0x232a @0x8
0x2322…232b }
0x232b…233a b091 3940 CURSOR G,21
0x232b…233a LineComalBin {
0x232b…233a ptr = 0xb091 // 0x232b @0x0
0x232b…233a lno = 0x0f64 // 0x232d @0x2
0x232b…233a at0004 = ╱a1╱ CURSOR ╱ // 0x232f @0x4
0x232b…233a at0005 = ╱47╱G╱ // 0x2330 @0x5
0x232b…233a at0006 = ╱ec╱,╱ // 0x2331 @0x6
0x232b…233a at0007 = ╱32╱2╱ // 0x2332 @0x7
0x232b…233a at0008 = ╱31╱1╱ // 0x2333 @0x8
0x232b…233a at0009 = ╱fe0000a805╱ // 0x2334 @0x9
0x232b…233a at000e = EOL // 0x2339 @0xe
0x232b…233a }
0x233a…2343 b09a 3950 PRINT BK$
0x233a…2343 LineComalBin {
0x233a…2343 ptr = 0xb09a // 0x233a @0x0
0x233a…2343 lno = 0x0f6e // 0x233c @0x2
0x233a…2343 at0004 = ╱92╱ PRINT ╱ // 0x233e @0x4
0x233a…2343 at0005 = ╱42╱B╱ // 0x233f @0x5
0x233a…2343 at0006 = ╱4b╱K╱ // 0x2340 @0x6
0x233a…2343 at0007 = ╱ef╱$╱ // 0x2341 @0x7
0x233a…2343 at0008 = EOL // 0x2342 @0x8
0x233a…2343 }
0x2343…2352 b0a9 3960 CURSOR G,23
0x2343…2352 LineComalBin {
0x2343…2352 ptr = 0xb0a9 // 0x2343 @0x0
0x2343…2352 lno = 0x0f78 // 0x2345 @0x2
0x2343…2352 at0004 = ╱a1╱ CURSOR ╱ // 0x2347 @0x4
0x2343…2352 at0005 = ╱47╱G╱ // 0x2348 @0x5
0x2343…2352 at0006 = ╱ec╱,╱ // 0x2349 @0x6
0x2343…2352 at0007 = ╱32╱2╱ // 0x234a @0x7
0x2343…2352 at0008 = ╱33╱3╱ // 0x234b @0x8
0x2343…2352 at0009 = ╱fe0000b805╱ // 0x234c @0x9
0x2343…2352 at000e = EOL // 0x2351 @0xe
0x2343…2352 }
0x2352…235b b0b2 3970 PRINT BK$
0x2352…235b LineComalBin {
0x2352…235b ptr = 0xb0b2 // 0x2352 @0x0
0x2352…235b lno = 0x0f82 // 0x2354 @0x2
0x2352…235b at0004 = ╱92╱ PRINT ╱ // 0x2356 @0x4
0x2352…235b at0005 = ╱42╱B╱ // 0x2357 @0x5
0x2352…235b at0006 = ╱4b╱K╱ // 0x2358 @0x6
0x2352…235b at0007 = ╱ef╱$╱ // 0x2359 @0x7
0x2352…235b at0008 = EOL // 0x235a @0x8
0x2352…235b }
0x235b…2361 b0b8 3980 ENDPROC
0x235b…2361 LineComalBin {
0x235b…2361 ptr = 0xb0b8 // 0x235b @0x0
0x235b…2361 lno = 0x0f8c // 0x235d @0x2
0x235b…2361 at0004 = ╱9f╱ ENDPROC ╱ // 0x235f @0x4
0x235b…2361 at0005 = EOL // 0x2360 @0x5
0x235b…2361 }
0x2361…236a b0c1 3990 PROC LUD
0x2361…236a LineComalBin {
0x2361…236a ptr = 0xb0c1 // 0x2361 @0x0
0x2361…236a lno = 0x0f96 // 0x2363 @0x2
0x2361…236a at0004 = ╱9e╱ PROC ╱ // 0x2365 @0x4
0x2361…236a at0005 = ╱4c╱L╱ // 0x2366 @0x5
0x2361…236a at0006 = ╱55╱U╱ // 0x2367 @0x6
0x2361…236a at0007 = ╱44╱D╱ // 0x2368 @0x7
0x2361…236a at0008 = EOL // 0x2369 @0x8
0x2361…236a }
0x236a…2370 b0c7 4000 CLEAR
0x236a…2370 LineComalBin {
0x236a…2370 ptr = 0xb0c7 // 0x236a @0x0
0x236a…2370 lno = 0x0fa0 // 0x236c @0x2
0x236a…2370 at0004 = ╱a0╱ CLEAR ╱ // 0x236e @0x4
0x236a…2370 at0005 = EOL // 0x236f @0x5
0x236a…2370 }
0x2370…237e b0d5 4010 EXEC FAKHOVED
0x2370…237e LineComalBin {
0x2370…237e ptr = 0xb0d5 // 0x2370 @0x0
0x2370…237e lno = 0x0faa // 0x2372 @0x2
0x2370…237e at0004 = ╱9d╱ EXEC ╱ // 0x2374 @0x4
0x2370…237e at0005 = ╱46╱F╱ // 0x2375 @0x5
0x2370…237e at0006 = ╱41╱A╱ // 0x2376 @0x6
0x2370…237e at0007 = ╱4b╱K╱ // 0x2377 @0x7
0x2370…237e at0008 = ╱48╱H╱ // 0x2378 @0x8
0x2370…237e at0009 = ╱4f╱O╱ // 0x2379 @0x9
0x2370…237e at000a = ╱56╱V╱ // 0x237a @0xa
0x2370…237e at000b = ╱45╱E╱ // 0x237b @0xb
0x2370…237e at000c = ╱44╱D╱ // 0x237c @0xc
0x2370…237e at000d = EOL // 0x237d @0xd
0x2370…237e }
0x237e…2396 (118,) b0ed 4020 FOR LIE=5 TO 16
0x237e…2396 LineComalBin {
0x237e…2396 ptr = 0xb0ed // 0x237e @0x0
0x237e…2396 lno = 0x0fb4 // 0x2380 @0x2
0x237e…2396 at0004 = ╱83╱ FOR ╱ // 0x2382 @0x4
0x237e…2396 at0005 = ╱4c╱L╱ // 0x2383 @0x5
0x237e…2396 at0006 = ╱49╱I╱ // 0x2384 @0x6
0x237e…2396 at0007 = ╱45╱E╱ // 0x2385 @0x7
0x237e…2396 at0008 = ╱dc╱=╱ // 0x2386 @0x8
0x237e…2396 at0009 = ╱35╱5╱ // 0x2387 @0x9
0x237e…2396 at000a = ╱fe0000a003╱ // 0x2388 @0xa
0x237e…2396 at000f = ╱b7╱ TO ╱ // 0x238d @0xf
0x237e…2396 at0010 = ╱31╱1╱ // 0x238e @0x10
0x237e…2396 at0011 = ╱36╱6╱ // 0x238f @0x11
0x237e…2396 at0012 = ╱fe00008005╱ // 0x2390 @0x12
0x237e…2396 at0017 = EOL // 0x2395 @0x17
0x237e…2396 }
0x2396…23a7 b0fe 4030 EXEC VUD(STARTL)
0x2396…23a7 LineComalBin {
0x2396…23a7 ptr = 0xb0fe // 0x2396 @0x0
0x2396…23a7 lno = 0x0fbe // 0x2398 @0x2
0x2396…23a7 at0004 = ╱9d╱ EXEC ╱ // 0x239a @0x4
0x2396…23a7 at0005 = ╱56╱V╱ // 0x239b @0x5
0x2396…23a7 at0006 = ╱55╱U╱ // 0x239c @0x6
0x2396…23a7 at0007 = ╱44╱D╱ // 0x239d @0x7
0x2396…23a7 at0008 = ╱ed╱(╱ // 0x239e @0x8
0x2396…23a7 at0009 = ╱53╱S╱ // 0x239f @0x9
0x2396…23a7 at000a = ╱54╱T╱ // 0x23a0 @0xa
0x2396…23a7 at000b = ╱41╱A╱ // 0x23a1 @0xb
0x2396…23a7 at000c = ╱52╱R╱ // 0x23a2 @0xc
0x2396…23a7 at000d = ╱54╱T╱ // 0x23a3 @0xd
0x2396…23a7 at000e = ╱4c╱L╱ // 0x23a4 @0xe
0x2396…23a7 at000f = ╱ee╱)╱ // 0x23a5 @0xf
0x2396…23a7 at0010 = EOL // 0x23a6 @0x10
0x2396…23a7 }
0x23a7…23bb b112 4040 STARTL=STARTL+E
0x23a7…23bb LineComalBin {
0x23a7…23bb ptr = 0xb112 // 0x23a7 @0x0
0x23a7…23bb lno = 0x0fc8 // 0x23a9 @0x2
0x23a7…23bb at0004 = ╱53╱S╱ // 0x23ab @0x4
0x23a7…23bb at0005 = ╱54╱T╱ // 0x23ac @0x5
0x23a7…23bb at0006 = ╱41╱A╱ // 0x23ad @0x6
0x23a7…23bb at0007 = ╱52╱R╱ // 0x23ae @0x7
0x23a7…23bb at0008 = ╱54╱T╱ // 0x23af @0x8
0x23a7…23bb at0009 = ╱4c╱L╱ // 0x23b0 @0x9
0x23a7…23bb at000a = ╱dc╱=╱ // 0x23b1 @0xa
0x23a7…23bb at000b = ╱53╱S╱ // 0x23b2 @0xb
0x23a7…23bb at000c = ╱54╱T╱ // 0x23b3 @0xc
0x23a7…23bb at000d = ╱41╱A╱ // 0x23b4 @0xd
0x23a7…23bb at000e = ╱52╱R╱ // 0x23b5 @0xe
0x23a7…23bb at000f = ╱54╱T╱ // 0x23b6 @0xf
0x23a7…23bb at0010 = ╱4c╱L╱ // 0x23b7 @0x10
0x23a7…23bb at0011 = ╱e2╱+╱ // 0x23b8 @0x11
0x23a7…23bb at0012 = ╱45╱E╱ // 0x23b9 @0x12
0x23a7…23bb at0013 = EOL // 0x23ba @0x13
0x23a7…23bb }
0x23bb…23cf b126 4050 IF STARTL>SLUTL THEN EXIT
0x23bb…23cf LineComalBin {
0x23bb…23cf ptr = 0xb126 // 0x23bb @0x0
0x23bb…23cf lno = 0x0fd2 // 0x23bd @0x2
0x23bb…23cf at0004 = ╱82╱ IF ╱ // 0x23bf @0x4
0x23bb…23cf at0005 = ╱53╱S╱ // 0x23c0 @0x5
0x23bb…23cf at0006 = ╱54╱T╱ // 0x23c1 @0x6
0x23bb…23cf at0007 = ╱41╱A╱ // 0x23c2 @0x7
0x23bb…23cf at0008 = ╱52╱R╱ // 0x23c3 @0x8
0x23bb…23cf at0009 = ╱54╱T╱ // 0x23c4 @0x9
0x23bb…23cf at000a = ╱4c╱L╱ // 0x23c5 @0xa
0x23bb…23cf at000b = ╱de╱>╱ // 0x23c6 @0xb
0x23bb…23cf at000c = ╱53╱S╱ // 0x23c7 @0xc
0x23bb…23cf at000d = ╱4c╱L╱ // 0x23c8 @0xd
0x23bb…23cf at000e = ╱55╱U╱ // 0x23c9 @0xe
0x23bb…23cf at000f = ╱54╱T╱ // 0x23ca @0xf
0x23bb…23cf at0010 = ╱4c╱L╱ // 0x23cb @0x10
0x23bb…23cf at0011 = ╱b6╱ THEN ╱ // 0x23cc @0x11
0x23bb…23cf at0012 = ╱99╱ EXIT ╱ // 0x23cd @0x12
0x23bb…23cf at0013 = EOL // 0x23ce @0x13
0x23bb…23cf }
0x23cf…23d8 b12f 4060 NEXT LIE
0x23cf…23d8 LineComalBin {
0x23cf…23d8 ptr = 0xb12f // 0x23cf @0x0
0x23cf…23d8 lno = 0x0fdc // 0x23d1 @0x2
0x23cf…23d8 at0004 = ╱84╱ NEXT ╱ // 0x23d3 @0x4
0x23cf…23d8 at0005 = ╱4c╱L╱ // 0x23d4 @0x5
0x23cf…23d8 at0006 = ╱49╱I╱ // 0x23d5 @0x6
0x23cf…23d8 at0007 = ╱45╱E╱ // 0x23d6 @0x7
0x23cf…23d8 at0008 = EOL // 0x23d7 @0x8
0x23cf…23d8 }
0x23d8…23de b135 4070 ENDPROC
0x23d8…23de LineComalBin {
0x23d8…23de ptr = 0xb135 // 0x23d8 @0x0
0x23d8…23de lno = 0x0fe6 // 0x23da @0x2
0x23d8…23de at0004 = ╱9f╱ ENDPROC ╱ // 0x23dc @0x4
0x23d8…23de at0005 = EOL // 0x23dd @0x5
0x23d8…23de }
0x23de…23e9 b140 4080 PROC AJOUR
0x23de…23e9 LineComalBin {
0x23de…23e9 ptr = 0xb140 // 0x23de @0x0
0x23de…23e9 lno = 0x0ff0 // 0x23e0 @0x2
0x23de…23e9 at0004 = ╱9e╱ PROC ╱ // 0x23e2 @0x4
0x23de…23e9 at0005 = ╱41╱A╱ // 0x23e3 @0x5
0x23de…23e9 at0006 = ╱4a╱J╱ // 0x23e4 @0x6
0x23de…23e9 at0007 = ╱4f╱O╱ // 0x23e5 @0x7
0x23de…23e9 at0008 = ╱55╱U╱ // 0x23e6 @0x8
0x23de…23e9 at0009 = ╱52╱R╱ // 0x23e7 @0x9
0x23de…23e9 at000a = EOL // 0x23e8 @0xa
0x23de…23e9 }
0x23e9…23f9 b150 4090 TOTAL$="0+"
0x23e9…23f9 LineComalBin {
0x23e9…23f9 ptr = 0xb150 // 0x23e9 @0x0
0x23e9…23f9 lno = 0x0ffa // 0x23eb @0x2
0x23e9…23f9 at0004 = ╱54╱T╱ // 0x23ed @0x4
0x23e9…23f9 at0005 = ╱4f╱O╱ // 0x23ee @0x5
0x23e9…23f9 at0006 = ╱54╱T╱ // 0x23ef @0x6
0x23e9…23f9 at0007 = ╱41╱A╱ // 0x23f0 @0x7
0x23e9…23f9 at0008 = ╱4c╱L╱ // 0x23f1 @0x8
0x23e9…23f9 at0009 = ╱ef╱$╱ // 0x23f2 @0x9
0x23e9…23f9 at000a = ╱dc╱=╱ // 0x23f3 @0xa
0x23e9…23f9 at000b = ╱22╱"╱ // 0x23f4 @0xb
0x23e9…23f9 at000c = ╱30╱0╱ // 0x23f5 @0xc
0x23e9…23f9 at000d = ╱2b╱+╱ // 0x23f6 @0xd
0x23e9…23f9 at000e = ╱22╱"╱ // 0x23f7 @0xe
0x23e9…23f9 at000f = EOL // 0x23f8 @0xf
0x23e9…23f9 }
0x23f9…2407 b15e 4100 FOR M=E TO VLIN
0x23f9…2407 LineComalBin {
0x23f9…2407 ptr = 0xb15e // 0x23f9 @0x0
0x23f9…2407 lno = 0x1004 // 0x23fb @0x2
0x23f9…2407 at0004 = ╱83╱ FOR ╱ // 0x23fd @0x4
0x23f9…2407 at0005 = ╱4d╱M╱ // 0x23fe @0x5
0x23f9…2407 at0006 = ╱dc╱=╱ // 0x23ff @0x6
0x23f9…2407 at0007 = ╱45╱E╱ // 0x2400 @0x7
0x23f9…2407 at0008 = ╱b7╱ TO ╱ // 0x2401 @0x8
0x23f9…2407 at0009 = ╱56╱V╱ // 0x2402 @0x9
0x23f9…2407 at000a = ╱4c╱L╱ // 0x2403 @0xa
0x23f9…2407 at000b = ╱49╱I╱ // 0x2404 @0xb
0x23f9…2407 at000c = ╱4e╱N╱ // 0x2405 @0xc
0x23f9…2407 at000d = EOL // 0x2406 @0xd
0x23f9…2407 }
0x2407…2417 b16e 4110 CASE VNARR(M) OF
0x2407…2417 LineComalBin {
0x2407…2417 ptr = 0xb16e // 0x2407 @0x0
0x2407…2417 lno = 0x100e // 0x2409 @0x2
0x2407…2417 at0004 = ╱a201╱ CASE ╱ // 0x240b @0x4
0x2407…2417 at0006 = ╱56╱V╱ // 0x240d @0x6
0x2407…2417 at0007 = ╱4e╱N╱ // 0x240e @0x7
0x2407…2417 at0008 = ╱41╱A╱ // 0x240f @0x8
0x2407…2417 at0009 = ╱52╱R╱ // 0x2410 @0x9
0x2407…2417 at000a = ╱52╱R╱ // 0x2411 @0xa
0x2407…2417 at000b = ╱ed╱(╱ // 0x2412 @0xb
0x2407…2417 at000c = ╱4d╱M╱ // 0x2413 @0xc
0x2407…2417 at000d = ╱ee╱)╱ // 0x2414 @0xd
0x2407…2417 at000e = ╱ba╱ OF ╱ // 0x2415 @0xe
0x2407…2417 at000f = EOL // 0x2416 @0xf
0x2407…2417 }
0x2417…243a b191 4120 EXEC CA(B,TOTAL$,BLARR$(M),TOTAL$)
0x2417…243a LineComalBin {
0x2417…243a ptr = 0xb191 // 0x2417 @0x0
0x2417…243a lno = 0x1018 // 0x2419 @0x2
0x2417…243a at0004 = ╱9d╱ EXEC ╱ // 0x241b @0x4
0x2417…243a at0005 = ╱43╱C╱ // 0x241c @0x5
0x2417…243a at0006 = ╱41╱A╱ // 0x241d @0x6
0x2417…243a at0007 = ╱ed╱(╱ // 0x241e @0x7
0x2417…243a at0008 = ╱42╱B╱ // 0x241f @0x8
0x2417…243a at0009 = ╱ec╱,╱ // 0x2420 @0x9
0x2417…243a at000a = ╱54╱T╱ // 0x2421 @0xa
0x2417…243a at000b = ╱4f╱O╱ // 0x2422 @0xb
0x2417…243a at000c = ╱54╱T╱ // 0x2423 @0xc
0x2417…243a at000d = ╱41╱A╱ // 0x2424 @0xd
0x2417…243a at000e = ╱4c╱L╱ // 0x2425 @0xe
0x2417…243a at000f = ╱ef╱$╱ // 0x2426 @0xf
0x2417…243a at0010 = ╱ec╱,╱ // 0x2427 @0x10
0x2417…243a at0011 = ╱42╱B╱ // 0x2428 @0x11
0x2417…243a at0012 = ╱4c╱L╱ // 0x2429 @0x12
0x2417…243a at0013 = ╱41╱A╱ // 0x242a @0x13
0x2417…243a at0014 = ╱52╱R╱ // 0x242b @0x14
0x2417…243a at0015 = ╱52╱R╱ // 0x242c @0x15
0x2417…243a at0016 = ╱ef╱$╱ // 0x242d @0x16
0x2417…243a at0017 = ╱ed╱(╱ // 0x242e @0x17
0x2417…243a at0018 = ╱4d╱M╱ // 0x242f @0x18
0x2417…243a at0019 = ╱ee╱)╱ // 0x2430 @0x19
0x2417…243a at001a = ╱ec╱,╱ // 0x2431 @0x1a
0x2417…243a at001b = ╱54╱T╱ // 0x2432 @0x1b
0x2417…243a at001c = ╱4f╱O╱ // 0x2433 @0x1c
0x2417…243a at001d = ╱54╱T╱ // 0x2434 @0x1d
0x2417…243a at001e = ╱41╱A╱ // 0x2435 @0x1e
0x2417…243a at001f = ╱4c╱L╱ // 0x2436 @0x1f
0x2417…243a at0020 = ╱ef╱$╱ // 0x2437 @0x20
0x2417…243a at0021 = ╱ee╱)╱ // 0x2438 @0x21
0x2417…243a at0022 = EOL // 0x2439 @0x22
0x2417…243a }
0x243a…2442 b199 4130 WHEN G
0x243a…2442 LineComalBin {
0x243a…2442 ptr = 0xb199 // 0x243a @0x0
0x243a…2442 lno = 0x1022 // 0x243c @0x2
0x243a…2442 at0004 = ╱a301╱ WHEN ╱ // 0x243e @0x4
0x243a…2442 at0006 = ╱47╱G╱ // 0x2440 @0x6
0x243a…2442 at0007 = EOL // 0x2441 @0x7
0x243a…2442 }
0x2442…244f b1a6 4140 WHEN 4
0x2442…244f LineComalBin {
0x2442…244f ptr = 0xb1a6 // 0x2442 @0x0
0x2442…244f lno = 0x102c // 0x2444 @0x2
0x2442…244f at0004 = ╱a301╱ WHEN ╱ // 0x2446 @0x4
0x2442…244f at0006 = ╱34╱4╱ // 0x2448 @0x6
0x2442…244f at0007 = ╱fe00008003╱ // 0x2449 @0x7
0x2442…244f at000c = EOL // 0x244e @0xc
0x2442…244f }
0x244f…2464 b1bb 4150 BLARR$(M)=TOTAL$
0x244f…2464 LineComalBin {
0x244f…2464 ptr = 0xb1bb // 0x244f @0x0
0x244f…2464 lno = 0x1036 // 0x2451 @0x2
0x244f…2464 at0004 = ╱42╱B╱ // 0x2453 @0x4
0x244f…2464 at0005 = ╱4c╱L╱ // 0x2454 @0x5
0x244f…2464 at0006 = ╱41╱A╱ // 0x2455 @0x6
0x244f…2464 at0007 = ╱52╱R╱ // 0x2456 @0x7
0x244f…2464 at0008 = ╱52╱R╱ // 0x2457 @0x8
0x244f…2464 at0009 = ╱ef╱$╱ // 0x2458 @0x9
0x244f…2464 at000a = ╱ed╱(╱ // 0x2459 @0xa
0x244f…2464 at000b = ╱4d╱M╱ // 0x245a @0xb
0x244f…2464 at000c = ╱ee╱)╱ // 0x245b @0xc
0x244f…2464 at000d = ╱dc╱=╱ // 0x245c @0xd
0x244f…2464 at000e = ╱54╱T╱ // 0x245d @0xe
0x244f…2464 at000f = ╱4f╱O╱ // 0x245e @0xf
0x244f…2464 at0010 = ╱54╱T╱ // 0x245f @0x10
0x244f…2464 at0011 = ╱41╱A╱ // 0x2460 @0x11
0x244f…2464 at0012 = ╱4c╱L╱ // 0x2461 @0x12
0x244f…2464 at0013 = ╱ef╱$╱ // 0x2462 @0x13
0x244f…2464 at0014 = EOL // 0x2463 @0x14
0x244f…2464 }
0x2464…246c b1c3 4160 WHEN V
0x2464…246c LineComalBin {
0x2464…246c ptr = 0xb1c3 // 0x2464 @0x0
0x2464…246c lno = 0x1040 // 0x2466 @0x2
0x2464…246c at0004 = ╱a301╱ WHEN ╱ // 0x2468 @0x4
0x2464…246c at0006 = ╱56╱V╱ // 0x246a @0x6
0x2464…246c at0007 = EOL // 0x246b @0x7
0x2464…246c }
0x246c…24ab b202 4170 VPRI$=" ,"+VTARR$(M,7:G)+VTARR$(M,10:G)+"-"
0x246c…24ab LineComalBin {
0x246c…24ab ptr = 0xb202 // 0x246c @0x0
0x246c…24ab lno = 0x104a // 0x246e @0x2
0x246c…24ab at0004 = ╱56╱V╱ // 0x2470 @0x4
0x246c…24ab at0005 = ╱50╱P╱ // 0x2471 @0x5
0x246c…24ab at0006 = ╱52╱R╱ // 0x2472 @0x6
0x246c…24ab at0007 = ╱49╱I╱ // 0x2473 @0x7
0x246c…24ab at0008 = ╱ef╱$╱ // 0x2474 @0x8
0x246c…24ab at0009 = ╱dc╱=╱ // 0x2475 @0x9
0x246c…24ab at000a = ╱22╱"╱ // 0x2476 @0xa
0x246c…24ab at000b = ╱20╱…╱ // 0x2477 @0xb
0x246c…24ab at000c = ╱20╱…╱ // 0x2478 @0xc
0x246c…24ab at000d = ╱20╱…╱ // 0x2479 @0xd
0x246c…24ab at000e = ╱20╱…╱ // 0x247a @0xe
0x246c…24ab at000f = ╱20╱…╱ // 0x247b @0xf
0x246c…24ab at0010 = ╱20╱…╱ // 0x247c @0x10
0x246c…24ab at0011 = ╱2c╱,╱ // 0x247d @0x11
0x246c…24ab at0012 = ╱22╱"╱ // 0x247e @0x12
0x246c…24ab at0013 = ╱f1╱+╱ // 0x247f @0x13
0x246c…24ab at0014 = ╱56╱V╱ // 0x2480 @0x14
0x246c…24ab at0015 = ╱54╱T╱ // 0x2481 @0x15
0x246c…24ab at0016 = ╱41╱A╱ // 0x2482 @0x16
0x246c…24ab at0017 = ╱52╱R╱ // 0x2483 @0x17
0x246c…24ab at0018 = ╱52╱R╱ // 0x2484 @0x18
0x246c…24ab at0019 = ╱ef╱$╱ // 0x2485 @0x19
0x246c…24ab at001a = ╱ed╱(╱ // 0x2486 @0x1a
0x246c…24ab at001b = ╱4d╱M╱ // 0x2487 @0x1b
0x246c…24ab at001c = ╱ec╱,╱ // 0x2488 @0x1c
0x246c…24ab at001d = ╱37╱7╱ // 0x2489 @0x1d
0x246c…24ab at001e = ╱fe0000e003╱ // 0x248a @0x1e
0x246c…24ab at0023 = ╱f0╱:╱ // 0x248f @0x23
0x246c…24ab at0024 = ╱47╱G╱ // 0x2490 @0x24
0x246c…24ab at0025 = ╱ee╱)╱ // 0x2491 @0x25
0x246c…24ab at0026 = ╱f1╱+╱ // 0x2492 @0x26
0x246c…24ab at0027 = ╱56╱V╱ // 0x2493 @0x27
0x246c…24ab at0028 = ╱54╱T╱ // 0x2494 @0x28
0x246c…24ab at0029 = ╱41╱A╱ // 0x2495 @0x29
0x246c…24ab at002a = ╱52╱R╱ // 0x2496 @0x2a
0x246c…24ab at002b = ╱52╱R╱ // 0x2497 @0x2b
0x246c…24ab at002c = ╱ef╱$╱ // 0x2498 @0x2c
0x246c…24ab at002d = ╱ed╱(╱ // 0x2499 @0x2d
0x246c…24ab at002e = ╱4d╱M╱ // 0x249a @0x2e
0x246c…24ab at002f = ╱ec╱,╱ // 0x249b @0x2f
0x246c…24ab at0030 = ╱31╱1╱ // 0x249c @0x30
0x246c…24ab at0031 = ╱30╱0╱ // 0x249d @0x31
0x246c…24ab at0032 = ╱fe0000a004╱ // 0x249e @0x32
0x246c…24ab at0037 = ╱f0╱:╱ // 0x24a3 @0x37
0x246c…24ab at0038 = ╱47╱G╱ // 0x24a4 @0x38
0x246c…24ab at0039 = ╱ee╱)╱ // 0x24a5 @0x39
0x246c…24ab at003a = ╱f1╱+╱ // 0x24a6 @0x3a
0x246c…24ab at003b = ╱22╱"╱ // 0x24a7 @0x3b
0x246c…24ab at003c = ╱2d╱-╱ // 0x24a8 @0x3c
0x246c…24ab at003d = ╱22╱"╱ // 0x24a9 @0x3d
0x246c…24ab at003e = EOL // 0x24aa @0x3e
0x246c…24ab }
0x24ab…24d4 b22b 4180 IF VPRI$(8)=" " THEN VPRI$(8)="0"
0x24ab…24d4 LineComalBin {
0x24ab…24d4 ptr = 0xb22b // 0x24ab @0x0
0x24ab…24d4 lno = 0x1054 // 0x24ad @0x2
0x24ab…24d4 at0004 = ╱82╱ IF ╱ // 0x24af @0x4
0x24ab…24d4 at0005 = ╱56╱V╱ // 0x24b0 @0x5
0x24ab…24d4 at0006 = ╱50╱P╱ // 0x24b1 @0x6
0x24ab…24d4 at0007 = ╱52╱R╱ // 0x24b2 @0x7
0x24ab…24d4 at0008 = ╱49╱I╱ // 0x24b3 @0x8
0x24ab…24d4 at0009 = ╱ef╱$╱ // 0x24b4 @0x9
0x24ab…24d4 at000a = ╱ed╱(╱ // 0x24b5 @0xa
0x24ab…24d4 at000b = ╱38╱8╱ // 0x24b6 @0xb
0x24ab…24d4 at000c = ╱fe00008004╱ // 0x24b7 @0xc
0x24ab…24d4 at0011 = ╱ee╱)╱ // 0x24bc @0x11
0x24ab…24d4 at0012 = ╱dc╱=╱ // 0x24bd @0x12
0x24ab…24d4 at0013 = ╱22╱"╱ // 0x24be @0x13
0x24ab…24d4 at0014 = ╱20╱…╱ // 0x24bf @0x14
0x24ab…24d4 at0015 = ╱22╱"╱ // 0x24c0 @0x15
0x24ab…24d4 at0016 = ╱b6╱ THEN ╱ // 0x24c1 @0x16
0x24ab…24d4 at0017 = ╱56╱V╱ // 0x24c2 @0x17
0x24ab…24d4 at0018 = ╱50╱P╱ // 0x24c3 @0x18
0x24ab…24d4 at0019 = ╱52╱R╱ // 0x24c4 @0x19
0x24ab…24d4 at001a = ╱49╱I╱ // 0x24c5 @0x1a
0x24ab…24d4 at001b = ╱ef╱$╱ // 0x24c6 @0x1b
0x24ab…24d4 at001c = ╱ed╱(╱ // 0x24c7 @0x1c
0x24ab…24d4 at001d = ╱38╱8╱ // 0x24c8 @0x1d
0x24ab…24d4 at001e = ╱fe00008004╱ // 0x24c9 @0x1e
0x24ab…24d4 at0023 = ╱ee╱)╱ // 0x24ce @0x23
0x24ab…24d4 at0024 = ╱dc╱=╱ // 0x24cf @0x24
0x24ab…24d4 at0025 = ╱22╱"╱ // 0x24d0 @0x25
0x24ab…24d4 at0026 = ╱30╱0╱ // 0x24d1 @0x26
0x24ab…24d4 at0027 = ╱22╱"╱ // 0x24d2 @0x27
0x24ab…24d4 at0028 = EOL // 0x24d3 @0x28
0x24ab…24d4 }
0x24d4…24f3 b24a 4190 IF VPRI$(W)=" " THEN VPRI$(W)="0"
0x24d4…24f3 LineComalBin {
0x24d4…24f3 ptr = 0xb24a // 0x24d4 @0x0
0x24d4…24f3 lno = 0x105e // 0x24d6 @0x2
0x24d4…24f3 at0004 = ╱82╱ IF ╱ // 0x24d8 @0x4
0x24d4…24f3 at0005 = ╱56╱V╱ // 0x24d9 @0x5
0x24d4…24f3 at0006 = ╱50╱P╱ // 0x24da @0x6
0x24d4…24f3 at0007 = ╱52╱R╱ // 0x24db @0x7
0x24d4…24f3 at0008 = ╱49╱I╱ // 0x24dc @0x8
0x24d4…24f3 at0009 = ╱ef╱$╱ // 0x24dd @0x9
0x24d4…24f3 at000a = ╱ed╱(╱ // 0x24de @0xa
0x24d4…24f3 at000b = ╱57╱W╱ // 0x24df @0xb
0x24d4…24f3 at000c = ╱ee╱)╱ // 0x24e0 @0xc
0x24d4…24f3 at000d = ╱dc╱=╱ // 0x24e1 @0xd
0x24d4…24f3 at000e = ╱22╱"╱ // 0x24e2 @0xe
0x24d4…24f3 at000f = ╱20╱…╱ // 0x24e3 @0xf
0x24d4…24f3 at0010 = ╱22╱"╱ // 0x24e4 @0x10
0x24d4…24f3 at0011 = ╱b6╱ THEN ╱ // 0x24e5 @0x11
0x24d4…24f3 at0012 = ╱56╱V╱ // 0x24e6 @0x12
0x24d4…24f3 at0013 = ╱50╱P╱ // 0x24e7 @0x13
0x24d4…24f3 at0014 = ╱52╱R╱ // 0x24e8 @0x14
0x24d4…24f3 at0015 = ╱49╱I╱ // 0x24e9 @0x15
0x24d4…24f3 at0016 = ╱ef╱$╱ // 0x24ea @0x16
0x24d4…24f3 at0017 = ╱ed╱(╱ // 0x24eb @0x17
0x24d4…24f3 at0018 = ╱57╱W╱ // 0x24ec @0x18
0x24d4…24f3 at0019 = ╱ee╱)╱ // 0x24ed @0x19
0x24d4…24f3 at001a = ╱dc╱=╱ // 0x24ee @0x1a
0x24d4…24f3 at001b = ╱22╱"╱ // 0x24ef @0x1b
0x24d4…24f3 at001c = ╱30╱0╱ // 0x24f0 @0x1c
0x24d4…24f3 at001d = ╱22╱"╱ // 0x24f1 @0x1d
0x24d4…24f3 at001e = EOL // 0x24f2 @0x1e
0x24d4…24f3 }
0x24f3…2516 b26d 4200 EXEC CA(G,BLARR$(M-E),VPRI$,TAL1$)
0x24f3…2516 LineComalBin {
0x24f3…2516 ptr = 0xb26d // 0x24f3 @0x0
0x24f3…2516 lno = 0x1068 // 0x24f5 @0x2
0x24f3…2516 at0004 = ╱9d╱ EXEC ╱ // 0x24f7 @0x4
0x24f3…2516 at0005 = ╱43╱C╱ // 0x24f8 @0x5
0x24f3…2516 at0006 = ╱41╱A╱ // 0x24f9 @0x6
0x24f3…2516 at0007 = ╱ed╱(╱ // 0x24fa @0x7
0x24f3…2516 at0008 = ╱47╱G╱ // 0x24fb @0x8
0x24f3…2516 at0009 = ╱ec╱,╱ // 0x24fc @0x9
0x24f3…2516 at000a = ╱42╱B╱ // 0x24fd @0xa
0x24f3…2516 at000b = ╱4c╱L╱ // 0x24fe @0xb
0x24f3…2516 at000c = ╱41╱A╱ // 0x24ff @0xc
0x24f3…2516 at000d = ╱52╱R╱ // 0x2500 @0xd
0x24f3…2516 at000e = ╱52╱R╱ // 0x2501 @0xe
0x24f3…2516 at000f = ╱ef╱$╱ // 0x2502 @0xf
0x24f3…2516 at0010 = ╱ed╱(╱ // 0x2503 @0x10
0x24f3…2516 at0011 = ╱4d╱M╱ // 0x2504 @0x11
0x24f3…2516 at0012 = ╱e3╱-╱ // 0x2505 @0x12
0x24f3…2516 at0013 = ╱45╱E╱ // 0x2506 @0x13
0x24f3…2516 at0014 = ╱ee╱)╱ // 0x2507 @0x14
0x24f3…2516 at0015 = ╱ec╱,╱ // 0x2508 @0x15
0x24f3…2516 at0016 = ╱56╱V╱ // 0x2509 @0x16
0x24f3…2516 at0017 = ╱50╱P╱ // 0x250a @0x17
0x24f3…2516 at0018 = ╱52╱R╱ // 0x250b @0x18
0x24f3…2516 at0019 = ╱49╱I╱ // 0x250c @0x19
0x24f3…2516 at001a = ╱ef╱$╱ // 0x250d @0x1a
0x24f3…2516 at001b = ╱ec╱,╱ // 0x250e @0x1b
0x24f3…2516 at001c = ╱54╱T╱ // 0x250f @0x1c
0x24f3…2516 at001d = ╱41╱A╱ // 0x2510 @0x1d
0x24f3…2516 at001e = ╱4c╱L╱ // 0x2511 @0x1e
0x24f3…2516 at001f = ╱31╱1╱ // 0x2512 @0x1f
0x24f3…2516 at0020 = ╱ef╱$╱ // 0x2513 @0x20
0x24f3…2516 at0021 = ╱ee╱)╱ // 0x2514 @0x21
0x24f3…2516 at0022 = EOL // 0x2515 @0x22
0x24f3…2516 }
0x2516…252a b281 4210 BLARR$(M)=TAL1$
0x2516…252a LineComalBin {
0x2516…252a ptr = 0xb281 // 0x2516 @0x0
0x2516…252a lno = 0x1072 // 0x2518 @0x2
0x2516…252a at0004 = ╱42╱B╱ // 0x251a @0x4
0x2516…252a at0005 = ╱4c╱L╱ // 0x251b @0x5
0x2516…252a at0006 = ╱41╱A╱ // 0x251c @0x6
0x2516…252a at0007 = ╱52╱R╱ // 0x251d @0x7
0x2516…252a at0008 = ╱52╱R╱ // 0x251e @0x8
0x2516…252a at0009 = ╱ef╱$╱ // 0x251f @0x9
0x2516…252a at000a = ╱ed╱(╱ // 0x2520 @0xa
0x2516…252a at000b = ╱4d╱M╱ // 0x2521 @0xb
0x2516…252a at000c = ╱ee╱)╱ // 0x2522 @0xc
0x2516…252a at000d = ╱dc╱=╱ // 0x2523 @0xd
0x2516…252a at000e = ╱54╱T╱ // 0x2524 @0xe
0x2516…252a at000f = ╱41╱A╱ // 0x2525 @0xf
0x2516…252a at0010 = ╱4c╱L╱ // 0x2526 @0x10
0x2516…252a at0011 = ╱31╱1╱ // 0x2527 @0x11
0x2516…252a at0012 = ╱ef╱$╱ // 0x2528 @0x12
0x2516…252a at0013 = EOL // 0x2529 @0x13
0x2516…252a }
0x252a…2549 b2a0 4220 EXEC CA(B,TOTAL$,TAL1$,TOTAL$)
0x252a…2549 LineComalBin {
0x252a…2549 ptr = 0xb2a0 // 0x252a @0x0
0x252a…2549 lno = 0x107c // 0x252c @0x2
0x252a…2549 at0004 = ╱9d╱ EXEC ╱ // 0x252e @0x4
0x252a…2549 at0005 = ╱43╱C╱ // 0x252f @0x5
0x252a…2549 at0006 = ╱41╱A╱ // 0x2530 @0x6
0x252a…2549 at0007 = ╱ed╱(╱ // 0x2531 @0x7
0x252a…2549 at0008 = ╱42╱B╱ // 0x2532 @0x8
0x252a…2549 at0009 = ╱ec╱,╱ // 0x2533 @0x9
0x252a…2549 at000a = ╱54╱T╱ // 0x2534 @0xa
0x252a…2549 at000b = ╱4f╱O╱ // 0x2535 @0xb
0x252a…2549 at000c = ╱54╱T╱ // 0x2536 @0xc
0x252a…2549 at000d = ╱41╱A╱ // 0x2537 @0xd
0x252a…2549 at000e = ╱4c╱L╱ // 0x2538 @0xe
0x252a…2549 at000f = ╱ef╱$╱ // 0x2539 @0xf
0x252a…2549 at0010 = ╱ec╱,╱ // 0x253a @0x10
0x252a…2549 at0011 = ╱54╱T╱ // 0x253b @0x11
0x252a…2549 at0012 = ╱41╱A╱ // 0x253c @0x12
0x252a…2549 at0013 = ╱4c╱L╱ // 0x253d @0x13
0x252a…2549 at0014 = ╱31╱1╱ // 0x253e @0x14
0x252a…2549 at0015 = ╱ef╱$╱ // 0x253f @0x15
0x252a…2549 at0016 = ╱ec╱,╱ // 0x2540 @0x16
0x252a…2549 at0017 = ╱54╱T╱ // 0x2541 @0x17
0x252a…2549 at0018 = ╱4f╱O╱ // 0x2542 @0x18
0x252a…2549 at0019 = ╱54╱T╱ // 0x2543 @0x19
0x252a…2549 at001a = ╱41╱A╱ // 0x2544 @0x1a
0x252a…2549 at001b = ╱4c╱L╱ // 0x2545 @0x1b
0x252a…2549 at001c = ╱ef╱$╱ // 0x2546 @0x1c
0x252a…2549 at001d = ╱ee╱)╱ // 0x2547 @0x1d
0x252a…2549 at001e = EOL // 0x2548 @0x1e
0x252a…2549 }
0x2549…254f b2a6 4230 ENDCASE
0x2549…254f LineComalBin {
0x2549…254f ptr = 0xb2a6 // 0x2549 @0x0
0x2549…254f lno = 0x1086 // 0x254b @0x2
0x2549…254f at0004 = ╱a4╱ ENDCASE ╱ // 0x254d @0x4
0x2549…254f at0005 = EOL // 0x254e @0x5
0x2549…254f }
0x254f…2556 b2ad 4240 NEXT M
0x254f…2556 LineComalBin {
0x254f…2556 ptr = 0xb2ad // 0x254f @0x0
0x254f…2556 lno = 0x1090 // 0x2551 @0x2
0x254f…2556 at0004 = ╱84╱ NEXT ╱ // 0x2553 @0x4
0x254f…2556 at0005 = ╱4d╱M╱ // 0x2554 @0x5
0x254f…2556 at0006 = EOL // 0x2555 @0x6
0x254f…2556 }
0x2556…255c b2b3 4250 ENDPROC
0x2556…255c LineComalBin {
0x2556…255c ptr = 0xb2b3 // 0x2556 @0x0
0x2556…255c lno = 0x109a // 0x2558 @0x2
0x2556…255c at0004 = ╱9f╱ ENDPROC ╱ // 0x255a @0x4
0x2556…255c at0005 = EOL // 0x255b @0x5
0x2556…255c }
0x255c…2569 b2c0 4260 PROC FAKTGEM
0x255c…2569 LineComalBin {
0x255c…2569 ptr = 0xb2c0 // 0x255c @0x0
0x255c…2569 lno = 0x10a4 // 0x255e @0x2
0x255c…2569 at0004 = ╱9e╱ PROC ╱ // 0x2560 @0x4
0x255c…2569 at0005 = ╱46╱F╱ // 0x2561 @0x5
0x255c…2569 at0006 = ╱41╱A╱ // 0x2562 @0x6
0x255c…2569 at0007 = ╱4b╱K╱ // 0x2563 @0x7
0x255c…2569 at0008 = ╱54╱T╱ // 0x2564 @0x8
0x255c…2569 at0009 = ╱47╱G╱ // 0x2565 @0x9
0x255c…2569 at000a = ╱45╱E╱ // 0x2566 @0xa
0x255c…2569 at000b = ╱4d╱M╱ // 0x2567 @0xb
0x255c…2569 at000c = EOL // 0x2568 @0xc
0x255c…2569 }
0x2569…2576 b2cd 4270 I=APOS+E
0x2569…2576 LineComalBin {
0x2569…2576 ptr = 0xb2cd // 0x2569 @0x0
0x2569…2576 lno = 0x10ae // 0x256b @0x2
0x2569…2576 at0004 = ╱49╱I╱ // 0x256d @0x4
0x2569…2576 at0005 = ╱dc╱=╱ // 0x256e @0x5
0x2569…2576 at0006 = ╱41╱A╱ // 0x256f @0x6
0x2569…2576 at0007 = ╱50╱P╱ // 0x2570 @0x7
0x2569…2576 at0008 = ╱4f╱O╱ // 0x2571 @0x8
0x2569…2576 at0009 = ╱53╱S╱ // 0x2572 @0x9
0x2569…2576 at000a = ╱e2╱+╱ // 0x2573 @0xa
0x2569…2576 at000b = ╱45╱E╱ // 0x2574 @0xb
0x2569…2576 at000c = EOL // 0x2575 @0xc
0x2569…2576 }
0x2576…2588 b2df 4280 IF FAKKRE$="F" THEN
0x2576…2588 LineComalBin {
0x2576…2588 ptr = 0xb2df // 0x2576 @0x0
0x2576…2588 lno = 0x10b8 // 0x2578 @0x2
0x2576…2588 at0004 = ╱9c╱ IF ╱ // 0x257a @0x4
0x2576…2588 at0005 = ╱46╱F╱ // 0x257b @0x5
0x2576…2588 at0006 = ╱41╱A╱ // 0x257c @0x6
0x2576…2588 at0007 = ╱4b╱K╱ // 0x257d @0x7
0x2576…2588 at0008 = ╱4b╱K╱ // 0x257e @0x8
0x2576…2588 at0009 = ╱52╱R╱ // 0x257f @0x9
0x2576…2588 at000a = ╱45╱E╱ // 0x2580 @0xa
0x2576…2588 at000b = ╱ef╱$╱ // 0x2581 @0xb
0x2576…2588 at000c = ╱dc╱=╱ // 0x2582 @0xc
0x2576…2588 at000d = ╱22╱"╱ // 0x2583 @0xd
0x2576…2588 at000e = ╱46╱F╱ // 0x2584 @0xe
0x2576…2588 at000f = ╱22╱"╱ // 0x2585 @0xf
0x2576…2588 at0010 = ╱b6╱ THEN ╱ // 0x2586 @0x10
0x2576…2588 at0011 = EOL // 0x2587 @0x11
0x2576…2588 }
0x2588…259a b2f1 4290 AFAKT=AFAKT+E
0x2588…259a LineComalBin {
0x2588…259a ptr = 0xb2f1 // 0x2588 @0x0
0x2588…259a lno = 0x10c2 // 0x258a @0x2
0x2588…259a at0004 = ╱41╱A╱ // 0x258c @0x4
0x2588…259a at0005 = ╱46╱F╱ // 0x258d @0x5
0x2588…259a at0006 = ╱41╱A╱ // 0x258e @0x6
0x2588…259a at0007 = ╱4b╱K╱ // 0x258f @0x7
0x2588…259a at0008 = ╱54╱T╱ // 0x2590 @0x8
0x2588…259a at0009 = ╱dc╱=╱ // 0x2591 @0x9
0x2588…259a at000a = ╱41╱A╱ // 0x2592 @0xa
0x2588…259a at000b = ╱46╱F╱ // 0x2593 @0xb
0x2588…259a at000c = ╱41╱A╱ // 0x2594 @0xc
0x2588…259a at000d = ╱4b╱K╱ // 0x2595 @0xd
0x2588…259a at000e = ╱54╱T╱ // 0x2596 @0xe
0x2588…259a at000f = ╱e2╱+╱ // 0x2597 @0xf
0x2588…259a at0010 = ╱45╱E╱ // 0x2598 @0x10
0x2588…259a at0011 = EOL // 0x2599 @0x11
0x2588…259a }
0x259a…25a0 b2f7 4300 ELSE
0x259a…25a0 LineComalBin {
0x259a…25a0 ptr = 0xb2f7 // 0x259a @0x0
0x259a…25a0 lno = 0x10cc // 0x259c @0x2
0x259a…25a0 at0004 = ╱9a╱ ELSE ╱ // 0x259e @0x4
0x259a…25a0 at0005 = EOL // 0x259f @0x5
0x259a…25a0 }
0x25a0…25b2 b309 4310 AKRED=AKRED+E
0x25a0…25b2 LineComalBin {
0x25a0…25b2 ptr = 0xb309 // 0x25a0 @0x0
0x25a0…25b2 lno = 0x10d6 // 0x25a2 @0x2
0x25a0…25b2 at0004 = ╱41╱A╱ // 0x25a4 @0x4
0x25a0…25b2 at0005 = ╱4b╱K╱ // 0x25a5 @0x5
0x25a0…25b2 at0006 = ╱52╱R╱ // 0x25a6 @0x6
0x25a0…25b2 at0007 = ╱45╱E╱ // 0x25a7 @0x7
0x25a0…25b2 at0008 = ╱44╱D╱ // 0x25a8 @0x8
0x25a0…25b2 at0009 = ╱dc╱=╱ // 0x25a9 @0x9
0x25a0…25b2 at000a = ╱41╱A╱ // 0x25aa @0xa
0x25a0…25b2 at000b = ╱4b╱K╱ // 0x25ab @0xb
0x25a0…25b2 at000c = ╱52╱R╱ // 0x25ac @0xc
0x25a0…25b2 at000d = ╱45╱E╱ // 0x25ad @0xd
0x25a0…25b2 at000e = ╱44╱D╱ // 0x25ae @0xe
0x25a0…25b2 at000f = ╱e2╱+╱ // 0x25af @0xf
0x25a0…25b2 at0010 = ╱45╱E╱ // 0x25b0 @0x10
0x25a0…25b2 at0011 = EOL // 0x25b1 @0x11
0x25a0…25b2 }
0x25b2…25b8 b30f 4320 ENDIF
0x25b2…25b8 LineComalBin {
0x25b2…25b8 ptr = 0xb30f // 0x25b2 @0x0
0x25b2…25b8 lno = 0x10e0 // 0x25b4 @0x2
0x25b2…25b8 at0004 = ╱9b╱ ENDIF ╱ // 0x25b6 @0x4
0x25b2…25b8 at0005 = EOL // 0x25b7 @0x5
0x25b2…25b8 }
0x25b8…25c3 b31a 4330 OPEN K6$,W
0x25b8…25c3 LineComalBin {
0x25b8…25c3 ptr = 0xb31a // 0x25b8 @0x0
0x25b8…25c3 lno = 0x10ea // 0x25ba @0x2
0x25b8…25c3 at0004 = ╱a7╱ OPEN ╱ // 0x25bc @0x4
0x25b8…25c3 at0005 = ╱4b╱K╱ // 0x25bd @0x5
0x25b8…25c3 at0006 = ╱36╱6╱ // 0x25be @0x6
0x25b8…25c3 at0007 = ╱ef╱$╱ // 0x25bf @0x7
0x25b8…25c3 at0008 = ╱ec╱,╱ // 0x25c0 @0x8
0x25b8…25c3 at0009 = ╱57╱W╱ // 0x25c1 @0x9
0x25b8…25c3 at000a = EOL // 0x25c2 @0xa
0x25b8…25c3 }
0x25c3…25d4 b32b 4340 EXEC FE(V,E,K6$)
0x25c3…25d4 LineComalBin {
0x25c3…25d4 ptr = 0xb32b // 0x25c3 @0x0
0x25c3…25d4 lno = 0x10f4 // 0x25c5 @0x2
0x25c3…25d4 at0004 = ╱9d╱ EXEC ╱ // 0x25c7 @0x4
0x25c3…25d4 at0005 = ╱46╱F╱ // 0x25c8 @0x5
0x25c3…25d4 at0006 = ╱45╱E╱ // 0x25c9 @0x6
0x25c3…25d4 at0007 = ╱ed╱(╱ // 0x25ca @0x7
0x25c3…25d4 at0008 = ╱56╱V╱ // 0x25cb @0x8
0x25c3…25d4 at0009 = ╱ec╱,╱ // 0x25cc @0x9
0x25c3…25d4 at000a = ╱45╱E╱ // 0x25cd @0xa
0x25c3…25d4 at000b = ╱ec╱,╱ // 0x25ce @0xb
0x25c3…25d4 at000c = ╱4b╱K╱ // 0x25cf @0xc
0x25c3…25d4 at000d = ╱36╱6╱ // 0x25d0 @0xd
0x25c3…25d4 at000e = ╱ef╱$╱ // 0x25d1 @0xe
0x25c3…25d4 at000f = ╱ee╱)╱ // 0x25d2 @0xf
0x25c3…25d4 at0010 = EOL // 0x25d3 @0x10
0x25c3…25d4 }
0x25d4…25fd b354 4350 PUT K6$,I:KUNDENR,ORDREDAT,FAKKRE$,DIVD
0x25d4…25fd LineComalBin {
0x25d4…25fd ptr = 0xb354 // 0x25d4 @0x0
0x25d4…25fd lno = 0x10fe // 0x25d6 @0x2
0x25d4…25fd at0004 = ╱aa╱ PUT ╱ // 0x25d8 @0x4
0x25d4…25fd at0005 = ╱4b╱K╱ // 0x25d9 @0x5
0x25d4…25fd at0006 = ╱36╱6╱ // 0x25da @0x6
0x25d4…25fd at0007 = ╱ef╱$╱ // 0x25db @0x7
0x25d4…25fd at0008 = ╱ec╱,╱ // 0x25dc @0x8
0x25d4…25fd at0009 = ╱49╱I╱ // 0x25dd @0x9
0x25d4…25fd at000a = ╱f0╱:╱ // 0x25de @0xa
0x25d4…25fd at000b = ╱4b╱K╱ // 0x25df @0xb
0x25d4…25fd at000c = ╱55╱U╱ // 0x25e0 @0xc
0x25d4…25fd at000d = ╱4e╱N╱ // 0x25e1 @0xd
0x25d4…25fd at000e = ╱44╱D╱ // 0x25e2 @0xe
0x25d4…25fd at000f = ╱45╱E╱ // 0x25e3 @0xf
0x25d4…25fd at0010 = ╱4e╱N╱ // 0x25e4 @0x10
0x25d4…25fd at0011 = ╱52╱R╱ // 0x25e5 @0x11
0x25d4…25fd at0012 = ╱ec╱,╱ // 0x25e6 @0x12
0x25d4…25fd at0013 = ╱4f╱O╱ // 0x25e7 @0x13
0x25d4…25fd at0014 = ╱52╱R╱ // 0x25e8 @0x14
0x25d4…25fd at0015 = ╱44╱D╱ // 0x25e9 @0x15
0x25d4…25fd at0016 = ╱52╱R╱ // 0x25ea @0x16
0x25d4…25fd at0017 = ╱45╱E╱ // 0x25eb @0x17
0x25d4…25fd at0018 = ╱44╱D╱ // 0x25ec @0x18
0x25d4…25fd at0019 = ╱41╱A╱ // 0x25ed @0x19
0x25d4…25fd at001a = ╱54╱T╱ // 0x25ee @0x1a
0x25d4…25fd at001b = ╱ec╱,╱ // 0x25ef @0x1b
0x25d4…25fd at001c = ╱46╱F╱ // 0x25f0 @0x1c
0x25d4…25fd at001d = ╱41╱A╱ // 0x25f1 @0x1d
0x25d4…25fd at001e = ╱4b╱K╱ // 0x25f2 @0x1e
0x25d4…25fd at001f = ╱4b╱K╱ // 0x25f3 @0x1f
0x25d4…25fd at0020 = ╱52╱R╱ // 0x25f4 @0x20
0x25d4…25fd at0021 = ╱45╱E╱ // 0x25f5 @0x21
0x25d4…25fd at0022 = ╱ef╱$╱ // 0x25f6 @0x22
0x25d4…25fd at0023 = ╱ec╱,╱ // 0x25f7 @0x23
0x25d4…25fd at0024 = ╱44╱D╱ // 0x25f8 @0x24
0x25d4…25fd at0025 = ╱49╱I╱ // 0x25f9 @0x25
0x25d4…25fd at0026 = ╱56╱V╱ // 0x25fa @0x26
0x25d4…25fd at0027 = ╱44╱D╱ // 0x25fb @0x27
0x25d4…25fd at0028 = EOL // 0x25fc @0x28
0x25d4…25fd }
0x25fd…260e b365 4360 EXEC FE(V,G,K6$)
0x25fd…260e LineComalBin {
0x25fd…260e ptr = 0xb365 // 0x25fd @0x0
0x25fd…260e lno = 0x1108 // 0x25ff @0x2
0x25fd…260e at0004 = ╱9d╱ EXEC ╱ // 0x2601 @0x4
0x25fd…260e at0005 = ╱46╱F╱ // 0x2602 @0x5
0x25fd…260e at0006 = ╱45╱E╱ // 0x2603 @0x6
0x25fd…260e at0007 = ╱ed╱(╱ // 0x2604 @0x7
0x25fd…260e at0008 = ╱56╱V╱ // 0x2605 @0x8
0x25fd…260e at0009 = ╱ec╱,╱ // 0x2606 @0x9
0x25fd…260e at000a = ╱47╱G╱ // 0x2607 @0xa
0x25fd…260e at000b = ╱ec╱,╱ // 0x2608 @0xb
0x25fd…260e at000c = ╱4b╱K╱ // 0x2609 @0xc
0x25fd…260e at000d = ╱36╱6╱ // 0x260a @0xd
0x25fd…260e at000e = ╱ef╱$╱ // 0x260b @0xe
0x25fd…260e at000f = ╱ee╱)╱ // 0x260c @0xf
0x25fd…260e at0010 = EOL // 0x260d @0x10
0x25fd…260e }
0x260e…2618 b36f 4370 I=I+G
0x260e…2618 LineComalBin {
0x260e…2618 ptr = 0xb36f // 0x260e @0x0
0x260e…2618 lno = 0x1112 // 0x2610 @0x2
0x260e…2618 at0004 = ╱49╱I╱ // 0x2612 @0x4
0x260e…2618 at0005 = ╱dc╱=╱ // 0x2613 @0x5
0x260e…2618 at0006 = ╱49╱I╱ // 0x2614 @0x6
0x260e…2618 at0007 = ╱e2╱+╱ // 0x2615 @0x7
0x260e…2618 at0008 = ╱47╱G╱ // 0x2616 @0x8
0x260e…2618 at0009 = EOL // 0x2617 @0x9
0x260e…2618 }
0x2618…2625 b37c 4380 IF DIVD=E THEN
0x2618…2625 LineComalBin {
0x2618…2625 ptr = 0xb37c // 0x2618 @0x0
0x2618…2625 lno = 0x111c // 0x261a @0x2
0x2618…2625 at0004 = ╱9c╱ IF ╱ // 0x261c @0x4
0x2618…2625 at0005 = ╱44╱D╱ // 0x261d @0x5
0x2618…2625 at0006 = ╱49╱I╱ // 0x261e @0x6
0x2618…2625 at0007 = ╱56╱V╱ // 0x261f @0x7
0x2618…2625 at0008 = ╱44╱D╱ // 0x2620 @0x8
0x2618…2625 at0009 = ╱dc╱=╱ // 0x2621 @0x9
0x2618…2625 at000a = ╱45╱E╱ // 0x2622 @0xa
0x2618…2625 at000b = ╱b6╱ THEN ╱ // 0x2623 @0xb
0x2618…2625 at000c = EOL // 0x2624 @0xc
0x2618…2625 }
0x2625…2642 b399 4390 PUT K6$,I:DNAVN$(E:13)
0x2625…2642 LineComalBin {
0x2625…2642 ptr = 0xb399 // 0x2625 @0x0
0x2625…2642 lno = 0x1126 // 0x2627 @0x2
0x2625…2642 at0004 = ╱aa╱ PUT ╱ // 0x2629 @0x4
0x2625…2642 at0005 = ╱4b╱K╱ // 0x262a @0x5
0x2625…2642 at0006 = ╱36╱6╱ // 0x262b @0x6
0x2625…2642 at0007 = ╱ef╱$╱ // 0x262c @0x7
0x2625…2642 at0008 = ╱ec╱,╱ // 0x262d @0x8
0x2625…2642 at0009 = ╱49╱I╱ // 0x262e @0x9
0x2625…2642 at000a = ╱f0╱:╱ // 0x262f @0xa
0x2625…2642 at000b = ╱44╱D╱ // 0x2630 @0xb
0x2625…2642 at000c = ╱4e╱N╱ // 0x2631 @0xc
0x2625…2642 at000d = ╱41╱A╱ // 0x2632 @0xd
0x2625…2642 at000e = ╱56╱V╱ // 0x2633 @0xe
0x2625…2642 at000f = ╱4e╱N╱ // 0x2634 @0xf
0x2625…2642 at0010 = ╱ef╱$╱ // 0x2635 @0x10
0x2625…2642 at0011 = ╱ed╱(╱ // 0x2636 @0x11
0x2625…2642 at0012 = ╱45╱E╱ // 0x2637 @0x12
0x2625…2642 at0013 = ╱f0╱:╱ // 0x2638 @0x13
0x2625…2642 at0014 = ╱31╱1╱ // 0x2639 @0x14
0x2625…2642 at0015 = ╱33╱3╱ // 0x263a @0x15
0x2625…2642 at0016 = ╱fe0000d004╱ // 0x263b @0x16
0x2625…2642 at001b = ╱ee╱)╱ // 0x2640 @0x1b
0x2625…2642 at001c = EOL // 0x2641 @0x1c
0x2625…2642 }
0x2642…2653 b3aa 4400 EXEC FE(V,V,K6$)
0x2642…2653 LineComalBin {
0x2642…2653 ptr = 0xb3aa // 0x2642 @0x0
0x2642…2653 lno = 0x1130 // 0x2644 @0x2
0x2642…2653 at0004 = ╱9d╱ EXEC ╱ // 0x2646 @0x4
0x2642…2653 at0005 = ╱46╱F╱ // 0x2647 @0x5
0x2642…2653 at0006 = ╱45╱E╱ // 0x2648 @0x6
0x2642…2653 at0007 = ╱ed╱(╱ // 0x2649 @0x7
0x2642…2653 at0008 = ╱56╱V╱ // 0x264a @0x8
0x2642…2653 at0009 = ╱ec╱,╱ // 0x264b @0x9
0x2642…2653 at000a = ╱56╱V╱ // 0x264c @0xa
0x2642…2653 at000b = ╱ec╱,╱ // 0x264d @0xb
0x2642…2653 at000c = ╱4b╱K╱ // 0x264e @0xc
0x2642…2653 at000d = ╱36╱6╱ // 0x264f @0xd
0x2642…2653 at000e = ╱ef╱$╱ // 0x2650 @0xe
0x2642…2653 at000f = ╱ee╱)╱ // 0x2651 @0xf
0x2642…2653 at0010 = EOL // 0x2652 @0x10
0x2642…2653 }
0x2653…2678 b3cf 4410 PUT K6$,I+E:DNAVN$(14:12)
0x2653…2678 LineComalBin {
0x2653…2678 ptr = 0xb3cf // 0x2653 @0x0
0x2653…2678 lno = 0x113a // 0x2655 @0x2
0x2653…2678 at0004 = ╱aa╱ PUT ╱ // 0x2657 @0x4
0x2653…2678 at0005 = ╱4b╱K╱ // 0x2658 @0x5
0x2653…2678 at0006 = ╱36╱6╱ // 0x2659 @0x6
0x2653…2678 at0007 = ╱ef╱$╱ // 0x265a @0x7
0x2653…2678 at0008 = ╱ec╱,╱ // 0x265b @0x8
0x2653…2678 at0009 = ╱49╱I╱ // 0x265c @0x9
0x2653…2678 at000a = ╱e2╱+╱ // 0x265d @0xa
0x2653…2678 at000b = ╱45╱E╱ // 0x265e @0xb
0x2653…2678 at000c = ╱f0╱:╱ // 0x265f @0xc
0x2653…2678 at000d = ╱44╱D╱ // 0x2660 @0xd
0x2653…2678 at000e = ╱4e╱N╱ // 0x2661 @0xe
0x2653…2678 at000f = ╱41╱A╱ // 0x2662 @0xf
0x2653…2678 at0010 = ╱56╱V╱ // 0x2663 @0x10
0x2653…2678 at0011 = ╱4e╱N╱ // 0x2664 @0x11
0x2653…2678 at0012 = ╱ef╱$╱ // 0x2665 @0x12
0x2653…2678 at0013 = ╱ed╱(╱ // 0x2666 @0x13
0x2653…2678 at0014 = ╱31╱1╱ // 0x2667 @0x14
0x2653…2678 at0015 = ╱34╱4╱ // 0x2668 @0x15
0x2653…2678 at0016 = ╱fe0000e004╱ // 0x2669 @0x16
0x2653…2678 at001b = ╱f0╱:╱ // 0x266e @0x1b
0x2653…2678 at001c = ╱31╱1╱ // 0x266f @0x1c
0x2653…2678 at001d = ╱32╱2╱ // 0x2670 @0x1d
0x2653…2678 at001e = ╱fe0000c004╱ // 0x2671 @0x1e
0x2653…2678 at0023 = ╱ee╱)╱ // 0x2676 @0x23
0x2653…2678 at0024 = EOL // 0x2677 @0x24
0x2653…2678 }
0x2678…268e b3e5 4420 EXEC FE(V,4,K6$)
0x2678…268e LineComalBin {
0x2678…268e ptr = 0xb3e5 // 0x2678 @0x0
0x2678…268e lno = 0x1144 // 0x267a @0x2
0x2678…268e at0004 = ╱9d╱ EXEC ╱ // 0x267c @0x4
0x2678…268e at0005 = ╱46╱F╱ // 0x267d @0x5
0x2678…268e at0006 = ╱45╱E╱ // 0x267e @0x6
0x2678…268e at0007 = ╱ed╱(╱ // 0x267f @0x7
0x2678…268e at0008 = ╱56╱V╱ // 0x2680 @0x8
0x2678…268e at0009 = ╱ec╱,╱ // 0x2681 @0x9
0x2678…268e at000a = ╱34╱4╱ // 0x2682 @0xa
0x2678…268e at000b = ╱fe00008003╱ // 0x2683 @0xb
0x2678…268e at0010 = ╱ec╱,╱ // 0x2688 @0x10
0x2678…268e at0011 = ╱4b╱K╱ // 0x2689 @0x11
0x2678…268e at0012 = ╱36╱6╱ // 0x268a @0x12
0x2678…268e at0013 = ╱ef╱$╱ // 0x268b @0x13
0x2678…268e at0014 = ╱ee╱)╱ // 0x268c @0x14
0x2678…268e at0015 = EOL // 0x268d @0x15
0x2678…268e }
0x268e…26ad b404 4430 PUT K6$,I+G:DGADE$(E:13)
0x268e…26ad LineComalBin {
0x268e…26ad ptr = 0xb404 // 0x268e @0x0
0x268e…26ad lno = 0x114e // 0x2690 @0x2
0x268e…26ad at0004 = ╱aa╱ PUT ╱ // 0x2692 @0x4
0x268e…26ad at0005 = ╱4b╱K╱ // 0x2693 @0x5
0x268e…26ad at0006 = ╱36╱6╱ // 0x2694 @0x6
0x268e…26ad at0007 = ╱ef╱$╱ // 0x2695 @0x7
0x268e…26ad at0008 = ╱ec╱,╱ // 0x2696 @0x8
0x268e…26ad at0009 = ╱49╱I╱ // 0x2697 @0x9
0x268e…26ad at000a = ╱e2╱+╱ // 0x2698 @0xa
0x268e…26ad at000b = ╱47╱G╱ // 0x2699 @0xb
0x268e…26ad at000c = ╱f0╱:╱ // 0x269a @0xc
0x268e…26ad at000d = ╱44╱D╱ // 0x269b @0xd
0x268e…26ad at000e = ╱47╱G╱ // 0x269c @0xe
0x268e…26ad at000f = ╱41╱A╱ // 0x269d @0xf
0x268e…26ad at0010 = ╱44╱D╱ // 0x269e @0x10
0x268e…26ad at0011 = ╱45╱E╱ // 0x269f @0x11
0x268e…26ad at0012 = ╱ef╱$╱ // 0x26a0 @0x12
0x268e…26ad at0013 = ╱ed╱(╱ // 0x26a1 @0x13
0x268e…26ad at0014 = ╱45╱E╱ // 0x26a2 @0x14
0x268e…26ad at0015 = ╱f0╱:╱ // 0x26a3 @0x15
0x268e…26ad at0016 = ╱31╱1╱ // 0x26a4 @0x16
0x268e…26ad at0017 = ╱33╱3╱ // 0x26a5 @0x17
0x268e…26ad at0018 = ╱fe0000d004╱ // 0x26a6 @0x18
0x268e…26ad at001d = ╱ee╱)╱ // 0x26ab @0x1d
0x268e…26ad at001e = EOL // 0x26ac @0x1e
0x268e…26ad }
0x26ad…26c3 b41a 4440 EXEC FE(V,5,K6$)
0x26ad…26c3 LineComalBin {
0x26ad…26c3 ptr = 0xb41a // 0x26ad @0x0
0x26ad…26c3 lno = 0x1158 // 0x26af @0x2
0x26ad…26c3 at0004 = ╱9d╱ EXEC ╱ // 0x26b1 @0x4
0x26ad…26c3 at0005 = ╱46╱F╱ // 0x26b2 @0x5
0x26ad…26c3 at0006 = ╱45╱E╱ // 0x26b3 @0x6
0x26ad…26c3 at0007 = ╱ed╱(╱ // 0x26b4 @0x7
0x26ad…26c3 at0008 = ╱56╱V╱ // 0x26b5 @0x8
0x26ad…26c3 at0009 = ╱ec╱,╱ // 0x26b6 @0x9
0x26ad…26c3 at000a = ╱35╱5╱ // 0x26b7 @0xa
0x26ad…26c3 at000b = ╱fe0000a003╱ // 0x26b8 @0xb
0x26ad…26c3 at0010 = ╱ec╱,╱ // 0x26bd @0x10
0x26ad…26c3 at0011 = ╱4b╱K╱ // 0x26be @0x11
0x26ad…26c3 at0012 = ╱36╱6╱ // 0x26bf @0x12
0x26ad…26c3 at0013 = ╱ef╱$╱ // 0x26c0 @0x13
0x26ad…26c3 at0014 = ╱ee╱)╱ // 0x26c1 @0x14
0x26ad…26c3 at0015 = EOL // 0x26c2 @0x15
0x26ad…26c3 }
0x26c3…26e8 b43f 4450 PUT K6$,I+V:DGADE$(14:12)
0x26c3…26e8 LineComalBin {
0x26c3…26e8 ptr = 0xb43f // 0x26c3 @0x0
0x26c3…26e8 lno = 0x1162 // 0x26c5 @0x2
0x26c3…26e8 at0004 = ╱aa╱ PUT ╱ // 0x26c7 @0x4
0x26c3…26e8 at0005 = ╱4b╱K╱ // 0x26c8 @0x5
0x26c3…26e8 at0006 = ╱36╱6╱ // 0x26c9 @0x6
0x26c3…26e8 at0007 = ╱ef╱$╱ // 0x26ca @0x7
0x26c3…26e8 at0008 = ╱ec╱,╱ // 0x26cb @0x8
0x26c3…26e8 at0009 = ╱49╱I╱ // 0x26cc @0x9
0x26c3…26e8 at000a = ╱e2╱+╱ // 0x26cd @0xa
0x26c3…26e8 at000b = ╱56╱V╱ // 0x26ce @0xb
0x26c3…26e8 at000c = ╱f0╱:╱ // 0x26cf @0xc
0x26c3…26e8 at000d = ╱44╱D╱ // 0x26d0 @0xd
0x26c3…26e8 at000e = ╱47╱G╱ // 0x26d1 @0xe
0x26c3…26e8 at000f = ╱41╱A╱ // 0x26d2 @0xf
0x26c3…26e8 at0010 = ╱44╱D╱ // 0x26d3 @0x10
0x26c3…26e8 at0011 = ╱45╱E╱ // 0x26d4 @0x11
0x26c3…26e8 at0012 = ╱ef╱$╱ // 0x26d5 @0x12
0x26c3…26e8 at0013 = ╱ed╱(╱ // 0x26d6 @0x13
0x26c3…26e8 at0014 = ╱31╱1╱ // 0x26d7 @0x14
0x26c3…26e8 at0015 = ╱34╱4╱ // 0x26d8 @0x15
0x26c3…26e8 at0016 = ╱fe0000e004╱ // 0x26d9 @0x16
0x26c3…26e8 at001b = ╱f0╱:╱ // 0x26de @0x1b
0x26c3…26e8 at001c = ╱31╱1╱ // 0x26df @0x1c
0x26c3…26e8 at001d = ╱32╱2╱ // 0x26e0 @0x1d
0x26c3…26e8 at001e = ╱fe0000c004╱ // 0x26e1 @0x1e
0x26c3…26e8 at0023 = ╱ee╱)╱ // 0x26e6 @0x23
0x26c3…26e8 at0024 = EOL // 0x26e7 @0x24
0x26c3…26e8 }
0x26e8…26fe b455 4460 EXEC FE(V,6,K6$)
0x26e8…26fe LineComalBin {
0x26e8…26fe ptr = 0xb455 // 0x26e8 @0x0
0x26e8…26fe lno = 0x116c // 0x26ea @0x2
0x26e8…26fe at0004 = ╱9d╱ EXEC ╱ // 0x26ec @0x4
0x26e8…26fe at0005 = ╱46╱F╱ // 0x26ed @0x5
0x26e8…26fe at0006 = ╱45╱E╱ // 0x26ee @0x6
0x26e8…26fe at0007 = ╱ed╱(╱ // 0x26ef @0x7
0x26e8…26fe at0008 = ╱56╱V╱ // 0x26f0 @0x8
0x26e8…26fe at0009 = ╱ec╱,╱ // 0x26f1 @0x9
0x26e8…26fe at000a = ╱36╱6╱ // 0x26f2 @0xa
0x26e8…26fe at000b = ╱fe0000c003╱ // 0x26f3 @0xb
0x26e8…26fe at0010 = ╱ec╱,╱ // 0x26f8 @0x10
0x26e8…26fe at0011 = ╱4b╱K╱ // 0x26f9 @0x11
0x26e8…26fe at0012 = ╱36╱6╱ // 0x26fa @0x12
0x26e8…26fe at0013 = ╱ef╱$╱ // 0x26fb @0x13
0x26e8…26fe at0014 = ╱ee╱)╱ // 0x26fc @0x14
0x26e8…26fe at0015 = EOL // 0x26fd @0x15
0x26e8…26fe }
0x26fe…2722 b479 4470 PUT K6$,I+4:DPOSTNR,DBY$(E:W)
0x26fe…2722 LineComalBin {
0x26fe…2722 ptr = 0xb479 // 0x26fe @0x0
0x26fe…2722 lno = 0x1176 // 0x2700 @0x2
0x26fe…2722 at0004 = ╱aa╱ PUT ╱ // 0x2702 @0x4
0x26fe…2722 at0005 = ╱4b╱K╱ // 0x2703 @0x5
0x26fe…2722 at0006 = ╱36╱6╱ // 0x2704 @0x6
0x26fe…2722 at0007 = ╱ef╱$╱ // 0x2705 @0x7
0x26fe…2722 at0008 = ╱ec╱,╱ // 0x2706 @0x8
0x26fe…2722 at0009 = ╱49╱I╱ // 0x2707 @0x9
0x26fe…2722 at000a = ╱e2╱+╱ // 0x2708 @0xa
0x26fe…2722 at000b = ╱34╱4╱ // 0x2709 @0xb
0x26fe…2722 at000c = ╱fe00008003╱ // 0x270a @0xc
0x26fe…2722 at0011 = ╱f0╱:╱ // 0x270f @0x11
0x26fe…2722 at0012 = ╱44╱D╱ // 0x2710 @0x12
0x26fe…2722 at0013 = ╱50╱P╱ // 0x2711 @0x13
0x26fe…2722 at0014 = ╱4f╱O╱ // 0x2712 @0x14
0x26fe…2722 at0015 = ╱53╱S╱ // 0x2713 @0x15
0x26fe…2722 at0016 = ╱54╱T╱ // 0x2714 @0x16
0x26fe…2722 at0017 = ╱4e╱N╱ // 0x2715 @0x17
0x26fe…2722 at0018 = ╱52╱R╱ // 0x2716 @0x18
0x26fe…2722 at0019 = ╱ec╱,╱ // 0x2717 @0x19
0x26fe…2722 at001a = ╱44╱D╱ // 0x2718 @0x1a
0x26fe…2722 at001b = ╱42╱B╱ // 0x2719 @0x1b
0x26fe…2722 at001c = ╱59╱Y╱ // 0x271a @0x1c
0x26fe…2722 at001d = ╱ef╱$╱ // 0x271b @0x1d
0x26fe…2722 at001e = ╱ed╱(╱ // 0x271c @0x1e
0x26fe…2722 at001f = ╱45╱E╱ // 0x271d @0x1f
0x26fe…2722 at0020 = ╱f0╱:╱ // 0x271e @0x20
0x26fe…2722 at0021 = ╱57╱W╱ // 0x271f @0x21
0x26fe…2722 at0022 = ╱ee╱)╱ // 0x2720 @0x22
0x26fe…2722 at0023 = EOL // 0x2721 @0x23
0x26fe…2722 }
0x2722…2738 b48f 4480 EXEC FE(V,7,K6$)
0x2722…2738 LineComalBin {
0x2722…2738 ptr = 0xb48f // 0x2722 @0x0
0x2722…2738 lno = 0x1180 // 0x2724 @0x2
0x2722…2738 at0004 = ╱9d╱ EXEC ╱ // 0x2726 @0x4
0x2722…2738 at0005 = ╱46╱F╱ // 0x2727 @0x5
0x2722…2738 at0006 = ╱45╱E╱ // 0x2728 @0x6
0x2722…2738 at0007 = ╱ed╱(╱ // 0x2729 @0x7
0x2722…2738 at0008 = ╱56╱V╱ // 0x272a @0x8
0x2722…2738 at0009 = ╱ec╱,╱ // 0x272b @0x9
0x2722…2738 at000a = ╱37╱7╱ // 0x272c @0xa
0x2722…2738 at000b = ╱fe0000e003╱ // 0x272d @0xb
0x2722…2738 at0010 = ╱ec╱,╱ // 0x2732 @0x10
0x2722…2738 at0011 = ╱4b╱K╱ // 0x2733 @0x11
0x2722…2738 at0012 = ╱36╱6╱ // 0x2734 @0x12
0x2722…2738 at0013 = ╱ef╱$╱ // 0x2735 @0x13
0x2722…2738 at0014 = ╱ee╱)╱ // 0x2736 @0x14
0x2722…2738 at0015 = EOL // 0x2737 @0x15
0x2722…2738 }
0x2738…2760 b4b7 4490 PUT K6$,I+5:DBY$(10:11)
0x2738…2760 LineComalBin {
0x2738…2760 ptr = 0xb4b7 // 0x2738 @0x0
0x2738…2760 lno = 0x118a // 0x273a @0x2
0x2738…2760 at0004 = ╱aa╱ PUT ╱ // 0x273c @0x4
0x2738…2760 at0005 = ╱4b╱K╱ // 0x273d @0x5
0x2738…2760 at0006 = ╱36╱6╱ // 0x273e @0x6
0x2738…2760 at0007 = ╱ef╱$╱ // 0x273f @0x7
0x2738…2760 at0008 = ╱ec╱,╱ // 0x2740 @0x8
0x2738…2760 at0009 = ╱49╱I╱ // 0x2741 @0x9
0x2738…2760 at000a = ╱e2╱+╱ // 0x2742 @0xa
0x2738…2760 at000b = ╱35╱5╱ // 0x2743 @0xb
0x2738…2760 at000c = ╱fe0000a003╱ // 0x2744 @0xc
0x2738…2760 at0011 = ╱f0╱:╱ // 0x2749 @0x11
0x2738…2760 at0012 = ╱44╱D╱ // 0x274a @0x12
0x2738…2760 at0013 = ╱42╱B╱ // 0x274b @0x13
0x2738…2760 at0014 = ╱59╱Y╱ // 0x274c @0x14
0x2738…2760 at0015 = ╱ef╱$╱ // 0x274d @0x15
0x2738…2760 at0016 = ╱ed╱(╱ // 0x274e @0x16
0x2738…2760 at0017 = ╱31╱1╱ // 0x274f @0x17
0x2738…2760 at0018 = ╱30╱0╱ // 0x2750 @0x18
0x2738…2760 at0019 = ╱fe0000a004╱ // 0x2751 @0x19
0x2738…2760 at001e = ╱f0╱:╱ // 0x2756 @0x1e
0x2738…2760 at001f = ╱31╱1╱ // 0x2757 @0x1f
0x2738…2760 at0020 = ╱31╱1╱ // 0x2758 @0x20
0x2738…2760 at0021 = ╱fe0000b004╱ // 0x2759 @0x21
0x2738…2760 at0026 = ╱ee╱)╱ // 0x275e @0x26
0x2738…2760 at0027 = EOL // 0x275f @0x27
0x2738…2760 }
0x2760…2776 b4cd 4500 EXEC FE(V,8,K6$)
0x2760…2776 LineComalBin {
0x2760…2776 ptr = 0xb4cd // 0x2760 @0x0
0x2760…2776 lno = 0x1194 // 0x2762 @0x2
0x2760…2776 at0004 = ╱9d╱ EXEC ╱ // 0x2764 @0x4
0x2760…2776 at0005 = ╱46╱F╱ // 0x2765 @0x5
0x2760…2776 at0006 = ╱45╱E╱ // 0x2766 @0x6
0x2760…2776 at0007 = ╱ed╱(╱ // 0x2767 @0x7
0x2760…2776 at0008 = ╱56╱V╱ // 0x2768 @0x8
0x2760…2776 at0009 = ╱ec╱,╱ // 0x2769 @0x9
0x2760…2776 at000a = ╱38╱8╱ // 0x276a @0xa
0x2760…2776 at000b = ╱fe00008004╱ // 0x276b @0xb
0x2760…2776 at0010 = ╱ec╱,╱ // 0x2770 @0x10
0x2760…2776 at0011 = ╱4b╱K╱ // 0x2771 @0x11
0x2760…2776 at0012 = ╱36╱6╱ // 0x2772 @0x12
0x2760…2776 at0013 = ╱ef╱$╱ // 0x2773 @0x13
0x2760…2776 at0014 = ╱ee╱)╱ // 0x2774 @0x14
0x2760…2776 at0015 = EOL // 0x2775 @0x15
0x2760…2776 }
0x2776…2785 b4dc 4510 I=I+6
0x2776…2785 LineComalBin {
0x2776…2785 ptr = 0xb4dc // 0x2776 @0x0
0x2776…2785 lno = 0x119e // 0x2778 @0x2
0x2776…2785 at0004 = ╱49╱I╱ // 0x277a @0x4
0x2776…2785 at0005 = ╱dc╱=╱ // 0x277b @0x5
0x2776…2785 at0006 = ╱49╱I╱ // 0x277c @0x6
0x2776…2785 at0007 = ╱e2╱+╱ // 0x277d @0x7
0x2776…2785 at0008 = ╱36╱6╱ // 0x277e @0x8
0x2776…2785 at0009 = ╱fe0000c003╱ // 0x277f @0x9
0x2776…2785 at000e = EOL // 0x2784 @0xe
0x2776…2785 }
0x2785…278b b4e2 4520 ENDIF
0x2785…278b LineComalBin {
0x2785…278b ptr = 0xb4e2 // 0x2785 @0x0
0x2785…278b lno = 0x11a8 // 0x2787 @0x2
0x2785…278b at0004 = ╱9b╱ ENDIF ╱ // 0x2789 @0x4
0x2785…278b at0005 = EOL // 0x278a @0x5
0x2785…278b }
0x278b…279b b4f2 4530 IF LEVKODE=B THEN
0x278b…279b LineComalBin {
0x278b…279b ptr = 0xb4f2 // 0x278b @0x0
0x278b…279b lno = 0x11b2 // 0x278d @0x2
0x278b…279b at0004 = ╱9c╱ IF ╱ // 0x278f @0x4
0x278b…279b at0005 = ╱4c╱L╱ // 0x2790 @0x5
0x278b…279b at0006 = ╱45╱E╱ // 0x2791 @0x6
0x278b…279b at0007 = ╱56╱V╱ // 0x2792 @0x7
0x278b…279b at0008 = ╱4b╱K╱ // 0x2793 @0x8
0x278b…279b at0009 = ╱4f╱O╱ // 0x2794 @0x9
0x278b…279b at000a = ╱44╱D╱ // 0x2795 @0xa
0x278b…279b at000b = ╱45╱E╱ // 0x2796 @0xb
0x278b…279b at000c = ╱dc╱=╱ // 0x2797 @0xc
0x278b…279b at000d = ╱42╱B╱ // 0x2798 @0xd
0x278b…279b at000e = ╱b6╱ THEN ╱ // 0x2799 @0xe
0x278b…279b at000f = EOL // 0x279a @0xf
0x278b…279b }
0x279b…27a8 b4ff 4540 FOR J=I TO I+V
0x279b…27a8 LineComalBin {
0x279b…27a8 ptr = 0xb4ff // 0x279b @0x0
0x279b…27a8 lno = 0x11bc // 0x279d @0x2
0x279b…27a8 at0004 = ╱83╱ FOR ╱ // 0x279f @0x4
0x279b…27a8 at0005 = ╱4a╱J╱ // 0x27a0 @0x5
0x279b…27a8 at0006 = ╱dc╱=╱ // 0x27a1 @0x6
0x279b…27a8 at0007 = ╱49╱I╱ // 0x27a2 @0x7
0x279b…27a8 at0008 = ╱b7╱ TO ╱ // 0x27a3 @0x8
0x279b…27a8 at0009 = ╱49╱I╱ // 0x27a4 @0x9
0x279b…27a8 at000a = ╱e2╱+╱ // 0x27a5 @0xa
0x279b…27a8 at000b = ╱56╱V╱ // 0x27a6 @0xb
0x279b…27a8 at000c = EOL // 0x27a7 @0xc
0x279b…27a8 }
0x27a8…27d6 b52d 4550 PUT K6$,J:LEVTEKST$((J-I)*13+E:13)
0x27a8…27d6 LineComalBin {
0x27a8…27d6 ptr = 0xb52d // 0x27a8 @0x0
0x27a8…27d6 lno = 0x11c6 // 0x27aa @0x2
0x27a8…27d6 at0004 = ╱aa╱ PUT ╱ // 0x27ac @0x4
0x27a8…27d6 at0005 = ╱4b╱K╱ // 0x27ad @0x5
0x27a8…27d6 at0006 = ╱36╱6╱ // 0x27ae @0x6
0x27a8…27d6 at0007 = ╱ef╱$╱ // 0x27af @0x7
0x27a8…27d6 at0008 = ╱ec╱,╱ // 0x27b0 @0x8
0x27a8…27d6 at0009 = ╱4a╱J╱ // 0x27b1 @0x9
0x27a8…27d6 at000a = ╱f0╱:╱ // 0x27b2 @0xa
0x27a8…27d6 at000b = ╱4c╱L╱ // 0x27b3 @0xb
0x27a8…27d6 at000c = ╱45╱E╱ // 0x27b4 @0xc
0x27a8…27d6 at000d = ╱56╱V╱ // 0x27b5 @0xd
0x27a8…27d6 at000e = ╱54╱T╱ // 0x27b6 @0xe
0x27a8…27d6 at000f = ╱45╱E╱ // 0x27b7 @0xf
0x27a8…27d6 at0010 = ╱4b╱K╱ // 0x27b8 @0x10
0x27a8…27d6 at0011 = ╱53╱S╱ // 0x27b9 @0x11
0x27a8…27d6 at0012 = ╱54╱T╱ // 0x27ba @0x12
0x27a8…27d6 at0013 = ╱ef╱$╱ // 0x27bb @0x13
0x27a8…27d6 at0014 = ╱ed╱(╱ // 0x27bc @0x14
0x27a8…27d6 at0015 = ╱ed╱(╱ // 0x27bd @0x15
0x27a8…27d6 at0016 = ╱4a╱J╱ // 0x27be @0x16
0x27a8…27d6 at0017 = ╱e3╱-╱ // 0x27bf @0x17
0x27a8…27d6 at0018 = ╱49╱I╱ // 0x27c0 @0x18
0x27a8…27d6 at0019 = ╱ee╱)╱ // 0x27c1 @0x19
0x27a8…27d6 at001a = ╱e4╱*╱ // 0x27c2 @0x1a
0x27a8…27d6 at001b = ╱31╱1╱ // 0x27c3 @0x1b
0x27a8…27d6 at001c = ╱33╱3╱ // 0x27c4 @0x1c
0x27a8…27d6 at001d = ╱fe0000d004╱ // 0x27c5 @0x1d
0x27a8…27d6 at0022 = ╱e2╱+╱ // 0x27ca @0x22
0x27a8…27d6 at0023 = ╱45╱E╱ // 0x27cb @0x23
0x27a8…27d6 at0024 = ╱f0╱:╱ // 0x27cc @0x24
0x27a8…27d6 at0025 = ╱31╱1╱ // 0x27cd @0x25
0x27a8…27d6 at0026 = ╱33╱3╱ // 0x27ce @0x26
0x27a8…27d6 at0027 = ╱fe0000d004╱ // 0x27cf @0x27
0x27a8…27d6 at002c = ╱ee╱)╱ // 0x27d4 @0x2c
0x27a8…27d6 at002d = EOL // 0x27d5 @0x2d
0x27a8…27d6 }
0x27d6…27ec b543 4560 EXEC FE(V,8,K6$)
0x27d6…27ec LineComalBin {
0x27d6…27ec ptr = 0xb543 // 0x27d6 @0x0
0x27d6…27ec lno = 0x11d0 // 0x27d8 @0x2
0x27d6…27ec at0004 = ╱9d╱ EXEC ╱ // 0x27da @0x4
0x27d6…27ec at0005 = ╱46╱F╱ // 0x27db @0x5
0x27d6…27ec at0006 = ╱45╱E╱ // 0x27dc @0x6
0x27d6…27ec at0007 = ╱ed╱(╱ // 0x27dd @0x7
0x27d6…27ec at0008 = ╱56╱V╱ // 0x27de @0x8
0x27d6…27ec at0009 = ╱ec╱,╱ // 0x27df @0x9
0x27d6…27ec at000a = ╱38╱8╱ // 0x27e0 @0xa
0x27d6…27ec at000b = ╱fe00008004╱ // 0x27e1 @0xb
0x27d6…27ec at0010 = ╱ec╱,╱ // 0x27e6 @0x10
0x27d6…27ec at0011 = ╱4b╱K╱ // 0x27e7 @0x11
0x27d6…27ec at0012 = ╱36╱6╱ // 0x27e8 @0x12
0x27d6…27ec at0013 = ╱ef╱$╱ // 0x27e9 @0x13
0x27d6…27ec at0014 = ╱ee╱)╱ // 0x27ea @0x14
0x27d6…27ec at0015 = EOL // 0x27eb @0x15
0x27d6…27ec }
0x27ec…27f3 b54a 4570 NEXT J
0x27ec…27f3 LineComalBin {
0x27ec…27f3 ptr = 0xb54a // 0x27ec @0x0
0x27ec…27f3 lno = 0x11da // 0x27ee @0x2
0x27ec…27f3 at0004 = ╱84╱ NEXT ╱ // 0x27f0 @0x4
0x27ec…27f3 at0005 = ╱4a╱J╱ // 0x27f1 @0x5
0x27ec…27f3 at0006 = EOL // 0x27f2 @0x6
0x27ec…27f3 }
0x27f3…2802 b559 4580 I=I+4
0x27f3…2802 LineComalBin {
0x27f3…2802 ptr = 0xb559 // 0x27f3 @0x0
0x27f3…2802 lno = 0x11e4 // 0x27f5 @0x2
0x27f3…2802 at0004 = ╱49╱I╱ // 0x27f7 @0x4
0x27f3…2802 at0005 = ╱dc╱=╱ // 0x27f8 @0x5
0x27f3…2802 at0006 = ╱49╱I╱ // 0x27f9 @0x6
0x27f3…2802 at0007 = ╱e2╱+╱ // 0x27fa @0x7
0x27f3…2802 at0008 = ╱34╱4╱ // 0x27fb @0x8
0x27f3…2802 at0009 = ╱fe00008003╱ // 0x27fc @0x9
0x27f3…2802 at000e = EOL // 0x2801 @0xe
0x27f3…2802 }
0x2802…2808 b55f 4590 ENDIF
0x2802…2808 LineComalBin {
0x2802…2808 ptr = 0xb55f // 0x2802 @0x0
0x2802…2808 lno = 0x11ee // 0x2804 @0x2
0x2802…2808 at0004 = ╱9b╱ ENDIF ╱ // 0x2806 @0x4
0x2802…2808 at0005 = EOL // 0x2807 @0x5
0x2802…2808 }
0x2808…281a b571 4600 EXEC KODE(1)
0x2808…281a LineComalBin {
0x2808…281a ptr = 0xb571 // 0x2808 @0x0
0x2808…281a lno = 0x11f8 // 0x280a @0x2
0x2808…281a at0004 = ╱9d╱ EXEC ╱ // 0x280c @0x4
0x2808…281a at0005 = ╱4b╱K╱ // 0x280d @0x5
0x2808…281a at0006 = ╱4f╱O╱ // 0x280e @0x6
0x2808…281a at0007 = ╱44╱D╱ // 0x280f @0x7
0x2808…281a at0008 = ╱45╱E╱ // 0x2810 @0x8
0x2808…281a at0009 = ╱ed╱(╱ // 0x2811 @0x9
0x2808…281a at000a = ╱31╱1╱ // 0x2812 @0xa
0x2808…281a at000b = ╱fe00008001╱ // 0x2813 @0xb
0x2808…281a at0010 = ╱ee╱)╱ // 0x2818 @0x10
0x2808…281a at0011 = EOL // 0x2819 @0x11
0x2808…281a }
0x281a…2829 b580 4610 KOD1$=KOD$
0x281a…2829 LineComalBin {
0x281a…2829 ptr = 0xb580 // 0x281a @0x0
0x281a…2829 lno = 0x1202 // 0x281c @0x2
0x281a…2829 at0004 = ╱4b╱K╱ // 0x281e @0x4
0x281a…2829 at0005 = ╱4f╱O╱ // 0x281f @0x5
0x281a…2829 at0006 = ╱44╱D╱ // 0x2820 @0x6
0x281a…2829 at0007 = ╱31╱1╱ // 0x2821 @0x7
0x281a…2829 at0008 = ╱ef╱$╱ // 0x2822 @0x8
0x281a…2829 at0009 = ╱dc╱=╱ // 0x2823 @0x9
0x281a…2829 at000a = ╱4b╱K╱ // 0x2824 @0xa
0x281a…2829 at000b = ╱4f╱O╱ // 0x2825 @0xb
0x281a…2829 at000c = ╱44╱D╱ // 0x2826 @0xc
0x281a…2829 at000d = ╱ef╱$╱ // 0x2827 @0xd
0x281a…2829 at000e = EOL // 0x2828 @0xe
0x281a…2829 }
0x2829…2839 b590 4620 FOR LIE=E TO VLIN
0x2829…2839 LineComalBin {
0x2829…2839 ptr = 0xb590 // 0x2829 @0x0
0x2829…2839 lno = 0x120c // 0x282b @0x2
0x2829…2839 at0004 = ╱83╱ FOR ╱ // 0x282d @0x4
0x2829…2839 at0005 = ╱4c╱L╱ // 0x282e @0x5
0x2829…2839 at0006 = ╱49╱I╱ // 0x282f @0x6
0x2829…2839 at0007 = ╱45╱E╱ // 0x2830 @0x7
0x2829…2839 at0008 = ╱dc╱=╱ // 0x2831 @0x8
0x2829…2839 at0009 = ╱45╱E╱ // 0x2832 @0x9
0x2829…2839 at000a = ╱b7╱ TO ╱ // 0x2833 @0xa
0x2829…2839 at000b = ╱56╱V╱ // 0x2834 @0xb
0x2829…2839 at000c = ╱4c╱L╱ // 0x2835 @0xc
0x2829…2839 at000d = ╱49╱I╱ // 0x2836 @0xd
0x2829…2839 at000e = ╱4e╱N╱ // 0x2837 @0xe
0x2829…2839 at000f = EOL // 0x2838 @0xf
0x2829…2839 }
0x2839…2845 b59c 4630 J=LIE+E
0x2839…2845 LineComalBin {
0x2839…2845 ptr = 0xb59c // 0x2839 @0x0
0x2839…2845 lno = 0x1216 // 0x283b @0x2
0x2839…2845 at0004 = ╱4a╱J╱ // 0x283d @0x4
0x2839…2845 at0005 = ╱dc╱=╱ // 0x283e @0x5
0x2839…2845 at0006 = ╱4c╱L╱ // 0x283f @0x6
0x2839…2845 at0007 = ╱49╱I╱ // 0x2840 @0x7
0x2839…2845 at0008 = ╱45╱E╱ // 0x2841 @0x8
0x2839…2845 at0009 = ╱e2╱+╱ // 0x2842 @0x9
0x2839…2845 at000a = ╱45╱E╱ // 0x2843 @0xa
0x2839…2845 at000b = EOL // 0x2844 @0xb
0x2839…2845 }
0x2845…2852 b5a9 4640 EXEC KODE(J)
0x2845…2852 LineComalBin {
0x2845…2852 ptr = 0xb5a9 // 0x2845 @0x0
0x2845…2852 lno = 0x1220 // 0x2847 @0x2
0x2845…2852 at0004 = ╱9d╱ EXEC ╱ // 0x2849 @0x4
0x2845…2852 at0005 = ╱4b╱K╱ // 0x284a @0x5
0x2845…2852 at0006 = ╱4f╱O╱ // 0x284b @0x6
0x2845…2852 at0007 = ╱44╱D╱ // 0x284c @0x7
0x2845…2852 at0008 = ╱45╱E╱ // 0x284d @0x8
0x2845…2852 at0009 = ╱ed╱(╱ // 0x284e @0x9
0x2845…2852 at000a = ╱4a╱J╱ // 0x284f @0xa
0x2845…2852 at000b = ╱ee╱)╱ // 0x2850 @0xb
0x2845…2852 at000c = EOL // 0x2851 @0xc
0x2845…2852 }
0x2852…285f b5b6 4650 CASE KOD1$ OF
0x2852…285f LineComalBin {
0x2852…285f ptr = 0xb5b6 // 0x2852 @0x0
0x2852…285f lno = 0x122a // 0x2854 @0x2
0x2852…285f at0004 = ╱a200╱ CASE ╱ // 0x2856 @0x4
0x2852…285f at0006 = ╱4b╱K╱ // 0x2858 @0x6
0x2852…285f at0007 = ╱4f╱O╱ // 0x2859 @0x7
0x2852…285f at0008 = ╱44╱D╱ // 0x285a @0x8
0x2852…285f at0009 = ╱31╱1╱ // 0x285b @0x9
0x2852…285f at000a = ╱ef╱$╱ // 0x285c @0xa
0x2852…285f at000b = ╱ba╱ OF ╱ // 0x285d @0xb
0x2852…285f at000c = EOL // 0x285e @0xc
0x2852…285f }
0x285f…2865 b5bc 4660 STOP
0x285f…2865 LineComalBin {
0x285f…2865 ptr = 0xb5bc // 0x285f @0x0
0x285f…2865 lno = 0x1234 // 0x2861 @0x2
0x285f…2865 at0004 = ╱8d╱ STOP ╱ // 0x2863 @0x4
0x285f…2865 at0005 = EOL // 0x2864 @0x5
0x285f…2865 }
0x2865…286f b5c6 4670 WHEN "A"
0x2865…286f LineComalBin {
0x2865…286f ptr = 0xb5c6 // 0x2865 @0x0
0x2865…286f lno = 0x123e // 0x2867 @0x2
0x2865…286f at0004 = ╱a300╱ WHEN ╱ // 0x2869 @0x4
0x2865…286f at0006 = ╱22╱"╱ // 0x286b @0x6
0x2865…286f at0007 = ╱41╱A╱ // 0x286c @0x7
0x2865…286f at0008 = ╱22╱"╱ // 0x286d @0x8
0x2865…286f at0009 = EOL // 0x286e @0x9
0x2865…286f }
0x286f…2879 b5d0 4680 EXEC VGEM
0x286f…2879 LineComalBin {
0x286f…2879 ptr = 0xb5d0 // 0x286f @0x0
0x286f…2879 lno = 0x1248 // 0x2871 @0x2
0x286f…2879 at0004 = ╱9d╱ EXEC ╱ // 0x2873 @0x4
0x286f…2879 at0005 = ╱56╱V╱ // 0x2874 @0x5
0x286f…2879 at0006 = ╱47╱G╱ // 0x2875 @0x6
0x286f…2879 at0007 = ╱45╱E╱ // 0x2876 @0x7
0x286f…2879 at0008 = ╱4d╱M╱ // 0x2877 @0x8
0x286f…2879 at0009 = EOL // 0x2878 @0x9
0x286f…2879 }
0x2879…2883 b5da 4690 WHEN "B"
0x2879…2883 LineComalBin {
0x2879…2883 ptr = 0xb5da // 0x2879 @0x0
0x2879…2883 lno = 0x1252 // 0x287b @0x2
0x2879…2883 at0004 = ╱a300╱ WHEN ╱ // 0x287d @0x4
0x2879…2883 at0006 = ╱22╱"╱ // 0x287f @0x6
0x2879…2883 at0007 = ╱42╱B╱ // 0x2880 @0x7
0x2879…2883 at0008 = ╱22╱"╱ // 0x2881 @0x8
0x2879…2883 at0009 = EOL // 0x2882 @0x9
0x2879…2883 }
0x2883…28a0 b5f7 4700 VTARR$(LIE,13)=KOD$
0x2883…28a0 LineComalBin {
0x2883…28a0 ptr = 0xb5f7 // 0x2883 @0x0
0x2883…28a0 lno = 0x125c // 0x2885 @0x2
0x2883…28a0 at0004 = ╱56╱V╱ // 0x2887 @0x4
0x2883…28a0 at0005 = ╱54╱T╱ // 0x2888 @0x5
0x2883…28a0 at0006 = ╱41╱A╱ // 0x2889 @0x6
0x2883…28a0 at0007 = ╱52╱R╱ // 0x288a @0x7
0x2883…28a0 at0008 = ╱52╱R╱ // 0x288b @0x8
0x2883…28a0 at0009 = ╱ef╱$╱ // 0x288c @0x9
0x2883…28a0 at000a = ╱ed╱(╱ // 0x288d @0xa
0x2883…28a0 at000b = ╱4c╱L╱ // 0x288e @0xb
0x2883…28a0 at000c = ╱49╱I╱ // 0x288f @0xc
0x2883…28a0 at000d = ╱45╱E╱ // 0x2890 @0xd
0x2883…28a0 at000e = ╱ec╱,╱ // 0x2891 @0xe
0x2883…28a0 at000f = ╱31╱1╱ // 0x2892 @0xf
0x2883…28a0 at0010 = ╱33╱3╱ // 0x2893 @0x10
0x2883…28a0 at0011 = ╱fe0000d004╱ // 0x2894 @0x11
0x2883…28a0 at0016 = ╱ee╱)╱ // 0x2899 @0x16
0x2883…28a0 at0017 = ╱dc╱=╱ // 0x289a @0x17
0x2883…28a0 at0018 = ╱4b╱K╱ // 0x289b @0x18
0x2883…28a0 at0019 = ╱4f╱O╱ // 0x289c @0x19
0x2883…28a0 at001a = ╱44╱D╱ // 0x289d @0x1a
0x2883…28a0 at001b = ╱ef╱$╱ // 0x289e @0x1b
0x2883…28a0 at001c = EOL // 0x289f @0x1c
0x2883…28a0 }
0x28a0…28c1 b618 4710 PUT K6$,I:VTARR$(LIE,E:13)
0x28a0…28c1 LineComalBin {
0x28a0…28c1 ptr = 0xb618 // 0x28a0 @0x0
0x28a0…28c1 lno = 0x1266 // 0x28a2 @0x2
0x28a0…28c1 at0004 = ╱aa╱ PUT ╱ // 0x28a4 @0x4
0x28a0…28c1 at0005 = ╱4b╱K╱ // 0x28a5 @0x5
0x28a0…28c1 at0006 = ╱36╱6╱ // 0x28a6 @0x6
0x28a0…28c1 at0007 = ╱ef╱$╱ // 0x28a7 @0x7
0x28a0…28c1 at0008 = ╱ec╱,╱ // 0x28a8 @0x8
0x28a0…28c1 at0009 = ╱49╱I╱ // 0x28a9 @0x9
0x28a0…28c1 at000a = ╱f0╱:╱ // 0x28aa @0xa
0x28a0…28c1 at000b = ╱56╱V╱ // 0x28ab @0xb
0x28a0…28c1 at000c = ╱54╱T╱ // 0x28ac @0xc
0x28a0…28c1 at000d = ╱41╱A╱ // 0x28ad @0xd
0x28a0…28c1 at000e = ╱52╱R╱ // 0x28ae @0xe
0x28a0…28c1 at000f = ╱52╱R╱ // 0x28af @0xf
0x28a0…28c1 at0010 = ╱ef╱$╱ // 0x28b0 @0x10
0x28a0…28c1 at0011 = ╱ed╱(╱ // 0x28b1 @0x11
0x28a0…28c1 at0012 = ╱4c╱L╱ // 0x28b2 @0x12
0x28a0…28c1 at0013 = ╱49╱I╱ // 0x28b3 @0x13
0x28a0…28c1 at0014 = ╱45╱E╱ // 0x28b4 @0x14
0x28a0…28c1 at0015 = ╱ec╱,╱ // 0x28b5 @0x15
0x28a0…28c1 at0016 = ╱45╱E╱ // 0x28b6 @0x16
0x28a0…28c1 at0017 = ╱f0╱:╱ // 0x28b7 @0x17
0x28a0…28c1 at0018 = ╱31╱1╱ // 0x28b8 @0x18
0x28a0…28c1 at0019 = ╱33╱3╱ // 0x28b9 @0x19
0x28a0…28c1 at001a = ╱fe0000d004╱ // 0x28ba @0x1a
0x28a0…28c1 at001f = ╱ee╱)╱ // 0x28bf @0x1f
0x28a0…28c1 at0020 = EOL // 0x28c0 @0x20
0x28a0…28c1 }
0x28c1…28d2 b629 4720 EXEC FE(V,W,K6$)
0x28c1…28d2 LineComalBin {
0x28c1…28d2 ptr = 0xb629 // 0x28c1 @0x0
0x28c1…28d2 lno = 0x1270 // 0x28c3 @0x2
0x28c1…28d2 at0004 = ╱9d╱ EXEC ╱ // 0x28c5 @0x4
0x28c1…28d2 at0005 = ╱46╱F╱ // 0x28c6 @0x5
0x28c1…28d2 at0006 = ╱45╱E╱ // 0x28c7 @0x6
0x28c1…28d2 at0007 = ╱ed╱(╱ // 0x28c8 @0x7
0x28c1…28d2 at0008 = ╱56╱V╱ // 0x28c9 @0x8
0x28c1…28d2 at0009 = ╱ec╱,╱ // 0x28ca @0x9
0x28c1…28d2 at000a = ╱57╱W╱ // 0x28cb @0xa
0x28c1…28d2 at000b = ╱ec╱,╱ // 0x28cc @0xb
0x28c1…28d2 at000c = ╱4b╱K╱ // 0x28cd @0xc
0x28c1…28d2 at000d = ╱36╱6╱ // 0x28ce @0xd
0x28c1…28d2 at000e = ╱ef╱$╱ // 0x28cf @0xe
0x28c1…28d2 at000f = ╱ee╱)╱ // 0x28d0 @0xf
0x28c1…28d2 at0010 = EOL // 0x28d1 @0x10
0x28c1…28d2 }
0x28d2…28dc b633 4730 I=I+E
0x28d2…28dc LineComalBin {
0x28d2…28dc ptr = 0xb633 // 0x28d2 @0x0
0x28d2…28dc lno = 0x127a // 0x28d4 @0x2
0x28d2…28dc at0004 = ╱49╱I╱ // 0x28d6 @0x4
0x28d2…28dc at0005 = ╱dc╱=╱ // 0x28d7 @0x5
0x28d2…28dc at0006 = ╱49╱I╱ // 0x28d8 @0x6
0x28d2…28dc at0007 = ╱e2╱+╱ // 0x28d9 @0x7
0x28d2…28dc at0008 = ╱45╱E╱ // 0x28da @0x8
0x28d2…28dc at0009 = EOL // 0x28db @0x9
0x28d2…28dc }
0x28dc…28e6 b63d 4740 WHEN "C"
0x28dc…28e6 LineComalBin {
0x28dc…28e6 ptr = 0xb63d // 0x28dc @0x0
0x28dc…28e6 lno = 0x1284 // 0x28de @0x2
0x28dc…28e6 at0004 = ╱a300╱ WHEN ╱ // 0x28e0 @0x4
0x28dc…28e6 at0006 = ╱22╱"╱ // 0x28e2 @0x6
0x28dc…28e6 at0007 = ╱43╱C╱ // 0x28e3 @0x7
0x28dc…28e6 at0008 = ╱22╱"╱ // 0x28e4 @0x8
0x28dc…28e6 at0009 = EOL // 0x28e5 @0x9
0x28dc…28e6 }
0x28e6…28fd b654 4750 EXEC EGEM(BLARR$(LIE))
0x28e6…28fd LineComalBin {
0x28e6…28fd ptr = 0xb654 // 0x28e6 @0x0
0x28e6…28fd lno = 0x128e // 0x28e8 @0x2
0x28e6…28fd at0004 = ╱9d╱ EXEC ╱ // 0x28ea @0x4
0x28e6…28fd at0005 = ╱45╱E╱ // 0x28eb @0x5
0x28e6…28fd at0006 = ╱47╱G╱ // 0x28ec @0x6
0x28e6…28fd at0007 = ╱45╱E╱ // 0x28ed @0x7
0x28e6…28fd at0008 = ╱4d╱M╱ // 0x28ee @0x8
0x28e6…28fd at0009 = ╱ed╱(╱ // 0x28ef @0x9
0x28e6…28fd at000a = ╱42╱B╱ // 0x28f0 @0xa
0x28e6…28fd at000b = ╱4c╱L╱ // 0x28f1 @0xb
0x28e6…28fd at000c = ╱41╱A╱ // 0x28f2 @0xc
0x28e6…28fd at000d = ╱52╱R╱ // 0x28f3 @0xd
0x28e6…28fd at000e = ╱52╱R╱ // 0x28f4 @0xe
0x28e6…28fd at000f = ╱ef╱$╱ // 0x28f5 @0xf
0x28e6…28fd at0010 = ╱ed╱(╱ // 0x28f6 @0x10
0x28e6…28fd at0011 = ╱4c╱L╱ // 0x28f7 @0x11
0x28e6…28fd at0012 = ╱49╱I╱ // 0x28f8 @0x12
0x28e6…28fd at0013 = ╱45╱E╱ // 0x28f9 @0x13
0x28e6…28fd at0014 = ╱ee╱)╱ // 0x28fa @0x14
0x28e6…28fd at0015 = ╱ee╱)╱ // 0x28fb @0x15
0x28e6…28fd at0016 = EOL // 0x28fc @0x16
0x28e6…28fd }
0x28fd…2907 b65e 4760 WHEN "D"
0x28fd…2907 LineComalBin {
0x28fd…2907 ptr = 0xb65e // 0x28fd @0x0
0x28fd…2907 lno = 0x1298 // 0x28ff @0x2
0x28fd…2907 at0004 = ╱a300╱ WHEN ╱ // 0x2901 @0x4
0x28fd…2907 at0006 = ╱22╱"╱ // 0x2903 @0x6
0x28fd…2907 at0007 = ╱44╱D╱ // 0x2904 @0x7
0x28fd…2907 at0008 = ╱22╱"╱ // 0x2905 @0x8
0x28fd…2907 at0009 = EOL // 0x2906 @0x9
0x28fd…2907 }
0x2907…2911 b668 4770 EXEC TGEM
0x2907…2911 LineComalBin {
0x2907…2911 ptr = 0xb668 // 0x2907 @0x0
0x2907…2911 lno = 0x12a2 // 0x2909 @0x2
0x2907…2911 at0004 = ╱9d╱ EXEC ╱ // 0x290b @0x4
0x2907…2911 at0005 = ╱54╱T╱ // 0x290c @0x5
0x2907…2911 at0006 = ╱47╱G╱ // 0x290d @0x6
0x2907…2911 at0007 = ╱45╱E╱ // 0x290e @0x7
0x2907…2911 at0008 = ╱4d╱M╱ // 0x290f @0x8
0x2907…2911 at0009 = EOL // 0x2910 @0x9
0x2907…2911 }
0x2911…291b b672 4780 WHEN "E"
0x2911…291b LineComalBin {
0x2911…291b ptr = 0xb672 // 0x2911 @0x0
0x2911…291b lno = 0x12ac // 0x2913 @0x2
0x2911…291b at0004 = ╱a300╱ WHEN ╱ // 0x2915 @0x4
0x2911…291b at0006 = ╱22╱"╱ // 0x2917 @0x6
0x2911…291b at0007 = ╱45╱E╱ // 0x2918 @0x7
0x2911…291b at0008 = ╱22╱"╱ // 0x2919 @0x8
0x2911…291b at0009 = EOL // 0x291a @0x9
0x2911…291b }
0x291b…2925 b67c 4790 EXEC TGEM
0x291b…2925 LineComalBin {
0x291b…2925 ptr = 0xb67c // 0x291b @0x0
0x291b…2925 lno = 0x12b6 // 0x291d @0x2
0x291b…2925 at0004 = ╱9d╱ EXEC ╱ // 0x291f @0x4
0x291b…2925 at0005 = ╱54╱T╱ // 0x2920 @0x5
0x291b…2925 at0006 = ╱47╱G╱ // 0x2921 @0x6
0x291b…2925 at0007 = ╱45╱E╱ // 0x2922 @0x7
0x291b…2925 at0008 = ╱4d╱M╱ // 0x2923 @0x8
0x291b…2925 at0009 = EOL // 0x2924 @0x9
0x291b…2925 }
0x2925…293c b693 4800 EXEC EGEM(BLARR$(LIE))
0x2925…293c LineComalBin {
0x2925…293c ptr = 0xb693 // 0x2925 @0x0
0x2925…293c lno = 0x12c0 // 0x2927 @0x2
0x2925…293c at0004 = ╱9d╱ EXEC ╱ // 0x2929 @0x4
0x2925…293c at0005 = ╱45╱E╱ // 0x292a @0x5
0x2925…293c at0006 = ╱47╱G╱ // 0x292b @0x6
0x2925…293c at0007 = ╱45╱E╱ // 0x292c @0x7
0x2925…293c at0008 = ╱4d╱M╱ // 0x292d @0x8
0x2925…293c at0009 = ╱ed╱(╱ // 0x292e @0x9
0x2925…293c at000a = ╱42╱B╱ // 0x292f @0xa
0x2925…293c at000b = ╱4c╱L╱ // 0x2930 @0xb
0x2925…293c at000c = ╱41╱A╱ // 0x2931 @0xc
0x2925…293c at000d = ╱52╱R╱ // 0x2932 @0xd
0x2925…293c at000e = ╱52╱R╱ // 0x2933 @0xe
0x2925…293c at000f = ╱ef╱$╱ // 0x2934 @0xf
0x2925…293c at0010 = ╱ed╱(╱ // 0x2935 @0x10
0x2925…293c at0011 = ╱4c╱L╱ // 0x2936 @0x11
0x2925…293c at0012 = ╱49╱I╱ // 0x2937 @0x12
0x2925…293c at0013 = ╱45╱E╱ // 0x2938 @0x13
0x2925…293c at0014 = ╱ee╱)╱ // 0x2939 @0x14
0x2925…293c at0015 = ╱ee╱)╱ // 0x293a @0x15
0x2925…293c at0016 = EOL // 0x293b @0x16
0x2925…293c }
0x293c…2946 b69d 4810 WHEN "F"
0x293c…2946 LineComalBin {
0x293c…2946 ptr = 0xb69d // 0x293c @0x0
0x293c…2946 lno = 0x12ca // 0x293e @0x2
0x293c…2946 at0004 = ╱a300╱ WHEN ╱ // 0x2940 @0x4
0x293c…2946 at0006 = ╱22╱"╱ // 0x2942 @0x6
0x293c…2946 at0007 = ╱46╱F╱ // 0x2943 @0x7
0x293c…2946 at0008 = ╱22╱"╱ // 0x2944 @0x8
0x293c…2946 at0009 = EOL // 0x2945 @0x9
0x293c…2946 }
0x2946…2950 b6a7 4820 EXEC VGEM
0x2946…2950 LineComalBin {
0x2946…2950 ptr = 0xb6a7 // 0x2946 @0x0
0x2946…2950 lno = 0x12d4 // 0x2948 @0x2
0x2946…2950 at0004 = ╱9d╱ EXEC ╱ // 0x294a @0x4
0x2946…2950 at0005 = ╱56╱V╱ // 0x294b @0x5
0x2946…2950 at0006 = ╱47╱G╱ // 0x294c @0x6
0x2946…2950 at0007 = ╱45╱E╱ // 0x294d @0x7
0x2946…2950 at0008 = ╱4d╱M╱ // 0x294e @0x8
0x2946…2950 at0009 = EOL // 0x294f @0x9
0x2946…2950 }
0x2950…2967 b6be 4830 EXEC EGEM(VPARR$(LIE))
0x2950…2967 LineComalBin {
0x2950…2967 ptr = 0xb6be // 0x2950 @0x0
0x2950…2967 lno = 0x12de // 0x2952 @0x2
0x2950…2967 at0004 = ╱9d╱ EXEC ╱ // 0x2954 @0x4
0x2950…2967 at0005 = ╱45╱E╱ // 0x2955 @0x5
0x2950…2967 at0006 = ╱47╱G╱ // 0x2956 @0x6
0x2950…2967 at0007 = ╱45╱E╱ // 0x2957 @0x7
0x2950…2967 at0008 = ╱4d╱M╱ // 0x2958 @0x8
0x2950…2967 at0009 = ╱ed╱(╱ // 0x2959 @0x9
0x2950…2967 at000a = ╱56╱V╱ // 0x295a @0xa
0x2950…2967 at000b = ╱50╱P╱ // 0x295b @0xb
0x2950…2967 at000c = ╱41╱A╱ // 0x295c @0xc
0x2950…2967 at000d = ╱52╱R╱ // 0x295d @0xd
0x2950…2967 at000e = ╱52╱R╱ // 0x295e @0xe
0x2950…2967 at000f = ╱ef╱$╱ // 0x295f @0xf
0x2950…2967 at0010 = ╱ed╱(╱ // 0x2960 @0x10
0x2950…2967 at0011 = ╱4c╱L╱ // 0x2961 @0x11
0x2950…2967 at0012 = ╱49╱I╱ // 0x2962 @0x12
0x2950…2967 at0013 = ╱45╱E╱ // 0x2963 @0x13
0x2950…2967 at0014 = ╱ee╱)╱ // 0x2964 @0x14
0x2950…2967 at0015 = ╱ee╱)╱ // 0x2965 @0x15
0x2950…2967 at0016 = EOL // 0x2966 @0x16
0x2950…2967 }
0x2967…2975 b6cc 4840 WHEN "G","H"
0x2967…2975 LineComalBin {
0x2967…2975 ptr = 0xb6cc // 0x2967 @0x0
0x2967…2975 lno = 0x12e8 // 0x2969 @0x2
0x2967…2975 at0004 = ╱a300╱ WHEN ╱ // 0x296b @0x4
0x2967…2975 at0006 = ╱22╱"╱ // 0x296d @0x6
0x2967…2975 at0007 = ╱47╱G╱ // 0x296e @0x7
0x2967…2975 at0008 = ╱22╱"╱ // 0x296f @0x8
0x2967…2975 at0009 = ╱ec╱,╱ // 0x2970 @0x9
0x2967…2975 at000a = ╱22╱"╱ // 0x2971 @0xa
0x2967…2975 at000b = ╱48╱H╱ // 0x2972 @0xb
0x2967…2975 at000c = ╱22╱"╱ // 0x2973 @0xc
0x2967…2975 at000d = EOL // 0x2974 @0xd
0x2967…2975 }
0x2975…297f b6d6 4850 EXEC TGEM
0x2975…297f LineComalBin {
0x2975…297f ptr = 0xb6d6 // 0x2975 @0x0
0x2975…297f lno = 0x12f2 // 0x2977 @0x2
0x2975…297f at0004 = ╱9d╱ EXEC ╱ // 0x2979 @0x4
0x2975…297f at0005 = ╱54╱T╱ // 0x297a @0x5
0x2975…297f at0006 = ╱47╱G╱ // 0x297b @0x6
0x2975…297f at0007 = ╱45╱E╱ // 0x297c @0x7
0x2975…297f at0008 = ╱4d╱M╱ // 0x297d @0x8
0x2975…297f at0009 = EOL // 0x297e @0x9
0x2975…297f }
0x297f…2989 b6e0 4860 EXEC VGEM
0x297f…2989 LineComalBin {
0x297f…2989 ptr = 0xb6e0 // 0x297f @0x0
0x297f…2989 lno = 0x12fc // 0x2981 @0x2
0x297f…2989 at0004 = ╱9d╱ EXEC ╱ // 0x2983 @0x4
0x297f…2989 at0005 = ╱56╱V╱ // 0x2984 @0x5
0x297f…2989 at0006 = ╱47╱G╱ // 0x2985 @0x6
0x297f…2989 at0007 = ╱45╱E╱ // 0x2986 @0x7
0x297f…2989 at0008 = ╱4d╱M╱ // 0x2987 @0x8
0x297f…2989 at0009 = EOL // 0x2988 @0x9
0x297f…2989 }
0x2989…2999 b6f0 4870 IF KOD1$="H" THEN
0x2989…2999 LineComalBin {
0x2989…2999 ptr = 0xb6f0 // 0x2989 @0x0
0x2989…2999 lno = 0x1306 // 0x298b @0x2
0x2989…2999 at0004 = ╱9c╱ IF ╱ // 0x298d @0x4
0x2989…2999 at0005 = ╱4b╱K╱ // 0x298e @0x5
0x2989…2999 at0006 = ╱4f╱O╱ // 0x298f @0x6
0x2989…2999 at0007 = ╱44╱D╱ // 0x2990 @0x7
0x2989…2999 at0008 = ╱31╱1╱ // 0x2991 @0x8
0x2989…2999 at0009 = ╱ef╱$╱ // 0x2992 @0x9
0x2989…2999 at000a = ╱dc╱=╱ // 0x2993 @0xa
0x2989…2999 at000b = ╱22╱"╱ // 0x2994 @0xb
0x2989…2999 at000c = ╱48╱H╱ // 0x2995 @0xc
0x2989…2999 at000d = ╱22╱"╱ // 0x2996 @0xd
0x2989…2999 at000e = ╱b6╱ THEN ╱ // 0x2997 @0xe
0x2989…2999 at000f = EOL // 0x2998 @0xf
0x2989…2999 }
0x2999…29b0 b707 4880 EXEC EGEM(VPARR$(LIE))
0x2999…29b0 LineComalBin {
0x2999…29b0 ptr = 0xb707 // 0x2999 @0x0
0x2999…29b0 lno = 0x1310 // 0x299b @0x2
0x2999…29b0 at0004 = ╱9d╱ EXEC ╱ // 0x299d @0x4
0x2999…29b0 at0005 = ╱45╱E╱ // 0x299e @0x5
0x2999…29b0 at0006 = ╱47╱G╱ // 0x299f @0x6
0x2999…29b0 at0007 = ╱45╱E╱ // 0x29a0 @0x7
0x2999…29b0 at0008 = ╱4d╱M╱ // 0x29a1 @0x8
0x2999…29b0 at0009 = ╱ed╱(╱ // 0x29a2 @0x9
0x2999…29b0 at000a = ╱56╱V╱ // 0x29a3 @0xa
0x2999…29b0 at000b = ╱50╱P╱ // 0x29a4 @0xb
0x2999…29b0 at000c = ╱41╱A╱ // 0x29a5 @0xc
0x2999…29b0 at000d = ╱52╱R╱ // 0x29a6 @0xd
0x2999…29b0 at000e = ╱52╱R╱ // 0x29a7 @0xe
0x2999…29b0 at000f = ╱ef╱$╱ // 0x29a8 @0xf
0x2999…29b0 at0010 = ╱ed╱(╱ // 0x29a9 @0x10
0x2999…29b0 at0011 = ╱4c╱L╱ // 0x29aa @0x11
0x2999…29b0 at0012 = ╱49╱I╱ // 0x29ab @0x12
0x2999…29b0 at0013 = ╱45╱E╱ // 0x29ac @0x13
0x2999…29b0 at0014 = ╱ee╱)╱ // 0x29ad @0x14
0x2999…29b0 at0015 = ╱ee╱)╱ // 0x29ae @0x15
0x2999…29b0 at0016 = EOL // 0x29af @0x16
0x2999…29b0 }
0x29b0…29b6 b70d 4890 ENDIF
0x29b0…29b6 LineComalBin {
0x29b0…29b6 ptr = 0xb70d // 0x29b0 @0x0
0x29b0…29b6 lno = 0x131a // 0x29b2 @0x2
0x29b0…29b6 at0004 = ╱9b╱ ENDIF ╱ // 0x29b4 @0x4
0x29b0…29b6 at0005 = EOL // 0x29b5 @0x5
0x29b0…29b6 }
0x29b6…29bc b713 4900 ENDCASE
0x29b6…29bc LineComalBin {
0x29b6…29bc ptr = 0xb713 // 0x29b6 @0x0
0x29b6…29bc lno = 0x1324 // 0x29b8 @0x2
0x29b6…29bc at0004 = ╱a4╱ ENDCASE ╱ // 0x29ba @0x4
0x29b6…29bc at0005 = EOL // 0x29bb @0x5
0x29b6…29bc }
0x29bc…29cb b722 4910 KOD1$=KOD$
0x29bc…29cb LineComalBin {
0x29bc…29cb ptr = 0xb722 // 0x29bc @0x0
0x29bc…29cb lno = 0x132e // 0x29be @0x2
0x29bc…29cb at0004 = ╱4b╱K╱ // 0x29c0 @0x4
0x29bc…29cb at0005 = ╱4f╱O╱ // 0x29c1 @0x5
0x29bc…29cb at0006 = ╱44╱D╱ // 0x29c2 @0x6
0x29bc…29cb at0007 = ╱31╱1╱ // 0x29c3 @0x7
0x29bc…29cb at0008 = ╱ef╱$╱ // 0x29c4 @0x8
0x29bc…29cb at0009 = ╱dc╱=╱ // 0x29c5 @0x9
0x29bc…29cb at000a = ╱4b╱K╱ // 0x29c6 @0xa
0x29bc…29cb at000b = ╱4f╱O╱ // 0x29c7 @0xb
0x29bc…29cb at000c = ╱44╱D╱ // 0x29c8 @0xc
0x29bc…29cb at000d = ╱ef╱$╱ // 0x29c9 @0xd
0x29bc…29cb at000e = EOL // 0x29ca @0xe
0x29bc…29cb }
0x29cb…29d4 b72b 4920 NEXT LIE
0x29cb…29d4 LineComalBin {
0x29cb…29d4 ptr = 0xb72b // 0x29cb @0x0
0x29cb…29d4 lno = 0x1338 // 0x29cd @0x2
0x29cb…29d4 at0004 = ╱84╱ NEXT ╱ // 0x29cf @0x4
0x29cb…29d4 at0005 = ╱4c╱L╱ // 0x29d0 @0x5
0x29cb…29d4 at0006 = ╱49╱I╱ // 0x29d1 @0x6
0x29cb…29d4 at0007 = ╱45╱E╱ // 0x29d2 @0x7
0x29cb…29d4 at0008 = EOL // 0x29d3 @0x8
0x29cb…29d4 }
0x29d4…29e5 b73c 4930 EXEC EGEM(FORS$)
0x29d4…29e5 LineComalBin {
0x29d4…29e5 ptr = 0xb73c // 0x29d4 @0x0
0x29d4…29e5 lno = 0x1342 // 0x29d6 @0x2
0x29d4…29e5 at0004 = ╱9d╱ EXEC ╱ // 0x29d8 @0x4
0x29d4…29e5 at0005 = ╱45╱E╱ // 0x29d9 @0x5
0x29d4…29e5 at0006 = ╱47╱G╱ // 0x29da @0x6
0x29d4…29e5 at0007 = ╱45╱E╱ // 0x29db @0x7
0x29d4…29e5 at0008 = ╱4d╱M╱ // 0x29dc @0x8
0x29d4…29e5 at0009 = ╱ed╱(╱ // 0x29dd @0x9
0x29d4…29e5 at000a = ╱46╱F╱ // 0x29de @0xa
0x29d4…29e5 at000b = ╱4f╱O╱ // 0x29df @0xb
0x29d4…29e5 at000c = ╱52╱R╱ // 0x29e0 @0xc
0x29d4…29e5 at000d = ╱53╱S╱ // 0x29e1 @0xd
0x29d4…29e5 at000e = ╱ef╱$╱ // 0x29e2 @0xe
0x29d4…29e5 at000f = ╱ee╱)╱ // 0x29e3 @0xf
0x29d4…29e5 at0010 = EOL // 0x29e4 @0x10
0x29d4…29e5 }
0x29e5…29f4 b74b 4940 IF DLK$="0" THEN
0x29e5…29f4 LineComalBin {
0x29e5…29f4 ptr = 0xb74b // 0x29e5 @0x0
0x29e5…29f4 lno = 0x134c // 0x29e7 @0x2
0x29e5…29f4 at0004 = ╱9c╱ IF ╱ // 0x29e9 @0x4
0x29e5…29f4 at0005 = ╱44╱D╱ // 0x29ea @0x5
0x29e5…29f4 at0006 = ╱4c╱L╱ // 0x29eb @0x6
0x29e5…29f4 at0007 = ╱4b╱K╱ // 0x29ec @0x7
0x29e5…29f4 at0008 = ╱ef╱$╱ // 0x29ed @0x8
0x29e5…29f4 at0009 = ╱dc╱=╱ // 0x29ee @0x9
0x29e5…29f4 at000a = ╱22╱"╱ // 0x29ef @0xa
0x29e5…29f4 at000b = ╱30╱0╱ // 0x29f0 @0xb
0x29e5…29f4 at000c = ╱22╱"╱ // 0x29f1 @0xc
0x29e5…29f4 at000d = ╱b6╱ THEN ╱ // 0x29f2 @0xd
0x29e5…29f4 at000e = EOL // 0x29f3 @0xe
0x29e5…29f4 }
0x29f4…2a05 b75c 4950 EXEC EGEM(MOMS$)
0x29f4…2a05 LineComalBin {
0x29f4…2a05 ptr = 0xb75c // 0x29f4 @0x0
0x29f4…2a05 lno = 0x1356 // 0x29f6 @0x2
0x29f4…2a05 at0004 = ╱9d╱ EXEC ╱ // 0x29f8 @0x4
0x29f4…2a05 at0005 = ╱45╱E╱ // 0x29f9 @0x5
0x29f4…2a05 at0006 = ╱47╱G╱ // 0x29fa @0x6
0x29f4…2a05 at0007 = ╱45╱E╱ // 0x29fb @0x7
0x29f4…2a05 at0008 = ╱4d╱M╱ // 0x29fc @0x8
0x29f4…2a05 at0009 = ╱ed╱(╱ // 0x29fd @0x9
0x29f4…2a05 at000a = ╱4d╱M╱ // 0x29fe @0xa
0x29f4…2a05 at000b = ╱4f╱O╱ // 0x29ff @0xb
0x29f4…2a05 at000c = ╱4d╱M╱ // 0x2a00 @0xc
0x29f4…2a05 at000d = ╱53╱S╱ // 0x2a01 @0xd
0x29f4…2a05 at000e = ╱ef╱$╱ // 0x2a02 @0xe
0x29f4…2a05 at000f = ╱ee╱)╱ // 0x2a03 @0xf
0x29f4…2a05 at0010 = EOL // 0x2a04 @0x10
0x29f4…2a05 }
0x2a05…2a0b b762 4960 ELSE
0x2a05…2a0b LineComalBin {
0x2a05…2a0b ptr = 0xb762 // 0x2a05 @0x0
0x2a05…2a0b lno = 0x1360 // 0x2a07 @0x2
0x2a05…2a0b at0004 = ╱9a╱ ELSE ╱ // 0x2a09 @0x4
0x2a05…2a0b at0005 = EOL // 0x2a0a @0x5
0x2a05…2a0b }
0x2a0b…2a1b b772 4970 EXEC EGEM(TAH$)
0x2a0b…2a1b LineComalBin {
0x2a0b…2a1b ptr = 0xb772 // 0x2a0b @0x0
0x2a0b…2a1b lno = 0x136a // 0x2a0d @0x2
0x2a0b…2a1b at0004 = ╱9d╱ EXEC ╱ // 0x2a0f @0x4
0x2a0b…2a1b at0005 = ╱45╱E╱ // 0x2a10 @0x5
0x2a0b…2a1b at0006 = ╱47╱G╱ // 0x2a11 @0x6
0x2a0b…2a1b at0007 = ╱45╱E╱ // 0x2a12 @0x7
0x2a0b…2a1b at0008 = ╱4d╱M╱ // 0x2a13 @0x8
0x2a0b…2a1b at0009 = ╱ed╱(╱ // 0x2a14 @0x9
0x2a0b…2a1b at000a = ╱54╱T╱ // 0x2a15 @0xa
0x2a0b…2a1b at000b = ╱41╱A╱ // 0x2a16 @0xb
0x2a0b…2a1b at000c = ╱48╱H╱ // 0x2a17 @0xc
0x2a0b…2a1b at000d = ╱ef╱$╱ // 0x2a18 @0xd
0x2a0b…2a1b at000e = ╱ee╱)╱ // 0x2a19 @0xe
0x2a0b…2a1b at000f = EOL // 0x2a1a @0xf
0x2a0b…2a1b }
0x2a1b…2a21 b778 4980 ENDIF
0x2a1b…2a21 LineComalBin {
0x2a1b…2a21 ptr = 0xb778 // 0x2a1b @0x0
0x2a1b…2a21 lno = 0x1374 // 0x2a1d @0x2
0x2a1b…2a21 at0004 = ╱9b╱ ENDIF ╱ // 0x2a1f @0x4
0x2a1b…2a21 at0005 = EOL // 0x2a20 @0x5
0x2a1b…2a21 }
0x2a21…2a34 b78b 4990 EXEC EGEM(FTOTAL$)
0x2a21…2a34 LineComalBin {
0x2a21…2a34 ptr = 0xb78b // 0x2a21 @0x0
0x2a21…2a34 lno = 0x137e // 0x2a23 @0x2
0x2a21…2a34 at0004 = ╱9d╱ EXEC ╱ // 0x2a25 @0x4
0x2a21…2a34 at0005 = ╱45╱E╱ // 0x2a26 @0x5
0x2a21…2a34 at0006 = ╱47╱G╱ // 0x2a27 @0x6
0x2a21…2a34 at0007 = ╱45╱E╱ // 0x2a28 @0x7
0x2a21…2a34 at0008 = ╱4d╱M╱ // 0x2a29 @0x8
0x2a21…2a34 at0009 = ╱ed╱(╱ // 0x2a2a @0x9
0x2a21…2a34 at000a = ╱46╱F╱ // 0x2a2b @0xa
0x2a21…2a34 at000b = ╱54╱T╱ // 0x2a2c @0xb
0x2a21…2a34 at000c = ╱4f╱O╱ // 0x2a2d @0xc
0x2a21…2a34 at000d = ╱54╱T╱ // 0x2a2e @0xd
0x2a21…2a34 at000e = ╱41╱A╱ // 0x2a2f @0xe
0x2a21…2a34 at000f = ╱4c╱L╱ // 0x2a30 @0xf
0x2a21…2a34 at0010 = ╱ef╱$╱ // 0x2a31 @0x10
0x2a21…2a34 at0011 = ╱ee╱)╱ // 0x2a32 @0x11
0x2a21…2a34 at0012 = EOL // 0x2a33 @0x12
0x2a21…2a34 }
0x2a34…2a3e b795 5000 I=I-E
0x2a34…2a3e LineComalBin {
0x2a34…2a3e ptr = 0xb795 // 0x2a34 @0x0
0x2a34…2a3e lno = 0x1388 // 0x2a36 @0x2
0x2a34…2a3e at0004 = ╱49╱I╱ // 0x2a38 @0x4
0x2a34…2a3e at0005 = ╱dc╱=╱ // 0x2a39 @0x5
0x2a34…2a3e at0006 = ╱49╱I╱ // 0x2a3a @0x6
0x2a34…2a3e at0007 = ╱e3╱-╱ // 0x2a3b @0x7
0x2a34…2a3e at0008 = ╱45╱E╱ // 0x2a3c @0x8
0x2a34…2a3e at0009 = EOL // 0x2a3d @0x9
0x2a34…2a3e }
0x2a3e…2a50 b7a7 5010 EXEC KODE(1)
0x2a3e…2a50 LineComalBin {
0x2a3e…2a50 ptr = 0xb7a7 // 0x2a3e @0x0
0x2a3e…2a50 lno = 0x1392 // 0x2a40 @0x2
0x2a3e…2a50 at0004 = ╱9d╱ EXEC ╱ // 0x2a42 @0x4
0x2a3e…2a50 at0005 = ╱4b╱K╱ // 0x2a43 @0x5
0x2a3e…2a50 at0006 = ╱4f╱O╱ // 0x2a44 @0x6
0x2a3e…2a50 at0007 = ╱44╱D╱ // 0x2a45 @0x7
0x2a3e…2a50 at0008 = ╱45╱E╱ // 0x2a46 @0x8
0x2a3e…2a50 at0009 = ╱ed╱(╱ // 0x2a47 @0x9
0x2a3e…2a50 at000a = ╱31╱1╱ // 0x2a48 @0xa
0x2a3e…2a50 at000b = ╱fe00008001╱ // 0x2a49 @0xb
0x2a3e…2a50 at0010 = ╱ee╱)╱ // 0x2a4e @0x10
0x2a3e…2a50 at0011 = EOL // 0x2a4f @0x11
0x2a3e…2a50 }
0x2a50…2a7d b7d4 5020 IF LEVKODE=11 THEN KOD$=CHR(11+ORD(KOD$))
0x2a50…2a7d LineComalBin {
0x2a50…2a7d ptr = 0xb7d4 // 0x2a50 @0x0
0x2a50…2a7d lno = 0x139c // 0x2a52 @0x2
0x2a50…2a7d at0004 = ╱82╱ IF ╱ // 0x2a54 @0x4
0x2a50…2a7d at0005 = ╱4c╱L╱ // 0x2a55 @0x5
0x2a50…2a7d at0006 = ╱45╱E╱ // 0x2a56 @0x6
0x2a50…2a7d at0007 = ╱56╱V╱ // 0x2a57 @0x7
0x2a50…2a7d at0008 = ╱4b╱K╱ // 0x2a58 @0x8
0x2a50…2a7d at0009 = ╱4f╱O╱ // 0x2a59 @0x9
0x2a50…2a7d at000a = ╱44╱D╱ // 0x2a5a @0xa
0x2a50…2a7d at000b = ╱45╱E╱ // 0x2a5b @0xb
0x2a50…2a7d at000c = ╱dc╱=╱ // 0x2a5c @0xc
0x2a50…2a7d at000d = ╱31╱1╱ // 0x2a5d @0xd
0x2a50…2a7d at000e = ╱31╱1╱ // 0x2a5e @0xe
0x2a50…2a7d at000f = ╱fe0000b004╱ // 0x2a5f @0xf
0x2a50…2a7d at0014 = ╱b6╱ THEN ╱ // 0x2a64 @0x14
0x2a50…2a7d at0015 = ╱4b╱K╱ // 0x2a65 @0x15
0x2a50…2a7d at0016 = ╱4f╱O╱ // 0x2a66 @0x16
0x2a50…2a7d at0017 = ╱44╱D╱ // 0x2a67 @0x17
0x2a50…2a7d at0018 = ╱ef╱$╱ // 0x2a68 @0x18
0x2a50…2a7d at0019 = ╱dc╱=╱ // 0x2a69 @0x19
0x2a50…2a7d at001a = ╱cf╱CHR╱ // 0x2a6a @0x1a
0x2a50…2a7d at001b = ╱ed╱(╱ // 0x2a6b @0x1b
0x2a50…2a7d at001c = ╱31╱1╱ // 0x2a6c @0x1c
0x2a50…2a7d at001d = ╱31╱1╱ // 0x2a6d @0x1d
0x2a50…2a7d at001e = ╱fe0000b004╱ // 0x2a6e @0x1e
0x2a50…2a7d at0023 = ╱e2╱+╱ // 0x2a73 @0x23
0x2a50…2a7d at0024 = ╱cd╱ORD╱ // 0x2a74 @0x24
0x2a50…2a7d at0025 = ╱ed╱(╱ // 0x2a75 @0x25
0x2a50…2a7d at0026 = ╱4b╱K╱ // 0x2a76 @0x26
0x2a50…2a7d at0027 = ╱4f╱O╱ // 0x2a77 @0x27
0x2a50…2a7d at0028 = ╱44╱D╱ // 0x2a78 @0x28
0x2a50…2a7d at0029 = ╱ef╱$╱ // 0x2a79 @0x29
0x2a50…2a7d at002a = ╱ee╱)╱ // 0x2a7a @0x2a
0x2a50…2a7d at002b = ╱ee╱)╱ // 0x2a7b @0x2b
0x2a50…2a7d at002c = EOL // 0x2a7c @0x2c
0x2a50…2a7d }
0x2a7d…2aa7 b7fe 5030 PUT K6$,APOS+G:ORDRENR,FDATO,I-APOS,KOD$
0x2a7d…2aa7 LineComalBin {
0x2a7d…2aa7 ptr = 0xb7fe // 0x2a7d @0x0
0x2a7d…2aa7 lno = 0x13a6 // 0x2a7f @0x2
0x2a7d…2aa7 at0004 = ╱aa╱ PUT ╱ // 0x2a81 @0x4
0x2a7d…2aa7 at0005 = ╱4b╱K╱ // 0x2a82 @0x5
0x2a7d…2aa7 at0006 = ╱36╱6╱ // 0x2a83 @0x6
0x2a7d…2aa7 at0007 = ╱ef╱$╱ // 0x2a84 @0x7
0x2a7d…2aa7 at0008 = ╱ec╱,╱ // 0x2a85 @0x8
0x2a7d…2aa7 at0009 = ╱41╱A╱ // 0x2a86 @0x9
0x2a7d…2aa7 at000a = ╱50╱P╱ // 0x2a87 @0xa
0x2a7d…2aa7 at000b = ╱4f╱O╱ // 0x2a88 @0xb
0x2a7d…2aa7 at000c = ╱53╱S╱ // 0x2a89 @0xc
0x2a7d…2aa7 at000d = ╱e2╱+╱ // 0x2a8a @0xd
0x2a7d…2aa7 at000e = ╱47╱G╱ // 0x2a8b @0xe
0x2a7d…2aa7 at000f = ╱f0╱:╱ // 0x2a8c @0xf
0x2a7d…2aa7 at0010 = ╱4f╱O╱ // 0x2a8d @0x10
0x2a7d…2aa7 at0011 = ╱52╱R╱ // 0x2a8e @0x11
0x2a7d…2aa7 at0012 = ╱44╱D╱ // 0x2a8f @0x12
0x2a7d…2aa7 at0013 = ╱52╱R╱ // 0x2a90 @0x13
0x2a7d…2aa7 at0014 = ╱45╱E╱ // 0x2a91 @0x14
0x2a7d…2aa7 at0015 = ╱4e╱N╱ // 0x2a92 @0x15
0x2a7d…2aa7 at0016 = ╱52╱R╱ // 0x2a93 @0x16
0x2a7d…2aa7 at0017 = ╱ec╱,╱ // 0x2a94 @0x17
0x2a7d…2aa7 at0018 = ╱46╱F╱ // 0x2a95 @0x18
0x2a7d…2aa7 at0019 = ╱44╱D╱ // 0x2a96 @0x19
0x2a7d…2aa7 at001a = ╱41╱A╱ // 0x2a97 @0x1a
0x2a7d…2aa7 at001b = ╱54╱T╱ // 0x2a98 @0x1b
0x2a7d…2aa7 at001c = ╱4f╱O╱ // 0x2a99 @0x1c
0x2a7d…2aa7 at001d = ╱ec╱,╱ // 0x2a9a @0x1d
0x2a7d…2aa7 at001e = ╱49╱I╱ // 0x2a9b @0x1e
0x2a7d…2aa7 at001f = ╱e3╱-╱ // 0x2a9c @0x1f
0x2a7d…2aa7 at0020 = ╱41╱A╱ // 0x2a9d @0x20
0x2a7d…2aa7 at0021 = ╱50╱P╱ // 0x2a9e @0x21
0x2a7d…2aa7 at0022 = ╱4f╱O╱ // 0x2a9f @0x22
0x2a7d…2aa7 at0023 = ╱53╱S╱ // 0x2aa0 @0x23
0x2a7d…2aa7 at0024 = ╱ec╱,╱ // 0x2aa1 @0x24
0x2a7d…2aa7 at0025 = ╱4b╱K╱ // 0x2aa2 @0x25
0x2a7d…2aa7 at0026 = ╱4f╱O╱ // 0x2aa3 @0x26
0x2a7d…2aa7 at0027 = ╱44╱D╱ // 0x2aa4 @0x27
0x2a7d…2aa7 at0028 = ╱ef╱$╱ // 0x2aa5 @0x28
0x2a7d…2aa7 at0029 = EOL // 0x2aa6 @0x29
0x2a7d…2aa7 }
0x2aa7…2abe b815 5040 EXEC FE(V,10,K6$)
0x2aa7…2abe LineComalBin {
0x2aa7…2abe ptr = 0xb815 // 0x2aa7 @0x0
0x2aa7…2abe lno = 0x13b0 // 0x2aa9 @0x2
0x2aa7…2abe at0004 = ╱9d╱ EXEC ╱ // 0x2aab @0x4
0x2aa7…2abe at0005 = ╱46╱F╱ // 0x2aac @0x5
0x2aa7…2abe at0006 = ╱45╱E╱ // 0x2aad @0x6
0x2aa7…2abe at0007 = ╱ed╱(╱ // 0x2aae @0x7
0x2aa7…2abe at0008 = ╱56╱V╱ // 0x2aaf @0x8
0x2aa7…2abe at0009 = ╱ec╱,╱ // 0x2ab0 @0x9
0x2aa7…2abe at000a = ╱31╱1╱ // 0x2ab1 @0xa
0x2aa7…2abe at000b = ╱30╱0╱ // 0x2ab2 @0xb
0x2aa7…2abe at000c = ╱fe0000a004╱ // 0x2ab3 @0xc
0x2aa7…2abe at0011 = ╱ec╱,╱ // 0x2ab8 @0x11
0x2aa7…2abe at0012 = ╱4b╱K╱ // 0x2ab9 @0x12
0x2aa7…2abe at0013 = ╱36╱6╱ // 0x2aba @0x13
0x2aa7…2abe at0014 = ╱ef╱$╱ // 0x2abb @0x14
0x2aa7…2abe at0015 = ╱ee╱)╱ // 0x2abc @0x15
0x2aa7…2abe at0016 = EOL // 0x2abd @0x16
0x2aa7…2abe }
0x2abe…2ac9 b820 5050 APOS=I
0x2abe…2ac9 LineComalBin {
0x2abe…2ac9 ptr = 0xb820 // 0x2abe @0x0
0x2abe…2ac9 lno = 0x13ba // 0x2ac0 @0x2
0x2abe…2ac9 at0004 = ╱41╱A╱ // 0x2ac2 @0x4
0x2abe…2ac9 at0005 = ╱50╱P╱ // 0x2ac3 @0x5
0x2abe…2ac9 at0006 = ╱4f╱O╱ // 0x2ac4 @0x6
0x2abe…2ac9 at0007 = ╱53╱S╱ // 0x2ac5 @0x7
0x2abe…2ac9 at0008 = ╱dc╱=╱ // 0x2ac6 @0x8
0x2abe…2ac9 at0009 = ╱49╱I╱ // 0x2ac7 @0x9
0x2abe…2ac9 at000a = EOL // 0x2ac8 @0xa
0x2abe…2ac9 }
0x2ac9…2ad2 b829 5060 CLOSE K6$
0x2ac9…2ad2 LineComalBin {
0x2ac9…2ad2 ptr = 0xb829 // 0x2ac9 @0x0
0x2ac9…2ad2 lno = 0x13c4 // 0x2acb @0x2
0x2ac9…2ad2 at0004 = ╱a8╱ CLOSE ╱ // 0x2acd @0x4
0x2ac9…2ad2 at0005 = ╱4b╱K╱ // 0x2ace @0x5
0x2ac9…2ad2 at0006 = ╱36╱6╱ // 0x2acf @0x6
0x2ac9…2ad2 at0007 = ╱ef╱$╱ // 0x2ad0 @0x7
0x2ac9…2ad2 at0008 = EOL // 0x2ad1 @0x8
0x2ac9…2ad2 }
0x2ad2…2ae9 b840 5070 EXEC FE(V,11,K6$)
0x2ad2…2ae9 LineComalBin {
0x2ad2…2ae9 ptr = 0xb840 // 0x2ad2 @0x0
0x2ad2…2ae9 lno = 0x13ce // 0x2ad4 @0x2
0x2ad2…2ae9 at0004 = ╱9d╱ EXEC ╱ // 0x2ad6 @0x4
0x2ad2…2ae9 at0005 = ╱46╱F╱ // 0x2ad7 @0x5
0x2ad2…2ae9 at0006 = ╱45╱E╱ // 0x2ad8 @0x6
0x2ad2…2ae9 at0007 = ╱ed╱(╱ // 0x2ad9 @0x7
0x2ad2…2ae9 at0008 = ╱56╱V╱ // 0x2ada @0x8
0x2ad2…2ae9 at0009 = ╱ec╱,╱ // 0x2adb @0x9
0x2ad2…2ae9 at000a = ╱31╱1╱ // 0x2adc @0xa
0x2ad2…2ae9 at000b = ╱31╱1╱ // 0x2add @0xb
0x2ad2…2ae9 at000c = ╱fe0000b004╱ // 0x2ade @0xc
0x2ad2…2ae9 at0011 = ╱ec╱,╱ // 0x2ae3 @0x11
0x2ad2…2ae9 at0012 = ╱4b╱K╱ // 0x2ae4 @0x12
0x2ad2…2ae9 at0013 = ╱36╱6╱ // 0x2ae5 @0x13
0x2ad2…2ae9 at0014 = ╱ef╱$╱ // 0x2ae6 @0x14
0x2ad2…2ae9 at0015 = ╱ee╱)╱ // 0x2ae7 @0x15
0x2ad2…2ae9 at0016 = EOL // 0x2ae8 @0x16
0x2ad2…2ae9 }
0x2ae9…2aef b846 5080 ENDPROC
0x2ae9…2aef LineComalBin {
0x2ae9…2aef ptr = 0xb846 // 0x2ae9 @0x0
0x2ae9…2aef lno = 0x13d8 // 0x2aeb @0x2
0x2ae9…2aef at0004 = ╱9f╱ ENDPROC ╱ // 0x2aed @0x4
0x2ae9…2aef at0005 = EOL // 0x2aee @0x5
0x2ae9…2aef }
0x2aef…2af9 b850 5090 PROC TGEM
0x2aef…2af9 LineComalBin {
0x2aef…2af9 ptr = 0xb850 // 0x2aef @0x0
0x2aef…2af9 lno = 0x13e2 // 0x2af1 @0x2
0x2aef…2af9 at0004 = ╱9e╱ PROC ╱ // 0x2af3 @0x4
0x2aef…2af9 at0005 = ╱54╱T╱ // 0x2af4 @0x5
0x2aef…2af9 at0006 = ╱47╱G╱ // 0x2af5 @0x6
0x2aef…2af9 at0007 = ╱45╱E╱ // 0x2af6 @0x7
0x2aef…2af9 at0008 = ╱4d╱M╱ // 0x2af7 @0x8
0x2aef…2af9 at0009 = EOL // 0x2af8 @0x9
0x2aef…2af9 }
0x2af9…2b1a b871 5100 PUT K6$,I:VTARR$(LIE,E:13)
0x2af9…2b1a LineComalBin {
0x2af9…2b1a ptr = 0xb871 // 0x2af9 @0x0
0x2af9…2b1a lno = 0x13ec // 0x2afb @0x2
0x2af9…2b1a at0004 = ╱aa╱ PUT ╱ // 0x2afd @0x4
0x2af9…2b1a at0005 = ╱4b╱K╱ // 0x2afe @0x5
0x2af9…2b1a at0006 = ╱36╱6╱ // 0x2aff @0x6
0x2af9…2b1a at0007 = ╱ef╱$╱ // 0x2b00 @0x7
0x2af9…2b1a at0008 = ╱ec╱,╱ // 0x2b01 @0x8
0x2af9…2b1a at0009 = ╱49╱I╱ // 0x2b02 @0x9
0x2af9…2b1a at000a = ╱f0╱:╱ // 0x2b03 @0xa
0x2af9…2b1a at000b = ╱56╱V╱ // 0x2b04 @0xb
0x2af9…2b1a at000c = ╱54╱T╱ // 0x2b05 @0xc
0x2af9…2b1a at000d = ╱41╱A╱ // 0x2b06 @0xd
0x2af9…2b1a at000e = ╱52╱R╱ // 0x2b07 @0xe
0x2af9…2b1a at000f = ╱52╱R╱ // 0x2b08 @0xf
0x2af9…2b1a at0010 = ╱ef╱$╱ // 0x2b09 @0x10
0x2af9…2b1a at0011 = ╱ed╱(╱ // 0x2b0a @0x11
0x2af9…2b1a at0012 = ╱4c╱L╱ // 0x2b0b @0x12
0x2af9…2b1a at0013 = ╱49╱I╱ // 0x2b0c @0x13
0x2af9…2b1a at0014 = ╱45╱E╱ // 0x2b0d @0x14
0x2af9…2b1a at0015 = ╱ec╱,╱ // 0x2b0e @0x15
0x2af9…2b1a at0016 = ╱45╱E╱ // 0x2b0f @0x16
0x2af9…2b1a at0017 = ╱f0╱:╱ // 0x2b10 @0x17
0x2af9…2b1a at0018 = ╱31╱1╱ // 0x2b11 @0x18
0x2af9…2b1a at0019 = ╱33╱3╱ // 0x2b12 @0x19
0x2af9…2b1a at001a = ╱fe0000d004╱ // 0x2b13 @0x1a
0x2af9…2b1a at001f = ╱ee╱)╱ // 0x2b18 @0x1f
0x2af9…2b1a at0020 = EOL // 0x2b19 @0x20
0x2af9…2b1a }
0x2b1a…2b30 b887 5110 EXEC FE(4,E,K6$)
0x2b1a…2b30 LineComalBin {
0x2b1a…2b30 ptr = 0xb887 // 0x2b1a @0x0
0x2b1a…2b30 lno = 0x13f6 // 0x2b1c @0x2
0x2b1a…2b30 at0004 = ╱9d╱ EXEC ╱ // 0x2b1e @0x4
0x2b1a…2b30 at0005 = ╱46╱F╱ // 0x2b1f @0x5
0x2b1a…2b30 at0006 = ╱45╱E╱ // 0x2b20 @0x6
0x2b1a…2b30 at0007 = ╱ed╱(╱ // 0x2b21 @0x7
0x2b1a…2b30 at0008 = ╱34╱4╱ // 0x2b22 @0x8
0x2b1a…2b30 at0009 = ╱fe00008003╱ // 0x2b23 @0x9
0x2b1a…2b30 at000e = ╱ec╱,╱ // 0x2b28 @0xe
0x2b1a…2b30 at000f = ╱45╱E╱ // 0x2b29 @0xf
0x2b1a…2b30 at0010 = ╱ec╱,╱ // 0x2b2a @0x10
0x2b1a…2b30 at0011 = ╱4b╱K╱ // 0x2b2b @0x11
0x2b1a…2b30 at0012 = ╱36╱6╱ // 0x2b2c @0x12
0x2b1a…2b30 at0013 = ╱ef╱$╱ // 0x2b2d @0x13
0x2b1a…2b30 at0014 = ╱ee╱)╱ // 0x2b2e @0x14
0x2b1a…2b30 at0015 = EOL // 0x2b2f @0x15
0x2b1a…2b30 }
0x2b30…2b61 b8b8 5120 TAL4$=VTARR$(LIE,14:12)+KOD$;I=I+G
0x2b30…2b61 LineComalBin {
0x2b30…2b61 ptr = 0xb8b8 // 0x2b30 @0x0
0x2b30…2b61 lno = 0x1400 // 0x2b32 @0x2
0x2b30…2b61 at0004 = ╱54╱T╱ // 0x2b34 @0x4
0x2b30…2b61 at0005 = ╱41╱A╱ // 0x2b35 @0x5
0x2b30…2b61 at0006 = ╱4c╱L╱ // 0x2b36 @0x6
0x2b30…2b61 at0007 = ╱34╱4╱ // 0x2b37 @0x7
0x2b30…2b61 at0008 = ╱ef╱$╱ // 0x2b38 @0x8
0x2b30…2b61 at0009 = ╱dc╱=╱ // 0x2b39 @0x9
0x2b30…2b61 at000a = ╱56╱V╱ // 0x2b3a @0xa
0x2b30…2b61 at000b = ╱54╱T╱ // 0x2b3b @0xb
0x2b30…2b61 at000c = ╱41╱A╱ // 0x2b3c @0xc
0x2b30…2b61 at000d = ╱52╱R╱ // 0x2b3d @0xd
0x2b30…2b61 at000e = ╱52╱R╱ // 0x2b3e @0xe
0x2b30…2b61 at000f = ╱ef╱$╱ // 0x2b3f @0xf
0x2b30…2b61 at0010 = ╱ed╱(╱ // 0x2b40 @0x10
0x2b30…2b61 at0011 = ╱4c╱L╱ // 0x2b41 @0x11
0x2b30…2b61 at0012 = ╱49╱I╱ // 0x2b42 @0x12
0x2b30…2b61 at0013 = ╱45╱E╱ // 0x2b43 @0x13
0x2b30…2b61 at0014 = ╱ec╱,╱ // 0x2b44 @0x14
0x2b30…2b61 at0015 = ╱31╱1╱ // 0x2b45 @0x15
0x2b30…2b61 at0016 = ╱34╱4╱ // 0x2b46 @0x16
0x2b30…2b61 at0017 = ╱fe0000e004╱ // 0x2b47 @0x17
0x2b30…2b61 at001c = ╱f0╱:╱ // 0x2b4c @0x1c
0x2b30…2b61 at001d = ╱31╱1╱ // 0x2b4d @0x1d
0x2b30…2b61 at001e = ╱32╱2╱ // 0x2b4e @0x1e
0x2b30…2b61 at001f = ╱fe0000c004╱ // 0x2b4f @0x1f
0x2b30…2b61 at0024 = ╱ee╱)╱ // 0x2b54 @0x24
0x2b30…2b61 at0025 = ╱f1╱+╱ // 0x2b55 @0x25
0x2b30…2b61 at0026 = ╱4b╱K╱ // 0x2b56 @0x26
0x2b30…2b61 at0027 = ╱4f╱O╱ // 0x2b57 @0x27
0x2b30…2b61 at0028 = ╱44╱D╱ // 0x2b58 @0x28
0x2b30…2b61 at0029 = ╱ef╱$╱ // 0x2b59 @0x29
0x2b30…2b61 at002a = ╱eb╱;╱ // 0x2b5a @0x2a
0x2b30…2b61 at002b = ╱49╱I╱ // 0x2b5b @0x2b
0x2b30…2b61 at002c = ╱dc╱=╱ // 0x2b5c @0x2c
0x2b30…2b61 at002d = ╱49╱I╱ // 0x2b5d @0x2d
0x2b30…2b61 at002e = ╱e2╱+╱ // 0x2b5e @0x2e
0x2b30…2b61 at002f = ╱47╱G╱ // 0x2b5f @0x2f
0x2b30…2b61 at0030 = EOL // 0x2b60 @0x30
0x2b30…2b61 }
0x2b61…2b7f b8d6 5130 PUT K6$,I-E:TAL4$(E:13)
0x2b61…2b7f LineComalBin {
0x2b61…2b7f ptr = 0xb8d6 // 0x2b61 @0x0
0x2b61…2b7f lno = 0x140a // 0x2b63 @0x2
0x2b61…2b7f at0004 = ╱aa╱ PUT ╱ // 0x2b65 @0x4
0x2b61…2b7f at0005 = ╱4b╱K╱ // 0x2b66 @0x5
0x2b61…2b7f at0006 = ╱36╱6╱ // 0x2b67 @0x6
0x2b61…2b7f at0007 = ╱ef╱$╱ // 0x2b68 @0x7
0x2b61…2b7f at0008 = ╱ec╱,╱ // 0x2b69 @0x8
0x2b61…2b7f at0009 = ╱49╱I╱ // 0x2b6a @0x9
0x2b61…2b7f at000a = ╱e3╱-╱ // 0x2b6b @0xa
0x2b61…2b7f at000b = ╱45╱E╱ // 0x2b6c @0xb
0x2b61…2b7f at000c = ╱f0╱:╱ // 0x2b6d @0xc
0x2b61…2b7f at000d = ╱54╱T╱ // 0x2b6e @0xd
0x2b61…2b7f at000e = ╱41╱A╱ // 0x2b6f @0xe
0x2b61…2b7f at000f = ╱4c╱L╱ // 0x2b70 @0xf
0x2b61…2b7f at0010 = ╱34╱4╱ // 0x2b71 @0x10
0x2b61…2b7f at0011 = ╱ef╱$╱ // 0x2b72 @0x11
0x2b61…2b7f at0012 = ╱ed╱(╱ // 0x2b73 @0x12
0x2b61…2b7f at0013 = ╱45╱E╱ // 0x2b74 @0x13
0x2b61…2b7f at0014 = ╱f0╱:╱ // 0x2b75 @0x14
0x2b61…2b7f at0015 = ╱31╱1╱ // 0x2b76 @0x15
0x2b61…2b7f at0016 = ╱33╱3╱ // 0x2b77 @0x16
0x2b61…2b7f at0017 = ╱fe0000d004╱ // 0x2b78 @0x17
0x2b61…2b7f at001c = ╱ee╱)╱ // 0x2b7d @0x1c
0x2b61…2b7f at001d = EOL // 0x2b7e @0x1d
0x2b61…2b7f }
0x2b7f…2b95 b8ec 5140 EXEC FE(4,G,K6$)
0x2b7f…2b95 LineComalBin {
0x2b7f…2b95 ptr = 0xb8ec // 0x2b7f @0x0
0x2b7f…2b95 lno = 0x1414 // 0x2b81 @0x2
0x2b7f…2b95 at0004 = ╱9d╱ EXEC ╱ // 0x2b83 @0x4
0x2b7f…2b95 at0005 = ╱46╱F╱ // 0x2b84 @0x5
0x2b7f…2b95 at0006 = ╱45╱E╱ // 0x2b85 @0x6
0x2b7f…2b95 at0007 = ╱ed╱(╱ // 0x2b86 @0x7
0x2b7f…2b95 at0008 = ╱34╱4╱ // 0x2b87 @0x8
0x2b7f…2b95 at0009 = ╱fe00008003╱ // 0x2b88 @0x9
0x2b7f…2b95 at000e = ╱ec╱,╱ // 0x2b8d @0xe
0x2b7f…2b95 at000f = ╱47╱G╱ // 0x2b8e @0xf
0x2b7f…2b95 at0010 = ╱ec╱,╱ // 0x2b8f @0x10
0x2b7f…2b95 at0011 = ╱4b╱K╱ // 0x2b90 @0x11
0x2b7f…2b95 at0012 = ╱36╱6╱ // 0x2b91 @0x12
0x2b7f…2b95 at0013 = ╱ef╱$╱ // 0x2b92 @0x13
0x2b7f…2b95 at0014 = ╱ee╱)╱ // 0x2b93 @0x14
0x2b7f…2b95 at0015 = EOL // 0x2b94 @0x15
0x2b7f…2b95 }
0x2b95…2bab b902 5145 LE=LEN(VTARR$(LIE))
0x2b95…2bab LineComalBin {
0x2b95…2bab ptr = 0xb902 // 0x2b95 @0x0
0x2b95…2bab lno = 0x1419 // 0x2b97 @0x2
0x2b95…2bab at0004 = ╱4c╱L╱ // 0x2b99 @0x4
0x2b95…2bab at0005 = ╱45╱E╱ // 0x2b9a @0x5
0x2b95…2bab at0006 = ╱dc╱=╱ // 0x2b9b @0x6
0x2b95…2bab at0007 = ╱cc╱LEN╱ // 0x2b9c @0x7
0x2b95…2bab at0008 = ╱ed╱(╱ // 0x2b9d @0x8
0x2b95…2bab at0009 = ╱56╱V╱ // 0x2b9e @0x9
0x2b95…2bab at000a = ╱54╱T╱ // 0x2b9f @0xa
0x2b95…2bab at000b = ╱41╱A╱ // 0x2ba0 @0xb
0x2b95…2bab at000c = ╱52╱R╱ // 0x2ba1 @0xc
0x2b95…2bab at000d = ╱52╱R╱ // 0x2ba2 @0xd
0x2b95…2bab at000e = ╱ef╱$╱ // 0x2ba3 @0xe
0x2b95…2bab at000f = ╱ed╱(╱ // 0x2ba4 @0xf
0x2b95…2bab at0010 = ╱4c╱L╱ // 0x2ba5 @0x10
0x2b95…2bab at0011 = ╱49╱I╱ // 0x2ba6 @0x11
0x2b95…2bab at0012 = ╱45╱E╱ // 0x2ba7 @0x12
0x2b95…2bab at0013 = ╱ee╱)╱ // 0x2ba8 @0x13
0x2b95…2bab at0014 = ╱ee╱)╱ // 0x2ba9 @0x14
0x2b95…2bab at0015 = EOL // 0x2baa @0x15
0x2b95…2bab }
0x2bab…2bc9 b920 5150 IF VNARR(LIE)=G AND LE>24 THEN
0x2bab…2bc9 LineComalBin {
0x2bab…2bc9 ptr = 0xb920 // 0x2bab @0x0
0x2bab…2bc9 lno = 0x141e // 0x2bad @0x2
0x2bab…2bc9 at0004 = ╱9c╱ IF ╱ // 0x2baf @0x4
0x2bab…2bc9 at0005 = ╱56╱V╱ // 0x2bb0 @0x5
0x2bab…2bc9 at0006 = ╱4e╱N╱ // 0x2bb1 @0x6
0x2bab…2bc9 at0007 = ╱41╱A╱ // 0x2bb2 @0x7
0x2bab…2bc9 at0008 = ╱52╱R╱ // 0x2bb3 @0x8
0x2bab…2bc9 at0009 = ╱52╱R╱ // 0x2bb4 @0x9
0x2bab…2bc9 at000a = ╱ed╱(╱ // 0x2bb5 @0xa
0x2bab…2bc9 at000b = ╱4c╱L╱ // 0x2bb6 @0xb
0x2bab…2bc9 at000c = ╱49╱I╱ // 0x2bb7 @0xc
0x2bab…2bc9 at000d = ╱45╱E╱ // 0x2bb8 @0xd
0x2bab…2bc9 at000e = ╱ee╱)╱ // 0x2bb9 @0xe
0x2bab…2bc9 at000f = ╱dc╱=╱ // 0x2bba @0xf
0x2bab…2bc9 at0010 = ╱47╱G╱ // 0x2bbb @0x10
0x2bab…2bc9 at0011 = ╱da╱ AND ╱ // 0x2bbc @0x11
0x2bab…2bc9 at0012 = ╱4c╱L╱ // 0x2bbd @0x12
0x2bab…2bc9 at0013 = ╱45╱E╱ // 0x2bbe @0x13
0x2bab…2bc9 at0014 = ╱de╱>╱ // 0x2bbf @0x14
0x2bab…2bc9 at0015 = ╱32╱2╱ // 0x2bc0 @0x15
0x2bab…2bc9 at0016 = ╱34╱4╱ // 0x2bc1 @0x16
0x2bab…2bc9 at0017 = ╱fe0000c005╱ // 0x2bc2 @0x17
0x2bab…2bc9 at001c = ╱b6╱ THEN ╱ // 0x2bc7 @0x1c
0x2bab…2bc9 at001d = EOL // 0x2bc8 @0x1d
0x2bab…2bc9 }
0x2bc9…2bf0 b947 5160 PUT K6$,I:VTARR$(LIE,26:13)
0x2bc9…2bf0 LineComalBin {
0x2bc9…2bf0 ptr = 0xb947 // 0x2bc9 @0x0
0x2bc9…2bf0 lno = 0x1428 // 0x2bcb @0x2
0x2bc9…2bf0 at0004 = ╱aa╱ PUT ╱ // 0x2bcd @0x4
0x2bc9…2bf0 at0005 = ╱4b╱K╱ // 0x2bce @0x5
0x2bc9…2bf0 at0006 = ╱36╱6╱ // 0x2bcf @0x6
0x2bc9…2bf0 at0007 = ╱ef╱$╱ // 0x2bd0 @0x7
0x2bc9…2bf0 at0008 = ╱ec╱,╱ // 0x2bd1 @0x8
0x2bc9…2bf0 at0009 = ╱49╱I╱ // 0x2bd2 @0x9
0x2bc9…2bf0 at000a = ╱f0╱:╱ // 0x2bd3 @0xa
0x2bc9…2bf0 at000b = ╱56╱V╱ // 0x2bd4 @0xb
0x2bc9…2bf0 at000c = ╱54╱T╱ // 0x2bd5 @0xc
0x2bc9…2bf0 at000d = ╱41╱A╱ // 0x2bd6 @0xd
0x2bc9…2bf0 at000e = ╱52╱R╱ // 0x2bd7 @0xe
0x2bc9…2bf0 at000f = ╱52╱R╱ // 0x2bd8 @0xf
0x2bc9…2bf0 at0010 = ╱ef╱$╱ // 0x2bd9 @0x10
0x2bc9…2bf0 at0011 = ╱ed╱(╱ // 0x2bda @0x11
0x2bc9…2bf0 at0012 = ╱4c╱L╱ // 0x2bdb @0x12
0x2bc9…2bf0 at0013 = ╱49╱I╱ // 0x2bdc @0x13
0x2bc9…2bf0 at0014 = ╱45╱E╱ // 0x2bdd @0x14
0x2bc9…2bf0 at0015 = ╱ec╱,╱ // 0x2bde @0x15
0x2bc9…2bf0 at0016 = ╱32╱2╱ // 0x2bdf @0x16
0x2bc9…2bf0 at0017 = ╱36╱6╱ // 0x2be0 @0x17
0x2bc9…2bf0 at0018 = ╱fe0000d005╱ // 0x2be1 @0x18
0x2bc9…2bf0 at001d = ╱f0╱:╱ // 0x2be6 @0x1d
0x2bc9…2bf0 at001e = ╱31╱1╱ // 0x2be7 @0x1e
0x2bc9…2bf0 at001f = ╱33╱3╱ // 0x2be8 @0x1f
0x2bc9…2bf0 at0020 = ╱fe0000d004╱ // 0x2be9 @0x20
0x2bc9…2bf0 at0025 = ╱ee╱)╱ // 0x2bee @0x25
0x2bc9…2bf0 at0026 = EOL // 0x2bef @0x26
0x2bc9…2bf0 }
0x2bf0…2c07 b95e 5170 EXEC FE(99,E,K6$)
0x2bf0…2c07 LineComalBin {
0x2bf0…2c07 ptr = 0xb95e // 0x2bf0 @0x0
0x2bf0…2c07 lno = 0x1432 // 0x2bf2 @0x2
0x2bf0…2c07 at0004 = ╱9d╱ EXEC ╱ // 0x2bf4 @0x4
0x2bf0…2c07 at0005 = ╱46╱F╱ // 0x2bf5 @0x5
0x2bf0…2c07 at0006 = ╱45╱E╱ // 0x2bf6 @0x6
0x2bf0…2c07 at0007 = ╱ed╱(╱ // 0x2bf7 @0x7
0x2bf0…2c07 at0008 = ╱39╱9╱ // 0x2bf8 @0x8
0x2bf0…2c07 at0009 = ╱39╱9╱ // 0x2bf9 @0x9
0x2bf0…2c07 at000a = ╱fe0000c607╱ // 0x2bfa @0xa
0x2bf0…2c07 at000f = ╱ec╱,╱ // 0x2bff @0xf
0x2bf0…2c07 at0010 = ╱45╱E╱ // 0x2c00 @0x10
0x2bf0…2c07 at0011 = ╱ec╱,╱ // 0x2c01 @0x11
0x2bf0…2c07 at0012 = ╱4b╱K╱ // 0x2c02 @0x12
0x2bf0…2c07 at0013 = ╱36╱6╱ // 0x2c03 @0x13
0x2bf0…2c07 at0014 = ╱ef╱$╱ // 0x2c04 @0x14
0x2bf0…2c07 at0015 = ╱ee╱)╱ // 0x2c05 @0x15
0x2bf0…2c07 at0016 = EOL // 0x2c06 @0x16
0x2bf0…2c07 }
0x2c07…2c11 b968 5180 I=I+G
0x2c07…2c11 LineComalBin {
0x2c07…2c11 ptr = 0xb968 // 0x2c07 @0x0
0x2c07…2c11 lno = 0x143c // 0x2c09 @0x2
0x2c07…2c11 at0004 = ╱49╱I╱ // 0x2c0b @0x4
0x2c07…2c11 at0005 = ╱dc╱=╱ // 0x2c0c @0x5
0x2c07…2c11 at0006 = ╱49╱I╱ // 0x2c0d @0x6
0x2c07…2c11 at0007 = ╱e2╱+╱ // 0x2c0e @0x7
0x2c07…2c11 at0008 = ╱47╱G╱ // 0x2c0f @0x8
0x2c07…2c11 at0009 = EOL // 0x2c10 @0x9
0x2c07…2c11 }
0x2c11…2c3a b991 5190 PUT K6$,I-E:VTARR$(LIE,39:12)
0x2c11…2c3a LineComalBin {
0x2c11…2c3a ptr = 0xb991 // 0x2c11 @0x0
0x2c11…2c3a lno = 0x1446 // 0x2c13 @0x2
0x2c11…2c3a at0004 = ╱aa╱ PUT ╱ // 0x2c15 @0x4
0x2c11…2c3a at0005 = ╱4b╱K╱ // 0x2c16 @0x5
0x2c11…2c3a at0006 = ╱36╱6╱ // 0x2c17 @0x6
0x2c11…2c3a at0007 = ╱ef╱$╱ // 0x2c18 @0x7
0x2c11…2c3a at0008 = ╱ec╱,╱ // 0x2c19 @0x8
0x2c11…2c3a at0009 = ╱49╱I╱ // 0x2c1a @0x9
0x2c11…2c3a at000a = ╱e3╱-╱ // 0x2c1b @0xa
0x2c11…2c3a at000b = ╱45╱E╱ // 0x2c1c @0xb
0x2c11…2c3a at000c = ╱f0╱:╱ // 0x2c1d @0xc
0x2c11…2c3a at000d = ╱56╱V╱ // 0x2c1e @0xd
0x2c11…2c3a at000e = ╱54╱T╱ // 0x2c1f @0xe
0x2c11…2c3a at000f = ╱41╱A╱ // 0x2c20 @0xf
0x2c11…2c3a at0010 = ╱52╱R╱ // 0x2c21 @0x10
0x2c11…2c3a at0011 = ╱52╱R╱ // 0x2c22 @0x11
0x2c11…2c3a at0012 = ╱ef╱$╱ // 0x2c23 @0x12
0x2c11…2c3a at0013 = ╱ed╱(╱ // 0x2c24 @0x13
0x2c11…2c3a at0014 = ╱4c╱L╱ // 0x2c25 @0x14
0x2c11…2c3a at0015 = ╱49╱I╱ // 0x2c26 @0x15
0x2c11…2c3a at0016 = ╱45╱E╱ // 0x2c27 @0x16
0x2c11…2c3a at0017 = ╱ec╱,╱ // 0x2c28 @0x17
0x2c11…2c3a at0018 = ╱33╱3╱ // 0x2c29 @0x18
0x2c11…2c3a at0019 = ╱39╱9╱ // 0x2c2a @0x19
0x2c11…2c3a at001a = ╱fe00009c06╱ // 0x2c2b @0x1a
0x2c11…2c3a at001f = ╱f0╱:╱ // 0x2c30 @0x1f
0x2c11…2c3a at0020 = ╱31╱1╱ // 0x2c31 @0x20
0x2c11…2c3a at0021 = ╱32╱2╱ // 0x2c32 @0x21
0x2c11…2c3a at0022 = ╱fe0000c004╱ // 0x2c33 @0x22
0x2c11…2c3a at0027 = ╱ee╱)╱ // 0x2c38 @0x27
0x2c11…2c3a at0028 = EOL // 0x2c39 @0x28
0x2c11…2c3a }
0x2c3a…2c51 b9a8 5200 EXEC FE(99,G,K6$)
0x2c3a…2c51 LineComalBin {
0x2c3a…2c51 ptr = 0xb9a8 // 0x2c3a @0x0
0x2c3a…2c51 lno = 0x1450 // 0x2c3c @0x2
0x2c3a…2c51 at0004 = ╱9d╱ EXEC ╱ // 0x2c3e @0x4
0x2c3a…2c51 at0005 = ╱46╱F╱ // 0x2c3f @0x5
0x2c3a…2c51 at0006 = ╱45╱E╱ // 0x2c40 @0x6
0x2c3a…2c51 at0007 = ╱ed╱(╱ // 0x2c41 @0x7
0x2c3a…2c51 at0008 = ╱39╱9╱ // 0x2c42 @0x8
0x2c3a…2c51 at0009 = ╱39╱9╱ // 0x2c43 @0x9
0x2c3a…2c51 at000a = ╱fe0000c607╱ // 0x2c44 @0xa
0x2c3a…2c51 at000f = ╱ec╱,╱ // 0x2c49 @0xf
0x2c3a…2c51 at0010 = ╱47╱G╱ // 0x2c4a @0x10
0x2c3a…2c51 at0011 = ╱ec╱,╱ // 0x2c4b @0x11
0x2c3a…2c51 at0012 = ╱4b╱K╱ // 0x2c4c @0x12
0x2c3a…2c51 at0013 = ╱36╱6╱ // 0x2c4d @0x13
0x2c3a…2c51 at0014 = ╱ef╱$╱ // 0x2c4e @0x14
0x2c3a…2c51 at0015 = ╱ee╱)╱ // 0x2c4f @0x15
0x2c3a…2c51 at0016 = EOL // 0x2c50 @0x16
0x2c3a…2c51 }
0x2c51…2c57 b9ae 5210 ENDIF
0x2c51…2c57 LineComalBin {
0x2c51…2c57 ptr = 0xb9ae // 0x2c51 @0x0
0x2c51…2c57 lno = 0x145a // 0x2c53 @0x2
0x2c51…2c57 at0004 = ╱9b╱ ENDIF ╱ // 0x2c55 @0x4
0x2c51…2c57 at0005 = EOL // 0x2c56 @0x5
0x2c51…2c57 }
0x2c57…2c5d b9b4 5220 ENDPROC
0x2c57…2c5d LineComalBin {
0x2c57…2c5d ptr = 0xb9b4 // 0x2c57 @0x0
0x2c57…2c5d lno = 0x1464 // 0x2c59 @0x2
0x2c57…2c5d at0004 = ╱9f╱ ENDPROC ╱ // 0x2c5b @0x4
0x2c57…2c5d at0005 = EOL // 0x2c5c @0x5
0x2c57…2c5d }
0x2c5d…2c6c b9c3 5230 PROC EGEM(BEL)
0x2c5d…2c6c LineComalBin {
0x2c5d…2c6c ptr = 0xb9c3 // 0x2c5d @0x0
0x2c5d…2c6c lno = 0x146e // 0x2c5f @0x2
0x2c5d…2c6c at0004 = ╱9e╱ PROC ╱ // 0x2c61 @0x4
0x2c5d…2c6c at0005 = ╱45╱E╱ // 0x2c62 @0x5
0x2c5d…2c6c at0006 = ╱47╱G╱ // 0x2c63 @0x6
0x2c5d…2c6c at0007 = ╱45╱E╱ // 0x2c64 @0x7
0x2c5d…2c6c at0008 = ╱4d╱M╱ // 0x2c65 @0x8
0x2c5d…2c6c at0009 = ╱ed╱(╱ // 0x2c66 @0x9
0x2c5d…2c6c at000a = ╱42╱B╱ // 0x2c67 @0xa
0x2c5d…2c6c at000b = ╱45╱E╱ // 0x2c68 @0xb
0x2c5d…2c6c at000c = ╱4c╱L╱ // 0x2c69 @0xc
0x2c5d…2c6c at000d = ╱ee╱)╱ // 0x2c6a @0xd
0x2c5d…2c6c at000e = EOL // 0x2c6b @0xe
0x2c5d…2c6c }
0x2c6c…2c86 b9dd 5240 TAL4$=BEL$+KOD$;I=I+E
0x2c6c…2c86 LineComalBin {
0x2c6c…2c86 ptr = 0xb9dd // 0x2c6c @0x0
0x2c6c…2c86 lno = 0x1478 // 0x2c6e @0x2
0x2c6c…2c86 at0004 = ╱54╱T╱ // 0x2c70 @0x4
0x2c6c…2c86 at0005 = ╱41╱A╱ // 0x2c71 @0x5
0x2c6c…2c86 at0006 = ╱4c╱L╱ // 0x2c72 @0x6
0x2c6c…2c86 at0007 = ╱34╱4╱ // 0x2c73 @0x7
0x2c6c…2c86 at0008 = ╱ef╱$╱ // 0x2c74 @0x8
0x2c6c…2c86 at0009 = ╱dc╱=╱ // 0x2c75 @0x9
0x2c6c…2c86 at000a = ╱42╱B╱ // 0x2c76 @0xa
0x2c6c…2c86 at000b = ╱45╱E╱ // 0x2c77 @0xb
0x2c6c…2c86 at000c = ╱4c╱L╱ // 0x2c78 @0xc
0x2c6c…2c86 at000d = ╱ef╱$╱ // 0x2c79 @0xd
0x2c6c…2c86 at000e = ╱f1╱+╱ // 0x2c7a @0xe
0x2c6c…2c86 at000f = ╱4b╱K╱ // 0x2c7b @0xf
0x2c6c…2c86 at0010 = ╱4f╱O╱ // 0x2c7c @0x10
0x2c6c…2c86 at0011 = ╱44╱D╱ // 0x2c7d @0x11
0x2c6c…2c86 at0012 = ╱ef╱$╱ // 0x2c7e @0x12
0x2c6c…2c86 at0013 = ╱eb╱;╱ // 0x2c7f @0x13
0x2c6c…2c86 at0014 = ╱49╱I╱ // 0x2c80 @0x14
0x2c6c…2c86 at0015 = ╱dc╱=╱ // 0x2c81 @0x15
0x2c6c…2c86 at0016 = ╱49╱I╱ // 0x2c82 @0x16
0x2c6c…2c86 at0017 = ╱e2╱+╱ // 0x2c83 @0x17
0x2c6c…2c86 at0018 = ╱45╱E╱ // 0x2c84 @0x18
0x2c6c…2c86 at0019 = EOL // 0x2c85 @0x19
0x2c6c…2c86 }
0x2c86…2ca4 b9fb 5250 PUT K6$,I-E:TAL4$(E:13)
0x2c86…2ca4 LineComalBin {
0x2c86…2ca4 ptr = 0xb9fb // 0x2c86 @0x0
0x2c86…2ca4 lno = 0x1482 // 0x2c88 @0x2
0x2c86…2ca4 at0004 = ╱aa╱ PUT ╱ // 0x2c8a @0x4
0x2c86…2ca4 at0005 = ╱4b╱K╱ // 0x2c8b @0x5
0x2c86…2ca4 at0006 = ╱36╱6╱ // 0x2c8c @0x6
0x2c86…2ca4 at0007 = ╱ef╱$╱ // 0x2c8d @0x7
0x2c86…2ca4 at0008 = ╱ec╱,╱ // 0x2c8e @0x8
0x2c86…2ca4 at0009 = ╱49╱I╱ // 0x2c8f @0x9
0x2c86…2ca4 at000a = ╱e3╱-╱ // 0x2c90 @0xa
0x2c86…2ca4 at000b = ╱45╱E╱ // 0x2c91 @0xb
0x2c86…2ca4 at000c = ╱f0╱:╱ // 0x2c92 @0xc
0x2c86…2ca4 at000d = ╱54╱T╱ // 0x2c93 @0xd
0x2c86…2ca4 at000e = ╱41╱A╱ // 0x2c94 @0xe
0x2c86…2ca4 at000f = ╱4c╱L╱ // 0x2c95 @0xf
0x2c86…2ca4 at0010 = ╱34╱4╱ // 0x2c96 @0x10
0x2c86…2ca4 at0011 = ╱ef╱$╱ // 0x2c97 @0x11
0x2c86…2ca4 at0012 = ╱ed╱(╱ // 0x2c98 @0x12
0x2c86…2ca4 at0013 = ╱45╱E╱ // 0x2c99 @0x13
0x2c86…2ca4 at0014 = ╱f0╱:╱ // 0x2c9a @0x14
0x2c86…2ca4 at0015 = ╱31╱1╱ // 0x2c9b @0x15
0x2c86…2ca4 at0016 = ╱33╱3╱ // 0x2c9c @0x16
0x2c86…2ca4 at0017 = ╱fe0000d004╱ // 0x2c9d @0x17
0x2c86…2ca4 at001c = ╱ee╱)╱ // 0x2ca2 @0x1c
0x2c86…2ca4 at001d = EOL // 0x2ca3 @0x1d
0x2c86…2ca4 }
0x2ca4…2cba ba11 5260 EXEC FE(5,E,K6$)
0x2ca4…2cba LineComalBin {
0x2ca4…2cba ptr = 0xba11 // 0x2ca4 @0x0
0x2ca4…2cba lno = 0x148c // 0x2ca6 @0x2
0x2ca4…2cba at0004 = ╱9d╱ EXEC ╱ // 0x2ca8 @0x4
0x2ca4…2cba at0005 = ╱46╱F╱ // 0x2ca9 @0x5
0x2ca4…2cba at0006 = ╱45╱E╱ // 0x2caa @0x6
0x2ca4…2cba at0007 = ╱ed╱(╱ // 0x2cab @0x7
0x2ca4…2cba at0008 = ╱35╱5╱ // 0x2cac @0x8
0x2ca4…2cba at0009 = ╱fe0000a003╱ // 0x2cad @0x9
0x2ca4…2cba at000e = ╱ec╱,╱ // 0x2cb2 @0xe
0x2ca4…2cba at000f = ╱45╱E╱ // 0x2cb3 @0xf
0x2ca4…2cba at0010 = ╱ec╱,╱ // 0x2cb4 @0x10
0x2ca4…2cba at0011 = ╱4b╱K╱ // 0x2cb5 @0x11
0x2ca4…2cba at0012 = ╱36╱6╱ // 0x2cb6 @0x12
0x2ca4…2cba at0013 = ╱ef╱$╱ // 0x2cb7 @0x13
0x2ca4…2cba at0014 = ╱ee╱)╱ // 0x2cb8 @0x14
0x2ca4…2cba at0015 = EOL // 0x2cb9 @0x15
0x2ca4…2cba }
0x2cba…2cc0 ba17 5270 ENDPROC
0x2cba…2cc0 LineComalBin {
0x2cba…2cc0 ptr = 0xba17 // 0x2cba @0x0
0x2cba…2cc0 lno = 0x1496 // 0x2cbc @0x2
0x2cba…2cc0 at0004 = ╱9f╱ ENDPROC ╱ // 0x2cbe @0x4
0x2cba…2cc0 at0005 = EOL // 0x2cbf @0x5
0x2cba…2cc0 }
0x2cc0…2cca ba21 5280 PROC VGEM
0x2cc0…2cca LineComalBin {
0x2cc0…2cca ptr = 0xba21 // 0x2cc0 @0x0
0x2cc0…2cca lno = 0x14a0 // 0x2cc2 @0x2
0x2cc0…2cca at0004 = ╱9e╱ PROC ╱ // 0x2cc4 @0x4
0x2cc0…2cca at0005 = ╱56╱V╱ // 0x2cc5 @0x5
0x2cc0…2cca at0006 = ╱47╱G╱ // 0x2cc6 @0x6
0x2cc0…2cca at0007 = ╱45╱E╱ // 0x2cc7 @0x7
0x2cc0…2cca at0008 = ╱4d╱M╱ // 0x2cc8 @0x8
0x2cc0…2cca at0009 = EOL // 0x2cc9 @0x9
0x2cc0…2cca }
0x2cca…2cf1 ba48 5290 PUT K6$,I:VNARR(LIE),VAARR$(LIE),KOD$
0x2cca…2cf1 LineComalBin {
0x2cca…2cf1 ptr = 0xba48 // 0x2cca @0x0
0x2cca…2cf1 lno = 0x14aa // 0x2ccc @0x2
0x2cca…2cf1 at0004 = ╱aa╱ PUT ╱ // 0x2cce @0x4
0x2cca…2cf1 at0005 = ╱4b╱K╱ // 0x2ccf @0x5
0x2cca…2cf1 at0006 = ╱36╱6╱ // 0x2cd0 @0x6
0x2cca…2cf1 at0007 = ╱ef╱$╱ // 0x2cd1 @0x7
0x2cca…2cf1 at0008 = ╱ec╱,╱ // 0x2cd2 @0x8
0x2cca…2cf1 at0009 = ╱49╱I╱ // 0x2cd3 @0x9
0x2cca…2cf1 at000a = ╱f0╱:╱ // 0x2cd4 @0xa
0x2cca…2cf1 at000b = ╱56╱V╱ // 0x2cd5 @0xb
0x2cca…2cf1 at000c = ╱4e╱N╱ // 0x2cd6 @0xc
0x2cca…2cf1 at000d = ╱41╱A╱ // 0x2cd7 @0xd
0x2cca…2cf1 at000e = ╱52╱R╱ // 0x2cd8 @0xe
0x2cca…2cf1 at000f = ╱52╱R╱ // 0x2cd9 @0xf
0x2cca…2cf1 at0010 = ╱ed╱(╱ // 0x2cda @0x10
0x2cca…2cf1 at0011 = ╱4c╱L╱ // 0x2cdb @0x11
0x2cca…2cf1 at0012 = ╱49╱I╱ // 0x2cdc @0x12
0x2cca…2cf1 at0013 = ╱45╱E╱ // 0x2cdd @0x13
0x2cca…2cf1 at0014 = ╱ee╱)╱ // 0x2cde @0x14
0x2cca…2cf1 at0015 = ╱ec╱,╱ // 0x2cdf @0x15
0x2cca…2cf1 at0016 = ╱56╱V╱ // 0x2ce0 @0x16
0x2cca…2cf1 at0017 = ╱41╱A╱ // 0x2ce1 @0x17
0x2cca…2cf1 at0018 = ╱41╱A╱ // 0x2ce2 @0x18
0x2cca…2cf1 at0019 = ╱52╱R╱ // 0x2ce3 @0x19
0x2cca…2cf1 at001a = ╱52╱R╱ // 0x2ce4 @0x1a
0x2cca…2cf1 at001b = ╱ef╱$╱ // 0x2ce5 @0x1b
0x2cca…2cf1 at001c = ╱ed╱(╱ // 0x2ce6 @0x1c
0x2cca…2cf1 at001d = ╱4c╱L╱ // 0x2ce7 @0x1d
0x2cca…2cf1 at001e = ╱49╱I╱ // 0x2ce8 @0x1e
0x2cca…2cf1 at001f = ╱45╱E╱ // 0x2ce9 @0x1f
0x2cca…2cf1 at0020 = ╱ee╱)╱ // 0x2cea @0x20
0x2cca…2cf1 at0021 = ╱ec╱,╱ // 0x2ceb @0x21
0x2cca…2cf1 at0022 = ╱4b╱K╱ // 0x2cec @0x22
0x2cca…2cf1 at0023 = ╱4f╱O╱ // 0x2ced @0x23
0x2cca…2cf1 at0024 = ╱44╱D╱ // 0x2cee @0x24
0x2cca…2cf1 at0025 = ╱ef╱$╱ // 0x2cef @0x25
0x2cca…2cf1 at0026 = EOL // 0x2cf0 @0x26
0x2cca…2cf1 }
0x2cf1…2d07 ba5e 5300 EXEC FE(6,E,K6$)
0x2cf1…2d07 LineComalBin {
0x2cf1…2d07 ptr = 0xba5e // 0x2cf1 @0x0
0x2cf1…2d07 lno = 0x14b4 // 0x2cf3 @0x2
0x2cf1…2d07 at0004 = ╱9d╱ EXEC ╱ // 0x2cf5 @0x4
0x2cf1…2d07 at0005 = ╱46╱F╱ // 0x2cf6 @0x5
0x2cf1…2d07 at0006 = ╱45╱E╱ // 0x2cf7 @0x6
0x2cf1…2d07 at0007 = ╱ed╱(╱ // 0x2cf8 @0x7
0x2cf1…2d07 at0008 = ╱36╱6╱ // 0x2cf9 @0x8
0x2cf1…2d07 at0009 = ╱fe0000c003╱ // 0x2cfa @0x9
0x2cf1…2d07 at000e = ╱ec╱,╱ // 0x2cff @0xe
0x2cf1…2d07 at000f = ╱45╱E╱ // 0x2d00 @0xf
0x2cf1…2d07 at0010 = ╱ec╱,╱ // 0x2d01 @0x10
0x2cf1…2d07 at0011 = ╱4b╱K╱ // 0x2d02 @0x11
0x2cf1…2d07 at0012 = ╱36╱6╱ // 0x2d03 @0x12
0x2cf1…2d07 at0013 = ╱ef╱$╱ // 0x2d04 @0x13
0x2cf1…2d07 at0014 = ╱ee╱)╱ // 0x2d05 @0x14
0x2cf1…2d07 at0015 = EOL // 0x2d06 @0x15
0x2cf1…2d07 }
0x2d07…2d11 ba68 5310 I=I+E
0x2d07…2d11 LineComalBin {
0x2d07…2d11 ptr = 0xba68 // 0x2d07 @0x0
0x2d07…2d11 lno = 0x14be // 0x2d09 @0x2
0x2d07…2d11 at0004 = ╱49╱I╱ // 0x2d0b @0x4
0x2d07…2d11 at0005 = ╱dc╱=╱ // 0x2d0c @0x5
0x2d07…2d11 at0006 = ╱49╱I╱ // 0x2d0d @0x6
0x2d07…2d11 at0007 = ╱e2╱+╱ // 0x2d0e @0x7
0x2d07…2d11 at0008 = ╱45╱E╱ // 0x2d0f @0x8
0x2d07…2d11 at0009 = EOL // 0x2d10 @0x9
0x2d07…2d11 }
0x2d11…2d17 ba6e 5320 ENDPROC
0x2d11…2d17 LineComalBin {
0x2d11…2d17 ptr = 0xba6e // 0x2d11 @0x0
0x2d11…2d17 lno = 0x14c8 // 0x2d13 @0x2
0x2d11…2d17 at0004 = ╱9f╱ ENDPROC ╱ // 0x2d15 @0x4
0x2d11…2d17 at0005 = EOL // 0x2d16 @0x5
0x2d11…2d17 }
0x2d17…2d25 ba7c 5330 PROC KODE(LI)
0x2d17…2d25 LineComalBin {
0x2d17…2d25 ptr = 0xba7c // 0x2d17 @0x0
0x2d17…2d25 lno = 0x14d2 // 0x2d19 @0x2
0x2d17…2d25 at0004 = ╱9e╱ PROC ╱ // 0x2d1b @0x4
0x2d17…2d25 at0005 = ╱4b╱K╱ // 0x2d1c @0x5
0x2d17…2d25 at0006 = ╱4f╱O╱ // 0x2d1d @0x6
0x2d17…2d25 at0007 = ╱44╱D╱ // 0x2d1e @0x7
0x2d17…2d25 at0008 = ╱45╱E╱ // 0x2d1f @0x8
0x2d17…2d25 at0009 = ╱ed╱(╱ // 0x2d20 @0x9
0x2d17…2d25 at000a = ╱4c╱L╱ // 0x2d21 @0xa
0x2d17…2d25 at000b = ╱49╱I╱ // 0x2d22 @0xb
0x2d17…2d25 at000c = ╱ee╱)╱ // 0x2d23 @0xc
0x2d17…2d25 at000d = EOL // 0x2d24 @0xd
0x2d17…2d25 }
0x2d25…2d45 ba9c 5340 IF AKOD(LI,E)=B AND AKOD(LI,G)=B THEN
0x2d25…2d45 LineComalBin {
0x2d25…2d45 ptr = 0xba9c // 0x2d25 @0x0
0x2d25…2d45 lno = 0x14dc // 0x2d27 @0x2
0x2d25…2d45 at0004 = ╱9c╱ IF ╱ // 0x2d29 @0x4
0x2d25…2d45 at0005 = ╱41╱A╱ // 0x2d2a @0x5
0x2d25…2d45 at0006 = ╱4b╱K╱ // 0x2d2b @0x6
0x2d25…2d45 at0007 = ╱4f╱O╱ // 0x2d2c @0x7
0x2d25…2d45 at0008 = ╱44╱D╱ // 0x2d2d @0x8
0x2d25…2d45 at0009 = ╱ed╱(╱ // 0x2d2e @0x9
0x2d25…2d45 at000a = ╱4c╱L╱ // 0x2d2f @0xa
0x2d25…2d45 at000b = ╱49╱I╱ // 0x2d30 @0xb
0x2d25…2d45 at000c = ╱ec╱,╱ // 0x2d31 @0xc
0x2d25…2d45 at000d = ╱45╱E╱ // 0x2d32 @0xd
0x2d25…2d45 at000e = ╱ee╱)╱ // 0x2d33 @0xe
0x2d25…2d45 at000f = ╱dc╱=╱ // 0x2d34 @0xf
0x2d25…2d45 at0010 = ╱42╱B╱ // 0x2d35 @0x10
0x2d25…2d45 at0011 = ╱da╱ AND ╱ // 0x2d36 @0x11
0x2d25…2d45 at0012 = ╱41╱A╱ // 0x2d37 @0x12
0x2d25…2d45 at0013 = ╱4b╱K╱ // 0x2d38 @0x13
0x2d25…2d45 at0014 = ╱4f╱O╱ // 0x2d39 @0x14
0x2d25…2d45 at0015 = ╱44╱D╱ // 0x2d3a @0x15
0x2d25…2d45 at0016 = ╱ed╱(╱ // 0x2d3b @0x16
0x2d25…2d45 at0017 = ╱4c╱L╱ // 0x2d3c @0x17
0x2d25…2d45 at0018 = ╱49╱I╱ // 0x2d3d @0x18
0x2d25…2d45 at0019 = ╱ec╱,╱ // 0x2d3e @0x19
0x2d25…2d45 at001a = ╱47╱G╱ // 0x2d3f @0x1a
0x2d25…2d45 at001b = ╱ee╱)╱ // 0x2d40 @0x1b
0x2d25…2d45 at001c = ╱dc╱=╱ // 0x2d41 @0x1c
0x2d25…2d45 at001d = ╱42╱B╱ // 0x2d42 @0x1d
0x2d25…2d45 at001e = ╱b6╱ THEN ╱ // 0x2d43 @0x1e
0x2d25…2d45 at001f = EOL // 0x2d44 @0x1f
0x2d25…2d45 }
0x2d45…2d56 baad 5350 CASE VNARR(LI) OF
0x2d45…2d56 LineComalBin {
0x2d45…2d56 ptr = 0xbaad // 0x2d45 @0x0
0x2d45…2d56 lno = 0x14e6 // 0x2d47 @0x2
0x2d45…2d56 at0004 = ╱a201╱ CASE ╱ // 0x2d49 @0x4
0x2d45…2d56 at0006 = ╱56╱V╱ // 0x2d4b @0x6
0x2d45…2d56 at0007 = ╱4e╱N╱ // 0x2d4c @0x7
0x2d45…2d56 at0008 = ╱41╱A╱ // 0x2d4d @0x8
0x2d45…2d56 at0009 = ╱52╱R╱ // 0x2d4e @0x9
0x2d45…2d56 at000a = ╱52╱R╱ // 0x2d4f @0xa
0x2d45…2d56 at000b = ╱ed╱(╱ // 0x2d50 @0xb
0x2d45…2d56 at000c = ╱4c╱L╱ // 0x2d51 @0xc
0x2d45…2d56 at000d = ╱49╱I╱ // 0x2d52 @0xd
0x2d45…2d56 at000e = ╱ee╱)╱ // 0x2d53 @0xe
0x2d45…2d56 at000f = ╱ba╱ OF ╱ // 0x2d54 @0xf
0x2d45…2d56 at0010 = EOL // 0x2d55 @0x10
0x2d45…2d56 }
0x2d56…2d63 baba 5360 KOD$="A"
0x2d56…2d63 LineComalBin {
0x2d56…2d63 ptr = 0xbaba // 0x2d56 @0x0
0x2d56…2d63 lno = 0x14f0 // 0x2d58 @0x2
0x2d56…2d63 at0004 = ╱4b╱K╱ // 0x2d5a @0x4
0x2d56…2d63 at0005 = ╱4f╱O╱ // 0x2d5b @0x5
0x2d56…2d63 at0006 = ╱44╱D╱ // 0x2d5c @0x6
0x2d56…2d63 at0007 = ╱ef╱$╱ // 0x2d5d @0x7
0x2d56…2d63 at0008 = ╱dc╱=╱ // 0x2d5e @0x8
0x2d56…2d63 at0009 = ╱22╱"╱ // 0x2d5f @0x9
0x2d56…2d63 at000a = ╱41╱A╱ // 0x2d60 @0xa
0x2d56…2d63 at000b = ╱22╱"╱ // 0x2d61 @0xb
0x2d56…2d63 at000c = EOL // 0x2d62 @0xc
0x2d56…2d63 }
0x2d63…2d6b bac2 5370 WHEN V
0x2d63…2d6b LineComalBin {
0x2d63…2d6b ptr = 0xbac2 // 0x2d63 @0x0
0x2d63…2d6b lno = 0x14fa // 0x2d65 @0x2
0x2d63…2d6b at0004 = ╱a301╱ WHEN ╱ // 0x2d67 @0x4
0x2d63…2d6b at0006 = ╱56╱V╱ // 0x2d69 @0x6
0x2d63…2d6b at0007 = EOL // 0x2d6a @0x7
0x2d63…2d6b }
0x2d6b…2d78 (151,) bacf 5380 KOD$="B"
0x2d6b…2d78 LineComalBin {
0x2d6b…2d78 ptr = 0xbacf // 0x2d6b @0x0
0x2d6b…2d78 lno = 0x1504 // 0x2d6d @0x2
0x2d6b…2d78 at0004 = ╱4b╱K╱ // 0x2d6f @0x4
0x2d6b…2d78 at0005 = ╱4f╱O╱ // 0x2d70 @0x5
0x2d6b…2d78 at0006 = ╱44╱D╱ // 0x2d71 @0x6
0x2d6b…2d78 at0007 = ╱ef╱$╱ // 0x2d72 @0x7
0x2d6b…2d78 at0008 = ╱dc╱=╱ // 0x2d73 @0x8
0x2d6b…2d78 at0009 = ╱22╱"╱ // 0x2d74 @0x9
0x2d6b…2d78 at000a = ╱42╱B╱ // 0x2d75 @0xa
0x2d6b…2d78 at000b = ╱22╱"╱ // 0x2d76 @0xb
0x2d6b…2d78 at000c = EOL // 0x2d77 @0xc
0x2d6b…2d78 }
0x2d78…2d85 badc 5390 WHEN 4
0x2d78…2d85 LineComalBin {
0x2d78…2d85 ptr = 0xbadc // 0x2d78 @0x0
0x2d78…2d85 lno = 0x150e // 0x2d7a @0x2
0x2d78…2d85 at0004 = ╱a301╱ WHEN ╱ // 0x2d7c @0x4
0x2d78…2d85 at0006 = ╱34╱4╱ // 0x2d7e @0x6
0x2d78…2d85 at0007 = ╱fe00008003╱ // 0x2d7f @0x7
0x2d78…2d85 at000c = EOL // 0x2d84 @0xc
0x2d78…2d85 }
0x2d85…2d92 bae9 5400 KOD$="C"
0x2d85…2d92 LineComalBin {
0x2d85…2d92 ptr = 0xbae9 // 0x2d85 @0x0
0x2d85…2d92 lno = 0x1518 // 0x2d87 @0x2
0x2d85…2d92 at0004 = ╱4b╱K╱ // 0x2d89 @0x4
0x2d85…2d92 at0005 = ╱4f╱O╱ // 0x2d8a @0x5
0x2d85…2d92 at0006 = ╱44╱D╱ // 0x2d8b @0x6
0x2d85…2d92 at0007 = ╱ef╱$╱ // 0x2d8c @0x7
0x2d85…2d92 at0008 = ╱dc╱=╱ // 0x2d8d @0x8
0x2d85…2d92 at0009 = ╱22╱"╱ // 0x2d8e @0x9
0x2d85…2d92 at000a = ╱43╱C╱ // 0x2d8f @0xa
0x2d85…2d92 at000b = ╱22╱"╱ // 0x2d90 @0xb
0x2d85…2d92 at000c = EOL // 0x2d91 @0xc
0x2d85…2d92 }
0x2d92…2d9a baf1 5410 WHEN G
0x2d92…2d9a LineComalBin {
0x2d92…2d9a ptr = 0xbaf1 // 0x2d92 @0x0
0x2d92…2d9a lno = 0x1522 // 0x2d94 @0x2
0x2d92…2d9a at0004 = ╱a301╱ WHEN ╱ // 0x2d96 @0x4
0x2d92…2d9a at0006 = ╱47╱G╱ // 0x2d98 @0x6
0x2d92…2d9a at0007 = EOL // 0x2d99 @0x7
0x2d92…2d9a }
0x2d9a…2da7 bafe 5420 KOD$="D"
0x2d9a…2da7 LineComalBin {
0x2d9a…2da7 ptr = 0xbafe // 0x2d9a @0x0
0x2d9a…2da7 lno = 0x152c // 0x2d9c @0x2
0x2d9a…2da7 at0004 = ╱4b╱K╱ // 0x2d9e @0x4
0x2d9a…2da7 at0005 = ╱4f╱O╱ // 0x2d9f @0x5
0x2d9a…2da7 at0006 = ╱44╱D╱ // 0x2da0 @0x6
0x2d9a…2da7 at0007 = ╱ef╱$╱ // 0x2da1 @0x7
0x2d9a…2da7 at0008 = ╱dc╱=╱ // 0x2da2 @0x8
0x2d9a…2da7 at0009 = ╱22╱"╱ // 0x2da3 @0x9
0x2d9a…2da7 at000a = ╱44╱D╱ // 0x2da4 @0xa
0x2d9a…2da7 at000b = ╱22╱"╱ // 0x2da5 @0xb
0x2d9a…2da7 at000c = EOL // 0x2da6 @0xc
0x2d9a…2da7 }
0x2da7…2daf bb06 5430 WHEN E
0x2da7…2daf LineComalBin {
0x2da7…2daf ptr = 0xbb06 // 0x2da7 @0x0
0x2da7…2daf lno = 0x1536 // 0x2da9 @0x2
0x2da7…2daf at0004 = ╱a301╱ WHEN ╱ // 0x2dab @0x4
0x2da7…2daf at0006 = ╱45╱E╱ // 0x2dad @0x6
0x2da7…2daf at0007 = EOL // 0x2dae @0x7
0x2da7…2daf }
0x2daf…2dbc bb13 5440 KOD$="E"
0x2daf…2dbc LineComalBin {
0x2daf…2dbc ptr = 0xbb13 // 0x2daf @0x0
0x2daf…2dbc lno = 0x1540 // 0x2db1 @0x2
0x2daf…2dbc at0004 = ╱4b╱K╱ // 0x2db3 @0x4
0x2daf…2dbc at0005 = ╱4f╱O╱ // 0x2db4 @0x5
0x2daf…2dbc at0006 = ╱44╱D╱ // 0x2db5 @0x6
0x2daf…2dbc at0007 = ╱ef╱$╱ // 0x2db6 @0x7
0x2daf…2dbc at0008 = ╱dc╱=╱ // 0x2db7 @0x8
0x2daf…2dbc at0009 = ╱22╱"╱ // 0x2db8 @0x9
0x2daf…2dbc at000a = ╱45╱E╱ // 0x2db9 @0xa
0x2daf…2dbc at000b = ╱22╱"╱ // 0x2dba @0xb
0x2daf…2dbc at000c = EOL // 0x2dbb @0xc
0x2daf…2dbc }
0x2dbc…2dc2 bb19 5450 ENDCASE
0x2dbc…2dc2 LineComalBin {
0x2dbc…2dc2 ptr = 0xbb19 // 0x2dbc @0x0
0x2dbc…2dc2 lno = 0x154a // 0x2dbe @0x2
0x2dbc…2dc2 at0004 = ╱a4╱ ENDCASE ╱ // 0x2dc0 @0x4
0x2dbc…2dc2 at0005 = EOL // 0x2dc1 @0x5
0x2dbc…2dc2 }
0x2dc2…2dc8 bb1f 5460 ELSE
0x2dc2…2dc8 LineComalBin {
0x2dc2…2dc8 ptr = 0xbb1f // 0x2dc2 @0x0
0x2dc2…2dc8 lno = 0x1554 // 0x2dc4 @0x2
0x2dc2…2dc8 at0004 = ╱9a╱ ELSE ╱ // 0x2dc6 @0x4
0x2dc2…2dc8 at0005 = EOL // 0x2dc7 @0x5
0x2dc2…2dc8 }
0x2dc8…2ddb bb32 5470 IF AKOD(LI,E)=B THEN
0x2dc8…2ddb LineComalBin {
0x2dc8…2ddb ptr = 0xbb32 // 0x2dc8 @0x0
0x2dc8…2ddb lno = 0x155e // 0x2dca @0x2
0x2dc8…2ddb at0004 = ╱9c╱ IF ╱ // 0x2dcc @0x4
0x2dc8…2ddb at0005 = ╱41╱A╱ // 0x2dcd @0x5
0x2dc8…2ddb at0006 = ╱4b╱K╱ // 0x2dce @0x6
0x2dc8…2ddb at0007 = ╱4f╱O╱ // 0x2dcf @0x7
0x2dc8…2ddb at0008 = ╱44╱D╱ // 0x2dd0 @0x8
0x2dc8…2ddb at0009 = ╱ed╱(╱ // 0x2dd1 @0x9
0x2dc8…2ddb at000a = ╱4c╱L╱ // 0x2dd2 @0xa
0x2dc8…2ddb at000b = ╱49╱I╱ // 0x2dd3 @0xb
0x2dc8…2ddb at000c = ╱ec╱,╱ // 0x2dd4 @0xc
0x2dc8…2ddb at000d = ╱45╱E╱ // 0x2dd5 @0xd
0x2dc8…2ddb at000e = ╱ee╱)╱ // 0x2dd6 @0xe
0x2dc8…2ddb at000f = ╱dc╱=╱ // 0x2dd7 @0xf
0x2dc8…2ddb at0010 = ╱42╱B╱ // 0x2dd8 @0x10
0x2dc8…2ddb at0011 = ╱b6╱ THEN ╱ // 0x2dd9 @0x11
0x2dc8…2ddb at0012 = EOL // 0x2dda @0x12
0x2dc8…2ddb }
0x2ddb…2de8 bb3f 5480 KOD$="G"
0x2ddb…2de8 LineComalBin {
0x2ddb…2de8 ptr = 0xbb3f // 0x2ddb @0x0
0x2ddb…2de8 lno = 0x1568 // 0x2ddd @0x2
0x2ddb…2de8 at0004 = ╱4b╱K╱ // 0x2ddf @0x4
0x2ddb…2de8 at0005 = ╱4f╱O╱ // 0x2de0 @0x5
0x2ddb…2de8 at0006 = ╱44╱D╱ // 0x2de1 @0x6
0x2ddb…2de8 at0007 = ╱ef╱$╱ // 0x2de2 @0x7
0x2ddb…2de8 at0008 = ╱dc╱=╱ // 0x2de3 @0x8
0x2ddb…2de8 at0009 = ╱22╱"╱ // 0x2de4 @0x9
0x2ddb…2de8 at000a = ╱47╱G╱ // 0x2de5 @0xa
0x2ddb…2de8 at000b = ╱22╱"╱ // 0x2de6 @0xb
0x2ddb…2de8 at000c = EOL // 0x2de7 @0xc
0x2ddb…2de8 }
0x2de8…2dee bb45 5490 ELSE
0x2de8…2dee LineComalBin {
0x2de8…2dee ptr = 0xbb45 // 0x2de8 @0x0
0x2de8…2dee lno = 0x1572 // 0x2dea @0x2
0x2de8…2dee at0004 = ╱9a╱ ELSE ╱ // 0x2dec @0x4
0x2de8…2dee at0005 = EOL // 0x2ded @0x5
0x2de8…2dee }
0x2dee…2e01 bb58 5500 IF AKOD(LI,G)=B THEN
0x2dee…2e01 LineComalBin {
0x2dee…2e01 ptr = 0xbb58 // 0x2dee @0x0
0x2dee…2e01 lno = 0x157c // 0x2df0 @0x2
0x2dee…2e01 at0004 = ╱9c╱ IF ╱ // 0x2df2 @0x4
0x2dee…2e01 at0005 = ╱41╱A╱ // 0x2df3 @0x5
0x2dee…2e01 at0006 = ╱4b╱K╱ // 0x2df4 @0x6
0x2dee…2e01 at0007 = ╱4f╱O╱ // 0x2df5 @0x7
0x2dee…2e01 at0008 = ╱44╱D╱ // 0x2df6 @0x8
0x2dee…2e01 at0009 = ╱ed╱(╱ // 0x2df7 @0x9
0x2dee…2e01 at000a = ╱4c╱L╱ // 0x2df8 @0xa
0x2dee…2e01 at000b = ╱49╱I╱ // 0x2df9 @0xb
0x2dee…2e01 at000c = ╱ec╱,╱ // 0x2dfa @0xc
0x2dee…2e01 at000d = ╱47╱G╱ // 0x2dfb @0xd
0x2dee…2e01 at000e = ╱ee╱)╱ // 0x2dfc @0xe
0x2dee…2e01 at000f = ╱dc╱=╱ // 0x2dfd @0xf
0x2dee…2e01 at0010 = ╱42╱B╱ // 0x2dfe @0x10
0x2dee…2e01 at0011 = ╱b6╱ THEN ╱ // 0x2dff @0x11
0x2dee…2e01 at0012 = EOL // 0x2e00 @0x12
0x2dee…2e01 }
0x2e01…2e0e bb65 5510 KOD$="F"
0x2e01…2e0e LineComalBin {
0x2e01…2e0e ptr = 0xbb65 // 0x2e01 @0x0
0x2e01…2e0e lno = 0x1586 // 0x2e03 @0x2
0x2e01…2e0e at0004 = ╱4b╱K╱ // 0x2e05 @0x4
0x2e01…2e0e at0005 = ╱4f╱O╱ // 0x2e06 @0x5
0x2e01…2e0e at0006 = ╱44╱D╱ // 0x2e07 @0x6
0x2e01…2e0e at0007 = ╱ef╱$╱ // 0x2e08 @0x7
0x2e01…2e0e at0008 = ╱dc╱=╱ // 0x2e09 @0x8
0x2e01…2e0e at0009 = ╱22╱"╱ // 0x2e0a @0x9
0x2e01…2e0e at000a = ╱46╱F╱ // 0x2e0b @0xa
0x2e01…2e0e at000b = ╱22╱"╱ // 0x2e0c @0xb
0x2e01…2e0e at000c = EOL // 0x2e0d @0xc
0x2e01…2e0e }
0x2e0e…2e14 bb6b 5520 ELSE
0x2e0e…2e14 LineComalBin {
0x2e0e…2e14 ptr = 0xbb6b // 0x2e0e @0x0
0x2e0e…2e14 lno = 0x1590 // 0x2e10 @0x2
0x2e0e…2e14 at0004 = ╱9a╱ ELSE ╱ // 0x2e12 @0x4
0x2e0e…2e14 at0005 = EOL // 0x2e13 @0x5
0x2e0e…2e14 }
0x2e14…2e21 bb78 5530 KOD$="H"
0x2e14…2e21 LineComalBin {
0x2e14…2e21 ptr = 0xbb78 // 0x2e14 @0x0
0x2e14…2e21 lno = 0x159a // 0x2e16 @0x2
0x2e14…2e21 at0004 = ╱4b╱K╱ // 0x2e18 @0x4
0x2e14…2e21 at0005 = ╱4f╱O╱ // 0x2e19 @0x5
0x2e14…2e21 at0006 = ╱44╱D╱ // 0x2e1a @0x6
0x2e14…2e21 at0007 = ╱ef╱$╱ // 0x2e1b @0x7
0x2e14…2e21 at0008 = ╱dc╱=╱ // 0x2e1c @0x8
0x2e14…2e21 at0009 = ╱22╱"╱ // 0x2e1d @0x9
0x2e14…2e21 at000a = ╱48╱H╱ // 0x2e1e @0xa
0x2e14…2e21 at000b = ╱22╱"╱ // 0x2e1f @0xb
0x2e14…2e21 at000c = EOL // 0x2e20 @0xc
0x2e14…2e21 }
0x2e21…2e27 bb7e 5540 ENDIF
0x2e21…2e27 LineComalBin {
0x2e21…2e27 ptr = 0xbb7e // 0x2e21 @0x0
0x2e21…2e27 lno = 0x15a4 // 0x2e23 @0x2
0x2e21…2e27 at0004 = ╱9b╱ ENDIF ╱ // 0x2e25 @0x4
0x2e21…2e27 at0005 = EOL // 0x2e26 @0x5
0x2e21…2e27 }
0x2e27…2e2d bb84 5550 ENDIF
0x2e27…2e2d LineComalBin {
0x2e27…2e2d ptr = 0xbb84 // 0x2e27 @0x0
0x2e27…2e2d lno = 0x15ae // 0x2e29 @0x2
0x2e27…2e2d at0004 = ╱9b╱ ENDIF ╱ // 0x2e2b @0x4
0x2e27…2e2d at0005 = EOL // 0x2e2c @0x5
0x2e27…2e2d }
0x2e2d…2e33 bb8a 5560 ENDIF
0x2e2d…2e33 LineComalBin {
0x2e2d…2e33 ptr = 0xbb8a // 0x2e2d @0x0
0x2e2d…2e33 lno = 0x15b8 // 0x2e2f @0x2
0x2e2d…2e33 at0004 = ╱9b╱ ENDIF ╱ // 0x2e31 @0x4
0x2e2d…2e33 at0005 = EOL // 0x2e32 @0x5
0x2e2d…2e33 }
0x2e33…2e39 bb90 5570 ENDPROC
0x2e33…2e39 LineComalBin {
0x2e33…2e39 ptr = 0xbb90 // 0x2e33 @0x0
0x2e33…2e39 lno = 0x15c2 // 0x2e35 @0x2
0x2e33…2e39 at0004 = ╱9f╱ ENDPROC ╱ // 0x2e37 @0x4
0x2e33…2e39 at0005 = EOL // 0x2e38 @0x5
0x2e33…2e39 }
0x2e39…2e45 bb9c 5580 PROC SYSGEM
0x2e39…2e45 LineComalBin {
0x2e39…2e45 ptr = 0xbb9c // 0x2e39 @0x0
0x2e39…2e45 lno = 0x15cc // 0x2e3b @0x2
0x2e39…2e45 at0004 = ╱9e╱ PROC ╱ // 0x2e3d @0x4
0x2e39…2e45 at0005 = ╱53╱S╱ // 0x2e3e @0x5
0x2e39…2e45 at0006 = ╱59╱Y╱ // 0x2e3f @0x6
0x2e39…2e45 at0007 = ╱53╱S╱ // 0x2e40 @0x7
0x2e39…2e45 at0008 = ╱47╱G╱ // 0x2e41 @0x8
0x2e39…2e45 at0009 = ╱45╱E╱ // 0x2e42 @0x9
0x2e39…2e45 at000a = ╱4d╱M╱ // 0x2e43 @0xa
0x2e39…2e45 at000b = EOL // 0x2e44 @0xb
0x2e39…2e45 }
0x2e45…2e95 bbec 5590 T1(E)=FAKTNR;T1(G)=KREDNR;T2(4)=APOS;T2(5)=AKRED;T2(6)=AFAKT
0x2e45…2e95 LineComalBin {
0x2e45…2e95 ptr = 0xbbec // 0x2e45 @0x0
0x2e45…2e95 lno = 0x15d6 // 0x2e47 @0x2
0x2e45…2e95 at0004 = ╱54╱T╱ // 0x2e49 @0x4
0x2e45…2e95 at0005 = ╱31╱1╱ // 0x2e4a @0x5
0x2e45…2e95 at0006 = ╱ed╱(╱ // 0x2e4b @0x6
0x2e45…2e95 at0007 = ╱45╱E╱ // 0x2e4c @0x7
0x2e45…2e95 at0008 = ╱ee╱)╱ // 0x2e4d @0x8
0x2e45…2e95 at0009 = ╱dc╱=╱ // 0x2e4e @0x9
0x2e45…2e95 at000a = ╱46╱F╱ // 0x2e4f @0xa
0x2e45…2e95 at000b = ╱41╱A╱ // 0x2e50 @0xb
0x2e45…2e95 at000c = ╱4b╱K╱ // 0x2e51 @0xc
0x2e45…2e95 at000d = ╱54╱T╱ // 0x2e52 @0xd
0x2e45…2e95 at000e = ╱4e╱N╱ // 0x2e53 @0xe
0x2e45…2e95 at000f = ╱52╱R╱ // 0x2e54 @0xf
0x2e45…2e95 at0010 = ╱eb╱;╱ // 0x2e55 @0x10
0x2e45…2e95 at0011 = ╱54╱T╱ // 0x2e56 @0x11
0x2e45…2e95 at0012 = ╱31╱1╱ // 0x2e57 @0x12
0x2e45…2e95 at0013 = ╱ed╱(╱ // 0x2e58 @0x13
0x2e45…2e95 at0014 = ╱47╱G╱ // 0x2e59 @0x14
0x2e45…2e95 at0015 = ╱ee╱)╱ // 0x2e5a @0x15
0x2e45…2e95 at0016 = ╱dc╱=╱ // 0x2e5b @0x16
0x2e45…2e95 at0017 = ╱4b╱K╱ // 0x2e5c @0x17
0x2e45…2e95 at0018 = ╱52╱R╱ // 0x2e5d @0x18
0x2e45…2e95 at0019 = ╱45╱E╱ // 0x2e5e @0x19
0x2e45…2e95 at001a = ╱44╱D╱ // 0x2e5f @0x1a
0x2e45…2e95 at001b = ╱4e╱N╱ // 0x2e60 @0x1b
0x2e45…2e95 at001c = ╱52╱R╱ // 0x2e61 @0x1c
0x2e45…2e95 at001d = ╱eb╱;╱ // 0x2e62 @0x1d
0x2e45…2e95 at001e = ╱54╱T╱ // 0x2e63 @0x1e
0x2e45…2e95 at001f = ╱32╱2╱ // 0x2e64 @0x1f
0x2e45…2e95 at0020 = ╱ed╱(╱ // 0x2e65 @0x20
0x2e45…2e95 at0021 = ╱34╱4╱ // 0x2e66 @0x21
0x2e45…2e95 at0022 = ╱fe00008003╱ // 0x2e67 @0x22
0x2e45…2e95 at0027 = ╱ee╱)╱ // 0x2e6c @0x27
0x2e45…2e95 at0028 = ╱dc╱=╱ // 0x2e6d @0x28
0x2e45…2e95 at0029 = ╱41╱A╱ // 0x2e6e @0x29
0x2e45…2e95 at002a = ╱50╱P╱ // 0x2e6f @0x2a
0x2e45…2e95 at002b = ╱4f╱O╱ // 0x2e70 @0x2b
0x2e45…2e95 at002c = ╱53╱S╱ // 0x2e71 @0x2c
0x2e45…2e95 at002d = ╱eb╱;╱ // 0x2e72 @0x2d
0x2e45…2e95 at002e = ╱54╱T╱ // 0x2e73 @0x2e
0x2e45…2e95 at002f = ╱32╱2╱ // 0x2e74 @0x2f
0x2e45…2e95 at0030 = ╱ed╱(╱ // 0x2e75 @0x30
0x2e45…2e95 at0031 = ╱35╱5╱ // 0x2e76 @0x31
0x2e45…2e95 at0032 = ╱fe0000a003╱ // 0x2e77 @0x32
0x2e45…2e95 at0037 = ╱ee╱)╱ // 0x2e7c @0x37
0x2e45…2e95 at0038 = ╱dc╱=╱ // 0x2e7d @0x38
0x2e45…2e95 at0039 = ╱41╱A╱ // 0x2e7e @0x39
0x2e45…2e95 at003a = ╱4b╱K╱ // 0x2e7f @0x3a
0x2e45…2e95 at003b = ╱52╱R╱ // 0x2e80 @0x3b
0x2e45…2e95 at003c = ╱45╱E╱ // 0x2e81 @0x3c
0x2e45…2e95 at003d = ╱44╱D╱ // 0x2e82 @0x3d
0x2e45…2e95 at003e = ╱eb╱;╱ // 0x2e83 @0x3e
0x2e45…2e95 at003f = ╱54╱T╱ // 0x2e84 @0x3f
0x2e45…2e95 at0040 = ╱32╱2╱ // 0x2e85 @0x40
0x2e45…2e95 at0041 = ╱ed╱(╱ // 0x2e86 @0x41
0x2e45…2e95 at0042 = ╱36╱6╱ // 0x2e87 @0x42
0x2e45…2e95 at0043 = ╱fe0000c003╱ // 0x2e88 @0x43
0x2e45…2e95 at0048 = ╱ee╱)╱ // 0x2e8d @0x48
0x2e45…2e95 at0049 = ╱dc╱=╱ // 0x2e8e @0x49
0x2e45…2e95 at004a = ╱41╱A╱ // 0x2e8f @0x4a
0x2e45…2e95 at004b = ╱46╱F╱ // 0x2e90 @0x4b
0x2e45…2e95 at004c = ╱41╱A╱ // 0x2e91 @0x4c
0x2e45…2e95 at004d = ╱4b╱K╱ // 0x2e92 @0x4d
0x2e45…2e95 at004e = ╱54╱T╱ // 0x2e93 @0x4e
0x2e45…2e95 at004f = EOL // 0x2e94 @0x4f
0x2e45…2e95 }
0x2e95…2ebe bc15 5600 T2(7)=AVKONTI;T2(8)=FJPOST
0x2e95…2ebe LineComalBin {
0x2e95…2ebe ptr = 0xbc15 // 0x2e95 @0x0
0x2e95…2ebe lno = 0x15e0 // 0x2e97 @0x2
0x2e95…2ebe at0004 = ╱54╱T╱ // 0x2e99 @0x4
0x2e95…2ebe at0005 = ╱32╱2╱ // 0x2e9a @0x5
0x2e95…2ebe at0006 = ╱ed╱(╱ // 0x2e9b @0x6
0x2e95…2ebe at0007 = ╱37╱7╱ // 0x2e9c @0x7
0x2e95…2ebe at0008 = ╱fe0000e003╱ // 0x2e9d @0x8
0x2e95…2ebe at000d = ╱ee╱)╱ // 0x2ea2 @0xd
0x2e95…2ebe at000e = ╱dc╱=╱ // 0x2ea3 @0xe
0x2e95…2ebe at000f = ╱41╱A╱ // 0x2ea4 @0xf
0x2e95…2ebe at0010 = ╱56╱V╱ // 0x2ea5 @0x10
0x2e95…2ebe at0011 = ╱4b╱K╱ // 0x2ea6 @0x11
0x2e95…2ebe at0012 = ╱4f╱O╱ // 0x2ea7 @0x12
0x2e95…2ebe at0013 = ╱4e╱N╱ // 0x2ea8 @0x13
0x2e95…2ebe at0014 = ╱54╱T╱ // 0x2ea9 @0x14
0x2e95…2ebe at0015 = ╱49╱I╱ // 0x2eaa @0x15
0x2e95…2ebe at0016 = ╱eb╱;╱ // 0x2eab @0x16
0x2e95…2ebe at0017 = ╱54╱T╱ // 0x2eac @0x17
0x2e95…2ebe at0018 = ╱32╱2╱ // 0x2ead @0x18
0x2e95…2ebe at0019 = ╱ed╱(╱ // 0x2eae @0x19
0x2e95…2ebe at001a = ╱38╱8╱ // 0x2eaf @0x1a
0x2e95…2ebe at001b = ╱fe00008004╱ // 0x2eb0 @0x1b
0x2e95…2ebe at0020 = ╱ee╱)╱ // 0x2eb5 @0x20
0x2e95…2ebe at0021 = ╱dc╱=╱ // 0x2eb6 @0x21
0x2e95…2ebe at0022 = ╱46╱F╱ // 0x2eb7 @0x22
0x2e95…2ebe at0023 = ╱4a╱J╱ // 0x2eb8 @0x23
0x2e95…2ebe at0024 = ╱50╱P╱ // 0x2eb9 @0x24
0x2e95…2ebe at0025 = ╱4f╱O╱ // 0x2eba @0x25
0x2e95…2ebe at0026 = ╱53╱S╱ // 0x2ebb @0x26
0x2e95…2ebe at0027 = ╱54╱T╱ // 0x2ebc @0x27
0x2e95…2ebe at0028 = EOL // 0x2ebd @0x28
0x2e95…2ebe }
0x2ebe…2ec9 bc20 5610 OPEN K7$,W
0x2ebe…2ec9 LineComalBin {
0x2ebe…2ec9 ptr = 0xbc20 // 0x2ebe @0x0
0x2ebe…2ec9 lno = 0x15ea // 0x2ec0 @0x2
0x2ebe…2ec9 at0004 = ╱a7╱ OPEN ╱ // 0x2ec2 @0x4
0x2ebe…2ec9 at0005 = ╱4b╱K╱ // 0x2ec3 @0x5
0x2ebe…2ec9 at0006 = ╱37╱7╱ // 0x2ec4 @0x6
0x2ebe…2ec9 at0007 = ╱ef╱$╱ // 0x2ec5 @0x7
0x2ebe…2ec9 at0008 = ╱ec╱,╱ // 0x2ec6 @0x8
0x2ebe…2ec9 at0009 = ╱57╱W╱ // 0x2ec7 @0x9
0x2ebe…2ec9 at000a = EOL // 0x2ec8 @0xa
0x2ebe…2ec9 }
0x2ec9…2eda bc31 5620 EXEC FE(W,E,K7$)
0x2ec9…2eda LineComalBin {
0x2ec9…2eda ptr = 0xbc31 // 0x2ec9 @0x0
0x2ec9…2eda lno = 0x15f4 // 0x2ecb @0x2
0x2ec9…2eda at0004 = ╱9d╱ EXEC ╱ // 0x2ecd @0x4
0x2ec9…2eda at0005 = ╱46╱F╱ // 0x2ece @0x5
0x2ec9…2eda at0006 = ╱45╱E╱ // 0x2ecf @0x6
0x2ec9…2eda at0007 = ╱ed╱(╱ // 0x2ed0 @0x7
0x2ec9…2eda at0008 = ╱57╱W╱ // 0x2ed1 @0x8
0x2ec9…2eda at0009 = ╱ec╱,╱ // 0x2ed2 @0x9
0x2ec9…2eda at000a = ╱45╱E╱ // 0x2ed3 @0xa
0x2ec9…2eda at000b = ╱ec╱,╱ // 0x2ed4 @0xb
0x2ec9…2eda at000c = ╱4b╱K╱ // 0x2ed5 @0xc
0x2ec9…2eda at000d = ╱37╱7╱ // 0x2ed6 @0xd
0x2ec9…2eda at000e = ╱ef╱$╱ // 0x2ed7 @0xe
0x2ec9…2eda at000f = ╱ee╱)╱ // 0x2ed8 @0xf
0x2ec9…2eda at0010 = EOL // 0x2ed9 @0x10
0x2ec9…2eda }
0x2eda…2f34 bc8b 5630 PUT K7$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W)
0x2eda…2f34 LineComalBin {
0x2eda…2f34 ptr = 0xbc8b // 0x2eda @0x0
0x2eda…2f34 lno = 0x15fe // 0x2edc @0x2
0x2eda…2f34 at0004 = ╱aa╱ PUT ╱ // 0x2ede @0x4
0x2eda…2f34 at0005 = ╱4b╱K╱ // 0x2edf @0x5
0x2eda…2f34 at0006 = ╱37╱7╱ // 0x2ee0 @0x6
0x2eda…2f34 at0007 = ╱ef╱$╱ // 0x2ee1 @0x7
0x2eda…2f34 at0008 = ╱ec╱,╱ // 0x2ee2 @0x8
0x2eda…2f34 at0009 = ╱47╱G╱ // 0x2ee3 @0x9
0x2eda…2f34 at000a = ╱f0╱:╱ // 0x2ee4 @0xa
0x2eda…2f34 at000b = ╱54╱T╱ // 0x2ee5 @0xb
0x2eda…2f34 at000c = ╱31╱1╱ // 0x2ee6 @0xc
0x2eda…2f34 at000d = ╱ed╱(╱ // 0x2ee7 @0xd
0x2eda…2f34 at000e = ╱45╱E╱ // 0x2ee8 @0xe
0x2eda…2f34 at000f = ╱ee╱)╱ // 0x2ee9 @0xf
0x2eda…2f34 at0010 = ╱ec╱,╱ // 0x2eea @0x10
0x2eda…2f34 at0011 = ╱54╱T╱ // 0x2eeb @0x11
0x2eda…2f34 at0012 = ╱31╱1╱ // 0x2eec @0x12
0x2eda…2f34 at0013 = ╱ed╱(╱ // 0x2eed @0x13
0x2eda…2f34 at0014 = ╱47╱G╱ // 0x2eee @0x14
0x2eda…2f34 at0015 = ╱ee╱)╱ // 0x2eef @0x15
0x2eda…2f34 at0016 = ╱ec╱,╱ // 0x2ef0 @0x16
0x2eda…2f34 at0017 = ╱54╱T╱ // 0x2ef1 @0x17
0x2eda…2f34 at0018 = ╱31╱1╱ // 0x2ef2 @0x18
0x2eda…2f34 at0019 = ╱ed╱(╱ // 0x2ef3 @0x19
0x2eda…2f34 at001a = ╱56╱V╱ // 0x2ef4 @0x1a
0x2eda…2f34 at001b = ╱ee╱)╱ // 0x2ef5 @0x1b
0x2eda…2f34 at001c = ╱ec╱,╱ // 0x2ef6 @0x1c
0x2eda…2f34 at001d = ╱54╱T╱ // 0x2ef7 @0x1d
0x2eda…2f34 at001e = ╱31╱1╱ // 0x2ef8 @0x1e
0x2eda…2f34 at001f = ╱ed╱(╱ // 0x2ef9 @0x1f
0x2eda…2f34 at0020 = ╱34╱4╱ // 0x2efa @0x20
0x2eda…2f34 at0021 = ╱fe00008003╱ // 0x2efb @0x21
0x2eda…2f34 at0026 = ╱ee╱)╱ // 0x2f00 @0x26
0x2eda…2f34 at0027 = ╱ec╱,╱ // 0x2f01 @0x27
0x2eda…2f34 at0028 = ╱54╱T╱ // 0x2f02 @0x28
0x2eda…2f34 at0029 = ╱31╱1╱ // 0x2f03 @0x29
0x2eda…2f34 at002a = ╱ed╱(╱ // 0x2f04 @0x2a
0x2eda…2f34 at002b = ╱35╱5╱ // 0x2f05 @0x2b
0x2eda…2f34 at002c = ╱fe0000a003╱ // 0x2f06 @0x2c
0x2eda…2f34 at0031 = ╱ee╱)╱ // 0x2f0b @0x31
0x2eda…2f34 at0032 = ╱ec╱,╱ // 0x2f0c @0x32
0x2eda…2f34 at0033 = ╱54╱T╱ // 0x2f0d @0x33
0x2eda…2f34 at0034 = ╱31╱1╱ // 0x2f0e @0x34
0x2eda…2f34 at0035 = ╱ed╱(╱ // 0x2f0f @0x35
0x2eda…2f34 at0036 = ╱36╱6╱ // 0x2f10 @0x36
0x2eda…2f34 at0037 = ╱fe0000c003╱ // 0x2f11 @0x37
0x2eda…2f34 at003c = ╱ee╱)╱ // 0x2f16 @0x3c
0x2eda…2f34 at003d = ╱ec╱,╱ // 0x2f17 @0x3d
0x2eda…2f34 at003e = ╱54╱T╱ // 0x2f18 @0x3e
0x2eda…2f34 at003f = ╱31╱1╱ // 0x2f19 @0x3f
0x2eda…2f34 at0040 = ╱ed╱(╱ // 0x2f1a @0x40
0x2eda…2f34 at0041 = ╱37╱7╱ // 0x2f1b @0x41
0x2eda…2f34 at0042 = ╱fe0000e003╱ // 0x2f1c @0x42
0x2eda…2f34 at0047 = ╱ee╱)╱ // 0x2f21 @0x47
0x2eda…2f34 at0048 = ╱ec╱,╱ // 0x2f22 @0x48
0x2eda…2f34 at0049 = ╱54╱T╱ // 0x2f23 @0x49
0x2eda…2f34 at004a = ╱31╱1╱ // 0x2f24 @0x4a
0x2eda…2f34 at004b = ╱ed╱(╱ // 0x2f25 @0x4b
0x2eda…2f34 at004c = ╱38╱8╱ // 0x2f26 @0x4c
0x2eda…2f34 at004d = ╱fe00008004╱ // 0x2f27 @0x4d
0x2eda…2f34 at0052 = ╱ee╱)╱ // 0x2f2c @0x52
0x2eda…2f34 at0053 = ╱ec╱,╱ // 0x2f2d @0x53
0x2eda…2f34 at0054 = ╱54╱T╱ // 0x2f2e @0x54
0x2eda…2f34 at0055 = ╱31╱1╱ // 0x2f2f @0x55
0x2eda…2f34 at0056 = ╱ed╱(╱ // 0x2f30 @0x56
0x2eda…2f34 at0057 = ╱57╱W╱ // 0x2f31 @0x57
0x2eda…2f34 at0058 = ╱ee╱)╱ // 0x2f32 @0x58
0x2eda…2f34 at0059 = EOL // 0x2f33 @0x59
0x2eda…2f34 }
0x2f34…2f45 bc9c 5640 EXEC FE(W,G,K7$)
0x2f34…2f45 LineComalBin {
0x2f34…2f45 ptr = 0xbc9c // 0x2f34 @0x0
0x2f34…2f45 lno = 0x1608 // 0x2f36 @0x2
0x2f34…2f45 at0004 = ╱9d╱ EXEC ╱ // 0x2f38 @0x4
0x2f34…2f45 at0005 = ╱46╱F╱ // 0x2f39 @0x5
0x2f34…2f45 at0006 = ╱45╱E╱ // 0x2f3a @0x6
0x2f34…2f45 at0007 = ╱ed╱(╱ // 0x2f3b @0x7
0x2f34…2f45 at0008 = ╱57╱W╱ // 0x2f3c @0x8
0x2f34…2f45 at0009 = ╱ec╱,╱ // 0x2f3d @0x9
0x2f34…2f45 at000a = ╱47╱G╱ // 0x2f3e @0xa
0x2f34…2f45 at000b = ╱ec╱,╱ // 0x2f3f @0xb
0x2f34…2f45 at000c = ╱4b╱K╱ // 0x2f40 @0xc
0x2f34…2f45 at000d = ╱37╱7╱ // 0x2f41 @0xd
0x2f34…2f45 at000e = ╱ef╱$╱ // 0x2f42 @0xe
0x2f34…2f45 at000f = ╱ee╱)╱ // 0x2f43 @0xf
0x2f34…2f45 at0010 = EOL // 0x2f44 @0x10
0x2f34…2f45 }
0x2f45…2fa5 bcfc 5650 PUT K7$,12:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W)
0x2f45…2fa5 LineComalBin {
0x2f45…2fa5 ptr = 0xbcfc // 0x2f45 @0x0
0x2f45…2fa5 lno = 0x1612 // 0x2f47 @0x2
0x2f45…2fa5 at0004 = ╱aa╱ PUT ╱ // 0x2f49 @0x4
0x2f45…2fa5 at0005 = ╱4b╱K╱ // 0x2f4a @0x5
0x2f45…2fa5 at0006 = ╱37╱7╱ // 0x2f4b @0x6
0x2f45…2fa5 at0007 = ╱ef╱$╱ // 0x2f4c @0x7
0x2f45…2fa5 at0008 = ╱ec╱,╱ // 0x2f4d @0x8
0x2f45…2fa5 at0009 = ╱31╱1╱ // 0x2f4e @0x9
0x2f45…2fa5 at000a = ╱32╱2╱ // 0x2f4f @0xa
0x2f45…2fa5 at000b = ╱fe0000c004╱ // 0x2f50 @0xb
0x2f45…2fa5 at0010 = ╱f0╱:╱ // 0x2f55 @0x10
0x2f45…2fa5 at0011 = ╱54╱T╱ // 0x2f56 @0x11
0x2f45…2fa5 at0012 = ╱32╱2╱ // 0x2f57 @0x12
0x2f45…2fa5 at0013 = ╱ed╱(╱ // 0x2f58 @0x13
0x2f45…2fa5 at0014 = ╱45╱E╱ // 0x2f59 @0x14
0x2f45…2fa5 at0015 = ╱ee╱)╱ // 0x2f5a @0x15
0x2f45…2fa5 at0016 = ╱ec╱,╱ // 0x2f5b @0x16
0x2f45…2fa5 at0017 = ╱54╱T╱ // 0x2f5c @0x17
0x2f45…2fa5 at0018 = ╱32╱2╱ // 0x2f5d @0x18
0x2f45…2fa5 at0019 = ╱ed╱(╱ // 0x2f5e @0x19
0x2f45…2fa5 at001a = ╱47╱G╱ // 0x2f5f @0x1a
0x2f45…2fa5 at001b = ╱ee╱)╱ // 0x2f60 @0x1b
0x2f45…2fa5 at001c = ╱ec╱,╱ // 0x2f61 @0x1c
0x2f45…2fa5 at001d = ╱54╱T╱ // 0x2f62 @0x1d
0x2f45…2fa5 at001e = ╱32╱2╱ // 0x2f63 @0x1e
0x2f45…2fa5 at001f = ╱ed╱(╱ // 0x2f64 @0x1f
0x2f45…2fa5 at0020 = ╱56╱V╱ // 0x2f65 @0x20
0x2f45…2fa5 at0021 = ╱ee╱)╱ // 0x2f66 @0x21
0x2f45…2fa5 at0022 = ╱ec╱,╱ // 0x2f67 @0x22
0x2f45…2fa5 at0023 = ╱54╱T╱ // 0x2f68 @0x23
0x2f45…2fa5 at0024 = ╱32╱2╱ // 0x2f69 @0x24
0x2f45…2fa5 at0025 = ╱ed╱(╱ // 0x2f6a @0x25
0x2f45…2fa5 at0026 = ╱34╱4╱ // 0x2f6b @0x26
0x2f45…2fa5 at0027 = ╱fe00008003╱ // 0x2f6c @0x27
0x2f45…2fa5 at002c = ╱ee╱)╱ // 0x2f71 @0x2c
0x2f45…2fa5 at002d = ╱ec╱,╱ // 0x2f72 @0x2d
0x2f45…2fa5 at002e = ╱54╱T╱ // 0x2f73 @0x2e
0x2f45…2fa5 at002f = ╱32╱2╱ // 0x2f74 @0x2f
0x2f45…2fa5 at0030 = ╱ed╱(╱ // 0x2f75 @0x30
0x2f45…2fa5 at0031 = ╱35╱5╱ // 0x2f76 @0x31
0x2f45…2fa5 at0032 = ╱fe0000a003╱ // 0x2f77 @0x32
0x2f45…2fa5 at0037 = ╱ee╱)╱ // 0x2f7c @0x37
0x2f45…2fa5 at0038 = ╱ec╱,╱ // 0x2f7d @0x38
0x2f45…2fa5 at0039 = ╱54╱T╱ // 0x2f7e @0x39
0x2f45…2fa5 at003a = ╱32╱2╱ // 0x2f7f @0x3a
0x2f45…2fa5 at003b = ╱ed╱(╱ // 0x2f80 @0x3b
0x2f45…2fa5 at003c = ╱36╱6╱ // 0x2f81 @0x3c
0x2f45…2fa5 at003d = ╱fe0000c003╱ // 0x2f82 @0x3d
0x2f45…2fa5 at0042 = ╱ee╱)╱ // 0x2f87 @0x42
0x2f45…2fa5 at0043 = ╱ec╱,╱ // 0x2f88 @0x43
0x2f45…2fa5 at0044 = ╱54╱T╱ // 0x2f89 @0x44
0x2f45…2fa5 at0045 = ╱32╱2╱ // 0x2f8a @0x45
0x2f45…2fa5 at0046 = ╱ed╱(╱ // 0x2f8b @0x46
0x2f45…2fa5 at0047 = ╱37╱7╱ // 0x2f8c @0x47
0x2f45…2fa5 at0048 = ╱fe0000e003╱ // 0x2f8d @0x48
0x2f45…2fa5 at004d = ╱ee╱)╱ // 0x2f92 @0x4d
0x2f45…2fa5 at004e = ╱ec╱,╱ // 0x2f93 @0x4e
0x2f45…2fa5 at004f = ╱54╱T╱ // 0x2f94 @0x4f
0x2f45…2fa5 at0050 = ╱32╱2╱ // 0x2f95 @0x50
0x2f45…2fa5 at0051 = ╱ed╱(╱ // 0x2f96 @0x51
0x2f45…2fa5 at0052 = ╱38╱8╱ // 0x2f97 @0x52
0x2f45…2fa5 at0053 = ╱fe00008004╱ // 0x2f98 @0x53
0x2f45…2fa5 at0058 = ╱ee╱)╱ // 0x2f9d @0x58
0x2f45…2fa5 at0059 = ╱ec╱,╱ // 0x2f9e @0x59
0x2f45…2fa5 at005a = ╱54╱T╱ // 0x2f9f @0x5a
0x2f45…2fa5 at005b = ╱32╱2╱ // 0x2fa0 @0x5b
0x2f45…2fa5 at005c = ╱ed╱(╱ // 0x2fa1 @0x5c
0x2f45…2fa5 at005d = ╱57╱W╱ // 0x2fa2 @0x5d
0x2f45…2fa5 at005e = ╱ee╱)╱ // 0x2fa3 @0x5e
0x2f45…2fa5 at005f = EOL // 0x2fa4 @0x5f
0x2f45…2fa5 }
0x2fa5…2fb6 bd0d 5660 EXEC FE(W,V,K7$)
0x2fa5…2fb6 LineComalBin {
0x2fa5…2fb6 ptr = 0xbd0d // 0x2fa5 @0x0
0x2fa5…2fb6 lno = 0x161c // 0x2fa7 @0x2
0x2fa5…2fb6 at0004 = ╱9d╱ EXEC ╱ // 0x2fa9 @0x4
0x2fa5…2fb6 at0005 = ╱46╱F╱ // 0x2faa @0x5
0x2fa5…2fb6 at0006 = ╱45╱E╱ // 0x2fab @0x6
0x2fa5…2fb6 at0007 = ╱ed╱(╱ // 0x2fac @0x7
0x2fa5…2fb6 at0008 = ╱57╱W╱ // 0x2fad @0x8
0x2fa5…2fb6 at0009 = ╱ec╱,╱ // 0x2fae @0x9
0x2fa5…2fb6 at000a = ╱56╱V╱ // 0x2faf @0xa
0x2fa5…2fb6 at000b = ╱ec╱,╱ // 0x2fb0 @0xb
0x2fa5…2fb6 at000c = ╱4b╱K╱ // 0x2fb1 @0xc
0x2fa5…2fb6 at000d = ╱37╱7╱ // 0x2fb2 @0xd
0x2fa5…2fb6 at000e = ╱ef╱$╱ // 0x2fb3 @0xe
0x2fa5…2fb6 at000f = ╱ee╱)╱ // 0x2fb4 @0xf
0x2fa5…2fb6 at0010 = EOL // 0x2fb5 @0x10
0x2fa5…2fb6 }
0x2fb6…2fbf bd16 5670 CLOSE K7$
0x2fb6…2fbf LineComalBin {
0x2fb6…2fbf ptr = 0xbd16 // 0x2fb6 @0x0
0x2fb6…2fbf lno = 0x1626 // 0x2fb8 @0x2
0x2fb6…2fbf at0004 = ╱a8╱ CLOSE ╱ // 0x2fba @0x4
0x2fb6…2fbf at0005 = ╱4b╱K╱ // 0x2fbb @0x5
0x2fb6…2fbf at0006 = ╱37╱7╱ // 0x2fbc @0x6
0x2fb6…2fbf at0007 = ╱ef╱$╱ // 0x2fbd @0x7
0x2fb6…2fbf at0008 = EOL // 0x2fbe @0x8
0x2fb6…2fbf }
0x2fbf…2fd5 bd2c 5680 EXEC FE(W,4,K7$)
0x2fbf…2fd5 LineComalBin {
0x2fbf…2fd5 ptr = 0xbd2c // 0x2fbf @0x0
0x2fbf…2fd5 lno = 0x1630 // 0x2fc1 @0x2
0x2fbf…2fd5 at0004 = ╱9d╱ EXEC ╱ // 0x2fc3 @0x4
0x2fbf…2fd5 at0005 = ╱46╱F╱ // 0x2fc4 @0x5
0x2fbf…2fd5 at0006 = ╱45╱E╱ // 0x2fc5 @0x6
0x2fbf…2fd5 at0007 = ╱ed╱(╱ // 0x2fc6 @0x7
0x2fbf…2fd5 at0008 = ╱57╱W╱ // 0x2fc7 @0x8
0x2fbf…2fd5 at0009 = ╱ec╱,╱ // 0x2fc8 @0x9
0x2fbf…2fd5 at000a = ╱34╱4╱ // 0x2fc9 @0xa
0x2fbf…2fd5 at000b = ╱fe00008003╱ // 0x2fca @0xb
0x2fbf…2fd5 at0010 = ╱ec╱,╱ // 0x2fcf @0x10
0x2fbf…2fd5 at0011 = ╱4b╱K╱ // 0x2fd0 @0x11
0x2fbf…2fd5 at0012 = ╱37╱7╱ // 0x2fd1 @0x12
0x2fbf…2fd5 at0013 = ╱ef╱$╱ // 0x2fd2 @0x13
0x2fbf…2fd5 at0014 = ╱ee╱)╱ // 0x2fd3 @0x14
0x2fbf…2fd5 at0015 = EOL // 0x2fd4 @0x15
0x2fbf…2fd5 }
0x2fd5…2fdb bd32 5690 ENDPROC
0x2fd5…2fdb LineComalBin {
0x2fd5…2fdb ptr = 0xbd32 // 0x2fd5 @0x0
0x2fd5…2fdb lno = 0x163a // 0x2fd7 @0x2
0x2fd5…2fdb at0004 = ╱9f╱ ENDPROC ╱ // 0x2fd9 @0x4
0x2fd5…2fdb at0005 = EOL // 0x2fda @0x5
0x2fd5…2fdb }
0x2fdb…2ff5 bd4c 5700 K1$="P641220:SYSTEM1"
0x2fdb…2ff5 LineComalBin {
0x2fdb…2ff5 ptr = 0xbd4c // 0x2fdb @0x0
0x2fdb…2ff5 lno = 0x1644 // 0x2fdd @0x2
0x2fdb…2ff5 at0004 = ╱4b╱K╱ // 0x2fdf @0x4
0x2fdb…2ff5 at0005 = ╱31╱1╱ // 0x2fe0 @0x5
0x2fdb…2ff5 at0006 = ╱ef╱$╱ // 0x2fe1 @0x6
0x2fdb…2ff5 at0007 = ╱dc╱=╱ // 0x2fe2 @0x7
0x2fdb…2ff5 at0008 = ╱22╱"╱ // 0x2fe3 @0x8
0x2fdb…2ff5 at0009 = ╱50╱P╱ // 0x2fe4 @0x9
0x2fdb…2ff5 at000a = ╱36╱6╱ // 0x2fe5 @0xa
0x2fdb…2ff5 at000b = ╱34╱4╱ // 0x2fe6 @0xb
0x2fdb…2ff5 at000c = ╱31╱1╱ // 0x2fe7 @0xc
0x2fdb…2ff5 at000d = ╱32╱2╱ // 0x2fe8 @0xd
0x2fdb…2ff5 at000e = ╱32╱2╱ // 0x2fe9 @0xe
0x2fdb…2ff5 at000f = ╱30╱0╱ // 0x2fea @0xf
0x2fdb…2ff5 at0010 = ╱3a╱:╱ // 0x2feb @0x10
0x2fdb…2ff5 at0011 = ╱53╱S╱ // 0x2fec @0x11
0x2fdb…2ff5 at0012 = ╱59╱Y╱ // 0x2fed @0x12
0x2fdb…2ff5 at0013 = ╱53╱S╱ // 0x2fee @0x13
0x2fdb…2ff5 at0014 = ╱54╱T╱ // 0x2fef @0x14
0x2fdb…2ff5 at0015 = ╱45╱E╱ // 0x2ff0 @0x15
0x2fdb…2ff5 at0016 = ╱4d╱M╱ // 0x2ff1 @0x16
0x2fdb…2ff5 at0017 = ╱31╱1╱ // 0x2ff2 @0x17
0x2fdb…2ff5 at0018 = ╱22╱"╱ // 0x2ff3 @0x18
0x2fdb…2ff5 at0019 = EOL // 0x2ff4 @0x19
0x2fdb…2ff5 }
0x2ff5…3000 bd57 5710 OPEN K1$,R
0x2ff5…3000 LineComalBin {
0x2ff5…3000 ptr = 0xbd57 // 0x2ff5 @0x0
0x2ff5…3000 lno = 0x164e // 0x2ff7 @0x2
0x2ff5…3000 at0004 = ╱a7╱ OPEN ╱ // 0x2ff9 @0x4
0x2ff5…3000 at0005 = ╱4b╱K╱ // 0x2ffa @0x5
0x2ff5…3000 at0006 = ╱31╱1╱ // 0x2ffb @0x6
0x2ff5…3000 at0007 = ╱ef╱$╱ // 0x2ffc @0x7
0x2ff5…3000 at0008 = ╱ec╱,╱ // 0x2ffd @0x8
0x2ff5…3000 at0009 = ╱52╱R╱ // 0x2ffe @0x9
0x2ff5…3000 at000a = EOL // 0x2fff @0xa
0x2ff5…3000 }
0x3000…3011 bd68 5720 EXEC FE(W,E,K1$)
0x3000…3011 LineComalBin {
0x3000…3011 ptr = 0xbd68 // 0x3000 @0x0
0x3000…3011 lno = 0x1658 // 0x3002 @0x2
0x3000…3011 at0004 = ╱9d╱ EXEC ╱ // 0x3004 @0x4
0x3000…3011 at0005 = ╱46╱F╱ // 0x3005 @0x5
0x3000…3011 at0006 = ╱45╱E╱ // 0x3006 @0x6
0x3000…3011 at0007 = ╱ed╱(╱ // 0x3007 @0x7
0x3000…3011 at0008 = ╱57╱W╱ // 0x3008 @0x8
0x3000…3011 at0009 = ╱ec╱,╱ // 0x3009 @0x9
0x3000…3011 at000a = ╱45╱E╱ // 0x300a @0xa
0x3000…3011 at000b = ╱ec╱,╱ // 0x300b @0xb
0x3000…3011 at000c = ╱4b╱K╱ // 0x300c @0xc
0x3000…3011 at000d = ╱31╱1╱ // 0x300d @0xd
0x3000…3011 at000e = ╱ef╱$╱ // 0x300e @0xe
0x3000…3011 at000f = ╱ee╱)╱ // 0x300f @0xf
0x3000…3011 at0010 = EOL // 0x3010 @0x10
0x3000…3011 }
0x3011…303c bd93 5730 GET K1$,E:MFANTAL,MDANTAL,MKANTAL,MVANTAL
0x3011…303c LineComalBin {
0x3011…303c ptr = 0xbd93 // 0x3011 @0x0
0x3011…303c lno = 0x1662 // 0x3013 @0x2
0x3011…303c at0004 = ╱a9╱ GET ╱ // 0x3015 @0x4
0x3011…303c at0005 = ╱4b╱K╱ // 0x3016 @0x5
0x3011…303c at0006 = ╱31╱1╱ // 0x3017 @0x6
0x3011…303c at0007 = ╱ef╱$╱ // 0x3018 @0x7
0x3011…303c at0008 = ╱ec╱,╱ // 0x3019 @0x8
0x3011…303c at0009 = ╱45╱E╱ // 0x301a @0x9
0x3011…303c at000a = ╱f0╱:╱ // 0x301b @0xa
0x3011…303c at000b = ╱4d╱M╱ // 0x301c @0xb
0x3011…303c at000c = ╱46╱F╱ // 0x301d @0xc
0x3011…303c at000d = ╱41╱A╱ // 0x301e @0xd
0x3011…303c at000e = ╱4e╱N╱ // 0x301f @0xe
0x3011…303c at000f = ╱54╱T╱ // 0x3020 @0xf
0x3011…303c at0010 = ╱41╱A╱ // 0x3021 @0x10
0x3011…303c at0011 = ╱4c╱L╱ // 0x3022 @0x11
0x3011…303c at0012 = ╱ec╱,╱ // 0x3023 @0x12
0x3011…303c at0013 = ╱4d╱M╱ // 0x3024 @0x13
0x3011…303c at0014 = ╱44╱D╱ // 0x3025 @0x14
0x3011…303c at0015 = ╱41╱A╱ // 0x3026 @0x15
0x3011…303c at0016 = ╱4e╱N╱ // 0x3027 @0x16
0x3011…303c at0017 = ╱54╱T╱ // 0x3028 @0x17
0x3011…303c at0018 = ╱41╱A╱ // 0x3029 @0x18
0x3011…303c at0019 = ╱4c╱L╱ // 0x302a @0x19
0x3011…303c at001a = ╱ec╱,╱ // 0x302b @0x1a
0x3011…303c at001b = ╱4d╱M╱ // 0x302c @0x1b
0x3011…303c at001c = ╱4b╱K╱ // 0x302d @0x1c
0x3011…303c at001d = ╱41╱A╱ // 0x302e @0x1d
0x3011…303c at001e = ╱4e╱N╱ // 0x302f @0x1e
0x3011…303c at001f = ╱54╱T╱ // 0x3030 @0x1f
0x3011…303c at0020 = ╱41╱A╱ // 0x3031 @0x20
0x3011…303c at0021 = ╱4c╱L╱ // 0x3032 @0x21
0x3011…303c at0022 = ╱ec╱,╱ // 0x3033 @0x22
0x3011…303c at0023 = ╱4d╱M╱ // 0x3034 @0x23
0x3011…303c at0024 = ╱56╱V╱ // 0x3035 @0x24
0x3011…303c at0025 = ╱41╱A╱ // 0x3036 @0x25
0x3011…303c at0026 = ╱4e╱N╱ // 0x3037 @0x26
0x3011…303c at0027 = ╱54╱T╱ // 0x3038 @0x27
0x3011…303c at0028 = ╱41╱A╱ // 0x3039 @0x28
0x3011…303c at0029 = ╱4c╱L╱ // 0x303a @0x29
0x3011…303c at002a = EOL // 0x303b @0x2a
0x3011…303c }
0x303c…304d bda4 5740 EXEC FE(W,G,K1$)
0x303c…304d LineComalBin {
0x303c…304d ptr = 0xbda4 // 0x303c @0x0
0x303c…304d lno = 0x166c // 0x303e @0x2
0x303c…304d at0004 = ╱9d╱ EXEC ╱ // 0x3040 @0x4
0x303c…304d at0005 = ╱46╱F╱ // 0x3041 @0x5
0x303c…304d at0006 = ╱45╱E╱ // 0x3042 @0x6
0x303c…304d at0007 = ╱ed╱(╱ // 0x3043 @0x7
0x303c…304d at0008 = ╱57╱W╱ // 0x3044 @0x8
0x303c…304d at0009 = ╱ec╱,╱ // 0x3045 @0x9
0x303c…304d at000a = ╱47╱G╱ // 0x3046 @0xa
0x303c…304d at000b = ╱ec╱,╱ // 0x3047 @0xb
0x303c…304d at000c = ╱4b╱K╱ // 0x3048 @0xc
0x303c…304d at000d = ╱31╱1╱ // 0x3049 @0xd
0x303c…304d at000e = ╱ef╱$╱ // 0x304a @0xe
0x303c…304d at000f = ╱ee╱)╱ // 0x304b @0xf
0x303c…304d at0010 = EOL // 0x304c @0x10
0x303c…304d }
0x304d…3072 bdc9 5750 GET K1$,4:KPOST,MFAK,MVGR,MKGR
0x304d…3072 LineComalBin {
0x304d…3072 ptr = 0xbdc9 // 0x304d @0x0
0x304d…3072 lno = 0x1676 // 0x304f @0x2
0x304d…3072 at0004 = ╱a9╱ GET ╱ // 0x3051 @0x4
0x304d…3072 at0005 = ╱4b╱K╱ // 0x3052 @0x5
0x304d…3072 at0006 = ╱31╱1╱ // 0x3053 @0x6
0x304d…3072 at0007 = ╱ef╱$╱ // 0x3054 @0x7
0x304d…3072 at0008 = ╱ec╱,╱ // 0x3055 @0x8
0x304d…3072 at0009 = ╱34╱4╱ // 0x3056 @0x9
0x304d…3072 at000a = ╱fe00008003╱ // 0x3057 @0xa
0x304d…3072 at000f = ╱f0╱:╱ // 0x305c @0xf
0x304d…3072 at0010 = ╱4b╱K╱ // 0x305d @0x10
0x304d…3072 at0011 = ╱50╱P╱ // 0x305e @0x11
0x304d…3072 at0012 = ╱4f╱O╱ // 0x305f @0x12
0x304d…3072 at0013 = ╱53╱S╱ // 0x3060 @0x13
0x304d…3072 at0014 = ╱54╱T╱ // 0x3061 @0x14
0x304d…3072 at0015 = ╱ec╱,╱ // 0x3062 @0x15
0x304d…3072 at0016 = ╱4d╱M╱ // 0x3063 @0x16
0x304d…3072 at0017 = ╱46╱F╱ // 0x3064 @0x17
0x304d…3072 at0018 = ╱41╱A╱ // 0x3065 @0x18
0x304d…3072 at0019 = ╱4b╱K╱ // 0x3066 @0x19
0x304d…3072 at001a = ╱ec╱,╱ // 0x3067 @0x1a
0x304d…3072 at001b = ╱4d╱M╱ // 0x3068 @0x1b
0x304d…3072 at001c = ╱56╱V╱ // 0x3069 @0x1c
0x304d…3072 at001d = ╱47╱G╱ // 0x306a @0x1d
0x304d…3072 at001e = ╱52╱R╱ // 0x306b @0x1e
0x304d…3072 at001f = ╱ec╱,╱ // 0x306c @0x1f
0x304d…3072 at0020 = ╱4d╱M╱ // 0x306d @0x20
0x304d…3072 at0021 = ╱4b╱K╱ // 0x306e @0x21
0x304d…3072 at0022 = ╱47╱G╱ // 0x306f @0x22
0x304d…3072 at0023 = ╱52╱R╱ // 0x3070 @0x23
0x304d…3072 at0024 = EOL // 0x3071 @0x24
0x304d…3072 }
0x3072…3083 bdda 5760 EXEC FE(W,V,K1$)
0x3072…3083 LineComalBin {
0x3072…3083 ptr = 0xbdda // 0x3072 @0x0
0x3072…3083 lno = 0x1680 // 0x3074 @0x2
0x3072…3083 at0004 = ╱9d╱ EXEC ╱ // 0x3076 @0x4
0x3072…3083 at0005 = ╱46╱F╱ // 0x3077 @0x5
0x3072…3083 at0006 = ╱45╱E╱ // 0x3078 @0x6
0x3072…3083 at0007 = ╱ed╱(╱ // 0x3079 @0x7
0x3072…3083 at0008 = ╱57╱W╱ // 0x307a @0x8
0x3072…3083 at0009 = ╱ec╱,╱ // 0x307b @0x9
0x3072…3083 at000a = ╱56╱V╱ // 0x307c @0xa
0x3072…3083 at000b = ╱ec╱,╱ // 0x307d @0xb
0x3072…3083 at000c = ╱4b╱K╱ // 0x307e @0xc
0x3072…3083 at000d = ╱31╱1╱ // 0x307f @0xd
0x3072…3083 at000e = ╱ef╱$╱ // 0x3080 @0xe
0x3072…3083 at000f = ╱ee╱)╱ // 0x3081 @0xf
0x3072…3083 at0010 = EOL // 0x3082 @0x10
0x3072…3083 }
0x3083…309e bdf5 5770 GET K1$,5:MKRGR,MFKL
0x3083…309e LineComalBin {
0x3083…309e ptr = 0xbdf5 // 0x3083 @0x0
0x3083…309e lno = 0x168a // 0x3085 @0x2
0x3083…309e at0004 = ╱a9╱ GET ╱ // 0x3087 @0x4
0x3083…309e at0005 = ╱4b╱K╱ // 0x3088 @0x5
0x3083…309e at0006 = ╱31╱1╱ // 0x3089 @0x6
0x3083…309e at0007 = ╱ef╱$╱ // 0x308a @0x7
0x3083…309e at0008 = ╱ec╱,╱ // 0x308b @0x8
0x3083…309e at0009 = ╱35╱5╱ // 0x308c @0x9
0x3083…309e at000a = ╱fe0000a003╱ // 0x308d @0xa
0x3083…309e at000f = ╱f0╱:╱ // 0x3092 @0xf
0x3083…309e at0010 = ╱4d╱M╱ // 0x3093 @0x10
0x3083…309e at0011 = ╱4b╱K╱ // 0x3094 @0x11
0x3083…309e at0012 = ╱52╱R╱ // 0x3095 @0x12
0x3083…309e at0013 = ╱47╱G╱ // 0x3096 @0x13
0x3083…309e at0014 = ╱52╱R╱ // 0x3097 @0x14
0x3083…309e at0015 = ╱ec╱,╱ // 0x3098 @0x15
0x3083…309e at0016 = ╱4d╱M╱ // 0x3099 @0x16
0x3083…309e at0017 = ╱46╱F╱ // 0x309a @0x17
0x3083…309e at0018 = ╱4b╱K╱ // 0x309b @0x18
0x3083…309e at0019 = ╱4c╱L╱ // 0x309c @0x19
0x3083…309e at001a = EOL // 0x309d @0x1a
0x3083…309e }
0x309e…30b5 be0c 5780 EXEC FE(W,25,K1$)
0x309e…30b5 LineComalBin {
0x309e…30b5 ptr = 0xbe0c // 0x309e @0x0
0x309e…30b5 lno = 0x1694 // 0x30a0 @0x2
0x309e…30b5 at0004 = ╱9d╱ EXEC ╱ // 0x30a2 @0x4
0x309e…30b5 at0005 = ╱46╱F╱ // 0x30a3 @0x5
0x309e…30b5 at0006 = ╱45╱E╱ // 0x30a4 @0x6
0x309e…30b5 at0007 = ╱ed╱(╱ // 0x30a5 @0x7
0x309e…30b5 at0008 = ╱57╱W╱ // 0x30a6 @0x8
0x309e…30b5 at0009 = ╱ec╱,╱ // 0x30a7 @0x9
0x309e…30b5 at000a = ╱32╱2╱ // 0x30a8 @0xa
0x309e…30b5 at000b = ╱35╱5╱ // 0x30a9 @0xb
0x309e…30b5 at000c = ╱fe0000c805╱ // 0x30aa @0xc
0x309e…30b5 at0011 = ╱ec╱,╱ // 0x30af @0x11
0x309e…30b5 at0012 = ╱4b╱K╱ // 0x30b0 @0x12
0x309e…30b5 at0013 = ╱31╱1╱ // 0x30b1 @0x13
0x309e…30b5 at0014 = ╱ef╱$╱ // 0x30b2 @0x14
0x309e…30b5 at0015 = ╱ee╱)╱ // 0x30b3 @0x15
0x309e…30b5 at0016 = EOL // 0x30b4 @0x16
0x309e…30b5 }
0x30b5…30dd be34 5790 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL
0x30b5…30dd LineComalBin {
0x30b5…30dd ptr = 0xbe34 // 0x30b5 @0x0
0x30b5…30dd lno = 0x169e // 0x30b7 @0x2
0x30b5…30dd at0004 = ╱a9╱ GET ╱ // 0x30b9 @0x4
0x30b5…30dd at0005 = ╱4b╱K╱ // 0x30ba @0x5
0x30b5…30dd at0006 = ╱31╱1╱ // 0x30bb @0x6
0x30b5…30dd at0007 = ╱ef╱$╱ // 0x30bc @0x7
0x30b5…30dd at0008 = ╱ec╱,╱ // 0x30bd @0x8
0x30b5…30dd at0009 = ╱38╱8╱ // 0x30be @0x9
0x30b5…30dd at000a = ╱fe00008004╱ // 0x30bf @0xa
0x30b5…30dd at000f = ╱f0╱:╱ // 0x30c4 @0xf
0x30b5…30dd at0010 = ╱44╱D╱ // 0x30c5 @0x10
0x30b5…30dd at0011 = ╱49╱I╱ // 0x30c6 @0x11
0x30b5…30dd at0012 = ╱56╱V╱ // 0x30c7 @0x12
0x30b5…30dd at0013 = ╱4e╱N╱ // 0x30c8 @0x13
0x30b5…30dd at0014 = ╱52╱R╱ // 0x30c9 @0x14
0x30b5…30dd at0015 = ╱ec╱,╱ // 0x30ca @0x15
0x30b5…30dd at0016 = ╱44╱D╱ // 0x30cb @0x16
0x30b5…30dd at0017 = ╱49╱I╱ // 0x30cc @0x17
0x30b5…30dd at0018 = ╱56╱V╱ // 0x30cd @0x18
0x30b5…30dd at0019 = ╱44╱D╱ // 0x30ce @0x19
0x30b5…30dd at001a = ╱4e╱N╱ // 0x30cf @0x1a
0x30b5…30dd at001b = ╱52╱R╱ // 0x30d0 @0x1b
0x30b5…30dd at001c = ╱ec╱,╱ // 0x30d1 @0x1c
0x30b5…30dd at001d = ╱44╱D╱ // 0x30d2 @0x1d
0x30b5…30dd at001e = ╱49╱I╱ // 0x30d3 @0x1e
0x30b5…30dd at001f = ╱46╱F╱ // 0x30d4 @0x1f
0x30b5…30dd at0020 = ╱4e╱N╱ // 0x30d5 @0x20
0x30b5…30dd at0021 = ╱52╱R╱ // 0x30d6 @0x21
0x30b5…30dd at0022 = ╱ec╱,╱ // 0x30d7 @0x22
0x30b5…30dd at0023 = ╱44╱D╱ // 0x30d8 @0x23
0x30b5…30dd at0024 = ╱54╱T╱ // 0x30d9 @0x24
0x30b5…30dd at0025 = ╱41╱A╱ // 0x30da @0x25
0x30b5…30dd at0026 = ╱4c╱L╱ // 0x30db @0x26
0x30b5…30dd at0027 = EOL // 0x30dc @0x27
0x30b5…30dd }
0x30dd…30f3 be4a 5800 EXEC FE(W,4,K1$)
0x30dd…30f3 LineComalBin {
0x30dd…30f3 ptr = 0xbe4a // 0x30dd @0x0
0x30dd…30f3 lno = 0x16a8 // 0x30df @0x2
0x30dd…30f3 at0004 = ╱9d╱ EXEC ╱ // 0x30e1 @0x4
0x30dd…30f3 at0005 = ╱46╱F╱ // 0x30e2 @0x5
0x30dd…30f3 at0006 = ╱45╱E╱ // 0x30e3 @0x6
0x30dd…30f3 at0007 = ╱ed╱(╱ // 0x30e4 @0x7
0x30dd…30f3 at0008 = ╱57╱W╱ // 0x30e5 @0x8
0x30dd…30f3 at0009 = ╱ec╱,╱ // 0x30e6 @0x9
0x30dd…30f3 at000a = ╱34╱4╱ // 0x30e7 @0xa
0x30dd…30f3 at000b = ╱fe00008003╱ // 0x30e8 @0xb
0x30dd…30f3 at0010 = ╱ec╱,╱ // 0x30ed @0x10
0x30dd…30f3 at0011 = ╱4b╱K╱ // 0x30ee @0x11
0x30dd…30f3 at0012 = ╱31╱1╱ // 0x30ef @0x12
0x30dd…30f3 at0013 = ╱ef╱$╱ // 0x30f0 @0x13
0x30dd…30f3 at0014 = ╱ee╱)╱ // 0x30f1 @0x14
0x30dd…30f3 at0015 = EOL // 0x30f2 @0x15
0x30dd…30f3 }
0x30f3…3107 be5e 5810 GET K1$,10:N$
0x30f3…3107 LineComalBin {
0x30f3…3107 ptr = 0xbe5e // 0x30f3 @0x0
0x30f3…3107 lno = 0x16b2 // 0x30f5 @0x2
0x30f3…3107 at0004 = ╱a9╱ GET ╱ // 0x30f7 @0x4
0x30f3…3107 at0005 = ╱4b╱K╱ // 0x30f8 @0x5
0x30f3…3107 at0006 = ╱31╱1╱ // 0x30f9 @0x6
0x30f3…3107 at0007 = ╱ef╱$╱ // 0x30fa @0x7
0x30f3…3107 at0008 = ╱ec╱,╱ // 0x30fb @0x8
0x30f3…3107 at0009 = ╱31╱1╱ // 0x30fc @0x9
0x30f3…3107 at000a = ╱30╱0╱ // 0x30fd @0xa
0x30f3…3107 at000b = ╱fe0000a004╱ // 0x30fe @0xb
0x30f3…3107 at0010 = ╱f0╱:╱ // 0x3103 @0x10
0x30f3…3107 at0011 = ╱4e╱N╱ // 0x3104 @0x11
0x30f3…3107 at0012 = ╱ef╱$╱ // 0x3105 @0x12
0x30f3…3107 at0013 = EOL // 0x3106 @0x13
0x30f3…3107 }
0x3107…311d (163,) be74 5820 EXEC FE(W,5,K1$)
0x3107…311d LineComalBin {
0x3107…311d ptr = 0xbe74 // 0x3107 @0x0
0x3107…311d lno = 0x16bc // 0x3109 @0x2
0x3107…311d at0004 = ╱9d╱ EXEC ╱ // 0x310b @0x4
0x3107…311d at0005 = ╱46╱F╱ // 0x310c @0x5
0x3107…311d at0006 = ╱45╱E╱ // 0x310d @0x6
0x3107…311d at0007 = ╱ed╱(╱ // 0x310e @0x7
0x3107…311d at0008 = ╱57╱W╱ // 0x310f @0x8
0x3107…311d at0009 = ╱ec╱,╱ // 0x3110 @0x9
0x3107…311d at000a = ╱35╱5╱ // 0x3111 @0xa
0x3107…311d at000b = ╱fe0000a003╱ // 0x3112 @0xb
0x3107…311d at0010 = ╱ec╱,╱ // 0x3117 @0x10
0x3107…311d at0011 = ╱4b╱K╱ // 0x3118 @0x11
0x3107…311d at0012 = ╱31╱1╱ // 0x3119 @0x12
0x3107…311d at0013 = ╱ef╱$╱ // 0x311a @0x13
0x3107…311d at0014 = ╱ee╱)╱ // 0x311b @0x14
0x3107…311d at0015 = EOL // 0x311c @0x15
0x3107…311d }
0x311d…3132 be89 5830 GET K1$,12:K2$
0x311d…3132 LineComalBin {
0x311d…3132 ptr = 0xbe89 // 0x311d @0x0
0x311d…3132 lno = 0x16c6 // 0x311f @0x2
0x311d…3132 at0004 = ╱a9╱ GET ╱ // 0x3121 @0x4
0x311d…3132 at0005 = ╱4b╱K╱ // 0x3122 @0x5
0x311d…3132 at0006 = ╱31╱1╱ // 0x3123 @0x6
0x311d…3132 at0007 = ╱ef╱$╱ // 0x3124 @0x7
0x311d…3132 at0008 = ╱ec╱,╱ // 0x3125 @0x8
0x311d…3132 at0009 = ╱31╱1╱ // 0x3126 @0x9
0x311d…3132 at000a = ╱32╱2╱ // 0x3127 @0xa
0x311d…3132 at000b = ╱fe0000c004╱ // 0x3128 @0xb
0x311d…3132 at0010 = ╱f0╱:╱ // 0x312d @0x10
0x311d…3132 at0011 = ╱4b╱K╱ // 0x312e @0x11
0x311d…3132 at0012 = ╱32╱2╱ // 0x312f @0x12
0x311d…3132 at0013 = ╱ef╱$╱ // 0x3130 @0x13
0x311d…3132 at0014 = EOL // 0x3131 @0x14
0x311d…3132 }
0x3132…3148 be9f 5840 EXEC FE(W,6,K1$)
0x3132…3148 LineComalBin {
0x3132…3148 ptr = 0xbe9f // 0x3132 @0x0
0x3132…3148 lno = 0x16d0 // 0x3134 @0x2
0x3132…3148 at0004 = ╱9d╱ EXEC ╱ // 0x3136 @0x4
0x3132…3148 at0005 = ╱46╱F╱ // 0x3137 @0x5
0x3132…3148 at0006 = ╱45╱E╱ // 0x3138 @0x6
0x3132…3148 at0007 = ╱ed╱(╱ // 0x3139 @0x7
0x3132…3148 at0008 = ╱57╱W╱ // 0x313a @0x8
0x3132…3148 at0009 = ╱ec╱,╱ // 0x313b @0x9
0x3132…3148 at000a = ╱36╱6╱ // 0x313c @0xa
0x3132…3148 at000b = ╱fe0000c003╱ // 0x313d @0xb
0x3132…3148 at0010 = ╱ec╱,╱ // 0x3142 @0x10
0x3132…3148 at0011 = ╱4b╱K╱ // 0x3143 @0x11
0x3132…3148 at0012 = ╱31╱1╱ // 0x3144 @0x12
0x3132…3148 at0013 = ╱ef╱$╱ // 0x3145 @0x13
0x3132…3148 at0014 = ╱ee╱)╱ // 0x3146 @0x14
0x3132…3148 at0015 = EOL // 0x3147 @0x15
0x3132…3148 }
0x3148…315d beb4 5850 GET K1$,14:K3$
0x3148…315d LineComalBin {
0x3148…315d ptr = 0xbeb4 // 0x3148 @0x0
0x3148…315d lno = 0x16da // 0x314a @0x2
0x3148…315d at0004 = ╱a9╱ GET ╱ // 0x314c @0x4
0x3148…315d at0005 = ╱4b╱K╱ // 0x314d @0x5
0x3148…315d at0006 = ╱31╱1╱ // 0x314e @0x6
0x3148…315d at0007 = ╱ef╱$╱ // 0x314f @0x7
0x3148…315d at0008 = ╱ec╱,╱ // 0x3150 @0x8
0x3148…315d at0009 = ╱31╱1╱ // 0x3151 @0x9
0x3148…315d at000a = ╱34╱4╱ // 0x3152 @0xa
0x3148…315d at000b = ╱fe0000e004╱ // 0x3153 @0xb
0x3148…315d at0010 = ╱f0╱:╱ // 0x3158 @0x10
0x3148…315d at0011 = ╱4b╱K╱ // 0x3159 @0x11
0x3148…315d at0012 = ╱33╱3╱ // 0x315a @0x12
0x3148…315d at0013 = ╱ef╱$╱ // 0x315b @0x13
0x3148…315d at0014 = EOL // 0x315c @0x14
0x3148…315d }
0x315d…3173 beca 5860 EXEC FE(W,7,K1$)
0x315d…3173 LineComalBin {
0x315d…3173 ptr = 0xbeca // 0x315d @0x0
0x315d…3173 lno = 0x16e4 // 0x315f @0x2
0x315d…3173 at0004 = ╱9d╱ EXEC ╱ // 0x3161 @0x4
0x315d…3173 at0005 = ╱46╱F╱ // 0x3162 @0x5
0x315d…3173 at0006 = ╱45╱E╱ // 0x3163 @0x6
0x315d…3173 at0007 = ╱ed╱(╱ // 0x3164 @0x7
0x315d…3173 at0008 = ╱57╱W╱ // 0x3165 @0x8
0x315d…3173 at0009 = ╱ec╱,╱ // 0x3166 @0x9
0x315d…3173 at000a = ╱37╱7╱ // 0x3167 @0xa
0x315d…3173 at000b = ╱fe0000e003╱ // 0x3168 @0xb
0x315d…3173 at0010 = ╱ec╱,╱ // 0x316d @0x10
0x315d…3173 at0011 = ╱4b╱K╱ // 0x316e @0x11
0x315d…3173 at0012 = ╱31╱1╱ // 0x316f @0x12
0x315d…3173 at0013 = ╱ef╱$╱ // 0x3170 @0x13
0x315d…3173 at0014 = ╱ee╱)╱ // 0x3171 @0x14
0x315d…3173 at0015 = EOL // 0x3172 @0x15
0x315d…3173 }
0x3173…3188 bedf 5870 GET K1$,16:K4$
0x3173…3188 LineComalBin {
0x3173…3188 ptr = 0xbedf // 0x3173 @0x0
0x3173…3188 lno = 0x16ee // 0x3175 @0x2
0x3173…3188 at0004 = ╱a9╱ GET ╱ // 0x3177 @0x4
0x3173…3188 at0005 = ╱4b╱K╱ // 0x3178 @0x5
0x3173…3188 at0006 = ╱31╱1╱ // 0x3179 @0x6
0x3173…3188 at0007 = ╱ef╱$╱ // 0x317a @0x7
0x3173…3188 at0008 = ╱ec╱,╱ // 0x317b @0x8
0x3173…3188 at0009 = ╱31╱1╱ // 0x317c @0x9
0x3173…3188 at000a = ╱36╱6╱ // 0x317d @0xa
0x3173…3188 at000b = ╱fe00008005╱ // 0x317e @0xb
0x3173…3188 at0010 = ╱f0╱:╱ // 0x3183 @0x10
0x3173…3188 at0011 = ╱4b╱K╱ // 0x3184 @0x11
0x3173…3188 at0012 = ╱34╱4╱ // 0x3185 @0x12
0x3173…3188 at0013 = ╱ef╱$╱ // 0x3186 @0x13
0x3173…3188 at0014 = EOL // 0x3187 @0x14
0x3173…3188 }
0x3188…319e bef5 5880 EXEC FE(W,8,K1$)
0x3188…319e LineComalBin {
0x3188…319e ptr = 0xbef5 // 0x3188 @0x0
0x3188…319e lno = 0x16f8 // 0x318a @0x2
0x3188…319e at0004 = ╱9d╱ EXEC ╱ // 0x318c @0x4
0x3188…319e at0005 = ╱46╱F╱ // 0x318d @0x5
0x3188…319e at0006 = ╱45╱E╱ // 0x318e @0x6
0x3188…319e at0007 = ╱ed╱(╱ // 0x318f @0x7
0x3188…319e at0008 = ╱57╱W╱ // 0x3190 @0x8
0x3188…319e at0009 = ╱ec╱,╱ // 0x3191 @0x9
0x3188…319e at000a = ╱38╱8╱ // 0x3192 @0xa
0x3188…319e at000b = ╱fe00008004╱ // 0x3193 @0xb
0x3188…319e at0010 = ╱ec╱,╱ // 0x3198 @0x10
0x3188…319e at0011 = ╱4b╱K╱ // 0x3199 @0x11
0x3188…319e at0012 = ╱31╱1╱ // 0x319a @0x12
0x3188…319e at0013 = ╱ef╱$╱ // 0x319b @0x13
0x3188…319e at0014 = ╱ee╱)╱ // 0x319c @0x14
0x3188…319e at0015 = EOL // 0x319d @0x15
0x3188…319e }
0x319e…31b3 bf0a 5890 GET K1$,18:K5$
0x319e…31b3 LineComalBin {
0x319e…31b3 ptr = 0xbf0a // 0x319e @0x0
0x319e…31b3 lno = 0x1702 // 0x31a0 @0x2
0x319e…31b3 at0004 = ╱a9╱ GET ╱ // 0x31a2 @0x4
0x319e…31b3 at0005 = ╱4b╱K╱ // 0x31a3 @0x5
0x319e…31b3 at0006 = ╱31╱1╱ // 0x31a4 @0x6
0x319e…31b3 at0007 = ╱ef╱$╱ // 0x31a5 @0x7
0x319e…31b3 at0008 = ╱ec╱,╱ // 0x31a6 @0x8
0x319e…31b3 at0009 = ╱31╱1╱ // 0x31a7 @0x9
0x319e…31b3 at000a = ╱38╱8╱ // 0x31a8 @0xa
0x319e…31b3 at000b = ╱fe00009005╱ // 0x31a9 @0xb
0x319e…31b3 at0010 = ╱f0╱:╱ // 0x31ae @0x10
0x319e…31b3 at0011 = ╱4b╱K╱ // 0x31af @0x11
0x319e…31b3 at0012 = ╱35╱5╱ // 0x31b0 @0x12
0x319e…31b3 at0013 = ╱ef╱$╱ // 0x31b1 @0x13
0x319e…31b3 at0014 = EOL // 0x31b2 @0x14
0x319e…31b3 }
0x31b3…31c4 bf1b 5900 EXEC FE(W,W,K1$)
0x31b3…31c4 LineComalBin {
0x31b3…31c4 ptr = 0xbf1b // 0x31b3 @0x0
0x31b3…31c4 lno = 0x170c // 0x31b5 @0x2
0x31b3…31c4 at0004 = ╱9d╱ EXEC ╱ // 0x31b7 @0x4
0x31b3…31c4 at0005 = ╱46╱F╱ // 0x31b8 @0x5
0x31b3…31c4 at0006 = ╱45╱E╱ // 0x31b9 @0x6
0x31b3…31c4 at0007 = ╱ed╱(╱ // 0x31ba @0x7
0x31b3…31c4 at0008 = ╱57╱W╱ // 0x31bb @0x8
0x31b3…31c4 at0009 = ╱ec╱,╱ // 0x31bc @0x9
0x31b3…31c4 at000a = ╱57╱W╱ // 0x31bd @0xa
0x31b3…31c4 at000b = ╱ec╱,╱ // 0x31be @0xb
0x31b3…31c4 at000c = ╱4b╱K╱ // 0x31bf @0xc
0x31b3…31c4 at000d = ╱31╱1╱ // 0x31c0 @0xd
0x31b3…31c4 at000e = ╱ef╱$╱ // 0x31c1 @0xe
0x31b3…31c4 at000f = ╱ee╱)╱ // 0x31c2 @0xf
0x31b3…31c4 at0010 = EOL // 0x31c3 @0x10
0x31b3…31c4 }
0x31c4…31d9 bf30 5910 GET K1$,29:K6$
0x31c4…31d9 LineComalBin {
0x31c4…31d9 ptr = 0xbf30 // 0x31c4 @0x0
0x31c4…31d9 lno = 0x1716 // 0x31c6 @0x2
0x31c4…31d9 at0004 = ╱a9╱ GET ╱ // 0x31c8 @0x4
0x31c4…31d9 at0005 = ╱4b╱K╱ // 0x31c9 @0x5
0x31c4…31d9 at0006 = ╱31╱1╱ // 0x31ca @0x6
0x31c4…31d9 at0007 = ╱ef╱$╱ // 0x31cb @0x7
0x31c4…31d9 at0008 = ╱ec╱,╱ // 0x31cc @0x8
0x31c4…31d9 at0009 = ╱32╱2╱ // 0x31cd @0x9
0x31c4…31d9 at000a = ╱39╱9╱ // 0x31ce @0xa
0x31c4…31d9 at000b = ╱fe0000e805╱ // 0x31cf @0xb
0x31c4…31d9 at0010 = ╱f0╱:╱ // 0x31d4 @0x10
0x31c4…31d9 at0011 = ╱4b╱K╱ // 0x31d5 @0x11
0x31c4…31d9 at0012 = ╱36╱6╱ // 0x31d6 @0x12
0x31c4…31d9 at0013 = ╱ef╱$╱ // 0x31d7 @0x13
0x31c4…31d9 at0014 = EOL // 0x31d8 @0x14
0x31c4…31d9 }
0x31d9…31f0 bf47 5920 EXEC FE(W,10,K1$)
0x31d9…31f0 LineComalBin {
0x31d9…31f0 ptr = 0xbf47 // 0x31d9 @0x0
0x31d9…31f0 lno = 0x1720 // 0x31db @0x2
0x31d9…31f0 at0004 = ╱9d╱ EXEC ╱ // 0x31dd @0x4
0x31d9…31f0 at0005 = ╱46╱F╱ // 0x31de @0x5
0x31d9…31f0 at0006 = ╱45╱E╱ // 0x31df @0x6
0x31d9…31f0 at0007 = ╱ed╱(╱ // 0x31e0 @0x7
0x31d9…31f0 at0008 = ╱57╱W╱ // 0x31e1 @0x8
0x31d9…31f0 at0009 = ╱ec╱,╱ // 0x31e2 @0x9
0x31d9…31f0 at000a = ╱31╱1╱ // 0x31e3 @0xa
0x31d9…31f0 at000b = ╱30╱0╱ // 0x31e4 @0xb
0x31d9…31f0 at000c = ╱fe0000a004╱ // 0x31e5 @0xc
0x31d9…31f0 at0011 = ╱ec╱,╱ // 0x31ea @0x11
0x31d9…31f0 at0012 = ╱4b╱K╱ // 0x31eb @0x12
0x31d9…31f0 at0013 = ╱31╱1╱ // 0x31ec @0x13
0x31d9…31f0 at0014 = ╱ef╱$╱ // 0x31ed @0x14
0x31d9…31f0 at0015 = ╱ee╱)╱ // 0x31ee @0x15
0x31d9…31f0 at0016 = EOL // 0x31ef @0x16
0x31d9…31f0 }
0x31f0…3205 bf5c 5930 GET K1$,36:K7$
0x31f0…3205 LineComalBin {
0x31f0…3205 ptr = 0xbf5c // 0x31f0 @0x0
0x31f0…3205 lno = 0x172a // 0x31f2 @0x2
0x31f0…3205 at0004 = ╱a9╱ GET ╱ // 0x31f4 @0x4
0x31f0…3205 at0005 = ╱4b╱K╱ // 0x31f5 @0x5
0x31f0…3205 at0006 = ╱31╱1╱ // 0x31f6 @0x6
0x31f0…3205 at0007 = ╱ef╱$╱ // 0x31f7 @0x7
0x31f0…3205 at0008 = ╱ec╱,╱ // 0x31f8 @0x8
0x31f0…3205 at0009 = ╱33╱3╱ // 0x31f9 @0x9
0x31f0…3205 at000a = ╱36╱6╱ // 0x31fa @0xa
0x31f0…3205 at000b = ╱fe00009006╱ // 0x31fb @0xb
0x31f0…3205 at0010 = ╱f0╱:╱ // 0x3200 @0x10
0x31f0…3205 at0011 = ╱4b╱K╱ // 0x3201 @0x11
0x31f0…3205 at0012 = ╱37╱7╱ // 0x3202 @0x12
0x31f0…3205 at0013 = ╱ef╱$╱ // 0x3203 @0x13
0x31f0…3205 at0014 = EOL // 0x3204 @0x14
0x31f0…3205 }
0x3205…321c bf73 5940 EXEC FE(W,11,K1$)
0x3205…321c LineComalBin {
0x3205…321c ptr = 0xbf73 // 0x3205 @0x0
0x3205…321c lno = 0x1734 // 0x3207 @0x2
0x3205…321c at0004 = ╱9d╱ EXEC ╱ // 0x3209 @0x4
0x3205…321c at0005 = ╱46╱F╱ // 0x320a @0x5
0x3205…321c at0006 = ╱45╱E╱ // 0x320b @0x6
0x3205…321c at0007 = ╱ed╱(╱ // 0x320c @0x7
0x3205…321c at0008 = ╱57╱W╱ // 0x320d @0x8
0x3205…321c at0009 = ╱ec╱,╱ // 0x320e @0x9
0x3205…321c at000a = ╱31╱1╱ // 0x320f @0xa
0x3205…321c at000b = ╱31╱1╱ // 0x3210 @0xb
0x3205…321c at000c = ╱fe0000b004╱ // 0x3211 @0xc
0x3205…321c at0011 = ╱ec╱,╱ // 0x3216 @0x11
0x3205…321c at0012 = ╱4b╱K╱ // 0x3217 @0x12
0x3205…321c at0013 = ╱31╱1╱ // 0x3218 @0x13
0x3205…321c at0014 = ╱ef╱$╱ // 0x3219 @0x14
0x3205…321c at0015 = ╱ee╱)╱ // 0x321a @0x15
0x3205…321c at0016 = EOL // 0x321b @0x16
0x3205…321c }
0x321c…3225 bf7c 5950 CLOSE K1$
0x321c…3225 LineComalBin {
0x321c…3225 ptr = 0xbf7c // 0x321c @0x0
0x321c…3225 lno = 0x173e // 0x321e @0x2
0x321c…3225 at0004 = ╱a8╱ CLOSE ╱ // 0x3220 @0x4
0x321c…3225 at0005 = ╱4b╱K╱ // 0x3221 @0x5
0x321c…3225 at0006 = ╱31╱1╱ // 0x3222 @0x6
0x321c…3225 at0007 = ╱ef╱$╱ // 0x3223 @0x7
0x321c…3225 at0008 = EOL // 0x3224 @0x8
0x321c…3225 }
0x3225…323c bf93 5960 EXEC FE(W,12,K1$)
0x3225…323c LineComalBin {
0x3225…323c ptr = 0xbf93 // 0x3225 @0x0
0x3225…323c lno = 0x1748 // 0x3227 @0x2
0x3225…323c at0004 = ╱9d╱ EXEC ╱ // 0x3229 @0x4
0x3225…323c at0005 = ╱46╱F╱ // 0x322a @0x5
0x3225…323c at0006 = ╱45╱E╱ // 0x322b @0x6
0x3225…323c at0007 = ╱ed╱(╱ // 0x322c @0x7
0x3225…323c at0008 = ╱57╱W╱ // 0x322d @0x8
0x3225…323c at0009 = ╱ec╱,╱ // 0x322e @0x9
0x3225…323c at000a = ╱31╱1╱ // 0x322f @0xa
0x3225…323c at000b = ╱32╱2╱ // 0x3230 @0xb
0x3225…323c at000c = ╱fe0000c004╱ // 0x3231 @0xc
0x3225…323c at0011 = ╱ec╱,╱ // 0x3236 @0x11
0x3225…323c at0012 = ╱4b╱K╱ // 0x3237 @0x12
0x3225…323c at0013 = ╱31╱1╱ // 0x3238 @0x13
0x3225…323c at0014 = ╱ef╱$╱ // 0x3239 @0x14
0x3225…323c at0015 = ╱ee╱)╱ // 0x323a @0x15
0x3225…323c at0016 = EOL // 0x323b @0x16
0x3225…323c }
0x323c…3270 bfc7 5970 DIM VAARR$(MFKL,7),AKOD(E+MFKL,G),VNARR(MFKL)
0x323c…3270 LineComalBin {
0x323c…3270 ptr = 0xbfc7 // 0x323c @0x0
0x323c…3270 lno = 0x1752 // 0x323e @0x2
0x323c…3270 at0004 = ╱87╱ DIM ╱ // 0x3240 @0x4
0x323c…3270 at0005 = ╱56╱V╱ // 0x3241 @0x5
0x323c…3270 at0006 = ╱41╱A╱ // 0x3242 @0x6
0x323c…3270 at0007 = ╱41╱A╱ // 0x3243 @0x7
0x323c…3270 at0008 = ╱52╱R╱ // 0x3244 @0x8
0x323c…3270 at0009 = ╱52╱R╱ // 0x3245 @0x9
0x323c…3270 at000a = ╱ef╱$╱ // 0x3246 @0xa
0x323c…3270 at000b = ╱ed╱(╱ // 0x3247 @0xb
0x323c…3270 at000c = ╱4d╱M╱ // 0x3248 @0xc
0x323c…3270 at000d = ╱46╱F╱ // 0x3249 @0xd
0x323c…3270 at000e = ╱4b╱K╱ // 0x324a @0xe
0x323c…3270 at000f = ╱4c╱L╱ // 0x324b @0xf
0x323c…3270 at0010 = ╱ec╱,╱ // 0x324c @0x10
0x323c…3270 at0011 = ╱37╱7╱ // 0x324d @0x11
0x323c…3270 at0012 = ╱fe0000e003╱ // 0x324e @0x12
0x323c…3270 at0017 = ╱ee╱)╱ // 0x3253 @0x17
0x323c…3270 at0018 = ╱ec╱,╱ // 0x3254 @0x18
0x323c…3270 at0019 = ╱41╱A╱ // 0x3255 @0x19
0x323c…3270 at001a = ╱4b╱K╱ // 0x3256 @0x1a
0x323c…3270 at001b = ╱4f╱O╱ // 0x3257 @0x1b
0x323c…3270 at001c = ╱44╱D╱ // 0x3258 @0x1c
0x323c…3270 at001d = ╱ed╱(╱ // 0x3259 @0x1d
0x323c…3270 at001e = ╱45╱E╱ // 0x325a @0x1e
0x323c…3270 at001f = ╱e2╱+╱ // 0x325b @0x1f
0x323c…3270 at0020 = ╱4d╱M╱ // 0x325c @0x20
0x323c…3270 at0021 = ╱46╱F╱ // 0x325d @0x21
0x323c…3270 at0022 = ╱4b╱K╱ // 0x325e @0x22
0x323c…3270 at0023 = ╱4c╱L╱ // 0x325f @0x23
0x323c…3270 at0024 = ╱ec╱,╱ // 0x3260 @0x24
0x323c…3270 at0025 = ╱47╱G╱ // 0x3261 @0x25
0x323c…3270 at0026 = ╱ee╱)╱ // 0x3262 @0x26
0x323c…3270 at0027 = ╱ec╱,╱ // 0x3263 @0x27
0x323c…3270 at0028 = ╱56╱V╱ // 0x3264 @0x28
0x323c…3270 at0029 = ╱4e╱N╱ // 0x3265 @0x29
0x323c…3270 at002a = ╱41╱A╱ // 0x3266 @0x2a
0x323c…3270 at002b = ╱52╱R╱ // 0x3267 @0x2b
0x323c…3270 at002c = ╱52╱R╱ // 0x3268 @0x2c
0x323c…3270 at002d = ╱ed╱(╱ // 0x3269 @0x2d
0x323c…3270 at002e = ╱4d╱M╱ // 0x326a @0x2e
0x323c…3270 at002f = ╱46╱F╱ // 0x326b @0x2f
0x323c…3270 at0030 = ╱4b╱K╱ // 0x326c @0x30
0x323c…3270 at0031 = ╱4c╱L╱ // 0x326d @0x31
0x323c…3270 at0032 = ╱ee╱)╱ // 0x326e @0x32
0x323c…3270 at0033 = EOL // 0x326f @0x33
0x323c…3270 }
0x3270…32b4 c00b 5980 DIM VTARR$(MFKL,50),VPARR$(MFKL,12),BLARR$(MFKL,12)
0x3270…32b4 LineComalBin {
0x3270…32b4 ptr = 0xc00b // 0x3270 @0x0
0x3270…32b4 lno = 0x175c // 0x3272 @0x2
0x3270…32b4 at0004 = ╱87╱ DIM ╱ // 0x3274 @0x4
0x3270…32b4 at0005 = ╱56╱V╱ // 0x3275 @0x5
0x3270…32b4 at0006 = ╱54╱T╱ // 0x3276 @0x6
0x3270…32b4 at0007 = ╱41╱A╱ // 0x3277 @0x7
0x3270…32b4 at0008 = ╱52╱R╱ // 0x3278 @0x8
0x3270…32b4 at0009 = ╱52╱R╱ // 0x3279 @0x9
0x3270…32b4 at000a = ╱ef╱$╱ // 0x327a @0xa
0x3270…32b4 at000b = ╱ed╱(╱ // 0x327b @0xb
0x3270…32b4 at000c = ╱4d╱M╱ // 0x327c @0xc
0x3270…32b4 at000d = ╱46╱F╱ // 0x327d @0xd
0x3270…32b4 at000e = ╱4b╱K╱ // 0x327e @0xe
0x3270…32b4 at000f = ╱4c╱L╱ // 0x327f @0xf
0x3270…32b4 at0010 = ╱ec╱,╱ // 0x3280 @0x10
0x3270…32b4 at0011 = ╱35╱5╱ // 0x3281 @0x11
0x3270…32b4 at0012 = ╱30╱0╱ // 0x3282 @0x12
0x3270…32b4 at0013 = ╱fe0000c806╱ // 0x3283 @0x13
0x3270…32b4 at0018 = ╱ee╱)╱ // 0x3288 @0x18
0x3270…32b4 at0019 = ╱ec╱,╱ // 0x3289 @0x19
0x3270…32b4 at001a = ╱56╱V╱ // 0x328a @0x1a
0x3270…32b4 at001b = ╱50╱P╱ // 0x328b @0x1b
0x3270…32b4 at001c = ╱41╱A╱ // 0x328c @0x1c
0x3270…32b4 at001d = ╱52╱R╱ // 0x328d @0x1d
0x3270…32b4 at001e = ╱52╱R╱ // 0x328e @0x1e
0x3270…32b4 at001f = ╱ef╱$╱ // 0x328f @0x1f
0x3270…32b4 at0020 = ╱ed╱(╱ // 0x3290 @0x20
0x3270…32b4 at0021 = ╱4d╱M╱ // 0x3291 @0x21
0x3270…32b4 at0022 = ╱46╱F╱ // 0x3292 @0x22
0x3270…32b4 at0023 = ╱4b╱K╱ // 0x3293 @0x23
0x3270…32b4 at0024 = ╱4c╱L╱ // 0x3294 @0x24
0x3270…32b4 at0025 = ╱ec╱,╱ // 0x3295 @0x25
0x3270…32b4 at0026 = ╱31╱1╱ // 0x3296 @0x26
0x3270…32b4 at0027 = ╱32╱2╱ // 0x3297 @0x27
0x3270…32b4 at0028 = ╱fe0000c004╱ // 0x3298 @0x28
0x3270…32b4 at002d = ╱ee╱)╱ // 0x329d @0x2d
0x3270…32b4 at002e = ╱ec╱,╱ // 0x329e @0x2e
0x3270…32b4 at002f = ╱42╱B╱ // 0x329f @0x2f
0x3270…32b4 at0030 = ╱4c╱L╱ // 0x32a0 @0x30
0x3270…32b4 at0031 = ╱41╱A╱ // 0x32a1 @0x31
0x3270…32b4 at0032 = ╱52╱R╱ // 0x32a2 @0x32
0x3270…32b4 at0033 = ╱52╱R╱ // 0x32a3 @0x33
0x3270…32b4 at0034 = ╱ef╱$╱ // 0x32a4 @0x34
0x3270…32b4 at0035 = ╱ed╱(╱ // 0x32a5 @0x35
0x3270…32b4 at0036 = ╱4d╱M╱ // 0x32a6 @0x36
0x3270…32b4 at0037 = ╱46╱F╱ // 0x32a7 @0x37
0x3270…32b4 at0038 = ╱4b╱K╱ // 0x32a8 @0x38
0x3270…32b4 at0039 = ╱4c╱L╱ // 0x32a9 @0x39
0x3270…32b4 at003a = ╱ec╱,╱ // 0x32aa @0x3a
0x3270…32b4 at003b = ╱31╱1╱ // 0x32ab @0x3b
0x3270…32b4 at003c = ╱32╱2╱ // 0x32ac @0x3c
0x3270…32b4 at003d = ╱fe0000c004╱ // 0x32ad @0x3d
0x3270…32b4 at0042 = ╱ee╱)╱ // 0x32b2 @0x42
0x3270…32b4 at0043 = EOL // 0x32b3 @0x43
0x3270…32b4 }
0x32b4…3303 c05a 5990 DIM VTAB1(MVANTAL DIV 4),DTAB1(MDANTAL DIV 4),VTAB(4,G),DTAB(4,G)
0x32b4…3303 LineComalBin {
0x32b4…3303 ptr = 0xc05a // 0x32b4 @0x0
0x32b4…3303 lno = 0x1766 // 0x32b6 @0x2
0x32b4…3303 at0004 = ╱87╱ DIM ╱ // 0x32b8 @0x4
0x32b4…3303 at0005 = ╱56╱V╱ // 0x32b9 @0x5
0x32b4…3303 at0006 = ╱54╱T╱ // 0x32ba @0x6
0x32b4…3303 at0007 = ╱41╱A╱ // 0x32bb @0x7
0x32b4…3303 at0008 = ╱42╱B╱ // 0x32bc @0x8
0x32b4…3303 at0009 = ╱31╱1╱ // 0x32bd @0x9
0x32b4…3303 at000a = ╱ed╱(╱ // 0x32be @0xa
0x32b4…3303 at000b = ╱4d╱M╱ // 0x32bf @0xb
0x32b4…3303 at000c = ╱56╱V╱ // 0x32c0 @0xc
0x32b4…3303 at000d = ╱41╱A╱ // 0x32c1 @0xd
0x32b4…3303 at000e = ╱4e╱N╱ // 0x32c2 @0xe
0x32b4…3303 at000f = ╱54╱T╱ // 0x32c3 @0xf
0x32b4…3303 at0010 = ╱41╱A╱ // 0x32c4 @0x10
0x32b4…3303 at0011 = ╱4c╱L╱ // 0x32c5 @0x11
0x32b4…3303 at0012 = ╱e7╱ DIV ╱ // 0x32c6 @0x12
0x32b4…3303 at0013 = ╱34╱4╱ // 0x32c7 @0x13
0x32b4…3303 at0014 = ╱fe00008003╱ // 0x32c8 @0x14
0x32b4…3303 at0019 = ╱ee╱)╱ // 0x32cd @0x19
0x32b4…3303 at001a = ╱ec╱,╱ // 0x32ce @0x1a
0x32b4…3303 at001b = ╱44╱D╱ // 0x32cf @0x1b
0x32b4…3303 at001c = ╱54╱T╱ // 0x32d0 @0x1c
0x32b4…3303 at001d = ╱41╱A╱ // 0x32d1 @0x1d
0x32b4…3303 at001e = ╱42╱B╱ // 0x32d2 @0x1e
0x32b4…3303 at001f = ╱31╱1╱ // 0x32d3 @0x1f
0x32b4…3303 at0020 = ╱ed╱(╱ // 0x32d4 @0x20
0x32b4…3303 at0021 = ╱4d╱M╱ // 0x32d5 @0x21
0x32b4…3303 at0022 = ╱44╱D╱ // 0x32d6 @0x22
0x32b4…3303 at0023 = ╱41╱A╱ // 0x32d7 @0x23
0x32b4…3303 at0024 = ╱4e╱N╱ // 0x32d8 @0x24
0x32b4…3303 at0025 = ╱54╱T╱ // 0x32d9 @0x25
0x32b4…3303 at0026 = ╱41╱A╱ // 0x32da @0x26
0x32b4…3303 at0027 = ╱4c╱L╱ // 0x32db @0x27
0x32b4…3303 at0028 = ╱e7╱ DIV ╱ // 0x32dc @0x28
0x32b4…3303 at0029 = ╱34╱4╱ // 0x32dd @0x29
0x32b4…3303 at002a = ╱fe00008003╱ // 0x32de @0x2a
0x32b4…3303 at002f = ╱ee╱)╱ // 0x32e3 @0x2f
0x32b4…3303 at0030 = ╱ec╱,╱ // 0x32e4 @0x30
0x32b4…3303 at0031 = ╱56╱V╱ // 0x32e5 @0x31
0x32b4…3303 at0032 = ╱54╱T╱ // 0x32e6 @0x32
0x32b4…3303 at0033 = ╱41╱A╱ // 0x32e7 @0x33
0x32b4…3303 at0034 = ╱42╱B╱ // 0x32e8 @0x34
0x32b4…3303 at0035 = ╱ed╱(╱ // 0x32e9 @0x35
0x32b4…3303 at0036 = ╱34╱4╱ // 0x32ea @0x36
0x32b4…3303 at0037 = ╱fe00008003╱ // 0x32eb @0x37
0x32b4…3303 at003c = ╱ec╱,╱ // 0x32f0 @0x3c
0x32b4…3303 at003d = ╱47╱G╱ // 0x32f1 @0x3d
0x32b4…3303 at003e = ╱ee╱)╱ // 0x32f2 @0x3e
0x32b4…3303 at003f = ╱ec╱,╱ // 0x32f3 @0x3f
0x32b4…3303 at0040 = ╱44╱D╱ // 0x32f4 @0x40
0x32b4…3303 at0041 = ╱54╱T╱ // 0x32f5 @0x41
0x32b4…3303 at0042 = ╱41╱A╱ // 0x32f6 @0x42
0x32b4…3303 at0043 = ╱42╱B╱ // 0x32f7 @0x43
0x32b4…3303 at0044 = ╱ed╱(╱ // 0x32f8 @0x44
0x32b4…3303 at0045 = ╱34╱4╱ // 0x32f9 @0x45
0x32b4…3303 at0046 = ╱fe00008003╱ // 0x32fa @0x46
0x32b4…3303 at004b = ╱ec╱,╱ // 0x32ff @0x4b
0x32b4…3303 at004c = ╱47╱G╱ // 0x3300 @0x4c
0x32b4…3303 at004d = ╱ee╱)╱ // 0x3301 @0x4d
0x32b4…3303 at004e = EOL // 0x3302 @0x4e
0x32b4…3303 }
0x3303…3349 c0a0 6000 K2$=N$+K2$;K3$=N$+K3$;K4$=N$+K4$;K5$=N$+K5$;K6$=N$+K6$;K7$=N$+K7$
0x3303…3349 LineComalBin {
0x3303…3349 ptr = 0xc0a0 // 0x3303 @0x0
0x3303…3349 lno = 0x1770 // 0x3305 @0x2
0x3303…3349 at0004 = ╱4b╱K╱ // 0x3307 @0x4
0x3303…3349 at0005 = ╱32╱2╱ // 0x3308 @0x5
0x3303…3349 at0006 = ╱ef╱$╱ // 0x3309 @0x6
0x3303…3349 at0007 = ╱dc╱=╱ // 0x330a @0x7
0x3303…3349 at0008 = ╱4e╱N╱ // 0x330b @0x8
0x3303…3349 at0009 = ╱ef╱$╱ // 0x330c @0x9
0x3303…3349 at000a = ╱f1╱+╱ // 0x330d @0xa
0x3303…3349 at000b = ╱4b╱K╱ // 0x330e @0xb
0x3303…3349 at000c = ╱32╱2╱ // 0x330f @0xc
0x3303…3349 at000d = ╱ef╱$╱ // 0x3310 @0xd
0x3303…3349 at000e = ╱eb╱;╱ // 0x3311 @0xe
0x3303…3349 at000f = ╱4b╱K╱ // 0x3312 @0xf
0x3303…3349 at0010 = ╱33╱3╱ // 0x3313 @0x10
0x3303…3349 at0011 = ╱ef╱$╱ // 0x3314 @0x11
0x3303…3349 at0012 = ╱dc╱=╱ // 0x3315 @0x12
0x3303…3349 at0013 = ╱4e╱N╱ // 0x3316 @0x13
0x3303…3349 at0014 = ╱ef╱$╱ // 0x3317 @0x14
0x3303…3349 at0015 = ╱f1╱+╱ // 0x3318 @0x15
0x3303…3349 at0016 = ╱4b╱K╱ // 0x3319 @0x16
0x3303…3349 at0017 = ╱33╱3╱ // 0x331a @0x17
0x3303…3349 at0018 = ╱ef╱$╱ // 0x331b @0x18
0x3303…3349 at0019 = ╱eb╱;╱ // 0x331c @0x19
0x3303…3349 at001a = ╱4b╱K╱ // 0x331d @0x1a
0x3303…3349 at001b = ╱34╱4╱ // 0x331e @0x1b
0x3303…3349 at001c = ╱ef╱$╱ // 0x331f @0x1c
0x3303…3349 at001d = ╱dc╱=╱ // 0x3320 @0x1d
0x3303…3349 at001e = ╱4e╱N╱ // 0x3321 @0x1e
0x3303…3349 at001f = ╱ef╱$╱ // 0x3322 @0x1f
0x3303…3349 at0020 = ╱f1╱+╱ // 0x3323 @0x20
0x3303…3349 at0021 = ╱4b╱K╱ // 0x3324 @0x21
0x3303…3349 at0022 = ╱34╱4╱ // 0x3325 @0x22
0x3303…3349 at0023 = ╱ef╱$╱ // 0x3326 @0x23
0x3303…3349 at0024 = ╱eb╱;╱ // 0x3327 @0x24
0x3303…3349 at0025 = ╱4b╱K╱ // 0x3328 @0x25
0x3303…3349 at0026 = ╱35╱5╱ // 0x3329 @0x26
0x3303…3349 at0027 = ╱ef╱$╱ // 0x332a @0x27
0x3303…3349 at0028 = ╱dc╱=╱ // 0x332b @0x28
0x3303…3349 at0029 = ╱4e╱N╱ // 0x332c @0x29
0x3303…3349 at002a = ╱ef╱$╱ // 0x332d @0x2a
0x3303…3349 at002b = ╱f1╱+╱ // 0x332e @0x2b
0x3303…3349 at002c = ╱4b╱K╱ // 0x332f @0x2c
0x3303…3349 at002d = ╱35╱5╱ // 0x3330 @0x2d
0x3303…3349 at002e = ╱ef╱$╱ // 0x3331 @0x2e
0x3303…3349 at002f = ╱eb╱;╱ // 0x3332 @0x2f
0x3303…3349 at0030 = ╱4b╱K╱ // 0x3333 @0x30
0x3303…3349 at0031 = ╱36╱6╱ // 0x3334 @0x31
0x3303…3349 at0032 = ╱ef╱$╱ // 0x3335 @0x32
0x3303…3349 at0033 = ╱dc╱=╱ // 0x3336 @0x33
0x3303…3349 at0034 = ╱4e╱N╱ // 0x3337 @0x34
0x3303…3349 at0035 = ╱ef╱$╱ // 0x3338 @0x35
0x3303…3349 at0036 = ╱f1╱+╱ // 0x3339 @0x36
0x3303…3349 at0037 = ╱4b╱K╱ // 0x333a @0x37
0x3303…3349 at0038 = ╱36╱6╱ // 0x333b @0x38
0x3303…3349 at0039 = ╱ef╱$╱ // 0x333c @0x39
0x3303…3349 at003a = ╱eb╱;╱ // 0x333d @0x3a
0x3303…3349 at003b = ╱4b╱K╱ // 0x333e @0x3b
0x3303…3349 at003c = ╱37╱7╱ // 0x333f @0x3c
0x3303…3349 at003d = ╱ef╱$╱ // 0x3340 @0x3d
0x3303…3349 at003e = ╱dc╱=╱ // 0x3341 @0x3e
0x3303…3349 at003f = ╱4e╱N╱ // 0x3342 @0x3f
0x3303…3349 at0040 = ╱ef╱$╱ // 0x3343 @0x40
0x3303…3349 at0041 = ╱f1╱+╱ // 0x3344 @0x41
0x3303…3349 at0042 = ╱4b╱K╱ // 0x3345 @0x42
0x3303…3349 at0043 = ╱37╱7╱ // 0x3346 @0x43
0x3303…3349 at0044 = ╱ef╱$╱ // 0x3347 @0x44
0x3303…3349 at0045 = EOL // 0x3348 @0x45
0x3303…3349 }
0x3349…3354 c0ab 6010 OPEN K7$,R
0x3349…3354 LineComalBin {
0x3349…3354 ptr = 0xc0ab // 0x3349 @0x0
0x3349…3354 lno = 0x177a // 0x334b @0x2
0x3349…3354 at0004 = ╱a7╱ OPEN ╱ // 0x334d @0x4
0x3349…3354 at0005 = ╱4b╱K╱ // 0x334e @0x5
0x3349…3354 at0006 = ╱37╱7╱ // 0x334f @0x6
0x3349…3354 at0007 = ╱ef╱$╱ // 0x3350 @0x7
0x3349…3354 at0008 = ╱ec╱,╱ // 0x3351 @0x8
0x3349…3354 at0009 = ╱52╱R╱ // 0x3352 @0x9
0x3349…3354 at000a = EOL // 0x3353 @0xa
0x3349…3354 }
0x3354…336b c0c2 6020 EXEC FE(W,13,K7$)
0x3354…336b LineComalBin {
0x3354…336b ptr = 0xc0c2 // 0x3354 @0x0
0x3354…336b lno = 0x1784 // 0x3356 @0x2
0x3354…336b at0004 = ╱9d╱ EXEC ╱ // 0x3358 @0x4
0x3354…336b at0005 = ╱46╱F╱ // 0x3359 @0x5
0x3354…336b at0006 = ╱45╱E╱ // 0x335a @0x6
0x3354…336b at0007 = ╱ed╱(╱ // 0x335b @0x7
0x3354…336b at0008 = ╱57╱W╱ // 0x335c @0x8
0x3354…336b at0009 = ╱ec╱,╱ // 0x335d @0x9
0x3354…336b at000a = ╱31╱1╱ // 0x335e @0xa
0x3354…336b at000b = ╱33╱3╱ // 0x335f @0xb
0x3354…336b at000c = ╱fe0000d004╱ // 0x3360 @0xc
0x3354…336b at0011 = ╱ec╱,╱ // 0x3365 @0x11
0x3354…336b at0012 = ╱4b╱K╱ // 0x3366 @0x12
0x3354…336b at0013 = ╱37╱7╱ // 0x3367 @0x13
0x3354…336b at0014 = ╱ef╱$╱ // 0x3368 @0x14
0x3354…336b at0015 = ╱ee╱)╱ // 0x3369 @0x15
0x3354…336b at0016 = EOL // 0x336a @0x16
0x3354…336b }
0x336b…337c c0d3 6030 GET K7$,E:MOMS$
0x336b…337c LineComalBin {
0x336b…337c ptr = 0xc0d3 // 0x336b @0x0
0x336b…337c lno = 0x178e // 0x336d @0x2
0x336b…337c at0004 = ╱a9╱ GET ╱ // 0x336f @0x4
0x336b…337c at0005 = ╱4b╱K╱ // 0x3370 @0x5
0x336b…337c at0006 = ╱37╱7╱ // 0x3371 @0x6
0x336b…337c at0007 = ╱ef╱$╱ // 0x3372 @0x7
0x336b…337c at0008 = ╱ec╱,╱ // 0x3373 @0x8
0x336b…337c at0009 = ╱45╱E╱ // 0x3374 @0x9
0x336b…337c at000a = ╱f0╱:╱ // 0x3375 @0xa
0x336b…337c at000b = ╱4d╱M╱ // 0x3376 @0xb
0x336b…337c at000c = ╱4f╱O╱ // 0x3377 @0xc
0x336b…337c at000d = ╱4d╱M╱ // 0x3378 @0xd
0x336b…337c at000e = ╱53╱S╱ // 0x3379 @0xe
0x336b…337c at000f = ╱ef╱$╱ // 0x337a @0xf
0x336b…337c at0010 = EOL // 0x337b @0x10
0x336b…337c }
0x337c…3393 c0ea 6040 EXEC FE(W,14,K7$)
0x337c…3393 LineComalBin {
0x337c…3393 ptr = 0xc0ea // 0x337c @0x0
0x337c…3393 lno = 0x1798 // 0x337e @0x2
0x337c…3393 at0004 = ╱9d╱ EXEC ╱ // 0x3380 @0x4
0x337c…3393 at0005 = ╱46╱F╱ // 0x3381 @0x5
0x337c…3393 at0006 = ╱45╱E╱ // 0x3382 @0x6
0x337c…3393 at0007 = ╱ed╱(╱ // 0x3383 @0x7
0x337c…3393 at0008 = ╱57╱W╱ // 0x3384 @0x8
0x337c…3393 at0009 = ╱ec╱,╱ // 0x3385 @0x9
0x337c…3393 at000a = ╱31╱1╱ // 0x3386 @0xa
0x337c…3393 at000b = ╱34╱4╱ // 0x3387 @0xb
0x337c…3393 at000c = ╱fe0000e004╱ // 0x3388 @0xc
0x337c…3393 at0011 = ╱ec╱,╱ // 0x338d @0x11
0x337c…3393 at0012 = ╱4b╱K╱ // 0x338e @0x12
0x337c…3393 at0013 = ╱37╱7╱ // 0x338f @0x13
0x337c…3393 at0014 = ╱ef╱$╱ // 0x3390 @0x14
0x337c…3393 at0015 = ╱ee╱)╱ // 0x3391 @0x15
0x337c…3393 at0016 = EOL // 0x3392 @0x16
0x337c…3393 }
0x3393…33ed c144 6050 GET K7$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W)
0x3393…33ed LineComalBin {
0x3393…33ed ptr = 0xc144 // 0x3393 @0x0
0x3393…33ed lno = 0x17a2 // 0x3395 @0x2
0x3393…33ed at0004 = ╱a9╱ GET ╱ // 0x3397 @0x4
0x3393…33ed at0005 = ╱4b╱K╱ // 0x3398 @0x5
0x3393…33ed at0006 = ╱37╱7╱ // 0x3399 @0x6
0x3393…33ed at0007 = ╱ef╱$╱ // 0x339a @0x7
0x3393…33ed at0008 = ╱ec╱,╱ // 0x339b @0x8
0x3393…33ed at0009 = ╱47╱G╱ // 0x339c @0x9
0x3393…33ed at000a = ╱f0╱:╱ // 0x339d @0xa
0x3393…33ed at000b = ╱54╱T╱ // 0x339e @0xb
0x3393…33ed at000c = ╱31╱1╱ // 0x339f @0xc
0x3393…33ed at000d = ╱ed╱(╱ // 0x33a0 @0xd
0x3393…33ed at000e = ╱45╱E╱ // 0x33a1 @0xe
0x3393…33ed at000f = ╱ee╱)╱ // 0x33a2 @0xf
0x3393…33ed at0010 = ╱ec╱,╱ // 0x33a3 @0x10
0x3393…33ed at0011 = ╱54╱T╱ // 0x33a4 @0x11
0x3393…33ed at0012 = ╱31╱1╱ // 0x33a5 @0x12
0x3393…33ed at0013 = ╱ed╱(╱ // 0x33a6 @0x13
0x3393…33ed at0014 = ╱47╱G╱ // 0x33a7 @0x14
0x3393…33ed at0015 = ╱ee╱)╱ // 0x33a8 @0x15
0x3393…33ed at0016 = ╱ec╱,╱ // 0x33a9 @0x16
0x3393…33ed at0017 = ╱54╱T╱ // 0x33aa @0x17
0x3393…33ed at0018 = ╱31╱1╱ // 0x33ab @0x18
0x3393…33ed at0019 = ╱ed╱(╱ // 0x33ac @0x19
0x3393…33ed at001a = ╱56╱V╱ // 0x33ad @0x1a
0x3393…33ed at001b = ╱ee╱)╱ // 0x33ae @0x1b
0x3393…33ed at001c = ╱ec╱,╱ // 0x33af @0x1c
0x3393…33ed at001d = ╱54╱T╱ // 0x33b0 @0x1d
0x3393…33ed at001e = ╱31╱1╱ // 0x33b1 @0x1e
0x3393…33ed at001f = ╱ed╱(╱ // 0x33b2 @0x1f
0x3393…33ed at0020 = ╱34╱4╱ // 0x33b3 @0x20
0x3393…33ed at0021 = ╱fe00008003╱ // 0x33b4 @0x21
0x3393…33ed at0026 = ╱ee╱)╱ // 0x33b9 @0x26
0x3393…33ed at0027 = ╱ec╱,╱ // 0x33ba @0x27
0x3393…33ed at0028 = ╱54╱T╱ // 0x33bb @0x28
0x3393…33ed at0029 = ╱31╱1╱ // 0x33bc @0x29
0x3393…33ed at002a = ╱ed╱(╱ // 0x33bd @0x2a
0x3393…33ed at002b = ╱35╱5╱ // 0x33be @0x2b
0x3393…33ed at002c = ╱fe0000a003╱ // 0x33bf @0x2c
0x3393…33ed at0031 = ╱ee╱)╱ // 0x33c4 @0x31
0x3393…33ed at0032 = ╱ec╱,╱ // 0x33c5 @0x32
0x3393…33ed at0033 = ╱54╱T╱ // 0x33c6 @0x33
0x3393…33ed at0034 = ╱31╱1╱ // 0x33c7 @0x34
0x3393…33ed at0035 = ╱ed╱(╱ // 0x33c8 @0x35
0x3393…33ed at0036 = ╱36╱6╱ // 0x33c9 @0x36
0x3393…33ed at0037 = ╱fe0000c003╱ // 0x33ca @0x37
0x3393…33ed at003c = ╱ee╱)╱ // 0x33cf @0x3c
0x3393…33ed at003d = ╱ec╱,╱ // 0x33d0 @0x3d
0x3393…33ed at003e = ╱54╱T╱ // 0x33d1 @0x3e
0x3393…33ed at003f = ╱31╱1╱ // 0x33d2 @0x3f
0x3393…33ed at0040 = ╱ed╱(╱ // 0x33d3 @0x40
0x3393…33ed at0041 = ╱37╱7╱ // 0x33d4 @0x41
0x3393…33ed at0042 = ╱fe0000e003╱ // 0x33d5 @0x42
0x3393…33ed at0047 = ╱ee╱)╱ // 0x33da @0x47
0x3393…33ed at0048 = ╱ec╱,╱ // 0x33db @0x48
0x3393…33ed at0049 = ╱54╱T╱ // 0x33dc @0x49
0x3393…33ed at004a = ╱31╱1╱ // 0x33dd @0x4a
0x3393…33ed at004b = ╱ed╱(╱ // 0x33de @0x4b
0x3393…33ed at004c = ╱38╱8╱ // 0x33df @0x4c
0x3393…33ed at004d = ╱fe00008004╱ // 0x33e0 @0x4d
0x3393…33ed at0052 = ╱ee╱)╱ // 0x33e5 @0x52
0x3393…33ed at0053 = ╱ec╱,╱ // 0x33e6 @0x53
0x3393…33ed at0054 = ╱54╱T╱ // 0x33e7 @0x54
0x3393…33ed at0055 = ╱31╱1╱ // 0x33e8 @0x55
0x3393…33ed at0056 = ╱ed╱(╱ // 0x33e9 @0x56
0x3393…33ed at0057 = ╱57╱W╱ // 0x33ea @0x57
0x3393…33ed at0058 = ╱ee╱)╱ // 0x33eb @0x58
0x3393…33ed at0059 = EOL // 0x33ec @0x59
0x3393…33ed }
0x33ed…3404 c15b 6060 EXEC FE(W,15,K7$)
0x33ed…3404 LineComalBin {
0x33ed…3404 ptr = 0xc15b // 0x33ed @0x0
0x33ed…3404 lno = 0x17ac // 0x33ef @0x2
0x33ed…3404 at0004 = ╱9d╱ EXEC ╱ // 0x33f1 @0x4
0x33ed…3404 at0005 = ╱46╱F╱ // 0x33f2 @0x5
0x33ed…3404 at0006 = ╱45╱E╱ // 0x33f3 @0x6
0x33ed…3404 at0007 = ╱ed╱(╱ // 0x33f4 @0x7
0x33ed…3404 at0008 = ╱57╱W╱ // 0x33f5 @0x8
0x33ed…3404 at0009 = ╱ec╱,╱ // 0x33f6 @0x9
0x33ed…3404 at000a = ╱31╱1╱ // 0x33f7 @0xa
0x33ed…3404 at000b = ╱35╱5╱ // 0x33f8 @0xb
0x33ed…3404 at000c = ╱fe0000f004╱ // 0x33f9 @0xc
0x33ed…3404 at0011 = ╱ec╱,╱ // 0x33fe @0x11
0x33ed…3404 at0012 = ╱4b╱K╱ // 0x33ff @0x12
0x33ed…3404 at0013 = ╱37╱7╱ // 0x3400 @0x13
0x33ed…3404 at0014 = ╱ef╱$╱ // 0x3401 @0x14
0x33ed…3404 at0015 = ╱ee╱)╱ // 0x3402 @0x15
0x33ed…3404 at0016 = EOL // 0x3403 @0x16
0x33ed…3404 }
0x3404…340f c166 6070 FOR I=E TO V
0x3404…340f LineComalBin {
0x3404…340f ptr = 0xc166 // 0x3404 @0x0
0x3404…340f lno = 0x17b6 // 0x3406 @0x2
0x3404…340f at0004 = ╱83╱ FOR ╱ // 0x3408 @0x4
0x3404…340f at0005 = ╱49╱I╱ // 0x3409 @0x5
0x3404…340f at0006 = ╱dc╱=╱ // 0x340a @0x6
0x3404…340f at0007 = ╱45╱E╱ // 0x340b @0x7
0x3404…340f at0008 = ╱b7╱ TO ╱ // 0x340c @0x8
0x3404…340f at0009 = ╱56╱V╱ // 0x340d @0x9
0x3404…340f at000a = EOL // 0x340e @0xa
0x3404…340f }
0x340f…341f c176 6080 H=(I-E)*V+E
0x340f…341f LineComalBin {
0x340f…341f ptr = 0xc176 // 0x340f @0x0
0x340f…341f lno = 0x17c0 // 0x3411 @0x2
0x340f…341f at0004 = ╱48╱H╱ // 0x3413 @0x4
0x340f…341f at0005 = ╱dc╱=╱ // 0x3414 @0x5
0x340f…341f at0006 = ╱ed╱(╱ // 0x3415 @0x6
0x340f…341f at0007 = ╱49╱I╱ // 0x3416 @0x7
0x340f…341f at0008 = ╱e3╱-╱ // 0x3417 @0x8
0x340f…341f at0009 = ╱45╱E╱ // 0x3418 @0x9
0x340f…341f at000a = ╱ee╱)╱ // 0x3419 @0xa
0x340f…341f at000b = ╱e4╱*╱ // 0x341a @0xb
0x340f…341f at000c = ╱56╱V╱ // 0x341b @0xc
0x340f…341f at000d = ╱e2╱+╱ // 0x341c @0xd
0x340f…341f at000e = ╱45╱E╱ // 0x341d @0xe
0x340f…341f at000f = EOL // 0x341e @0xf
0x340f…341f }
0x341f…344b c1a2 6090 GET K7$,I+G:LAND$(H),LAND$(H+E),LAND$(H+G)
0x341f…344b LineComalBin {
0x341f…344b ptr = 0xc1a2 // 0x341f @0x0
0x341f…344b lno = 0x17ca // 0x3421 @0x2
0x341f…344b at0004 = ╱a9╱ GET ╱ // 0x3423 @0x4
0x341f…344b at0005 = ╱4b╱K╱ // 0x3424 @0x5
0x341f…344b at0006 = ╱37╱7╱ // 0x3425 @0x6
0x341f…344b at0007 = ╱ef╱$╱ // 0x3426 @0x7
0x341f…344b at0008 = ╱ec╱,╱ // 0x3427 @0x8
0x341f…344b at0009 = ╱49╱I╱ // 0x3428 @0x9
0x341f…344b at000a = ╱e2╱+╱ // 0x3429 @0xa
0x341f…344b at000b = ╱47╱G╱ // 0x342a @0xb
0x341f…344b at000c = ╱f0╱:╱ // 0x342b @0xc
0x341f…344b at000d = ╱4c╱L╱ // 0x342c @0xd
0x341f…344b at000e = ╱41╱A╱ // 0x342d @0xe
0x341f…344b at000f = ╱4e╱N╱ // 0x342e @0xf
0x341f…344b at0010 = ╱44╱D╱ // 0x342f @0x10
0x341f…344b at0011 = ╱ef╱$╱ // 0x3430 @0x11
0x341f…344b at0012 = ╱ed╱(╱ // 0x3431 @0x12
0x341f…344b at0013 = ╱48╱H╱ // 0x3432 @0x13
0x341f…344b at0014 = ╱ee╱)╱ // 0x3433 @0x14
0x341f…344b at0015 = ╱ec╱,╱ // 0x3434 @0x15
0x341f…344b at0016 = ╱4c╱L╱ // 0x3435 @0x16
0x341f…344b at0017 = ╱41╱A╱ // 0x3436 @0x17
0x341f…344b at0018 = ╱4e╱N╱ // 0x3437 @0x18
0x341f…344b at0019 = ╱44╱D╱ // 0x3438 @0x19
0x341f…344b at001a = ╱ef╱$╱ // 0x3439 @0x1a
0x341f…344b at001b = ╱ed╱(╱ // 0x343a @0x1b
0x341f…344b at001c = ╱48╱H╱ // 0x343b @0x1c
0x341f…344b at001d = ╱e2╱+╱ // 0x343c @0x1d
0x341f…344b at001e = ╱45╱E╱ // 0x343d @0x1e
0x341f…344b at001f = ╱ee╱)╱ // 0x343e @0x1f
0x341f…344b at0020 = ╱ec╱,╱ // 0x343f @0x20
0x341f…344b at0021 = ╱4c╱L╱ // 0x3440 @0x21
0x341f…344b at0022 = ╱41╱A╱ // 0x3441 @0x22
0x341f…344b at0023 = ╱4e╱N╱ // 0x3442 @0x23
0x341f…344b at0024 = ╱44╱D╱ // 0x3443 @0x24
0x341f…344b at0025 = ╱ef╱$╱ // 0x3444 @0x25
0x341f…344b at0026 = ╱ed╱(╱ // 0x3445 @0x26
0x341f…344b at0027 = ╱48╱H╱ // 0x3446 @0x27
0x341f…344b at0028 = ╱e2╱+╱ // 0x3447 @0x28
0x341f…344b at0029 = ╱47╱G╱ // 0x3448 @0x29
0x341f…344b at002a = ╱ee╱)╱ // 0x3449 @0x2a
0x341f…344b at002b = EOL // 0x344a @0x2b
0x341f…344b }
0x344b…3462 c1b9 6100 EXEC FE(W,16,K7$)
0x344b…3462 LineComalBin {
0x344b…3462 ptr = 0xc1b9 // 0x344b @0x0
0x344b…3462 lno = 0x17d4 // 0x344d @0x2
0x344b…3462 at0004 = ╱9d╱ EXEC ╱ // 0x344f @0x4
0x344b…3462 at0005 = ╱46╱F╱ // 0x3450 @0x5
0x344b…3462 at0006 = ╱45╱E╱ // 0x3451 @0x6
0x344b…3462 at0007 = ╱ed╱(╱ // 0x3452 @0x7
0x344b…3462 at0008 = ╱57╱W╱ // 0x3453 @0x8
0x344b…3462 at0009 = ╱ec╱,╱ // 0x3454 @0x9
0x344b…3462 at000a = ╱31╱1╱ // 0x3455 @0xa
0x344b…3462 at000b = ╱36╱6╱ // 0x3456 @0xb
0x344b…3462 at000c = ╱fe00008005╱ // 0x3457 @0xc
0x344b…3462 at0011 = ╱ec╱,╱ // 0x345c @0x11
0x344b…3462 at0012 = ╱4b╱K╱ // 0x345d @0x12
0x344b…3462 at0013 = ╱37╱7╱ // 0x345e @0x13
0x344b…3462 at0014 = ╱ef╱$╱ // 0x345f @0x14
0x344b…3462 at0015 = ╱ee╱)╱ // 0x3460 @0x15
0x344b…3462 at0016 = EOL // 0x3461 @0x16
0x344b…3462 }
0x3462…3469 c1c0 6110 NEXT I
0x3462…3469 LineComalBin {
0x3462…3469 ptr = 0xc1c0 // 0x3462 @0x0
0x3462…3469 lno = 0x17de // 0x3464 @0x2
0x3462…3469 at0004 = ╱84╱ NEXT ╱ // 0x3466 @0x4
0x3462…3469 at0005 = ╱49╱I╱ // 0x3467 @0x5
0x3462…3469 at0006 = EOL // 0x3468 @0x6
0x3462…3469 }
0x3469…34c9 c220 6120 GET K7$,12:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W)
0x3469…34c9 LineComalBin {
0x3469…34c9 ptr = 0xc220 // 0x3469 @0x0
0x3469…34c9 lno = 0x17e8 // 0x346b @0x2
0x3469…34c9 at0004 = ╱a9╱ GET ╱ // 0x346d @0x4
0x3469…34c9 at0005 = ╱4b╱K╱ // 0x346e @0x5
0x3469…34c9 at0006 = ╱37╱7╱ // 0x346f @0x6
0x3469…34c9 at0007 = ╱ef╱$╱ // 0x3470 @0x7
0x3469…34c9 at0008 = ╱ec╱,╱ // 0x3471 @0x8
0x3469…34c9 at0009 = ╱31╱1╱ // 0x3472 @0x9
0x3469…34c9 at000a = ╱32╱2╱ // 0x3473 @0xa
0x3469…34c9 at000b = ╱fe0000c004╱ // 0x3474 @0xb
0x3469…34c9 at0010 = ╱f0╱:╱ // 0x3479 @0x10
0x3469…34c9 at0011 = ╱54╱T╱ // 0x347a @0x11
0x3469…34c9 at0012 = ╱32╱2╱ // 0x347b @0x12
0x3469…34c9 at0013 = ╱ed╱(╱ // 0x347c @0x13
0x3469…34c9 at0014 = ╱45╱E╱ // 0x347d @0x14
0x3469…34c9 at0015 = ╱ee╱)╱ // 0x347e @0x15
0x3469…34c9 at0016 = ╱ec╱,╱ // 0x347f @0x16
0x3469…34c9 at0017 = ╱54╱T╱ // 0x3480 @0x17
0x3469…34c9 at0018 = ╱32╱2╱ // 0x3481 @0x18
0x3469…34c9 at0019 = ╱ed╱(╱ // 0x3482 @0x19
0x3469…34c9 at001a = ╱47╱G╱ // 0x3483 @0x1a
0x3469…34c9 at001b = ╱ee╱)╱ // 0x3484 @0x1b
0x3469…34c9 at001c = ╱ec╱,╱ // 0x3485 @0x1c
0x3469…34c9 at001d = ╱54╱T╱ // 0x3486 @0x1d
0x3469…34c9 at001e = ╱32╱2╱ // 0x3487 @0x1e
0x3469…34c9 at001f = ╱ed╱(╱ // 0x3488 @0x1f
0x3469…34c9 at0020 = ╱56╱V╱ // 0x3489 @0x20
0x3469…34c9 at0021 = ╱ee╱)╱ // 0x348a @0x21
0x3469…34c9 at0022 = ╱ec╱,╱ // 0x348b @0x22
0x3469…34c9 at0023 = ╱54╱T╱ // 0x348c @0x23
0x3469…34c9 at0024 = ╱32╱2╱ // 0x348d @0x24
0x3469…34c9 at0025 = ╱ed╱(╱ // 0x348e @0x25
0x3469…34c9 at0026 = ╱34╱4╱ // 0x348f @0x26
0x3469…34c9 at0027 = ╱fe00008003╱ // 0x3490 @0x27
0x3469…34c9 at002c = ╱ee╱)╱ // 0x3495 @0x2c
0x3469…34c9 at002d = ╱ec╱,╱ // 0x3496 @0x2d
0x3469…34c9 at002e = ╱54╱T╱ // 0x3497 @0x2e
0x3469…34c9 at002f = ╱32╱2╱ // 0x3498 @0x2f
0x3469…34c9 at0030 = ╱ed╱(╱ // 0x3499 @0x30
0x3469…34c9 at0031 = ╱35╱5╱ // 0x349a @0x31
0x3469…34c9 at0032 = ╱fe0000a003╱ // 0x349b @0x32
0x3469…34c9 at0037 = ╱ee╱)╱ // 0x34a0 @0x37
0x3469…34c9 at0038 = ╱ec╱,╱ // 0x34a1 @0x38
0x3469…34c9 at0039 = ╱54╱T╱ // 0x34a2 @0x39
0x3469…34c9 at003a = ╱32╱2╱ // 0x34a3 @0x3a
0x3469…34c9 at003b = ╱ed╱(╱ // 0x34a4 @0x3b
0x3469…34c9 at003c = ╱36╱6╱ // 0x34a5 @0x3c
0x3469…34c9 at003d = ╱fe0000c003╱ // 0x34a6 @0x3d
0x3469…34c9 at0042 = ╱ee╱)╱ // 0x34ab @0x42
0x3469…34c9 at0043 = ╱ec╱,╱ // 0x34ac @0x43
0x3469…34c9 at0044 = ╱54╱T╱ // 0x34ad @0x44
0x3469…34c9 at0045 = ╱32╱2╱ // 0x34ae @0x45
0x3469…34c9 at0046 = ╱ed╱(╱ // 0x34af @0x46
0x3469…34c9 at0047 = ╱37╱7╱ // 0x34b0 @0x47
0x3469…34c9 at0048 = ╱fe0000e003╱ // 0x34b1 @0x48
0x3469…34c9 at004d = ╱ee╱)╱ // 0x34b6 @0x4d
0x3469…34c9 at004e = ╱ec╱,╱ // 0x34b7 @0x4e
0x3469…34c9 at004f = ╱54╱T╱ // 0x34b8 @0x4f
0x3469…34c9 at0050 = ╱32╱2╱ // 0x34b9 @0x50
0x3469…34c9 at0051 = ╱ed╱(╱ // 0x34ba @0x51
0x3469…34c9 at0052 = ╱38╱8╱ // 0x34bb @0x52
0x3469…34c9 at0053 = ╱fe00008004╱ // 0x34bc @0x53
0x3469…34c9 at0058 = ╱ee╱)╱ // 0x34c1 @0x58
0x3469…34c9 at0059 = ╱ec╱,╱ // 0x34c2 @0x59
0x3469…34c9 at005a = ╱54╱T╱ // 0x34c3 @0x5a
0x3469…34c9 at005b = ╱32╱2╱ // 0x34c4 @0x5b
0x3469…34c9 at005c = ╱ed╱(╱ // 0x34c5 @0x5c
0x3469…34c9 at005d = ╱57╱W╱ // 0x34c6 @0x5d
0x3469…34c9 at005e = ╱ee╱)╱ // 0x34c7 @0x5e
0x3469…34c9 at005f = EOL // 0x34c8 @0x5f
0x3469…34c9 }
0x34c9…34e0 c237 6130 EXEC FE(W,17,K7$)
0x34c9…34e0 LineComalBin {
0x34c9…34e0 ptr = 0xc237 // 0x34c9 @0x0
0x34c9…34e0 lno = 0x17f2 // 0x34cb @0x2
0x34c9…34e0 at0004 = ╱9d╱ EXEC ╱ // 0x34cd @0x4
0x34c9…34e0 at0005 = ╱46╱F╱ // 0x34ce @0x5
0x34c9…34e0 at0006 = ╱45╱E╱ // 0x34cf @0x6
0x34c9…34e0 at0007 = ╱ed╱(╱ // 0x34d0 @0x7
0x34c9…34e0 at0008 = ╱57╱W╱ // 0x34d1 @0x8
0x34c9…34e0 at0009 = ╱ec╱,╱ // 0x34d2 @0x9
0x34c9…34e0 at000a = ╱31╱1╱ // 0x34d3 @0xa
0x34c9…34e0 at000b = ╱37╱7╱ // 0x34d4 @0xb
0x34c9…34e0 at000c = ╱fe00008805╱ // 0x34d5 @0xc
0x34c9…34e0 at0011 = ╱ec╱,╱ // 0x34da @0x11
0x34c9…34e0 at0012 = ╱4b╱K╱ // 0x34db @0x12
0x34c9…34e0 at0013 = ╱37╱7╱ // 0x34dc @0x13
0x34c9…34e0 at0014 = ╱ef╱$╱ // 0x34dd @0x14
0x34c9…34e0 at0015 = ╱ee╱)╱ // 0x34de @0x15
0x34c9…34e0 at0016 = EOL // 0x34df @0x16
0x34c9…34e0 }
0x34e0…34e9 c240 6140 CLOSE K7$
0x34e0…34e9 LineComalBin {
0x34e0…34e9 ptr = 0xc240 // 0x34e0 @0x0
0x34e0…34e9 lno = 0x17fc // 0x34e2 @0x2
0x34e0…34e9 at0004 = ╱a8╱ CLOSE ╱ // 0x34e4 @0x4
0x34e0…34e9 at0005 = ╱4b╱K╱ // 0x34e5 @0x5
0x34e0…34e9 at0006 = ╱37╱7╱ // 0x34e6 @0x6
0x34e0…34e9 at0007 = ╱ef╱$╱ // 0x34e7 @0x7
0x34e0…34e9 at0008 = EOL // 0x34e8 @0x8
0x34e0…34e9 }
0x34e9…3500 c257 6150 EXEC FE(W,18,K7$)
0x34e9…3500 LineComalBin {
0x34e9…3500 ptr = 0xc257 // 0x34e9 @0x0
0x34e9…3500 lno = 0x1806 // 0x34eb @0x2
0x34e9…3500 at0004 = ╱9d╱ EXEC ╱ // 0x34ed @0x4
0x34e9…3500 at0005 = ╱46╱F╱ // 0x34ee @0x5
0x34e9…3500 at0006 = ╱45╱E╱ // 0x34ef @0x6
0x34e9…3500 at0007 = ╱ed╱(╱ // 0x34f0 @0x7
0x34e9…3500 at0008 = ╱57╱W╱ // 0x34f1 @0x8
0x34e9…3500 at0009 = ╱ec╱,╱ // 0x34f2 @0x9
0x34e9…3500 at000a = ╱31╱1╱ // 0x34f3 @0xa
0x34e9…3500 at000b = ╱38╱8╱ // 0x34f4 @0xb
0x34e9…3500 at000c = ╱fe00009005╱ // 0x34f5 @0xc
0x34e9…3500 at0011 = ╱ec╱,╱ // 0x34fa @0x11
0x34e9…3500 at0012 = ╱4b╱K╱ // 0x34fb @0x12
0x34e9…3500 at0013 = ╱37╱7╱ // 0x34fc @0x13
0x34e9…3500 at0014 = ╱ef╱$╱ // 0x34fd @0x14
0x34e9…3500 at0015 = ╱ee╱)╱ // 0x34fe @0x15
0x34e9…3500 at0016 = EOL // 0x34ff @0x16
0x34e9…3500 }
0x3500…350b c262 6160 OPEN K2$,R
0x3500…350b LineComalBin {
0x3500…350b ptr = 0xc262 // 0x3500 @0x0
0x3500…350b lno = 0x1810 // 0x3502 @0x2
0x3500…350b at0004 = ╱a7╱ OPEN ╱ // 0x3504 @0x4
0x3500…350b at0005 = ╱4b╱K╱ // 0x3505 @0x5
0x3500…350b at0006 = ╱32╱2╱ // 0x3506 @0x6
0x3500…350b at0007 = ╱ef╱$╱ // 0x3507 @0x7
0x3500…350b at0008 = ╱ec╱,╱ // 0x3508 @0x8
0x3500…350b at0009 = ╱52╱R╱ // 0x3509 @0x9
0x3500…350b at000a = EOL // 0x350a @0xa
0x3500…350b }
0x350b…3522 c279 6170 EXEC FE(W,19,K2$)
0x350b…3522 LineComalBin {
0x350b…3522 ptr = 0xc279 // 0x350b @0x0
0x350b…3522 lno = 0x181a // 0x350d @0x2
0x350b…3522 at0004 = ╱9d╱ EXEC ╱ // 0x350f @0x4
0x350b…3522 at0005 = ╱46╱F╱ // 0x3510 @0x5
0x350b…3522 at0006 = ╱45╱E╱ // 0x3511 @0x6
0x350b…3522 at0007 = ╱ed╱(╱ // 0x3512 @0x7
0x350b…3522 at0008 = ╱57╱W╱ // 0x3513 @0x8
0x350b…3522 at0009 = ╱ec╱,╱ // 0x3514 @0x9
0x350b…3522 at000a = ╱31╱1╱ // 0x3515 @0xa
0x350b…3522 at000b = ╱39╱9╱ // 0x3516 @0xb
0x350b…3522 at000c = ╱fe00009805╱ // 0x3517 @0xc
0x350b…3522 at0011 = ╱ec╱,╱ // 0x351c @0x11
0x350b…3522 at0012 = ╱4b╱K╱ // 0x351d @0x12
0x350b…3522 at0013 = ╱32╱2╱ // 0x351e @0x13
0x350b…3522 at0014 = ╱ef╱$╱ // 0x351f @0x14
0x350b…3522 at0015 = ╱ee╱)╱ // 0x3520 @0x15
0x350b…3522 at0016 = EOL // 0x3521 @0x16
0x350b…3522 }
0x3522…352d c284 6180 OPEN K3$,R
0x3522…352d LineComalBin {
0x3522…352d ptr = 0xc284 // 0x3522 @0x0
0x3522…352d lno = 0x1824 // 0x3524 @0x2
0x3522…352d at0004 = ╱a7╱ OPEN ╱ // 0x3526 @0x4
0x3522…352d at0005 = ╱4b╱K╱ // 0x3527 @0x5
0x3522…352d at0006 = ╱33╱3╱ // 0x3528 @0x6
0x3522…352d at0007 = ╱ef╱$╱ // 0x3529 @0x7
0x3522…352d at0008 = ╱ec╱,╱ // 0x352a @0x8
0x3522…352d at0009 = ╱52╱R╱ // 0x352b @0x9
0x3522…352d at000a = EOL // 0x352c @0xa
0x3522…352d }
0x352d…3544 c29b 6190 EXEC FE(W,20,K3$)
0x352d…3544 LineComalBin {
0x352d…3544 ptr = 0xc29b // 0x352d @0x0
0x352d…3544 lno = 0x182e // 0x352f @0x2
0x352d…3544 at0004 = ╱9d╱ EXEC ╱ // 0x3531 @0x4
0x352d…3544 at0005 = ╱46╱F╱ // 0x3532 @0x5
0x352d…3544 at0006 = ╱45╱E╱ // 0x3533 @0x6
0x352d…3544 at0007 = ╱ed╱(╱ // 0x3534 @0x7
0x352d…3544 at0008 = ╱57╱W╱ // 0x3535 @0x8
0x352d…3544 at0009 = ╱ec╱,╱ // 0x3536 @0x9
0x352d…3544 at000a = ╱32╱2╱ // 0x3537 @0xa
0x352d…3544 at000b = ╱30╱0╱ // 0x3538 @0xb
0x352d…3544 at000c = ╱fe0000a005╱ // 0x3539 @0xc
0x352d…3544 at0011 = ╱ec╱,╱ // 0x353e @0x11
0x352d…3544 at0012 = ╱4b╱K╱ // 0x353f @0x12
0x352d…3544 at0013 = ╱33╱3╱ // 0x3540 @0x13
0x352d…3544 at0014 = ╱ef╱$╱ // 0x3541 @0x14
0x352d…3544 at0015 = ╱ee╱)╱ // 0x3542 @0x15
0x352d…3544 at0016 = EOL // 0x3543 @0x16
0x352d…3544 }
0x3544…3564 c2bb 6200 EXEC INDTAB1(VTAB1,MVANTAL,K3$)
0x3544…3564 LineComalBin {
0x3544…3564 ptr = 0xc2bb // 0x3544 @0x0
0x3544…3564 lno = 0x1838 // 0x3546 @0x2
0x3544…3564 at0004 = ╱9d╱ EXEC ╱ // 0x3548 @0x4
0x3544…3564 at0005 = ╱49╱I╱ // 0x3549 @0x5
0x3544…3564 at0006 = ╱4e╱N╱ // 0x354a @0x6
0x3544…3564 at0007 = ╱44╱D╱ // 0x354b @0x7
0x3544…3564 at0008 = ╱54╱T╱ // 0x354c @0x8
0x3544…3564 at0009 = ╱41╱A╱ // 0x354d @0x9
0x3544…3564 at000a = ╱42╱B╱ // 0x354e @0xa
0x3544…3564 at000b = ╱31╱1╱ // 0x354f @0xb
0x3544…3564 at000c = ╱ed╱(╱ // 0x3550 @0xc
0x3544…3564 at000d = ╱56╱V╱ // 0x3551 @0xd
0x3544…3564 at000e = ╱54╱T╱ // 0x3552 @0xe
0x3544…3564 at000f = ╱41╱A╱ // 0x3553 @0xf
0x3544…3564 at0010 = ╱42╱B╱ // 0x3554 @0x10
0x3544…3564 at0011 = ╱31╱1╱ // 0x3555 @0x11
0x3544…3564 at0012 = ╱ec╱,╱ // 0x3556 @0x12
0x3544…3564 at0013 = ╱4d╱M╱ // 0x3557 @0x13
0x3544…3564 at0014 = ╱56╱V╱ // 0x3558 @0x14
0x3544…3564 at0015 = ╱41╱A╱ // 0x3559 @0x15
0x3544…3564 at0016 = ╱4e╱N╱ // 0x355a @0x16
0x3544…3564 at0017 = ╱54╱T╱ // 0x355b @0x17
0x3544…3564 at0018 = ╱41╱A╱ // 0x355c @0x18
0x3544…3564 at0019 = ╱4c╱L╱ // 0x355d @0x19
0x3544…3564 at001a = ╱ec╱,╱ // 0x355e @0x1a
0x3544…3564 at001b = ╱4b╱K╱ // 0x355f @0x1b
0x3544…3564 at001c = ╱33╱3╱ // 0x3560 @0x1c
0x3544…3564 at001d = ╱ef╱$╱ // 0x3561 @0x1d
0x3544…3564 at001e = ╱ee╱)╱ // 0x3562 @0x1e
0x3544…3564 at001f = EOL // 0x3563 @0x1f
0x3544…3564 }
0x3564…3584 c2db 6210 EXEC INDTAB1(DTAB1,MDANTAL,K2$)
0x3564…3584 LineComalBin {
0x3564…3584 ptr = 0xc2db // 0x3564 @0x0
0x3564…3584 lno = 0x1842 // 0x3566 @0x2
0x3564…3584 at0004 = ╱9d╱ EXEC ╱ // 0x3568 @0x4
0x3564…3584 at0005 = ╱49╱I╱ // 0x3569 @0x5
0x3564…3584 at0006 = ╱4e╱N╱ // 0x356a @0x6
0x3564…3584 at0007 = ╱44╱D╱ // 0x356b @0x7
0x3564…3584 at0008 = ╱54╱T╱ // 0x356c @0x8
0x3564…3584 at0009 = ╱41╱A╱ // 0x356d @0x9
0x3564…3584 at000a = ╱42╱B╱ // 0x356e @0xa
0x3564…3584 at000b = ╱31╱1╱ // 0x356f @0xb
0x3564…3584 at000c = ╱ed╱(╱ // 0x3570 @0xc
0x3564…3584 at000d = ╱44╱D╱ // 0x3571 @0xd
0x3564…3584 at000e = ╱54╱T╱ // 0x3572 @0xe
0x3564…3584 at000f = ╱41╱A╱ // 0x3573 @0xf
0x3564…3584 at0010 = ╱42╱B╱ // 0x3574 @0x10
0x3564…3584 at0011 = ╱31╱1╱ // 0x3575 @0x11
0x3564…3584 at0012 = ╱ec╱,╱ // 0x3576 @0x12
0x3564…3584 at0013 = ╱4d╱M╱ // 0x3577 @0x13
0x3564…3584 at0014 = ╱44╱D╱ // 0x3578 @0x14
0x3564…3584 at0015 = ╱41╱A╱ // 0x3579 @0x15
0x3564…3584 at0016 = ╱4e╱N╱ // 0x357a @0x16
0x3564…3584 at0017 = ╱54╱T╱ // 0x357b @0x17
0x3564…3584 at0018 = ╱41╱A╱ // 0x357c @0x18
0x3564…3584 at0019 = ╱4c╱L╱ // 0x357d @0x19
0x3564…3584 at001a = ╱ec╱,╱ // 0x357e @0x1a
0x3564…3584 at001b = ╱4b╱K╱ // 0x357f @0x1b
0x3564…3584 at001c = ╱32╱2╱ // 0x3580 @0x1c
0x3564…3584 at001d = ╱ef╱$╱ // 0x3581 @0x1d
0x3564…3584 at001e = ╱ee╱)╱ // 0x3582 @0x1e
0x3564…3584 at001f = EOL // 0x3583 @0x1f
0x3564…3584 }
0x3584…358a c2e1 6220 CLOSE
0x3584…358a LineComalBin {
0x3584…358a ptr = 0xc2e1 // 0x3584 @0x0
0x3584…358a lno = 0x184c // 0x3586 @0x2
0x3584…358a at0004 = ╱a8╱ CLOSE ╱ // 0x3588 @0x4
0x3584…358a at0005 = EOL // 0x3589 @0x5
0x3584…358a }
0x358a…3590 (178,) c2e7 6230 REPEAT
0x358a…3590 LineComalBin {
0x358a…3590 ptr = 0xc2e7 // 0x358a @0x0
0x358a…3590 lno = 0x1856 // 0x358c @0x2
0x358a…3590 at0004 = ╱97╱ REPEAT ╱ // 0x358e @0x4
0x358a…3590 at0005 = EOL // 0x358f @0x5
0x358a…3590 }
0x3590…359b c2f2 6240 OPEN K2$,R
0x3590…359b LineComalBin {
0x3590…359b ptr = 0xc2f2 // 0x3590 @0x0
0x3590…359b lno = 0x1860 // 0x3592 @0x2
0x3590…359b at0004 = ╱a7╱ OPEN ╱ // 0x3594 @0x4
0x3590…359b at0005 = ╱4b╱K╱ // 0x3595 @0x5
0x3590…359b at0006 = ╱32╱2╱ // 0x3596 @0x6
0x3590…359b at0007 = ╱ef╱$╱ // 0x3597 @0x7
0x3590…359b at0008 = ╱ec╱,╱ // 0x3598 @0x8
0x3590…359b at0009 = ╱52╱R╱ // 0x3599 @0x9
0x3590…359b at000a = EOL // 0x359a @0xa
0x3590…359b }
0x359b…35b2 c309 6250 EXEC FE(W,19,K2$)
0x359b…35b2 LineComalBin {
0x359b…35b2 ptr = 0xc309 // 0x359b @0x0
0x359b…35b2 lno = 0x186a // 0x359d @0x2
0x359b…35b2 at0004 = ╱9d╱ EXEC ╱ // 0x359f @0x4
0x359b…35b2 at0005 = ╱46╱F╱ // 0x35a0 @0x5
0x359b…35b2 at0006 = ╱45╱E╱ // 0x35a1 @0x6
0x359b…35b2 at0007 = ╱ed╱(╱ // 0x35a2 @0x7
0x359b…35b2 at0008 = ╱57╱W╱ // 0x35a3 @0x8
0x359b…35b2 at0009 = ╱ec╱,╱ // 0x35a4 @0x9
0x359b…35b2 at000a = ╱31╱1╱ // 0x35a5 @0xa
0x359b…35b2 at000b = ╱39╱9╱ // 0x35a6 @0xb
0x359b…35b2 at000c = ╱fe00009805╱ // 0x35a7 @0xc
0x359b…35b2 at0011 = ╱ec╱,╱ // 0x35ac @0x11
0x359b…35b2 at0012 = ╱4b╱K╱ // 0x35ad @0x12
0x359b…35b2 at0013 = ╱32╱2╱ // 0x35ae @0x13
0x359b…35b2 at0014 = ╱ef╱$╱ // 0x35af @0x14
0x359b…35b2 at0015 = ╱ee╱)╱ // 0x35b0 @0x15
0x359b…35b2 at0016 = EOL // 0x35b1 @0x16
0x359b…35b2 }
0x35b2…35bd c314 6260 OPEN K3$,R
0x35b2…35bd LineComalBin {
0x35b2…35bd ptr = 0xc314 // 0x35b2 @0x0
0x35b2…35bd lno = 0x1874 // 0x35b4 @0x2
0x35b2…35bd at0004 = ╱a7╱ OPEN ╱ // 0x35b6 @0x4
0x35b2…35bd at0005 = ╱4b╱K╱ // 0x35b7 @0x5
0x35b2…35bd at0006 = ╱33╱3╱ // 0x35b8 @0x6
0x35b2…35bd at0007 = ╱ef╱$╱ // 0x35b9 @0x7
0x35b2…35bd at0008 = ╱ec╱,╱ // 0x35ba @0x8
0x35b2…35bd at0009 = ╱52╱R╱ // 0x35bb @0x9
0x35b2…35bd at000a = EOL // 0x35bc @0xa
0x35b2…35bd }
0x35bd…35d4 c32b 6270 EXEC FE(W,20,K3$)
0x35bd…35d4 LineComalBin {
0x35bd…35d4 ptr = 0xc32b // 0x35bd @0x0
0x35bd…35d4 lno = 0x187e // 0x35bf @0x2
0x35bd…35d4 at0004 = ╱9d╱ EXEC ╱ // 0x35c1 @0x4
0x35bd…35d4 at0005 = ╱46╱F╱ // 0x35c2 @0x5
0x35bd…35d4 at0006 = ╱45╱E╱ // 0x35c3 @0x6
0x35bd…35d4 at0007 = ╱ed╱(╱ // 0x35c4 @0x7
0x35bd…35d4 at0008 = ╱57╱W╱ // 0x35c5 @0x8
0x35bd…35d4 at0009 = ╱ec╱,╱ // 0x35c6 @0x9
0x35bd…35d4 at000a = ╱32╱2╱ // 0x35c7 @0xa
0x35bd…35d4 at000b = ╱30╱0╱ // 0x35c8 @0xb
0x35bd…35d4 at000c = ╱fe0000a005╱ // 0x35c9 @0xc
0x35bd…35d4 at0011 = ╱ec╱,╱ // 0x35ce @0x11
0x35bd…35d4 at0012 = ╱4b╱K╱ // 0x35cf @0x12
0x35bd…35d4 at0013 = ╱33╱3╱ // 0x35d0 @0x13
0x35bd…35d4 at0014 = ╱ef╱$╱ // 0x35d1 @0x14
0x35bd…35d4 at0015 = ╱ee╱)╱ // 0x35d2 @0x15
0x35bd…35d4 at0016 = EOL // 0x35d3 @0x16
0x35bd…35d4 }
0x35d4…35df c336 6280 OPEN K4$,R
0x35d4…35df LineComalBin {
0x35d4…35df ptr = 0xc336 // 0x35d4 @0x0
0x35d4…35df lno = 0x1888 // 0x35d6 @0x2
0x35d4…35df at0004 = ╱a7╱ OPEN ╱ // 0x35d8 @0x4
0x35d4…35df at0005 = ╱4b╱K╱ // 0x35d9 @0x5
0x35d4…35df at0006 = ╱34╱4╱ // 0x35da @0x6
0x35d4…35df at0007 = ╱ef╱$╱ // 0x35db @0x7
0x35d4…35df at0008 = ╱ec╱,╱ // 0x35dc @0x8
0x35d4…35df at0009 = ╱52╱R╱ // 0x35dd @0x9
0x35d4…35df at000a = EOL // 0x35de @0xa
0x35d4…35df }
0x35df…35f6 c34d 6290 EXEC FE(W,21,K4$)
0x35df…35f6 LineComalBin {
0x35df…35f6 ptr = 0xc34d // 0x35df @0x0
0x35df…35f6 lno = 0x1892 // 0x35e1 @0x2
0x35df…35f6 at0004 = ╱9d╱ EXEC ╱ // 0x35e3 @0x4
0x35df…35f6 at0005 = ╱46╱F╱ // 0x35e4 @0x5
0x35df…35f6 at0006 = ╱45╱E╱ // 0x35e5 @0x6
0x35df…35f6 at0007 = ╱ed╱(╱ // 0x35e6 @0x7
0x35df…35f6 at0008 = ╱57╱W╱ // 0x35e7 @0x8
0x35df…35f6 at0009 = ╱ec╱,╱ // 0x35e8 @0x9
0x35df…35f6 at000a = ╱32╱2╱ // 0x35e9 @0xa
0x35df…35f6 at000b = ╱31╱1╱ // 0x35ea @0xb
0x35df…35f6 at000c = ╱fe0000a805╱ // 0x35eb @0xc
0x35df…35f6 at0011 = ╱ec╱,╱ // 0x35f0 @0x11
0x35df…35f6 at0012 = ╱4b╱K╱ // 0x35f1 @0x12
0x35df…35f6 at0013 = ╱34╱4╱ // 0x35f2 @0x13
0x35df…35f6 at0014 = ╱ef╱$╱ // 0x35f3 @0x14
0x35df…35f6 at0015 = ╱ee╱)╱ // 0x35f4 @0x15
0x35df…35f6 at0016 = EOL // 0x35f5 @0x16
0x35df…35f6 }
0x35f6…3601 c358 6300 OPEN K5$,R
0x35f6…3601 LineComalBin {
0x35f6…3601 ptr = 0xc358 // 0x35f6 @0x0
0x35f6…3601 lno = 0x189c // 0x35f8 @0x2
0x35f6…3601 at0004 = ╱a7╱ OPEN ╱ // 0x35fa @0x4
0x35f6…3601 at0005 = ╱4b╱K╱ // 0x35fb @0x5
0x35f6…3601 at0006 = ╱35╱5╱ // 0x35fc @0x6
0x35f6…3601 at0007 = ╱ef╱$╱ // 0x35fd @0x7
0x35f6…3601 at0008 = ╱ec╱,╱ // 0x35fe @0x8
0x35f6…3601 at0009 = ╱52╱R╱ // 0x35ff @0x9
0x35f6…3601 at000a = EOL // 0x3600 @0xa
0x35f6…3601 }
0x3601…3618 c36f 6310 EXEC FE(W,22,K5$)
0x3601…3618 LineComalBin {
0x3601…3618 ptr = 0xc36f // 0x3601 @0x0
0x3601…3618 lno = 0x18a6 // 0x3603 @0x2
0x3601…3618 at0004 = ╱9d╱ EXEC ╱ // 0x3605 @0x4
0x3601…3618 at0005 = ╱46╱F╱ // 0x3606 @0x5
0x3601…3618 at0006 = ╱45╱E╱ // 0x3607 @0x6
0x3601…3618 at0007 = ╱ed╱(╱ // 0x3608 @0x7
0x3601…3618 at0008 = ╱57╱W╱ // 0x3609 @0x8
0x3601…3618 at0009 = ╱ec╱,╱ // 0x360a @0x9
0x3601…3618 at000a = ╱32╱2╱ // 0x360b @0xa
0x3601…3618 at000b = ╱32╱2╱ // 0x360c @0xb
0x3601…3618 at000c = ╱fe0000b005╱ // 0x360d @0xc
0x3601…3618 at0011 = ╱ec╱,╱ // 0x3612 @0x11
0x3601…3618 at0012 = ╱4b╱K╱ // 0x3613 @0x12
0x3601…3618 at0013 = ╱35╱5╱ // 0x3614 @0x13
0x3601…3618 at0014 = ╱ef╱$╱ // 0x3615 @0x14
0x3601…3618 at0015 = ╱ee╱)╱ // 0x3616 @0x15
0x3601…3618 at0016 = EOL // 0x3617 @0x16
0x3601…3618 }
0x3618…3656 c3ad 6320 FAKTNR=T1(E);KREDNR=T1(G);DATO=T1(7);APOS=T2(4)
0x3618…3656 LineComalBin {
0x3618…3656 ptr = 0xc3ad // 0x3618 @0x0
0x3618…3656 lno = 0x18b0 // 0x361a @0x2
0x3618…3656 at0004 = ╱46╱F╱ // 0x361c @0x4
0x3618…3656 at0005 = ╱41╱A╱ // 0x361d @0x5
0x3618…3656 at0006 = ╱4b╱K╱ // 0x361e @0x6
0x3618…3656 at0007 = ╱54╱T╱ // 0x361f @0x7
0x3618…3656 at0008 = ╱4e╱N╱ // 0x3620 @0x8
0x3618…3656 at0009 = ╱52╱R╱ // 0x3621 @0x9
0x3618…3656 at000a = ╱dc╱=╱ // 0x3622 @0xa
0x3618…3656 at000b = ╱54╱T╱ // 0x3623 @0xb
0x3618…3656 at000c = ╱31╱1╱ // 0x3624 @0xc
0x3618…3656 at000d = ╱ed╱(╱ // 0x3625 @0xd
0x3618…3656 at000e = ╱45╱E╱ // 0x3626 @0xe
0x3618…3656 at000f = ╱ee╱)╱ // 0x3627 @0xf
0x3618…3656 at0010 = ╱eb╱;╱ // 0x3628 @0x10
0x3618…3656 at0011 = ╱4b╱K╱ // 0x3629 @0x11
0x3618…3656 at0012 = ╱52╱R╱ // 0x362a @0x12
0x3618…3656 at0013 = ╱45╱E╱ // 0x362b @0x13
0x3618…3656 at0014 = ╱44╱D╱ // 0x362c @0x14
0x3618…3656 at0015 = ╱4e╱N╱ // 0x362d @0x15
0x3618…3656 at0016 = ╱52╱R╱ // 0x362e @0x16
0x3618…3656 at0017 = ╱dc╱=╱ // 0x362f @0x17
0x3618…3656 at0018 = ╱54╱T╱ // 0x3630 @0x18
0x3618…3656 at0019 = ╱31╱1╱ // 0x3631 @0x19
0x3618…3656 at001a = ╱ed╱(╱ // 0x3632 @0x1a
0x3618…3656 at001b = ╱47╱G╱ // 0x3633 @0x1b
0x3618…3656 at001c = ╱ee╱)╱ // 0x3634 @0x1c
0x3618…3656 at001d = ╱eb╱;╱ // 0x3635 @0x1d
0x3618…3656 at001e = ╱44╱D╱ // 0x3636 @0x1e
0x3618…3656 at001f = ╱41╱A╱ // 0x3637 @0x1f
0x3618…3656 at0020 = ╱54╱T╱ // 0x3638 @0x20
0x3618…3656 at0021 = ╱4f╱O╱ // 0x3639 @0x21
0x3618…3656 at0022 = ╱dc╱=╱ // 0x363a @0x22
0x3618…3656 at0023 = ╱54╱T╱ // 0x363b @0x23
0x3618…3656 at0024 = ╱31╱1╱ // 0x363c @0x24
0x3618…3656 at0025 = ╱ed╱(╱ // 0x363d @0x25
0x3618…3656 at0026 = ╱37╱7╱ // 0x363e @0x26
0x3618…3656 at0027 = ╱fe0000e003╱ // 0x363f @0x27
0x3618…3656 at002c = ╱ee╱)╱ // 0x3644 @0x2c
0x3618…3656 at002d = ╱eb╱;╱ // 0x3645 @0x2d
0x3618…3656 at002e = ╱41╱A╱ // 0x3646 @0x2e
0x3618…3656 at002f = ╱50╱P╱ // 0x3647 @0x2f
0x3618…3656 at0030 = ╱4f╱O╱ // 0x3648 @0x30
0x3618…3656 at0031 = ╱53╱S╱ // 0x3649 @0x31
0x3618…3656 at0032 = ╱dc╱=╱ // 0x364a @0x32
0x3618…3656 at0033 = ╱54╱T╱ // 0x364b @0x33
0x3618…3656 at0034 = ╱32╱2╱ // 0x364c @0x34
0x3618…3656 at0035 = ╱ed╱(╱ // 0x364d @0x35
0x3618…3656 at0036 = ╱34╱4╱ // 0x364e @0x36
0x3618…3656 at0037 = ╱fe00008003╱ // 0x364f @0x37
0x3618…3656 at003c = ╱ee╱)╱ // 0x3654 @0x3c
0x3618…3656 at003d = EOL // 0x3655 @0x3d
0x3618…3656 }
0x3656…36a1 c3f8 6330 AKRED=T2(5);AFAKT=T2(6);AVKONTI=T2(7);FJPOST=T2(8)
0x3656…36a1 LineComalBin {
0x3656…36a1 ptr = 0xc3f8 // 0x3656 @0x0
0x3656…36a1 lno = 0x18ba // 0x3658 @0x2
0x3656…36a1 at0004 = ╱41╱A╱ // 0x365a @0x4
0x3656…36a1 at0005 = ╱4b╱K╱ // 0x365b @0x5
0x3656…36a1 at0006 = ╱52╱R╱ // 0x365c @0x6
0x3656…36a1 at0007 = ╱45╱E╱ // 0x365d @0x7
0x3656…36a1 at0008 = ╱44╱D╱ // 0x365e @0x8
0x3656…36a1 at0009 = ╱dc╱=╱ // 0x365f @0x9
0x3656…36a1 at000a = ╱54╱T╱ // 0x3660 @0xa
0x3656…36a1 at000b = ╱32╱2╱ // 0x3661 @0xb
0x3656…36a1 at000c = ╱ed╱(╱ // 0x3662 @0xc
0x3656…36a1 at000d = ╱35╱5╱ // 0x3663 @0xd
0x3656…36a1 at000e = ╱fe0000a003╱ // 0x3664 @0xe
0x3656…36a1 at0013 = ╱ee╱)╱ // 0x3669 @0x13
0x3656…36a1 at0014 = ╱eb╱;╱ // 0x366a @0x14
0x3656…36a1 at0015 = ╱41╱A╱ // 0x366b @0x15
0x3656…36a1 at0016 = ╱46╱F╱ // 0x366c @0x16
0x3656…36a1 at0017 = ╱41╱A╱ // 0x366d @0x17
0x3656…36a1 at0018 = ╱4b╱K╱ // 0x366e @0x18
0x3656…36a1 at0019 = ╱54╱T╱ // 0x366f @0x19
0x3656…36a1 at001a = ╱dc╱=╱ // 0x3670 @0x1a
0x3656…36a1 at001b = ╱54╱T╱ // 0x3671 @0x1b
0x3656…36a1 at001c = ╱32╱2╱ // 0x3672 @0x1c
0x3656…36a1 at001d = ╱ed╱(╱ // 0x3673 @0x1d
0x3656…36a1 at001e = ╱36╱6╱ // 0x3674 @0x1e
0x3656…36a1 at001f = ╱fe0000c003╱ // 0x3675 @0x1f
0x3656…36a1 at0024 = ╱ee╱)╱ // 0x367a @0x24
0x3656…36a1 at0025 = ╱eb╱;╱ // 0x367b @0x25
0x3656…36a1 at0026 = ╱41╱A╱ // 0x367c @0x26
0x3656…36a1 at0027 = ╱56╱V╱ // 0x367d @0x27
0x3656…36a1 at0028 = ╱4b╱K╱ // 0x367e @0x28
0x3656…36a1 at0029 = ╱4f╱O╱ // 0x367f @0x29
0x3656…36a1 at002a = ╱4e╱N╱ // 0x3680 @0x2a
0x3656…36a1 at002b = ╱54╱T╱ // 0x3681 @0x2b
0x3656…36a1 at002c = ╱49╱I╱ // 0x3682 @0x2c
0x3656…36a1 at002d = ╱dc╱=╱ // 0x3683 @0x2d
0x3656…36a1 at002e = ╱54╱T╱ // 0x3684 @0x2e
0x3656…36a1 at002f = ╱32╱2╱ // 0x3685 @0x2f
0x3656…36a1 at0030 = ╱ed╱(╱ // 0x3686 @0x30
0x3656…36a1 at0031 = ╱37╱7╱ // 0x3687 @0x31
0x3656…36a1 at0032 = ╱fe0000e003╱ // 0x3688 @0x32
0x3656…36a1 at0037 = ╱ee╱)╱ // 0x368d @0x37
0x3656…36a1 at0038 = ╱eb╱;╱ // 0x368e @0x38
0x3656…36a1 at0039 = ╱46╱F╱ // 0x368f @0x39
0x3656…36a1 at003a = ╱4a╱J╱ // 0x3690 @0x3a
0x3656…36a1 at003b = ╱50╱P╱ // 0x3691 @0x3b
0x3656…36a1 at003c = ╱4f╱O╱ // 0x3692 @0x3c
0x3656…36a1 at003d = ╱53╱S╱ // 0x3693 @0x3d
0x3656…36a1 at003e = ╱54╱T╱ // 0x3694 @0x3e
0x3656…36a1 at003f = ╱dc╱=╱ // 0x3695 @0x3f
0x3656…36a1 at0040 = ╱54╱T╱ // 0x3696 @0x40
0x3656…36a1 at0041 = ╱32╱2╱ // 0x3697 @0x41
0x3656…36a1 at0042 = ╱ed╱(╱ // 0x3698 @0x42
0x3656…36a1 at0043 = ╱38╱8╱ // 0x3699 @0x43
0x3656…36a1 at0044 = ╱fe00008004╱ // 0x369a @0x44
0x3656…36a1 at0049 = ╱ee╱)╱ // 0x369f @0x49
0x3656…36a1 at004a = EOL // 0x36a0 @0x4a
0x3656…36a1 }
0x36a1…36b8 c40f 6340 TOTAL$="0+";VLIN=E
0x36a1…36b8 LineComalBin {
0x36a1…36b8 ptr = 0xc40f // 0x36a1 @0x0
0x36a1…36b8 lno = 0x18c4 // 0x36a3 @0x2
0x36a1…36b8 at0004 = ╱54╱T╱ // 0x36a5 @0x4
0x36a1…36b8 at0005 = ╱4f╱O╱ // 0x36a6 @0x5
0x36a1…36b8 at0006 = ╱54╱T╱ // 0x36a7 @0x6
0x36a1…36b8 at0007 = ╱41╱A╱ // 0x36a8 @0x7
0x36a1…36b8 at0008 = ╱4c╱L╱ // 0x36a9 @0x8
0x36a1…36b8 at0009 = ╱ef╱$╱ // 0x36aa @0x9
0x36a1…36b8 at000a = ╱dc╱=╱ // 0x36ab @0xa
0x36a1…36b8 at000b = ╱22╱"╱ // 0x36ac @0xb
0x36a1…36b8 at000c = ╱30╱0╱ // 0x36ad @0xc
0x36a1…36b8 at000d = ╱2b╱+╱ // 0x36ae @0xd
0x36a1…36b8 at000e = ╱22╱"╱ // 0x36af @0xe
0x36a1…36b8 at000f = ╱eb╱;╱ // 0x36b0 @0xf
0x36a1…36b8 at0010 = ╱56╱V╱ // 0x36b1 @0x10
0x36a1…36b8 at0011 = ╱4c╱L╱ // 0x36b2 @0x11
0x36a1…36b8 at0012 = ╱49╱I╱ // 0x36b3 @0x12
0x36a1…36b8 at0013 = ╱4e╱N╱ // 0x36b4 @0x13
0x36a1…36b8 at0014 = ╱dc╱=╱ // 0x36b5 @0x14
0x36a1…36b8 at0015 = ╱45╱E╱ // 0x36b6 @0x15
0x36a1…36b8 at0016 = EOL // 0x36b7 @0x16
0x36a1…36b8 }
0x36b8…36be c415 6350 REPEAT
0x36b8…36be LineComalBin {
0x36b8…36be ptr = 0xc415 // 0x36b8 @0x0
0x36b8…36be lno = 0x18ce // 0x36ba @0x2
0x36b8…36be at0004 = ╱97╱ REPEAT ╱ // 0x36bc @0x4
0x36b8…36be at0005 = EOL // 0x36bd @0x5
0x36b8…36be }
0x36be…36c4 (182,) c41b 6360 REPEAT
0x36be…36c4 LineComalBin {
0x36be…36c4 ptr = 0xc41b // 0x36be @0x0
0x36be…36c4 lno = 0x18d8 // 0x36c0 @0x2
0x36be…36c4 at0004 = ╱97╱ REPEAT ╱ // 0x36c2 @0x4
0x36be…36c4 at0005 = EOL // 0x36c3 @0x5
0x36be…36c4 }
0x36c4…36ca c421 6370 REPEAT
0x36c4…36ca LineComalBin {
0x36c4…36ca ptr = 0xc421 // 0x36c4 @0x0
0x36c4…36ca lno = 0x18e2 // 0x36c6 @0x2
0x36c4…36ca at0004 = ╱97╱ REPEAT ╱ // 0x36c8 @0x4
0x36c4…36ca at0005 = EOL // 0x36c9 @0x5
0x36c4…36ca }
0x36ca…36d0 c427 6380 CLEAR
0x36ca…36d0 LineComalBin {
0x36ca…36d0 ptr = 0xc427 // 0x36ca @0x0
0x36ca…36d0 lno = 0x18ec // 0x36cc @0x2
0x36ca…36d0 at0004 = ╱a0╱ CLEAR ╱ // 0x36ce @0x4
0x36ca…36d0 at0005 = EOL // 0x36cf @0x5
0x36ca…36d0 }
0x36d0…36d6 c42d 6390 REPEAT
0x36d0…36d6 LineComalBin {
0x36d0…36d6 ptr = 0xc42d // 0x36d0 @0x0
0x36d0…36d6 lno = 0x18f6 // 0x36d2 @0x2
0x36d0…36d6 at0004 = ╱97╱ REPEAT ╱ // 0x36d4 @0x4
0x36d0…36d6 at0005 = EOL // 0x36d5 @0x5
0x36d0…36d6 }
0x36d6…370c c463 6400 EXEC INDPUT1(9,1,-1,100000,LTX3$)
0x36d6…370c LineComalBin {
0x36d6…370c ptr = 0xc463 // 0x36d6 @0x0
0x36d6…370c lno = 0x1900 // 0x36d8 @0x2
0x36d6…370c at0004 = ╱9d╱ EXEC ╱ // 0x36da @0x4
0x36d6…370c at0005 = ╱49╱I╱ // 0x36db @0x5
0x36d6…370c at0006 = ╱4e╱N╱ // 0x36dc @0x6
0x36d6…370c at0007 = ╱44╱D╱ // 0x36dd @0x7
0x36d6…370c at0008 = ╱50╱P╱ // 0x36de @0x8
0x36d6…370c at0009 = ╱55╱U╱ // 0x36df @0x9
0x36d6…370c at000a = ╱54╱T╱ // 0x36e0 @0xa
0x36d6…370c at000b = ╱31╱1╱ // 0x36e1 @0xb
0x36d6…370c at000c = ╱ed╱(╱ // 0x36e2 @0xc
0x36d6…370c at000d = ╱39╱9╱ // 0x36e3 @0xd
0x36d6…370c at000e = ╱fe00009004╱ // 0x36e4 @0xe
0x36d6…370c at0013 = ╱ec╱,╱ // 0x36e9 @0x13
0x36d6…370c at0014 = ╱31╱1╱ // 0x36ea @0x14
0x36d6…370c at0015 = ╱fe00008001╱ // 0x36eb @0x15
0x36d6…370c at001a = ╱ec╱,╱ // 0x36f0 @0x1a
0x36d6…370c at001b = ╱e9╱-╱ // 0x36f1 @0x1b
0x36d6…370c at001c = ╱31╱1╱ // 0x36f2 @0x1c
0x36d6…370c at001d = ╱fe00008001╱ // 0x36f3 @0x1d
0x36d6…370c at0022 = ╱ec╱,╱ // 0x36f8 @0x22
0x36d6…370c at0023 = ╱31╱1╱ // 0x36f9 @0x23
0x36d6…370c at0024 = ╱30╱0╱ // 0x36fa @0x24
0x36d6…370c at0025 = ╱30╱0╱ // 0x36fb @0x25
0x36d6…370c at0026 = ╱30╱0╱ // 0x36fc @0x26
0x36d6…370c at0027 = ╱30╱0╱ // 0x36fd @0x27
0x36d6…370c at0028 = ╱30╱0╱ // 0x36fe @0x28
0x36d6…370c at0029 = ╱fe0050c311╱ // 0x36ff @0x29
0x36d6…370c at002e = ╱ec╱,╱ // 0x3704 @0x2e
0x36d6…370c at002f = ╱4c╱L╱ // 0x3705 @0x2f
0x36d6…370c at0030 = ╱54╱T╱ // 0x3706 @0x30
0x36d6…370c at0031 = ╱58╱X╱ // 0x3707 @0x31
0x36d6…370c at0032 = ╱33╱3╱ // 0x3708 @0x32
0x36d6…370c at0033 = ╱ef╱$╱ // 0x3709 @0x33
0x36d6…370c at0034 = ╱ee╱)╱ // 0x370a @0x34
0x36d6…370c at0035 = EOL // 0x370b @0x35
0x36d6…370c }
0x370c…371f c476 6410 UNTIL KTAL=DTAL OR P=B
0x370c…371f LineComalBin {
0x370c…371f ptr = 0xc476 // 0x370c @0x0
0x370c…371f lno = 0x190a // 0x370e @0x2
0x370c…371f at0004 = ╱98╱ UNTIL ╱ // 0x3710 @0x4
0x370c…371f at0005 = ╱4b╱K╱ // 0x3711 @0x5
0x370c…371f at0006 = ╱54╱T╱ // 0x3712 @0x6
0x370c…371f at0007 = ╱41╱A╱ // 0x3713 @0x7
0x370c…371f at0008 = ╱4c╱L╱ // 0x3714 @0x8
0x370c…371f at0009 = ╱dc╱=╱ // 0x3715 @0x9
0x370c…371f at000a = ╱44╱D╱ // 0x3716 @0xa
0x370c…371f at000b = ╱54╱T╱ // 0x3717 @0xb
0x370c…371f at000c = ╱41╱A╱ // 0x3718 @0xc
0x370c…371f at000d = ╱4c╱L╱ // 0x3719 @0xd
0x370c…371f at000e = ╱db╱ OR ╱ // 0x371a @0xe
0x370c…371f at000f = ╱50╱P╱ // 0x371b @0xf
0x370c…371f at0010 = ╱dc╱=╱ // 0x371c @0x10
0x370c…371f at0011 = ╱42╱B╱ // 0x371d @0x11
0x370c…371f at0012 = EOL // 0x371e @0x12
0x370c…371f }
0x371f…372d c484 6420 KUNDENR=P
0x371f…372d LineComalBin {
0x371f…372d ptr = 0xc484 // 0x371f @0x0
0x371f…372d lno = 0x1914 // 0x3721 @0x2
0x371f…372d at0004 = ╱4b╱K╱ // 0x3723 @0x4
0x371f…372d at0005 = ╱55╱U╱ // 0x3724 @0x5
0x371f…372d at0006 = ╱4e╱N╱ // 0x3725 @0x6
0x371f…372d at0007 = ╱44╱D╱ // 0x3726 @0x7
0x371f…372d at0008 = ╱45╱E╱ // 0x3727 @0x8
0x371f…372d at0009 = ╱4e╱N╱ // 0x3728 @0x9
0x371f…372d at000a = ╱52╱R╱ // 0x3729 @0xa
0x371f…372d at000b = ╱dc╱=╱ // 0x372a @0xb
0x371f…372d at000c = ╱50╱P╱ // 0x372b @0xc
0x371f…372d at000d = EOL // 0x372c @0xd
0x371f…372d }
0x372d…373e c495 6430 IF KUNDENR=B THEN EXIT
0x372d…373e LineComalBin {
0x372d…373e ptr = 0xc495 // 0x372d @0x0
0x372d…373e lno = 0x191e // 0x372f @0x2
0x372d…373e at0004 = ╱82╱ IF ╱ // 0x3731 @0x4
0x372d…373e at0005 = ╱4b╱K╱ // 0x3732 @0x5
0x372d…373e at0006 = ╱55╱U╱ // 0x3733 @0x6
0x372d…373e at0007 = ╱4e╱N╱ // 0x3734 @0x7
0x372d…373e at0008 = ╱44╱D╱ // 0x3735 @0x8
0x372d…373e at0009 = ╱45╱E╱ // 0x3736 @0x9
0x372d…373e at000a = ╱4e╱N╱ // 0x3737 @0xa
0x372d…373e at000b = ╱52╱R╱ // 0x3738 @0xb
0x372d…373e at000c = ╱dc╱=╱ // 0x3739 @0xc
0x372d…373e at000d = ╱42╱B╱ // 0x373a @0xd
0x372d…373e at000e = ╱b6╱ THEN ╱ // 0x373b @0xe
0x372d…373e at000f = ╱99╱ EXIT ╱ // 0x373c @0xf
0x372d…373e at0010 = EOL // 0x373d @0x10
0x372d…373e }
0x373e…374d c4a4 6440 CURSOR 56,E
0x373e…374d LineComalBin {
0x373e…374d ptr = 0xc4a4 // 0x373e @0x0
0x373e…374d lno = 0x1928 // 0x3740 @0x2
0x373e…374d at0004 = ╱a1╱ CURSOR ╱ // 0x3742 @0x4
0x373e…374d at0005 = ╱35╱5╱ // 0x3743 @0x5
0x373e…374d at0006 = ╱36╱6╱ // 0x3744 @0x6
0x373e…374d at0007 = ╱fe0000e006╱ // 0x3745 @0x7
0x373e…374d at000c = ╱ec╱,╱ // 0x374a @0xc
0x373e…374d at000d = ╱45╱E╱ // 0x374b @0xd
0x373e…374d at000e = EOL // 0x374c @0xe
0x373e…374d }
0x374d…3771 c4c8 6450 PRINT USING "####### ":KUNDENR
0x374d…3771 LineComalBin {
0x374d…3771 ptr = 0xc4c8 // 0x374d @0x0
0x374d…3771 lno = 0x1932 // 0x374f @0x2
0x374d…3771 at0004 = ╱92╱ PRINT ╱ // 0x3751 @0x4
0x374d…3771 at0005 = ╱b9╱ USING ╱ // 0x3752 @0x5
0x374d…3771 at0006 = ╱22╱"╱ // 0x3753 @0x6
0x374d…3771 at0007 = ╱23╱#╱ // 0x3754 @0x7
0x374d…3771 at0008 = ╱23╱#╱ // 0x3755 @0x8
0x374d…3771 at0009 = ╱23╱#╱ // 0x3756 @0x9
0x374d…3771 at000a = ╱23╱#╱ // 0x3757 @0xa
0x374d…3771 at000b = ╱23╱#╱ // 0x3758 @0xb
0x374d…3771 at000c = ╱23╱#╱ // 0x3759 @0xc
0x374d…3771 at000d = ╱23╱#╱ // 0x375a @0xd
0x374d…3771 at000e = ╱20╱…╱ // 0x375b @0xe
0x374d…3771 at000f = ╱20╱…╱ // 0x375c @0xf
0x374d…3771 at0010 = ╱20╱…╱ // 0x375d @0x10
0x374d…3771 at0011 = ╱20╱…╱ // 0x375e @0x11
0x374d…3771 at0012 = ╱20╱…╱ // 0x375f @0x12
0x374d…3771 at0013 = ╱20╱…╱ // 0x3760 @0x13
0x374d…3771 at0014 = ╱20╱…╱ // 0x3761 @0x14
0x374d…3771 at0015 = ╱20╱…╱ // 0x3762 @0x15
0x374d…3771 at0016 = ╱20╱…╱ // 0x3763 @0x16
0x374d…3771 at0017 = ╱20╱…╱ // 0x3764 @0x17
0x374d…3771 at0018 = ╱20╱…╱ // 0x3765 @0x18
0x374d…3771 at0019 = ╱20╱…╱ // 0x3766 @0x19
0x374d…3771 at001a = ╱22╱"╱ // 0x3767 @0x1a
0x374d…3771 at001b = ╱f0╱:╱ // 0x3768 @0x1b
0x374d…3771 at001c = ╱4b╱K╱ // 0x3769 @0x1c
0x374d…3771 at001d = ╱55╱U╱ // 0x376a @0x1d
0x374d…3771 at001e = ╱4e╱N╱ // 0x376b @0x1e
0x374d…3771 at001f = ╱44╱D╱ // 0x376c @0x1f
0x374d…3771 at0020 = ╱45╱E╱ // 0x376d @0x20
0x374d…3771 at0021 = ╱4e╱N╱ // 0x376e @0x21
0x374d…3771 at0022 = ╱52╱R╱ // 0x376f @0x22
0x374d…3771 at0023 = EOL // 0x3770 @0x23
0x374d…3771 }
0x3771…3786 c4dd 6460 IF KUNDENR<>DIVDNR THEN
0x3771…3786 LineComalBin {
0x3771…3786 ptr = 0xc4dd // 0x3771 @0x0
0x3771…3786 lno = 0x193c // 0x3773 @0x2
0x3771…3786 at0004 = ╱9c╱ IF ╱ // 0x3775 @0x4
0x3771…3786 at0005 = ╱4b╱K╱ // 0x3776 @0x5
0x3771…3786 at0006 = ╱55╱U╱ // 0x3777 @0x6
0x3771…3786 at0007 = ╱4e╱N╱ // 0x3778 @0x7
0x3771…3786 at0008 = ╱44╱D╱ // 0x3779 @0x8
0x3771…3786 at0009 = ╱45╱E╱ // 0x377a @0x9
0x3771…3786 at000a = ╱4e╱N╱ // 0x377b @0xa
0x3771…3786 at000b = ╱52╱R╱ // 0x377c @0xb
0x3771…3786 at000c = ╱e1╱<>╱ // 0x377d @0xc
0x3771…3786 at000d = ╱44╱D╱ // 0x377e @0xd
0x3771…3786 at000e = ╱49╱I╱ // 0x377f @0xe
0x3771…3786 at000f = ╱56╱V╱ // 0x3780 @0xf
0x3771…3786 at0010 = ╱44╱D╱ // 0x3781 @0x10
0x3771…3786 at0011 = ╱4e╱N╱ // 0x3782 @0x11
0x3771…3786 at0012 = ╱52╱R╱ // 0x3783 @0x12
0x3771…3786 at0013 = ╱b6╱ THEN ╱ // 0x3784 @0x13
0x3771…3786 at0014 = EOL // 0x3785 @0x14
0x3771…3786 }
0x3786…3791 c4e8 6470 DIVD=B
0x3786…3791 LineComalBin {
0x3786…3791 ptr = 0xc4e8 // 0x3786 @0x0
0x3786…3791 lno = 0x1946 // 0x3788 @0x2
0x3786…3791 at0004 = ╱44╱D╱ // 0x378a @0x4
0x3786…3791 at0005 = ╱49╱I╱ // 0x378b @0x5
0x3786…3791 at0006 = ╱56╱V╱ // 0x378c @0x6
0x3786…3791 at0007 = ╱44╱D╱ // 0x378d @0x7
0x3786…3791 at0008 = ╱dc╱=╱ // 0x378e @0x8
0x3786…3791 at0009 = ╱42╱B╱ // 0x378f @0x9
0x3786…3791 at000a = EOL // 0x3790 @0xa
0x3786…3791 }
0x3791…37c3 c51a 6480 EXEC FPOST1(DTAB1,DTAB,MDANTAL,KUNDENR,DPIL3,K2$)
0x3791…37c3 LineComalBin {
0x3791…37c3 ptr = 0xc51a // 0x3791 @0x0
0x3791…37c3 lno = 0x1950 // 0x3793 @0x2
0x3791…37c3 at0004 = ╱9d╱ EXEC ╱ // 0x3795 @0x4
0x3791…37c3 at0005 = ╱46╱F╱ // 0x3796 @0x5
0x3791…37c3 at0006 = ╱50╱P╱ // 0x3797 @0x6
0x3791…37c3 at0007 = ╱4f╱O╱ // 0x3798 @0x7
0x3791…37c3 at0008 = ╱53╱S╱ // 0x3799 @0x8
0x3791…37c3 at0009 = ╱54╱T╱ // 0x379a @0x9
0x3791…37c3 at000a = ╱31╱1╱ // 0x379b @0xa
0x3791…37c3 at000b = ╱ed╱(╱ // 0x379c @0xb
0x3791…37c3 at000c = ╱44╱D╱ // 0x379d @0xc
0x3791…37c3 at000d = ╱54╱T╱ // 0x379e @0xd
0x3791…37c3 at000e = ╱41╱A╱ // 0x379f @0xe
0x3791…37c3 at000f = ╱42╱B╱ // 0x37a0 @0xf
0x3791…37c3 at0010 = ╱31╱1╱ // 0x37a1 @0x10
0x3791…37c3 at0011 = ╱ec╱,╱ // 0x37a2 @0x11
0x3791…37c3 at0012 = ╱44╱D╱ // 0x37a3 @0x12
0x3791…37c3 at0013 = ╱54╱T╱ // 0x37a4 @0x13
0x3791…37c3 at0014 = ╱41╱A╱ // 0x37a5 @0x14
0x3791…37c3 at0015 = ╱42╱B╱ // 0x37a6 @0x15
0x3791…37c3 at0016 = ╱ec╱,╱ // 0x37a7 @0x16
0x3791…37c3 at0017 = ╱4d╱M╱ // 0x37a8 @0x17
0x3791…37c3 at0018 = ╱44╱D╱ // 0x37a9 @0x18
0x3791…37c3 at0019 = ╱41╱A╱ // 0x37aa @0x19
0x3791…37c3 at001a = ╱4e╱N╱ // 0x37ab @0x1a
0x3791…37c3 at001b = ╱54╱T╱ // 0x37ac @0x1b
0x3791…37c3 at001c = ╱41╱A╱ // 0x37ad @0x1c
0x3791…37c3 at001d = ╱4c╱L╱ // 0x37ae @0x1d
0x3791…37c3 at001e = ╱ec╱,╱ // 0x37af @0x1e
0x3791…37c3 at001f = ╱4b╱K╱ // 0x37b0 @0x1f
0x3791…37c3 at0020 = ╱55╱U╱ // 0x37b1 @0x20
0x3791…37c3 at0021 = ╱4e╱N╱ // 0x37b2 @0x21
0x3791…37c3 at0022 = ╱44╱D╱ // 0x37b3 @0x22
0x3791…37c3 at0023 = ╱45╱E╱ // 0x37b4 @0x23
0x3791…37c3 at0024 = ╱4e╱N╱ // 0x37b5 @0x24
0x3791…37c3 at0025 = ╱52╱R╱ // 0x37b6 @0x25
0x3791…37c3 at0026 = ╱ec╱,╱ // 0x37b7 @0x26
0x3791…37c3 at0027 = ╱44╱D╱ // 0x37b8 @0x27
0x3791…37c3 at0028 = ╱50╱P╱ // 0x37b9 @0x28
0x3791…37c3 at0029 = ╱49╱I╱ // 0x37ba @0x29
0x3791…37c3 at002a = ╱4c╱L╱ // 0x37bb @0x2a
0x3791…37c3 at002b = ╱33╱3╱ // 0x37bc @0x2b
0x3791…37c3 at002c = ╱ec╱,╱ // 0x37bd @0x2c
0x3791…37c3 at002d = ╱4b╱K╱ // 0x37be @0x2d
0x3791…37c3 at002e = ╱32╱2╱ // 0x37bf @0x2e
0x3791…37c3 at002f = ╱ef╱$╱ // 0x37c0 @0x2f
0x3791…37c3 at0030 = ╱ee╱)╱ // 0x37c1 @0x30
0x3791…37c3 at0031 = EOL // 0x37c2 @0x31
0x3791…37c3 }
0x37c3…37d0 c527 6490 IF CEKS=E THEN
0x37c3…37d0 LineComalBin {
0x37c3…37d0 ptr = 0xc527 // 0x37c3 @0x0
0x37c3…37d0 lno = 0x195a // 0x37c5 @0x2
0x37c3…37d0 at0004 = ╱9c╱ IF ╱ // 0x37c7 @0x4
0x37c3…37d0 at0005 = ╱43╱C╱ // 0x37c8 @0x5
0x37c3…37d0 at0006 = ╱45╱E╱ // 0x37c9 @0x6
0x37c3…37d0 at0007 = ╱4b╱K╱ // 0x37ca @0x7
0x37c3…37d0 at0008 = ╱53╱S╱ // 0x37cb @0x8
0x37c3…37d0 at0009 = ╱dc╱=╱ // 0x37cc @0x9
0x37c3…37d0 at000a = ╱45╱E╱ // 0x37cd @0xa
0x37c3…37d0 at000b = ╱b6╱ THEN ╱ // 0x37ce @0xb
0x37c3…37d0 at000c = EOL // 0x37cf @0xc
0x37c3…37d0 }
0x37d0…37d9 c530 6500 CURSOR W,V
0x37d0…37d9 LineComalBin {
0x37d0…37d9 ptr = 0xc530 // 0x37d0 @0x0
0x37d0…37d9 lno = 0x1964 // 0x37d2 @0x2
0x37d0…37d9 at0004 = ╱a1╱ CURSOR ╱ // 0x37d4 @0x4
0x37d0…37d9 at0005 = ╱57╱W╱ // 0x37d5 @0x5
0x37d0…37d9 at0006 = ╱ec╱,╱ // 0x37d6 @0x6
0x37d0…37d9 at0007 = ╱56╱V╱ // 0x37d7 @0x7
0x37d0…37d9 at0008 = EOL // 0x37d8 @0x8
0x37d0…37d9 }
0x37d9…380c c563 6510 INPUT "Kunden eksisterer ikke. Tast RETURN.",SVAR1$
0x37d9…380c LineComalBin {
0x37d9…380c ptr = 0xc563 // 0x37d9 @0x0
0x37d9…380c lno = 0x196e // 0x37db @0x2
0x37d9…380c at0004 = ╱91╱ INPUT ╱ // 0x37dd @0x4
0x37d9…380c at0005 = ╱22╱"╱ // 0x37de @0x5
0x37d9…380c at0006 = ╱4b╱K╱ // 0x37df @0x6
0x37d9…380c at0007 = ╱75╱u╱ // 0x37e0 @0x7
0x37d9…380c at0008 = ╱6e╱n╱ // 0x37e1 @0x8
0x37d9…380c at0009 = ╱64╱d╱ // 0x37e2 @0x9
0x37d9…380c at000a = ╱65╱e╱ // 0x37e3 @0xa
0x37d9…380c at000b = ╱6e╱n╱ // 0x37e4 @0xb
0x37d9…380c at000c = ╱20╱…╱ // 0x37e5 @0xc
0x37d9…380c at000d = ╱65╱e╱ // 0x37e6 @0xd
0x37d9…380c at000e = ╱6b╱k╱ // 0x37e7 @0xe
0x37d9…380c at000f = ╱73╱s╱ // 0x37e8 @0xf
0x37d9…380c at0010 = ╱69╱i╱ // 0x37e9 @0x10
0x37d9…380c at0011 = ╱73╱s╱ // 0x37ea @0x11
0x37d9…380c at0012 = ╱74╱t╱ // 0x37eb @0x12
0x37d9…380c at0013 = ╱65╱e╱ // 0x37ec @0x13
0x37d9…380c at0014 = ╱72╱r╱ // 0x37ed @0x14
0x37d9…380c at0015 = ╱65╱e╱ // 0x37ee @0x15
0x37d9…380c at0016 = ╱72╱r╱ // 0x37ef @0x16
0x37d9…380c at0017 = ╱20╱…╱ // 0x37f0 @0x17
0x37d9…380c at0018 = ╱69╱i╱ // 0x37f1 @0x18
0x37d9…380c at0019 = ╱6b╱k╱ // 0x37f2 @0x19
0x37d9…380c at001a = ╱6b╱k╱ // 0x37f3 @0x1a
0x37d9…380c at001b = ╱65╱e╱ // 0x37f4 @0x1b
0x37d9…380c at001c = ╱2e╱.╱ // 0x37f5 @0x1c
0x37d9…380c at001d = ╱20╱…╱ // 0x37f6 @0x1d
0x37d9…380c at001e = ╱54╱T╱ // 0x37f7 @0x1e
0x37d9…380c at001f = ╱61╱a╱ // 0x37f8 @0x1f
0x37d9…380c at0020 = ╱73╱s╱ // 0x37f9 @0x20
0x37d9…380c at0021 = ╱74╱t╱ // 0x37fa @0x21
0x37d9…380c at0022 = ╱20╱…╱ // 0x37fb @0x22
0x37d9…380c at0023 = ╱52╱R╱ // 0x37fc @0x23
0x37d9…380c at0024 = ╱45╱E╱ // 0x37fd @0x24
0x37d9…380c at0025 = ╱54╱T╱ // 0x37fe @0x25
0x37d9…380c at0026 = ╱55╱U╱ // 0x37ff @0x26
0x37d9…380c at0027 = ╱52╱R╱ // 0x3800 @0x27
0x37d9…380c at0028 = ╱4e╱N╱ // 0x3801 @0x28
0x37d9…380c at0029 = ╱2e╱.╱ // 0x3802 @0x29
0x37d9…380c at002a = ╱22╱"╱ // 0x3803 @0x2a
0x37d9…380c at002b = ╱ec╱,╱ // 0x3804 @0x2b
0x37d9…380c at002c = ╱53╱S╱ // 0x3805 @0x2c
0x37d9…380c at002d = ╱56╱V╱ // 0x3806 @0x2d
0x37d9…380c at002e = ╱41╱A╱ // 0x3807 @0x2e
0x37d9…380c at002f = ╱52╱R╱ // 0x3808 @0x2f
0x37d9…380c at0030 = ╱31╱1╱ // 0x3809 @0x30
0x37d9…380c at0031 = ╱ef╱$╱ // 0x380a @0x31
0x37d9…380c at0032 = EOL // 0x380b @0x32
0x37d9…380c }
0x380c…3812 c569 6520 ELSE
0x380c…3812 LineComalBin {
0x380c…3812 ptr = 0xc569 // 0x380c @0x0
0x380c…3812 lno = 0x1978 // 0x380e @0x2
0x380c…3812 at0004 = ╱9a╱ ELSE ╱ // 0x3810 @0x4
0x380c…3812 at0005 = EOL // 0x3811 @0x5
0x380c…3812 }
0x3812…381a c571 6530 EXEC HD
0x3812…381a LineComalBin {
0x3812…381a ptr = 0xc571 // 0x3812 @0x0
0x3812…381a lno = 0x1982 // 0x3814 @0x2
0x3812…381a at0004 = ╱9d╱ EXEC ╱ // 0x3816 @0x4
0x3812…381a at0005 = ╱48╱H╱ // 0x3817 @0x5
0x3812…381a at0006 = ╱44╱D╱ // 0x3818 @0x6
0x3812…381a at0007 = EOL // 0x3819 @0x7
0x3812…381a }
0x381a…3820 c577 6540 ENDIF
0x381a…3820 LineComalBin {
0x381a…3820 ptr = 0xc577 // 0x381a @0x0
0x381a…3820 lno = 0x198c // 0x381c @0x2
0x381a…3820 at0004 = ╱9b╱ ENDIF ╱ // 0x381e @0x4
0x381a…3820 at0005 = EOL // 0x381f @0x5
0x381a…3820 }
0x3820…3826 c57d 6550 ELSE
0x3820…3826 LineComalBin {
0x3820…3826 ptr = 0xc57d // 0x3820 @0x0
0x3820…3826 lno = 0x1996 // 0x3822 @0x2
0x3820…3826 at0004 = ╱9a╱ ELSE ╱ // 0x3824 @0x4
0x3820…3826 at0005 = EOL // 0x3825 @0x5
0x3820…3826 }
0x3826…3838 c58f 6560 DIVD=E;CEKS=B
0x3826…3838 LineComalBin {
0x3826…3838 ptr = 0xc58f // 0x3826 @0x0
0x3826…3838 lno = 0x19a0 // 0x3828 @0x2
0x3826…3838 at0004 = ╱44╱D╱ // 0x382a @0x4
0x3826…3838 at0005 = ╱49╱I╱ // 0x382b @0x5
0x3826…3838 at0006 = ╱56╱V╱ // 0x382c @0x6
0x3826…3838 at0007 = ╱44╱D╱ // 0x382d @0x7
0x3826…3838 at0008 = ╱dc╱=╱ // 0x382e @0x8
0x3826…3838 at0009 = ╱45╱E╱ // 0x382f @0x9
0x3826…3838 at000a = ╱eb╱;╱ // 0x3830 @0xa
0x3826…3838 at000b = ╱43╱C╱ // 0x3831 @0xb
0x3826…3838 at000c = ╱45╱E╱ // 0x3832 @0xc
0x3826…3838 at000d = ╱4b╱K╱ // 0x3833 @0xd
0x3826…3838 at000e = ╱53╱S╱ // 0x3834 @0xe
0x3826…3838 at000f = ╱dc╱=╱ // 0x3835 @0xf
0x3826…3838 at0010 = ╱42╱B╱ // 0x3836 @0x10
0x3826…3838 at0011 = EOL // 0x3837 @0x11
0x3826…3838 }
0x3838…3869 c5c0 6570 EXEC FPOST1(DTAB1,DTAB,MDANTAL,DIVDNR,DPIL3,K2$)
0x3838…3869 LineComalBin {
0x3838…3869 ptr = 0xc5c0 // 0x3838 @0x0
0x3838…3869 lno = 0x19aa // 0x383a @0x2
0x3838…3869 at0004 = ╱9d╱ EXEC ╱ // 0x383c @0x4
0x3838…3869 at0005 = ╱46╱F╱ // 0x383d @0x5
0x3838…3869 at0006 = ╱50╱P╱ // 0x383e @0x6
0x3838…3869 at0007 = ╱4f╱O╱ // 0x383f @0x7
0x3838…3869 at0008 = ╱53╱S╱ // 0x3840 @0x8
0x3838…3869 at0009 = ╱54╱T╱ // 0x3841 @0x9
0x3838…3869 at000a = ╱31╱1╱ // 0x3842 @0xa
0x3838…3869 at000b = ╱ed╱(╱ // 0x3843 @0xb
0x3838…3869 at000c = ╱44╱D╱ // 0x3844 @0xc
0x3838…3869 at000d = ╱54╱T╱ // 0x3845 @0xd
0x3838…3869 at000e = ╱41╱A╱ // 0x3846 @0xe
0x3838…3869 at000f = ╱42╱B╱ // 0x3847 @0xf
0x3838…3869 at0010 = ╱31╱1╱ // 0x3848 @0x10
0x3838…3869 at0011 = ╱ec╱,╱ // 0x3849 @0x11
0x3838…3869 at0012 = ╱44╱D╱ // 0x384a @0x12
0x3838…3869 at0013 = ╱54╱T╱ // 0x384b @0x13
0x3838…3869 at0014 = ╱41╱A╱ // 0x384c @0x14
0x3838…3869 at0015 = ╱42╱B╱ // 0x384d @0x15
0x3838…3869 at0016 = ╱ec╱,╱ // 0x384e @0x16
0x3838…3869 at0017 = ╱4d╱M╱ // 0x384f @0x17
0x3838…3869 at0018 = ╱44╱D╱ // 0x3850 @0x18
0x3838…3869 at0019 = ╱41╱A╱ // 0x3851 @0x19
0x3838…3869 at001a = ╱4e╱N╱ // 0x3852 @0x1a
0x3838…3869 at001b = ╱54╱T╱ // 0x3853 @0x1b
0x3838…3869 at001c = ╱41╱A╱ // 0x3854 @0x1c
0x3838…3869 at001d = ╱4c╱L╱ // 0x3855 @0x1d
0x3838…3869 at001e = ╱ec╱,╱ // 0x3856 @0x1e
0x3838…3869 at001f = ╱44╱D╱ // 0x3857 @0x1f
0x3838…3869 at0020 = ╱49╱I╱ // 0x3858 @0x20
0x3838…3869 at0021 = ╱56╱V╱ // 0x3859 @0x21
0x3838…3869 at0022 = ╱44╱D╱ // 0x385a @0x22
0x3838…3869 at0023 = ╱4e╱N╱ // 0x385b @0x23
0x3838…3869 at0024 = ╱52╱R╱ // 0x385c @0x24
0x3838…3869 at0025 = ╱ec╱,╱ // 0x385d @0x25
0x3838…3869 at0026 = ╱44╱D╱ // 0x385e @0x26
0x3838…3869 at0027 = ╱50╱P╱ // 0x385f @0x27
0x3838…3869 at0028 = ╱49╱I╱ // 0x3860 @0x28
0x3838…3869 at0029 = ╱4c╱L╱ // 0x3861 @0x29
0x3838…3869 at002a = ╱33╱3╱ // 0x3862 @0x2a
0x3838…3869 at002b = ╱ec╱,╱ // 0x3863 @0x2b
0x3838…3869 at002c = ╱4b╱K╱ // 0x3864 @0x2c
0x3838…3869 at002d = ╱32╱2╱ // 0x3865 @0x2d
0x3838…3869 at002e = ╱ef╱$╱ // 0x3866 @0x2e
0x3838…3869 at002f = ╱ee╱)╱ // 0x3867 @0x2f
0x3838…3869 at0030 = EOL // 0x3868 @0x30
0x3838…3869 }
0x3869…3877 c5ce 6580 IF CEKS=E THEN STOP
0x3869…3877 LineComalBin {
0x3869…3877 ptr = 0xc5ce // 0x3869 @0x0
0x3869…3877 lno = 0x19b4 // 0x386b @0x2
0x3869…3877 at0004 = ╱82╱ IF ╱ // 0x386d @0x4
0x3869…3877 at0005 = ╱43╱C╱ // 0x386e @0x5
0x3869…3877 at0006 = ╱45╱E╱ // 0x386f @0x6
0x3869…3877 at0007 = ╱4b╱K╱ // 0x3870 @0x7
0x3869…3877 at0008 = ╱53╱S╱ // 0x3871 @0x8
0x3869…3877 at0009 = ╱dc╱=╱ // 0x3872 @0x9
0x3869…3877 at000a = ╱45╱E╱ // 0x3873 @0xa
0x3869…3877 at000b = ╱b6╱ THEN ╱ // 0x3874 @0xb
0x3869…3877 at000c = ╱8d╱ STOP ╱ // 0x3875 @0xc
0x3869…3877 at000d = EOL // 0x3876 @0xd
0x3869…3877 }
0x3877…387f c5d6 6590 EXEC HD
0x3877…387f LineComalBin {
0x3877…387f ptr = 0xc5d6 // 0x3877 @0x0
0x3877…387f lno = 0x19be // 0x3879 @0x2
0x3877…387f at0004 = ╱9d╱ EXEC ╱ // 0x387b @0x4
0x3877…387f at0005 = ╱48╱H╱ // 0x387c @0x5
0x3877…387f at0006 = ╱44╱D╱ // 0x387d @0x6
0x3877…387f at0007 = EOL // 0x387e @0x7
0x3877…387f }
0x387f…3893 c5ea 6600 CURSOR 34,5
0x387f…3893 LineComalBin {
0x387f…3893 ptr = 0xc5ea // 0x387f @0x0
0x387f…3893 lno = 0x19c8 // 0x3881 @0x2
0x387f…3893 at0004 = ╱a1╱ CURSOR ╱ // 0x3883 @0x4
0x387f…3893 at0005 = ╱33╱3╱ // 0x3884 @0x5
0x387f…3893 at0006 = ╱34╱4╱ // 0x3885 @0x6
0x387f…3893 at0007 = ╱fe00008806╱ // 0x3886 @0x7
0x387f…3893 at000c = ╱ec╱,╱ // 0x388b @0xc
0x387f…3893 at000d = ╱35╱5╱ // 0x388c @0xd
0x387f…3893 at000e = ╱fe0000a003╱ // 0x388d @0xe
0x387f…3893 at0013 = EOL // 0x3892 @0x13
0x387f…3893 }
0x3893…38a0 c5f7 6610 PRINT "Navn."
0x3893…38a0 LineComalBin {
0x3893…38a0 ptr = 0xc5f7 // 0x3893 @0x0
0x3893…38a0 lno = 0x19d2 // 0x3895 @0x2
0x3893…38a0 at0004 = ╱92╱ PRINT ╱ // 0x3897 @0x4
0x3893…38a0 at0005 = ╱22╱"╱ // 0x3898 @0x5
0x3893…38a0 at0006 = ╱4e╱N╱ // 0x3899 @0x6
0x3893…38a0 at0007 = ╱61╱a╱ // 0x389a @0x7
0x3893…38a0 at0008 = ╱76╱v╱ // 0x389b @0x8
0x3893…38a0 at0009 = ╱6e╱n╱ // 0x389c @0x9
0x3893…38a0 at000a = ╱2e╱.╱ // 0x389d @0xa
0x3893…38a0 at000b = ╱22╱"╱ // 0x389e @0xb
0x3893…38a0 at000c = EOL // 0x389f @0xc
0x3893…38a0 }
0x38a0…38b3 c60a 6620 CURSOR 8,5
0x38a0…38b3 LineComalBin {
0x38a0…38b3 ptr = 0xc60a // 0x38a0 @0x0
0x38a0…38b3 lno = 0x19dc // 0x38a2 @0x2
0x38a0…38b3 at0004 = ╱a1╱ CURSOR ╱ // 0x38a4 @0x4
0x38a0…38b3 at0005 = ╱38╱8╱ // 0x38a5 @0x5
0x38a0…38b3 at0006 = ╱fe00008004╱ // 0x38a6 @0x6
0x38a0…38b3 at000b = ╱ec╱,╱ // 0x38ab @0xb
0x38a0…38b3 at000c = ╱35╱5╱ // 0x38ac @0xc
0x38a0…38b3 at000d = ╱fe0000a003╱ // 0x38ad @0xd
0x38a0…38b3 at0012 = EOL // 0x38b2 @0x12
0x38a0…38b3 }
0x38b3…38c3 c61a 6630 INPUT " ",DNAVN$
0x38b3…38c3 LineComalBin {
0x38b3…38c3 ptr = 0xc61a // 0x38b3 @0x0
0x38b3…38c3 lno = 0x19e6 // 0x38b5 @0x2
0x38b3…38c3 at0004 = ╱91╱ INPUT ╱ // 0x38b7 @0x4
0x38b3…38c3 at0005 = ╱22╱"╱ // 0x38b8 @0x5
0x38b3…38c3 at0006 = ╱20╱…╱ // 0x38b9 @0x6
0x38b3…38c3 at0007 = ╱22╱"╱ // 0x38ba @0x7
0x38b3…38c3 at0008 = ╱ec╱,╱ // 0x38bb @0x8
0x38b3…38c3 at0009 = ╱44╱D╱ // 0x38bc @0x9
0x38b3…38c3 at000a = ╱4e╱N╱ // 0x38bd @0xa
0x38b3…38c3 at000b = ╱41╱A╱ // 0x38be @0xb
0x38b3…38c3 at000c = ╱56╱V╱ // 0x38bf @0xc
0x38b3…38c3 at000d = ╱4e╱N╱ // 0x38c0 @0xd
0x38b3…38c3 at000e = ╱ef╱$╱ // 0x38c1 @0xe
0x38b3…38c3 at000f = EOL // 0x38c2 @0xf
0x38b3…38c3 }
0x38c3…38d1 c628 6640 CURSOR W,5
0x38c3…38d1 LineComalBin {
0x38c3…38d1 ptr = 0xc628 // 0x38c3 @0x0
0x38c3…38d1 lno = 0x19f0 // 0x38c5 @0x2
0x38c3…38d1 at0004 = ╱a1╱ CURSOR ╱ // 0x38c7 @0x4
0x38c3…38d1 at0005 = ╱57╱W╱ // 0x38c8 @0x5
0x38c3…38d1 at0006 = ╱ec╱,╱ // 0x38c9 @0x6
0x38c3…38d1 at0007 = ╱35╱5╱ // 0x38ca @0x7
0x38c3…38d1 at0008 = ╱fe0000a003╱ // 0x38cb @0x8
0x38c3…38d1 at000d = EOL // 0x38d0 @0xd
0x38c3…38d1 }
0x38d1…38ec c643 6650 PRINT DNAVN$;BK$(E:25)
0x38d1…38ec LineComalBin {
0x38d1…38ec ptr = 0xc643 // 0x38d1 @0x0
0x38d1…38ec lno = 0x19fa // 0x38d3 @0x2
0x38d1…38ec at0004 = ╱92╱ PRINT ╱ // 0x38d5 @0x4
0x38d1…38ec at0005 = ╱44╱D╱ // 0x38d6 @0x5
0x38d1…38ec at0006 = ╱4e╱N╱ // 0x38d7 @0x6
0x38d1…38ec at0007 = ╱41╱A╱ // 0x38d8 @0x7
0x38d1…38ec at0008 = ╱56╱V╱ // 0x38d9 @0x8
0x38d1…38ec at0009 = ╱4e╱N╱ // 0x38da @0x9
0x38d1…38ec at000a = ╱ef╱$╱ // 0x38db @0xa
0x38d1…38ec at000b = ╱eb╱;╱ // 0x38dc @0xb
0x38d1…38ec at000c = ╱42╱B╱ // 0x38dd @0xc
0x38d1…38ec at000d = ╱4b╱K╱ // 0x38de @0xd
0x38d1…38ec at000e = ╱ef╱$╱ // 0x38df @0xe
0x38d1…38ec at000f = ╱ed╱(╱ // 0x38e0 @0xf
0x38d1…38ec at0010 = ╱45╱E╱ // 0x38e1 @0x10
0x38d1…38ec at0011 = ╱f0╱:╱ // 0x38e2 @0x11
0x38d1…38ec at0012 = ╱32╱2╱ // 0x38e3 @0x12
0x38d1…38ec at0013 = ╱35╱5╱ // 0x38e4 @0x13
0x38d1…38ec at0014 = ╱fe0000c805╱ // 0x38e5 @0x14
0x38d1…38ec at0019 = ╱ee╱)╱ // 0x38ea @0x19
0x38d1…38ec at001a = EOL // 0x38eb @0x1a
0x38d1…38ec }
0x38ec…3900 c657 6660 CURSOR 34,6
0x38ec…3900 LineComalBin {
0x38ec…3900 ptr = 0xc657 // 0x38ec @0x0
0x38ec…3900 lno = 0x1a04 // 0x38ee @0x2
0x38ec…3900 at0004 = ╱a1╱ CURSOR ╱ // 0x38f0 @0x4
0x38ec…3900 at0005 = ╱33╱3╱ // 0x38f1 @0x5
0x38ec…3900 at0006 = ╱34╱4╱ // 0x38f2 @0x6
0x38ec…3900 at0007 = ╱fe00008806╱ // 0x38f3 @0x7
0x38ec…3900 at000c = ╱ec╱,╱ // 0x38f8 @0xc
0x38ec…3900 at000d = ╱36╱6╱ // 0x38f9 @0xd
0x38ec…3900 at000e = ╱fe0000c003╱ // 0x38fa @0xe
0x38ec…3900 at0013 = EOL // 0x38ff @0x13
0x38ec…3900 }
0x3900…390d c664 6670 PRINT "Gade."
0x3900…390d LineComalBin {
0x3900…390d ptr = 0xc664 // 0x3900 @0x0
0x3900…390d lno = 0x1a0e // 0x3902 @0x2
0x3900…390d at0004 = ╱92╱ PRINT ╱ // 0x3904 @0x4
0x3900…390d at0005 = ╱22╱"╱ // 0x3905 @0x5
0x3900…390d at0006 = ╱47╱G╱ // 0x3906 @0x6
0x3900…390d at0007 = ╱61╱a╱ // 0x3907 @0x7
0x3900…390d at0008 = ╱64╱d╱ // 0x3908 @0x8
0x3900…390d at0009 = ╱65╱e╱ // 0x3909 @0x9
0x3900…390d at000a = ╱2e╱.╱ // 0x390a @0xa
0x3900…390d at000b = ╱22╱"╱ // 0x390b @0xb
0x3900…390d at000c = EOL // 0x390c @0xc
0x3900…390d }
0x390d…3920 c677 6680 CURSOR 8,6
0x390d…3920 LineComalBin {
0x390d…3920 ptr = 0xc677 // 0x390d @0x0
0x390d…3920 lno = 0x1a18 // 0x390f @0x2
0x390d…3920 at0004 = ╱a1╱ CURSOR ╱ // 0x3911 @0x4
0x390d…3920 at0005 = ╱38╱8╱ // 0x3912 @0x5
0x390d…3920 at0006 = ╱fe00008004╱ // 0x3913 @0x6
0x390d…3920 at000b = ╱ec╱,╱ // 0x3918 @0xb
0x390d…3920 at000c = ╱36╱6╱ // 0x3919 @0xc
0x390d…3920 at000d = ╱fe0000c003╱ // 0x391a @0xd
0x390d…3920 at0012 = EOL // 0x391f @0x12
0x390d…3920 }
0x3920…3930 c687 6690 INPUT " ",DGADE$
0x3920…3930 LineComalBin {
0x3920…3930 ptr = 0xc687 // 0x3920 @0x0
0x3920…3930 lno = 0x1a22 // 0x3922 @0x2
0x3920…3930 at0004 = ╱91╱ INPUT ╱ // 0x3924 @0x4
0x3920…3930 at0005 = ╱22╱"╱ // 0x3925 @0x5
0x3920…3930 at0006 = ╱20╱…╱ // 0x3926 @0x6
0x3920…3930 at0007 = ╱22╱"╱ // 0x3927 @0x7
0x3920…3930 at0008 = ╱ec╱,╱ // 0x3928 @0x8
0x3920…3930 at0009 = ╱44╱D╱ // 0x3929 @0x9
0x3920…3930 at000a = ╱47╱G╱ // 0x392a @0xa
0x3920…3930 at000b = ╱41╱A╱ // 0x392b @0xb
0x3920…3930 at000c = ╱44╱D╱ // 0x392c @0xc
0x3920…3930 at000d = ╱45╱E╱ // 0x392d @0xd
0x3920…3930 at000e = ╱ef╱$╱ // 0x392e @0xe
0x3920…3930 at000f = EOL // 0x392f @0xf
0x3920…3930 }
0x3930…393e c695 6700 CURSOR W,6
0x3930…393e LineComalBin {
0x3930…393e ptr = 0xc695 // 0x3930 @0x0
0x3930…393e lno = 0x1a2c // 0x3932 @0x2
0x3930…393e at0004 = ╱a1╱ CURSOR ╱ // 0x3934 @0x4
0x3930…393e at0005 = ╱57╱W╱ // 0x3935 @0x5
0x3930…393e at0006 = ╱ec╱,╱ // 0x3936 @0x6
0x3930…393e at0007 = ╱36╱6╱ // 0x3937 @0x7
0x3930…393e at0008 = ╱fe0000c003╱ // 0x3938 @0x8
0x3930…393e at000d = EOL // 0x393d @0xd
0x3930…393e }
0x393e…3959 c6b0 6710 PRINT DGADE$;BK$(E:25)
0x393e…3959 LineComalBin {
0x393e…3959 ptr = 0xc6b0 // 0x393e @0x0
0x393e…3959 lno = 0x1a36 // 0x3940 @0x2
0x393e…3959 at0004 = ╱92╱ PRINT ╱ // 0x3942 @0x4
0x393e…3959 at0005 = ╱44╱D╱ // 0x3943 @0x5
0x393e…3959 at0006 = ╱47╱G╱ // 0x3944 @0x6
0x393e…3959 at0007 = ╱41╱A╱ // 0x3945 @0x7
0x393e…3959 at0008 = ╱44╱D╱ // 0x3946 @0x8
0x393e…3959 at0009 = ╱45╱E╱ // 0x3947 @0x9
0x393e…3959 at000a = ╱ef╱$╱ // 0x3948 @0xa
0x393e…3959 at000b = ╱eb╱;╱ // 0x3949 @0xb
0x393e…3959 at000c = ╱42╱B╱ // 0x394a @0xc
0x393e…3959 at000d = ╱4b╱K╱ // 0x394b @0xd
0x393e…3959 at000e = ╱ef╱$╱ // 0x394c @0xe
0x393e…3959 at000f = ╱ed╱(╱ // 0x394d @0xf
0x393e…3959 at0010 = ╱45╱E╱ // 0x394e @0x10
0x393e…3959 at0011 = ╱f0╱:╱ // 0x394f @0x11
0x393e…3959 at0012 = ╱32╱2╱ // 0x3950 @0x12
0x393e…3959 at0013 = ╱35╱5╱ // 0x3951 @0x13
0x393e…3959 at0014 = ╱fe0000c805╱ // 0x3952 @0x14
0x393e…3959 at0019 = ╱ee╱)╱ // 0x3957 @0x19
0x393e…3959 at001a = EOL // 0x3958 @0x1a
0x393e…3959 }
0x3959…396d c6c4 6720 CURSOR 13,7
0x3959…396d LineComalBin {
0x3959…396d ptr = 0xc6c4 // 0x3959 @0x0
0x3959…396d lno = 0x1a40 // 0x395b @0x2
0x3959…396d at0004 = ╱a1╱ CURSOR ╱ // 0x395d @0x4
0x3959…396d at0005 = ╱31╱1╱ // 0x395e @0x5
0x3959…396d at0006 = ╱33╱3╱ // 0x395f @0x6
0x3959…396d at0007 = ╱fe0000d004╱ // 0x3960 @0x7
0x3959…396d at000c = ╱ec╱,╱ // 0x3965 @0xc
0x3959…396d at000d = ╱37╱7╱ // 0x3966 @0xd
0x3959…396d at000e = ╱fe0000e003╱ // 0x3967 @0xe
0x3959…396d at0013 = EOL // 0x396c @0x13
0x3959…396d }
0x396d…3980 c6d7 6730 PRINT "Postnummer."
0x396d…3980 LineComalBin {
0x396d…3980 ptr = 0xc6d7 // 0x396d @0x0
0x396d…3980 lno = 0x1a4a // 0x396f @0x2
0x396d…3980 at0004 = ╱92╱ PRINT ╱ // 0x3971 @0x4
0x396d…3980 at0005 = ╱22╱"╱ // 0x3972 @0x5
0x396d…3980 at0006 = ╱50╱P╱ // 0x3973 @0x6
0x396d…3980 at0007 = ╱6f╱o╱ // 0x3974 @0x7
0x396d…3980 at0008 = ╱73╱s╱ // 0x3975 @0x8
0x396d…3980 at0009 = ╱74╱t╱ // 0x3976 @0x9
0x396d…3980 at000a = ╱6e╱n╱ // 0x3977 @0xa
0x396d…3980 at000b = ╱75╱u╱ // 0x3978 @0xb
0x396d…3980 at000c = ╱6d╱m╱ // 0x3979 @0xc
0x396d…3980 at000d = ╱6d╱m╱ // 0x397a @0xd
0x396d…3980 at000e = ╱65╱e╱ // 0x397b @0xe
0x396d…3980 at000f = ╱72╱r╱ // 0x397c @0xf
0x396d…3980 at0010 = ╱2e╱.╱ // 0x397d @0x10
0x396d…3980 at0011 = ╱22╱"╱ // 0x397e @0x11
0x396d…3980 at0012 = EOL // 0x397f @0x12
0x396d…3980 }
0x3980…3986 c6dd 6740 REPEAT
0x3980…3986 LineComalBin {
0x3980…3986 ptr = 0xc6dd // 0x3980 @0x0
0x3980…3986 lno = 0x1a54 // 0x3982 @0x2
0x3980…3986 at0004 = ╱97╱ REPEAT ╱ // 0x3984 @0x4
0x3980…3986 at0005 = EOL // 0x3985 @0x5
0x3980…3986 }
0x3986…3999 c6f0 6750 CURSOR 8,7
0x3986…3999 LineComalBin {
0x3986…3999 ptr = 0xc6f0 // 0x3986 @0x0
0x3986…3999 lno = 0x1a5e // 0x3988 @0x2
0x3986…3999 at0004 = ╱a1╱ CURSOR ╱ // 0x398a @0x4
0x3986…3999 at0005 = ╱38╱8╱ // 0x398b @0x5
0x3986…3999 at0006 = ╱fe00008004╱ // 0x398c @0x6
0x3986…3999 at000b = ╱ec╱,╱ // 0x3991 @0xb
0x3986…3999 at000c = ╱37╱7╱ // 0x3992 @0xc
0x3986…3999 at000d = ╱fe0000e003╱ // 0x3993 @0xd
0x3986…3999 at0012 = EOL // 0x3998 @0x12
0x3986…3999 }
0x3999…39a8 c6ff 6760 INPUT " ",TAL1$
0x3999…39a8 LineComalBin {
0x3999…39a8 ptr = 0xc6ff // 0x3999 @0x0
0x3999…39a8 lno = 0x1a68 // 0x399b @0x2
0x3999…39a8 at0004 = ╱91╱ INPUT ╱ // 0x399d @0x4
0x3999…39a8 at0005 = ╱22╱"╱ // 0x399e @0x5
0x3999…39a8 at0006 = ╱20╱…╱ // 0x399f @0x6
0x3999…39a8 at0007 = ╱22╱"╱ // 0x39a0 @0x7
0x3999…39a8 at0008 = ╱ec╱,╱ // 0x39a1 @0x8
0x3999…39a8 at0009 = ╱54╱T╱ // 0x39a2 @0x9
0x3999…39a8 at000a = ╱41╱A╱ // 0x39a3 @0xa
0x3999…39a8 at000b = ╱4c╱L╱ // 0x39a4 @0xb
0x3999…39a8 at000c = ╱31╱1╱ // 0x39a5 @0xc
0x3999…39a8 at000d = ╱ef╱$╱ // 0x39a6 @0xd
0x3999…39a8 at000e = EOL // 0x39a7 @0xe
0x3999…39a8 }
0x39a8…39b8 c70f 6770 EXEC NRT(TAL1$)
0x39a8…39b8 LineComalBin {
0x39a8…39b8 ptr = 0xc70f // 0x39a8 @0x0
0x39a8…39b8 lno = 0x1a72 // 0x39aa @0x2
0x39a8…39b8 at0004 = ╱9d╱ EXEC ╱ // 0x39ac @0x4
0x39a8…39b8 at0005 = ╱4e╱N╱ // 0x39ad @0x5
0x39a8…39b8 at0006 = ╱52╱R╱ // 0x39ae @0x6
0x39a8…39b8 at0007 = ╱54╱T╱ // 0x39af @0x7
0x39a8…39b8 at0008 = ╱ed╱(╱ // 0x39b0 @0x8
0x39a8…39b8 at0009 = ╱54╱T╱ // 0x39b1 @0x9
0x39a8…39b8 at000a = ╱41╱A╱ // 0x39b2 @0xa
0x39a8…39b8 at000b = ╱4c╱L╱ // 0x39b3 @0xb
0x39a8…39b8 at000c = ╱31╱1╱ // 0x39b4 @0xc
0x39a8…39b8 at000d = ╱ef╱$╱ // 0x39b5 @0xd
0x39a8…39b8 at000e = ╱ee╱)╱ // 0x39b6 @0xe
0x39a8…39b8 at000f = EOL // 0x39b7 @0xf
0x39a8…39b8 }
0x39b8…39d0 c727 6780 UNTIL TEST2=B AND P>999
0x39b8…39d0 LineComalBin {
0x39b8…39d0 ptr = 0xc727 // 0x39b8 @0x0
0x39b8…39d0 lno = 0x1a7c // 0x39ba @0x2
0x39b8…39d0 at0004 = ╱98╱ UNTIL ╱ // 0x39bc @0x4
0x39b8…39d0 at0005 = ╱54╱T╱ // 0x39bd @0x5
0x39b8…39d0 at0006 = ╱45╱E╱ // 0x39be @0x6
0x39b8…39d0 at0007 = ╱53╱S╱ // 0x39bf @0x7
0x39b8…39d0 at0008 = ╱54╱T╱ // 0x39c0 @0x8
0x39b8…39d0 at0009 = ╱32╱2╱ // 0x39c1 @0x9
0x39b8…39d0 at000a = ╱dc╱=╱ // 0x39c2 @0xa
0x39b8…39d0 at000b = ╱42╱B╱ // 0x39c3 @0xb
0x39b8…39d0 at000c = ╱da╱ AND ╱ // 0x39c4 @0xc
0x39b8…39d0 at000d = ╱50╱P╱ // 0x39c5 @0xd
0x39b8…39d0 at000e = ╱de╱>╱ // 0x39c6 @0xe
0x39b8…39d0 at000f = ╱39╱9╱ // 0x39c7 @0xf
0x39b8…39d0 at0010 = ╱39╱9╱ // 0x39c8 @0x10
0x39b8…39d0 at0011 = ╱39╱9╱ // 0x39c9 @0x11
0x39b8…39d0 at0012 = ╱fe00c0f90a╱ // 0x39ca @0x12
0x39b8…39d0 at0017 = EOL // 0x39cf @0x17
0x39b8…39d0 }
0x39d0…39de c735 6790 DPOSTNR=P
0x39d0…39de LineComalBin {
0x39d0…39de ptr = 0xc735 // 0x39d0 @0x0
0x39d0…39de lno = 0x1a86 // 0x39d2 @0x2
0x39d0…39de at0004 = ╱44╱D╱ // 0x39d4 @0x4
0x39d0…39de at0005 = ╱50╱P╱ // 0x39d5 @0x5
0x39d0…39de at0006 = ╱4f╱O╱ // 0x39d6 @0x6
0x39d0…39de at0007 = ╱53╱S╱ // 0x39d7 @0x7
0x39d0…39de at0008 = ╱54╱T╱ // 0x39d8 @0x8
0x39d0…39de at0009 = ╱4e╱N╱ // 0x39d9 @0x9
0x39d0…39de at000a = ╱52╱R╱ // 0x39da @0xa
0x39d0…39de at000b = ╱dc╱=╱ // 0x39db @0xb
0x39d0…39de at000c = ╱50╱P╱ // 0x39dc @0xc
0x39d0…39de at000d = EOL // 0x39dd @0xd
0x39d0…39de }
0x39de…39f2 c749 6800 CURSOR 13,7
0x39de…39f2 LineComalBin {
0x39de…39f2 ptr = 0xc749 // 0x39de @0x0
0x39de…39f2 lno = 0x1a90 // 0x39e0 @0x2
0x39de…39f2 at0004 = ╱a1╱ CURSOR ╱ // 0x39e2 @0x4
0x39de…39f2 at0005 = ╱31╱1╱ // 0x39e3 @0x5
0x39de…39f2 at0006 = ╱33╱3╱ // 0x39e4 @0x6
0x39de…39f2 at0007 = ╱fe0000d004╱ // 0x39e5 @0x7
0x39de…39f2 at000c = ╱ec╱,╱ // 0x39ea @0xc
0x39de…39f2 at000d = ╱37╱7╱ // 0x39eb @0xd
0x39de…39f2 at000e = ╱fe0000e003╱ // 0x39ec @0xe
0x39de…39f2 at0013 = EOL // 0x39f1 @0x13
0x39de…39f2 }
0x39f2…3a17 c76e 6810 PRINT BK$(E:25);TAB(22);"By."
0x39f2…3a17 LineComalBin {
0x39f2…3a17 ptr = 0xc76e // 0x39f2 @0x0
0x39f2…3a17 lno = 0x1a9a // 0x39f4 @0x2
0x39f2…3a17 at0004 = ╱92╱ PRINT ╱ // 0x39f6 @0x4
0x39f2…3a17 at0005 = ╱42╱B╱ // 0x39f7 @0x5
0x39f2…3a17 at0006 = ╱4b╱K╱ // 0x39f8 @0x6
0x39f2…3a17 at0007 = ╱ef╱$╱ // 0x39f9 @0x7
0x39f2…3a17 at0008 = ╱ed╱(╱ // 0x39fa @0x8
0x39f2…3a17 at0009 = ╱45╱E╱ // 0x39fb @0x9
0x39f2…3a17 at000a = ╱f0╱:╱ // 0x39fc @0xa
0x39f2…3a17 at000b = ╱32╱2╱ // 0x39fd @0xb
0x39f2…3a17 at000c = ╱35╱5╱ // 0x39fe @0xc
0x39f2…3a17 at000d = ╱fe0000c805╱ // 0x39ff @0xd
0x39f2…3a17 at0012 = ╱ee╱)╱ // 0x3a04 @0x12
0x39f2…3a17 at0013 = ╱eb╱;╱ // 0x3a05 @0x13
0x39f2…3a17 at0014 = ╱d2╱TAB╱ // 0x3a06 @0x14
0x39f2…3a17 at0015 = ╱ed╱(╱ // 0x3a07 @0x15
0x39f2…3a17 at0016 = ╱32╱2╱ // 0x3a08 @0x16
0x39f2…3a17 at0017 = ╱32╱2╱ // 0x3a09 @0x17
0x39f2…3a17 at0018 = ╱fe0000b005╱ // 0x3a0a @0x18
0x39f2…3a17 at001d = ╱ee╱)╱ // 0x3a0f @0x1d
0x39f2…3a17 at001e = ╱eb╱;╱ // 0x3a10 @0x1e
0x39f2…3a17 at001f = ╱22╱"╱ // 0x3a11 @0x1f
0x39f2…3a17 at0020 = ╱42╱B╱ // 0x3a12 @0x20
0x39f2…3a17 at0021 = ╱79╱y╱ // 0x3a13 @0x21
0x39f2…3a17 at0022 = ╱2e╱.╱ // 0x3a14 @0x22
0x39f2…3a17 at0023 = ╱22╱"╱ // 0x3a15 @0x23
0x39f2…3a17 at0024 = EOL // 0x3a16 @0x24
0x39f2…3a17 }
0x3a17…3a2b c782 6820 CURSOR 13,7
0x3a17…3a2b LineComalBin {
0x3a17…3a2b ptr = 0xc782 // 0x3a17 @0x0
0x3a17…3a2b lno = 0x1aa4 // 0x3a19 @0x2
0x3a17…3a2b at0004 = ╱a1╱ CURSOR ╱ // 0x3a1b @0x4
0x3a17…3a2b at0005 = ╱31╱1╱ // 0x3a1c @0x5
0x3a17…3a2b at0006 = ╱33╱3╱ // 0x3a1d @0x6
0x3a17…3a2b at0007 = ╱fe0000d004╱ // 0x3a1e @0x7
0x3a17…3a2b at000c = ╱ec╱,╱ // 0x3a23 @0xc
0x3a17…3a2b at000d = ╱37╱7╱ // 0x3a24 @0xd
0x3a17…3a2b at000e = ╱fe0000e003╱ // 0x3a25 @0xe
0x3a17…3a2b at0013 = EOL // 0x3a2a @0x13
0x3a17…3a2b }
0x3a2b…3a39 c790 6830 INPUT " ",DBY$
0x3a2b…3a39 LineComalBin {
0x3a2b…3a39 ptr = 0xc790 // 0x3a2b @0x0
0x3a2b…3a39 lno = 0x1aae // 0x3a2d @0x2
0x3a2b…3a39 at0004 = ╱91╱ INPUT ╱ // 0x3a2f @0x4
0x3a2b…3a39 at0005 = ╱22╱"╱ // 0x3a30 @0x5
0x3a2b…3a39 at0006 = ╱20╱…╱ // 0x3a31 @0x6
0x3a2b…3a39 at0007 = ╱22╱"╱ // 0x3a32 @0x7
0x3a2b…3a39 at0008 = ╱ec╱,╱ // 0x3a33 @0x8
0x3a2b…3a39 at0009 = ╱44╱D╱ // 0x3a34 @0x9
0x3a2b…3a39 at000a = ╱42╱B╱ // 0x3a35 @0xa
0x3a2b…3a39 at000b = ╱59╱Y╱ // 0x3a36 @0xb
0x3a2b…3a39 at000c = ╱ef╱$╱ // 0x3a37 @0xc
0x3a2b…3a39 at000d = EOL // 0x3a38 @0xd
0x3a2b…3a39 }
0x3a39…3a4d c7a4 6840 CURSOR 34,7
0x3a39…3a4d LineComalBin {
0x3a39…3a4d ptr = 0xc7a4 // 0x3a39 @0x0
0x3a39…3a4d lno = 0x1ab8 // 0x3a3b @0x2
0x3a39…3a4d at0004 = ╱a1╱ CURSOR ╱ // 0x3a3d @0x4
0x3a39…3a4d at0005 = ╱33╱3╱ // 0x3a3e @0x5
0x3a39…3a4d at0006 = ╱34╱4╱ // 0x3a3f @0x6
0x3a39…3a4d at0007 = ╱fe00008806╱ // 0x3a40 @0x7
0x3a39…3a4d at000c = ╱ec╱,╱ // 0x3a45 @0xc
0x3a39…3a4d at000d = ╱37╱7╱ // 0x3a46 @0xd
0x3a39…3a4d at000e = ╱fe0000e003╱ // 0x3a47 @0xe
0x3a39…3a4d at0013 = EOL // 0x3a4c @0x13
0x3a39…3a4d }
0x3a4d…3a61 c7b8 6850 PRINT BK$(E:25)
0x3a4d…3a61 LineComalBin {
0x3a4d…3a61 ptr = 0xc7b8 // 0x3a4d @0x0
0x3a4d…3a61 lno = 0x1ac2 // 0x3a4f @0x2
0x3a4d…3a61 at0004 = ╱92╱ PRINT ╱ // 0x3a51 @0x4
0x3a4d…3a61 at0005 = ╱42╱B╱ // 0x3a52 @0x5
0x3a4d…3a61 at0006 = ╱4b╱K╱ // 0x3a53 @0x6
0x3a4d…3a61 at0007 = ╱ef╱$╱ // 0x3a54 @0x7
0x3a4d…3a61 at0008 = ╱ed╱(╱ // 0x3a55 @0x8
0x3a4d…3a61 at0009 = ╱45╱E╱ // 0x3a56 @0x9
0x3a4d…3a61 at000a = ╱f0╱:╱ // 0x3a57 @0xa
0x3a4d…3a61 at000b = ╱32╱2╱ // 0x3a58 @0xb
0x3a4d…3a61 at000c = ╱35╱5╱ // 0x3a59 @0xc
0x3a4d…3a61 at000d = ╱fe0000c805╱ // 0x3a5a @0xd
0x3a4d…3a61 at0012 = ╱ee╱)╱ // 0x3a5f @0x12
0x3a4d…3a61 at0013 = EOL // 0x3a60 @0x13
0x3a4d…3a61 }
0x3a61…3a67 c7be 6860 ENDIF
0x3a61…3a67 LineComalBin {
0x3a61…3a67 ptr = 0xc7be // 0x3a61 @0x0
0x3a61…3a67 lno = 0x1acc // 0x3a63 @0x2
0x3a61…3a67 at0004 = ╱9b╱ ENDIF ╱ // 0x3a65 @0x4
0x3a61…3a67 at0005 = EOL // 0x3a66 @0x5
0x3a61…3a67 }
0x3a67…3a73 c7ca 6870 UNTIL CEKS=B
0x3a67…3a73 LineComalBin {
0x3a67…3a73 ptr = 0xc7ca // 0x3a67 @0x0
0x3a67…3a73 lno = 0x1ad6 // 0x3a69 @0x2
0x3a67…3a73 at0004 = ╱98╱ UNTIL ╱ // 0x3a6b @0x4
0x3a67…3a73 at0005 = ╱43╱C╱ // 0x3a6c @0x5
0x3a67…3a73 at0006 = ╱45╱E╱ // 0x3a6d @0x6
0x3a67…3a73 at0007 = ╱4b╱K╱ // 0x3a6e @0x7
0x3a67…3a73 at0008 = ╱53╱S╱ // 0x3a6f @0x8
0x3a67…3a73 at0009 = ╱dc╱=╱ // 0x3a70 @0x9
0x3a67…3a73 at000a = ╱42╱B╱ // 0x3a71 @0xa
0x3a67…3a73 at000b = EOL // 0x3a72 @0xb
0x3a67…3a73 }
0x3a73…3a84 c7db 6880 IF KUNDENR=B THEN EXIT
0x3a73…3a84 LineComalBin {
0x3a73…3a84 ptr = 0xc7db // 0x3a73 @0x0
0x3a73…3a84 lno = 0x1ae0 // 0x3a75 @0x2
0x3a73…3a84 at0004 = ╱82╱ IF ╱ // 0x3a77 @0x4
0x3a73…3a84 at0005 = ╱4b╱K╱ // 0x3a78 @0x5
0x3a73…3a84 at0006 = ╱55╱U╱ // 0x3a79 @0x6
0x3a73…3a84 at0007 = ╱4e╱N╱ // 0x3a7a @0x7
0x3a73…3a84 at0008 = ╱44╱D╱ // 0x3a7b @0x8
0x3a73…3a84 at0009 = ╱45╱E╱ // 0x3a7c @0x9
0x3a73…3a84 at000a = ╱4e╱N╱ // 0x3a7d @0xa
0x3a73…3a84 at000b = ╱52╱R╱ // 0x3a7e @0xb
0x3a73…3a84 at000c = ╱dc╱=╱ // 0x3a7f @0xc
0x3a73…3a84 at000d = ╱42╱B╱ // 0x3a80 @0xd
0x3a73…3a84 at000e = ╱b6╱ THEN ╱ // 0x3a81 @0xe
0x3a73…3a84 at000f = ╱99╱ EXIT ╱ // 0x3a82 @0xf
0x3a73…3a84 at0010 = EOL // 0x3a83 @0x10
0x3a73…3a84 }
0x3a84…3a99 c7f0 6890 EXEC KUNDEUD(1)
0x3a84…3a99 LineComalBin {
0x3a84…3a99 ptr = 0xc7f0 // 0x3a84 @0x0
0x3a84…3a99 lno = 0x1aea // 0x3a86 @0x2
0x3a84…3a99 at0004 = ╱9d╱ EXEC ╱ // 0x3a88 @0x4
0x3a84…3a99 at0005 = ╱4b╱K╱ // 0x3a89 @0x5
0x3a84…3a99 at0006 = ╱55╱U╱ // 0x3a8a @0x6
0x3a84…3a99 at0007 = ╱4e╱N╱ // 0x3a8b @0x7
0x3a84…3a99 at0008 = ╱44╱D╱ // 0x3a8c @0x8
0x3a84…3a99 at0009 = ╱45╱E╱ // 0x3a8d @0x9
0x3a84…3a99 at000a = ╱55╱U╱ // 0x3a8e @0xa
0x3a84…3a99 at000b = ╱44╱D╱ // 0x3a8f @0xb
0x3a84…3a99 at000c = ╱ed╱(╱ // 0x3a90 @0xc
0x3a84…3a99 at000d = ╱31╱1╱ // 0x3a91 @0xd
0x3a84…3a99 at000e = ╱fe00008001╱ // 0x3a92 @0xe
0x3a84…3a99 at0013 = ╱ee╱)╱ // 0x3a97 @0x13
0x3a84…3a99 at0014 = EOL // 0x3a98 @0x14
0x3a84…3a99 }
0x3a99…3acc c823 6900 EXEC INDPUT1(9,21,-9,-6,LTX4$)
0x3a99…3acc LineComalBin {
0x3a99…3acc ptr = 0xc823 // 0x3a99 @0x0
0x3a99…3acc lno = 0x1af4 // 0x3a9b @0x2
0x3a99…3acc at0004 = ╱9d╱ EXEC ╱ // 0x3a9d @0x4
0x3a99…3acc at0005 = ╱49╱I╱ // 0x3a9e @0x5
0x3a99…3acc at0006 = ╱4e╱N╱ // 0x3a9f @0x6
0x3a99…3acc at0007 = ╱44╱D╱ // 0x3aa0 @0x7
0x3a99…3acc at0008 = ╱50╱P╱ // 0x3aa1 @0x8
0x3a99…3acc at0009 = ╱55╱U╱ // 0x3aa2 @0x9
0x3a99…3acc at000a = ╱54╱T╱ // 0x3aa3 @0xa
0x3a99…3acc at000b = ╱31╱1╱ // 0x3aa4 @0xb
0x3a99…3acc at000c = ╱ed╱(╱ // 0x3aa5 @0xc
0x3a99…3acc at000d = ╱39╱9╱ // 0x3aa6 @0xd
0x3a99…3acc at000e = ╱fe00009004╱ // 0x3aa7 @0xe
0x3a99…3acc at0013 = ╱ec╱,╱ // 0x3aac @0x13
0x3a99…3acc at0014 = ╱32╱2╱ // 0x3aad @0x14
0x3a99…3acc at0015 = ╱31╱1╱ // 0x3aae @0x15
0x3a99…3acc at0016 = ╱fe0000a805╱ // 0x3aaf @0x16
0x3a99…3acc at001b = ╱ec╱,╱ // 0x3ab4 @0x1b
0x3a99…3acc at001c = ╱e9╱-╱ // 0x3ab5 @0x1c
0x3a99…3acc at001d = ╱39╱9╱ // 0x3ab6 @0x1d
0x3a99…3acc at001e = ╱fe00009004╱ // 0x3ab7 @0x1e
0x3a99…3acc at0023 = ╱ec╱,╱ // 0x3abc @0x23
0x3a99…3acc at0024 = ╱e9╱-╱ // 0x3abd @0x24
0x3a99…3acc at0025 = ╱36╱6╱ // 0x3abe @0x25
0x3a99…3acc at0026 = ╱fe0000c003╱ // 0x3abf @0x26
0x3a99…3acc at002b = ╱ec╱,╱ // 0x3ac4 @0x2b
0x3a99…3acc at002c = ╱4c╱L╱ // 0x3ac5 @0x2c
0x3a99…3acc at002d = ╱54╱T╱ // 0x3ac6 @0x2d
0x3a99…3acc at002e = ╱58╱X╱ // 0x3ac7 @0x2e
0x3a99…3acc at002f = ╱34╱4╱ // 0x3ac8 @0x2f
0x3a99…3acc at0030 = ╱ef╱$╱ // 0x3ac9 @0x30
0x3a99…3acc at0031 = ╱ee╱)╱ // 0x3aca @0x31
0x3a99…3acc at0032 = EOL // 0x3acb @0x32
0x3a99…3acc }
0x3acc…3adb c832 6910 UNTIL P=-7
0x3acc…3adb LineComalBin {
0x3acc…3adb ptr = 0xc832 // 0x3acc @0x0
0x3acc…3adb lno = 0x1afe // 0x3ace @0x2
0x3acc…3adb at0004 = ╱98╱ UNTIL ╱ // 0x3ad0 @0x4
0x3acc…3adb at0005 = ╱50╱P╱ // 0x3ad1 @0x5
0x3acc…3adb at0006 = ╱dc╱=╱ // 0x3ad2 @0x6
0x3acc…3adb at0007 = ╱e9╱-╱ // 0x3ad3 @0x7
0x3acc…3adb at0008 = ╱37╱7╱ // 0x3ad4 @0x8
0x3acc…3adb at0009 = ╱fe0000e003╱ // 0x3ad5 @0x9
0x3acc…3adb at000e = EOL // 0x3ada @0xe
0x3acc…3adb }
0x3adb…3aec c843 6920 IF KUNDENR=B THEN EXIT
0x3adb…3aec LineComalBin {
0x3adb…3aec ptr = 0xc843 // 0x3adb @0x0
0x3adb…3aec lno = 0x1b08 // 0x3add @0x2
0x3adb…3aec at0004 = ╱82╱ IF ╱ // 0x3adf @0x4
0x3adb…3aec at0005 = ╱4b╱K╱ // 0x3ae0 @0x5
0x3adb…3aec at0006 = ╱55╱U╱ // 0x3ae1 @0x6
0x3adb…3aec at0007 = ╱4e╱N╱ // 0x3ae2 @0x7
0x3adb…3aec at0008 = ╱44╱D╱ // 0x3ae3 @0x8
0x3adb…3aec at0009 = ╱45╱E╱ // 0x3ae4 @0x9
0x3adb…3aec at000a = ╱4e╱N╱ // 0x3ae5 @0xa
0x3adb…3aec at000b = ╱52╱R╱ // 0x3ae6 @0xb
0x3adb…3aec at000c = ╱dc╱=╱ // 0x3ae7 @0xc
0x3adb…3aec at000d = ╱42╱B╱ // 0x3ae8 @0xd
0x3adb…3aec at000e = ╱b6╱ THEN ╱ // 0x3ae9 @0xe
0x3adb…3aec at000f = ╱99╱ EXIT ╱ // 0x3aea @0xf
0x3adb…3aec at0010 = EOL // 0x3aeb @0x10
0x3adb…3aec }
0x3aec…3b31 c888 6930 IF APOS>(MFKL+5)*MFAK+G*MFKL-15 OR FJPOST+AFAKT+AKRED=>MFAK THEN
0x3aec…3b31 LineComalBin {
0x3aec…3b31 ptr = 0xc888 // 0x3aec @0x0
0x3aec…3b31 lno = 0x1b12 // 0x3aee @0x2
0x3aec…3b31 at0004 = ╱9c╱ IF ╱ // 0x3af0 @0x4
0x3aec…3b31 at0005 = ╱41╱A╱ // 0x3af1 @0x5
0x3aec…3b31 at0006 = ╱50╱P╱ // 0x3af2 @0x6
0x3aec…3b31 at0007 = ╱4f╱O╱ // 0x3af3 @0x7
0x3aec…3b31 at0008 = ╱53╱S╱ // 0x3af4 @0x8
0x3aec…3b31 at0009 = ╱de╱>╱ // 0x3af5 @0x9
0x3aec…3b31 at000a = ╱ed╱(╱ // 0x3af6 @0xa
0x3aec…3b31 at000b = ╱4d╱M╱ // 0x3af7 @0xb
0x3aec…3b31 at000c = ╱46╱F╱ // 0x3af8 @0xc
0x3aec…3b31 at000d = ╱4b╱K╱ // 0x3af9 @0xd
0x3aec…3b31 at000e = ╱4c╱L╱ // 0x3afa @0xe
0x3aec…3b31 at000f = ╱e2╱+╱ // 0x3afb @0xf
0x3aec…3b31 at0010 = ╱35╱5╱ // 0x3afc @0x10
0x3aec…3b31 at0011 = ╱fe0000a003╱ // 0x3afd @0x11
0x3aec…3b31 at0016 = ╱ee╱)╱ // 0x3b02 @0x16
0x3aec…3b31 at0017 = ╱e4╱*╱ // 0x3b03 @0x17
0x3aec…3b31 at0018 = ╱4d╱M╱ // 0x3b04 @0x18
0x3aec…3b31 at0019 = ╱46╱F╱ // 0x3b05 @0x19
0x3aec…3b31 at001a = ╱41╱A╱ // 0x3b06 @0x1a
0x3aec…3b31 at001b = ╱4b╱K╱ // 0x3b07 @0x1b
0x3aec…3b31 at001c = ╱e2╱+╱ // 0x3b08 @0x1c
0x3aec…3b31 at001d = ╱47╱G╱ // 0x3b09 @0x1d
0x3aec…3b31 at001e = ╱e4╱*╱ // 0x3b0a @0x1e
0x3aec…3b31 at001f = ╱4d╱M╱ // 0x3b0b @0x1f
0x3aec…3b31 at0020 = ╱46╱F╱ // 0x3b0c @0x20
0x3aec…3b31 at0021 = ╱4b╱K╱ // 0x3b0d @0x21
0x3aec…3b31 at0022 = ╱4c╱L╱ // 0x3b0e @0x22
0x3aec…3b31 at0023 = ╱e3╱-╱ // 0x3b0f @0x23
0x3aec…3b31 at0024 = ╱31╱1╱ // 0x3b10 @0x24
0x3aec…3b31 at0025 = ╱35╱5╱ // 0x3b11 @0x25
0x3aec…3b31 at0026 = ╱fe0000f004╱ // 0x3b12 @0x26
0x3aec…3b31 at002b = ╱db╱ OR ╱ // 0x3b17 @0x2b
0x3aec…3b31 at002c = ╱46╱F╱ // 0x3b18 @0x2c
0x3aec…3b31 at002d = ╱4a╱J╱ // 0x3b19 @0x2d
0x3aec…3b31 at002e = ╱50╱P╱ // 0x3b1a @0x2e
0x3aec…3b31 at002f = ╱4f╱O╱ // 0x3b1b @0x2f
0x3aec…3b31 at0030 = ╱53╱S╱ // 0x3b1c @0x30
0x3aec…3b31 at0031 = ╱54╱T╱ // 0x3b1d @0x31
0x3aec…3b31 at0032 = ╱e2╱+╱ // 0x3b1e @0x32
0x3aec…3b31 at0033 = ╱41╱A╱ // 0x3b1f @0x33
0x3aec…3b31 at0034 = ╱46╱F╱ // 0x3b20 @0x34
0x3aec…3b31 at0035 = ╱41╱A╱ // 0x3b21 @0x35
0x3aec…3b31 at0036 = ╱4b╱K╱ // 0x3b22 @0x36
0x3aec…3b31 at0037 = ╱54╱T╱ // 0x3b23 @0x37
0x3aec…3b31 at0038 = ╱e2╱+╱ // 0x3b24 @0x38
0x3aec…3b31 at0039 = ╱41╱A╱ // 0x3b25 @0x39
0x3aec…3b31 at003a = ╱4b╱K╱ // 0x3b26 @0x3a
0x3aec…3b31 at003b = ╱52╱R╱ // 0x3b27 @0x3b
0x3aec…3b31 at003c = ╱45╱E╱ // 0x3b28 @0x3c
0x3aec…3b31 at003d = ╱44╱D╱ // 0x3b29 @0x3d
0x3aec…3b31 at003e = ╱e0╱=>╱ // 0x3b2a @0x3e
0x3aec…3b31 at003f = ╱4d╱M╱ // 0x3b2b @0x3f
0x3aec…3b31 at0040 = ╱46╱F╱ // 0x3b2c @0x40
0x3aec…3b31 at0041 = ╱41╱A╱ // 0x3b2d @0x41
0x3aec…3b31 at0042 = ╱4b╱K╱ // 0x3b2e @0x42
0x3aec…3b31 at0043 = ╱b6╱ THEN ╱ // 0x3b2f @0x43
0x3aec…3b31 at0044 = EOL // 0x3b30 @0x44
0x3aec…3b31 }
0x3b31…3b63 c8ba 6940 EXEC INDPUT1(9,23,-2,0,LTX7$)
0x3b31…3b63 LineComalBin {
0x3b31…3b63 ptr = 0xc8ba // 0x3b31 @0x0
0x3b31…3b63 lno = 0x1b1c // 0x3b33 @0x2
0x3b31…3b63 at0004 = ╱9d╱ EXEC ╱ // 0x3b35 @0x4
0x3b31…3b63 at0005 = ╱49╱I╱ // 0x3b36 @0x5
0x3b31…3b63 at0006 = ╱4e╱N╱ // 0x3b37 @0x6
0x3b31…3b63 at0007 = ╱44╱D╱ // 0x3b38 @0x7
0x3b31…3b63 at0008 = ╱50╱P╱ // 0x3b39 @0x8
0x3b31…3b63 at0009 = ╱55╱U╱ // 0x3b3a @0x9
0x3b31…3b63 at000a = ╱54╱T╱ // 0x3b3b @0xa
0x3b31…3b63 at000b = ╱31╱1╱ // 0x3b3c @0xb
0x3b31…3b63 at000c = ╱ed╱(╱ // 0x3b3d @0xc
0x3b31…3b63 at000d = ╱39╱9╱ // 0x3b3e @0xd
0x3b31…3b63 at000e = ╱fe00009004╱ // 0x3b3f @0xe
0x3b31…3b63 at0013 = ╱ec╱,╱ // 0x3b44 @0x13
0x3b31…3b63 at0014 = ╱32╱2╱ // 0x3b45 @0x14
0x3b31…3b63 at0015 = ╱33╱3╱ // 0x3b46 @0x15
0x3b31…3b63 at0016 = ╱fe0000b805╱ // 0x3b47 @0x16
0x3b31…3b63 at001b = ╱ec╱,╱ // 0x3b4c @0x1b
0x3b31…3b63 at001c = ╱e9╱-╱ // 0x3b4d @0x1c
0x3b31…3b63 at001d = ╱32╱2╱ // 0x3b4e @0x1d
0x3b31…3b63 at001e = ╱fe00008002╱ // 0x3b4f @0x1e
0x3b31…3b63 at0023 = ╱ec╱,╱ // 0x3b54 @0x23
0x3b31…3b63 at0024 = ╱30╱0╱ // 0x3b55 @0x24
0x3b31…3b63 at0025 = ╱fe00000000╱ // 0x3b56 @0x25
0x3b31…3b63 at002a = ╱ec╱,╱ // 0x3b5b @0x2a
0x3b31…3b63 at002b = ╱4c╱L╱ // 0x3b5c @0x2b
0x3b31…3b63 at002c = ╱54╱T╱ // 0x3b5d @0x2c
0x3b31…3b63 at002d = ╱58╱X╱ // 0x3b5e @0x2d
0x3b31…3b63 at002e = ╱37╱7╱ // 0x3b5f @0x2e
0x3b31…3b63 at002f = ╱ef╱$╱ // 0x3b60 @0x2f
0x3b31…3b63 at0030 = ╱ee╱)╱ // 0x3b61 @0x30
0x3b31…3b63 at0031 = EOL // 0x3b62 @0x31
0x3b31…3b63 }
0x3b63…3b69 c8c0 6950 ELSE
0x3b63…3b69 LineComalBin {
0x3b63…3b69 ptr = 0xc8c0 // 0x3b63 @0x0
0x3b63…3b69 lno = 0x1b26 // 0x3b65 @0x2
0x3b63…3b69 at0004 = ╱9a╱ ELSE ╱ // 0x3b67 @0x4
0x3b63…3b69 at0005 = EOL // 0x3b68 @0x5
0x3b63…3b69 }
0x3b69…3b6f c8c6 6960 REPEAT
0x3b69…3b6f LineComalBin {
0x3b69…3b6f ptr = 0xc8c6 // 0x3b69 @0x0
0x3b69…3b6f lno = 0x1b30 // 0x3b6b @0x2
0x3b69…3b6f at0004 = ╱97╱ REPEAT ╱ // 0x3b6d @0x4
0x3b69…3b6f at0005 = EOL // 0x3b6e @0x5
0x3b69…3b6f }
0x3b6f…3b7e c8d5 6970 CURSOR W,23
0x3b6f…3b7e LineComalBin {
0x3b6f…3b7e ptr = 0xc8d5 // 0x3b6f @0x0
0x3b6f…3b7e lno = 0x1b3a // 0x3b71 @0x2
0x3b6f…3b7e at0004 = ╱a1╱ CURSOR ╱ // 0x3b73 @0x4
0x3b6f…3b7e at0005 = ╱57╱W╱ // 0x3b74 @0x5
0x3b6f…3b7e at0006 = ╱ec╱,╱ // 0x3b75 @0x6
0x3b6f…3b7e at0007 = ╱32╱2╱ // 0x3b76 @0x7
0x3b6f…3b7e at0008 = ╱33╱3╱ // 0x3b77 @0x8
0x3b6f…3b7e at0009 = ╱fe0000b805╱ // 0x3b78 @0x9
0x3b6f…3b7e at000e = EOL // 0x3b7d @0xe
0x3b6f…3b7e }
0x3b7e…3ba7 c8fe 6980 INPUT "Faktura/kreditnota (F/K):",FAKKRE$
0x3b7e…3ba7 LineComalBin {
0x3b7e…3ba7 ptr = 0xc8fe // 0x3b7e @0x0
0x3b7e…3ba7 lno = 0x1b44 // 0x3b80 @0x2
0x3b7e…3ba7 at0004 = ╱91╱ INPUT ╱ // 0x3b82 @0x4
0x3b7e…3ba7 at0005 = ╱22╱"╱ // 0x3b83 @0x5
0x3b7e…3ba7 at0006 = ╱46╱F╱ // 0x3b84 @0x6
0x3b7e…3ba7 at0007 = ╱61╱a╱ // 0x3b85 @0x7
0x3b7e…3ba7 at0008 = ╱6b╱k╱ // 0x3b86 @0x8
0x3b7e…3ba7 at0009 = ╱74╱t╱ // 0x3b87 @0x9
0x3b7e…3ba7 at000a = ╱75╱u╱ // 0x3b88 @0xa
0x3b7e…3ba7 at000b = ╱72╱r╱ // 0x3b89 @0xb
0x3b7e…3ba7 at000c = ╱61╱a╱ // 0x3b8a @0xc
0x3b7e…3ba7 at000d = ╱2f╱/╱ // 0x3b8b @0xd
0x3b7e…3ba7 at000e = ╱6b╱k╱ // 0x3b8c @0xe
0x3b7e…3ba7 at000f = ╱72╱r╱ // 0x3b8d @0xf
0x3b7e…3ba7 at0010 = ╱65╱e╱ // 0x3b8e @0x10
0x3b7e…3ba7 at0011 = ╱64╱d╱ // 0x3b8f @0x11
0x3b7e…3ba7 at0012 = ╱69╱i╱ // 0x3b90 @0x12
0x3b7e…3ba7 at0013 = ╱74╱t╱ // 0x3b91 @0x13
0x3b7e…3ba7 at0014 = ╱6e╱n╱ // 0x3b92 @0x14
0x3b7e…3ba7 at0015 = ╱6f╱o╱ // 0x3b93 @0x15
0x3b7e…3ba7 at0016 = ╱74╱t╱ // 0x3b94 @0x16
0x3b7e…3ba7 at0017 = ╱61╱a╱ // 0x3b95 @0x17
0x3b7e…3ba7 at0018 = ╱20╱…╱ // 0x3b96 @0x18
0x3b7e…3ba7 at0019 = ╱28╱(╱ // 0x3b97 @0x19
0x3b7e…3ba7 at001a = ╱46╱F╱ // 0x3b98 @0x1a
0x3b7e…3ba7 at001b = ╱2f╱/╱ // 0x3b99 @0x1b
0x3b7e…3ba7 at001c = ╱4b╱K╱ // 0x3b9a @0x1c
0x3b7e…3ba7 at001d = ╱29╱)╱ // 0x3b9b @0x1d
0x3b7e…3ba7 at001e = ╱3a╱:╱ // 0x3b9c @0x1e
0x3b7e…3ba7 at001f = ╱22╱"╱ // 0x3b9d @0x1f
0x3b7e…3ba7 at0020 = ╱ec╱,╱ // 0x3b9e @0x20
0x3b7e…3ba7 at0021 = ╱46╱F╱ // 0x3b9f @0x21
0x3b7e…3ba7 at0022 = ╱41╱A╱ // 0x3ba0 @0x22
0x3b7e…3ba7 at0023 = ╱4b╱K╱ // 0x3ba1 @0x23
0x3b7e…3ba7 at0024 = ╱4b╱K╱ // 0x3ba2 @0x24
0x3b7e…3ba7 at0025 = ╱52╱R╱ // 0x3ba3 @0x25
0x3b7e…3ba7 at0026 = ╱45╱E╱ // 0x3ba4 @0x26
0x3b7e…3ba7 at0027 = ╱ef╱$╱ // 0x3ba5 @0x27
0x3b7e…3ba7 at0028 = EOL // 0x3ba6 @0x28
0x3b7e…3ba7 }
0x3ba7…3bdc c933 6990 UNTIL FAKKRE$="F" OR FAKKRE$="K" OR FAKKRE$="f" OR FAKKRE$="k"
0x3ba7…3bdc LineComalBin {
0x3ba7…3bdc ptr = 0xc933 // 0x3ba7 @0x0
0x3ba7…3bdc lno = 0x1b4e // 0x3ba9 @0x2
0x3ba7…3bdc at0004 = ╱98╱ UNTIL ╱ // 0x3bab @0x4
0x3ba7…3bdc at0005 = ╱46╱F╱ // 0x3bac @0x5
0x3ba7…3bdc at0006 = ╱41╱A╱ // 0x3bad @0x6
0x3ba7…3bdc at0007 = ╱4b╱K╱ // 0x3bae @0x7
0x3ba7…3bdc at0008 = ╱4b╱K╱ // 0x3baf @0x8
0x3ba7…3bdc at0009 = ╱52╱R╱ // 0x3bb0 @0x9
0x3ba7…3bdc at000a = ╱45╱E╱ // 0x3bb1 @0xa
0x3ba7…3bdc at000b = ╱ef╱$╱ // 0x3bb2 @0xb
0x3ba7…3bdc at000c = ╱dc╱=╱ // 0x3bb3 @0xc
0x3ba7…3bdc at000d = ╱22╱"╱ // 0x3bb4 @0xd
0x3ba7…3bdc at000e = ╱46╱F╱ // 0x3bb5 @0xe
0x3ba7…3bdc at000f = ╱22╱"╱ // 0x3bb6 @0xf
0x3ba7…3bdc at0010 = ╱db╱ OR ╱ // 0x3bb7 @0x10
0x3ba7…3bdc at0011 = ╱46╱F╱ // 0x3bb8 @0x11
0x3ba7…3bdc at0012 = ╱41╱A╱ // 0x3bb9 @0x12
0x3ba7…3bdc at0013 = ╱4b╱K╱ // 0x3bba @0x13
0x3ba7…3bdc at0014 = ╱4b╱K╱ // 0x3bbb @0x14
0x3ba7…3bdc at0015 = ╱52╱R╱ // 0x3bbc @0x15
0x3ba7…3bdc at0016 = ╱45╱E╱ // 0x3bbd @0x16
0x3ba7…3bdc at0017 = ╱ef╱$╱ // 0x3bbe @0x17
0x3ba7…3bdc at0018 = ╱dc╱=╱ // 0x3bbf @0x18
0x3ba7…3bdc at0019 = ╱22╱"╱ // 0x3bc0 @0x19
0x3ba7…3bdc at001a = ╱4b╱K╱ // 0x3bc1 @0x1a
0x3ba7…3bdc at001b = ╱22╱"╱ // 0x3bc2 @0x1b
0x3ba7…3bdc at001c = ╱db╱ OR ╱ // 0x3bc3 @0x1c
0x3ba7…3bdc at001d = ╱46╱F╱ // 0x3bc4 @0x1d
0x3ba7…3bdc at001e = ╱41╱A╱ // 0x3bc5 @0x1e
0x3ba7…3bdc at001f = ╱4b╱K╱ // 0x3bc6 @0x1f
0x3ba7…3bdc at0020 = ╱4b╱K╱ // 0x3bc7 @0x20
0x3ba7…3bdc at0021 = ╱52╱R╱ // 0x3bc8 @0x21
0x3ba7…3bdc at0022 = ╱45╱E╱ // 0x3bc9 @0x22
0x3ba7…3bdc at0023 = ╱ef╱$╱ // 0x3bca @0x23
0x3ba7…3bdc at0024 = ╱dc╱=╱ // 0x3bcb @0x24
0x3ba7…3bdc at0025 = ╱22╱"╱ // 0x3bcc @0x25
0x3ba7…3bdc at0026 = ╱66╱f╱ // 0x3bcd @0x26
0x3ba7…3bdc at0027 = ╱22╱"╱ // 0x3bce @0x27
0x3ba7…3bdc at0028 = ╱db╱ OR ╱ // 0x3bcf @0x28
0x3ba7…3bdc at0029 = ╱46╱F╱ // 0x3bd0 @0x29
0x3ba7…3bdc at002a = ╱41╱A╱ // 0x3bd1 @0x2a
0x3ba7…3bdc at002b = ╱4b╱K╱ // 0x3bd2 @0x2b
0x3ba7…3bdc at002c = ╱4b╱K╱ // 0x3bd3 @0x2c
0x3ba7…3bdc at002d = ╱52╱R╱ // 0x3bd4 @0x2d
0x3ba7…3bdc at002e = ╱45╱E╱ // 0x3bd5 @0x2e
0x3ba7…3bdc at002f = ╱ef╱$╱ // 0x3bd6 @0x2f
0x3ba7…3bdc at0030 = ╱dc╱=╱ // 0x3bd7 @0x30
0x3ba7…3bdc at0031 = ╱22╱"╱ // 0x3bd8 @0x31
0x3ba7…3bdc at0032 = ╱6b╱k╱ // 0x3bd9 @0x32
0x3ba7…3bdc at0033 = ╱22╱"╱ // 0x3bda @0x33
0x3ba7…3bdc at0034 = EOL // 0x3bdb @0x34
0x3ba7…3bdc }
0x3bdc…3bf9 c950 7000 IF FAKKRE$="f" THEN FAKKRE$="F"
0x3bdc…3bf9 LineComalBin {
0x3bdc…3bf9 ptr = 0xc950 // 0x3bdc @0x0
0x3bdc…3bf9 lno = 0x1b58 // 0x3bde @0x2
0x3bdc…3bf9 at0004 = ╱82╱ IF ╱ // 0x3be0 @0x4
0x3bdc…3bf9 at0005 = ╱46╱F╱ // 0x3be1 @0x5
0x3bdc…3bf9 at0006 = ╱41╱A╱ // 0x3be2 @0x6
0x3bdc…3bf9 at0007 = ╱4b╱K╱ // 0x3be3 @0x7
0x3bdc…3bf9 at0008 = ╱4b╱K╱ // 0x3be4 @0x8
0x3bdc…3bf9 at0009 = ╱52╱R╱ // 0x3be5 @0x9
0x3bdc…3bf9 at000a = ╱45╱E╱ // 0x3be6 @0xa
0x3bdc…3bf9 at000b = ╱ef╱$╱ // 0x3be7 @0xb
0x3bdc…3bf9 at000c = ╱dc╱=╱ // 0x3be8 @0xc
0x3bdc…3bf9 at000d = ╱22╱"╱ // 0x3be9 @0xd
0x3bdc…3bf9 at000e = ╱66╱f╱ // 0x3bea @0xe
0x3bdc…3bf9 at000f = ╱22╱"╱ // 0x3beb @0xf
0x3bdc…3bf9 at0010 = ╱b6╱ THEN ╱ // 0x3bec @0x10
0x3bdc…3bf9 at0011 = ╱46╱F╱ // 0x3bed @0x11
0x3bdc…3bf9 at0012 = ╱41╱A╱ // 0x3bee @0x12
0x3bdc…3bf9 at0013 = ╱4b╱K╱ // 0x3bef @0x13
0x3bdc…3bf9 at0014 = ╱4b╱K╱ // 0x3bf0 @0x14
0x3bdc…3bf9 at0015 = ╱52╱R╱ // 0x3bf1 @0x15
0x3bdc…3bf9 at0016 = ╱45╱E╱ // 0x3bf2 @0x16
0x3bdc…3bf9 at0017 = ╱ef╱$╱ // 0x3bf3 @0x17
0x3bdc…3bf9 at0018 = ╱dc╱=╱ // 0x3bf4 @0x18
0x3bdc…3bf9 at0019 = ╱22╱"╱ // 0x3bf5 @0x19
0x3bdc…3bf9 at001a = ╱46╱F╱ // 0x3bf6 @0x1a
0x3bdc…3bf9 at001b = ╱22╱"╱ // 0x3bf7 @0x1b
0x3bdc…3bf9 at001c = EOL // 0x3bf8 @0x1c
0x3bdc…3bf9 }
0x3bf9…3c16 c96d 7010 IF FAKKRE$="k" THEN FAKKRE$="K"
0x3bf9…3c16 LineComalBin {
0x3bf9…3c16 ptr = 0xc96d // 0x3bf9 @0x0
0x3bf9…3c16 lno = 0x1b62 // 0x3bfb @0x2
0x3bf9…3c16 at0004 = ╱82╱ IF ╱ // 0x3bfd @0x4
0x3bf9…3c16 at0005 = ╱46╱F╱ // 0x3bfe @0x5
0x3bf9…3c16 at0006 = ╱41╱A╱ // 0x3bff @0x6
0x3bf9…3c16 at0007 = ╱4b╱K╱ // 0x3c00 @0x7
0x3bf9…3c16 at0008 = ╱4b╱K╱ // 0x3c01 @0x8
0x3bf9…3c16 at0009 = ╱52╱R╱ // 0x3c02 @0x9
0x3bf9…3c16 at000a = ╱45╱E╱ // 0x3c03 @0xa
0x3bf9…3c16 at000b = ╱ef╱$╱ // 0x3c04 @0xb
0x3bf9…3c16 at000c = ╱dc╱=╱ // 0x3c05 @0xc
0x3bf9…3c16 at000d = ╱22╱"╱ // 0x3c06 @0xd
0x3bf9…3c16 at000e = ╱6b╱k╱ // 0x3c07 @0xe
0x3bf9…3c16 at000f = ╱22╱"╱ // 0x3c08 @0xf
0x3bf9…3c16 at0010 = ╱b6╱ THEN ╱ // 0x3c09 @0x10
0x3bf9…3c16 at0011 = ╱46╱F╱ // 0x3c0a @0x11
0x3bf9…3c16 at0012 = ╱41╱A╱ // 0x3c0b @0x12
0x3bf9…3c16 at0013 = ╱4b╱K╱ // 0x3c0c @0x13
0x3bf9…3c16 at0014 = ╱4b╱K╱ // 0x3c0d @0x14
0x3bf9…3c16 at0015 = ╱52╱R╱ // 0x3c0e @0x15
0x3bf9…3c16 at0016 = ╱45╱E╱ // 0x3c0f @0x16
0x3bf9…3c16 at0017 = ╱ef╱$╱ // 0x3c10 @0x17
0x3bf9…3c16 at0018 = ╱dc╱=╱ // 0x3c11 @0x18
0x3bf9…3c16 at0019 = ╱22╱"╱ // 0x3c12 @0x19
0x3bf9…3c16 at001a = ╱4b╱K╱ // 0x3c13 @0x1a
0x3bf9…3c16 at001b = ╱22╱"╱ // 0x3c14 @0x1b
0x3bf9…3c16 at001c = EOL // 0x3c15 @0x1c
0x3bf9…3c16 }
0x3c16…3c1c c973 7020 CLEAR
0x3c16…3c1c LineComalBin {
0x3c16…3c1c ptr = 0xc973 // 0x3c16 @0x0
0x3c16…3c1c lno = 0x1b6c // 0x3c18 @0x2
0x3c16…3c1c at0004 = ╱a0╱ CLEAR ╱ // 0x3c1a @0x4
0x3c16…3c1c at0005 = EOL // 0x3c1b @0x5
0x3c16…3c1c }
0x3c1c…3c31 c988 7030 EXEC KUNDEUD(2)
0x3c1c…3c31 LineComalBin {
0x3c1c…3c31 ptr = 0xc988 // 0x3c1c @0x0
0x3c1c…3c31 lno = 0x1b76 // 0x3c1e @0x2
0x3c1c…3c31 at0004 = ╱9d╱ EXEC ╱ // 0x3c20 @0x4
0x3c1c…3c31 at0005 = ╱4b╱K╱ // 0x3c21 @0x5
0x3c1c…3c31 at0006 = ╱55╱U╱ // 0x3c22 @0x6
0x3c1c…3c31 at0007 = ╱4e╱N╱ // 0x3c23 @0x7
0x3c1c…3c31 at0008 = ╱44╱D╱ // 0x3c24 @0x8
0x3c1c…3c31 at0009 = ╱45╱E╱ // 0x3c25 @0x9
0x3c1c…3c31 at000a = ╱55╱U╱ // 0x3c26 @0xa
0x3c1c…3c31 at000b = ╱44╱D╱ // 0x3c27 @0xb
0x3c1c…3c31 at000c = ╱ed╱(╱ // 0x3c28 @0xc
0x3c1c…3c31 at000d = ╱32╱2╱ // 0x3c29 @0xd
0x3c1c…3c31 at000e = ╱fe00008002╱ // 0x3c2a @0xe
0x3c1c…3c31 at0013 = ╱ee╱)╱ // 0x3c2f @0x13
0x3c1c…3c31 at0014 = EOL // 0x3c30 @0x14
0x3c1c…3c31 }
0x3c31…3c45 c99c 7040 CURSOR 50,4
0x3c31…3c45 LineComalBin {
0x3c31…3c45 ptr = 0xc99c // 0x3c31 @0x0
0x3c31…3c45 lno = 0x1b80 // 0x3c33 @0x2
0x3c31…3c45 at0004 = ╱a1╱ CURSOR ╱ // 0x3c35 @0x4
0x3c31…3c45 at0005 = ╱35╱5╱ // 0x3c36 @0x5
0x3c31…3c45 at0006 = ╱30╱0╱ // 0x3c37 @0x6
0x3c31…3c45 at0007 = ╱fe0000c806╱ // 0x3c38 @0x7
0x3c31…3c45 at000c = ╱ec╱,╱ // 0x3c3d @0xc
0x3c31…3c45 at000d = ╱34╱4╱ // 0x3c3e @0xd
0x3c31…3c45 at000e = ╱fe00008003╱ // 0x3c3f @0xe
0x3c31…3c45 at0013 = EOL // 0x3c44 @0x13
0x3c31…3c45 }
0x3c45…3c57 c9ae 7050 IF FAKKRE$="F" THEN
0x3c45…3c57 LineComalBin {
0x3c45…3c57 ptr = 0xc9ae // 0x3c45 @0x0
0x3c45…3c57 lno = 0x1b8a // 0x3c47 @0x2
0x3c45…3c57 at0004 = ╱9c╱ IF ╱ // 0x3c49 @0x4
0x3c45…3c57 at0005 = ╱46╱F╱ // 0x3c4a @0x5
0x3c45…3c57 at0006 = ╱41╱A╱ // 0x3c4b @0x6
0x3c45…3c57 at0007 = ╱4b╱K╱ // 0x3c4c @0x7
0x3c45…3c57 at0008 = ╱4b╱K╱ // 0x3c4d @0x8
0x3c45…3c57 at0009 = ╱52╱R╱ // 0x3c4e @0x9
0x3c45…3c57 at000a = ╱45╱E╱ // 0x3c4f @0xa
0x3c45…3c57 at000b = ╱ef╱$╱ // 0x3c50 @0xb
0x3c45…3c57 at000c = ╱dc╱=╱ // 0x3c51 @0xc
0x3c45…3c57 at000d = ╱22╱"╱ // 0x3c52 @0xd
0x3c45…3c57 at000e = ╱46╱F╱ // 0x3c53 @0xe
0x3c45…3c57 at000f = ╱22╱"╱ // 0x3c54 @0xf
0x3c45…3c57 at0010 = ╱b6╱ THEN ╱ // 0x3c55 @0x10
0x3c45…3c57 at0011 = EOL // 0x3c56 @0x11
0x3c45…3c57 }
0x3c57…3c84 c9db 7060 PRINT USING "Fakturanr.: #######":FAKTNR+AFAKT
0x3c57…3c84 LineComalBin {
0x3c57…3c84 ptr = 0xc9db // 0x3c57 @0x0
0x3c57…3c84 lno = 0x1b94 // 0x3c59 @0x2
0x3c57…3c84 at0004 = ╱92╱ PRINT ╱ // 0x3c5b @0x4
0x3c57…3c84 at0005 = ╱b9╱ USING ╱ // 0x3c5c @0x5
0x3c57…3c84 at0006 = ╱22╱"╱ // 0x3c5d @0x6
0x3c57…3c84 at0007 = ╱46╱F╱ // 0x3c5e @0x7
0x3c57…3c84 at0008 = ╱61╱a╱ // 0x3c5f @0x8
0x3c57…3c84 at0009 = ╱6b╱k╱ // 0x3c60 @0x9
0x3c57…3c84 at000a = ╱74╱t╱ // 0x3c61 @0xa
0x3c57…3c84 at000b = ╱75╱u╱ // 0x3c62 @0xb
0x3c57…3c84 at000c = ╱72╱r╱ // 0x3c63 @0xc
0x3c57…3c84 at000d = ╱61╱a╱ // 0x3c64 @0xd
0x3c57…3c84 at000e = ╱6e╱n╱ // 0x3c65 @0xe
0x3c57…3c84 at000f = ╱72╱r╱ // 0x3c66 @0xf
0x3c57…3c84 at0010 = ╱2e╱.╱ // 0x3c67 @0x10
0x3c57…3c84 at0011 = ╱3a╱:╱ // 0x3c68 @0x11
0x3c57…3c84 at0012 = ╱20╱…╱ // 0x3c69 @0x12
0x3c57…3c84 at0013 = ╱20╱…╱ // 0x3c6a @0x13
0x3c57…3c84 at0014 = ╱20╱…╱ // 0x3c6b @0x14
0x3c57…3c84 at0015 = ╱20╱…╱ // 0x3c6c @0x15
0x3c57…3c84 at0016 = ╱20╱…╱ // 0x3c6d @0x16
0x3c57…3c84 at0017 = ╱23╱#╱ // 0x3c6e @0x17
0x3c57…3c84 at0018 = ╱23╱#╱ // 0x3c6f @0x18
0x3c57…3c84 at0019 = ╱23╱#╱ // 0x3c70 @0x19
0x3c57…3c84 at001a = ╱23╱#╱ // 0x3c71 @0x1a
0x3c57…3c84 at001b = ╱23╱#╱ // 0x3c72 @0x1b
0x3c57…3c84 at001c = ╱23╱#╱ // 0x3c73 @0x1c
0x3c57…3c84 at001d = ╱23╱#╱ // 0x3c74 @0x1d
0x3c57…3c84 at001e = ╱22╱"╱ // 0x3c75 @0x1e
0x3c57…3c84 at001f = ╱f0╱:╱ // 0x3c76 @0x1f
0x3c57…3c84 at0020 = ╱46╱F╱ // 0x3c77 @0x20
0x3c57…3c84 at0021 = ╱41╱A╱ // 0x3c78 @0x21
0x3c57…3c84 at0022 = ╱4b╱K╱ // 0x3c79 @0x22
0x3c57…3c84 at0023 = ╱54╱T╱ // 0x3c7a @0x23
0x3c57…3c84 at0024 = ╱4e╱N╱ // 0x3c7b @0x24
0x3c57…3c84 at0025 = ╱52╱R╱ // 0x3c7c @0x25
0x3c57…3c84 at0026 = ╱e2╱+╱ // 0x3c7d @0x26
0x3c57…3c84 at0027 = ╱41╱A╱ // 0x3c7e @0x27
0x3c57…3c84 at0028 = ╱46╱F╱ // 0x3c7f @0x28
0x3c57…3c84 at0029 = ╱41╱A╱ // 0x3c80 @0x29
0x3c57…3c84 at002a = ╱4b╱K╱ // 0x3c81 @0x2a
0x3c57…3c84 at002b = ╱54╱T╱ // 0x3c82 @0x2b
0x3c57…3c84 at002c = EOL // 0x3c83 @0x2c
0x3c57…3c84 }
0x3c84…3c8a c9e1 7070 ELSE
0x3c84…3c8a LineComalBin {
0x3c84…3c8a ptr = 0xc9e1 // 0x3c84 @0x0
0x3c84…3c8a lno = 0x1b9e // 0x3c86 @0x2
0x3c84…3c8a at0004 = ╱9a╱ ELSE ╱ // 0x3c88 @0x4
0x3c84…3c8a at0005 = EOL // 0x3c89 @0x5
0x3c84…3c8a }
0x3c8a…3cb7 ca0e 7080 PRINT USING "Kreditnotanr.: #######":KREDNR+AKRED
0x3c8a…3cb7 LineComalBin {
0x3c8a…3cb7 ptr = 0xca0e // 0x3c8a @0x0
0x3c8a…3cb7 lno = 0x1ba8 // 0x3c8c @0x2
0x3c8a…3cb7 at0004 = ╱92╱ PRINT ╱ // 0x3c8e @0x4
0x3c8a…3cb7 at0005 = ╱b9╱ USING ╱ // 0x3c8f @0x5
0x3c8a…3cb7 at0006 = ╱22╱"╱ // 0x3c90 @0x6
0x3c8a…3cb7 at0007 = ╱4b╱K╱ // 0x3c91 @0x7
0x3c8a…3cb7 at0008 = ╱72╱r╱ // 0x3c92 @0x8
0x3c8a…3cb7 at0009 = ╱65╱e╱ // 0x3c93 @0x9
0x3c8a…3cb7 at000a = ╱64╱d╱ // 0x3c94 @0xa
0x3c8a…3cb7 at000b = ╱69╱i╱ // 0x3c95 @0xb
0x3c8a…3cb7 at000c = ╱74╱t╱ // 0x3c96 @0xc
0x3c8a…3cb7 at000d = ╱6e╱n╱ // 0x3c97 @0xd
0x3c8a…3cb7 at000e = ╱6f╱o╱ // 0x3c98 @0xe
0x3c8a…3cb7 at000f = ╱74╱t╱ // 0x3c99 @0xf
0x3c8a…3cb7 at0010 = ╱61╱a╱ // 0x3c9a @0x10
0x3c8a…3cb7 at0011 = ╱6e╱n╱ // 0x3c9b @0x11
0x3c8a…3cb7 at0012 = ╱72╱r╱ // 0x3c9c @0x12
0x3c8a…3cb7 at0013 = ╱2e╱.╱ // 0x3c9d @0x13
0x3c8a…3cb7 at0014 = ╱3a╱:╱ // 0x3c9e @0x14
0x3c8a…3cb7 at0015 = ╱20╱…╱ // 0x3c9f @0x15
0x3c8a…3cb7 at0016 = ╱20╱…╱ // 0x3ca0 @0x16
0x3c8a…3cb7 at0017 = ╱23╱#╱ // 0x3ca1 @0x17
0x3c8a…3cb7 at0018 = ╱23╱#╱ // 0x3ca2 @0x18
0x3c8a…3cb7 at0019 = ╱23╱#╱ // 0x3ca3 @0x19
0x3c8a…3cb7 at001a = ╱23╱#╱ // 0x3ca4 @0x1a
0x3c8a…3cb7 at001b = ╱23╱#╱ // 0x3ca5 @0x1b
0x3c8a…3cb7 at001c = ╱23╱#╱ // 0x3ca6 @0x1c
0x3c8a…3cb7 at001d = ╱23╱#╱ // 0x3ca7 @0x1d
0x3c8a…3cb7 at001e = ╱22╱"╱ // 0x3ca8 @0x1e
0x3c8a…3cb7 at001f = ╱f0╱:╱ // 0x3ca9 @0x1f
0x3c8a…3cb7 at0020 = ╱4b╱K╱ // 0x3caa @0x20
0x3c8a…3cb7 at0021 = ╱52╱R╱ // 0x3cab @0x21
0x3c8a…3cb7 at0022 = ╱45╱E╱ // 0x3cac @0x22
0x3c8a…3cb7 at0023 = ╱44╱D╱ // 0x3cad @0x23
0x3c8a…3cb7 at0024 = ╱4e╱N╱ // 0x3cae @0x24
0x3c8a…3cb7 at0025 = ╱52╱R╱ // 0x3caf @0x25
0x3c8a…3cb7 at0026 = ╱e2╱+╱ // 0x3cb0 @0x26
0x3c8a…3cb7 at0027 = ╱41╱A╱ // 0x3cb1 @0x27
0x3c8a…3cb7 at0028 = ╱4b╱K╱ // 0x3cb2 @0x28
0x3c8a…3cb7 at0029 = ╱52╱R╱ // 0x3cb3 @0x29
0x3c8a…3cb7 at002a = ╱45╱E╱ // 0x3cb4 @0x2a
0x3c8a…3cb7 at002b = ╱44╱D╱ // 0x3cb5 @0x2b
0x3c8a…3cb7 at002c = EOL // 0x3cb6 @0x2c
0x3c8a…3cb7 }
0x3cb7…3cbd ca14 7090 ENDIF
0x3cb7…3cbd LineComalBin {
0x3cb7…3cbd ptr = 0xca14 // 0x3cb7 @0x0
0x3cb7…3cbd lno = 0x1bb2 // 0x3cb9 @0x2
0x3cb7…3cbd at0004 = ╱9b╱ ENDIF ╱ // 0x3cbb @0x4
0x3cb7…3cbd at0005 = EOL // 0x3cbc @0x5
0x3cb7…3cbd }
0x3cbd…3cd1 ca28 7100 CURSOR 50,6
0x3cbd…3cd1 LineComalBin {
0x3cbd…3cd1 ptr = 0xca28 // 0x3cbd @0x0
0x3cbd…3cd1 lno = 0x1bbc // 0x3cbf @0x2
0x3cbd…3cd1 at0004 = ╱a1╱ CURSOR ╱ // 0x3cc1 @0x4
0x3cbd…3cd1 at0005 = ╱35╱5╱ // 0x3cc2 @0x5
0x3cbd…3cd1 at0006 = ╱30╱0╱ // 0x3cc3 @0x6
0x3cbd…3cd1 at0007 = ╱fe0000c806╱ // 0x3cc4 @0x7
0x3cbd…3cd1 at000c = ╱ec╱,╱ // 0x3cc9 @0xc
0x3cbd…3cd1 at000d = ╱36╱6╱ // 0x3cca @0xd
0x3cbd…3cd1 at000e = ╱fe0000c003╱ // 0x3ccb @0xe
0x3cbd…3cd1 at0013 = EOL // 0x3cd0 @0x13
0x3cbd…3cd1 }
0x3cd1…3cf9 ca50 7110 PRINT USING "Kundenr.: #######":KUNDENR
0x3cd1…3cf9 LineComalBin {
0x3cd1…3cf9 ptr = 0xca50 // 0x3cd1 @0x0
0x3cd1…3cf9 lno = 0x1bc6 // 0x3cd3 @0x2
0x3cd1…3cf9 at0004 = ╱92╱ PRINT ╱ // 0x3cd5 @0x4
0x3cd1…3cf9 at0005 = ╱b9╱ USING ╱ // 0x3cd6 @0x5
0x3cd1…3cf9 at0006 = ╱22╱"╱ // 0x3cd7 @0x6
0x3cd1…3cf9 at0007 = ╱4b╱K╱ // 0x3cd8 @0x7
0x3cd1…3cf9 at0008 = ╱75╱u╱ // 0x3cd9 @0x8
0x3cd1…3cf9 at0009 = ╱6e╱n╱ // 0x3cda @0x9
0x3cd1…3cf9 at000a = ╱64╱d╱ // 0x3cdb @0xa
0x3cd1…3cf9 at000b = ╱65╱e╱ // 0x3cdc @0xb
0x3cd1…3cf9 at000c = ╱6e╱n╱ // 0x3cdd @0xc
0x3cd1…3cf9 at000d = ╱72╱r╱ // 0x3cde @0xd
0x3cd1…3cf9 at000e = ╱2e╱.╱ // 0x3cdf @0xe
0x3cd1…3cf9 at000f = ╱3a╱:╱ // 0x3ce0 @0xf
0x3cd1…3cf9 at0010 = ╱20╱…╱ // 0x3ce1 @0x10
0x3cd1…3cf9 at0011 = ╱20╱…╱ // 0x3ce2 @0x11
0x3cd1…3cf9 at0012 = ╱20╱…╱ // 0x3ce3 @0x12
0x3cd1…3cf9 at0013 = ╱20╱…╱ // 0x3ce4 @0x13
0x3cd1…3cf9 at0014 = ╱20╱…╱ // 0x3ce5 @0x14
0x3cd1…3cf9 at0015 = ╱20╱…╱ // 0x3ce6 @0x15
0x3cd1…3cf9 at0016 = ╱20╱…╱ // 0x3ce7 @0x16
0x3cd1…3cf9 at0017 = ╱23╱#╱ // 0x3ce8 @0x17
0x3cd1…3cf9 at0018 = ╱23╱#╱ // 0x3ce9 @0x18
0x3cd1…3cf9 at0019 = ╱23╱#╱ // 0x3cea @0x19
0x3cd1…3cf9 at001a = ╱23╱#╱ // 0x3ceb @0x1a
0x3cd1…3cf9 at001b = ╱23╱#╱ // 0x3cec @0x1b
0x3cd1…3cf9 at001c = ╱23╱#╱ // 0x3ced @0x1c
0x3cd1…3cf9 at001d = ╱23╱#╱ // 0x3cee @0x1d
0x3cd1…3cf9 at001e = ╱22╱"╱ // 0x3cef @0x1e
0x3cd1…3cf9 at001f = ╱f0╱:╱ // 0x3cf0 @0x1f
0x3cd1…3cf9 at0020 = ╱4b╱K╱ // 0x3cf1 @0x20
0x3cd1…3cf9 at0021 = ╱55╱U╱ // 0x3cf2 @0x21
0x3cd1…3cf9 at0022 = ╱4e╱N╱ // 0x3cf3 @0x22
0x3cd1…3cf9 at0023 = ╱44╱D╱ // 0x3cf4 @0x23
0x3cd1…3cf9 at0024 = ╱45╱E╱ // 0x3cf5 @0x24
0x3cd1…3cf9 at0025 = ╱4e╱N╱ // 0x3cf6 @0x25
0x3cd1…3cf9 at0026 = ╱52╱R╱ // 0x3cf7 @0x26
0x3cd1…3cf9 at0027 = EOL // 0x3cf8 @0x27
0x3cd1…3cf9 }
0x3cf9…3d0d ca64 7120 CURSOR 50,8
0x3cf9…3d0d LineComalBin {
0x3cf9…3d0d ptr = 0xca64 // 0x3cf9 @0x0
0x3cf9…3d0d lno = 0x1bd0 // 0x3cfb @0x2
0x3cf9…3d0d at0004 = ╱a1╱ CURSOR ╱ // 0x3cfd @0x4
0x3cf9…3d0d at0005 = ╱35╱5╱ // 0x3cfe @0x5
0x3cf9…3d0d at0006 = ╱30╱0╱ // 0x3cff @0x6
0x3cf9…3d0d at0007 = ╱fe0000c806╱ // 0x3d00 @0x7
0x3cf9…3d0d at000c = ╱ec╱,╱ // 0x3d05 @0xc
0x3cf9…3d0d at000d = ╱38╱8╱ // 0x3d06 @0xd
0x3cf9…3d0d at000e = ╱fe00008004╱ // 0x3d07 @0xe
0x3cf9…3d0d at0013 = EOL // 0x3d0c @0x13
0x3cf9…3d0d }
0x3d0d…3d1f ca76 7130 PRINT "Ordredato:"
0x3d0d…3d1f LineComalBin {
0x3d0d…3d1f ptr = 0xca76 // 0x3d0d @0x0
0x3d0d…3d1f lno = 0x1bda // 0x3d0f @0x2
0x3d0d…3d1f at0004 = ╱92╱ PRINT ╱ // 0x3d11 @0x4
0x3d0d…3d1f at0005 = ╱22╱"╱ // 0x3d12 @0x5
0x3d0d…3d1f at0006 = ╱4f╱O╱ // 0x3d13 @0x6
0x3d0d…3d1f at0007 = ╱72╱r╱ // 0x3d14 @0x7
0x3d0d…3d1f at0008 = ╱64╱d╱ // 0x3d15 @0x8
0x3d0d…3d1f at0009 = ╱72╱r╱ // 0x3d16 @0x9
0x3d0d…3d1f at000a = ╱65╱e╱ // 0x3d17 @0xa
0x3d0d…3d1f at000b = ╱64╱d╱ // 0x3d18 @0xb
0x3d0d…3d1f at000c = ╱61╱a╱ // 0x3d19 @0xc
0x3d0d…3d1f at000d = ╱74╱t╱ // 0x3d1a @0xd
0x3d0d…3d1f at000e = ╱6f╱o╱ // 0x3d1b @0xe
0x3d0d…3d1f at000f = ╱3a╱:╱ // 0x3d1c @0xf
0x3d0d…3d1f at0010 = ╱22╱"╱ // 0x3d1d @0x10
0x3d0d…3d1f at0011 = EOL // 0x3d1e @0x11
0x3d0d…3d1f }
0x3d1f…3d2e ca85 7140 LIE=8
0x3d1f…3d2e LineComalBin {
0x3d1f…3d2e ptr = 0xca85 // 0x3d1f @0x0
0x3d1f…3d2e lno = 0x1be4 // 0x3d21 @0x2
0x3d1f…3d2e at0004 = ╱4c╱L╱ // 0x3d23 @0x4
0x3d1f…3d2e at0005 = ╱49╱I╱ // 0x3d24 @0x5
0x3d1f…3d2e at0006 = ╱45╱E╱ // 0x3d25 @0x6
0x3d1f…3d2e at0007 = ╱dc╱=╱ // 0x3d26 @0x7
0x3d1f…3d2e at0008 = ╱38╱8╱ // 0x3d27 @0x8
0x3d1f…3d2e at0009 = ╱fe00008004╱ // 0x3d28 @0x9
0x3d1f…3d2e at000e = EOL // 0x3d2d @0xe
0x3d1f…3d2e }
0x3d2e…3d3c ca93 7150 EXEC DATOINDT
0x3d2e…3d3c LineComalBin {
0x3d2e…3d3c ptr = 0xca93 // 0x3d2e @0x0
0x3d2e…3d3c lno = 0x1bee // 0x3d30 @0x2
0x3d2e…3d3c at0004 = ╱9d╱ EXEC ╱ // 0x3d32 @0x4
0x3d2e…3d3c at0005 = ╱44╱D╱ // 0x3d33 @0x5
0x3d2e…3d3c at0006 = ╱41╱A╱ // 0x3d34 @0x6
0x3d2e…3d3c at0007 = ╱54╱T╱ // 0x3d35 @0x7
0x3d2e…3d3c at0008 = ╱4f╱O╱ // 0x3d36 @0x8
0x3d2e…3d3c at0009 = ╱49╱I╱ // 0x3d37 @0x9
0x3d2e…3d3c at000a = ╱4e╱N╱ // 0x3d38 @0xa
0x3d2e…3d3c at000b = ╱44╱D╱ // 0x3d39 @0xb
0x3d2e…3d3c at000c = ╱54╱T╱ // 0x3d3a @0xc
0x3d2e…3d3c at000d = EOL // 0x3d3b @0xd
0x3d2e…3d3c }
0x3d3c…3d4d caa4 7160 ORDREDAT=DAT
0x3d3c…3d4d LineComalBin {
0x3d3c…3d4d ptr = 0xcaa4 // 0x3d3c @0x0
0x3d3c…3d4d lno = 0x1bf8 // 0x3d3e @0x2
0x3d3c…3d4d at0004 = ╱4f╱O╱ // 0x3d40 @0x4
0x3d3c…3d4d at0005 = ╱52╱R╱ // 0x3d41 @0x5
0x3d3c…3d4d at0006 = ╱44╱D╱ // 0x3d42 @0x6
0x3d3c…3d4d at0007 = ╱52╱R╱ // 0x3d43 @0x7
0x3d3c…3d4d at0008 = ╱45╱E╱ // 0x3d44 @0x8
0x3d3c…3d4d at0009 = ╱44╱D╱ // 0x3d45 @0x9
0x3d3c…3d4d at000a = ╱41╱A╱ // 0x3d46 @0xa
0x3d3c…3d4d at000b = ╱54╱T╱ // 0x3d47 @0xb
0x3d3c…3d4d at000c = ╱dc╱=╱ // 0x3d48 @0xc
0x3d3c…3d4d at000d = ╱44╱D╱ // 0x3d49 @0xd
0x3d3c…3d4d at000e = ╱41╱A╱ // 0x3d4a @0xe
0x3d3c…3d4d at000f = ╱54╱T╱ // 0x3d4b @0xf
0x3d3c…3d4d at0010 = EOL // 0x3d4c @0x10
0x3d3c…3d4d }
0x3d4d…3d85 cadc 7170 EXEC INDPUT1(50,10,0,1000000,LTX5$)
0x3d4d…3d85 LineComalBin {
0x3d4d…3d85 ptr = 0xcadc // 0x3d4d @0x0
0x3d4d…3d85 lno = 0x1c02 // 0x3d4f @0x2
0x3d4d…3d85 at0004 = ╱9d╱ EXEC ╱ // 0x3d51 @0x4
0x3d4d…3d85 at0005 = ╱49╱I╱ // 0x3d52 @0x5
0x3d4d…3d85 at0006 = ╱4e╱N╱ // 0x3d53 @0x6
0x3d4d…3d85 at0007 = ╱44╱D╱ // 0x3d54 @0x7
0x3d4d…3d85 at0008 = ╱50╱P╱ // 0x3d55 @0x8
0x3d4d…3d85 at0009 = ╱55╱U╱ // 0x3d56 @0x9
0x3d4d…3d85 at000a = ╱54╱T╱ // 0x3d57 @0xa
0x3d4d…3d85 at000b = ╱31╱1╱ // 0x3d58 @0xb
0x3d4d…3d85 at000c = ╱ed╱(╱ // 0x3d59 @0xc
0x3d4d…3d85 at000d = ╱35╱5╱ // 0x3d5a @0xd
0x3d4d…3d85 at000e = ╱30╱0╱ // 0x3d5b @0xe
0x3d4d…3d85 at000f = ╱fe0000c806╱ // 0x3d5c @0xf
0x3d4d…3d85 at0014 = ╱ec╱,╱ // 0x3d61 @0x14
0x3d4d…3d85 at0015 = ╱31╱1╱ // 0x3d62 @0x15
0x3d4d…3d85 at0016 = ╱30╱0╱ // 0x3d63 @0x16
0x3d4d…3d85 at0017 = ╱fe0000a004╱ // 0x3d64 @0x17
0x3d4d…3d85 at001c = ╱ec╱,╱ // 0x3d69 @0x1c
0x3d4d…3d85 at001d = ╱30╱0╱ // 0x3d6a @0x1d
0x3d4d…3d85 at001e = ╱fe00000000╱ // 0x3d6b @0x1e
0x3d4d…3d85 at0023 = ╱ec╱,╱ // 0x3d70 @0x23
0x3d4d…3d85 at0024 = ╱31╱1╱ // 0x3d71 @0x24
0x3d4d…3d85 at0025 = ╱30╱0╱ // 0x3d72 @0x25
0x3d4d…3d85 at0026 = ╱30╱0╱ // 0x3d73 @0x26
0x3d4d…3d85 at0027 = ╱30╱0╱ // 0x3d74 @0x27
0x3d4d…3d85 at0028 = ╱30╱0╱ // 0x3d75 @0x28
0x3d4d…3d85 at0029 = ╱30╱0╱ // 0x3d76 @0x29
0x3d4d…3d85 at002a = ╱30╱0╱ // 0x3d77 @0x2a
0x3d4d…3d85 at002b = ╱fe0024f414╱ // 0x3d78 @0x2b
0x3d4d…3d85 at0030 = ╱ec╱,╱ // 0x3d7d @0x30
0x3d4d…3d85 at0031 = ╱4c╱L╱ // 0x3d7e @0x31
0x3d4d…3d85 at0032 = ╱54╱T╱ // 0x3d7f @0x32
0x3d4d…3d85 at0033 = ╱58╱X╱ // 0x3d80 @0x33
0x3d4d…3d85 at0034 = ╱35╱5╱ // 0x3d81 @0x34
0x3d4d…3d85 at0035 = ╱ef╱$╱ // 0x3d82 @0x35
0x3d4d…3d85 at0036 = ╱ee╱)╱ // 0x3d83 @0x36
0x3d4d…3d85 at0037 = EOL // 0x3d84 @0x37
0x3d4d…3d85 }
0x3d85…3d93 caea 7180 ORDRENR=P
0x3d85…3d93 LineComalBin {
0x3d85…3d93 ptr = 0xcaea // 0x3d85 @0x0
0x3d85…3d93 lno = 0x1c0c // 0x3d87 @0x2
0x3d85…3d93 at0004 = ╱4f╱O╱ // 0x3d89 @0x4
0x3d85…3d93 at0005 = ╱52╱R╱ // 0x3d8a @0x5
0x3d85…3d93 at0006 = ╱44╱D╱ // 0x3d8b @0x6
0x3d85…3d93 at0007 = ╱52╱R╱ // 0x3d8c @0x7
0x3d85…3d93 at0008 = ╱45╱E╱ // 0x3d8d @0x8
0x3d85…3d93 at0009 = ╱4e╱N╱ // 0x3d8e @0x9
0x3d85…3d93 at000a = ╱52╱R╱ // 0x3d8f @0xa
0x3d85…3d93 at000b = ╱dc╱=╱ // 0x3d90 @0xb
0x3d85…3d93 at000c = ╱50╱P╱ // 0x3d91 @0xc
0x3d85…3d93 at000d = EOL // 0x3d92 @0xd
0x3d85…3d93 }
0x3d93…3da8 caff 7190 CURSOR 66,10
0x3d93…3da8 LineComalBin {
0x3d93…3da8 ptr = 0xcaff // 0x3d93 @0x0
0x3d93…3da8 lno = 0x1c16 // 0x3d95 @0x2
0x3d93…3da8 at0004 = ╱a1╱ CURSOR ╱ // 0x3d97 @0x4
0x3d93…3da8 at0005 = ╱36╱6╱ // 0x3d98 @0x5
0x3d93…3da8 at0006 = ╱36╱6╱ // 0x3d99 @0x6
0x3d93…3da8 at0007 = ╱fe00008407╱ // 0x3d9a @0x7
0x3d93…3da8 at000c = ╱ec╱,╱ // 0x3d9f @0xc
0x3d93…3da8 at000d = ╱31╱1╱ // 0x3da0 @0xd
0x3d93…3da8 at000e = ╱30╱0╱ // 0x3da1 @0xe
0x3d93…3da8 at000f = ╱fe0000a004╱ // 0x3da2 @0xf
0x3d93…3da8 at0014 = EOL // 0x3da7 @0x14
0x3d93…3da8 }
0x3da8…3dc5 cb1c 7200 PRINT USING "####### ":ORDRENR
0x3da8…3dc5 LineComalBin {
0x3da8…3dc5 ptr = 0xcb1c // 0x3da8 @0x0
0x3da8…3dc5 lno = 0x1c20 // 0x3daa @0x2
0x3da8…3dc5 at0004 = ╱92╱ PRINT ╱ // 0x3dac @0x4
0x3da8…3dc5 at0005 = ╱b9╱ USING ╱ // 0x3dad @0x5
0x3da8…3dc5 at0006 = ╱22╱"╱ // 0x3dae @0x6
0x3da8…3dc5 at0007 = ╱23╱#╱ // 0x3daf @0x7
0x3da8…3dc5 at0008 = ╱23╱#╱ // 0x3db0 @0x8
0x3da8…3dc5 at0009 = ╱23╱#╱ // 0x3db1 @0x9
0x3da8…3dc5 at000a = ╱23╱#╱ // 0x3db2 @0xa
0x3da8…3dc5 at000b = ╱23╱#╱ // 0x3db3 @0xb
0x3da8…3dc5 at000c = ╱23╱#╱ // 0x3db4 @0xc
0x3da8…3dc5 at000d = ╱23╱#╱ // 0x3db5 @0xd
0x3da8…3dc5 at000e = ╱20╱…╱ // 0x3db6 @0xe
0x3da8…3dc5 at000f = ╱20╱…╱ // 0x3db7 @0xf
0x3da8…3dc5 at0010 = ╱20╱…╱ // 0x3db8 @0x10
0x3da8…3dc5 at0011 = ╱20╱…╱ // 0x3db9 @0x11
0x3da8…3dc5 at0012 = ╱20╱…╱ // 0x3dba @0x12
0x3da8…3dc5 at0013 = ╱22╱"╱ // 0x3dbb @0x13
0x3da8…3dc5 at0014 = ╱f0╱:╱ // 0x3dbc @0x14
0x3da8…3dc5 at0015 = ╱4f╱O╱ // 0x3dbd @0x15
0x3da8…3dc5 at0016 = ╱52╱R╱ // 0x3dbe @0x16
0x3da8…3dc5 at0017 = ╱44╱D╱ // 0x3dbf @0x17
0x3da8…3dc5 at0018 = ╱52╱R╱ // 0x3dc0 @0x18
0x3da8…3dc5 at0019 = ╱45╱E╱ // 0x3dc1 @0x19
0x3da8…3dc5 at001a = ╱4e╱N╱ // 0x3dc2 @0x1a
0x3da8…3dc5 at001b = ╱52╱R╱ // 0x3dc3 @0x1b
0x3da8…3dc5 at001c = EOL // 0x3dc4 @0x1c
0x3da8…3dc5 }
0x3dc5…3dda cb31 7210 CURSOR 50,12
0x3dc5…3dda LineComalBin {
0x3dc5…3dda ptr = 0xcb31 // 0x3dc5 @0x0
0x3dc5…3dda lno = 0x1c2a // 0x3dc7 @0x2
0x3dc5…3dda at0004 = ╱a1╱ CURSOR ╱ // 0x3dc9 @0x4
0x3dc5…3dda at0005 = ╱35╱5╱ // 0x3dca @0x5
0x3dc5…3dda at0006 = ╱30╱0╱ // 0x3dcb @0x6
0x3dc5…3dda at0007 = ╱fe0000c806╱ // 0x3dcc @0x7
0x3dc5…3dda at000c = ╱ec╱,╱ // 0x3dd1 @0xc
0x3dc5…3dda at000d = ╱31╱1╱ // 0x3dd2 @0xd
0x3dc5…3dda at000e = ╱32╱2╱ // 0x3dd3 @0xe
0x3dc5…3dda at000f = ╱fe0000c004╱ // 0x3dd4 @0xf
0x3dc5…3dda at0014 = EOL // 0x3dd9 @0x14
0x3dc5…3dda }
0x3dda…3de7 cb3e 7220 PRINT "Dato:"
0x3dda…3de7 LineComalBin {
0x3dda…3de7 ptr = 0xcb3e // 0x3dda @0x0
0x3dda…3de7 lno = 0x1c34 // 0x3ddc @0x2
0x3dda…3de7 at0004 = ╱92╱ PRINT ╱ // 0x3dde @0x4
0x3dda…3de7 at0005 = ╱22╱"╱ // 0x3ddf @0x5
0x3dda…3de7 at0006 = ╱44╱D╱ // 0x3de0 @0x6
0x3dda…3de7 at0007 = ╱61╱a╱ // 0x3de1 @0x7
0x3dda…3de7 at0008 = ╱74╱t╱ // 0x3de2 @0x8
0x3dda…3de7 at0009 = ╱6f╱o╱ // 0x3de3 @0x9
0x3dda…3de7 at000a = ╱3a╱:╱ // 0x3de4 @0xa
0x3dda…3de7 at000b = ╱22╱"╱ // 0x3de5 @0xb
0x3dda…3de7 at000c = EOL // 0x3de6 @0xc
0x3dda…3de7 }
0x3de7…3df7 cb4e 7230 LIE=12
0x3de7…3df7 LineComalBin {
0x3de7…3df7 ptr = 0xcb4e // 0x3de7 @0x0
0x3de7…3df7 lno = 0x1c3e // 0x3de9 @0x2
0x3de7…3df7 at0004 = ╱4c╱L╱ // 0x3deb @0x4
0x3de7…3df7 at0005 = ╱49╱I╱ // 0x3dec @0x5
0x3de7…3df7 at0006 = ╱45╱E╱ // 0x3ded @0x6
0x3de7…3df7 at0007 = ╱dc╱=╱ // 0x3dee @0x7
0x3de7…3df7 at0008 = ╱31╱1╱ // 0x3def @0x8
0x3de7…3df7 at0009 = ╱32╱2╱ // 0x3df0 @0x9
0x3de7…3df7 at000a = ╱fe0000c004╱ // 0x3df1 @0xa
0x3de7…3df7 at000f = EOL // 0x3df6 @0xf
0x3de7…3df7 }
0x3df7…3e05 cb5c 7240 EXEC DATOINDT
0x3df7…3e05 LineComalBin {
0x3df7…3e05 ptr = 0xcb5c // 0x3df7 @0x0
0x3df7…3e05 lno = 0x1c48 // 0x3df9 @0x2
0x3df7…3e05 at0004 = ╱9d╱ EXEC ╱ // 0x3dfb @0x4
0x3df7…3e05 at0005 = ╱44╱D╱ // 0x3dfc @0x5
0x3df7…3e05 at0006 = ╱41╱A╱ // 0x3dfd @0x6
0x3df7…3e05 at0007 = ╱54╱T╱ // 0x3dfe @0x7
0x3df7…3e05 at0008 = ╱4f╱O╱ // 0x3dff @0x8
0x3df7…3e05 at0009 = ╱49╱I╱ // 0x3e00 @0x9
0x3df7…3e05 at000a = ╱4e╱N╱ // 0x3e01 @0xa
0x3df7…3e05 at000b = ╱44╱D╱ // 0x3e02 @0xb
0x3df7…3e05 at000c = ╱54╱T╱ // 0x3e03 @0xc
0x3df7…3e05 at000d = EOL // 0x3e04 @0xd
0x3df7…3e05 }
0x3e05…3e13 cb6a 7250 FDATO=DAT
0x3e05…3e13 LineComalBin {
0x3e05…3e13 ptr = 0xcb6a // 0x3e05 @0x0
0x3e05…3e13 lno = 0x1c52 // 0x3e07 @0x2
0x3e05…3e13 at0004 = ╱46╱F╱ // 0x3e09 @0x4
0x3e05…3e13 at0005 = ╱44╱D╱ // 0x3e0a @0x5
0x3e05…3e13 at0006 = ╱41╱A╱ // 0x3e0b @0x6
0x3e05…3e13 at0007 = ╱54╱T╱ // 0x3e0c @0x7
0x3e05…3e13 at0008 = ╱4f╱O╱ // 0x3e0d @0x8
0x3e05…3e13 at0009 = ╱dc╱=╱ // 0x3e0e @0x9
0x3e05…3e13 at000a = ╱44╱D╱ // 0x3e0f @0xa
0x3e05…3e13 at000b = ╱41╱A╱ // 0x3e10 @0xb
0x3e05…3e13 at000c = ╱54╱T╱ // 0x3e11 @0xc
0x3e05…3e13 at000d = EOL // 0x3e12 @0xd
0x3e05…3e13 }
0x3e13…3e22 cb79 7260 CURSOR W,14
0x3e13…3e22 LineComalBin {
0x3e13…3e22 ptr = 0xcb79 // 0x3e13 @0x0
0x3e13…3e22 lno = 0x1c5c // 0x3e15 @0x2
0x3e13…3e22 at0004 = ╱a1╱ CURSOR ╱ // 0x3e17 @0x4
0x3e13…3e22 at0005 = ╱57╱W╱ // 0x3e18 @0x5
0x3e13…3e22 at0006 = ╱ec╱,╱ // 0x3e19 @0x6
0x3e13…3e22 at0007 = ╱31╱1╱ // 0x3e1a @0x7
0x3e13…3e22 at0008 = ╱34╱4╱ // 0x3e1b @0x8
0x3e13…3e22 at0009 = ╱fe0000e004╱ // 0x3e1c @0x9
0x3e13…3e22 at000e = EOL // 0x3e21 @0xe
0x3e13…3e22 }
0x3e22…3e3e cb95 7270 INPUT "Levering: ",LEVTEKST$
0x3e22…3e3e LineComalBin {
0x3e22…3e3e ptr = 0xcb95 // 0x3e22 @0x0
0x3e22…3e3e lno = 0x1c66 // 0x3e24 @0x2
0x3e22…3e3e at0004 = ╱91╱ INPUT ╱ // 0x3e26 @0x4
0x3e22…3e3e at0005 = ╱22╱"╱ // 0x3e27 @0x5
0x3e22…3e3e at0006 = ╱4c╱L╱ // 0x3e28 @0x6
0x3e22…3e3e at0007 = ╱65╱e╱ // 0x3e29 @0x7
0x3e22…3e3e at0008 = ╱76╱v╱ // 0x3e2a @0x8
0x3e22…3e3e at0009 = ╱65╱e╱ // 0x3e2b @0x9
0x3e22…3e3e at000a = ╱72╱r╱ // 0x3e2c @0xa
0x3e22…3e3e at000b = ╱69╱i╱ // 0x3e2d @0xb
0x3e22…3e3e at000c = ╱6e╱n╱ // 0x3e2e @0xc
0x3e22…3e3e at000d = ╱67╱g╱ // 0x3e2f @0xd
0x3e22…3e3e at000e = ╱3a╱:╱ // 0x3e30 @0xe
0x3e22…3e3e at000f = ╱20╱…╱ // 0x3e31 @0xf
0x3e22…3e3e at0010 = ╱22╱"╱ // 0x3e32 @0x10
0x3e22…3e3e at0011 = ╱ec╱,╱ // 0x3e33 @0x11
0x3e22…3e3e at0012 = ╱4c╱L╱ // 0x3e34 @0x12
0x3e22…3e3e at0013 = ╱45╱E╱ // 0x3e35 @0x13
0x3e22…3e3e at0014 = ╱56╱V╱ // 0x3e36 @0x14
0x3e22…3e3e at0015 = ╱54╱T╱ // 0x3e37 @0x15
0x3e22…3e3e at0016 = ╱45╱E╱ // 0x3e38 @0x16
0x3e22…3e3e at0017 = ╱4b╱K╱ // 0x3e39 @0x17
0x3e22…3e3e at0018 = ╱53╱S╱ // 0x3e3a @0x18
0x3e22…3e3e at0019 = ╱54╱T╱ // 0x3e3b @0x19
0x3e22…3e3e at001a = ╱ef╱$╱ // 0x3e3c @0x1a
0x3e22…3e3e at001b = EOL // 0x3e3d @0x1b
0x3e22…3e3e }
0x3e3e…3e4c cba3 7280 LEVKODE=B
0x3e3e…3e4c LineComalBin {
0x3e3e…3e4c ptr = 0xcba3 // 0x3e3e @0x0
0x3e3e…3e4c lno = 0x1c70 // 0x3e40 @0x2
0x3e3e…3e4c at0004 = ╱4c╱L╱ // 0x3e42 @0x4
0x3e3e…3e4c at0005 = ╱45╱E╱ // 0x3e43 @0x5
0x3e3e…3e4c at0006 = ╱56╱V╱ // 0x3e44 @0x6
0x3e3e…3e4c at0007 = ╱4b╱K╱ // 0x3e45 @0x7
0x3e3e…3e4c at0008 = ╱4f╱O╱ // 0x3e46 @0x8
0x3e3e…3e4c at0009 = ╱44╱D╱ // 0x3e47 @0x9
0x3e3e…3e4c at000a = ╱45╱E╱ // 0x3e48 @0xa
0x3e3e…3e4c at000b = ╱dc╱=╱ // 0x3e49 @0xb
0x3e3e…3e4c at000c = ╱42╱B╱ // 0x3e4a @0xc
0x3e3e…3e4c at000d = EOL // 0x3e4b @0xd
0x3e3e…3e4c }
0x3e4c…3e70 cbc7 7290 IF LEN(LEVTEKST$)=B THEN LEVKODE=11
0x3e4c…3e70 LineComalBin {
0x3e4c…3e70 ptr = 0xcbc7 // 0x3e4c @0x0
0x3e4c…3e70 lno = 0x1c7a // 0x3e4e @0x2
0x3e4c…3e70 at0004 = ╱82╱ IF ╱ // 0x3e50 @0x4
0x3e4c…3e70 at0005 = ╱cc╱LEN╱ // 0x3e51 @0x5
0x3e4c…3e70 at0006 = ╱ed╱(╱ // 0x3e52 @0x6
0x3e4c…3e70 at0007 = ╱4c╱L╱ // 0x3e53 @0x7
0x3e4c…3e70 at0008 = ╱45╱E╱ // 0x3e54 @0x8
0x3e4c…3e70 at0009 = ╱56╱V╱ // 0x3e55 @0x9
0x3e4c…3e70 at000a = ╱54╱T╱ // 0x3e56 @0xa
0x3e4c…3e70 at000b = ╱45╱E╱ // 0x3e57 @0xb
0x3e4c…3e70 at000c = ╱4b╱K╱ // 0x3e58 @0xc
0x3e4c…3e70 at000d = ╱53╱S╱ // 0x3e59 @0xd
0x3e4c…3e70 at000e = ╱54╱T╱ // 0x3e5a @0xe
0x3e4c…3e70 at000f = ╱ef╱$╱ // 0x3e5b @0xf
0x3e4c…3e70 at0010 = ╱ee╱)╱ // 0x3e5c @0x10
0x3e4c…3e70 at0011 = ╱dc╱=╱ // 0x3e5d @0x11
0x3e4c…3e70 at0012 = ╱42╱B╱ // 0x3e5e @0x12
0x3e4c…3e70 at0013 = ╱b6╱ THEN ╱ // 0x3e5f @0x13
0x3e4c…3e70 at0014 = ╱4c╱L╱ // 0x3e60 @0x14
0x3e4c…3e70 at0015 = ╱45╱E╱ // 0x3e61 @0x15
0x3e4c…3e70 at0016 = ╱56╱V╱ // 0x3e62 @0x16
0x3e4c…3e70 at0017 = ╱4b╱K╱ // 0x3e63 @0x17
0x3e4c…3e70 at0018 = ╱4f╱O╱ // 0x3e64 @0x18
0x3e4c…3e70 at0019 = ╱44╱D╱ // 0x3e65 @0x19
0x3e4c…3e70 at001a = ╱45╱E╱ // 0x3e66 @0x1a
0x3e4c…3e70 at001b = ╱dc╱=╱ // 0x3e67 @0x1b
0x3e4c…3e70 at001c = ╱31╱1╱ // 0x3e68 @0x1c
0x3e4c…3e70 at001d = ╱31╱1╱ // 0x3e69 @0x1d
0x3e4c…3e70 at001e = ╱fe0000b004╱ // 0x3e6a @0x1e
0x3e4c…3e70 at0023 = EOL // 0x3e6f @0x23
0x3e4c…3e70 }
0x3e70…3ea3 cbfa 7300 EXEC INDPUT1(9,17,-9,-6,LTX6$)
0x3e70…3ea3 LineComalBin {
0x3e70…3ea3 ptr = 0xcbfa // 0x3e70 @0x0
0x3e70…3ea3 lno = 0x1c84 // 0x3e72 @0x2
0x3e70…3ea3 at0004 = ╱9d╱ EXEC ╱ // 0x3e74 @0x4
0x3e70…3ea3 at0005 = ╱49╱I╱ // 0x3e75 @0x5
0x3e70…3ea3 at0006 = ╱4e╱N╱ // 0x3e76 @0x6
0x3e70…3ea3 at0007 = ╱44╱D╱ // 0x3e77 @0x7
0x3e70…3ea3 at0008 = ╱50╱P╱ // 0x3e78 @0x8
0x3e70…3ea3 at0009 = ╱55╱U╱ // 0x3e79 @0x9
0x3e70…3ea3 at000a = ╱54╱T╱ // 0x3e7a @0xa
0x3e70…3ea3 at000b = ╱31╱1╱ // 0x3e7b @0xb
0x3e70…3ea3 at000c = ╱ed╱(╱ // 0x3e7c @0xc
0x3e70…3ea3 at000d = ╱39╱9╱ // 0x3e7d @0xd
0x3e70…3ea3 at000e = ╱fe00009004╱ // 0x3e7e @0xe
0x3e70…3ea3 at0013 = ╱ec╱,╱ // 0x3e83 @0x13
0x3e70…3ea3 at0014 = ╱31╱1╱ // 0x3e84 @0x14
0x3e70…3ea3 at0015 = ╱37╱7╱ // 0x3e85 @0x15
0x3e70…3ea3 at0016 = ╱fe00008805╱ // 0x3e86 @0x16
0x3e70…3ea3 at001b = ╱ec╱,╱ // 0x3e8b @0x1b
0x3e70…3ea3 at001c = ╱e9╱-╱ // 0x3e8c @0x1c
0x3e70…3ea3 at001d = ╱39╱9╱ // 0x3e8d @0x1d
0x3e70…3ea3 at001e = ╱fe00009004╱ // 0x3e8e @0x1e
0x3e70…3ea3 at0023 = ╱ec╱,╱ // 0x3e93 @0x23
0x3e70…3ea3 at0024 = ╱e9╱-╱ // 0x3e94 @0x24
0x3e70…3ea3 at0025 = ╱36╱6╱ // 0x3e95 @0x25
0x3e70…3ea3 at0026 = ╱fe0000c003╱ // 0x3e96 @0x26
0x3e70…3ea3 at002b = ╱ec╱,╱ // 0x3e9b @0x2b
0x3e70…3ea3 at002c = ╱4c╱L╱ // 0x3e9c @0x2c
0x3e70…3ea3 at002d = ╱54╱T╱ // 0x3e9d @0x2d
0x3e70…3ea3 at002e = ╱58╱X╱ // 0x3e9e @0x2e
0x3e70…3ea3 at002f = ╱36╱6╱ // 0x3e9f @0x2f
0x3e70…3ea3 at0030 = ╱ef╱$╱ // 0x3ea0 @0x30
0x3e70…3ea3 at0031 = ╱ee╱)╱ // 0x3ea1 @0x31
0x3e70…3ea3 at0032 = EOL // 0x3ea2 @0x32
0x3e70…3ea3 }
0x3ea3…3ea9 cc00 7310 ENDIF
0x3ea3…3ea9 LineComalBin {
0x3ea3…3ea9 ptr = 0xcc00 // 0x3ea3 @0x0
0x3ea3…3ea9 lno = 0x1c8e // 0x3ea5 @0x2
0x3ea3…3ea9 at0004 = ╱9b╱ ENDIF ╱ // 0x3ea7 @0x4
0x3ea3…3ea9 at0005 = EOL // 0x3ea8 @0x5
0x3ea3…3ea9 }
0x3ea9…3eb8 cc0f 7320 UNTIL P=-7
0x3ea9…3eb8 LineComalBin {
0x3ea9…3eb8 ptr = 0xcc0f // 0x3ea9 @0x0
0x3ea9…3eb8 lno = 0x1c98 // 0x3eab @0x2
0x3ea9…3eb8 at0004 = ╱98╱ UNTIL ╱ // 0x3ead @0x4
0x3ea9…3eb8 at0005 = ╱50╱P╱ // 0x3eae @0x5
0x3ea9…3eb8 at0006 = ╱dc╱=╱ // 0x3eaf @0x6
0x3ea9…3eb8 at0007 = ╱e9╱-╱ // 0x3eb0 @0x7
0x3ea9…3eb8 at0008 = ╱37╱7╱ // 0x3eb1 @0x8
0x3ea9…3eb8 at0009 = ╱fe0000e003╱ // 0x3eb2 @0x9
0x3ea9…3eb8 at000e = EOL // 0x3eb7 @0xe
0x3ea9…3eb8 }
0x3eb8…3ec9 cc20 7330 IF KUNDENR=B THEN EXIT
0x3eb8…3ec9 LineComalBin {
0x3eb8…3ec9 ptr = 0xcc20 // 0x3eb8 @0x0
0x3eb8…3ec9 lno = 0x1ca2 // 0x3eba @0x2
0x3eb8…3ec9 at0004 = ╱82╱ IF ╱ // 0x3ebc @0x4
0x3eb8…3ec9 at0005 = ╱4b╱K╱ // 0x3ebd @0x5
0x3eb8…3ec9 at0006 = ╱55╱U╱ // 0x3ebe @0x6
0x3eb8…3ec9 at0007 = ╱4e╱N╱ // 0x3ebf @0x7
0x3eb8…3ec9 at0008 = ╱44╱D╱ // 0x3ec0 @0x8
0x3eb8…3ec9 at0009 = ╱45╱E╱ // 0x3ec1 @0x9
0x3eb8…3ec9 at000a = ╱4e╱N╱ // 0x3ec2 @0xa
0x3eb8…3ec9 at000b = ╱52╱R╱ // 0x3ec3 @0xb
0x3eb8…3ec9 at000c = ╱dc╱=╱ // 0x3ec4 @0xc
0x3eb8…3ec9 at000d = ╱42╱B╱ // 0x3ec5 @0xd
0x3eb8…3ec9 at000e = ╱b6╱ THEN ╱ // 0x3ec6 @0xe
0x3eb8…3ec9 at000f = ╱99╱ EXIT ╱ // 0x3ec7 @0xf
0x3eb8…3ec9 at0010 = EOL // 0x3ec8 @0x10
0x3eb8…3ec9 }
0x3ec9…3f0e cc65 7340 IF APOS<=(MFKL+5)*MFAK+G*MFKL-15 AND FJPOST+AFAKT+AKRED<=MFAK THEN
0x3ec9…3f0e LineComalBin {
0x3ec9…3f0e ptr = 0xcc65 // 0x3ec9 @0x0
0x3ec9…3f0e lno = 0x1cac // 0x3ecb @0x2
0x3ec9…3f0e at0004 = ╱9c╱ IF ╱ // 0x3ecd @0x4
0x3ec9…3f0e at0005 = ╱41╱A╱ // 0x3ece @0x5
0x3ec9…3f0e at0006 = ╱50╱P╱ // 0x3ecf @0x6
0x3ec9…3f0e at0007 = ╱4f╱O╱ // 0x3ed0 @0x7
0x3ec9…3f0e at0008 = ╱53╱S╱ // 0x3ed1 @0x8
0x3ec9…3f0e at0009 = ╱df╱<=╱ // 0x3ed2 @0x9
0x3ec9…3f0e at000a = ╱ed╱(╱ // 0x3ed3 @0xa
0x3ec9…3f0e at000b = ╱4d╱M╱ // 0x3ed4 @0xb
0x3ec9…3f0e at000c = ╱46╱F╱ // 0x3ed5 @0xc
0x3ec9…3f0e at000d = ╱4b╱K╱ // 0x3ed6 @0xd
0x3ec9…3f0e at000e = ╱4c╱L╱ // 0x3ed7 @0xe
0x3ec9…3f0e at000f = ╱e2╱+╱ // 0x3ed8 @0xf
0x3ec9…3f0e at0010 = ╱35╱5╱ // 0x3ed9 @0x10
0x3ec9…3f0e at0011 = ╱fe0000a003╱ // 0x3eda @0x11
0x3ec9…3f0e at0016 = ╱ee╱)╱ // 0x3edf @0x16
0x3ec9…3f0e at0017 = ╱e4╱*╱ // 0x3ee0 @0x17
0x3ec9…3f0e at0018 = ╱4d╱M╱ // 0x3ee1 @0x18
0x3ec9…3f0e at0019 = ╱46╱F╱ // 0x3ee2 @0x19
0x3ec9…3f0e at001a = ╱41╱A╱ // 0x3ee3 @0x1a
0x3ec9…3f0e at001b = ╱4b╱K╱ // 0x3ee4 @0x1b
0x3ec9…3f0e at001c = ╱e2╱+╱ // 0x3ee5 @0x1c
0x3ec9…3f0e at001d = ╱47╱G╱ // 0x3ee6 @0x1d
0x3ec9…3f0e at001e = ╱e4╱*╱ // 0x3ee7 @0x1e
0x3ec9…3f0e at001f = ╱4d╱M╱ // 0x3ee8 @0x1f
0x3ec9…3f0e at0020 = ╱46╱F╱ // 0x3ee9 @0x20
0x3ec9…3f0e at0021 = ╱4b╱K╱ // 0x3eea @0x21
0x3ec9…3f0e at0022 = ╱4c╱L╱ // 0x3eeb @0x22
0x3ec9…3f0e at0023 = ╱e3╱-╱ // 0x3eec @0x23
0x3ec9…3f0e at0024 = ╱31╱1╱ // 0x3eed @0x24
0x3ec9…3f0e at0025 = ╱35╱5╱ // 0x3eee @0x25
0x3ec9…3f0e at0026 = ╱fe0000f004╱ // 0x3eef @0x26
0x3ec9…3f0e at002b = ╱da╱ AND ╱ // 0x3ef4 @0x2b
0x3ec9…3f0e at002c = ╱46╱F╱ // 0x3ef5 @0x2c
0x3ec9…3f0e at002d = ╱4a╱J╱ // 0x3ef6 @0x2d
0x3ec9…3f0e at002e = ╱50╱P╱ // 0x3ef7 @0x2e
0x3ec9…3f0e at002f = ╱4f╱O╱ // 0x3ef8 @0x2f
0x3ec9…3f0e at0030 = ╱53╱S╱ // 0x3ef9 @0x30
0x3ec9…3f0e at0031 = ╱54╱T╱ // 0x3efa @0x31
0x3ec9…3f0e at0032 = ╱e2╱+╱ // 0x3efb @0x32
0x3ec9…3f0e at0033 = ╱41╱A╱ // 0x3efc @0x33
0x3ec9…3f0e at0034 = ╱46╱F╱ // 0x3efd @0x34
0x3ec9…3f0e at0035 = ╱41╱A╱ // 0x3efe @0x35
0x3ec9…3f0e at0036 = ╱4b╱K╱ // 0x3eff @0x36
0x3ec9…3f0e at0037 = ╱54╱T╱ // 0x3f00 @0x37
0x3ec9…3f0e at0038 = ╱e2╱+╱ // 0x3f01 @0x38
0x3ec9…3f0e at0039 = ╱41╱A╱ // 0x3f02 @0x39
0x3ec9…3f0e at003a = ╱4b╱K╱ // 0x3f03 @0x3a
0x3ec9…3f0e at003b = ╱52╱R╱ // 0x3f04 @0x3b
0x3ec9…3f0e at003c = ╱45╱E╱ // 0x3f05 @0x3c
0x3ec9…3f0e at003d = ╱44╱D╱ // 0x3f06 @0x3d
0x3ec9…3f0e at003e = ╱df╱<=╱ // 0x3f07 @0x3e
0x3ec9…3f0e at003f = ╱4d╱M╱ // 0x3f08 @0x3f
0x3ec9…3f0e at0040 = ╱46╱F╱ // 0x3f09 @0x40
0x3ec9…3f0e at0041 = ╱41╱A╱ // 0x3f0a @0x41
0x3ec9…3f0e at0042 = ╱4b╱K╱ // 0x3f0b @0x42
0x3ec9…3f0e at0043 = ╱b6╱ THEN ╱ // 0x3f0c @0x43
0x3ec9…3f0e at0044 = EOL // 0x3f0d @0x44
0x3ec9…3f0e }
0x3f0e…3f1c cc73 7350 EXEC FAKHOVED
0x3f0e…3f1c LineComalBin {
0x3f0e…3f1c ptr = 0xcc73 // 0x3f0e @0x0
0x3f0e…3f1c lno = 0x1cb6 // 0x3f10 @0x2
0x3f0e…3f1c at0004 = ╱9d╱ EXEC ╱ // 0x3f12 @0x4
0x3f0e…3f1c at0005 = ╱46╱F╱ // 0x3f13 @0x5
0x3f0e…3f1c at0006 = ╱41╱A╱ // 0x3f14 @0x6
0x3f0e…3f1c at0007 = ╱4b╱K╱ // 0x3f15 @0x7
0x3f0e…3f1c at0008 = ╱48╱H╱ // 0x3f16 @0x8
0x3f0e…3f1c at0009 = ╱4f╱O╱ // 0x3f17 @0x9
0x3f0e…3f1c at000a = ╱56╱V╱ // 0x3f18 @0xa
0x3f0e…3f1c at000b = ╱45╱E╱ // 0x3f19 @0xb
0x3f0e…3f1c at000c = ╱44╱D╱ // 0x3f1a @0xc
0x3f0e…3f1c at000d = EOL // 0x3f1b @0xd
0x3f0e…3f1c }
0x3f1c…3f27 cc7e 7360 VLIN=E
0x3f1c…3f27 LineComalBin {
0x3f1c…3f27 ptr = 0xcc7e // 0x3f1c @0x0
0x3f1c…3f27 lno = 0x1cc0 // 0x3f1e @0x2
0x3f1c…3f27 at0004 = ╱56╱V╱ // 0x3f20 @0x4
0x3f1c…3f27 at0005 = ╱4c╱L╱ // 0x3f21 @0x5
0x3f1c…3f27 at0006 = ╱49╱I╱ // 0x3f22 @0x6
0x3f1c…3f27 at0007 = ╱4e╱N╱ // 0x3f23 @0x7
0x3f1c…3f27 at0008 = ╱dc╱=╱ // 0x3f24 @0x8
0x3f1c…3f27 at0009 = ╱45╱E╱ // 0x3f25 @0x9
0x3f1c…3f27 at000a = EOL // 0x3f26 @0xa
0x3f1c…3f27 }
0x3f27…3f2d cc84 7370 REPEAT
0x3f27…3f2d LineComalBin {
0x3f27…3f2d ptr = 0xcc84 // 0x3f27 @0x0
0x3f27…3f2d lno = 0x1cca // 0x3f29 @0x2
0x3f27…3f2d at0004 = ╱97╱ REPEAT ╱ // 0x3f2b @0x4
0x3f27…3f2d at0005 = EOL // 0x3f2c @0x5
0x3f27…3f2d }
0x3f2d…3f4f cca6 7380 AKOD(VLIN,E)=B;AKOD(VLIN,G)=B
0x3f2d…3f4f LineComalBin {
0x3f2d…3f4f ptr = 0xcca6 // 0x3f2d @0x0
0x3f2d…3f4f lno = 0x1cd4 // 0x3f2f @0x2
0x3f2d…3f4f at0004 = ╱41╱A╱ // 0x3f31 @0x4
0x3f2d…3f4f at0005 = ╱4b╱K╱ // 0x3f32 @0x5
0x3f2d…3f4f at0006 = ╱4f╱O╱ // 0x3f33 @0x6
0x3f2d…3f4f at0007 = ╱44╱D╱ // 0x3f34 @0x7
0x3f2d…3f4f at0008 = ╱ed╱(╱ // 0x3f35 @0x8
0x3f2d…3f4f at0009 = ╱56╱V╱ // 0x3f36 @0x9
0x3f2d…3f4f at000a = ╱4c╱L╱ // 0x3f37 @0xa
0x3f2d…3f4f at000b = ╱49╱I╱ // 0x3f38 @0xb
0x3f2d…3f4f at000c = ╱4e╱N╱ // 0x3f39 @0xc
0x3f2d…3f4f at000d = ╱ec╱,╱ // 0x3f3a @0xd
0x3f2d…3f4f at000e = ╱45╱E╱ // 0x3f3b @0xe
0x3f2d…3f4f at000f = ╱ee╱)╱ // 0x3f3c @0xf
0x3f2d…3f4f at0010 = ╱dc╱=╱ // 0x3f3d @0x10
0x3f2d…3f4f at0011 = ╱42╱B╱ // 0x3f3e @0x11
0x3f2d…3f4f at0012 = ╱eb╱;╱ // 0x3f3f @0x12
0x3f2d…3f4f at0013 = ╱41╱A╱ // 0x3f40 @0x13
0x3f2d…3f4f at0014 = ╱4b╱K╱ // 0x3f41 @0x14
0x3f2d…3f4f at0015 = ╱4f╱O╱ // 0x3f42 @0x15
0x3f2d…3f4f at0016 = ╱44╱D╱ // 0x3f43 @0x16
0x3f2d…3f4f at0017 = ╱ed╱(╱ // 0x3f44 @0x17
0x3f2d…3f4f at0018 = ╱56╱V╱ // 0x3f45 @0x18
0x3f2d…3f4f at0019 = ╱4c╱L╱ // 0x3f46 @0x19
0x3f2d…3f4f at001a = ╱49╱I╱ // 0x3f47 @0x1a
0x3f2d…3f4f at001b = ╱4e╱N╱ // 0x3f48 @0x1b
0x3f2d…3f4f at001c = ╱ec╱,╱ // 0x3f49 @0x1c
0x3f2d…3f4f at001d = ╱47╱G╱ // 0x3f4a @0x1d
0x3f2d…3f4f at001e = ╱ee╱)╱ // 0x3f4b @0x1e
0x3f2d…3f4f at001f = ╱dc╱=╱ // 0x3f4c @0x1f
0x3f2d…3f4f at0020 = ╱42╱B╱ // 0x3f4d @0x20
0x3f2d…3f4f at0021 = EOL // 0x3f4e @0x21
0x3f2d…3f4f }
0x3f4f…3f5d ccb4 7390 EXEC VARELINI
0x3f4f…3f5d LineComalBin {
0x3f4f…3f5d ptr = 0xccb4 // 0x3f4f @0x0
0x3f4f…3f5d lno = 0x1cde // 0x3f51 @0x2
0x3f4f…3f5d at0004 = ╱9d╱ EXEC ╱ // 0x3f53 @0x4
0x3f4f…3f5d at0005 = ╱56╱V╱ // 0x3f54 @0x5
0x3f4f…3f5d at0006 = ╱41╱A╱ // 0x3f55 @0x6
0x3f4f…3f5d at0007 = ╱52╱R╱ // 0x3f56 @0x7
0x3f4f…3f5d at0008 = ╱45╱E╱ // 0x3f57 @0x8
0x3f4f…3f5d at0009 = ╱4c╱L╱ // 0x3f58 @0x9
0x3f4f…3f5d at000a = ╱49╱I╱ // 0x3f59 @0xa
0x3f4f…3f5d at000b = ╱4e╱N╱ // 0x3f5a @0xb
0x3f4f…3f5d at000c = ╱49╱I╱ // 0x3f5b @0xc
0x3f4f…3f5d at000d = EOL // 0x3f5c @0xd
0x3f4f…3f5d }
0x3f5d…3f6d ccc4 7400 IF VARENR=B THEN EXIT
0x3f5d…3f6d LineComalBin {
0x3f5d…3f6d ptr = 0xccc4 // 0x3f5d @0x0
0x3f5d…3f6d lno = 0x1ce8 // 0x3f5f @0x2
0x3f5d…3f6d at0004 = ╱82╱ IF ╱ // 0x3f61 @0x4
0x3f5d…3f6d at0005 = ╱56╱V╱ // 0x3f62 @0x5
0x3f5d…3f6d at0006 = ╱41╱A╱ // 0x3f63 @0x6
0x3f5d…3f6d at0007 = ╱52╱R╱ // 0x3f64 @0x7
0x3f5d…3f6d at0008 = ╱45╱E╱ // 0x3f65 @0x8
0x3f5d…3f6d at0009 = ╱4e╱N╱ // 0x3f66 @0x9
0x3f5d…3f6d at000a = ╱52╱R╱ // 0x3f67 @0xa
0x3f5d…3f6d at000b = ╱dc╱=╱ // 0x3f68 @0xb
0x3f5d…3f6d at000c = ╱42╱B╱ // 0x3f69 @0xc
0x3f5d…3f6d at000d = ╱b6╱ THEN ╱ // 0x3f6a @0xd
0x3f5d…3f6d at000e = ╱99╱ EXIT ╱ // 0x3f6b @0xe
0x3f5d…3f6d at000f = EOL // 0x3f6c @0xf
0x3f5d…3f6d }
0x3f6d…3f87 ccde 7410 VLIN=VLIN+E;LIE=LIE+E
0x3f6d…3f87 LineComalBin {
0x3f6d…3f87 ptr = 0xccde // 0x3f6d @0x0
0x3f6d…3f87 lno = 0x1cf2 // 0x3f6f @0x2
0x3f6d…3f87 at0004 = ╱56╱V╱ // 0x3f71 @0x4
0x3f6d…3f87 at0005 = ╱4c╱L╱ // 0x3f72 @0x5
0x3f6d…3f87 at0006 = ╱49╱I╱ // 0x3f73 @0x6
0x3f6d…3f87 at0007 = ╱4e╱N╱ // 0x3f74 @0x7
0x3f6d…3f87 at0008 = ╱dc╱=╱ // 0x3f75 @0x8
0x3f6d…3f87 at0009 = ╱56╱V╱ // 0x3f76 @0x9
0x3f6d…3f87 at000a = ╱4c╱L╱ // 0x3f77 @0xa
0x3f6d…3f87 at000b = ╱49╱I╱ // 0x3f78 @0xb
0x3f6d…3f87 at000c = ╱4e╱N╱ // 0x3f79 @0xc
0x3f6d…3f87 at000d = ╱e2╱+╱ // 0x3f7a @0xd
0x3f6d…3f87 at000e = ╱45╱E╱ // 0x3f7b @0xe
0x3f6d…3f87 at000f = ╱eb╱;╱ // 0x3f7c @0xf
0x3f6d…3f87 at0010 = ╱4c╱L╱ // 0x3f7d @0x10
0x3f6d…3f87 at0011 = ╱49╱I╱ // 0x3f7e @0x11
0x3f6d…3f87 at0012 = ╱45╱E╱ // 0x3f7f @0x12
0x3f6d…3f87 at0013 = ╱dc╱=╱ // 0x3f80 @0x13
0x3f6d…3f87 at0014 = ╱4c╱L╱ // 0x3f81 @0x14
0x3f6d…3f87 at0015 = ╱49╱I╱ // 0x3f82 @0x15
0x3f6d…3f87 at0016 = ╱45╱E╱ // 0x3f83 @0x16
0x3f6d…3f87 at0017 = ╱e2╱+╱ // 0x3f84 @0x17
0x3f6d…3f87 at0018 = ╱45╱E╱ // 0x3f85 @0x18
0x3f6d…3f87 at0019 = EOL // 0x3f86 @0x19
0x3f6d…3f87 }
0x3f87…3f95 ccec 7420 EXEC LINITEST
0x3f87…3f95 LineComalBin {
0x3f87…3f95 ptr = 0xccec // 0x3f87 @0x0
0x3f87…3f95 lno = 0x1cfc // 0x3f89 @0x2
0x3f87…3f95 at0004 = ╱9d╱ EXEC ╱ // 0x3f8b @0x4
0x3f87…3f95 at0005 = ╱4c╱L╱ // 0x3f8c @0x5
0x3f87…3f95 at0006 = ╱49╱I╱ // 0x3f8d @0x6
0x3f87…3f95 at0007 = ╱4e╱N╱ // 0x3f8e @0x7
0x3f87…3f95 at0008 = ╱49╱I╱ // 0x3f8f @0x8
0x3f87…3f95 at0009 = ╱54╱T╱ // 0x3f90 @0x9
0x3f87…3f95 at000a = ╱45╱E╱ // 0x3f91 @0xa
0x3f87…3f95 at000b = ╱53╱S╱ // 0x3f92 @0xb
0x3f87…3f95 at000c = ╱54╱T╱ // 0x3f93 @0xc
0x3f87…3f95 at000d = EOL // 0x3f94 @0xd
0x3f87…3f95 }
0x3f95…3fad cd04 7430 UNTIL VARENR=B OR VLIN>MFKL
0x3f95…3fad LineComalBin {
0x3f95…3fad ptr = 0xcd04 // 0x3f95 @0x0
0x3f95…3fad lno = 0x1d06 // 0x3f97 @0x2
0x3f95…3fad at0004 = ╱98╱ UNTIL ╱ // 0x3f99 @0x4
0x3f95…3fad at0005 = ╱56╱V╱ // 0x3f9a @0x5
0x3f95…3fad at0006 = ╱41╱A╱ // 0x3f9b @0x6
0x3f95…3fad at0007 = ╱52╱R╱ // 0x3f9c @0x7
0x3f95…3fad at0008 = ╱45╱E╱ // 0x3f9d @0x8
0x3f95…3fad at0009 = ╱4e╱N╱ // 0x3f9e @0x9
0x3f95…3fad at000a = ╱52╱R╱ // 0x3f9f @0xa
0x3f95…3fad at000b = ╱dc╱=╱ // 0x3fa0 @0xb
0x3f95…3fad at000c = ╱42╱B╱ // 0x3fa1 @0xc
0x3f95…3fad at000d = ╱db╱ OR ╱ // 0x3fa2 @0xd
0x3f95…3fad at000e = ╱56╱V╱ // 0x3fa3 @0xe
0x3f95…3fad at000f = ╱4c╱L╱ // 0x3fa4 @0xf
0x3f95…3fad at0010 = ╱49╱I╱ // 0x3fa5 @0x10
0x3f95…3fad at0011 = ╱4e╱N╱ // 0x3fa6 @0x11
0x3f95…3fad at0012 = ╱de╱>╱ // 0x3fa7 @0x12
0x3f95…3fad at0013 = ╱4d╱M╱ // 0x3fa8 @0x13
0x3f95…3fad at0014 = ╱46╱F╱ // 0x3fa9 @0x14
0x3f95…3fad at0015 = ╱4b╱K╱ // 0x3faa @0x15
0x3f95…3fad at0016 = ╱4c╱L╱ // 0x3fab @0x16
0x3f95…3fad at0017 = EOL // 0x3fac @0x17
0x3f95…3fad }
0x3fad…3fbd cd14 7440 VLIN=VLIN-E
0x3fad…3fbd LineComalBin {
0x3fad…3fbd ptr = 0xcd14 // 0x3fad @0x0
0x3fad…3fbd lno = 0x1d10 // 0x3faf @0x2
0x3fad…3fbd at0004 = ╱56╱V╱ // 0x3fb1 @0x4
0x3fad…3fbd at0005 = ╱4c╱L╱ // 0x3fb2 @0x5
0x3fad…3fbd at0006 = ╱49╱I╱ // 0x3fb3 @0x6
0x3fad…3fbd at0007 = ╱4e╱N╱ // 0x3fb4 @0x7
0x3fad…3fbd at0008 = ╱dc╱=╱ // 0x3fb5 @0x8
0x3fad…3fbd at0009 = ╱56╱V╱ // 0x3fb6 @0x9
0x3fad…3fbd at000a = ╱4c╱L╱ // 0x3fb7 @0xa
0x3fad…3fbd at000b = ╱49╱I╱ // 0x3fb8 @0xb
0x3fad…3fbd at000c = ╱4e╱N╱ // 0x3fb9 @0xc
0x3fad…3fbd at000d = ╱e3╱-╱ // 0x3fba @0xd
0x3fad…3fbd at000e = ╱45╱E╱ // 0x3fbb @0xe
0x3fad…3fbd at000f = EOL // 0x3fbc @0xf
0x3fad…3fbd }
0x3fbd…3fca cd21 7450 IF VLIN>B THEN
0x3fbd…3fca LineComalBin {
0x3fbd…3fca ptr = 0xcd21 // 0x3fbd @0x0
0x3fbd…3fca lno = 0x1d1a // 0x3fbf @0x2
0x3fbd…3fca at0004 = ╱9c╱ IF ╱ // 0x3fc1 @0x4
0x3fbd…3fca at0005 = ╱56╱V╱ // 0x3fc2 @0x5
0x3fbd…3fca at0006 = ╱4c╱L╱ // 0x3fc3 @0x6
0x3fbd…3fca at0007 = ╱49╱I╱ // 0x3fc4 @0x7
0x3fbd…3fca at0008 = ╱4e╱N╱ // 0x3fc5 @0x8
0x3fbd…3fca at0009 = ╱de╱>╱ // 0x3fc6 @0x9
0x3fbd…3fca at000a = ╱42╱B╱ // 0x3fc7 @0xa
0x3fbd…3fca at000b = ╱b6╱ THEN ╱ // 0x3fc8 @0xb
0x3fbd…3fca at000c = EOL // 0x3fc9 @0xc
0x3fbd…3fca }
0x3fca…3fdc cd33 7460 IF LIE>16 THEN
0x3fca…3fdc LineComalBin {
0x3fca…3fdc ptr = 0xcd33 // 0x3fca @0x0
0x3fca…3fdc lno = 0x1d24 // 0x3fcc @0x2
0x3fca…3fdc at0004 = ╱9c╱ IF ╱ // 0x3fce @0x4
0x3fca…3fdc at0005 = ╱4c╱L╱ // 0x3fcf @0x5
0x3fca…3fdc at0006 = ╱49╱I╱ // 0x3fd0 @0x6
0x3fca…3fdc at0007 = ╱45╱E╱ // 0x3fd1 @0x7
0x3fca…3fdc at0008 = ╱de╱>╱ // 0x3fd2 @0x8
0x3fca…3fdc at0009 = ╱31╱1╱ // 0x3fd3 @0x9
0x3fca…3fdc at000a = ╱36╱6╱ // 0x3fd4 @0xa
0x3fca…3fdc at000b = ╱fe00008005╱ // 0x3fd5 @0xb
0x3fca…3fdc at0010 = ╱b6╱ THEN ╱ // 0x3fda @0x10
0x3fca…3fdc at0011 = EOL // 0x3fdb @0x11
0x3fca…3fdc }
0x3fdc…3fea cd41 7470 EXEC FAKHOVED
0x3fdc…3fea LineComalBin {
0x3fdc…3fea ptr = 0xcd41 // 0x3fdc @0x0
0x3fdc…3fea lno = 0x1d2e // 0x3fde @0x2
0x3fdc…3fea at0004 = ╱9d╱ EXEC ╱ // 0x3fe0 @0x4
0x3fdc…3fea at0005 = ╱46╱F╱ // 0x3fe1 @0x5
0x3fdc…3fea at0006 = ╱41╱A╱ // 0x3fe2 @0x6
0x3fdc…3fea at0007 = ╱4b╱K╱ // 0x3fe3 @0x7
0x3fdc…3fea at0008 = ╱48╱H╱ // 0x3fe4 @0x8
0x3fdc…3fea at0009 = ╱4f╱O╱ // 0x3fe5 @0x9
0x3fdc…3fea at000a = ╱56╱V╱ // 0x3fe6 @0xa
0x3fdc…3fea at000b = ╱45╱E╱ // 0x3fe7 @0xb
0x3fdc…3fea at000c = ╱44╱D╱ // 0x3fe8 @0xc
0x3fdc…3fea at000d = EOL // 0x3fe9 @0xd
0x3fdc…3fea }
0x3fea…4002 cd59 7480 FOR LIE=5 TO 16
0x3fea…4002 LineComalBin {
0x3fea…4002 ptr = 0xcd59 // 0x3fea @0x0
0x3fea…4002 lno = 0x1d38 // 0x3fec @0x2
0x3fea…4002 at0004 = ╱83╱ FOR ╱ // 0x3fee @0x4
0x3fea…4002 at0005 = ╱4c╱L╱ // 0x3fef @0x5
0x3fea…4002 at0006 = ╱49╱I╱ // 0x3ff0 @0x6
0x3fea…4002 at0007 = ╱45╱E╱ // 0x3ff1 @0x7
0x3fea…4002 at0008 = ╱dc╱=╱ // 0x3ff2 @0x8
0x3fea…4002 at0009 = ╱35╱5╱ // 0x3ff3 @0x9
0x3fea…4002 at000a = ╱fe0000a003╱ // 0x3ff4 @0xa
0x3fea…4002 at000f = ╱b7╱ TO ╱ // 0x3ff9 @0xf
0x3fea…4002 at0010 = ╱31╱1╱ // 0x3ffa @0x10
0x3fea…4002 at0011 = ╱36╱6╱ // 0x3ffb @0x11
0x3fea…4002 at0012 = ╱fe00008005╱ // 0x3ffc @0x12
0x3fea…4002 at0017 = EOL // 0x4001 @0x17
0x3fea…4002 }
0x4002…4019 cd70 7490 J=VLIN+LIE-16
0x4002…4019 LineComalBin {
0x4002…4019 ptr = 0xcd70 // 0x4002 @0x0
0x4002…4019 lno = 0x1d42 // 0x4004 @0x2
0x4002…4019 at0004 = ╱4a╱J╱ // 0x4006 @0x4
0x4002…4019 at0005 = ╱dc╱=╱ // 0x4007 @0x5
0x4002…4019 at0006 = ╱56╱V╱ // 0x4008 @0x6
0x4002…4019 at0007 = ╱4c╱L╱ // 0x4009 @0x7
0x4002…4019 at0008 = ╱49╱I╱ // 0x400a @0x8
0x4002…4019 at0009 = ╱4e╱N╱ // 0x400b @0x9
0x4002…4019 at000a = ╱e2╱+╱ // 0x400c @0xa
0x4002…4019 at000b = ╱4c╱L╱ // 0x400d @0xb
0x4002…4019 at000c = ╱49╱I╱ // 0x400e @0xc
0x4002…4019 at000d = ╱45╱E╱ // 0x400f @0xd
0x4002…4019 at000e = ╱e3╱-╱ // 0x4010 @0xe
0x4002…4019 at000f = ╱31╱1╱ // 0x4011 @0xf
0x4002…4019 at0010 = ╱36╱6╱ // 0x4012 @0x10
0x4002…4019 at0011 = ╱fe00008005╱ // 0x4013 @0x11
0x4002…4019 at0016 = EOL // 0x4018 @0x16
0x4002…4019 }
0x4019…4025 cd7c 7500 EXEC VUD(J)
0x4019…4025 LineComalBin {
0x4019…4025 ptr = 0xcd7c // 0x4019 @0x0
0x4019…4025 lno = 0x1d4c // 0x401b @0x2
0x4019…4025 at0004 = ╱9d╱ EXEC ╱ // 0x401d @0x4
0x4019…4025 at0005 = ╱56╱V╱ // 0x401e @0x5
0x4019…4025 at0006 = ╱55╱U╱ // 0x401f @0x6
0x4019…4025 at0007 = ╱44╱D╱ // 0x4020 @0x7
0x4019…4025 at0008 = ╱ed╱(╱ // 0x4021 @0x8
0x4019…4025 at0009 = ╱4a╱J╱ // 0x4022 @0x9
0x4019…4025 at000a = ╱ee╱)╱ // 0x4023 @0xa
0x4019…4025 at000b = EOL // 0x4024 @0xb
0x4019…4025 }
0x4025…402e cd85 7510 NEXT LIE
0x4025…402e LineComalBin {
0x4025…402e ptr = 0xcd85 // 0x4025 @0x0
0x4025…402e lno = 0x1d56 // 0x4027 @0x2
0x4025…402e at0004 = ╱84╱ NEXT ╱ // 0x4029 @0x4
0x4025…402e at0005 = ╱4c╱L╱ // 0x402a @0x5
0x4025…402e at0006 = ╱49╱I╱ // 0x402b @0x6
0x4025…402e at0007 = ╱45╱E╱ // 0x402c @0x7
0x4025…402e at0008 = EOL // 0x402d @0x8
0x4025…402e }
0x402e…4034 cd8b 7520 ENDIF
0x402e…4034 LineComalBin {
0x402e…4034 ptr = 0xcd8b // 0x402e @0x0
0x402e…4034 lno = 0x1d60 // 0x4030 @0x2
0x402e…4034 at0004 = ╱9b╱ ENDIF ╱ // 0x4032 @0x4
0x402e…4034 at0005 = EOL // 0x4033 @0x5
0x402e…4034 }
0x4034…403a cd91 7530 REPEAT
0x4034…403a LineComalBin {
0x4034…403a ptr = 0xcd91 // 0x4034 @0x0
0x4034…403a lno = 0x1d6a // 0x4036 @0x2
0x4034…403a at0004 = ╱97╱ REPEAT ╱ // 0x4038 @0x4
0x4034…403a at0005 = EOL // 0x4039 @0x5
0x4034…403a }
0x403a…4049 cda0 7540 CURSOR G,19
0x403a…4049 LineComalBin {
0x403a…4049 ptr = 0xcda0 // 0x403a @0x0
0x403a…4049 lno = 0x1d74 // 0x403c @0x2
0x403a…4049 at0004 = ╱a1╱ CURSOR ╱ // 0x403e @0x4
0x403a…4049 at0005 = ╱47╱G╱ // 0x403f @0x5
0x403a…4049 at0006 = ╱ec╱,╱ // 0x4040 @0x6
0x403a…4049 at0007 = ╱31╱1╱ // 0x4041 @0x7
0x403a…4049 at0008 = ╱39╱9╱ // 0x4042 @0x8
0x403a…4049 at0009 = ╱fe00009805╱ // 0x4043 @0x9
0x403a…4049 at000e = EOL // 0x4048 @0xe
0x403a…4049 }
0x4049…408e cde5 7550 PRINT "1:Ændring. 2:Sletning. 3:Udskrift. 4:Ny linie. 5:Afslutning.";
0x4049…408e LineComalBin {
0x4049…408e ptr = 0xcde5 // 0x4049 @0x0
0x4049…408e lno = 0x1d7e // 0x404b @0x2
0x4049…408e at0004 = ╱92╱ PRINT ╱ // 0x404d @0x4
0x4049…408e at0005 = ╱22╱"╱ // 0x404e @0x5
0x4049…408e at0006 = ╱31╱1╱ // 0x404f @0x6
0x4049…408e at0007 = ╱3a╱:╱ // 0x4050 @0x7
0x4049…408e at0008 = ╱5b╱Æ╱ // 0x4051 @0x8
0x4049…408e at0009 = ╱6e╱n╱ // 0x4052 @0x9
0x4049…408e at000a = ╱64╱d╱ // 0x4053 @0xa
0x4049…408e at000b = ╱72╱r╱ // 0x4054 @0xb
0x4049…408e at000c = ╱69╱i╱ // 0x4055 @0xc
0x4049…408e at000d = ╱6e╱n╱ // 0x4056 @0xd
0x4049…408e at000e = ╱67╱g╱ // 0x4057 @0xe
0x4049…408e at000f = ╱2e╱.╱ // 0x4058 @0xf
0x4049…408e at0010 = ╱20╱…╱ // 0x4059 @0x10
0x4049…408e at0011 = ╱32╱2╱ // 0x405a @0x11
0x4049…408e at0012 = ╱3a╱:╱ // 0x405b @0x12
0x4049…408e at0013 = ╱53╱S╱ // 0x405c @0x13
0x4049…408e at0014 = ╱6c╱l╱ // 0x405d @0x14
0x4049…408e at0015 = ╱65╱e╱ // 0x405e @0x15
0x4049…408e at0016 = ╱74╱t╱ // 0x405f @0x16
0x4049…408e at0017 = ╱6e╱n╱ // 0x4060 @0x17
0x4049…408e at0018 = ╱69╱i╱ // 0x4061 @0x18
0x4049…408e at0019 = ╱6e╱n╱ // 0x4062 @0x19
0x4049…408e at001a = ╱67╱g╱ // 0x4063 @0x1a
0x4049…408e at001b = ╱2e╱.╱ // 0x4064 @0x1b
0x4049…408e at001c = ╱20╱…╱ // 0x4065 @0x1c
0x4049…408e at001d = ╱33╱3╱ // 0x4066 @0x1d
0x4049…408e at001e = ╱3a╱:╱ // 0x4067 @0x1e
0x4049…408e at001f = ╱55╱U╱ // 0x4068 @0x1f
0x4049…408e at0020 = ╱64╱d╱ // 0x4069 @0x20
0x4049…408e at0021 = ╱73╱s╱ // 0x406a @0x21
0x4049…408e at0022 = ╱6b╱k╱ // 0x406b @0x22
0x4049…408e at0023 = ╱72╱r╱ // 0x406c @0x23
0x4049…408e at0024 = ╱69╱i╱ // 0x406d @0x24
0x4049…408e at0025 = ╱66╱f╱ // 0x406e @0x25
0x4049…408e at0026 = ╱74╱t╱ // 0x406f @0x26
0x4049…408e at0027 = ╱2e╱.╱ // 0x4070 @0x27
0x4049…408e at0028 = ╱20╱…╱ // 0x4071 @0x28
0x4049…408e at0029 = ╱34╱4╱ // 0x4072 @0x29
0x4049…408e at002a = ╱3a╱:╱ // 0x4073 @0x2a
0x4049…408e at002b = ╱4e╱N╱ // 0x4074 @0x2b
0x4049…408e at002c = ╱79╱y╱ // 0x4075 @0x2c
0x4049…408e at002d = ╱20╱…╱ // 0x4076 @0x2d
0x4049…408e at002e = ╱6c╱l╱ // 0x4077 @0x2e
0x4049…408e at002f = ╱69╱i╱ // 0x4078 @0x2f
0x4049…408e at0030 = ╱6e╱n╱ // 0x4079 @0x30
0x4049…408e at0031 = ╱69╱i╱ // 0x407a @0x31
0x4049…408e at0032 = ╱65╱e╱ // 0x407b @0x32
0x4049…408e at0033 = ╱2e╱.╱ // 0x407c @0x33
0x4049…408e at0034 = ╱20╱…╱ // 0x407d @0x34
0x4049…408e at0035 = ╱35╱5╱ // 0x407e @0x35
0x4049…408e at0036 = ╱3a╱:╱ // 0x407f @0x36
0x4049…408e at0037 = ╱41╱A╱ // 0x4080 @0x37
0x4049…408e at0038 = ╱66╱f╱ // 0x4081 @0x38
0x4049…408e at0039 = ╱73╱s╱ // 0x4082 @0x39
0x4049…408e at003a = ╱6c╱l╱ // 0x4083 @0x3a
0x4049…408e at003b = ╱75╱u╱ // 0x4084 @0x3b
0x4049…408e at003c = ╱74╱t╱ // 0x4085 @0x3c
0x4049…408e at003d = ╱6e╱n╱ // 0x4086 @0x3d
0x4049…408e at003e = ╱69╱i╱ // 0x4087 @0x3e
0x4049…408e at003f = ╱6e╱n╱ // 0x4088 @0x3f
0x4049…408e at0040 = ╱67╱g╱ // 0x4089 @0x40
0x4049…408e at0041 = ╱2e╱.╱ // 0x408a @0x41
0x4049…408e at0042 = ╱22╱"╱ // 0x408b @0x42
0x4049…408e at0043 = ╱eb╱;╱ // 0x408c @0x43
0x4049…408e at0044 = EOL // 0x408d @0x44
0x4049…408e }
0x408e…40a3 cdfa 7560 PRINT "6:Annulering."
0x408e…40a3 LineComalBin {
0x408e…40a3 ptr = 0xcdfa // 0x408e @0x0
0x408e…40a3 lno = 0x1d88 // 0x4090 @0x2
0x408e…40a3 at0004 = ╱92╱ PRINT ╱ // 0x4092 @0x4
0x408e…40a3 at0005 = ╱22╱"╱ // 0x4093 @0x5
0x408e…40a3 at0006 = ╱36╱6╱ // 0x4094 @0x6
0x408e…40a3 at0007 = ╱3a╱:╱ // 0x4095 @0x7
0x408e…40a3 at0008 = ╱41╱A╱ // 0x4096 @0x8
0x408e…40a3 at0009 = ╱6e╱n╱ // 0x4097 @0x9
0x408e…40a3 at000a = ╱6e╱n╱ // 0x4098 @0xa
0x408e…40a3 at000b = ╱75╱u╱ // 0x4099 @0xb
0x408e…40a3 at000c = ╱6c╱l╱ // 0x409a @0xc
0x408e…40a3 at000d = ╱65╱e╱ // 0x409b @0xd
0x408e…40a3 at000e = ╱72╱r╱ // 0x409c @0xe
0x408e…40a3 at000f = ╱69╱i╱ // 0x409d @0xf
0x408e…40a3 at0010 = ╱6e╱n╱ // 0x409e @0x10
0x408e…40a3 at0011 = ╱67╱g╱ // 0x409f @0x11
0x408e…40a3 at0012 = ╱2e╱.╱ // 0x40a0 @0x12
0x408e…40a3 at0013 = ╱22╱"╱ // 0x40a1 @0x13
0x408e…40a3 at0014 = EOL // 0x40a2 @0x14
0x408e…40a3 }
0x40a3…40d4 ce2b 7570 EXEC INDPUT1(4,21,0,7,LTX8$)
0x40a3…40d4 LineComalBin {
0x40a3…40d4 ptr = 0xce2b // 0x40a3 @0x0
0x40a3…40d4 lno = 0x1d92 // 0x40a5 @0x2
0x40a3…40d4 at0004 = ╱9d╱ EXEC ╱ // 0x40a7 @0x4
0x40a3…40d4 at0005 = ╱49╱I╱ // 0x40a8 @0x5
0x40a3…40d4 at0006 = ╱4e╱N╱ // 0x40a9 @0x6
0x40a3…40d4 at0007 = ╱44╱D╱ // 0x40aa @0x7
0x40a3…40d4 at0008 = ╱50╱P╱ // 0x40ab @0x8
0x40a3…40d4 at0009 = ╱55╱U╱ // 0x40ac @0x9
0x40a3…40d4 at000a = ╱54╱T╱ // 0x40ad @0xa
0x40a3…40d4 at000b = ╱31╱1╱ // 0x40ae @0xb
0x40a3…40d4 at000c = ╱ed╱(╱ // 0x40af @0xc
0x40a3…40d4 at000d = ╱34╱4╱ // 0x40b0 @0xd
0x40a3…40d4 at000e = ╱fe00008003╱ // 0x40b1 @0xe
0x40a3…40d4 at0013 = ╱ec╱,╱ // 0x40b6 @0x13
0x40a3…40d4 at0014 = ╱32╱2╱ // 0x40b7 @0x14
0x40a3…40d4 at0015 = ╱31╱1╱ // 0x40b8 @0x15
0x40a3…40d4 at0016 = ╱fe0000a805╱ // 0x40b9 @0x16
0x40a3…40d4 at001b = ╱ec╱,╱ // 0x40be @0x1b
0x40a3…40d4 at001c = ╱30╱0╱ // 0x40bf @0x1c
0x40a3…40d4 at001d = ╱fe00000000╱ // 0x40c0 @0x1d
0x40a3…40d4 at0022 = ╱ec╱,╱ // 0x40c5 @0x22
0x40a3…40d4 at0023 = ╱37╱7╱ // 0x40c6 @0x23
0x40a3…40d4 at0024 = ╱fe0000e003╱ // 0x40c7 @0x24
0x40a3…40d4 at0029 = ╱ec╱,╱ // 0x40cc @0x29
0x40a3…40d4 at002a = ╱4c╱L╱ // 0x40cd @0x2a
0x40a3…40d4 at002b = ╱54╱T╱ // 0x40ce @0x2b
0x40a3…40d4 at002c = ╱58╱X╱ // 0x40cf @0x2c
0x40a3…40d4 at002d = ╱38╱8╱ // 0x40d0 @0x2d
0x40a3…40d4 at002e = ╱ef╱$╱ // 0x40d1 @0x2e
0x40a3…40d4 at002f = ╱ee╱)╱ // 0x40d2 @0x2f
0x40a3…40d4 at0030 = EOL // 0x40d3 @0x30
0x40a3…40d4 }
0x40d4…40e2 ce39 7580 SVAR1$=A$
0x40d4…40e2 LineComalBin {
0x40d4…40e2 ptr = 0xce39 // 0x40d4 @0x0
0x40d4…40e2 lno = 0x1d9c // 0x40d6 @0x2
0x40d4…40e2 at0004 = ╱53╱S╱ // 0x40d8 @0x4
0x40d4…40e2 at0005 = ╱56╱V╱ // 0x40d9 @0x5
0x40d4…40e2 at0006 = ╱41╱A╱ // 0x40da @0x6
0x40d4…40e2 at0007 = ╱52╱R╱ // 0x40db @0x7
0x40d4…40e2 at0008 = ╱31╱1╱ // 0x40dc @0x8
0x40d4…40e2 at0009 = ╱ef╱$╱ // 0x40dd @0x9
0x40d4…40e2 at000a = ╱dc╱=╱ // 0x40de @0xa
0x40d4…40e2 at000b = ╱41╱A╱ // 0x40df @0xb
0x40d4…40e2 at000c = ╱ef╱$╱ // 0x40e0 @0xc
0x40d4…40e2 at000d = EOL // 0x40e1 @0xd
0x40d4…40e2 }
0x40e2…40f0 ce47 7590 CASE SVAR1$ OF
0x40e2…40f0 LineComalBin {
0x40e2…40f0 ptr = 0xce47 // 0x40e2 @0x0
0x40e2…40f0 lno = 0x1da6 // 0x40e4 @0x2
0x40e2…40f0 at0004 = ╱a200╱ CASE ╱ // 0x40e6 @0x4
0x40e2…40f0 at0006 = ╱53╱S╱ // 0x40e8 @0x6
0x40e2…40f0 at0007 = ╱56╱V╱ // 0x40e9 @0x7
0x40e2…40f0 at0008 = ╱41╱A╱ // 0x40ea @0x8
0x40e2…40f0 at0009 = ╱52╱R╱ // 0x40eb @0x9
0x40e2…40f0 at000a = ╱31╱1╱ // 0x40ec @0xa
0x40e2…40f0 at000b = ╱ef╱$╱ // 0x40ed @0xb
0x40e2…40f0 at000c = ╱ba╱ OF ╱ // 0x40ee @0xc
0x40e2…40f0 at000d = EOL // 0x40ef @0xd
0x40e2…40f0 }
0x40f0…40fa ce51 7600 WHEN "1"
0x40f0…40fa LineComalBin {
0x40f0…40fa ptr = 0xce51 // 0x40f0 @0x0
0x40f0…40fa lno = 0x1db0 // 0x40f2 @0x2
0x40f0…40fa at0004 = ╱a300╱ WHEN ╱ // 0x40f4 @0x4
0x40f0…40fa at0006 = ╱22╱"╱ // 0x40f6 @0x6
0x40f0…40fa at0007 = ╱31╱1╱ // 0x40f7 @0x7
0x40f0…40fa at0008 = ╱22╱"╱ // 0x40f8 @0x8
0x40f0…40fa at0009 = EOL // 0x40f9 @0x9
0x40f0…40fa }
0x40fa…4130 ce87 7610 EXEC INDPUT1(4,23,0,1+VLIN,LTX9$)
0x40fa…4130 LineComalBin {
0x40fa…4130 ptr = 0xce87 // 0x40fa @0x0
0x40fa…4130 lno = 0x1dba // 0x40fc @0x2
0x40fa…4130 at0004 = ╱9d╱ EXEC ╱ // 0x40fe @0x4
0x40fa…4130 at0005 = ╱49╱I╱ // 0x40ff @0x5
0x40fa…4130 at0006 = ╱4e╱N╱ // 0x4100 @0x6
0x40fa…4130 at0007 = ╱44╱D╱ // 0x4101 @0x7
0x40fa…4130 at0008 = ╱50╱P╱ // 0x4102 @0x8
0x40fa…4130 at0009 = ╱55╱U╱ // 0x4103 @0x9
0x40fa…4130 at000a = ╱54╱T╱ // 0x4104 @0xa
0x40fa…4130 at000b = ╱31╱1╱ // 0x4105 @0xb
0x40fa…4130 at000c = ╱ed╱(╱ // 0x4106 @0xc
0x40fa…4130 at000d = ╱34╱4╱ // 0x4107 @0xd
0x40fa…4130 at000e = ╱fe00008003╱ // 0x4108 @0xe
0x40fa…4130 at0013 = ╱ec╱,╱ // 0x410d @0x13
0x40fa…4130 at0014 = ╱32╱2╱ // 0x410e @0x14
0x40fa…4130 at0015 = ╱33╱3╱ // 0x410f @0x15
0x40fa…4130 at0016 = ╱fe0000b805╱ // 0x4110 @0x16
0x40fa…4130 at001b = ╱ec╱,╱ // 0x4115 @0x1b
0x40fa…4130 at001c = ╱30╱0╱ // 0x4116 @0x1c
0x40fa…4130 at001d = ╱fe00000000╱ // 0x4117 @0x1d
0x40fa…4130 at0022 = ╱ec╱,╱ // 0x411c @0x22
0x40fa…4130 at0023 = ╱31╱1╱ // 0x411d @0x23
0x40fa…4130 at0024 = ╱fe00008001╱ // 0x411e @0x24
0x40fa…4130 at0029 = ╱e2╱+╱ // 0x4123 @0x29
0x40fa…4130 at002a = ╱56╱V╱ // 0x4124 @0x2a
0x40fa…4130 at002b = ╱4c╱L╱ // 0x4125 @0x2b
0x40fa…4130 at002c = ╱49╱I╱ // 0x4126 @0x2c
0x40fa…4130 at002d = ╱4e╱N╱ // 0x4127 @0x2d
0x40fa…4130 at002e = ╱ec╱,╱ // 0x4128 @0x2e
0x40fa…4130 at002f = ╱4c╱L╱ // 0x4129 @0x2f
0x40fa…4130 at0030 = ╱54╱T╱ // 0x412a @0x30
0x40fa…4130 at0031 = ╱58╱X╱ // 0x412b @0x31
0x40fa…4130 at0032 = ╱39╱9╱ // 0x412c @0x32
0x40fa…4130 at0033 = ╱ef╱$╱ // 0x412d @0x33
0x40fa…4130 at0034 = ╱ee╱)╱ // 0x412e @0x34
0x40fa…4130 at0035 = EOL // 0x412f @0x35
0x40fa…4130 }
0x4130…4138 ce8f 7620 J=P
0x4130…4138 LineComalBin {
0x4130…4138 ptr = 0xce8f // 0x4130 @0x0
0x4130…4138 lno = 0x1dc4 // 0x4132 @0x2
0x4130…4138 at0004 = ╱4a╱J╱ // 0x4134 @0x4
0x4130…4138 at0005 = ╱dc╱=╱ // 0x4135 @0x5
0x4130…4138 at0006 = ╱50╱P╱ // 0x4136 @0x6
0x4130…4138 at0007 = EOL // 0x4137 @0x7
0x4130…4138 }
0x4138…414c cea3 7630 CURSOR 4,19
0x4138…414c LineComalBin {
0x4138…414c ptr = 0xcea3 // 0x4138 @0x0
0x4138…414c lno = 0x1dce // 0x413a @0x2
0x4138…414c at0004 = ╱a1╱ CURSOR ╱ // 0x413c @0x4
0x4138…414c at0005 = ╱34╱4╱ // 0x413d @0x5
0x4138…414c at0006 = ╱fe00008003╱ // 0x413e @0x6
0x4138…414c at000b = ╱ec╱,╱ // 0x4143 @0xb
0x4138…414c at000c = ╱31╱1╱ // 0x4144 @0xc
0x4138…414c at000d = ╱39╱9╱ // 0x4145 @0xd
0x4138…414c at000e = ╱fe00009805╱ // 0x4146 @0xe
0x4138…414c at0013 = EOL // 0x414b @0x13
0x4138…414c }
0x414c…415c ceb3 7640 LIE=19
0x414c…415c LineComalBin {
0x414c…415c ptr = 0xceb3 // 0x414c @0x0
0x414c…415c lno = 0x1dd8 // 0x414e @0x2
0x414c…415c at0004 = ╱4c╱L╱ // 0x4150 @0x4
0x414c…415c at0005 = ╱49╱I╱ // 0x4151 @0x5
0x414c…415c at0006 = ╱45╱E╱ // 0x4152 @0x6
0x414c…415c at0007 = ╱dc╱=╱ // 0x4153 @0x7
0x414c…415c at0008 = ╱31╱1╱ // 0x4154 @0x8
0x414c…415c at0009 = ╱39╱9╱ // 0x4155 @0x9
0x414c…415c at000a = ╱fe00009805╱ // 0x4156 @0xa
0x414c…415c at000f = EOL // 0x415b @0xf
0x414c…415c }
0x415c…4166 cebd 7650 EXEC SLET
0x415c…4166 LineComalBin {
0x415c…4166 ptr = 0xcebd // 0x415c @0x0
0x415c…4166 lno = 0x1de2 // 0x415e @0x2
0x415c…4166 at0004 = ╱9d╱ EXEC ╱ // 0x4160 @0x4
0x415c…4166 at0005 = ╱53╱S╱ // 0x4161 @0x5
0x415c…4166 at0006 = ╱4c╱L╱ // 0x4162 @0x6
0x415c…4166 at0007 = ╱45╱E╱ // 0x4163 @0x7
0x415c…4166 at0008 = ╱54╱T╱ // 0x4164 @0x8
0x415c…4166 at0009 = EOL // 0x4165 @0x9
0x415c…4166 }
0x4166…4172 cec9 7660 EXEC VUD(J)
0x4166…4172 LineComalBin {
0x4166…4172 ptr = 0xcec9 // 0x4166 @0x0
0x4166…4172 lno = 0x1dec // 0x4168 @0x2
0x4166…4172 at0004 = ╱9d╱ EXEC ╱ // 0x416a @0x4
0x4166…4172 at0005 = ╱56╱V╱ // 0x416b @0x5
0x4166…4172 at0006 = ╱55╱U╱ // 0x416c @0x6
0x4166…4172 at0007 = ╱44╱D╱ // 0x416d @0x7
0x4166…4172 at0008 = ╱ed╱(╱ // 0x416e @0x8
0x4166…4172 at0009 = ╱4a╱J╱ // 0x416f @0x9
0x4166…4172 at000a = ╱ee╱)╱ // 0x4170 @0xa
0x4166…4172 at000b = EOL // 0x4171 @0xb
0x4166…4172 }
0x4172…4182 ced9 7670 CASE VNARR(J) OF
0x4172…4182 LineComalBin {
0x4172…4182 ptr = 0xced9 // 0x4172 @0x0
0x4172…4182 lno = 0x1df6 // 0x4174 @0x2
0x4172…4182 at0004 = ╱a201╱ CASE ╱ // 0x4176 @0x4
0x4172…4182 at0006 = ╱56╱V╱ // 0x4178 @0x6
0x4172…4182 at0007 = ╱4e╱N╱ // 0x4179 @0x7
0x4172…4182 at0008 = ╱41╱A╱ // 0x417a @0x8
0x4172…4182 at0009 = ╱52╱R╱ // 0x417b @0x9
0x4172…4182 at000a = ╱52╱R╱ // 0x417c @0xa
0x4172…4182 at000b = ╱ed╱(╱ // 0x417d @0xb
0x4172…4182 at000c = ╱4a╱J╱ // 0x417e @0xc
0x4172…4182 at000d = ╱ee╱)╱ // 0x417f @0xd
0x4172…4182 at000e = ╱ba╱ OF ╱ // 0x4180 @0xe
0x4172…4182 at000f = EOL // 0x4181 @0xf
0x4172…4182 }
0x4182…41b3 cf0a 7680 EXEC INDPUT2(17,21,BK$(1),ANTAL$)
0x4182…41b3 LineComalBin {
0x4182…41b3 ptr = 0xcf0a // 0x4182 @0x0
0x4182…41b3 lno = 0x1e00 // 0x4184 @0x2
0x4182…41b3 at0004 = ╱9d╱ EXEC ╱ // 0x4186 @0x4
0x4182…41b3 at0005 = ╱49╱I╱ // 0x4187 @0x5
0x4182…41b3 at0006 = ╱4e╱N╱ // 0x4188 @0x6
0x4182…41b3 at0007 = ╱44╱D╱ // 0x4189 @0x7
0x4182…41b3 at0008 = ╱50╱P╱ // 0x418a @0x8
0x4182…41b3 at0009 = ╱55╱U╱ // 0x418b @0x9
0x4182…41b3 at000a = ╱54╱T╱ // 0x418c @0xa
0x4182…41b3 at000b = ╱32╱2╱ // 0x418d @0xb
0x4182…41b3 at000c = ╱ed╱(╱ // 0x418e @0xc
0x4182…41b3 at000d = ╱31╱1╱ // 0x418f @0xd
0x4182…41b3 at000e = ╱37╱7╱ // 0x4190 @0xe
0x4182…41b3 at000f = ╱fe00008805╱ // 0x4191 @0xf
0x4182…41b3 at0014 = ╱ec╱,╱ // 0x4196 @0x14
0x4182…41b3 at0015 = ╱32╱2╱ // 0x4197 @0x15
0x4182…41b3 at0016 = ╱31╱1╱ // 0x4198 @0x16
0x4182…41b3 at0017 = ╱fe0000a805╱ // 0x4199 @0x17
0x4182…41b3 at001c = ╱ec╱,╱ // 0x419e @0x1c
0x4182…41b3 at001d = ╱42╱B╱ // 0x419f @0x1d
0x4182…41b3 at001e = ╱4b╱K╱ // 0x41a0 @0x1e
0x4182…41b3 at001f = ╱ef╱$╱ // 0x41a1 @0x1f
0x4182…41b3 at0020 = ╱ed╱(╱ // 0x41a2 @0x20
0x4182…41b3 at0021 = ╱31╱1╱ // 0x41a3 @0x21
0x4182…41b3 at0022 = ╱fe00008001╱ // 0x41a4 @0x22
0x4182…41b3 at0027 = ╱ee╱)╱ // 0x41a9 @0x27
0x4182…41b3 at0028 = ╱ec╱,╱ // 0x41aa @0x28
0x4182…41b3 at0029 = ╱41╱A╱ // 0x41ab @0x29
0x4182…41b3 at002a = ╱4e╱N╱ // 0x41ac @0x2a
0x4182…41b3 at002b = ╱54╱T╱ // 0x41ad @0x2b
0x4182…41b3 at002c = ╱41╱A╱ // 0x41ae @0x2c
0x4182…41b3 at002d = ╱4c╱L╱ // 0x41af @0x2d
0x4182…41b3 at002e = ╱ef╱$╱ // 0x41b0 @0x2e
0x4182…41b3 at002f = ╱ee╱)╱ // 0x41b1 @0x2f
0x4182…41b3 at0030 = EOL // 0x41b2 @0x30
0x4182…41b3 }
0x41b3…41c8 cf1f 7690 CURSOR 17,21
0x41b3…41c8 LineComalBin {
0x41b3…41c8 ptr = 0xcf1f // 0x41b3 @0x0
0x41b3…41c8 lno = 0x1e0a // 0x41b5 @0x2
0x41b3…41c8 at0004 = ╱a1╱ CURSOR ╱ // 0x41b7 @0x4
0x41b3…41c8 at0005 = ╱31╱1╱ // 0x41b8 @0x5
0x41b3…41c8 at0006 = ╱37╱7╱ // 0x41b9 @0x6
0x41b3…41c8 at0007 = ╱fe00008805╱ // 0x41ba @0x7
0x41b3…41c8 at000c = ╱ec╱,╱ // 0x41bf @0xc
0x41b3…41c8 at000d = ╱32╱2╱ // 0x41c0 @0xd
0x41b3…41c8 at000e = ╱31╱1╱ // 0x41c1 @0xe
0x41b3…41c8 at000f = ╱fe0000a805╱ // 0x41c2 @0xf
0x41b3…41c8 at0014 = EOL // 0x41c7 @0x14
0x41b3…41c8 }
0x41c8…41d1 cf28 7700 EXEC ANT
0x41c8…41d1 LineComalBin {
0x41c8…41d1 ptr = 0xcf28 // 0x41c8 @0x0
0x41c8…41d1 lno = 0x1e14 // 0x41ca @0x2
0x41c8…41d1 at0004 = ╱9d╱ EXEC ╱ // 0x41cc @0x4
0x41c8…41d1 at0005 = ╱41╱A╱ // 0x41cd @0x5
0x41c8…41d1 at0006 = ╱4e╱N╱ // 0x41ce @0x6
0x41c8…41d1 at0007 = ╱54╱T╱ // 0x41cf @0x7
0x41c8…41d1 at0008 = EOL // 0x41d0 @0x8
0x41c8…41d1 }
0x41d1…41e6 cf3d 7710 CURSOR 24,21
0x41d1…41e6 LineComalBin {
0x41d1…41e6 ptr = 0xcf3d // 0x41d1 @0x0
0x41d1…41e6 lno = 0x1e1e // 0x41d3 @0x2
0x41d1…41e6 at0004 = ╱a1╱ CURSOR ╱ // 0x41d5 @0x4
0x41d1…41e6 at0005 = ╱32╱2╱ // 0x41d6 @0x5
0x41d1…41e6 at0006 = ╱34╱4╱ // 0x41d7 @0x6
0x41d1…41e6 at0007 = ╱fe0000c005╱ // 0x41d8 @0x7
0x41d1…41e6 at000c = ╱ec╱,╱ // 0x41dd @0xc
0x41d1…41e6 at000d = ╱32╱2╱ // 0x41de @0xd
0x41d1…41e6 at000e = ╱31╱1╱ // 0x41df @0xe
0x41d1…41e6 at000f = ╱fe0000a805╱ // 0x41e0 @0xf
0x41d1…41e6 at0014 = EOL // 0x41e5 @0x14
0x41d1…41e6 }
0x41e6…41f5 cf4c 7720 PRINT VTARR$(J)
0x41e6…41f5 LineComalBin {
0x41e6…41f5 ptr = 0xcf4c // 0x41e6 @0x0
0x41e6…41f5 lno = 0x1e28 // 0x41e8 @0x2
0x41e6…41f5 at0004 = ╱92╱ PRINT ╱ // 0x41ea @0x4
0x41e6…41f5 at0005 = ╱56╱V╱ // 0x41eb @0x5
0x41e6…41f5 at0006 = ╱54╱T╱ // 0x41ec @0x6
0x41e6…41f5 at0007 = ╱41╱A╱ // 0x41ed @0x7
0x41e6…41f5 at0008 = ╱52╱R╱ // 0x41ee @0x8
0x41e6…41f5 at0009 = ╱52╱R╱ // 0x41ef @0x9
0x41e6…41f5 at000a = ╱ef╱$╱ // 0x41f0 @0xa
0x41e6…41f5 at000b = ╱ed╱(╱ // 0x41f1 @0xb
0x41e6…41f5 at000c = ╱4a╱J╱ // 0x41f2 @0xc
0x41e6…41f5 at000d = ╱ee╱)╱ // 0x41f3 @0xd
0x41e6…41f5 at000e = EOL // 0x41f4 @0xe
0x41e6…41f5 }
0x41f5…420a cf61 7730 CURSOR 51,21
0x41f5…420a LineComalBin {
0x41f5…420a ptr = 0xcf61 // 0x41f5 @0x0
0x41f5…420a lno = 0x1e32 // 0x41f7 @0x2
0x41f5…420a at0004 = ╱a1╱ CURSOR ╱ // 0x41f9 @0x4
0x41f5…420a at0005 = ╱35╱5╱ // 0x41fa @0x5
0x41f5…420a at0006 = ╱31╱1╱ // 0x41fb @0x6
0x41f5…420a at0007 = ╱fe0000cc06╱ // 0x41fc @0x7
0x41f5…420a at000c = ╱ec╱,╱ // 0x4201 @0xc
0x41f5…420a at000d = ╱32╱2╱ // 0x4202 @0xd
0x41f5…420a at000e = ╱31╱1╱ // 0x4203 @0xe
0x41f5…420a at000f = ╱fe0000a805╱ // 0x4204 @0xf
0x41f5…420a at0014 = EOL // 0x4209 @0x14
0x41f5…420a }
0x420a…421e cf75 7740 VPRI$=VPARR$(J)
0x420a…421e LineComalBin {
0x420a…421e ptr = 0xcf75 // 0x420a @0x0
0x420a…421e lno = 0x1e3c // 0x420c @0x2
0x420a…421e at0004 = ╱56╱V╱ // 0x420e @0x4
0x420a…421e at0005 = ╱50╱P╱ // 0x420f @0x5
0x420a…421e at0006 = ╱52╱R╱ // 0x4210 @0x6
0x420a…421e at0007 = ╱49╱I╱ // 0x4211 @0x7
0x420a…421e at0008 = ╱ef╱$╱ // 0x4212 @0x8
0x420a…421e at0009 = ╱dc╱=╱ // 0x4213 @0x9
0x420a…421e at000a = ╱56╱V╱ // 0x4214 @0xa
0x420a…421e at000b = ╱50╱P╱ // 0x4215 @0xb
0x420a…421e at000c = ╱41╱A╱ // 0x4216 @0xc
0x420a…421e at000d = ╱52╱R╱ // 0x4217 @0xd
0x420a…421e at000e = ╱52╱R╱ // 0x4218 @0xe
0x420a…421e at000f = ╱ef╱$╱ // 0x4219 @0xf
0x420a…421e at0010 = ╱ed╱(╱ // 0x421a @0x10
0x420a…421e at0011 = ╱4a╱J╱ // 0x421b @0x11
0x420a…421e at0012 = ╱ee╱)╱ // 0x421c @0x12
0x420a…421e at0013 = EOL // 0x421d @0x13
0x420a…421e }
0x421e…4238 cf8f 7750 EXEC TUD(VPRI$,TAL4$,E,B)
0x421e…4238 LineComalBin {
0x421e…4238 ptr = 0xcf8f // 0x421e @0x0
0x421e…4238 lno = 0x1e46 // 0x4220 @0x2
0x421e…4238 at0004 = ╱9d╱ EXEC ╱ // 0x4222 @0x4
0x421e…4238 at0005 = ╱54╱T╱ // 0x4223 @0x5
0x421e…4238 at0006 = ╱55╱U╱ // 0x4224 @0x6
0x421e…4238 at0007 = ╱44╱D╱ // 0x4225 @0x7
0x421e…4238 at0008 = ╱ed╱(╱ // 0x4226 @0x8
0x421e…4238 at0009 = ╱56╱V╱ // 0x4227 @0x9
0x421e…4238 at000a = ╱50╱P╱ // 0x4228 @0xa
0x421e…4238 at000b = ╱52╱R╱ // 0x4229 @0xb
0x421e…4238 at000c = ╱49╱I╱ // 0x422a @0xc
0x421e…4238 at000d = ╱ef╱$╱ // 0x422b @0xd
0x421e…4238 at000e = ╱ec╱,╱ // 0x422c @0xe
0x421e…4238 at000f = ╱54╱T╱ // 0x422d @0xf
0x421e…4238 at0010 = ╱41╱A╱ // 0x422e @0x10
0x421e…4238 at0011 = ╱4c╱L╱ // 0x422f @0x11
0x421e…4238 at0012 = ╱34╱4╱ // 0x4230 @0x12
0x421e…4238 at0013 = ╱ef╱$╱ // 0x4231 @0x13
0x421e…4238 at0014 = ╱ec╱,╱ // 0x4232 @0x14
0x421e…4238 at0015 = ╱45╱E╱ // 0x4233 @0x15
0x421e…4238 at0016 = ╱ec╱,╱ // 0x4234 @0x16
0x421e…4238 at0017 = ╱42╱B╱ // 0x4235 @0x17
0x421e…4238 at0018 = ╱ee╱)╱ // 0x4236 @0x18
0x421e…4238 at0019 = EOL // 0x4237 @0x19
0x421e…4238 }
0x4238…4254 cfab 7760 EXEC CA(G,VPRI$,ANTAL$,BL$)
0x4238…4254 LineComalBin {
0x4238…4254 ptr = 0xcfab // 0x4238 @0x0
0x4238…4254 lno = 0x1e50 // 0x423a @0x2
0x4238…4254 at0004 = ╱9d╱ EXEC ╱ // 0x423c @0x4
0x4238…4254 at0005 = ╱43╱C╱ // 0x423d @0x5
0x4238…4254 at0006 = ╱41╱A╱ // 0x423e @0x6
0x4238…4254 at0007 = ╱ed╱(╱ // 0x423f @0x7
0x4238…4254 at0008 = ╱47╱G╱ // 0x4240 @0x8
0x4238…4254 at0009 = ╱ec╱,╱ // 0x4241 @0x9
0x4238…4254 at000a = ╱56╱V╱ // 0x4242 @0xa
0x4238…4254 at000b = ╱50╱P╱ // 0x4243 @0xb
0x4238…4254 at000c = ╱52╱R╱ // 0x4244 @0xc
0x4238…4254 at000d = ╱49╱I╱ // 0x4245 @0xd
0x4238…4254 at000e = ╱ef╱$╱ // 0x4246 @0xe
0x4238…4254 at000f = ╱ec╱,╱ // 0x4247 @0xf
0x4238…4254 at0010 = ╱41╱A╱ // 0x4248 @0x10
0x4238…4254 at0011 = ╱4e╱N╱ // 0x4249 @0x11
0x4238…4254 at0012 = ╱54╱T╱ // 0x424a @0x12
0x4238…4254 at0013 = ╱41╱A╱ // 0x424b @0x13
0x4238…4254 at0014 = ╱4c╱L╱ // 0x424c @0x14
0x4238…4254 at0015 = ╱ef╱$╱ // 0x424d @0x15
0x4238…4254 at0016 = ╱ec╱,╱ // 0x424e @0x16
0x4238…4254 at0017 = ╱42╱B╱ // 0x424f @0x17
0x4238…4254 at0018 = ╱4c╱L╱ // 0x4250 @0x18
0x4238…4254 at0019 = ╱ef╱$╱ // 0x4251 @0x19
0x4238…4254 at001a = ╱ee╱)╱ // 0x4252 @0x1a
0x4238…4254 at001b = EOL // 0x4253 @0x1b
0x4238…4254 }
0x4254…4269 cfc0 7770 CURSOR 66,21
0x4254…4269 LineComalBin {
0x4254…4269 ptr = 0xcfc0 // 0x4254 @0x0
0x4254…4269 lno = 0x1e5a // 0x4256 @0x2
0x4254…4269 at0004 = ╱a1╱ CURSOR ╱ // 0x4258 @0x4
0x4254…4269 at0005 = ╱36╱6╱ // 0x4259 @0x5
0x4254…4269 at0006 = ╱36╱6╱ // 0x425a @0x6
0x4254…4269 at0007 = ╱fe00008407╱ // 0x425b @0x7
0x4254…4269 at000c = ╱ec╱,╱ // 0x4260 @0xc
0x4254…4269 at000d = ╱32╱2╱ // 0x4261 @0xd
0x4254…4269 at000e = ╱31╱1╱ // 0x4262 @0xe
0x4254…4269 at000f = ╱fe0000a805╱ // 0x4263 @0xf
0x4254…4269 at0014 = EOL // 0x4268 @0x14
0x4254…4269 }
0x4269…4281 cfd8 7780 EXEC TUD(BL$,TAL4$,E,B)
0x4269…4281 LineComalBin {
0x4269…4281 ptr = 0xcfd8 // 0x4269 @0x0
0x4269…4281 lno = 0x1e64 // 0x426b @0x2
0x4269…4281 at0004 = ╱9d╱ EXEC ╱ // 0x426d @0x4
0x4269…4281 at0005 = ╱54╱T╱ // 0x426e @0x5
0x4269…4281 at0006 = ╱55╱U╱ // 0x426f @0x6
0x4269…4281 at0007 = ╱44╱D╱ // 0x4270 @0x7
0x4269…4281 at0008 = ╱ed╱(╱ // 0x4271 @0x8
0x4269…4281 at0009 = ╱42╱B╱ // 0x4272 @0x9
0x4269…4281 at000a = ╱4c╱L╱ // 0x4273 @0xa
0x4269…4281 at000b = ╱ef╱$╱ // 0x4274 @0xb
0x4269…4281 at000c = ╱ec╱,╱ // 0x4275 @0xc
0x4269…4281 at000d = ╱54╱T╱ // 0x4276 @0xd
0x4269…4281 at000e = ╱41╱A╱ // 0x4277 @0xe
0x4269…4281 at000f = ╱4c╱L╱ // 0x4278 @0xf
0x4269…4281 at0010 = ╱34╱4╱ // 0x4279 @0x10
0x4269…4281 at0011 = ╱ef╱$╱ // 0x427a @0x11
0x4269…4281 at0012 = ╱ec╱,╱ // 0x427b @0x12
0x4269…4281 at0013 = ╱45╱E╱ // 0x427c @0x13
0x4269…4281 at0014 = ╱ec╱,╱ // 0x427d @0x14
0x4269…4281 at0015 = ╱42╱B╱ // 0x427e @0x15
0x4269…4281 at0016 = ╱ee╱)╱ // 0x427f @0x16
0x4269…4281 at0017 = EOL // 0x4280 @0x17
0x4269…4281 }
0x4281…4295 cfec 7790 IF BL$<>BLARR$(J) THEN
0x4281…4295 LineComalBin {
0x4281…4295 ptr = 0xcfec // 0x4281 @0x0
0x4281…4295 lno = 0x1e6e // 0x4283 @0x2
0x4281…4295 at0004 = ╱9c╱ IF ╱ // 0x4285 @0x4
0x4281…4295 at0005 = ╱42╱B╱ // 0x4286 @0x5
0x4281…4295 at0006 = ╱4c╱L╱ // 0x4287 @0x6
0x4281…4295 at0007 = ╱ef╱$╱ // 0x4288 @0x7
0x4281…4295 at0008 = ╱e1╱<>╱ // 0x4289 @0x8
0x4281…4295 at0009 = ╱42╱B╱ // 0x428a @0x9
0x4281…4295 at000a = ╱4c╱L╱ // 0x428b @0xa
0x4281…4295 at000b = ╱41╱A╱ // 0x428c @0xb
0x4281…4295 at000c = ╱52╱R╱ // 0x428d @0xc
0x4281…4295 at000d = ╱52╱R╱ // 0x428e @0xd
0x4281…4295 at000e = ╱ef╱$╱ // 0x428f @0xe
0x4281…4295 at000f = ╱ed╱(╱ // 0x4290 @0xf
0x4281…4295 at0010 = ╱4a╱J╱ // 0x4291 @0x10
0x4281…4295 at0011 = ╱ee╱)╱ // 0x4292 @0x11
0x4281…4295 at0012 = ╱b6╱ THEN ╱ // 0x4293 @0x12
0x4281…4295 at0013 = EOL // 0x4294 @0x13
0x4281…4295 }
0x4295…42a4 cffb 7800 CURSOR E,23
0x4295…42a4 LineComalBin {
0x4295…42a4 ptr = 0xcffb // 0x4295 @0x0
0x4295…42a4 lno = 0x1e78 // 0x4297 @0x2
0x4295…42a4 at0004 = ╱a1╱ CURSOR ╱ // 0x4299 @0x4
0x4295…42a4 at0005 = ╱45╱E╱ // 0x429a @0x5
0x4295…42a4 at0006 = ╱ec╱,╱ // 0x429b @0x6
0x4295…42a4 at0007 = ╱32╱2╱ // 0x429c @0x7
0x4295…42a4 at0008 = ╱33╱3╱ // 0x429d @0x8
0x4295…42a4 at0009 = ╱fe0000b805╱ // 0x429e @0x9
0x4295…42a4 at000e = EOL // 0x42a3 @0xe
0x4295…42a4 }
0x42a4…42c7 d01e 7810 VAARR$(J)=ANTAL$;BLARR$(J)=BL$
0x42a4…42c7 LineComalBin {
0x42a4…42c7 ptr = 0xd01e // 0x42a4 @0x0
0x42a4…42c7 lno = 0x1e82 // 0x42a6 @0x2
0x42a4…42c7 at0004 = ╱56╱V╱ // 0x42a8 @0x4
0x42a4…42c7 at0005 = ╱41╱A╱ // 0x42a9 @0x5
0x42a4…42c7 at0006 = ╱41╱A╱ // 0x42aa @0x6
0x42a4…42c7 at0007 = ╱52╱R╱ // 0x42ab @0x7
0x42a4…42c7 at0008 = ╱52╱R╱ // 0x42ac @0x8
0x42a4…42c7 at0009 = ╱ef╱$╱ // 0x42ad @0x9
0x42a4…42c7 at000a = ╱ed╱(╱ // 0x42ae @0xa
0x42a4…42c7 at000b = ╱4a╱J╱ // 0x42af @0xb
0x42a4…42c7 at000c = ╱ee╱)╱ // 0x42b0 @0xc
0x42a4…42c7 at000d = ╱dc╱=╱ // 0x42b1 @0xd
0x42a4…42c7 at000e = ╱41╱A╱ // 0x42b2 @0xe
0x42a4…42c7 at000f = ╱4e╱N╱ // 0x42b3 @0xf
0x42a4…42c7 at0010 = ╱54╱T╱ // 0x42b4 @0x10
0x42a4…42c7 at0011 = ╱41╱A╱ // 0x42b5 @0x11
0x42a4…42c7 at0012 = ╱4c╱L╱ // 0x42b6 @0x12
0x42a4…42c7 at0013 = ╱ef╱$╱ // 0x42b7 @0x13
0x42a4…42c7 at0014 = ╱eb╱;╱ // 0x42b8 @0x14
0x42a4…42c7 at0015 = ╱42╱B╱ // 0x42b9 @0x15
0x42a4…42c7 at0016 = ╱4c╱L╱ // 0x42ba @0x16
0x42a4…42c7 at0017 = ╱41╱A╱ // 0x42bb @0x17
0x42a4…42c7 at0018 = ╱52╱R╱ // 0x42bc @0x18
0x42a4…42c7 at0019 = ╱52╱R╱ // 0x42bd @0x19
0x42a4…42c7 at001a = ╱ef╱$╱ // 0x42be @0x1a
0x42a4…42c7 at001b = ╱ed╱(╱ // 0x42bf @0x1b
0x42a4…42c7 at001c = ╱4a╱J╱ // 0x42c0 @0x1c
0x42a4…42c7 at001d = ╱ee╱)╱ // 0x42c1 @0x1d
0x42a4…42c7 at001e = ╱dc╱=╱ // 0x42c2 @0x1e
0x42a4…42c7 at001f = ╱42╱B╱ // 0x42c3 @0x1f
0x42a4…42c7 at0020 = ╱4c╱L╱ // 0x42c4 @0x20
0x42a4…42c7 at0021 = ╱ef╱$╱ // 0x42c5 @0x21
0x42a4…42c7 at0022 = EOL // 0x42c6 @0x22
0x42a4…42c7 }
0x42c7…42d2 d029 7820 EXEC AJOUR
0x42c7…42d2 LineComalBin {
0x42c7…42d2 ptr = 0xd029 // 0x42c7 @0x0
0x42c7…42d2 lno = 0x1e8c // 0x42c9 @0x2
0x42c7…42d2 at0004 = ╱9d╱ EXEC ╱ // 0x42cb @0x4
0x42c7…42d2 at0005 = ╱41╱A╱ // 0x42cc @0x5
0x42c7…42d2 at0006 = ╱4a╱J╱ // 0x42cd @0x6
0x42c7…42d2 at0007 = ╱4f╱O╱ // 0x42ce @0x7
0x42c7…42d2 at0008 = ╱55╱U╱ // 0x42cf @0x8
0x42c7…42d2 at0009 = ╱52╱R╱ // 0x42d0 @0x9
0x42c7…42d2 at000a = EOL // 0x42d1 @0xa
0x42c7…42d2 }
0x42d2…42d8 d02f 7830 ENDIF
0x42d2…42d8 LineComalBin {
0x42d2…42d8 ptr = 0xd02f // 0x42d2 @0x0
0x42d2…42d8 lno = 0x1e96 // 0x42d4 @0x2
0x42d2…42d8 at0004 = ╱9b╱ ENDIF ╱ // 0x42d6 @0x4
0x42d2…42d8 at0005 = EOL // 0x42d7 @0x5
0x42d2…42d8 }
0x42d8…42e2 d039 7840 WHEN E,G
0x42d8…42e2 LineComalBin {
0x42d8…42e2 ptr = 0xd039 // 0x42d8 @0x0
0x42d8…42e2 lno = 0x1ea0 // 0x42da @0x2
0x42d8…42e2 at0004 = ╱a301╱ WHEN ╱ // 0x42dc @0x4
0x42d8…42e2 at0006 = ╱45╱E╱ // 0x42de @0x6
0x42d8…42e2 at0007 = ╱ec╱,╱ // 0x42df @0x7
0x42d8…42e2 at0008 = ╱47╱G╱ // 0x42e0 @0x8
0x42d8…42e2 at0009 = EOL // 0x42e1 @0x9
0x42d8…42e2 }
0x42e2…42f8 d04f 7850 VARTEKST$=BK$;M=J
0x42e2…42f8 LineComalBin {
0x42e2…42f8 ptr = 0xd04f // 0x42e2 @0x0
0x42e2…42f8 lno = 0x1eaa // 0x42e4 @0x2
0x42e2…42f8 at0004 = ╱56╱V╱ // 0x42e6 @0x4
0x42e2…42f8 at0005 = ╱41╱A╱ // 0x42e7 @0x5
0x42e2…42f8 at0006 = ╱52╱R╱ // 0x42e8 @0x6
0x42e2…42f8 at0007 = ╱54╱T╱ // 0x42e9 @0x7
0x42e2…42f8 at0008 = ╱45╱E╱ // 0x42ea @0x8
0x42e2…42f8 at0009 = ╱4b╱K╱ // 0x42eb @0x9
0x42e2…42f8 at000a = ╱53╱S╱ // 0x42ec @0xa
0x42e2…42f8 at000b = ╱54╱T╱ // 0x42ed @0xb
0x42e2…42f8 at000c = ╱ef╱$╱ // 0x42ee @0xc
0x42e2…42f8 at000d = ╱dc╱=╱ // 0x42ef @0xd
0x42e2…42f8 at000e = ╱42╱B╱ // 0x42f0 @0xe
0x42e2…42f8 at000f = ╱4b╱K╱ // 0x42f1 @0xf
0x42e2…42f8 at0010 = ╱ef╱$╱ // 0x42f2 @0x10
0x42e2…42f8 at0011 = ╱eb╱;╱ // 0x42f3 @0x11
0x42e2…42f8 at0012 = ╱4d╱M╱ // 0x42f4 @0x12
0x42e2…42f8 at0013 = ╱dc╱=╱ // 0x42f5 @0x13
0x42e2…42f8 at0014 = ╱4a╱J╱ // 0x42f6 @0x14
0x42e2…42f8 at0015 = EOL // 0x42f7 @0x15
0x42e2…42f8 }
0x42f8…4309 d060 7860 IF VNARR(J)=G THEN
0x42f8…4309 LineComalBin {
0x42f8…4309 ptr = 0xd060 // 0x42f8 @0x0
0x42f8…4309 lno = 0x1eb4 // 0x42fa @0x2
0x42f8…4309 at0004 = ╱9c╱ IF ╱ // 0x42fc @0x4
0x42f8…4309 at0005 = ╱56╱V╱ // 0x42fd @0x5
0x42f8…4309 at0006 = ╱4e╱N╱ // 0x42fe @0x6
0x42f8…4309 at0007 = ╱41╱A╱ // 0x42ff @0x7
0x42f8…4309 at0008 = ╱52╱R╱ // 0x4300 @0x8
0x42f8…4309 at0009 = ╱52╱R╱ // 0x4301 @0x9
0x42f8…4309 at000a = ╱ed╱(╱ // 0x4302 @0xa
0x42f8…4309 at000b = ╱4a╱J╱ // 0x4303 @0xb
0x42f8…4309 at000c = ╱ee╱)╱ // 0x4304 @0xc
0x42f8…4309 at000d = ╱dc╱=╱ // 0x4305 @0xd
0x42f8…4309 at000e = ╱47╱G╱ // 0x4306 @0xe
0x42f8…4309 at000f = ╱b6╱ THEN ╱ // 0x4307 @0xf
0x42f8…4309 at0010 = EOL // 0x4308 @0x10
0x42f8…4309 }
0x4309…431e d075 7870 CURSOR 16,21
0x4309…431e LineComalBin {
0x4309…431e ptr = 0xd075 // 0x4309 @0x0
0x4309…431e lno = 0x1ebe // 0x430b @0x2
0x4309…431e at0004 = ╱a1╱ CURSOR ╱ // 0x430d @0x4
0x4309…431e at0005 = ╱31╱1╱ // 0x430e @0x5
0x4309…431e at0006 = ╱36╱6╱ // 0x430f @0x6
0x4309…431e at0007 = ╱fe00008005╱ // 0x4310 @0x7
0x4309…431e at000c = ╱ec╱,╱ // 0x4315 @0xc
0x4309…431e at000d = ╱32╱2╱ // 0x4316 @0xd
0x4309…431e at000e = ╱31╱1╱ // 0x4317 @0xe
0x4309…431e at000f = ╱fe0000a805╱ // 0x4318 @0xf
0x4309…431e at0014 = EOL // 0x431d @0x14
0x4309…431e }
0x431e…4324 d07b 7880 ELSE
0x431e…4324 LineComalBin {
0x431e…4324 ptr = 0xd07b // 0x431e @0x0
0x431e…4324 lno = 0x1ec8 // 0x4320 @0x2
0x431e…4324 at0004 = ╱9a╱ ELSE ╱ // 0x4322 @0x4
0x431e…4324 at0005 = EOL // 0x4323 @0x5
0x431e…4324 }
0x4324…4339 d090 7890 CURSOR 23,21
0x4324…4339 LineComalBin {
0x4324…4339 ptr = 0xd090 // 0x4324 @0x0
0x4324…4339 lno = 0x1ed2 // 0x4326 @0x2
0x4324…4339 at0004 = ╱a1╱ CURSOR ╱ // 0x4328 @0x4
0x4324…4339 at0005 = ╱32╱2╱ // 0x4329 @0x5
0x4324…4339 at0006 = ╱33╱3╱ // 0x432a @0x6
0x4324…4339 at0007 = ╱fe0000b805╱ // 0x432b @0x7
0x4324…4339 at000c = ╱ec╱,╱ // 0x4330 @0xc
0x4324…4339 at000d = ╱32╱2╱ // 0x4331 @0xd
0x4324…4339 at000e = ╱31╱1╱ // 0x4332 @0xe
0x4324…4339 at000f = ╱fe0000a805╱ // 0x4333 @0xf
0x4324…4339 at0014 = EOL // 0x4338 @0x14
0x4324…4339 }
0x4339…433f d096 7900 ENDIF
0x4339…433f LineComalBin {
0x4339…433f ptr = 0xd096 // 0x4339 @0x0
0x4339…433f lno = 0x1edc // 0x433b @0x2
0x4339…433f at0004 = ╱9b╱ ENDIF ╱ // 0x433d @0x4
0x4339…433f at0005 = EOL // 0x433e @0x5
0x4339…433f }
0x433f…4352 d0a9 7910 INPUT " ",VARTEKST$
0x433f…4352 LineComalBin {
0x433f…4352 ptr = 0xd0a9 // 0x433f @0x0
0x433f…4352 lno = 0x1ee6 // 0x4341 @0x2
0x433f…4352 at0004 = ╱91╱ INPUT ╱ // 0x4343 @0x4
0x433f…4352 at0005 = ╱22╱"╱ // 0x4344 @0x5
0x433f…4352 at0006 = ╱20╱…╱ // 0x4345 @0x6
0x433f…4352 at0007 = ╱22╱"╱ // 0x4346 @0x7
0x433f…4352 at0008 = ╱ec╱,╱ // 0x4347 @0x8
0x433f…4352 at0009 = ╱56╱V╱ // 0x4348 @0x9
0x433f…4352 at000a = ╱41╱A╱ // 0x4349 @0xa
0x433f…4352 at000b = ╱52╱R╱ // 0x434a @0xb
0x433f…4352 at000c = ╱54╱T╱ // 0x434b @0xc
0x433f…4352 at000d = ╱45╱E╱ // 0x434c @0xd
0x433f…4352 at000e = ╱4b╱K╱ // 0x434d @0xe
0x433f…4352 at000f = ╱53╱S╱ // 0x434e @0xf
0x433f…4352 at0010 = ╱54╱T╱ // 0x434f @0x10
0x433f…4352 at0011 = ╱ef╱$╱ // 0x4350 @0x11
0x433f…4352 at0012 = EOL // 0x4351 @0x12
0x433f…4352 }
0x4352…437a d0d1 7920 IF LEN(VARTEKST$)>B THEN VTARR$(M)=VARTEKST$
0x4352…437a LineComalBin {
0x4352…437a ptr = 0xd0d1 // 0x4352 @0x0
0x4352…437a lno = 0x1ef0 // 0x4354 @0x2
0x4352…437a at0004 = ╱82╱ IF ╱ // 0x4356 @0x4
0x4352…437a at0005 = ╱cc╱LEN╱ // 0x4357 @0x5
0x4352…437a at0006 = ╱ed╱(╱ // 0x4358 @0x6
0x4352…437a at0007 = ╱56╱V╱ // 0x4359 @0x7
0x4352…437a at0008 = ╱41╱A╱ // 0x435a @0x8
0x4352…437a at0009 = ╱52╱R╱ // 0x435b @0x9
0x4352…437a at000a = ╱54╱T╱ // 0x435c @0xa
0x4352…437a at000b = ╱45╱E╱ // 0x435d @0xb
0x4352…437a at000c = ╱4b╱K╱ // 0x435e @0xc
0x4352…437a at000d = ╱53╱S╱ // 0x435f @0xd
0x4352…437a at000e = ╱54╱T╱ // 0x4360 @0xe
0x4352…437a at000f = ╱ef╱$╱ // 0x4361 @0xf
0x4352…437a at0010 = ╱ee╱)╱ // 0x4362 @0x10
0x4352…437a at0011 = ╱de╱>╱ // 0x4363 @0x11
0x4352…437a at0012 = ╱42╱B╱ // 0x4364 @0x12
0x4352…437a at0013 = ╱b6╱ THEN ╱ // 0x4365 @0x13
0x4352…437a at0014 = ╱56╱V╱ // 0x4366 @0x14
0x4352…437a at0015 = ╱54╱T╱ // 0x4367 @0x15
0x4352…437a at0016 = ╱41╱A╱ // 0x4368 @0x16
0x4352…437a at0017 = ╱52╱R╱ // 0x4369 @0x17
0x4352…437a at0018 = ╱52╱R╱ // 0x436a @0x18
0x4352…437a at0019 = ╱ef╱$╱ // 0x436b @0x19
0x4352…437a at001a = ╱ed╱(╱ // 0x436c @0x1a
0x4352…437a at001b = ╱4d╱M╱ // 0x436d @0x1b
0x4352…437a at001c = ╱ee╱)╱ // 0x436e @0x1c
0x4352…437a at001d = ╱dc╱=╱ // 0x436f @0x1d
0x4352…437a at001e = ╱56╱V╱ // 0x4370 @0x1e
0x4352…437a at001f = ╱41╱A╱ // 0x4371 @0x1f
0x4352…437a at0020 = ╱52╱R╱ // 0x4372 @0x20
0x4352…437a at0021 = ╱54╱T╱ // 0x4373 @0x21
0x4352…437a at0022 = ╱45╱E╱ // 0x4374 @0x22
0x4352…437a at0023 = ╱4b╱K╱ // 0x4375 @0x23
0x4352…437a at0024 = ╱53╱S╱ // 0x4376 @0x24
0x4352…437a at0025 = ╱54╱T╱ // 0x4377 @0x25
0x4352…437a at0026 = ╱ef╱$╱ // 0x4378 @0x26
0x4352…437a at0027 = EOL // 0x4379 @0x27
0x4352…437a }
0x437a…438b d0e2 7930 IF VNARR(J)=G THEN
0x437a…438b LineComalBin {
0x437a…438b ptr = 0xd0e2 // 0x437a @0x0
0x437a…438b lno = 0x1efa // 0x437c @0x2
0x437a…438b at0004 = ╱9c╱ IF ╱ // 0x437e @0x4
0x437a…438b at0005 = ╱56╱V╱ // 0x437f @0x5
0x437a…438b at0006 = ╱4e╱N╱ // 0x4380 @0x6
0x437a…438b at0007 = ╱41╱A╱ // 0x4381 @0x7
0x437a…438b at0008 = ╱52╱R╱ // 0x4382 @0x8
0x437a…438b at0009 = ╱52╱R╱ // 0x4383 @0x9
0x437a…438b at000a = ╱ed╱(╱ // 0x4384 @0xa
0x437a…438b at000b = ╱4a╱J╱ // 0x4385 @0xb
0x437a…438b at000c = ╱ee╱)╱ // 0x4386 @0xc
0x437a…438b at000d = ╱dc╱=╱ // 0x4387 @0xd
0x437a…438b at000e = ╱47╱G╱ // 0x4388 @0xe
0x437a…438b at000f = ╱b6╱ THEN ╱ // 0x4389 @0xf
0x437a…438b at0010 = EOL // 0x438a @0x10
0x437a…438b }
0x438b…43a0 d0f7 7940 CURSOR 17,21
0x438b…43a0 LineComalBin {
0x438b…43a0 ptr = 0xd0f7 // 0x438b @0x0
0x438b…43a0 lno = 0x1f04 // 0x438d @0x2
0x438b…43a0 at0004 = ╱a1╱ CURSOR ╱ // 0x438f @0x4
0x438b…43a0 at0005 = ╱31╱1╱ // 0x4390 @0x5
0x438b…43a0 at0006 = ╱37╱7╱ // 0x4391 @0x6
0x438b…43a0 at0007 = ╱fe00008805╱ // 0x4392 @0x7
0x438b…43a0 at000c = ╱ec╱,╱ // 0x4397 @0xc
0x438b…43a0 at000d = ╱32╱2╱ // 0x4398 @0xd
0x438b…43a0 at000e = ╱31╱1╱ // 0x4399 @0xe
0x438b…43a0 at000f = ╱fe0000a805╱ // 0x439a @0xf
0x438b…43a0 at0014 = EOL // 0x439f @0x14
0x438b…43a0 }
0x43a0…43be d115 7950 PRINT VTARR$(M);BK$(E:12)
0x43a0…43be LineComalBin {
0x43a0…43be ptr = 0xd115 // 0x43a0 @0x0
0x43a0…43be lno = 0x1f0e // 0x43a2 @0x2
0x43a0…43be at0004 = ╱92╱ PRINT ╱ // 0x43a4 @0x4
0x43a0…43be at0005 = ╱56╱V╱ // 0x43a5 @0x5
0x43a0…43be at0006 = ╱54╱T╱ // 0x43a6 @0x6
0x43a0…43be at0007 = ╱41╱A╱ // 0x43a7 @0x7
0x43a0…43be at0008 = ╱52╱R╱ // 0x43a8 @0x8
0x43a0…43be at0009 = ╱52╱R╱ // 0x43a9 @0x9
0x43a0…43be at000a = ╱ef╱$╱ // 0x43aa @0xa
0x43a0…43be at000b = ╱ed╱(╱ // 0x43ab @0xb
0x43a0…43be at000c = ╱4d╱M╱ // 0x43ac @0xc
0x43a0…43be at000d = ╱ee╱)╱ // 0x43ad @0xd
0x43a0…43be at000e = ╱eb╱;╱ // 0x43ae @0xe
0x43a0…43be at000f = ╱42╱B╱ // 0x43af @0xf
0x43a0…43be at0010 = ╱4b╱K╱ // 0x43b0 @0x10
0x43a0…43be at0011 = ╱ef╱$╱ // 0x43b1 @0x11
0x43a0…43be at0012 = ╱ed╱(╱ // 0x43b2 @0x12
0x43a0…43be at0013 = ╱45╱E╱ // 0x43b3 @0x13
0x43a0…43be at0014 = ╱f0╱:╱ // 0x43b4 @0x14
0x43a0…43be at0015 = ╱31╱1╱ // 0x43b5 @0x15
0x43a0…43be at0016 = ╱32╱2╱ // 0x43b6 @0x16
0x43a0…43be at0017 = ╱fe0000c004╱ // 0x43b7 @0x17
0x43a0…43be at001c = ╱ee╱)╱ // 0x43bc @0x1c
0x43a0…43be at001d = EOL // 0x43bd @0x1d
0x43a0…43be }
0x43be…43c4 d11b 7960 ELSE
0x43be…43c4 LineComalBin {
0x43be…43c4 ptr = 0xd11b // 0x43be @0x0
0x43be…43c4 lno = 0x1f18 // 0x43c0 @0x2
0x43be…43c4 at0004 = ╱9a╱ ELSE ╱ // 0x43c2 @0x4
0x43be…43c4 at0005 = EOL // 0x43c3 @0x5
0x43be…43c4 }
0x43c4…43d9 d130 7970 CURSOR 24,21
0x43c4…43d9 LineComalBin {
0x43c4…43d9 ptr = 0xd130 // 0x43c4 @0x0
0x43c4…43d9 lno = 0x1f22 // 0x43c6 @0x2
0x43c4…43d9 at0004 = ╱a1╱ CURSOR ╱ // 0x43c8 @0x4
0x43c4…43d9 at0005 = ╱32╱2╱ // 0x43c9 @0x5
0x43c4…43d9 at0006 = ╱34╱4╱ // 0x43ca @0x6
0x43c4…43d9 at0007 = ╱fe0000c005╱ // 0x43cb @0x7
0x43c4…43d9 at000c = ╱ec╱,╱ // 0x43d0 @0xc
0x43c4…43d9 at000d = ╱32╱2╱ // 0x43d1 @0xd
0x43c4…43d9 at000e = ╱31╱1╱ // 0x43d2 @0xe
0x43c4…43d9 at000f = ╱fe0000a805╱ // 0x43d3 @0xf
0x43c4…43d9 at0014 = EOL // 0x43d8 @0x14
0x43c4…43d9 }
0x43d9…4401 d158 7980 PRINT VTARR$(M,E:25);BK$(E:25)
0x43d9…4401 LineComalBin {
0x43d9…4401 ptr = 0xd158 // 0x43d9 @0x0
0x43d9…4401 lno = 0x1f2c // 0x43db @0x2
0x43d9…4401 at0004 = ╱92╱ PRINT ╱ // 0x43dd @0x4
0x43d9…4401 at0005 = ╱56╱V╱ // 0x43de @0x5
0x43d9…4401 at0006 = ╱54╱T╱ // 0x43df @0x6
0x43d9…4401 at0007 = ╱41╱A╱ // 0x43e0 @0x7
0x43d9…4401 at0008 = ╱52╱R╱ // 0x43e1 @0x8
0x43d9…4401 at0009 = ╱52╱R╱ // 0x43e2 @0x9
0x43d9…4401 at000a = ╱ef╱$╱ // 0x43e3 @0xa
0x43d9…4401 at000b = ╱ed╱(╱ // 0x43e4 @0xb
0x43d9…4401 at000c = ╱4d╱M╱ // 0x43e5 @0xc
0x43d9…4401 at000d = ╱ec╱,╱ // 0x43e6 @0xd
0x43d9…4401 at000e = ╱45╱E╱ // 0x43e7 @0xe
0x43d9…4401 at000f = ╱f0╱:╱ // 0x43e8 @0xf
0x43d9…4401 at0010 = ╱32╱2╱ // 0x43e9 @0x10
0x43d9…4401 at0011 = ╱35╱5╱ // 0x43ea @0x11
0x43d9…4401 at0012 = ╱fe0000c805╱ // 0x43eb @0x12
0x43d9…4401 at0017 = ╱ee╱)╱ // 0x43f0 @0x17
0x43d9…4401 at0018 = ╱eb╱;╱ // 0x43f1 @0x18
0x43d9…4401 at0019 = ╱42╱B╱ // 0x43f2 @0x19
0x43d9…4401 at001a = ╱4b╱K╱ // 0x43f3 @0x1a
0x43d9…4401 at001b = ╱ef╱$╱ // 0x43f4 @0x1b
0x43d9…4401 at001c = ╱ed╱(╱ // 0x43f5 @0x1c
0x43d9…4401 at001d = ╱45╱E╱ // 0x43f6 @0x1d
0x43d9…4401 at001e = ╱f0╱:╱ // 0x43f7 @0x1e
0x43d9…4401 at001f = ╱32╱2╱ // 0x43f8 @0x1f
0x43d9…4401 at0020 = ╱35╱5╱ // 0x43f9 @0x20
0x43d9…4401 at0021 = ╱fe0000c805╱ // 0x43fa @0x21
0x43d9…4401 at0026 = ╱ee╱)╱ // 0x43ff @0x26
0x43d9…4401 at0027 = EOL // 0x4400 @0x27
0x43d9…4401 }
0x4401…4407 d15e 7990 ENDIF
0x4401…4407 LineComalBin {
0x4401…4407 ptr = 0xd15e // 0x4401 @0x0
0x4401…4407 lno = 0x1f36 // 0x4403 @0x2
0x4401…4407 at0004 = ╱9b╱ ENDIF ╱ // 0x4405 @0x4
0x4401…4407 at0005 = EOL // 0x4406 @0x5
0x4401…4407 }
0x4407…4418 d16f 8000 IF VNARR(M)=E THEN
0x4407…4418 LineComalBin {
0x4407…4418 ptr = 0xd16f // 0x4407 @0x0
0x4407…4418 lno = 0x1f40 // 0x4409 @0x2
0x4407…4418 at0004 = ╱9c╱ IF ╱ // 0x440b @0x4
0x4407…4418 at0005 = ╱56╱V╱ // 0x440c @0x5
0x4407…4418 at0006 = ╱4e╱N╱ // 0x440d @0x6
0x4407…4418 at0007 = ╱41╱A╱ // 0x440e @0x7
0x4407…4418 at0008 = ╱52╱R╱ // 0x440f @0x8
0x4407…4418 at0009 = ╱52╱R╱ // 0x4410 @0x9
0x4407…4418 at000a = ╱ed╱(╱ // 0x4411 @0xa
0x4407…4418 at000b = ╱4d╱M╱ // 0x4412 @0xb
0x4407…4418 at000c = ╱ee╱)╱ // 0x4413 @0xc
0x4407…4418 at000d = ╱dc╱=╱ // 0x4414 @0xd
0x4407…4418 at000e = ╱45╱E╱ // 0x4415 @0xe
0x4407…4418 at000f = ╱b6╱ THEN ╱ // 0x4416 @0xf
0x4407…4418 at0010 = EOL // 0x4417 @0x10
0x4407…4418 }
0x4418…4446 d19d 8010 EXEC INDPUT2(65,21,BK$(1),BL$)
0x4418…4446 LineComalBin {
0x4418…4446 ptr = 0xd19d // 0x4418 @0x0
0x4418…4446 lno = 0x1f4a // 0x441a @0x2
0x4418…4446 at0004 = ╱9d╱ EXEC ╱ // 0x441c @0x4
0x4418…4446 at0005 = ╱49╱I╱ // 0x441d @0x5
0x4418…4446 at0006 = ╱4e╱N╱ // 0x441e @0x6
0x4418…4446 at0007 = ╱44╱D╱ // 0x441f @0x7
0x4418…4446 at0008 = ╱50╱P╱ // 0x4420 @0x8
0x4418…4446 at0009 = ╱55╱U╱ // 0x4421 @0x9
0x4418…4446 at000a = ╱54╱T╱ // 0x4422 @0xa
0x4418…4446 at000b = ╱32╱2╱ // 0x4423 @0xb
0x4418…4446 at000c = ╱ed╱(╱ // 0x4424 @0xc
0x4418…4446 at000d = ╱36╱6╱ // 0x4425 @0xd
0x4418…4446 at000e = ╱35╱5╱ // 0x4426 @0xe
0x4418…4446 at000f = ╱fe00008207╱ // 0x4427 @0xf
0x4418…4446 at0014 = ╱ec╱,╱ // 0x442c @0x14
0x4418…4446 at0015 = ╱32╱2╱ // 0x442d @0x15
0x4418…4446 at0016 = ╱31╱1╱ // 0x442e @0x16
0x4418…4446 at0017 = ╱fe0000a805╱ // 0x442f @0x17
0x4418…4446 at001c = ╱ec╱,╱ // 0x4434 @0x1c
0x4418…4446 at001d = ╱42╱B╱ // 0x4435 @0x1d
0x4418…4446 at001e = ╱4b╱K╱ // 0x4436 @0x1e
0x4418…4446 at001f = ╱ef╱$╱ // 0x4437 @0x1f
0x4418…4446 at0020 = ╱ed╱(╱ // 0x4438 @0x20
0x4418…4446 at0021 = ╱31╱1╱ // 0x4439 @0x21
0x4418…4446 at0022 = ╱fe00008001╱ // 0x443a @0x22
0x4418…4446 at0027 = ╱ee╱)╱ // 0x443f @0x27
0x4418…4446 at0028 = ╱ec╱,╱ // 0x4440 @0x28
0x4418…4446 at0029 = ╱42╱B╱ // 0x4441 @0x29
0x4418…4446 at002a = ╱4c╱L╱ // 0x4442 @0x2a
0x4418…4446 at002b = ╱ef╱$╱ // 0x4443 @0x2b
0x4418…4446 at002c = ╱ee╱)╱ // 0x4444 @0x2c
0x4418…4446 at002d = EOL // 0x4445 @0x2d
0x4418…4446 }
0x4446…4464 d1bb 8020 EXEC CA(4,BL$,TAH$,TAH$)
0x4446…4464 LineComalBin {
0x4446…4464 ptr = 0xd1bb // 0x4446 @0x0
0x4446…4464 lno = 0x1f54 // 0x4448 @0x2
0x4446…4464 at0004 = ╱9d╱ EXEC ╱ // 0x444a @0x4
0x4446…4464 at0005 = ╱43╱C╱ // 0x444b @0x5
0x4446…4464 at0006 = ╱41╱A╱ // 0x444c @0x6
0x4446…4464 at0007 = ╱ed╱(╱ // 0x444d @0x7
0x4446…4464 at0008 = ╱34╱4╱ // 0x444e @0x8
0x4446…4464 at0009 = ╱fe00008003╱ // 0x444f @0x9
0x4446…4464 at000e = ╱ec╱,╱ // 0x4454 @0xe
0x4446…4464 at000f = ╱42╱B╱ // 0x4455 @0xf
0x4446…4464 at0010 = ╱4c╱L╱ // 0x4456 @0x10
0x4446…4464 at0011 = ╱ef╱$╱ // 0x4457 @0x11
0x4446…4464 at0012 = ╱ec╱,╱ // 0x4458 @0x12
0x4446…4464 at0013 = ╱54╱T╱ // 0x4459 @0x13
0x4446…4464 at0014 = ╱41╱A╱ // 0x445a @0x14
0x4446…4464 at0015 = ╱48╱H╱ // 0x445b @0x15
0x4446…4464 at0016 = ╱ef╱$╱ // 0x445c @0x16
0x4446…4464 at0017 = ╱ec╱,╱ // 0x445d @0x17
0x4446…4464 at0018 = ╱54╱T╱ // 0x445e @0x18
0x4446…4464 at0019 = ╱41╱A╱ // 0x445f @0x19
0x4446…4464 at001a = ╱48╱H╱ // 0x4460 @0x1a
0x4446…4464 at001b = ╱ef╱$╱ // 0x4461 @0x1b
0x4446…4464 at001c = ╱ee╱)╱ // 0x4462 @0x1c
0x4446…4464 at001d = EOL // 0x4463 @0x1d
0x4446…4464 }
0x4464…446f d1c6 8030 IF SI=B THEN
0x4464…446f LineComalBin {
0x4464…446f ptr = 0xd1c6 // 0x4464 @0x0
0x4464…446f lno = 0x1f5e // 0x4466 @0x2
0x4464…446f at0004 = ╱9c╱ IF ╱ // 0x4468 @0x4
0x4464…446f at0005 = ╱53╱S╱ // 0x4469 @0x5
0x4464…446f at0006 = ╱49╱I╱ // 0x446a @0x6
0x4464…446f at0007 = ╱dc╱=╱ // 0x446b @0x7
0x4464…446f at0008 = ╱42╱B╱ // 0x446c @0x8
0x4464…446f at0009 = ╱b6╱ THEN ╱ // 0x446d @0x9
0x4464…446f at000a = EOL // 0x446e @0xa
0x4464…446f }
0x446f…4481 d1d8 8040 BL$=BLARR$(M)
0x446f…4481 LineComalBin {
0x446f…4481 ptr = 0xd1d8 // 0x446f @0x0
0x446f…4481 lno = 0x1f68 // 0x4471 @0x2
0x446f…4481 at0004 = ╱42╱B╱ // 0x4473 @0x4
0x446f…4481 at0005 = ╱4c╱L╱ // 0x4474 @0x5
0x446f…4481 at0006 = ╱ef╱$╱ // 0x4475 @0x6
0x446f…4481 at0007 = ╱dc╱=╱ // 0x4476 @0x7
0x446f…4481 at0008 = ╱42╱B╱ // 0x4477 @0x8
0x446f…4481 at0009 = ╱4c╱L╱ // 0x4478 @0x9
0x446f…4481 at000a = ╱41╱A╱ // 0x4479 @0xa
0x446f…4481 at000b = ╱52╱R╱ // 0x447a @0xb
0x446f…4481 at000c = ╱52╱R╱ // 0x447b @0xc
0x446f…4481 at000d = ╱ef╱$╱ // 0x447c @0xd
0x446f…4481 at000e = ╱ed╱(╱ // 0x447d @0xe
0x446f…4481 at000f = ╱4d╱M╱ // 0x447e @0xf
0x446f…4481 at0010 = ╱ee╱)╱ // 0x447f @0x10
0x446f…4481 at0011 = EOL // 0x4480 @0x11
0x446f…4481 }
0x4481…4487 d1de 8050 ELSE
0x4481…4487 LineComalBin {
0x4481…4487 ptr = 0xd1de // 0x4481 @0x0
0x4481…4487 lno = 0x1f72 // 0x4483 @0x2
0x4481…4487 at0004 = ╱9a╱ ELSE ╱ // 0x4485 @0x4
0x4481…4487 at0005 = EOL // 0x4486 @0x5
0x4481…4487 }
0x4487…4499 d1f0 8060 BLARR$(M)=BL$
0x4487…4499 LineComalBin {
0x4487…4499 ptr = 0xd1f0 // 0x4487 @0x0
0x4487…4499 lno = 0x1f7c // 0x4489 @0x2
0x4487…4499 at0004 = ╱42╱B╱ // 0x448b @0x4
0x4487…4499 at0005 = ╱4c╱L╱ // 0x448c @0x5
0x4487…4499 at0006 = ╱41╱A╱ // 0x448d @0x6
0x4487…4499 at0007 = ╱52╱R╱ // 0x448e @0x7
0x4487…4499 at0008 = ╱52╱R╱ // 0x448f @0x8
0x4487…4499 at0009 = ╱ef╱$╱ // 0x4490 @0x9
0x4487…4499 at000a = ╱ed╱(╱ // 0x4491 @0xa
0x4487…4499 at000b = ╱4d╱M╱ // 0x4492 @0xb
0x4487…4499 at000c = ╱ee╱)╱ // 0x4493 @0xc
0x4487…4499 at000d = ╱dc╱=╱ // 0x4494 @0xd
0x4487…4499 at000e = ╱42╱B╱ // 0x4495 @0xe
0x4487…4499 at000f = ╱4c╱L╱ // 0x4496 @0xf
0x4487…4499 at0010 = ╱ef╱$╱ // 0x4497 @0x10
0x4487…4499 at0011 = EOL // 0x4498 @0x11
0x4487…4499 }
0x4499…44a4 d1fb 8070 EXEC AJOUR
0x4499…44a4 LineComalBin {
0x4499…44a4 ptr = 0xd1fb // 0x4499 @0x0
0x4499…44a4 lno = 0x1f86 // 0x449b @0x2
0x4499…44a4 at0004 = ╱9d╱ EXEC ╱ // 0x449d @0x4
0x4499…44a4 at0005 = ╱41╱A╱ // 0x449e @0x5
0x4499…44a4 at0006 = ╱4a╱J╱ // 0x449f @0x6
0x4499…44a4 at0007 = ╱4f╱O╱ // 0x44a0 @0x7
0x4499…44a4 at0008 = ╱55╱U╱ // 0x44a1 @0x8
0x4499…44a4 at0009 = ╱52╱R╱ // 0x44a2 @0x9
0x4499…44a4 at000a = EOL // 0x44a3 @0xa
0x4499…44a4 }
0x44a4…44aa d201 8080 ENDIF
0x44a4…44aa LineComalBin {
0x44a4…44aa ptr = 0xd201 // 0x44a4 @0x0
0x44a4…44aa lno = 0x1f90 // 0x44a6 @0x2
0x44a4…44aa at0004 = ╱9b╱ ENDIF ╱ // 0x44a8 @0x4
0x44a4…44aa at0005 = EOL // 0x44a9 @0x5
0x44a4…44aa }
0x44aa…44bf d216 8090 CURSOR 66,21
0x44aa…44bf LineComalBin {
0x44aa…44bf ptr = 0xd216 // 0x44aa @0x0
0x44aa…44bf lno = 0x1f9a // 0x44ac @0x2
0x44aa…44bf at0004 = ╱a1╱ CURSOR ╱ // 0x44ae @0x4
0x44aa…44bf at0005 = ╱36╱6╱ // 0x44af @0x5
0x44aa…44bf at0006 = ╱36╱6╱ // 0x44b0 @0x6
0x44aa…44bf at0007 = ╱fe00008407╱ // 0x44b1 @0x7
0x44aa…44bf at000c = ╱ec╱,╱ // 0x44b6 @0xc
0x44aa…44bf at000d = ╱32╱2╱ // 0x44b7 @0xd
0x44aa…44bf at000e = ╱31╱1╱ // 0x44b8 @0xe
0x44aa…44bf at000f = ╱fe0000a805╱ // 0x44b9 @0xf
0x44aa…44bf at0014 = EOL // 0x44be @0x14
0x44aa…44bf }
0x44bf…44d7 d22e 8100 EXEC TUD(BL$,TAL4$,E,B)
0x44bf…44d7 LineComalBin {
0x44bf…44d7 ptr = 0xd22e // 0x44bf @0x0
0x44bf…44d7 lno = 0x1fa4 // 0x44c1 @0x2
0x44bf…44d7 at0004 = ╱9d╱ EXEC ╱ // 0x44c3 @0x4
0x44bf…44d7 at0005 = ╱54╱T╱ // 0x44c4 @0x5
0x44bf…44d7 at0006 = ╱55╱U╱ // 0x44c5 @0x6
0x44bf…44d7 at0007 = ╱44╱D╱ // 0x44c6 @0x7
0x44bf…44d7 at0008 = ╱ed╱(╱ // 0x44c7 @0x8
0x44bf…44d7 at0009 = ╱42╱B╱ // 0x44c8 @0x9
0x44bf…44d7 at000a = ╱4c╱L╱ // 0x44c9 @0xa
0x44bf…44d7 at000b = ╱ef╱$╱ // 0x44ca @0xb
0x44bf…44d7 at000c = ╱ec╱,╱ // 0x44cb @0xc
0x44bf…44d7 at000d = ╱54╱T╱ // 0x44cc @0xd
0x44bf…44d7 at000e = ╱41╱A╱ // 0x44cd @0xe
0x44bf…44d7 at000f = ╱4c╱L╱ // 0x44ce @0xf
0x44bf…44d7 at0010 = ╱34╱4╱ // 0x44cf @0x10
0x44bf…44d7 at0011 = ╱ef╱$╱ // 0x44d0 @0x11
0x44bf…44d7 at0012 = ╱ec╱,╱ // 0x44d1 @0x12
0x44bf…44d7 at0013 = ╱45╱E╱ // 0x44d2 @0x13
0x44bf…44d7 at0014 = ╱ec╱,╱ // 0x44d3 @0x14
0x44bf…44d7 at0015 = ╱42╱B╱ // 0x44d4 @0x15
0x44bf…44d7 at0016 = ╱ee╱)╱ // 0x44d5 @0x16
0x44bf…44d7 at0017 = EOL // 0x44d6 @0x17
0x44bf…44d7 }
0x44d7…44dd d234 8110 ENDIF
0x44d7…44dd LineComalBin {
0x44d7…44dd ptr = 0xd234 // 0x44d7 @0x0
0x44d7…44dd lno = 0x1fae // 0x44d9 @0x2
0x44d7…44dd at0004 = ╱9b╱ ENDIF ╱ // 0x44db @0x4
0x44d7…44dd at0005 = EOL // 0x44dc @0x5
0x44d7…44dd }
0x44dd…44e5 d23c 8120 WHEN V
0x44dd…44e5 LineComalBin {
0x44dd…44e5 ptr = 0xd23c // 0x44dd @0x0
0x44dd…44e5 lno = 0x1fb8 // 0x44df @0x2
0x44dd…44e5 at0004 = ╱a301╱ WHEN ╱ // 0x44e1 @0x4
0x44dd…44e5 at0006 = ╱56╱V╱ // 0x44e3 @0x6
0x44dd…44e5 at0007 = EOL // 0x44e4 @0x7
0x44dd…44e5 }
0x44e5…44ed d244 8130 M=J
0x44e5…44ed LineComalBin {
0x44e5…44ed ptr = 0xd244 // 0x44e5 @0x0
0x44e5…44ed lno = 0x1fc2 // 0x44e7 @0x2
0x44e5…44ed at0004 = ╱4d╱M╱ // 0x44e9 @0x4
0x44e5…44ed at0005 = ╱dc╱=╱ // 0x44ea @0x5
0x44e5…44ed at0006 = ╱4a╱J╱ // 0x44eb @0x6
0x44e5…44ed at0007 = EOL // 0x44ec @0x7
0x44e5…44ed }
0x44ed…4517 d26e 8140 EXEC INDPUT2(24,21,LTX1$,VPRI$)
0x44ed…4517 LineComalBin {
0x44ed…4517 ptr = 0xd26e // 0x44ed @0x0
0x44ed…4517 lno = 0x1fcc // 0x44ef @0x2
0x44ed…4517 at0004 = ╱9d╱ EXEC ╱ // 0x44f1 @0x4
0x44ed…4517 at0005 = ╱49╱I╱ // 0x44f2 @0x5
0x44ed…4517 at0006 = ╱4e╱N╱ // 0x44f3 @0x6
0x44ed…4517 at0007 = ╱44╱D╱ // 0x44f4 @0x7
0x44ed…4517 at0008 = ╱50╱P╱ // 0x44f5 @0x8
0x44ed…4517 at0009 = ╱55╱U╱ // 0x44f6 @0x9
0x44ed…4517 at000a = ╱54╱T╱ // 0x44f7 @0xa
0x44ed…4517 at000b = ╱32╱2╱ // 0x44f8 @0xb
0x44ed…4517 at000c = ╱ed╱(╱ // 0x44f9 @0xc
0x44ed…4517 at000d = ╱32╱2╱ // 0x44fa @0xd
0x44ed…4517 at000e = ╱34╱4╱ // 0x44fb @0xe
0x44ed…4517 at000f = ╱fe0000c005╱ // 0x44fc @0xf
0x44ed…4517 at0014 = ╱ec╱,╱ // 0x4501 @0x14
0x44ed…4517 at0015 = ╱32╱2╱ // 0x4502 @0x15
0x44ed…4517 at0016 = ╱31╱1╱ // 0x4503 @0x16
0x44ed…4517 at0017 = ╱fe0000a805╱ // 0x4504 @0x17
0x44ed…4517 at001c = ╱ec╱,╱ // 0x4509 @0x1c
0x44ed…4517 at001d = ╱4c╱L╱ // 0x450a @0x1d
0x44ed…4517 at001e = ╱54╱T╱ // 0x450b @0x1e
0x44ed…4517 at001f = ╱58╱X╱ // 0x450c @0x1f
0x44ed…4517 at0020 = ╱31╱1╱ // 0x450d @0x20
0x44ed…4517 at0021 = ╱ef╱$╱ // 0x450e @0x21
0x44ed…4517 at0022 = ╱ec╱,╱ // 0x450f @0x22
0x44ed…4517 at0023 = ╱56╱V╱ // 0x4510 @0x23
0x44ed…4517 at0024 = ╱50╱P╱ // 0x4511 @0x24
0x44ed…4517 at0025 = ╱52╱R╱ // 0x4512 @0x25
0x44ed…4517 at0026 = ╱49╱I╱ // 0x4513 @0x26
0x44ed…4517 at0027 = ╱ef╱$╱ // 0x4514 @0x27
0x44ed…4517 at0028 = ╱ee╱)╱ // 0x4515 @0x28
0x44ed…4517 at0029 = EOL // 0x4516 @0x29
0x44ed…4517 }
0x4517…452c d283 8150 CURSOR 30,21
0x4517…452c LineComalBin {
0x4517…452c ptr = 0xd283 // 0x4517 @0x0
0x4517…452c lno = 0x1fd6 // 0x4519 @0x2
0x4517…452c at0004 = ╱a1╱ CURSOR ╱ // 0x451b @0x4
0x4517…452c at0005 = ╱33╱3╱ // 0x451c @0x5
0x4517…452c at0006 = ╱30╱0╱ // 0x451d @0x6
0x4517…452c at0007 = ╱fe0000f005╱ // 0x451e @0x7
0x4517…452c at000c = ╱ec╱,╱ // 0x4523 @0xc
0x4517…452c at000d = ╱32╱2╱ // 0x4524 @0xd
0x4517…452c at000e = ╱31╱1╱ // 0x4525 @0xe
0x4517…452c at000f = ╱fe0000a805╱ // 0x4526 @0xf
0x4517…452c at0014 = EOL // 0x452b @0x14
0x4517…452c }
0x452c…455a d2b1 8160 PRINT VPRI$(7:5);" %";BK$(E:25)
0x452c…455a LineComalBin {
0x452c…455a ptr = 0xd2b1 // 0x452c @0x0
0x452c…455a lno = 0x1fe0 // 0x452e @0x2
0x452c…455a at0004 = ╱92╱ PRINT ╱ // 0x4530 @0x4
0x452c…455a at0005 = ╱56╱V╱ // 0x4531 @0x5
0x452c…455a at0006 = ╱50╱P╱ // 0x4532 @0x6
0x452c…455a at0007 = ╱52╱R╱ // 0x4533 @0x7
0x452c…455a at0008 = ╱49╱I╱ // 0x4534 @0x8
0x452c…455a at0009 = ╱ef╱$╱ // 0x4535 @0x9
0x452c…455a at000a = ╱ed╱(╱ // 0x4536 @0xa
0x452c…455a at000b = ╱37╱7╱ // 0x4537 @0xb
0x452c…455a at000c = ╱fe0000e003╱ // 0x4538 @0xc
0x452c…455a at0011 = ╱f0╱:╱ // 0x453d @0x11
0x452c…455a at0012 = ╱35╱5╱ // 0x453e @0x12
0x452c…455a at0013 = ╱fe0000a003╱ // 0x453f @0x13
0x452c…455a at0018 = ╱ee╱)╱ // 0x4544 @0x18
0x452c…455a at0019 = ╱eb╱;╱ // 0x4545 @0x19
0x452c…455a at001a = ╱22╱"╱ // 0x4546 @0x1a
0x452c…455a at001b = ╱20╱…╱ // 0x4547 @0x1b
0x452c…455a at001c = ╱25╱%╱ // 0x4548 @0x1c
0x452c…455a at001d = ╱22╱"╱ // 0x4549 @0x1d
0x452c…455a at001e = ╱eb╱;╱ // 0x454a @0x1e
0x452c…455a at001f = ╱42╱B╱ // 0x454b @0x1f
0x452c…455a at0020 = ╱4b╱K╱ // 0x454c @0x20
0x452c…455a at0021 = ╱ef╱$╱ // 0x454d @0x21
0x452c…455a at0022 = ╱ed╱(╱ // 0x454e @0x22
0x452c…455a at0023 = ╱45╱E╱ // 0x454f @0x23
0x452c…455a at0024 = ╱f0╱:╱ // 0x4550 @0x24
0x452c…455a at0025 = ╱32╱2╱ // 0x4551 @0x25
0x452c…455a at0026 = ╱35╱5╱ // 0x4552 @0x26
0x452c…455a at0027 = ╱fe0000c805╱ // 0x4553 @0x27
0x452c…455a at002c = ╱ee╱)╱ // 0x4558 @0x2c
0x452c…455a at002d = EOL // 0x4559 @0x2d
0x452c…455a }
0x455a…457b d2d2 8170 EXEC CA(G,VPRI$,BLARR$(M-E),BL$)
0x455a…457b LineComalBin {
0x455a…457b ptr = 0xd2d2 // 0x455a @0x0
0x455a…457b lno = 0x1fea // 0x455c @0x2
0x455a…457b at0004 = ╱9d╱ EXEC ╱ // 0x455e @0x4
0x455a…457b at0005 = ╱43╱C╱ // 0x455f @0x5
0x455a…457b at0006 = ╱41╱A╱ // 0x4560 @0x6
0x455a…457b at0007 = ╱ed╱(╱ // 0x4561 @0x7
0x455a…457b at0008 = ╱47╱G╱ // 0x4562 @0x8
0x455a…457b at0009 = ╱ec╱,╱ // 0x4563 @0x9
0x455a…457b at000a = ╱56╱V╱ // 0x4564 @0xa
0x455a…457b at000b = ╱50╱P╱ // 0x4565 @0xb
0x455a…457b at000c = ╱52╱R╱ // 0x4566 @0xc
0x455a…457b at000d = ╱49╱I╱ // 0x4567 @0xd
0x455a…457b at000e = ╱ef╱$╱ // 0x4568 @0xe
0x455a…457b at000f = ╱ec╱,╱ // 0x4569 @0xf
0x455a…457b at0010 = ╱42╱B╱ // 0x456a @0x10
0x455a…457b at0011 = ╱4c╱L╱ // 0x456b @0x11
0x455a…457b at0012 = ╱41╱A╱ // 0x456c @0x12
0x455a…457b at0013 = ╱52╱R╱ // 0x456d @0x13
0x455a…457b at0014 = ╱52╱R╱ // 0x456e @0x14
0x455a…457b at0015 = ╱ef╱$╱ // 0x456f @0x15
0x455a…457b at0016 = ╱ed╱(╱ // 0x4570 @0x16
0x455a…457b at0017 = ╱4d╱M╱ // 0x4571 @0x17
0x455a…457b at0018 = ╱e3╱-╱ // 0x4572 @0x18
0x455a…457b at0019 = ╱45╱E╱ // 0x4573 @0x19
0x455a…457b at001a = ╱ee╱)╱ // 0x4574 @0x1a
0x455a…457b at001b = ╱ec╱,╱ // 0x4575 @0x1b
0x455a…457b at001c = ╱42╱B╱ // 0x4576 @0x1c
0x455a…457b at001d = ╱4c╱L╱ // 0x4577 @0x1d
0x455a…457b at001e = ╱ef╱$╱ // 0x4578 @0x1e
0x455a…457b at001f = ╱ee╱)╱ // 0x4579 @0x1f
0x455a…457b at0020 = EOL // 0x457a @0x20
0x455a…457b }
0x457b…45ac (231,) d303 8180 VTARR$(M,7:5)=VPRI$(7:5)
0x457b…45ac LineComalBin {
0x457b…45ac ptr = 0xd303 // 0x457b @0x0
0x457b…45ac lno = 0x1ff4 // 0x457d @0x2
0x457b…45ac at0004 = ╱56╱V╱ // 0x457f @0x4
0x457b…45ac at0005 = ╱54╱T╱ // 0x4580 @0x5
0x457b…45ac at0006 = ╱41╱A╱ // 0x4581 @0x6
0x457b…45ac at0007 = ╱52╱R╱ // 0x4582 @0x7
0x457b…45ac at0008 = ╱52╱R╱ // 0x4583 @0x8
0x457b…45ac at0009 = ╱ef╱$╱ // 0x4584 @0x9
0x457b…45ac at000a = ╱ed╱(╱ // 0x4585 @0xa
0x457b…45ac at000b = ╱4d╱M╱ // 0x4586 @0xb
0x457b…45ac at000c = ╱ec╱,╱ // 0x4587 @0xc
0x457b…45ac at000d = ╱37╱7╱ // 0x4588 @0xd
0x457b…45ac at000e = ╱fe0000e003╱ // 0x4589 @0xe
0x457b…45ac at0013 = ╱f0╱:╱ // 0x458e @0x13
0x457b…45ac at0014 = ╱35╱5╱ // 0x458f @0x14
0x457b…45ac at0015 = ╱fe0000a003╱ // 0x4590 @0x15
0x457b…45ac at001a = ╱ee╱)╱ // 0x4595 @0x1a
0x457b…45ac at001b = ╱dc╱=╱ // 0x4596 @0x1b
0x457b…45ac at001c = ╱56╱V╱ // 0x4597 @0x1c
0x457b…45ac at001d = ╱50╱P╱ // 0x4598 @0x1d
0x457b…45ac at001e = ╱52╱R╱ // 0x4599 @0x1e
0x457b…45ac at001f = ╱49╱I╱ // 0x459a @0x1f
0x457b…45ac at0020 = ╱ef╱$╱ // 0x459b @0x20
0x457b…45ac at0021 = ╱ed╱(╱ // 0x459c @0x21
0x457b…45ac at0022 = ╱37╱7╱ // 0x459d @0x22
0x457b…45ac at0023 = ╱fe0000e003╱ // 0x459e @0x23
0x457b…45ac at0028 = ╱f0╱:╱ // 0x45a3 @0x28
0x457b…45ac at0029 = ╱35╱5╱ // 0x45a4 @0x29
0x457b…45ac at002a = ╱fe0000a003╱ // 0x45a5 @0x2a
0x457b…45ac at002f = ╱ee╱)╱ // 0x45aa @0x2f
0x457b…45ac at0030 = EOL // 0x45ab @0x30
0x457b…45ac }
0x45ac…45bd d314 8190 VPRI$="100-"
0x45ac…45bd LineComalBin {
0x45ac…45bd ptr = 0xd314 // 0x45ac @0x0
0x45ac…45bd lno = 0x1ffe // 0x45ae @0x2
0x45ac…45bd at0004 = ╱56╱V╱ // 0x45b0 @0x4
0x45ac…45bd at0005 = ╱50╱P╱ // 0x45b1 @0x5
0x45ac…45bd at0006 = ╱52╱R╱ // 0x45b2 @0x6
0x45ac…45bd at0007 = ╱49╱I╱ // 0x45b3 @0x7
0x45ac…45bd at0008 = ╱ef╱$╱ // 0x45b4 @0x8
0x45ac…45bd at0009 = ╱dc╱=╱ // 0x45b5 @0x9
0x45ac…45bd at000a = ╱22╱"╱ // 0x45b6 @0xa
0x45ac…45bd at000b = ╱31╱1╱ // 0x45b7 @0xb
0x45ac…45bd at000c = ╱30╱0╱ // 0x45b8 @0xc
0x45ac…45bd at000d = ╱30╱0╱ // 0x45b9 @0xd
0x45ac…45bd at000e = ╱2d╱-╱ // 0x45ba @0xe
0x45ac…45bd at000f = ╱22╱"╱ // 0x45bb @0xf
0x45ac…45bd at0010 = EOL // 0x45bc @0x10
0x45ac…45bd }
0x45bd…45d6 d32d 8200 EXEC CA(V,BL$,VPRI$,BL$)
0x45bd…45d6 LineComalBin {
0x45bd…45d6 ptr = 0xd32d // 0x45bd @0x0
0x45bd…45d6 lno = 0x2008 // 0x45bf @0x2
0x45bd…45d6 at0004 = ╱9d╱ EXEC ╱ // 0x45c1 @0x4
0x45bd…45d6 at0005 = ╱43╱C╱ // 0x45c2 @0x5
0x45bd…45d6 at0006 = ╱41╱A╱ // 0x45c3 @0x6
0x45bd…45d6 at0007 = ╱ed╱(╱ // 0x45c4 @0x7
0x45bd…45d6 at0008 = ╱56╱V╱ // 0x45c5 @0x8
0x45bd…45d6 at0009 = ╱ec╱,╱ // 0x45c6 @0x9
0x45bd…45d6 at000a = ╱42╱B╱ // 0x45c7 @0xa
0x45bd…45d6 at000b = ╱4c╱L╱ // 0x45c8 @0xb
0x45bd…45d6 at000c = ╱ef╱$╱ // 0x45c9 @0xc
0x45bd…45d6 at000d = ╱ec╱,╱ // 0x45ca @0xd
0x45bd…45d6 at000e = ╱56╱V╱ // 0x45cb @0xe
0x45bd…45d6 at000f = ╱50╱P╱ // 0x45cc @0xf
0x45bd…45d6 at0010 = ╱52╱R╱ // 0x45cd @0x10
0x45bd…45d6 at0011 = ╱49╱I╱ // 0x45ce @0x11
0x45bd…45d6 at0012 = ╱ef╱$╱ // 0x45cf @0x12
0x45bd…45d6 at0013 = ╱ec╱,╱ // 0x45d0 @0x13
0x45bd…45d6 at0014 = ╱42╱B╱ // 0x45d1 @0x14
0x45bd…45d6 at0015 = ╱4c╱L╱ // 0x45d2 @0x15
0x45bd…45d6 at0016 = ╱ef╱$╱ // 0x45d3 @0x16
0x45bd…45d6 at0017 = ╱ee╱)╱ // 0x45d4 @0x17
0x45bd…45d6 at0018 = EOL // 0x45d5 @0x18
0x45bd…45d6 }
0x45d6…45eb d342 8210 CURSOR 66,21
0x45d6…45eb LineComalBin {
0x45d6…45eb ptr = 0xd342 // 0x45d6 @0x0
0x45d6…45eb lno = 0x2012 // 0x45d8 @0x2
0x45d6…45eb at0004 = ╱a1╱ CURSOR ╱ // 0x45da @0x4
0x45d6…45eb at0005 = ╱36╱6╱ // 0x45db @0x5
0x45d6…45eb at0006 = ╱36╱6╱ // 0x45dc @0x6
0x45d6…45eb at0007 = ╱fe00008407╱ // 0x45dd @0x7
0x45d6…45eb at000c = ╱ec╱,╱ // 0x45e2 @0xc
0x45d6…45eb at000d = ╱32╱2╱ // 0x45e3 @0xd
0x45d6…45eb at000e = ╱31╱1╱ // 0x45e4 @0xe
0x45d6…45eb at000f = ╱fe0000a805╱ // 0x45e5 @0xf
0x45d6…45eb at0014 = EOL // 0x45ea @0x14
0x45d6…45eb }
0x45eb…4603 d35a 8220 EXEC TUD(BL$,TAL4$,E,B)
0x45eb…4603 LineComalBin {
0x45eb…4603 ptr = 0xd35a // 0x45eb @0x0
0x45eb…4603 lno = 0x201c // 0x45ed @0x2
0x45eb…4603 at0004 = ╱9d╱ EXEC ╱ // 0x45ef @0x4
0x45eb…4603 at0005 = ╱54╱T╱ // 0x45f0 @0x5
0x45eb…4603 at0006 = ╱55╱U╱ // 0x45f1 @0x6
0x45eb…4603 at0007 = ╱44╱D╱ // 0x45f2 @0x7
0x45eb…4603 at0008 = ╱ed╱(╱ // 0x45f3 @0x8
0x45eb…4603 at0009 = ╱42╱B╱ // 0x45f4 @0x9
0x45eb…4603 at000a = ╱4c╱L╱ // 0x45f5 @0xa
0x45eb…4603 at000b = ╱ef╱$╱ // 0x45f6 @0xb
0x45eb…4603 at000c = ╱ec╱,╱ // 0x45f7 @0xc
0x45eb…4603 at000d = ╱54╱T╱ // 0x45f8 @0xd
0x45eb…4603 at000e = ╱41╱A╱ // 0x45f9 @0xe
0x45eb…4603 at000f = ╱4c╱L╱ // 0x45fa @0xf
0x45eb…4603 at0010 = ╱34╱4╱ // 0x45fb @0x10
0x45eb…4603 at0011 = ╱ef╱$╱ // 0x45fc @0x11
0x45eb…4603 at0012 = ╱ec╱,╱ // 0x45fd @0x12
0x45eb…4603 at0013 = ╱45╱E╱ // 0x45fe @0x13
0x45eb…4603 at0014 = ╱ec╱,╱ // 0x45ff @0x14
0x45eb…4603 at0015 = ╱42╱B╱ // 0x4600 @0x15
0x45eb…4603 at0016 = ╱ee╱)╱ // 0x4601 @0x16
0x45eb…4603 at0017 = EOL // 0x4602 @0x17
0x45eb…4603 }
0x4603…4615 d36c 8230 BLARR$(M)=BL$
0x4603…4615 LineComalBin {
0x4603…4615 ptr = 0xd36c // 0x4603 @0x0
0x4603…4615 lno = 0x2026 // 0x4605 @0x2
0x4603…4615 at0004 = ╱42╱B╱ // 0x4607 @0x4
0x4603…4615 at0005 = ╱4c╱L╱ // 0x4608 @0x5
0x4603…4615 at0006 = ╱41╱A╱ // 0x4609 @0x6
0x4603…4615 at0007 = ╱52╱R╱ // 0x460a @0x7
0x4603…4615 at0008 = ╱52╱R╱ // 0x460b @0x8
0x4603…4615 at0009 = ╱ef╱$╱ // 0x460c @0x9
0x4603…4615 at000a = ╱ed╱(╱ // 0x460d @0xa
0x4603…4615 at000b = ╱4d╱M╱ // 0x460e @0xb
0x4603…4615 at000c = ╱ee╱)╱ // 0x460f @0xc
0x4603…4615 at000d = ╱dc╱=╱ // 0x4610 @0xd
0x4603…4615 at000e = ╱42╱B╱ // 0x4611 @0xe
0x4603…4615 at000f = ╱4c╱L╱ // 0x4612 @0xf
0x4603…4615 at0010 = ╱ef╱$╱ // 0x4613 @0x10
0x4603…4615 at0011 = EOL // 0x4614 @0x11
0x4603…4615 }
0x4615…4620 (233,) d377 8240 EXEC AJOUR
0x4615…4620 LineComalBin {
0x4615…4620 ptr = 0xd377 // 0x4615 @0x0
0x4615…4620 lno = 0x2030 // 0x4617 @0x2
0x4615…4620 at0004 = ╱9d╱ EXEC ╱ // 0x4619 @0x4
0x4615…4620 at0005 = ╱41╱A╱ // 0x461a @0x5
0x4615…4620 at0006 = ╱4a╱J╱ // 0x461b @0x6
0x4615…4620 at0007 = ╱4f╱O╱ // 0x461c @0x7
0x4615…4620 at0008 = ╱55╱U╱ // 0x461d @0x8
0x4615…4620 at0009 = ╱52╱R╱ // 0x461e @0x9
0x4615…4620 at000a = EOL // 0x461f @0xa
0x4615…4620 }
0x4620…462d d384 8250 WHEN 4
0x4620…462d LineComalBin {
0x4620…462d ptr = 0xd384 // 0x4620 @0x0
0x4620…462d lno = 0x203a // 0x4622 @0x2
0x4620…462d at0004 = ╱a301╱ WHEN ╱ // 0x4624 @0x4
0x4620…462d at0006 = ╱34╱4╱ // 0x4626 @0x6
0x4620…462d at0007 = ╱fe00008003╱ // 0x4627 @0x7
0x4620…462d at000c = EOL // 0x462c @0xc
0x4620…462d }
0x462d…4642 d399 8260 CURSOR 17,21
0x462d…4642 LineComalBin {
0x462d…4642 ptr = 0xd399 // 0x462d @0x0
0x462d…4642 lno = 0x2044 // 0x462f @0x2
0x462d…4642 at0004 = ╱a1╱ CURSOR ╱ // 0x4631 @0x4
0x462d…4642 at0005 = ╱31╱1╱ // 0x4632 @0x5
0x462d…4642 at0006 = ╱37╱7╱ // 0x4633 @0x6
0x462d…4642 at0007 = ╱fe00008805╱ // 0x4634 @0x7
0x462d…4642 at000c = ╱ec╱,╱ // 0x4639 @0xc
0x462d…4642 at000d = ╱32╱2╱ // 0x463a @0xd
0x462d…4642 at000e = ╱31╱1╱ // 0x463b @0xe
0x462d…4642 at000f = ╱fe0000a805╱ // 0x463c @0xf
0x462d…4642 at0014 = EOL // 0x4641 @0x14
0x462d…4642 }
0x4642…4687 d3de 8270 INPUT "Linien er en subtotal og kan ikke rettes. Tast RETURN.",SVAR2$
0x4642…4687 LineComalBin {
0x4642…4687 ptr = 0xd3de // 0x4642 @0x0
0x4642…4687 lno = 0x204e // 0x4644 @0x2
0x4642…4687 at0004 = ╱91╱ INPUT ╱ // 0x4646 @0x4
0x4642…4687 at0005 = ╱22╱"╱ // 0x4647 @0x5
0x4642…4687 at0006 = ╱4c╱L╱ // 0x4648 @0x6
0x4642…4687 at0007 = ╱69╱i╱ // 0x4649 @0x7
0x4642…4687 at0008 = ╱6e╱n╱ // 0x464a @0x8
0x4642…4687 at0009 = ╱69╱i╱ // 0x464b @0x9
0x4642…4687 at000a = ╱65╱e╱ // 0x464c @0xa
0x4642…4687 at000b = ╱6e╱n╱ // 0x464d @0xb
0x4642…4687 at000c = ╱20╱…╱ // 0x464e @0xc
0x4642…4687 at000d = ╱65╱e╱ // 0x464f @0xd
0x4642…4687 at000e = ╱72╱r╱ // 0x4650 @0xe
0x4642…4687 at000f = ╱20╱…╱ // 0x4651 @0xf
0x4642…4687 at0010 = ╱65╱e╱ // 0x4652 @0x10
0x4642…4687 at0011 = ╱6e╱n╱ // 0x4653 @0x11
0x4642…4687 at0012 = ╱20╱…╱ // 0x4654 @0x12
0x4642…4687 at0013 = ╱73╱s╱ // 0x4655 @0x13
0x4642…4687 at0014 = ╱75╱u╱ // 0x4656 @0x14
0x4642…4687 at0015 = ╱62╱b╱ // 0x4657 @0x15
0x4642…4687 at0016 = ╱74╱t╱ // 0x4658 @0x16
0x4642…4687 at0017 = ╱6f╱o╱ // 0x4659 @0x17
0x4642…4687 at0018 = ╱74╱t╱ // 0x465a @0x18
0x4642…4687 at0019 = ╱61╱a╱ // 0x465b @0x19
0x4642…4687 at001a = ╱6c╱l╱ // 0x465c @0x1a
0x4642…4687 at001b = ╱20╱…╱ // 0x465d @0x1b
0x4642…4687 at001c = ╱6f╱o╱ // 0x465e @0x1c
0x4642…4687 at001d = ╱67╱g╱ // 0x465f @0x1d
0x4642…4687 at001e = ╱20╱…╱ // 0x4660 @0x1e
0x4642…4687 at001f = ╱6b╱k╱ // 0x4661 @0x1f
0x4642…4687 at0020 = ╱61╱a╱ // 0x4662 @0x20
0x4642…4687 at0021 = ╱6e╱n╱ // 0x4663 @0x21
0x4642…4687 at0022 = ╱20╱…╱ // 0x4664 @0x22
0x4642…4687 at0023 = ╱69╱i╱ // 0x4665 @0x23
0x4642…4687 at0024 = ╱6b╱k╱ // 0x4666 @0x24
0x4642…4687 at0025 = ╱6b╱k╱ // 0x4667 @0x25
0x4642…4687 at0026 = ╱65╱e╱ // 0x4668 @0x26
0x4642…4687 at0027 = ╱20╱…╱ // 0x4669 @0x27
0x4642…4687 at0028 = ╱72╱r╱ // 0x466a @0x28
0x4642…4687 at0029 = ╱65╱e╱ // 0x466b @0x29
0x4642…4687 at002a = ╱74╱t╱ // 0x466c @0x2a
0x4642…4687 at002b = ╱74╱t╱ // 0x466d @0x2b
0x4642…4687 at002c = ╱65╱e╱ // 0x466e @0x2c
0x4642…4687 at002d = ╱73╱s╱ // 0x466f @0x2d
0x4642…4687 at002e = ╱2e╱.╱ // 0x4670 @0x2e
0x4642…4687 at002f = ╱20╱…╱ // 0x4671 @0x2f
0x4642…4687 at0030 = ╱54╱T╱ // 0x4672 @0x30
0x4642…4687 at0031 = ╱61╱a╱ // 0x4673 @0x31
0x4642…4687 at0032 = ╱73╱s╱ // 0x4674 @0x32
0x4642…4687 at0033 = ╱74╱t╱ // 0x4675 @0x33
0x4642…4687 at0034 = ╱20╱…╱ // 0x4676 @0x34
0x4642…4687 at0035 = ╱52╱R╱ // 0x4677 @0x35
0x4642…4687 at0036 = ╱45╱E╱ // 0x4678 @0x36
0x4642…4687 at0037 = ╱54╱T╱ // 0x4679 @0x37
0x4642…4687 at0038 = ╱55╱U╱ // 0x467a @0x38
0x4642…4687 at0039 = ╱52╱R╱ // 0x467b @0x39
0x4642…4687 at003a = ╱4e╱N╱ // 0x467c @0x3a
0x4642…4687 at003b = ╱2e╱.╱ // 0x467d @0x3b
0x4642…4687 at003c = ╱22╱"╱ // 0x467e @0x3c
0x4642…4687 at003d = ╱ec╱,╱ // 0x467f @0x3d
0x4642…4687 at003e = ╱53╱S╱ // 0x4680 @0x3e
0x4642…4687 at003f = ╱56╱V╱ // 0x4681 @0x3f
0x4642…4687 at0040 = ╱41╱A╱ // 0x4682 @0x40
0x4642…4687 at0041 = ╱52╱R╱ // 0x4683 @0x41
0x4642…4687 at0042 = ╱32╱2╱ // 0x4684 @0x42
0x4642…4687 at0043 = ╱ef╱$╱ // 0x4685 @0x43
0x4642…4687 at0044 = EOL // 0x4686 @0x44
0x4642…4687 }
0x4687…468d d3e4 8280 ENDCASE
0x4687…468d LineComalBin {
0x4687…468d ptr = 0xd3e4 // 0x4687 @0x0
0x4687…468d lno = 0x2058 // 0x4689 @0x2
0x4687…468d at0004 = ╱a4╱ ENDCASE ╱ // 0x468b @0x4
0x4687…468d at0005 = EOL // 0x468c @0x5
0x4687…468d }
0x468d…4697 d3ee 8290 WHEN "2"
0x468d…4697 LineComalBin {
0x468d…4697 ptr = 0xd3ee // 0x468d @0x0
0x468d…4697 lno = 0x2062 // 0x468f @0x2
0x468d…4697 at0004 = ╱a300╱ WHEN ╱ // 0x4691 @0x4
0x468d…4697 at0006 = ╱22╱"╱ // 0x4693 @0x6
0x468d…4697 at0007 = ╱32╱2╱ // 0x4694 @0x7
0x468d…4697 at0008 = ╱22╱"╱ // 0x4695 @0x8
0x468d…4697 at0009 = EOL // 0x4696 @0x9
0x468d…4697 }
0x4697…46ce d425 8300 EXEC INDPUT1(4,23,0,1+VLIN,LTX10$)
0x4697…46ce LineComalBin {
0x4697…46ce ptr = 0xd425 // 0x4697 @0x0
0x4697…46ce lno = 0x206c // 0x4699 @0x2
0x4697…46ce at0004 = ╱9d╱ EXEC ╱ // 0x469b @0x4
0x4697…46ce at0005 = ╱49╱I╱ // 0x469c @0x5
0x4697…46ce at0006 = ╱4e╱N╱ // 0x469d @0x6
0x4697…46ce at0007 = ╱44╱D╱ // 0x469e @0x7
0x4697…46ce at0008 = ╱50╱P╱ // 0x469f @0x8
0x4697…46ce at0009 = ╱55╱U╱ // 0x46a0 @0x9
0x4697…46ce at000a = ╱54╱T╱ // 0x46a1 @0xa
0x4697…46ce at000b = ╱31╱1╱ // 0x46a2 @0xb
0x4697…46ce at000c = ╱ed╱(╱ // 0x46a3 @0xc
0x4697…46ce at000d = ╱34╱4╱ // 0x46a4 @0xd
0x4697…46ce at000e = ╱fe00008003╱ // 0x46a5 @0xe
0x4697…46ce at0013 = ╱ec╱,╱ // 0x46aa @0x13
0x4697…46ce at0014 = ╱32╱2╱ // 0x46ab @0x14
0x4697…46ce at0015 = ╱33╱3╱ // 0x46ac @0x15
0x4697…46ce at0016 = ╱fe0000b805╱ // 0x46ad @0x16
0x4697…46ce at001b = ╱ec╱,╱ // 0x46b2 @0x1b
0x4697…46ce at001c = ╱30╱0╱ // 0x46b3 @0x1c
0x4697…46ce at001d = ╱fe00000000╱ // 0x46b4 @0x1d
0x4697…46ce at0022 = ╱ec╱,╱ // 0x46b9 @0x22
0x4697…46ce at0023 = ╱31╱1╱ // 0x46ba @0x23
0x4697…46ce at0024 = ╱fe00008001╱ // 0x46bb @0x24
0x4697…46ce at0029 = ╱e2╱+╱ // 0x46c0 @0x29
0x4697…46ce at002a = ╱56╱V╱ // 0x46c1 @0x2a
0x4697…46ce at002b = ╱4c╱L╱ // 0x46c2 @0x2b
0x4697…46ce at002c = ╱49╱I╱ // 0x46c3 @0x2c
0x4697…46ce at002d = ╱4e╱N╱ // 0x46c4 @0x2d
0x4697…46ce at002e = ╱ec╱,╱ // 0x46c5 @0x2e
0x4697…46ce at002f = ╱4c╱L╱ // 0x46c6 @0x2f
0x4697…46ce at0030 = ╱54╱T╱ // 0x46c7 @0x30
0x4697…46ce at0031 = ╱58╱X╱ // 0x46c8 @0x31
0x4697…46ce at0032 = ╱31╱1╱ // 0x46c9 @0x32
0x4697…46ce at0033 = ╱30╱0╱ // 0x46ca @0x33
0x4697…46ce at0034 = ╱ef╱$╱ // 0x46cb @0x34
0x4697…46ce at0035 = ╱ee╱)╱ // 0x46cc @0x35
0x4697…46ce at0036 = EOL // 0x46cd @0x36
0x4697…46ce }
0x46ce…46d6 d42d 8310 J=P
0x46ce…46d6 LineComalBin {
0x46ce…46d6 ptr = 0xd42d // 0x46ce @0x0
0x46ce…46d6 lno = 0x2076 // 0x46d0 @0x2
0x46ce…46d6 at0004 = ╱4a╱J╱ // 0x46d2 @0x4
0x46ce…46d6 at0005 = ╱dc╱=╱ // 0x46d3 @0x5
0x46ce…46d6 at0006 = ╱50╱P╱ // 0x46d4 @0x6
0x46ce…46d6 at0007 = EOL // 0x46d5 @0x7
0x46ce…46d6 }
0x46d6…46ea d441 8320 CURSOR 4,19
0x46d6…46ea LineComalBin {
0x46d6…46ea ptr = 0xd441 // 0x46d6 @0x0
0x46d6…46ea lno = 0x2080 // 0x46d8 @0x2
0x46d6…46ea at0004 = ╱a1╱ CURSOR ╱ // 0x46da @0x4
0x46d6…46ea at0005 = ╱34╱4╱ // 0x46db @0x5
0x46d6…46ea at0006 = ╱fe00008003╱ // 0x46dc @0x6
0x46d6…46ea at000b = ╱ec╱,╱ // 0x46e1 @0xb
0x46d6…46ea at000c = ╱31╱1╱ // 0x46e2 @0xc
0x46d6…46ea at000d = ╱39╱9╱ // 0x46e3 @0xd
0x46d6…46ea at000e = ╱fe00009805╱ // 0x46e4 @0xe
0x46d6…46ea at0013 = EOL // 0x46e9 @0x13
0x46d6…46ea }
0x46ea…46fa d451 8330 LIE=19
0x46ea…46fa LineComalBin {
0x46ea…46fa ptr = 0xd451 // 0x46ea @0x0
0x46ea…46fa lno = 0x208a // 0x46ec @0x2
0x46ea…46fa at0004 = ╱4c╱L╱ // 0x46ee @0x4
0x46ea…46fa at0005 = ╱49╱I╱ // 0x46ef @0x5
0x46ea…46fa at0006 = ╱45╱E╱ // 0x46f0 @0x6
0x46ea…46fa at0007 = ╱dc╱=╱ // 0x46f1 @0x7
0x46ea…46fa at0008 = ╱31╱1╱ // 0x46f2 @0x8
0x46ea…46fa at0009 = ╱39╱9╱ // 0x46f3 @0x9
0x46ea…46fa at000a = ╱fe00009805╱ // 0x46f4 @0xa
0x46ea…46fa at000f = EOL // 0x46f9 @0xf
0x46ea…46fa }
0x46fa…4704 d45b 8340 EXEC SLET
0x46fa…4704 LineComalBin {
0x46fa…4704 ptr = 0xd45b // 0x46fa @0x0
0x46fa…4704 lno = 0x2094 // 0x46fc @0x2
0x46fa…4704 at0004 = ╱9d╱ EXEC ╱ // 0x46fe @0x4
0x46fa…4704 at0005 = ╱53╱S╱ // 0x46ff @0x5
0x46fa…4704 at0006 = ╱4c╱L╱ // 0x4700 @0x6
0x46fa…4704 at0007 = ╱45╱E╱ // 0x4701 @0x7
0x46fa…4704 at0008 = ╱54╱T╱ // 0x4702 @0x8
0x46fa…4704 at0009 = EOL // 0x4703 @0x9
0x46fa…4704 }
0x4704…4710 d467 8350 EXEC VUD(J)
0x4704…4710 LineComalBin {
0x4704…4710 ptr = 0xd467 // 0x4704 @0x0
0x4704…4710 lno = 0x209e // 0x4706 @0x2
0x4704…4710 at0004 = ╱9d╱ EXEC ╱ // 0x4708 @0x4
0x4704…4710 at0005 = ╱56╱V╱ // 0x4709 @0x5
0x4704…4710 at0006 = ╱55╱U╱ // 0x470a @0x6
0x4704…4710 at0007 = ╱44╱D╱ // 0x470b @0x7
0x4704…4710 at0008 = ╱ed╱(╱ // 0x470c @0x8
0x4704…4710 at0009 = ╱4a╱J╱ // 0x470d @0x9
0x4704…4710 at000a = ╱ee╱)╱ // 0x470e @0xa
0x4704…4710 at000b = EOL // 0x470f @0xb
0x4704…4710 }
0x4710…471d d474 8360 IF J<VLIN THEN
0x4710…471d LineComalBin {
0x4710…471d ptr = 0xd474 // 0x4710 @0x0
0x4710…471d lno = 0x20a8 // 0x4712 @0x2
0x4710…471d at0004 = ╱9c╱ IF ╱ // 0x4714 @0x4
0x4710…471d at0005 = ╱4a╱J╱ // 0x4715 @0x5
0x4710…471d at0006 = ╱dd╱<╱ // 0x4716 @0x6
0x4710…471d at0007 = ╱56╱V╱ // 0x4717 @0x7
0x4710…471d at0008 = ╱4c╱L╱ // 0x4718 @0x8
0x4710…471d at0009 = ╱49╱I╱ // 0x4719 @0x9
0x4710…471d at000a = ╱4e╱N╱ // 0x471a @0xa
0x4710…471d at000b = ╱b6╱ THEN ╱ // 0x471b @0xb
0x4710…471d at000c = EOL // 0x471c @0xc
0x4710…471d }
0x471d…4733 d48a 8370 VARENR=VNARR(J+E)
0x471d…4733 LineComalBin {
0x471d…4733 ptr = 0xd48a // 0x471d @0x0
0x471d…4733 lno = 0x20b2 // 0x471f @0x2
0x471d…4733 at0004 = ╱56╱V╱ // 0x4721 @0x4
0x471d…4733 at0005 = ╱41╱A╱ // 0x4722 @0x5
0x471d…4733 at0006 = ╱52╱R╱ // 0x4723 @0x6
0x471d…4733 at0007 = ╱45╱E╱ // 0x4724 @0x7
0x471d…4733 at0008 = ╱4e╱N╱ // 0x4725 @0x8
0x471d…4733 at0009 = ╱52╱R╱ // 0x4726 @0x9
0x471d…4733 at000a = ╱dc╱=╱ // 0x4727 @0xa
0x471d…4733 at000b = ╱56╱V╱ // 0x4728 @0xb
0x471d…4733 at000c = ╱4e╱N╱ // 0x4729 @0xc
0x471d…4733 at000d = ╱41╱A╱ // 0x472a @0xd
0x471d…4733 at000e = ╱52╱R╱ // 0x472b @0xe
0x471d…4733 at000f = ╱52╱R╱ // 0x472c @0xf
0x471d…4733 at0010 = ╱ed╱(╱ // 0x472d @0x10
0x471d…4733 at0011 = ╱4a╱J╱ // 0x472e @0x11
0x471d…4733 at0012 = ╱e2╱+╱ // 0x472f @0x12
0x471d…4733 at0013 = ╱45╱E╱ // 0x4730 @0x13
0x471d…4733 at0014 = ╱ee╱)╱ // 0x4731 @0x14
0x471d…4733 at0015 = EOL // 0x4732 @0x15
0x471d…4733 }
0x4733…4739 d490 8380 ELSE
0x4733…4739 LineComalBin {
0x4733…4739 ptr = 0xd490 // 0x4733 @0x0
0x4733…4739 lno = 0x20bc // 0x4735 @0x2
0x4733…4739 at0004 = ╱9a╱ ELSE ╱ // 0x4737 @0x4
0x4733…4739 at0005 = EOL // 0x4738 @0x5
0x4733…4739 }
0x4739…4746 d49d 8390 VARENR=B
0x4739…4746 LineComalBin {
0x4739…4746 ptr = 0xd49d // 0x4739 @0x0
0x4739…4746 lno = 0x20c6 // 0x473b @0x2
0x4739…4746 at0004 = ╱56╱V╱ // 0x473d @0x4
0x4739…4746 at0005 = ╱41╱A╱ // 0x473e @0x5
0x4739…4746 at0006 = ╱52╱R╱ // 0x473f @0x6
0x4739…4746 at0007 = ╱45╱E╱ // 0x4740 @0x7
0x4739…4746 at0008 = ╱4e╱N╱ // 0x4741 @0x8
0x4739…4746 at0009 = ╱52╱R╱ // 0x4742 @0x9
0x4739…4746 at000a = ╱dc╱=╱ // 0x4743 @0xa
0x4739…4746 at000b = ╱42╱B╱ // 0x4744 @0xb
0x4739…4746 at000c = EOL // 0x4745 @0xc
0x4739…4746 }
0x4746…474c d4a3 8400 ENDIF
0x4746…474c LineComalBin {
0x4746…474c ptr = 0xd4a3 // 0x4746 @0x0
0x4746…474c lno = 0x20d0 // 0x4748 @0x2
0x4746…474c at0004 = ╱9b╱ ENDIF ╱ // 0x474a @0x4
0x4746…474c at0005 = EOL // 0x474b @0x5
0x4746…474c }
0x474c…4780 d4d7 8410 EXEC INDPUT1(4,21,-9,-6,LTX11$)
0x474c…4780 LineComalBin {
0x474c…4780 ptr = 0xd4d7 // 0x474c @0x0
0x474c…4780 lno = 0x20da // 0x474e @0x2
0x474c…4780 at0004 = ╱9d╱ EXEC ╱ // 0x4750 @0x4
0x474c…4780 at0005 = ╱49╱I╱ // 0x4751 @0x5
0x474c…4780 at0006 = ╱4e╱N╱ // 0x4752 @0x6
0x474c…4780 at0007 = ╱44╱D╱ // 0x4753 @0x7
0x474c…4780 at0008 = ╱50╱P╱ // 0x4754 @0x8
0x474c…4780 at0009 = ╱55╱U╱ // 0x4755 @0x9
0x474c…4780 at000a = ╱54╱T╱ // 0x4756 @0xa
0x474c…4780 at000b = ╱31╱1╱ // 0x4757 @0xb
0x474c…4780 at000c = ╱ed╱(╱ // 0x4758 @0xc
0x474c…4780 at000d = ╱34╱4╱ // 0x4759 @0xd
0x474c…4780 at000e = ╱fe00008003╱ // 0x475a @0xe
0x474c…4780 at0013 = ╱ec╱,╱ // 0x475f @0x13
0x474c…4780 at0014 = ╱32╱2╱ // 0x4760 @0x14
0x474c…4780 at0015 = ╱31╱1╱ // 0x4761 @0x15
0x474c…4780 at0016 = ╱fe0000a805╱ // 0x4762 @0x16
0x474c…4780 at001b = ╱ec╱,╱ // 0x4767 @0x1b
0x474c…4780 at001c = ╱e9╱-╱ // 0x4768 @0x1c
0x474c…4780 at001d = ╱39╱9╱ // 0x4769 @0x1d
0x474c…4780 at001e = ╱fe00009004╱ // 0x476a @0x1e
0x474c…4780 at0023 = ╱ec╱,╱ // 0x476f @0x23
0x474c…4780 at0024 = ╱e9╱-╱ // 0x4770 @0x24
0x474c…4780 at0025 = ╱36╱6╱ // 0x4771 @0x25
0x474c…4780 at0026 = ╱fe0000c003╱ // 0x4772 @0x26
0x474c…4780 at002b = ╱ec╱,╱ // 0x4777 @0x2b
0x474c…4780 at002c = ╱4c╱L╱ // 0x4778 @0x2c
0x474c…4780 at002d = ╱54╱T╱ // 0x4779 @0x2d
0x474c…4780 at002e = ╱58╱X╱ // 0x477a @0x2e
0x474c…4780 at002f = ╱31╱1╱ // 0x477b @0x2f
0x474c…4780 at0030 = ╱31╱1╱ // 0x477c @0x30
0x474c…4780 at0031 = ╱ef╱$╱ // 0x477d @0x31
0x474c…4780 at0032 = ╱ee╱)╱ // 0x477e @0x32
0x474c…4780 at0033 = EOL // 0x477f @0x33
0x474c…4780 }
0x4780…4799 d4f0 8420 IF P=-7 AND VARENR<>V THEN
0x4780…4799 LineComalBin {
0x4780…4799 ptr = 0xd4f0 // 0x4780 @0x0
0x4780…4799 lno = 0x20e4 // 0x4782 @0x2
0x4780…4799 at0004 = ╱9c╱ IF ╱ // 0x4784 @0x4
0x4780…4799 at0005 = ╱50╱P╱ // 0x4785 @0x5
0x4780…4799 at0006 = ╱dc╱=╱ // 0x4786 @0x6
0x4780…4799 at0007 = ╱e9╱-╱ // 0x4787 @0x7
0x4780…4799 at0008 = ╱37╱7╱ // 0x4788 @0x8
0x4780…4799 at0009 = ╱fe0000e003╱ // 0x4789 @0x9
0x4780…4799 at000e = ╱da╱ AND ╱ // 0x478e @0xe
0x4780…4799 at000f = ╱56╱V╱ // 0x478f @0xf
0x4780…4799 at0010 = ╱41╱A╱ // 0x4790 @0x10
0x4780…4799 at0011 = ╱52╱R╱ // 0x4791 @0x11
0x4780…4799 at0012 = ╱45╱E╱ // 0x4792 @0x12
0x4780…4799 at0013 = ╱4e╱N╱ // 0x4793 @0x13
0x4780…4799 at0014 = ╱52╱R╱ // 0x4794 @0x14
0x4780…4799 at0015 = ╱e1╱<>╱ // 0x4795 @0x15
0x4780…4799 at0016 = ╱56╱V╱ // 0x4796 @0x16
0x4780…4799 at0017 = ╱b6╱ THEN ╱ // 0x4797 @0x17
0x4780…4799 at0018 = EOL // 0x4798 @0x18
0x4780…4799 }
0x4799…47a9 d500 8430 VLIN=VLIN-E
0x4799…47a9 LineComalBin {
0x4799…47a9 ptr = 0xd500 // 0x4799 @0x0
0x4799…47a9 lno = 0x20ee // 0x479b @0x2
0x4799…47a9 at0004 = ╱56╱V╱ // 0x479d @0x4
0x4799…47a9 at0005 = ╱4c╱L╱ // 0x479e @0x5
0x4799…47a9 at0006 = ╱49╱I╱ // 0x479f @0x6
0x4799…47a9 at0007 = ╱4e╱N╱ // 0x47a0 @0x7
0x4799…47a9 at0008 = ╱dc╱=╱ // 0x47a1 @0x8
0x4799…47a9 at0009 = ╱56╱V╱ // 0x47a2 @0x9
0x4799…47a9 at000a = ╱4c╱L╱ // 0x47a3 @0xa
0x4799…47a9 at000b = ╱49╱I╱ // 0x47a4 @0xb
0x4799…47a9 at000c = ╱4e╱N╱ // 0x47a5 @0xc
0x4799…47a9 at000d = ╱e3╱-╱ // 0x47a6 @0xd
0x4799…47a9 at000e = ╱45╱E╱ // 0x47a7 @0xe
0x4799…47a9 at000f = EOL // 0x47a8 @0xf
0x4799…47a9 }
0x47a9…47b7 d50e 8440 FOR M=J TO VLIN
0x47a9…47b7 LineComalBin {
0x47a9…47b7 ptr = 0xd50e // 0x47a9 @0x0
0x47a9…47b7 lno = 0x20f8 // 0x47ab @0x2
0x47a9…47b7 at0004 = ╱83╱ FOR ╱ // 0x47ad @0x4
0x47a9…47b7 at0005 = ╱4d╱M╱ // 0x47ae @0x5
0x47a9…47b7 at0006 = ╱dc╱=╱ // 0x47af @0x6
0x47a9…47b7 at0007 = ╱4a╱J╱ // 0x47b0 @0x7
0x47a9…47b7 at0008 = ╱b7╱ TO ╱ // 0x47b1 @0x8
0x47a9…47b7 at0009 = ╱56╱V╱ // 0x47b2 @0x9
0x47a9…47b7 at000a = ╱4c╱L╱ // 0x47b3 @0xa
0x47a9…47b7 at000b = ╱49╱I╱ // 0x47b4 @0xb
0x47a9…47b7 at000c = ╱4e╱N╱ // 0x47b5 @0xc
0x47a9…47b7 at000d = EOL // 0x47b6 @0xd
0x47a9…47b7 }
0x47b7…47e5 d53c 8450 VNARR(M)=VNARR(M+E);VAARR$(M)=VAARR$(M+E)
0x47b7…47e5 LineComalBin {
0x47b7…47e5 ptr = 0xd53c // 0x47b7 @0x0
0x47b7…47e5 lno = 0x2102 // 0x47b9 @0x2
0x47b7…47e5 at0004 = ╱56╱V╱ // 0x47bb @0x4
0x47b7…47e5 at0005 = ╱4e╱N╱ // 0x47bc @0x5
0x47b7…47e5 at0006 = ╱41╱A╱ // 0x47bd @0x6
0x47b7…47e5 at0007 = ╱52╱R╱ // 0x47be @0x7
0x47b7…47e5 at0008 = ╱52╱R╱ // 0x47bf @0x8
0x47b7…47e5 at0009 = ╱ed╱(╱ // 0x47c0 @0x9
0x47b7…47e5 at000a = ╱4d╱M╱ // 0x47c1 @0xa
0x47b7…47e5 at000b = ╱ee╱)╱ // 0x47c2 @0xb
0x47b7…47e5 at000c = ╱dc╱=╱ // 0x47c3 @0xc
0x47b7…47e5 at000d = ╱56╱V╱ // 0x47c4 @0xd
0x47b7…47e5 at000e = ╱4e╱N╱ // 0x47c5 @0xe
0x47b7…47e5 at000f = ╱41╱A╱ // 0x47c6 @0xf
0x47b7…47e5 at0010 = ╱52╱R╱ // 0x47c7 @0x10
0x47b7…47e5 at0011 = ╱52╱R╱ // 0x47c8 @0x11
0x47b7…47e5 at0012 = ╱ed╱(╱ // 0x47c9 @0x12
0x47b7…47e5 at0013 = ╱4d╱M╱ // 0x47ca @0x13
0x47b7…47e5 at0014 = ╱e2╱+╱ // 0x47cb @0x14
0x47b7…47e5 at0015 = ╱45╱E╱ // 0x47cc @0x15
0x47b7…47e5 at0016 = ╱ee╱)╱ // 0x47cd @0x16
0x47b7…47e5 at0017 = ╱eb╱;╱ // 0x47ce @0x17
0x47b7…47e5 at0018 = ╱56╱V╱ // 0x47cf @0x18
0x47b7…47e5 at0019 = ╱41╱A╱ // 0x47d0 @0x19
0x47b7…47e5 at001a = ╱41╱A╱ // 0x47d1 @0x1a
0x47b7…47e5 at001b = ╱52╱R╱ // 0x47d2 @0x1b
0x47b7…47e5 at001c = ╱52╱R╱ // 0x47d3 @0x1c
0x47b7…47e5 at001d = ╱ef╱$╱ // 0x47d4 @0x1d
0x47b7…47e5 at001e = ╱ed╱(╱ // 0x47d5 @0x1e
0x47b7…47e5 at001f = ╱4d╱M╱ // 0x47d6 @0x1f
0x47b7…47e5 at0020 = ╱ee╱)╱ // 0x47d7 @0x20
0x47b7…47e5 at0021 = ╱dc╱=╱ // 0x47d8 @0x21
0x47b7…47e5 at0022 = ╱56╱V╱ // 0x47d9 @0x22
0x47b7…47e5 at0023 = ╱41╱A╱ // 0x47da @0x23
0x47b7…47e5 at0024 = ╱41╱A╱ // 0x47db @0x24
0x47b7…47e5 at0025 = ╱52╱R╱ // 0x47dc @0x25
0x47b7…47e5 at0026 = ╱52╱R╱ // 0x47dd @0x26
0x47b7…47e5 at0027 = ╱ef╱$╱ // 0x47de @0x27
0x47b7…47e5 at0028 = ╱ed╱(╱ // 0x47df @0x28
0x47b7…47e5 at0029 = ╱4d╱M╱ // 0x47e0 @0x29
0x47b7…47e5 at002a = ╱e2╱+╱ // 0x47e1 @0x2a
0x47b7…47e5 at002b = ╱45╱E╱ // 0x47e2 @0x2b
0x47b7…47e5 at002c = ╱ee╱)╱ // 0x47e3 @0x2c
0x47b7…47e5 at002d = EOL // 0x47e4 @0x2d
0x47b7…47e5 }
0x47e5…4815 d56c 8460 VTARR$(M)=VTARR$(M+E);VPARR$(M)=VPARR$(M+E)
0x47e5…4815 LineComalBin {
0x47e5…4815 ptr = 0xd56c // 0x47e5 @0x0
0x47e5…4815 lno = 0x210c // 0x47e7 @0x2
0x47e5…4815 at0004 = ╱56╱V╱ // 0x47e9 @0x4
0x47e5…4815 at0005 = ╱54╱T╱ // 0x47ea @0x5
0x47e5…4815 at0006 = ╱41╱A╱ // 0x47eb @0x6
0x47e5…4815 at0007 = ╱52╱R╱ // 0x47ec @0x7
0x47e5…4815 at0008 = ╱52╱R╱ // 0x47ed @0x8
0x47e5…4815 at0009 = ╱ef╱$╱ // 0x47ee @0x9
0x47e5…4815 at000a = ╱ed╱(╱ // 0x47ef @0xa
0x47e5…4815 at000b = ╱4d╱M╱ // 0x47f0 @0xb
0x47e5…4815 at000c = ╱ee╱)╱ // 0x47f1 @0xc
0x47e5…4815 at000d = ╱dc╱=╱ // 0x47f2 @0xd
0x47e5…4815 at000e = ╱56╱V╱ // 0x47f3 @0xe
0x47e5…4815 at000f = ╱54╱T╱ // 0x47f4 @0xf
0x47e5…4815 at0010 = ╱41╱A╱ // 0x47f5 @0x10
0x47e5…4815 at0011 = ╱52╱R╱ // 0x47f6 @0x11
0x47e5…4815 at0012 = ╱52╱R╱ // 0x47f7 @0x12
0x47e5…4815 at0013 = ╱ef╱$╱ // 0x47f8 @0x13
0x47e5…4815 at0014 = ╱ed╱(╱ // 0x47f9 @0x14
0x47e5…4815 at0015 = ╱4d╱M╱ // 0x47fa @0x15
0x47e5…4815 at0016 = ╱e2╱+╱ // 0x47fb @0x16
0x47e5…4815 at0017 = ╱45╱E╱ // 0x47fc @0x17
0x47e5…4815 at0018 = ╱ee╱)╱ // 0x47fd @0x18
0x47e5…4815 at0019 = ╱eb╱;╱ // 0x47fe @0x19
0x47e5…4815 at001a = ╱56╱V╱ // 0x47ff @0x1a
0x47e5…4815 at001b = ╱50╱P╱ // 0x4800 @0x1b
0x47e5…4815 at001c = ╱41╱A╱ // 0x4801 @0x1c
0x47e5…4815 at001d = ╱52╱R╱ // 0x4802 @0x1d
0x47e5…4815 at001e = ╱52╱R╱ // 0x4803 @0x1e
0x47e5…4815 at001f = ╱ef╱$╱ // 0x4804 @0x1f
0x47e5…4815 at0020 = ╱ed╱(╱ // 0x4805 @0x20
0x47e5…4815 at0021 = ╱4d╱M╱ // 0x4806 @0x21
0x47e5…4815 at0022 = ╱ee╱)╱ // 0x4807 @0x22
0x47e5…4815 at0023 = ╱dc╱=╱ // 0x4808 @0x23
0x47e5…4815 at0024 = ╱56╱V╱ // 0x4809 @0x24
0x47e5…4815 at0025 = ╱50╱P╱ // 0x480a @0x25
0x47e5…4815 at0026 = ╱41╱A╱ // 0x480b @0x26
0x47e5…4815 at0027 = ╱52╱R╱ // 0x480c @0x27
0x47e5…4815 at0028 = ╱52╱R╱ // 0x480d @0x28
0x47e5…4815 at0029 = ╱ef╱$╱ // 0x480e @0x29
0x47e5…4815 at002a = ╱ed╱(╱ // 0x480f @0x2a
0x47e5…4815 at002b = ╱4d╱M╱ // 0x4810 @0x2b
0x47e5…4815 at002c = ╱e2╱+╱ // 0x4811 @0x2c
0x47e5…4815 at002d = ╱45╱E╱ // 0x4812 @0x2d
0x47e5…4815 at002e = ╱ee╱)╱ // 0x4813 @0x2e
0x47e5…4815 at002f = EOL // 0x4814 @0x2f
0x47e5…4815 }
0x4815…482f d586 8470 BLARR$(M)=BLARR$(M+E)
0x4815…482f LineComalBin {
0x4815…482f ptr = 0xd586 // 0x4815 @0x0
0x4815…482f lno = 0x2116 // 0x4817 @0x2
0x4815…482f at0004 = ╱42╱B╱ // 0x4819 @0x4
0x4815…482f at0005 = ╱4c╱L╱ // 0x481a @0x5
0x4815…482f at0006 = ╱41╱A╱ // 0x481b @0x6
0x4815…482f at0007 = ╱52╱R╱ // 0x481c @0x7
0x4815…482f at0008 = ╱52╱R╱ // 0x481d @0x8
0x4815…482f at0009 = ╱ef╱$╱ // 0x481e @0x9
0x4815…482f at000a = ╱ed╱(╱ // 0x481f @0xa
0x4815…482f at000b = ╱4d╱M╱ // 0x4820 @0xb
0x4815…482f at000c = ╱ee╱)╱ // 0x4821 @0xc
0x4815…482f at000d = ╱dc╱=╱ // 0x4822 @0xd
0x4815…482f at000e = ╱42╱B╱ // 0x4823 @0xe
0x4815…482f at000f = ╱4c╱L╱ // 0x4824 @0xf
0x4815…482f at0010 = ╱41╱A╱ // 0x4825 @0x10
0x4815…482f at0011 = ╱52╱R╱ // 0x4826 @0x11
0x4815…482f at0012 = ╱52╱R╱ // 0x4827 @0x12
0x4815…482f at0013 = ╱ef╱$╱ // 0x4828 @0x13
0x4815…482f at0014 = ╱ed╱(╱ // 0x4829 @0x14
0x4815…482f at0015 = ╱4d╱M╱ // 0x482a @0x15
0x4815…482f at0016 = ╱e2╱+╱ // 0x482b @0x16
0x4815…482f at0017 = ╱45╱E╱ // 0x482c @0x17
0x4815…482f at0018 = ╱ee╱)╱ // 0x482d @0x18
0x4815…482f at0019 = EOL // 0x482e @0x19
0x4815…482f }
0x482f…485f d5b6 8480 AKOD(M,E)=AKOD(M+E,E);AKOD(M,G)=AKOD(M+E,G)
0x482f…485f LineComalBin {
0x482f…485f ptr = 0xd5b6 // 0x482f @0x0
0x482f…485f lno = 0x2120 // 0x4831 @0x2
0x482f…485f at0004 = ╱41╱A╱ // 0x4833 @0x4
0x482f…485f at0005 = ╱4b╱K╱ // 0x4834 @0x5
0x482f…485f at0006 = ╱4f╱O╱ // 0x4835 @0x6
0x482f…485f at0007 = ╱44╱D╱ // 0x4836 @0x7
0x482f…485f at0008 = ╱ed╱(╱ // 0x4837 @0x8
0x482f…485f at0009 = ╱4d╱M╱ // 0x4838 @0x9
0x482f…485f at000a = ╱ec╱,╱ // 0x4839 @0xa
0x482f…485f at000b = ╱45╱E╱ // 0x483a @0xb
0x482f…485f at000c = ╱ee╱)╱ // 0x483b @0xc
0x482f…485f at000d = ╱dc╱=╱ // 0x483c @0xd
0x482f…485f at000e = ╱41╱A╱ // 0x483d @0xe
0x482f…485f at000f = ╱4b╱K╱ // 0x483e @0xf
0x482f…485f at0010 = ╱4f╱O╱ // 0x483f @0x10
0x482f…485f at0011 = ╱44╱D╱ // 0x4840 @0x11
0x482f…485f at0012 = ╱ed╱(╱ // 0x4841 @0x12
0x482f…485f at0013 = ╱4d╱M╱ // 0x4842 @0x13
0x482f…485f at0014 = ╱e2╱+╱ // 0x4843 @0x14
0x482f…485f at0015 = ╱45╱E╱ // 0x4844 @0x15
0x482f…485f at0016 = ╱ec╱,╱ // 0x4845 @0x16
0x482f…485f at0017 = ╱45╱E╱ // 0x4846 @0x17
0x482f…485f at0018 = ╱ee╱)╱ // 0x4847 @0x18
0x482f…485f at0019 = ╱eb╱;╱ // 0x4848 @0x19
0x482f…485f at001a = ╱41╱A╱ // 0x4849 @0x1a
0x482f…485f at001b = ╱4b╱K╱ // 0x484a @0x1b
0x482f…485f at001c = ╱4f╱O╱ // 0x484b @0x1c
0x482f…485f at001d = ╱44╱D╱ // 0x484c @0x1d
0x482f…485f at001e = ╱ed╱(╱ // 0x484d @0x1e
0x482f…485f at001f = ╱4d╱M╱ // 0x484e @0x1f
0x482f…485f at0020 = ╱ec╱,╱ // 0x484f @0x20
0x482f…485f at0021 = ╱47╱G╱ // 0x4850 @0x21
0x482f…485f at0022 = ╱ee╱)╱ // 0x4851 @0x22
0x482f…485f at0023 = ╱dc╱=╱ // 0x4852 @0x23
0x482f…485f at0024 = ╱41╱A╱ // 0x4853 @0x24
0x482f…485f at0025 = ╱4b╱K╱ // 0x4854 @0x25
0x482f…485f at0026 = ╱4f╱O╱ // 0x4855 @0x26
0x482f…485f at0027 = ╱44╱D╱ // 0x4856 @0x27
0x482f…485f at0028 = ╱ed╱(╱ // 0x4857 @0x28
0x482f…485f at0029 = ╱4d╱M╱ // 0x4858 @0x29
0x482f…485f at002a = ╱e2╱+╱ // 0x4859 @0x2a
0x482f…485f at002b = ╱45╱E╱ // 0x485a @0x2b
0x482f…485f at002c = ╱ec╱,╱ // 0x485b @0x2c
0x482f…485f at002d = ╱47╱G╱ // 0x485c @0x2d
0x482f…485f at002e = ╱ee╱)╱ // 0x485d @0x2e
0x482f…485f at002f = EOL // 0x485e @0x2f
0x482f…485f }
0x485f…4866 d5bd 8490 NEXT M
0x485f…4866 LineComalBin {
0x485f…4866 ptr = 0xd5bd // 0x485f @0x0
0x485f…4866 lno = 0x212a // 0x4861 @0x2
0x485f…4866 at0004 = ╱84╱ NEXT ╱ // 0x4863 @0x4
0x485f…4866 at0005 = ╱4d╱M╱ // 0x4864 @0x5
0x485f…4866 at0006 = EOL // 0x4865 @0x6
0x485f…4866 }
0x4866…488c d5e3 8500 AKOD(E+VLIN,E)=B;AKOD(E+VLIN,G)=B
0x4866…488c LineComalBin {
0x4866…488c ptr = 0xd5e3 // 0x4866 @0x0
0x4866…488c lno = 0x2134 // 0x4868 @0x2
0x4866…488c at0004 = ╱41╱A╱ // 0x486a @0x4
0x4866…488c at0005 = ╱4b╱K╱ // 0x486b @0x5
0x4866…488c at0006 = ╱4f╱O╱ // 0x486c @0x6
0x4866…488c at0007 = ╱44╱D╱ // 0x486d @0x7
0x4866…488c at0008 = ╱ed╱(╱ // 0x486e @0x8
0x4866…488c at0009 = ╱45╱E╱ // 0x486f @0x9
0x4866…488c at000a = ╱e2╱+╱ // 0x4870 @0xa
0x4866…488c at000b = ╱56╱V╱ // 0x4871 @0xb
0x4866…488c at000c = ╱4c╱L╱ // 0x4872 @0xc
0x4866…488c at000d = ╱49╱I╱ // 0x4873 @0xd
0x4866…488c at000e = ╱4e╱N╱ // 0x4874 @0xe
0x4866…488c at000f = ╱ec╱,╱ // 0x4875 @0xf
0x4866…488c at0010 = ╱45╱E╱ // 0x4876 @0x10
0x4866…488c at0011 = ╱ee╱)╱ // 0x4877 @0x11
0x4866…488c at0012 = ╱dc╱=╱ // 0x4878 @0x12
0x4866…488c at0013 = ╱42╱B╱ // 0x4879 @0x13
0x4866…488c at0014 = ╱eb╱;╱ // 0x487a @0x14
0x4866…488c at0015 = ╱41╱A╱ // 0x487b @0x15
0x4866…488c at0016 = ╱4b╱K╱ // 0x487c @0x16
0x4866…488c at0017 = ╱4f╱O╱ // 0x487d @0x17
0x4866…488c at0018 = ╱44╱D╱ // 0x487e @0x18
0x4866…488c at0019 = ╱ed╱(╱ // 0x487f @0x19
0x4866…488c at001a = ╱45╱E╱ // 0x4880 @0x1a
0x4866…488c at001b = ╱e2╱+╱ // 0x4881 @0x1b
0x4866…488c at001c = ╱56╱V╱ // 0x4882 @0x1c
0x4866…488c at001d = ╱4c╱L╱ // 0x4883 @0x1d
0x4866…488c at001e = ╱49╱I╱ // 0x4884 @0x1e
0x4866…488c at001f = ╱4e╱N╱ // 0x4885 @0x1f
0x4866…488c at0020 = ╱ec╱,╱ // 0x4886 @0x20
0x4866…488c at0021 = ╱47╱G╱ // 0x4887 @0x21
0x4866…488c at0022 = ╱ee╱)╱ // 0x4888 @0x22
0x4866…488c at0023 = ╱dc╱=╱ // 0x4889 @0x23
0x4866…488c at0024 = ╱42╱B╱ // 0x488a @0x24
0x4866…488c at0025 = EOL // 0x488b @0x25
0x4866…488c }
0x488c…4897 d5ee 8510 EXEC AJOUR
0x488c…4897 LineComalBin {
0x488c…4897 ptr = 0xd5ee // 0x488c @0x0
0x488c…4897 lno = 0x213e // 0x488e @0x2
0x488c…4897 at0004 = ╱9d╱ EXEC ╱ // 0x4890 @0x4
0x488c…4897 at0005 = ╱41╱A╱ // 0x4891 @0x5
0x488c…4897 at0006 = ╱4a╱J╱ // 0x4892 @0x6
0x488c…4897 at0007 = ╱4f╱O╱ // 0x4893 @0x7
0x488c…4897 at0008 = ╱55╱U╱ // 0x4894 @0x8
0x488c…4897 at0009 = ╱52╱R╱ // 0x4895 @0x9
0x488c…4897 at000a = EOL // 0x4896 @0xa
0x488c…4897 }
0x4897…489d d5f4 8520 ENDIF
0x4897…489d LineComalBin {
0x4897…489d ptr = 0xd5f4 // 0x4897 @0x0
0x4897…489d lno = 0x2148 // 0x4899 @0x2
0x4897…489d at0004 = ╱9b╱ ENDIF ╱ // 0x489b @0x4
0x4897…489d at0005 = EOL // 0x489c @0x5
0x4897…489d }
0x489d…48a7 d5fe 8530 WHEN "3"
0x489d…48a7 LineComalBin {
0x489d…48a7 ptr = 0xd5fe // 0x489d @0x0
0x489d…48a7 lno = 0x2152 // 0x489f @0x2
0x489d…48a7 at0004 = ╱a300╱ WHEN ╱ // 0x48a1 @0x4
0x489d…48a7 at0006 = ╱22╱"╱ // 0x48a3 @0x6
0x489d…48a7 at0007 = ╱33╱3╱ // 0x48a4 @0x7
0x489d…48a7 at0008 = ╱22╱"╱ // 0x48a5 @0x8
0x489d…48a7 at0009 = EOL // 0x48a6 @0x9
0x489d…48a7 }
0x48a7…48de d635 8540 EXEC INDPUT1(4,23,0,1+VLIN,LTX12$)
0x48a7…48de LineComalBin {
0x48a7…48de ptr = 0xd635 // 0x48a7 @0x0
0x48a7…48de lno = 0x215c // 0x48a9 @0x2
0x48a7…48de at0004 = ╱9d╱ EXEC ╱ // 0x48ab @0x4
0x48a7…48de at0005 = ╱49╱I╱ // 0x48ac @0x5
0x48a7…48de at0006 = ╱4e╱N╱ // 0x48ad @0x6
0x48a7…48de at0007 = ╱44╱D╱ // 0x48ae @0x7
0x48a7…48de at0008 = ╱50╱P╱ // 0x48af @0x8
0x48a7…48de at0009 = ╱55╱U╱ // 0x48b0 @0x9
0x48a7…48de at000a = ╱54╱T╱ // 0x48b1 @0xa
0x48a7…48de at000b = ╱31╱1╱ // 0x48b2 @0xb
0x48a7…48de at000c = ╱ed╱(╱ // 0x48b3 @0xc
0x48a7…48de at000d = ╱34╱4╱ // 0x48b4 @0xd
0x48a7…48de at000e = ╱fe00008003╱ // 0x48b5 @0xe
0x48a7…48de at0013 = ╱ec╱,╱ // 0x48ba @0x13
0x48a7…48de at0014 = ╱32╱2╱ // 0x48bb @0x14
0x48a7…48de at0015 = ╱33╱3╱ // 0x48bc @0x15
0x48a7…48de at0016 = ╱fe0000b805╱ // 0x48bd @0x16
0x48a7…48de at001b = ╱ec╱,╱ // 0x48c2 @0x1b
0x48a7…48de at001c = ╱30╱0╱ // 0x48c3 @0x1c
0x48a7…48de at001d = ╱fe00000000╱ // 0x48c4 @0x1d
0x48a7…48de at0022 = ╱ec╱,╱ // 0x48c9 @0x22
0x48a7…48de at0023 = ╱31╱1╱ // 0x48ca @0x23
0x48a7…48de at0024 = ╱fe00008001╱ // 0x48cb @0x24
0x48a7…48de at0029 = ╱e2╱+╱ // 0x48d0 @0x29
0x48a7…48de at002a = ╱56╱V╱ // 0x48d1 @0x2a
0x48a7…48de at002b = ╱4c╱L╱ // 0x48d2 @0x2b
0x48a7…48de at002c = ╱49╱I╱ // 0x48d3 @0x2c
0x48a7…48de at002d = ╱4e╱N╱ // 0x48d4 @0x2d
0x48a7…48de at002e = ╱ec╱,╱ // 0x48d5 @0x2e
0x48a7…48de at002f = ╱4c╱L╱ // 0x48d6 @0x2f
0x48a7…48de at0030 = ╱54╱T╱ // 0x48d7 @0x30
0x48a7…48de at0031 = ╱58╱X╱ // 0x48d8 @0x31
0x48a7…48de at0032 = ╱31╱1╱ // 0x48d9 @0x32
0x48a7…48de at0033 = ╱32╱2╱ // 0x48da @0x33
0x48a7…48de at0034 = ╱ef╱$╱ // 0x48db @0x34
0x48a7…48de at0035 = ╱ee╱)╱ // 0x48dc @0x35
0x48a7…48de at0036 = EOL // 0x48dd @0x36
0x48a7…48de }
0x48de…48e6 d63d 8550 J=P
0x48de…48e6 LineComalBin {
0x48de…48e6 ptr = 0xd63d // 0x48de @0x0
0x48de…48e6 lno = 0x2166 // 0x48e0 @0x2
0x48de…48e6 at0004 = ╱4a╱J╱ // 0x48e2 @0x4
0x48de…48e6 at0005 = ╱dc╱=╱ // 0x48e3 @0x5
0x48de…48e6 at0006 = ╱50╱P╱ // 0x48e4 @0x6
0x48de…48e6 at0007 = EOL // 0x48e5 @0x7
0x48de…48e6 }
0x48e6…48f0 d647 8560 EXEC SLET
0x48e6…48f0 LineComalBin {
0x48e6…48f0 ptr = 0xd647 // 0x48e6 @0x0
0x48e6…48f0 lno = 0x2170 // 0x48e8 @0x2
0x48e6…48f0 at0004 = ╱9d╱ EXEC ╱ // 0x48ea @0x4
0x48e6…48f0 at0005 = ╱53╱S╱ // 0x48eb @0x5
0x48e6…48f0 at0006 = ╱4c╱L╱ // 0x48ec @0x6
0x48e6…48f0 at0007 = ╱45╱E╱ // 0x48ed @0x7
0x48e6…48f0 at0008 = ╱54╱T╱ // 0x48ee @0x8
0x48e6…48f0 at0009 = EOL // 0x48ef @0x9
0x48e6…48f0 }
0x48f0…48fd d654 8570 STARTL=J
0x48f0…48fd LineComalBin {
0x48f0…48fd ptr = 0xd654 // 0x48f0 @0x0
0x48f0…48fd lno = 0x217a // 0x48f2 @0x2
0x48f0…48fd at0004 = ╱53╱S╱ // 0x48f4 @0x4
0x48f0…48fd at0005 = ╱54╱T╱ // 0x48f5 @0x5
0x48f0…48fd at0006 = ╱41╱A╱ // 0x48f6 @0x6
0x48f0…48fd at0007 = ╱52╱R╱ // 0x48f7 @0x7
0x48f0…48fd at0008 = ╱54╱T╱ // 0x48f8 @0x8
0x48f0…48fd at0009 = ╱4c╱L╱ // 0x48f9 @0x9
0x48f0…48fd at000a = ╱dc╱=╱ // 0x48fa @0xa
0x48f0…48fd at000b = ╱4a╱J╱ // 0x48fb @0xb
0x48f0…48fd at000c = EOL // 0x48fc @0xc
0x48f0…48fd }
0x48fd…4912 d669 8580 IF VLIN-J<12 THEN
0x48fd…4912 LineComalBin {
0x48fd…4912 ptr = 0xd669 // 0x48fd @0x0
0x48fd…4912 lno = 0x2184 // 0x48ff @0x2
0x48fd…4912 at0004 = ╱9c╱ IF ╱ // 0x4901 @0x4
0x48fd…4912 at0005 = ╱56╱V╱ // 0x4902 @0x5
0x48fd…4912 at0006 = ╱4c╱L╱ // 0x4903 @0x6
0x48fd…4912 at0007 = ╱49╱I╱ // 0x4904 @0x7
0x48fd…4912 at0008 = ╱4e╱N╱ // 0x4905 @0x8
0x48fd…4912 at0009 = ╱e3╱-╱ // 0x4906 @0x9
0x48fd…4912 at000a = ╱4a╱J╱ // 0x4907 @0xa
0x48fd…4912 at000b = ╱dd╱<╱ // 0x4908 @0xb
0x48fd…4912 at000c = ╱31╱1╱ // 0x4909 @0xc
0x48fd…4912 at000d = ╱32╱2╱ // 0x490a @0xd
0x48fd…4912 at000e = ╱fe0000c004╱ // 0x490b @0xe
0x48fd…4912 at0013 = ╱b6╱ THEN ╱ // 0x4910 @0x13
0x48fd…4912 at0014 = EOL // 0x4911 @0x14
0x48fd…4912 }
0x4912…4921 d678 8590 SLUTL=VLIN
0x4912…4921 LineComalBin {
0x4912…4921 ptr = 0xd678 // 0x4912 @0x0
0x4912…4921 lno = 0x218e // 0x4914 @0x2
0x4912…4921 at0004 = ╱53╱S╱ // 0x4916 @0x4
0x4912…4921 at0005 = ╱4c╱L╱ // 0x4917 @0x5
0x4912…4921 at0006 = ╱55╱U╱ // 0x4918 @0x6
0x4912…4921 at0007 = ╱54╱T╱ // 0x4919 @0x7
0x4912…4921 at0008 = ╱4c╱L╱ // 0x491a @0x8
0x4912…4921 at0009 = ╱dc╱=╱ // 0x491b @0x9
0x4912…4921 at000a = ╱56╱V╱ // 0x491c @0xa
0x4912…4921 at000b = ╱4c╱L╱ // 0x491d @0xb
0x4912…4921 at000c = ╱49╱I╱ // 0x491e @0xc
0x4912…4921 at000d = ╱4e╱N╱ // 0x491f @0xd
0x4912…4921 at000e = EOL // 0x4920 @0xe
0x4912…4921 }
0x4921…4927 d67e 8600 ELSE
0x4921…4927 LineComalBin {
0x4921…4927 ptr = 0xd67e // 0x4921 @0x0
0x4921…4927 lno = 0x2198 // 0x4923 @0x2
0x4921…4927 at0004 = ╱9a╱ ELSE ╱ // 0x4925 @0x4
0x4921…4927 at0005 = EOL // 0x4926 @0x5
0x4921…4927 }
0x4927…493b d692 8610 SLUTL=J+11
0x4927…493b LineComalBin {
0x4927…493b ptr = 0xd692 // 0x4927 @0x0
0x4927…493b lno = 0x21a2 // 0x4929 @0x2
0x4927…493b at0004 = ╱53╱S╱ // 0x492b @0x4
0x4927…493b at0005 = ╱4c╱L╱ // 0x492c @0x5
0x4927…493b at0006 = ╱55╱U╱ // 0x492d @0x6
0x4927…493b at0007 = ╱54╱T╱ // 0x492e @0x7
0x4927…493b at0008 = ╱4c╱L╱ // 0x492f @0x8
0x4927…493b at0009 = ╱dc╱=╱ // 0x4930 @0x9
0x4927…493b at000a = ╱4a╱J╱ // 0x4931 @0xa
0x4927…493b at000b = ╱e2╱+╱ // 0x4932 @0xb
0x4927…493b at000c = ╱31╱1╱ // 0x4933 @0xc
0x4927…493b at000d = ╱31╱1╱ // 0x4934 @0xd
0x4927…493b at000e = ╱fe0000b004╱ // 0x4935 @0xe
0x4927…493b at0013 = EOL // 0x493a @0x13
0x4927…493b }
0x493b…4941 d698 8620 ENDIF
0x493b…4941 LineComalBin {
0x493b…4941 ptr = 0xd698 // 0x493b @0x0
0x493b…4941 lno = 0x21ac // 0x493d @0x2
0x493b…4941 at0004 = ╱9b╱ ENDIF ╱ // 0x493f @0x4
0x493b…4941 at0005 = EOL // 0x4940 @0x5
0x493b…4941 }
0x4941…494a d6a1 8630 EXEC LUD
0x4941…494a LineComalBin {
0x4941…494a ptr = 0xd6a1 // 0x4941 @0x0
0x4941…494a lno = 0x21b6 // 0x4943 @0x2
0x4941…494a at0004 = ╱9d╱ EXEC ╱ // 0x4945 @0x4
0x4941…494a at0005 = ╱4c╱L╱ // 0x4946 @0x5
0x4941…494a at0006 = ╱55╱U╱ // 0x4947 @0x6
0x4941…494a at0007 = ╱44╱D╱ // 0x4948 @0x7
0x4941…494a at0008 = EOL // 0x4949 @0x8
0x4941…494a }
0x494a…4954 d6ab 8640 WHEN "4"
0x494a…4954 LineComalBin {
0x494a…4954 ptr = 0xd6ab // 0x494a @0x0
0x494a…4954 lno = 0x21c0 // 0x494c @0x2
0x494a…4954 at0004 = ╱a300╱ WHEN ╱ // 0x494e @0x4
0x494a…4954 at0006 = ╱22╱"╱ // 0x4950 @0x6
0x494a…4954 at0007 = ╱34╱4╱ // 0x4951 @0x7
0x494a…4954 at0008 = ╱22╱"╱ // 0x4952 @0x8
0x494a…4954 at0009 = EOL // 0x4953 @0x9
0x494a…4954 }
0x4954…4964 d6bb 8650 IF VLIN<MFKL THEN
0x4954…4964 LineComalBin {
0x4954…4964 ptr = 0xd6bb // 0x4954 @0x0
0x4954…4964 lno = 0x21ca // 0x4956 @0x2
0x4954…4964 at0004 = ╱9c╱ IF ╱ // 0x4958 @0x4
0x4954…4964 at0005 = ╱56╱V╱ // 0x4959 @0x5
0x4954…4964 at0006 = ╱4c╱L╱ // 0x495a @0x6
0x4954…4964 at0007 = ╱49╱I╱ // 0x495b @0x7
0x4954…4964 at0008 = ╱4e╱N╱ // 0x495c @0x8
0x4954…4964 at0009 = ╱dd╱<╱ // 0x495d @0x9
0x4954…4964 at000a = ╱4d╱M╱ // 0x495e @0xa
0x4954…4964 at000b = ╱46╱F╱ // 0x495f @0xb
0x4954…4964 at000c = ╱4b╱K╱ // 0x4960 @0xc
0x4954…4964 at000d = ╱4c╱L╱ // 0x4961 @0xd
0x4954…4964 at000e = ╱b6╱ THEN ╱ // 0x4962 @0xe
0x4954…4964 at000f = EOL // 0x4963 @0xf
0x4954…4964 }
0x4964…4980 (244,) d6d7 8660 LIE=19;VLIN=VLIN+E
0x4964…4980 LineComalBin {
0x4964…4980 ptr = 0xd6d7 // 0x4964 @0x0
0x4964…4980 lno = 0x21d4 // 0x4966 @0x2
0x4964…4980 at0004 = ╱4c╱L╱ // 0x4968 @0x4
0x4964…4980 at0005 = ╱49╱I╱ // 0x4969 @0x5
0x4964…4980 at0006 = ╱45╱E╱ // 0x496a @0x6
0x4964…4980 at0007 = ╱dc╱=╱ // 0x496b @0x7
0x4964…4980 at0008 = ╱31╱1╱ // 0x496c @0x8
0x4964…4980 at0009 = ╱39╱9╱ // 0x496d @0x9
0x4964…4980 at000a = ╱fe00009805╱ // 0x496e @0xa
0x4964…4980 at000f = ╱eb╱;╱ // 0x4973 @0xf
0x4964…4980 at0010 = ╱56╱V╱ // 0x4974 @0x10
0x4964…4980 at0011 = ╱4c╱L╱ // 0x4975 @0x11
0x4964…4980 at0012 = ╱49╱I╱ // 0x4976 @0x12
0x4964…4980 at0013 = ╱4e╱N╱ // 0x4977 @0x13
0x4964…4980 at0014 = ╱dc╱=╱ // 0x4978 @0x14
0x4964…4980 at0015 = ╱56╱V╱ // 0x4979 @0x15
0x4964…4980 at0016 = ╱4c╱L╱ // 0x497a @0x16
0x4964…4980 at0017 = ╱49╱I╱ // 0x497b @0x17
0x4964…4980 at0018 = ╱4e╱N╱ // 0x497c @0x18
0x4964…4980 at0019 = ╱e2╱+╱ // 0x497d @0x19
0x4964…4980 at001a = ╱45╱E╱ // 0x497e @0x1a
0x4964…4980 at001b = EOL // 0x497f @0x1b
0x4964…4980 }
0x4980…49b7 d70e 8670 EXEC INDPUT1(4,23,0,1+VLIN,LTX13$)
0x4980…49b7 LineComalBin {
0x4980…49b7 ptr = 0xd70e // 0x4980 @0x0
0x4980…49b7 lno = 0x21de // 0x4982 @0x2
0x4980…49b7 at0004 = ╱9d╱ EXEC ╱ // 0x4984 @0x4
0x4980…49b7 at0005 = ╱49╱I╱ // 0x4985 @0x5
0x4980…49b7 at0006 = ╱4e╱N╱ // 0x4986 @0x6
0x4980…49b7 at0007 = ╱44╱D╱ // 0x4987 @0x7
0x4980…49b7 at0008 = ╱50╱P╱ // 0x4988 @0x8
0x4980…49b7 at0009 = ╱55╱U╱ // 0x4989 @0x9
0x4980…49b7 at000a = ╱54╱T╱ // 0x498a @0xa
0x4980…49b7 at000b = ╱31╱1╱ // 0x498b @0xb
0x4980…49b7 at000c = ╱ed╱(╱ // 0x498c @0xc
0x4980…49b7 at000d = ╱34╱4╱ // 0x498d @0xd
0x4980…49b7 at000e = ╱fe00008003╱ // 0x498e @0xe
0x4980…49b7 at0013 = ╱ec╱,╱ // 0x4993 @0x13
0x4980…49b7 at0014 = ╱32╱2╱ // 0x4994 @0x14
0x4980…49b7 at0015 = ╱33╱3╱ // 0x4995 @0x15
0x4980…49b7 at0016 = ╱fe0000b805╱ // 0x4996 @0x16
0x4980…49b7 at001b = ╱ec╱,╱ // 0x499b @0x1b
0x4980…49b7 at001c = ╱30╱0╱ // 0x499c @0x1c
0x4980…49b7 at001d = ╱fe00000000╱ // 0x499d @0x1d
0x4980…49b7 at0022 = ╱ec╱,╱ // 0x49a2 @0x22
0x4980…49b7 at0023 = ╱31╱1╱ // 0x49a3 @0x23
0x4980…49b7 at0024 = ╱fe00008001╱ // 0x49a4 @0x24
0x4980…49b7 at0029 = ╱e2╱+╱ // 0x49a9 @0x29
0x4980…49b7 at002a = ╱56╱V╱ // 0x49aa @0x2a
0x4980…49b7 at002b = ╱4c╱L╱ // 0x49ab @0x2b
0x4980…49b7 at002c = ╱49╱I╱ // 0x49ac @0x2c
0x4980…49b7 at002d = ╱4e╱N╱ // 0x49ad @0x2d
0x4980…49b7 at002e = ╱ec╱,╱ // 0x49ae @0x2e
0x4980…49b7 at002f = ╱4c╱L╱ // 0x49af @0x2f
0x4980…49b7 at0030 = ╱54╱T╱ // 0x49b0 @0x30
0x4980…49b7 at0031 = ╱58╱X╱ // 0x49b1 @0x31
0x4980…49b7 at0032 = ╱31╱1╱ // 0x49b2 @0x32
0x4980…49b7 at0033 = ╱33╱3╱ // 0x49b3 @0x33
0x4980…49b7 at0034 = ╱ef╱$╱ // 0x49b4 @0x34
0x4980…49b7 at0035 = ╱ee╱)╱ // 0x49b5 @0x35
0x4980…49b7 at0036 = EOL // 0x49b6 @0x36
0x4980…49b7 }
0x49b7…49c1 d718 8680 EXEC SLET
0x49b7…49c1 LineComalBin {
0x49b7…49c1 ptr = 0xd718 // 0x49b7 @0x0
0x49b7…49c1 lno = 0x21e8 // 0x49b9 @0x2
0x49b7…49c1 at0004 = ╱9d╱ EXEC ╱ // 0x49bb @0x4
0x49b7…49c1 at0005 = ╱53╱S╱ // 0x49bc @0x5
0x49b7…49c1 at0006 = ╱4c╱L╱ // 0x49bd @0x6
0x49b7…49c1 at0007 = ╱45╱E╱ // 0x49be @0x7
0x49b7…49c1 at0008 = ╱54╱T╱ // 0x49bf @0x8
0x49b7…49c1 at0009 = EOL // 0x49c0 @0x9
0x49b7…49c1 }
0x49c1…49d4 d72b 8690 FOR M=VLIN TO P+E STEP -E
0x49c1…49d4 LineComalBin {
0x49c1…49d4 ptr = 0xd72b // 0x49c1 @0x0
0x49c1…49d4 lno = 0x21f2 // 0x49c3 @0x2
0x49c1…49d4 at0004 = ╱83╱ FOR ╱ // 0x49c5 @0x4
0x49c1…49d4 at0005 = ╱4d╱M╱ // 0x49c6 @0x5
0x49c1…49d4 at0006 = ╱dc╱=╱ // 0x49c7 @0x6
0x49c1…49d4 at0007 = ╱56╱V╱ // 0x49c8 @0x7
0x49c1…49d4 at0008 = ╱4c╱L╱ // 0x49c9 @0x8
0x49c1…49d4 at0009 = ╱49╱I╱ // 0x49ca @0x9
0x49c1…49d4 at000a = ╱4e╱N╱ // 0x49cb @0xa
0x49c1…49d4 at000b = ╱b7╱ TO ╱ // 0x49cc @0xb
0x49c1…49d4 at000c = ╱50╱P╱ // 0x49cd @0xc
0x49c1…49d4 at000d = ╱e2╱+╱ // 0x49ce @0xd
0x49c1…49d4 at000e = ╱45╱E╱ // 0x49cf @0xe
0x49c1…49d4 at000f = ╱b8╱ STEP ╱ // 0x49d0 @0xf
0x49c1…49d4 at0010 = ╱e9╱-╱ // 0x49d1 @0x10
0x49c1…49d4 at0011 = ╱45╱E╱ // 0x49d2 @0x11
0x49c1…49d4 at0012 = EOL // 0x49d3 @0x12
0x49c1…49d4 }
0x49d4…4a02 d759 8700 VNARR(M)=VNARR(M-E);VAARR$(M)=VAARR$(M-E)
0x49d4…4a02 LineComalBin {
0x49d4…4a02 ptr = 0xd759 // 0x49d4 @0x0
0x49d4…4a02 lno = 0x21fc // 0x49d6 @0x2
0x49d4…4a02 at0004 = ╱56╱V╱ // 0x49d8 @0x4
0x49d4…4a02 at0005 = ╱4e╱N╱ // 0x49d9 @0x5
0x49d4…4a02 at0006 = ╱41╱A╱ // 0x49da @0x6
0x49d4…4a02 at0007 = ╱52╱R╱ // 0x49db @0x7
0x49d4…4a02 at0008 = ╱52╱R╱ // 0x49dc @0x8
0x49d4…4a02 at0009 = ╱ed╱(╱ // 0x49dd @0x9
0x49d4…4a02 at000a = ╱4d╱M╱ // 0x49de @0xa
0x49d4…4a02 at000b = ╱ee╱)╱ // 0x49df @0xb
0x49d4…4a02 at000c = ╱dc╱=╱ // 0x49e0 @0xc
0x49d4…4a02 at000d = ╱56╱V╱ // 0x49e1 @0xd
0x49d4…4a02 at000e = ╱4e╱N╱ // 0x49e2 @0xe
0x49d4…4a02 at000f = ╱41╱A╱ // 0x49e3 @0xf
0x49d4…4a02 at0010 = ╱52╱R╱ // 0x49e4 @0x10
0x49d4…4a02 at0011 = ╱52╱R╱ // 0x49e5 @0x11
0x49d4…4a02 at0012 = ╱ed╱(╱ // 0x49e6 @0x12
0x49d4…4a02 at0013 = ╱4d╱M╱ // 0x49e7 @0x13
0x49d4…4a02 at0014 = ╱e3╱-╱ // 0x49e8 @0x14
0x49d4…4a02 at0015 = ╱45╱E╱ // 0x49e9 @0x15
0x49d4…4a02 at0016 = ╱ee╱)╱ // 0x49ea @0x16
0x49d4…4a02 at0017 = ╱eb╱;╱ // 0x49eb @0x17
0x49d4…4a02 at0018 = ╱56╱V╱ // 0x49ec @0x18
0x49d4…4a02 at0019 = ╱41╱A╱ // 0x49ed @0x19
0x49d4…4a02 at001a = ╱41╱A╱ // 0x49ee @0x1a
0x49d4…4a02 at001b = ╱52╱R╱ // 0x49ef @0x1b
0x49d4…4a02 at001c = ╱52╱R╱ // 0x49f0 @0x1c
0x49d4…4a02 at001d = ╱ef╱$╱ // 0x49f1 @0x1d
0x49d4…4a02 at001e = ╱ed╱(╱ // 0x49f2 @0x1e
0x49d4…4a02 at001f = ╱4d╱M╱ // 0x49f3 @0x1f
0x49d4…4a02 at0020 = ╱ee╱)╱ // 0x49f4 @0x20
0x49d4…4a02 at0021 = ╱dc╱=╱ // 0x49f5 @0x21
0x49d4…4a02 at0022 = ╱56╱V╱ // 0x49f6 @0x22
0x49d4…4a02 at0023 = ╱41╱A╱ // 0x49f7 @0x23
0x49d4…4a02 at0024 = ╱41╱A╱ // 0x49f8 @0x24
0x49d4…4a02 at0025 = ╱52╱R╱ // 0x49f9 @0x25
0x49d4…4a02 at0026 = ╱52╱R╱ // 0x49fa @0x26
0x49d4…4a02 at0027 = ╱ef╱$╱ // 0x49fb @0x27
0x49d4…4a02 at0028 = ╱ed╱(╱ // 0x49fc @0x28
0x49d4…4a02 at0029 = ╱4d╱M╱ // 0x49fd @0x29
0x49d4…4a02 at002a = ╱e3╱-╱ // 0x49fe @0x2a
0x49d4…4a02 at002b = ╱45╱E╱ // 0x49ff @0x2b
0x49d4…4a02 at002c = ╱ee╱)╱ // 0x4a00 @0x2c
0x49d4…4a02 at002d = EOL // 0x4a01 @0x2d
0x49d4…4a02 }
0x4a02…4a32 d789 8710 VTARR$(M)=VTARR$(M-E);VPARR$(M)=VPARR$(M-E)
0x4a02…4a32 LineComalBin {
0x4a02…4a32 ptr = 0xd789 // 0x4a02 @0x0
0x4a02…4a32 lno = 0x2206 // 0x4a04 @0x2
0x4a02…4a32 at0004 = ╱56╱V╱ // 0x4a06 @0x4
0x4a02…4a32 at0005 = ╱54╱T╱ // 0x4a07 @0x5
0x4a02…4a32 at0006 = ╱41╱A╱ // 0x4a08 @0x6
0x4a02…4a32 at0007 = ╱52╱R╱ // 0x4a09 @0x7
0x4a02…4a32 at0008 = ╱52╱R╱ // 0x4a0a @0x8
0x4a02…4a32 at0009 = ╱ef╱$╱ // 0x4a0b @0x9
0x4a02…4a32 at000a = ╱ed╱(╱ // 0x4a0c @0xa
0x4a02…4a32 at000b = ╱4d╱M╱ // 0x4a0d @0xb
0x4a02…4a32 at000c = ╱ee╱)╱ // 0x4a0e @0xc
0x4a02…4a32 at000d = ╱dc╱=╱ // 0x4a0f @0xd
0x4a02…4a32 at000e = ╱56╱V╱ // 0x4a10 @0xe
0x4a02…4a32 at000f = ╱54╱T╱ // 0x4a11 @0xf
0x4a02…4a32 at0010 = ╱41╱A╱ // 0x4a12 @0x10
0x4a02…4a32 at0011 = ╱52╱R╱ // 0x4a13 @0x11
0x4a02…4a32 at0012 = ╱52╱R╱ // 0x4a14 @0x12
0x4a02…4a32 at0013 = ╱ef╱$╱ // 0x4a15 @0x13
0x4a02…4a32 at0014 = ╱ed╱(╱ // 0x4a16 @0x14
0x4a02…4a32 at0015 = ╱4d╱M╱ // 0x4a17 @0x15
0x4a02…4a32 at0016 = ╱e3╱-╱ // 0x4a18 @0x16
0x4a02…4a32 at0017 = ╱45╱E╱ // 0x4a19 @0x17
0x4a02…4a32 at0018 = ╱ee╱)╱ // 0x4a1a @0x18
0x4a02…4a32 at0019 = ╱eb╱;╱ // 0x4a1b @0x19
0x4a02…4a32 at001a = ╱56╱V╱ // 0x4a1c @0x1a
0x4a02…4a32 at001b = ╱50╱P╱ // 0x4a1d @0x1b
0x4a02…4a32 at001c = ╱41╱A╱ // 0x4a1e @0x1c
0x4a02…4a32 at001d = ╱52╱R╱ // 0x4a1f @0x1d
0x4a02…4a32 at001e = ╱52╱R╱ // 0x4a20 @0x1e
0x4a02…4a32 at001f = ╱ef╱$╱ // 0x4a21 @0x1f
0x4a02…4a32 at0020 = ╱ed╱(╱ // 0x4a22 @0x20
0x4a02…4a32 at0021 = ╱4d╱M╱ // 0x4a23 @0x21
0x4a02…4a32 at0022 = ╱ee╱)╱ // 0x4a24 @0x22
0x4a02…4a32 at0023 = ╱dc╱=╱ // 0x4a25 @0x23
0x4a02…4a32 at0024 = ╱56╱V╱ // 0x4a26 @0x24
0x4a02…4a32 at0025 = ╱50╱P╱ // 0x4a27 @0x25
0x4a02…4a32 at0026 = ╱41╱A╱ // 0x4a28 @0x26
0x4a02…4a32 at0027 = ╱52╱R╱ // 0x4a29 @0x27
0x4a02…4a32 at0028 = ╱52╱R╱ // 0x4a2a @0x28
0x4a02…4a32 at0029 = ╱ef╱$╱ // 0x4a2b @0x29
0x4a02…4a32 at002a = ╱ed╱(╱ // 0x4a2c @0x2a
0x4a02…4a32 at002b = ╱4d╱M╱ // 0x4a2d @0x2b
0x4a02…4a32 at002c = ╱e3╱-╱ // 0x4a2e @0x2c
0x4a02…4a32 at002d = ╱45╱E╱ // 0x4a2f @0x2d
0x4a02…4a32 at002e = ╱ee╱)╱ // 0x4a30 @0x2e
0x4a02…4a32 at002f = EOL // 0x4a31 @0x2f
0x4a02…4a32 }
0x4a32…4a4c d7a3 8720 BLARR$(M)=BLARR$(M-E)
0x4a32…4a4c LineComalBin {
0x4a32…4a4c ptr = 0xd7a3 // 0x4a32 @0x0
0x4a32…4a4c lno = 0x2210 // 0x4a34 @0x2
0x4a32…4a4c at0004 = ╱42╱B╱ // 0x4a36 @0x4
0x4a32…4a4c at0005 = ╱4c╱L╱ // 0x4a37 @0x5
0x4a32…4a4c at0006 = ╱41╱A╱ // 0x4a38 @0x6
0x4a32…4a4c at0007 = ╱52╱R╱ // 0x4a39 @0x7
0x4a32…4a4c at0008 = ╱52╱R╱ // 0x4a3a @0x8
0x4a32…4a4c at0009 = ╱ef╱$╱ // 0x4a3b @0x9
0x4a32…4a4c at000a = ╱ed╱(╱ // 0x4a3c @0xa
0x4a32…4a4c at000b = ╱4d╱M╱ // 0x4a3d @0xb
0x4a32…4a4c at000c = ╱ee╱)╱ // 0x4a3e @0xc
0x4a32…4a4c at000d = ╱dc╱=╱ // 0x4a3f @0xd
0x4a32…4a4c at000e = ╱42╱B╱ // 0x4a40 @0xe
0x4a32…4a4c at000f = ╱4c╱L╱ // 0x4a41 @0xf
0x4a32…4a4c at0010 = ╱41╱A╱ // 0x4a42 @0x10
0x4a32…4a4c at0011 = ╱52╱R╱ // 0x4a43 @0x11
0x4a32…4a4c at0012 = ╱52╱R╱ // 0x4a44 @0x12
0x4a32…4a4c at0013 = ╱ef╱$╱ // 0x4a45 @0x13
0x4a32…4a4c at0014 = ╱ed╱(╱ // 0x4a46 @0x14
0x4a32…4a4c at0015 = ╱4d╱M╱ // 0x4a47 @0x15
0x4a32…4a4c at0016 = ╱e3╱-╱ // 0x4a48 @0x16
0x4a32…4a4c at0017 = ╱45╱E╱ // 0x4a49 @0x17
0x4a32…4a4c at0018 = ╱ee╱)╱ // 0x4a4a @0x18
0x4a32…4a4c at0019 = EOL // 0x4a4b @0x19
0x4a32…4a4c }
0x4a4c…4a7c d7d3 8730 AKOD(M,E)=AKOD(M-E,E);AKOD(M,G)=AKOD(M-E,G)
0x4a4c…4a7c LineComalBin {
0x4a4c…4a7c ptr = 0xd7d3 // 0x4a4c @0x0
0x4a4c…4a7c lno = 0x221a // 0x4a4e @0x2
0x4a4c…4a7c at0004 = ╱41╱A╱ // 0x4a50 @0x4
0x4a4c…4a7c at0005 = ╱4b╱K╱ // 0x4a51 @0x5
0x4a4c…4a7c at0006 = ╱4f╱O╱ // 0x4a52 @0x6
0x4a4c…4a7c at0007 = ╱44╱D╱ // 0x4a53 @0x7
0x4a4c…4a7c at0008 = ╱ed╱(╱ // 0x4a54 @0x8
0x4a4c…4a7c at0009 = ╱4d╱M╱ // 0x4a55 @0x9
0x4a4c…4a7c at000a = ╱ec╱,╱ // 0x4a56 @0xa
0x4a4c…4a7c at000b = ╱45╱E╱ // 0x4a57 @0xb
0x4a4c…4a7c at000c = ╱ee╱)╱ // 0x4a58 @0xc
0x4a4c…4a7c at000d = ╱dc╱=╱ // 0x4a59 @0xd
0x4a4c…4a7c at000e = ╱41╱A╱ // 0x4a5a @0xe
0x4a4c…4a7c at000f = ╱4b╱K╱ // 0x4a5b @0xf
0x4a4c…4a7c at0010 = ╱4f╱O╱ // 0x4a5c @0x10
0x4a4c…4a7c at0011 = ╱44╱D╱ // 0x4a5d @0x11
0x4a4c…4a7c at0012 = ╱ed╱(╱ // 0x4a5e @0x12
0x4a4c…4a7c at0013 = ╱4d╱M╱ // 0x4a5f @0x13
0x4a4c…4a7c at0014 = ╱e3╱-╱ // 0x4a60 @0x14
0x4a4c…4a7c at0015 = ╱45╱E╱ // 0x4a61 @0x15
0x4a4c…4a7c at0016 = ╱ec╱,╱ // 0x4a62 @0x16
0x4a4c…4a7c at0017 = ╱45╱E╱ // 0x4a63 @0x17
0x4a4c…4a7c at0018 = ╱ee╱)╱ // 0x4a64 @0x18
0x4a4c…4a7c at0019 = ╱eb╱;╱ // 0x4a65 @0x19
0x4a4c…4a7c at001a = ╱41╱A╱ // 0x4a66 @0x1a
0x4a4c…4a7c at001b = ╱4b╱K╱ // 0x4a67 @0x1b
0x4a4c…4a7c at001c = ╱4f╱O╱ // 0x4a68 @0x1c
0x4a4c…4a7c at001d = ╱44╱D╱ // 0x4a69 @0x1d
0x4a4c…4a7c at001e = ╱ed╱(╱ // 0x4a6a @0x1e
0x4a4c…4a7c at001f = ╱4d╱M╱ // 0x4a6b @0x1f
0x4a4c…4a7c at0020 = ╱ec╱,╱ // 0x4a6c @0x20
0x4a4c…4a7c at0021 = ╱47╱G╱ // 0x4a6d @0x21
0x4a4c…4a7c at0022 = ╱ee╱)╱ // 0x4a6e @0x22
0x4a4c…4a7c at0023 = ╱dc╱=╱ // 0x4a6f @0x23
0x4a4c…4a7c at0024 = ╱41╱A╱ // 0x4a70 @0x24
0x4a4c…4a7c at0025 = ╱4b╱K╱ // 0x4a71 @0x25
0x4a4c…4a7c at0026 = ╱4f╱O╱ // 0x4a72 @0x26
0x4a4c…4a7c at0027 = ╱44╱D╱ // 0x4a73 @0x27
0x4a4c…4a7c at0028 = ╱ed╱(╱ // 0x4a74 @0x28
0x4a4c…4a7c at0029 = ╱4d╱M╱ // 0x4a75 @0x29
0x4a4c…4a7c at002a = ╱e3╱-╱ // 0x4a76 @0x2a
0x4a4c…4a7c at002b = ╱45╱E╱ // 0x4a77 @0x2b
0x4a4c…4a7c at002c = ╱ec╱,╱ // 0x4a78 @0x2c
0x4a4c…4a7c at002d = ╱47╱G╱ // 0x4a79 @0x2d
0x4a4c…4a7c at002e = ╱ee╱)╱ // 0x4a7a @0x2e
0x4a4c…4a7c at002f = EOL // 0x4a7b @0x2f
0x4a4c…4a7c }
0x4a7c…4a83 d7da 8740 NEXT M
0x4a7c…4a83 LineComalBin {
0x4a7c…4a83 ptr = 0xd7da // 0x4a7c @0x0
0x4a7c…4a83 lno = 0x2224 // 0x4a7e @0x2
0x4a7c…4a83 at0004 = ╱84╱ NEXT ╱ // 0x4a80 @0x4
0x4a7c…4a83 at0005 = ╱4d╱M╱ // 0x4a81 @0x5
0x4a7c…4a83 at0006 = EOL // 0x4a82 @0x6
0x4a7c…4a83 }
0x4a83…4a8d d7e4 8750 EXEC SLET
0x4a83…4a8d LineComalBin {
0x4a83…4a8d ptr = 0xd7e4 // 0x4a83 @0x0
0x4a83…4a8d lno = 0x222e // 0x4a85 @0x2
0x4a83…4a8d at0004 = ╱9d╱ EXEC ╱ // 0x4a87 @0x4
0x4a83…4a8d at0005 = ╱53╱S╱ // 0x4a88 @0x5
0x4a83…4a8d at0006 = ╱4c╱L╱ // 0x4a89 @0x6
0x4a83…4a8d at0007 = ╱45╱E╱ // 0x4a8a @0x7
0x4a83…4a8d at0008 = ╱54╱T╱ // 0x4a8b @0x8
0x4a83…4a8d at0009 = EOL // 0x4a8c @0x9
0x4a83…4a8d }
0x4a8d…4aa7 d7fe 8760 GVLIN=VLIN;VLIN=P;M=P
0x4a8d…4aa7 LineComalBin {
0x4a8d…4aa7 ptr = 0xd7fe // 0x4a8d @0x0
0x4a8d…4aa7 lno = 0x2238 // 0x4a8f @0x2
0x4a8d…4aa7 at0004 = ╱47╱G╱ // 0x4a91 @0x4
0x4a8d…4aa7 at0005 = ╱56╱V╱ // 0x4a92 @0x5
0x4a8d…4aa7 at0006 = ╱4c╱L╱ // 0x4a93 @0x6
0x4a8d…4aa7 at0007 = ╱49╱I╱ // 0x4a94 @0x7
0x4a8d…4aa7 at0008 = ╱4e╱N╱ // 0x4a95 @0x8
0x4a8d…4aa7 at0009 = ╱dc╱=╱ // 0x4a96 @0x9
0x4a8d…4aa7 at000a = ╱56╱V╱ // 0x4a97 @0xa
0x4a8d…4aa7 at000b = ╱4c╱L╱ // 0x4a98 @0xb
0x4a8d…4aa7 at000c = ╱49╱I╱ // 0x4a99 @0xc
0x4a8d…4aa7 at000d = ╱4e╱N╱ // 0x4a9a @0xd
0x4a8d…4aa7 at000e = ╱eb╱;╱ // 0x4a9b @0xe
0x4a8d…4aa7 at000f = ╱56╱V╱ // 0x4a9c @0xf
0x4a8d…4aa7 at0010 = ╱4c╱L╱ // 0x4a9d @0x10
0x4a8d…4aa7 at0011 = ╱49╱I╱ // 0x4a9e @0x11
0x4a8d…4aa7 at0012 = ╱4e╱N╱ // 0x4a9f @0x12
0x4a8d…4aa7 at0013 = ╱dc╱=╱ // 0x4aa0 @0x13
0x4a8d…4aa7 at0014 = ╱50╱P╱ // 0x4aa1 @0x14
0x4a8d…4aa7 at0015 = ╱eb╱;╱ // 0x4aa2 @0x15
0x4a8d…4aa7 at0016 = ╱4d╱M╱ // 0x4aa3 @0x16
0x4a8d…4aa7 at0017 = ╱dc╱=╱ // 0x4aa4 @0x17
0x4a8d…4aa7 at0018 = ╱50╱P╱ // 0x4aa5 @0x18
0x4a8d…4aa7 at0019 = EOL // 0x4aa6 @0x19
0x4a8d…4aa7 }
0x4aa7…4ac9 d820 8770 AKOD(VLIN,E)=B;AKOD(VLIN,G)=B
0x4aa7…4ac9 LineComalBin {
0x4aa7…4ac9 ptr = 0xd820 // 0x4aa7 @0x0
0x4aa7…4ac9 lno = 0x2242 // 0x4aa9 @0x2
0x4aa7…4ac9 at0004 = ╱41╱A╱ // 0x4aab @0x4
0x4aa7…4ac9 at0005 = ╱4b╱K╱ // 0x4aac @0x5
0x4aa7…4ac9 at0006 = ╱4f╱O╱ // 0x4aad @0x6
0x4aa7…4ac9 at0007 = ╱44╱D╱ // 0x4aae @0x7
0x4aa7…4ac9 at0008 = ╱ed╱(╱ // 0x4aaf @0x8
0x4aa7…4ac9 at0009 = ╱56╱V╱ // 0x4ab0 @0x9
0x4aa7…4ac9 at000a = ╱4c╱L╱ // 0x4ab1 @0xa
0x4aa7…4ac9 at000b = ╱49╱I╱ // 0x4ab2 @0xb
0x4aa7…4ac9 at000c = ╱4e╱N╱ // 0x4ab3 @0xc
0x4aa7…4ac9 at000d = ╱ec╱,╱ // 0x4ab4 @0xd
0x4aa7…4ac9 at000e = ╱45╱E╱ // 0x4ab5 @0xe
0x4aa7…4ac9 at000f = ╱ee╱)╱ // 0x4ab6 @0xf
0x4aa7…4ac9 at0010 = ╱dc╱=╱ // 0x4ab7 @0x10
0x4aa7…4ac9 at0011 = ╱42╱B╱ // 0x4ab8 @0x11
0x4aa7…4ac9 at0012 = ╱eb╱;╱ // 0x4ab9 @0x12
0x4aa7…4ac9 at0013 = ╱41╱A╱ // 0x4aba @0x13
0x4aa7…4ac9 at0014 = ╱4b╱K╱ // 0x4abb @0x14
0x4aa7…4ac9 at0015 = ╱4f╱O╱ // 0x4abc @0x15
0x4aa7…4ac9 at0016 = ╱44╱D╱ // 0x4abd @0x16
0x4aa7…4ac9 at0017 = ╱ed╱(╱ // 0x4abe @0x17
0x4aa7…4ac9 at0018 = ╱56╱V╱ // 0x4abf @0x18
0x4aa7…4ac9 at0019 = ╱4c╱L╱ // 0x4ac0 @0x19
0x4aa7…4ac9 at001a = ╱49╱I╱ // 0x4ac1 @0x1a
0x4aa7…4ac9 at001b = ╱4e╱N╱ // 0x4ac2 @0x1b
0x4aa7…4ac9 at001c = ╱ec╱,╱ // 0x4ac3 @0x1c
0x4aa7…4ac9 at001d = ╱47╱G╱ // 0x4ac4 @0x1d
0x4aa7…4ac9 at001e = ╱ee╱)╱ // 0x4ac5 @0x1e
0x4aa7…4ac9 at001f = ╱dc╱=╱ // 0x4ac6 @0x1f
0x4aa7…4ac9 at0020 = ╱42╱B╱ // 0x4ac7 @0x20
0x4aa7…4ac9 at0021 = EOL // 0x4ac8 @0x21
0x4aa7…4ac9 }
0x4ac9…4acf d826 8780 REPEAT
0x4ac9…4acf LineComalBin {
0x4ac9…4acf ptr = 0xd826 // 0x4ac9 @0x0
0x4ac9…4acf lno = 0x224c // 0x4acb @0x2
0x4ac9…4acf at0004 = ╱97╱ REPEAT ╱ // 0x4acd @0x4
0x4ac9…4acf at0005 = EOL // 0x4ace @0x5
0x4ac9…4acf }
0x4acf…4add d834 8790 EXEC VARELINI
0x4acf…4add LineComalBin {
0x4acf…4add ptr = 0xd834 // 0x4acf @0x0
0x4acf…4add lno = 0x2256 // 0x4ad1 @0x2
0x4acf…4add at0004 = ╱9d╱ EXEC ╱ // 0x4ad3 @0x4
0x4acf…4add at0005 = ╱56╱V╱ // 0x4ad4 @0x5
0x4acf…4add at0006 = ╱41╱A╱ // 0x4ad5 @0x6
0x4acf…4add at0007 = ╱52╱R╱ // 0x4ad6 @0x7
0x4acf…4add at0008 = ╱45╱E╱ // 0x4ad7 @0x8
0x4acf…4add at0009 = ╱4c╱L╱ // 0x4ad8 @0x9
0x4acf…4add at000a = ╱49╱I╱ // 0x4ad9 @0xa
0x4acf…4add at000b = ╱4e╱N╱ // 0x4ada @0xb
0x4acf…4add at000c = ╱49╱I╱ // 0x4adb @0xc
0x4acf…4add at000d = EOL // 0x4adc @0xd
0x4acf…4add }
0x4add…4aff d856 8800 IF CEKS=E THEN VLIN=VLIN+E;LIE=LIE+E
0x4add…4aff LineComalBin {
0x4add…4aff ptr = 0xd856 // 0x4add @0x0
0x4add…4aff lno = 0x2260 // 0x4adf @0x2
0x4add…4aff at0004 = ╱82╱ IF ╱ // 0x4ae1 @0x4
0x4add…4aff at0005 = ╱43╱C╱ // 0x4ae2 @0x5
0x4add…4aff at0006 = ╱45╱E╱ // 0x4ae3 @0x6
0x4add…4aff at0007 = ╱4b╱K╱ // 0x4ae4 @0x7
0x4add…4aff at0008 = ╱53╱S╱ // 0x4ae5 @0x8
0x4add…4aff at0009 = ╱dc╱=╱ // 0x4ae6 @0x9
0x4add…4aff at000a = ╱45╱E╱ // 0x4ae7 @0xa
0x4add…4aff at000b = ╱b6╱ THEN ╱ // 0x4ae8 @0xb
0x4add…4aff at000c = ╱56╱V╱ // 0x4ae9 @0xc
0x4add…4aff at000d = ╱4c╱L╱ // 0x4aea @0xd
0x4add…4aff at000e = ╱49╱I╱ // 0x4aeb @0xe
0x4add…4aff at000f = ╱4e╱N╱ // 0x4aec @0xf
0x4add…4aff at0010 = ╱dc╱=╱ // 0x4aed @0x10
0x4add…4aff at0011 = ╱56╱V╱ // 0x4aee @0x11
0x4add…4aff at0012 = ╱4c╱L╱ // 0x4aef @0x12
0x4add…4aff at0013 = ╱49╱I╱ // 0x4af0 @0x13
0x4add…4aff at0014 = ╱4e╱N╱ // 0x4af1 @0x14
0x4add…4aff at0015 = ╱e2╱+╱ // 0x4af2 @0x15
0x4add…4aff at0016 = ╱45╱E╱ // 0x4af3 @0x16
0x4add…4aff at0017 = ╱eb╱;╱ // 0x4af4 @0x17
0x4add…4aff at0018 = ╱4c╱L╱ // 0x4af5 @0x18
0x4add…4aff at0019 = ╱49╱I╱ // 0x4af6 @0x19
0x4add…4aff at001a = ╱45╱E╱ // 0x4af7 @0x1a
0x4add…4aff at001b = ╱dc╱=╱ // 0x4af8 @0x1b
0x4add…4aff at001c = ╱4c╱L╱ // 0x4af9 @0x1c
0x4add…4aff at001d = ╱49╱I╱ // 0x4afa @0x1d
0x4add…4aff at001e = ╱45╱E╱ // 0x4afb @0x1e
0x4add…4aff at001f = ╱e2╱+╱ // 0x4afc @0x1f
0x4add…4aff at0020 = ╱45╱E╱ // 0x4afd @0x20
0x4add…4aff at0021 = EOL // 0x4afe @0x21
0x4add…4aff }
0x4aff…4b14 d86b 8810 UNTIL VARENR<>B AND CEKS=B
0x4aff…4b14 LineComalBin {
0x4aff…4b14 ptr = 0xd86b // 0x4aff @0x0
0x4aff…4b14 lno = 0x226a // 0x4b01 @0x2
0x4aff…4b14 at0004 = ╱98╱ UNTIL ╱ // 0x4b03 @0x4
0x4aff…4b14 at0005 = ╱56╱V╱ // 0x4b04 @0x5
0x4aff…4b14 at0006 = ╱41╱A╱ // 0x4b05 @0x6
0x4aff…4b14 at0007 = ╱52╱R╱ // 0x4b06 @0x7
0x4aff…4b14 at0008 = ╱45╱E╱ // 0x4b07 @0x8
0x4aff…4b14 at0009 = ╱4e╱N╱ // 0x4b08 @0x9
0x4aff…4b14 at000a = ╱52╱R╱ // 0x4b09 @0xa
0x4aff…4b14 at000b = ╱e1╱<>╱ // 0x4b0a @0xb
0x4aff…4b14 at000c = ╱42╱B╱ // 0x4b0b @0xc
0x4aff…4b14 at000d = ╱da╱ AND ╱ // 0x4b0c @0xd
0x4aff…4b14 at000e = ╱43╱C╱ // 0x4b0d @0xe
0x4aff…4b14 at000f = ╱45╱E╱ // 0x4b0e @0xf
0x4aff…4b14 at0010 = ╱4b╱K╱ // 0x4b0f @0x10
0x4aff…4b14 at0011 = ╱53╱S╱ // 0x4b10 @0x11
0x4aff…4b14 at0012 = ╱dc╱=╱ // 0x4b11 @0x12
0x4aff…4b14 at0013 = ╱42╱B╱ // 0x4b12 @0x13
0x4aff…4b14 at0014 = EOL // 0x4b13 @0x14
0x4aff…4b14 }
0x4b14…4b23 d87a 8820 VLIN=GVLIN
0x4b14…4b23 LineComalBin {
0x4b14…4b23 ptr = 0xd87a // 0x4b14 @0x0
0x4b14…4b23 lno = 0x2274 // 0x4b16 @0x2
0x4b14…4b23 at0004 = ╱56╱V╱ // 0x4b18 @0x4
0x4b14…4b23 at0005 = ╱4c╱L╱ // 0x4b19 @0x5
0x4b14…4b23 at0006 = ╱49╱I╱ // 0x4b1a @0x6
0x4b14…4b23 at0007 = ╱4e╱N╱ // 0x4b1b @0x7
0x4b14…4b23 at0008 = ╱dc╱=╱ // 0x4b1c @0x8
0x4b14…4b23 at0009 = ╱47╱G╱ // 0x4b1d @0x9
0x4b14…4b23 at000a = ╱56╱V╱ // 0x4b1e @0xa
0x4b14…4b23 at000b = ╱4c╱L╱ // 0x4b1f @0xb
0x4b14…4b23 at000c = ╱49╱I╱ // 0x4b20 @0xc
0x4b14…4b23 at000d = ╱4e╱N╱ // 0x4b21 @0xd
0x4b14…4b23 at000e = EOL // 0x4b22 @0xe
0x4b14…4b23 }
0x4b23…4b2e d885 8830 EXEC AJOUR
0x4b23…4b2e LineComalBin {
0x4b23…4b2e ptr = 0xd885 // 0x4b23 @0x0
0x4b23…4b2e lno = 0x227e // 0x4b25 @0x2
0x4b23…4b2e at0004 = ╱9d╱ EXEC ╱ // 0x4b27 @0x4
0x4b23…4b2e at0005 = ╱41╱A╱ // 0x4b28 @0x5
0x4b23…4b2e at0006 = ╱4a╱J╱ // 0x4b29 @0x6
0x4b23…4b2e at0007 = ╱4f╱O╱ // 0x4b2a @0x7
0x4b23…4b2e at0008 = ╱55╱U╱ // 0x4b2b @0x8
0x4b23…4b2e at0009 = ╱52╱R╱ // 0x4b2c @0x9
0x4b23…4b2e at000a = EOL // 0x4b2d @0xa
0x4b23…4b2e }
0x4b2e…4b34 d88b 8840 ENDIF
0x4b2e…4b34 LineComalBin {
0x4b2e…4b34 ptr = 0xd88b // 0x4b2e @0x0
0x4b2e…4b34 lno = 0x2288 // 0x4b30 @0x2
0x4b2e…4b34 at0004 = ╱9b╱ ENDIF ╱ // 0x4b32 @0x4
0x4b2e…4b34 at0005 = EOL // 0x4b33 @0x5
0x4b2e…4b34 }
0x4b34…4b3a d891 8850 ENDCASE
0x4b34…4b3a LineComalBin {
0x4b34…4b3a ptr = 0xd891 // 0x4b34 @0x0
0x4b34…4b3a lno = 0x2292 // 0x4b36 @0x2
0x4b34…4b3a at0004 = ╱a4╱ ENDCASE ╱ // 0x4b38 @0x4
0x4b34…4b3a at0005 = EOL // 0x4b39 @0x5
0x4b34…4b3a }
0x4b3a…4b61 d8b8 8860 IF SVAR1$<>"3" AND SVAR1$<>"5" AND SVAR1$<>"6" THEN
0x4b3a…4b61 LineComalBin {
0x4b3a…4b61 ptr = 0xd8b8 // 0x4b3a @0x0
0x4b3a…4b61 lno = 0x229c // 0x4b3c @0x2
0x4b3a…4b61 at0004 = ╱9c╱ IF ╱ // 0x4b3e @0x4
0x4b3a…4b61 at0005 = ╱53╱S╱ // 0x4b3f @0x5
0x4b3a…4b61 at0006 = ╱56╱V╱ // 0x4b40 @0x6
0x4b3a…4b61 at0007 = ╱41╱A╱ // 0x4b41 @0x7
0x4b3a…4b61 at0008 = ╱52╱R╱ // 0x4b42 @0x8
0x4b3a…4b61 at0009 = ╱31╱1╱ // 0x4b43 @0x9
0x4b3a…4b61 at000a = ╱ef╱$╱ // 0x4b44 @0xa
0x4b3a…4b61 at000b = ╱e1╱<>╱ // 0x4b45 @0xb
0x4b3a…4b61 at000c = ╱22╱"╱ // 0x4b46 @0xc
0x4b3a…4b61 at000d = ╱33╱3╱ // 0x4b47 @0xd
0x4b3a…4b61 at000e = ╱22╱"╱ // 0x4b48 @0xe
0x4b3a…4b61 at000f = ╱da╱ AND ╱ // 0x4b49 @0xf
0x4b3a…4b61 at0010 = ╱53╱S╱ // 0x4b4a @0x10
0x4b3a…4b61 at0011 = ╱56╱V╱ // 0x4b4b @0x11
0x4b3a…4b61 at0012 = ╱41╱A╱ // 0x4b4c @0x12
0x4b3a…4b61 at0013 = ╱52╱R╱ // 0x4b4d @0x13
0x4b3a…4b61 at0014 = ╱31╱1╱ // 0x4b4e @0x14
0x4b3a…4b61 at0015 = ╱ef╱$╱ // 0x4b4f @0x15
0x4b3a…4b61 at0016 = ╱e1╱<>╱ // 0x4b50 @0x16
0x4b3a…4b61 at0017 = ╱22╱"╱ // 0x4b51 @0x17
0x4b3a…4b61 at0018 = ╱35╱5╱ // 0x4b52 @0x18
0x4b3a…4b61 at0019 = ╱22╱"╱ // 0x4b53 @0x19
0x4b3a…4b61 at001a = ╱da╱ AND ╱ // 0x4b54 @0x1a
0x4b3a…4b61 at001b = ╱53╱S╱ // 0x4b55 @0x1b
0x4b3a…4b61 at001c = ╱56╱V╱ // 0x4b56 @0x1c
0x4b3a…4b61 at001d = ╱41╱A╱ // 0x4b57 @0x1d
0x4b3a…4b61 at001e = ╱52╱R╱ // 0x4b58 @0x1e
0x4b3a…4b61 at001f = ╱31╱1╱ // 0x4b59 @0x1f
0x4b3a…4b61 at0020 = ╱ef╱$╱ // 0x4b5a @0x20
0x4b3a…4b61 at0021 = ╱e1╱<>╱ // 0x4b5b @0x21
0x4b3a…4b61 at0022 = ╱22╱"╱ // 0x4b5c @0x22
0x4b3a…4b61 at0023 = ╱36╱6╱ // 0x4b5d @0x23
0x4b3a…4b61 at0024 = ╱22╱"╱ // 0x4b5e @0x24
0x4b3a…4b61 at0025 = ╱b6╱ THEN ╱ // 0x4b5f @0x25
0x4b3a…4b61 at0026 = EOL // 0x4b60 @0x26
0x4b3a…4b61 }
0x4b61…4b74 d8cb 8870 IF VLIN<=12 THEN
0x4b61…4b74 LineComalBin {
0x4b61…4b74 ptr = 0xd8cb // 0x4b61 @0x0
0x4b61…4b74 lno = 0x22a6 // 0x4b63 @0x2
0x4b61…4b74 at0004 = ╱9c╱ IF ╱ // 0x4b65 @0x4
0x4b61…4b74 at0005 = ╱56╱V╱ // 0x4b66 @0x5
0x4b61…4b74 at0006 = ╱4c╱L╱ // 0x4b67 @0x6
0x4b61…4b74 at0007 = ╱49╱I╱ // 0x4b68 @0x7
0x4b61…4b74 at0008 = ╱4e╱N╱ // 0x4b69 @0x8
0x4b61…4b74 at0009 = ╱df╱<=╱ // 0x4b6a @0x9
0x4b61…4b74 at000a = ╱31╱1╱ // 0x4b6b @0xa
0x4b61…4b74 at000b = ╱32╱2╱ // 0x4b6c @0xb
0x4b61…4b74 at000c = ╱fe0000c004╱ // 0x4b6d @0xc
0x4b61…4b74 at0011 = ╱b6╱ THEN ╱ // 0x4b72 @0x11
0x4b61…4b74 at0012 = EOL // 0x4b73 @0x12
0x4b61…4b74 }
0x4b74…4b8c d8e3 8880 STARTL=E;SLUTL=VLIN
0x4b74…4b8c LineComalBin {
0x4b74…4b8c ptr = 0xd8e3 // 0x4b74 @0x0
0x4b74…4b8c lno = 0x22b0 // 0x4b76 @0x2
0x4b74…4b8c at0004 = ╱53╱S╱ // 0x4b78 @0x4
0x4b74…4b8c at0005 = ╱54╱T╱ // 0x4b79 @0x5
0x4b74…4b8c at0006 = ╱41╱A╱ // 0x4b7a @0x6
0x4b74…4b8c at0007 = ╱52╱R╱ // 0x4b7b @0x7
0x4b74…4b8c at0008 = ╱54╱T╱ // 0x4b7c @0x8
0x4b74…4b8c at0009 = ╱4c╱L╱ // 0x4b7d @0x9
0x4b74…4b8c at000a = ╱dc╱=╱ // 0x4b7e @0xa
0x4b74…4b8c at000b = ╱45╱E╱ // 0x4b7f @0xb
0x4b74…4b8c at000c = ╱eb╱;╱ // 0x4b80 @0xc
0x4b74…4b8c at000d = ╱53╱S╱ // 0x4b81 @0xd
0x4b74…4b8c at000e = ╱4c╱L╱ // 0x4b82 @0xe
0x4b74…4b8c at000f = ╱55╱U╱ // 0x4b83 @0xf
0x4b74…4b8c at0010 = ╱54╱T╱ // 0x4b84 @0x10
0x4b74…4b8c at0011 = ╱4c╱L╱ // 0x4b85 @0x11
0x4b74…4b8c at0012 = ╱dc╱=╱ // 0x4b86 @0x12
0x4b74…4b8c at0013 = ╱56╱V╱ // 0x4b87 @0x13
0x4b74…4b8c at0014 = ╱4c╱L╱ // 0x4b88 @0x14
0x4b74…4b8c at0015 = ╱49╱I╱ // 0x4b89 @0x15
0x4b74…4b8c at0016 = ╱4e╱N╱ // 0x4b8a @0x16
0x4b74…4b8c at0017 = EOL // 0x4b8b @0x17
0x4b74…4b8c }
0x4b8c…4b92 d8e9 8890 ELSE
0x4b8c…4b92 LineComalBin {
0x4b8c…4b92 ptr = 0xd8e9 // 0x4b8c @0x0
0x4b8c…4b92 lno = 0x22ba // 0x4b8e @0x2
0x4b8c…4b92 at0004 = ╱9a╱ ELSE ╱ // 0x4b90 @0x4
0x4b8c…4b92 at0005 = EOL // 0x4b91 @0x5
0x4b8c…4b92 }
0x4b92…4ba1 d8f8 8900 IF J<7 THEN
0x4b92…4ba1 LineComalBin {
0x4b92…4ba1 ptr = 0xd8f8 // 0x4b92 @0x0
0x4b92…4ba1 lno = 0x22c4 // 0x4b94 @0x2
0x4b92…4ba1 at0004 = ╱9c╱ IF ╱ // 0x4b96 @0x4
0x4b92…4ba1 at0005 = ╱4a╱J╱ // 0x4b97 @0x5
0x4b92…4ba1 at0006 = ╱dd╱<╱ // 0x4b98 @0x6
0x4b92…4ba1 at0007 = ╱37╱7╱ // 0x4b99 @0x7
0x4b92…4ba1 at0008 = ╱fe0000e003╱ // 0x4b9a @0x8
0x4b92…4ba1 at000d = ╱b6╱ THEN ╱ // 0x4b9f @0xd
0x4b92…4ba1 at000e = EOL // 0x4ba0 @0xe
0x4b92…4ba1 }
0x4ba1…4bbc d913 8910 STARTL=E;SLUTL=12
0x4ba1…4bbc LineComalBin {
0x4ba1…4bbc ptr = 0xd913 // 0x4ba1 @0x0
0x4ba1…4bbc lno = 0x22ce // 0x4ba3 @0x2
0x4ba1…4bbc at0004 = ╱53╱S╱ // 0x4ba5 @0x4
0x4ba1…4bbc at0005 = ╱54╱T╱ // 0x4ba6 @0x5
0x4ba1…4bbc at0006 = ╱41╱A╱ // 0x4ba7 @0x6
0x4ba1…4bbc at0007 = ╱52╱R╱ // 0x4ba8 @0x7
0x4ba1…4bbc at0008 = ╱54╱T╱ // 0x4ba9 @0x8
0x4ba1…4bbc at0009 = ╱4c╱L╱ // 0x4baa @0x9
0x4ba1…4bbc at000a = ╱dc╱=╱ // 0x4bab @0xa
0x4ba1…4bbc at000b = ╱45╱E╱ // 0x4bac @0xb
0x4ba1…4bbc at000c = ╱eb╱;╱ // 0x4bad @0xc
0x4ba1…4bbc at000d = ╱53╱S╱ // 0x4bae @0xd
0x4ba1…4bbc at000e = ╱4c╱L╱ // 0x4baf @0xe
0x4ba1…4bbc at000f = ╱55╱U╱ // 0x4bb0 @0xf
0x4ba1…4bbc at0010 = ╱54╱T╱ // 0x4bb1 @0x10
0x4ba1…4bbc at0011 = ╱4c╱L╱ // 0x4bb2 @0x11
0x4ba1…4bbc at0012 = ╱dc╱=╱ // 0x4bb3 @0x12
0x4ba1…4bbc at0013 = ╱31╱1╱ // 0x4bb4 @0x13
0x4ba1…4bbc at0014 = ╱32╱2╱ // 0x4bb5 @0x14
0x4ba1…4bbc at0015 = ╱fe0000c004╱ // 0x4bb6 @0x15
0x4ba1…4bbc at001a = EOL // 0x4bbb @0x1a
0x4ba1…4bbc }
0x4bbc…4bc2 d919 8920 ELSE
0x4bbc…4bc2 LineComalBin {
0x4bbc…4bc2 ptr = 0xd919 // 0x4bbc @0x0
0x4bbc…4bc2 lno = 0x22d8 // 0x4bbe @0x2
0x4bbc…4bc2 at0004 = ╱9a╱ ELSE ╱ // 0x4bc0 @0x4
0x4bbc…4bc2 at0005 = EOL // 0x4bc1 @0x5
0x4bbc…4bc2 }
0x4bc2…4bd6 d92d 8930 IF VLIN-J<7 THEN
0x4bc2…4bd6 LineComalBin {
0x4bc2…4bd6 ptr = 0xd92d // 0x4bc2 @0x0
0x4bc2…4bd6 lno = 0x22e2 // 0x4bc4 @0x2
0x4bc2…4bd6 at0004 = ╱9c╱ IF ╱ // 0x4bc6 @0x4
0x4bc2…4bd6 at0005 = ╱56╱V╱ // 0x4bc7 @0x5
0x4bc2…4bd6 at0006 = ╱4c╱L╱ // 0x4bc8 @0x6
0x4bc2…4bd6 at0007 = ╱49╱I╱ // 0x4bc9 @0x7
0x4bc2…4bd6 at0008 = ╱4e╱N╱ // 0x4bca @0x8
0x4bc2…4bd6 at0009 = ╱e3╱-╱ // 0x4bcb @0x9
0x4bc2…4bd6 at000a = ╱4a╱J╱ // 0x4bcc @0xa
0x4bc2…4bd6 at000b = ╱dd╱<╱ // 0x4bcd @0xb
0x4bc2…4bd6 at000c = ╱37╱7╱ // 0x4bce @0xc
0x4bc2…4bd6 at000d = ╱fe0000e003╱ // 0x4bcf @0xd
0x4bc2…4bd6 at0012 = ╱b6╱ THEN ╱ // 0x4bd4 @0x12
0x4bc2…4bd6 at0013 = EOL // 0x4bd5 @0x13
0x4bc2…4bd6 }
0x4bd6…4bf9 d950 8940 STARTL=VLIN-12;SLUTL=VLIN
0x4bd6…4bf9 LineComalBin {
0x4bd6…4bf9 ptr = 0xd950 // 0x4bd6 @0x0
0x4bd6…4bf9 lno = 0x22ec // 0x4bd8 @0x2
0x4bd6…4bf9 at0004 = ╱53╱S╱ // 0x4bda @0x4
0x4bd6…4bf9 at0005 = ╱54╱T╱ // 0x4bdb @0x5
0x4bd6…4bf9 at0006 = ╱41╱A╱ // 0x4bdc @0x6
0x4bd6…4bf9 at0007 = ╱52╱R╱ // 0x4bdd @0x7
0x4bd6…4bf9 at0008 = ╱54╱T╱ // 0x4bde @0x8
0x4bd6…4bf9 at0009 = ╱4c╱L╱ // 0x4bdf @0x9
0x4bd6…4bf9 at000a = ╱dc╱=╱ // 0x4be0 @0xa
0x4bd6…4bf9 at000b = ╱56╱V╱ // 0x4be1 @0xb
0x4bd6…4bf9 at000c = ╱4c╱L╱ // 0x4be2 @0xc
0x4bd6…4bf9 at000d = ╱49╱I╱ // 0x4be3 @0xd
0x4bd6…4bf9 at000e = ╱4e╱N╱ // 0x4be4 @0xe
0x4bd6…4bf9 at000f = ╱e3╱-╱ // 0x4be5 @0xf
0x4bd6…4bf9 at0010 = ╱31╱1╱ // 0x4be6 @0x10
0x4bd6…4bf9 at0011 = ╱32╱2╱ // 0x4be7 @0x11
0x4bd6…4bf9 at0012 = ╱fe0000c004╱ // 0x4be8 @0x12
0x4bd6…4bf9 at0017 = ╱eb╱;╱ // 0x4bed @0x17
0x4bd6…4bf9 at0018 = ╱53╱S╱ // 0x4bee @0x18
0x4bd6…4bf9 at0019 = ╱4c╱L╱ // 0x4bef @0x19
0x4bd6…4bf9 at001a = ╱55╱U╱ // 0x4bf0 @0x1a
0x4bd6…4bf9 at001b = ╱54╱T╱ // 0x4bf1 @0x1b
0x4bd6…4bf9 at001c = ╱4c╱L╱ // 0x4bf2 @0x1c
0x4bd6…4bf9 at001d = ╱dc╱=╱ // 0x4bf3 @0x1d
0x4bd6…4bf9 at001e = ╱56╱V╱ // 0x4bf4 @0x1e
0x4bd6…4bf9 at001f = ╱4c╱L╱ // 0x4bf5 @0x1f
0x4bd6…4bf9 at0020 = ╱49╱I╱ // 0x4bf6 @0x20
0x4bd6…4bf9 at0021 = ╱4e╱N╱ // 0x4bf7 @0x21
0x4bd6…4bf9 at0022 = EOL // 0x4bf8 @0x22
0x4bd6…4bf9 }
0x4bf9…4bff d956 8950 ELSE
0x4bf9…4bff LineComalBin {
0x4bf9…4bff ptr = 0xd956 // 0x4bf9 @0x0
0x4bf9…4bff lno = 0x22f6 // 0x4bfb @0x2
0x4bf9…4bff at0004 = ╱9a╱ ELSE ╱ // 0x4bfd @0x4
0x4bf9…4bff at0005 = EOL // 0x4bfe @0x5
0x4bf9…4bff }
0x4bff…4c22 d979 8960 STARTL=J-5;SLUTL=J+6
0x4bff…4c22 LineComalBin {
0x4bff…4c22 ptr = 0xd979 // 0x4bff @0x0
0x4bff…4c22 lno = 0x2300 // 0x4c01 @0x2
0x4bff…4c22 at0004 = ╱53╱S╱ // 0x4c03 @0x4
0x4bff…4c22 at0005 = ╱54╱T╱ // 0x4c04 @0x5
0x4bff…4c22 at0006 = ╱41╱A╱ // 0x4c05 @0x6
0x4bff…4c22 at0007 = ╱52╱R╱ // 0x4c06 @0x7
0x4bff…4c22 at0008 = ╱54╱T╱ // 0x4c07 @0x8
0x4bff…4c22 at0009 = ╱4c╱L╱ // 0x4c08 @0x9
0x4bff…4c22 at000a = ╱dc╱=╱ // 0x4c09 @0xa
0x4bff…4c22 at000b = ╱4a╱J╱ // 0x4c0a @0xb
0x4bff…4c22 at000c = ╱e3╱-╱ // 0x4c0b @0xc
0x4bff…4c22 at000d = ╱35╱5╱ // 0x4c0c @0xd
0x4bff…4c22 at000e = ╱fe0000a003╱ // 0x4c0d @0xe
0x4bff…4c22 at0013 = ╱eb╱;╱ // 0x4c12 @0x13
0x4bff…4c22 at0014 = ╱53╱S╱ // 0x4c13 @0x14
0x4bff…4c22 at0015 = ╱4c╱L╱ // 0x4c14 @0x15
0x4bff…4c22 at0016 = ╱55╱U╱ // 0x4c15 @0x16
0x4bff…4c22 at0017 = ╱54╱T╱ // 0x4c16 @0x17
0x4bff…4c22 at0018 = ╱4c╱L╱ // 0x4c17 @0x18
0x4bff…4c22 at0019 = ╱dc╱=╱ // 0x4c18 @0x19
0x4bff…4c22 at001a = ╱4a╱J╱ // 0x4c19 @0x1a
0x4bff…4c22 at001b = ╱e2╱+╱ // 0x4c1a @0x1b
0x4bff…4c22 at001c = ╱36╱6╱ // 0x4c1b @0x1c
0x4bff…4c22 at001d = ╱fe0000c003╱ // 0x4c1c @0x1d
0x4bff…4c22 at0022 = EOL // 0x4c21 @0x22
0x4bff…4c22 }
0x4c22…4c28 d97f 8970 ENDIF
0x4c22…4c28 LineComalBin {
0x4c22…4c28 ptr = 0xd97f // 0x4c22 @0x0
0x4c22…4c28 lno = 0x230a // 0x4c24 @0x2
0x4c22…4c28 at0004 = ╱9b╱ ENDIF ╱ // 0x4c26 @0x4
0x4c22…4c28 at0005 = EOL // 0x4c27 @0x5
0x4c22…4c28 }
0x4c28…4c2e d985 8980 ENDIF
0x4c28…4c2e LineComalBin {
0x4c28…4c2e ptr = 0xd985 // 0x4c28 @0x0
0x4c28…4c2e lno = 0x2314 // 0x4c2a @0x2
0x4c28…4c2e at0004 = ╱9b╱ ENDIF ╱ // 0x4c2c @0x4
0x4c28…4c2e at0005 = EOL // 0x4c2d @0x5
0x4c28…4c2e }
0x4c2e…4c34 d98b 8990 ENDIF
0x4c2e…4c34 LineComalBin {
0x4c2e…4c34 ptr = 0xd98b // 0x4c2e @0x0
0x4c2e…4c34 lno = 0x231e // 0x4c30 @0x2
0x4c2e…4c34 at0004 = ╱9b╱ ENDIF ╱ // 0x4c32 @0x4
0x4c2e…4c34 at0005 = EOL // 0x4c33 @0x5
0x4c2e…4c34 }
0x4c34…4c3d d994 9000 EXEC LUD
0x4c34…4c3d LineComalBin {
0x4c34…4c3d ptr = 0xd994 // 0x4c34 @0x0
0x4c34…4c3d lno = 0x2328 // 0x4c36 @0x2
0x4c34…4c3d at0004 = ╱9d╱ EXEC ╱ // 0x4c38 @0x4
0x4c34…4c3d at0005 = ╱4c╱L╱ // 0x4c39 @0x5
0x4c34…4c3d at0006 = ╱55╱U╱ // 0x4c3a @0x6
0x4c34…4c3d at0007 = ╱44╱D╱ // 0x4c3b @0x7
0x4c34…4c3d at0008 = EOL // 0x4c3c @0x8
0x4c34…4c3d }
0x4c3d…4c43 d99a 9010 ENDIF
0x4c3d…4c43 LineComalBin {
0x4c3d…4c43 ptr = 0xd99a // 0x4c3d @0x0
0x4c3d…4c43 lno = 0x2332 // 0x4c3f @0x2
0x4c3d…4c43 at0004 = ╱9b╱ ENDIF ╱ // 0x4c41 @0x4
0x4c3d…4c43 at0005 = EOL // 0x4c42 @0x5
0x4c3d…4c43 }
0x4c43…4c5e d9b5 9020 UNTIL SVAR1$="5" OR SVAR1$="6"
0x4c43…4c5e LineComalBin {
0x4c43…4c5e ptr = 0xd9b5 // 0x4c43 @0x0
0x4c43…4c5e lno = 0x233c // 0x4c45 @0x2
0x4c43…4c5e at0004 = ╱98╱ UNTIL ╱ // 0x4c47 @0x4
0x4c43…4c5e at0005 = ╱53╱S╱ // 0x4c48 @0x5
0x4c43…4c5e at0006 = ╱56╱V╱ // 0x4c49 @0x6
0x4c43…4c5e at0007 = ╱41╱A╱ // 0x4c4a @0x7
0x4c43…4c5e at0008 = ╱52╱R╱ // 0x4c4b @0x8
0x4c43…4c5e at0009 = ╱31╱1╱ // 0x4c4c @0x9
0x4c43…4c5e at000a = ╱ef╱$╱ // 0x4c4d @0xa
0x4c43…4c5e at000b = ╱dc╱=╱ // 0x4c4e @0xb
0x4c43…4c5e at000c = ╱22╱"╱ // 0x4c4f @0xc
0x4c43…4c5e at000d = ╱35╱5╱ // 0x4c50 @0xd
0x4c43…4c5e at000e = ╱22╱"╱ // 0x4c51 @0xe
0x4c43…4c5e at000f = ╱db╱ OR ╱ // 0x4c52 @0xf
0x4c43…4c5e at0010 = ╱53╱S╱ // 0x4c53 @0x10
0x4c43…4c5e at0011 = ╱56╱V╱ // 0x4c54 @0x11
0x4c43…4c5e at0012 = ╱41╱A╱ // 0x4c55 @0x12
0x4c43…4c5e at0013 = ╱52╱R╱ // 0x4c56 @0x13
0x4c43…4c5e at0014 = ╱31╱1╱ // 0x4c57 @0x14
0x4c43…4c5e at0015 = ╱ef╱$╱ // 0x4c58 @0x15
0x4c43…4c5e at0016 = ╱dc╱=╱ // 0x4c59 @0x16
0x4c43…4c5e at0017 = ╱22╱"╱ // 0x4c5a @0x17
0x4c43…4c5e at0018 = ╱36╱6╱ // 0x4c5b @0x18
0x4c43…4c5e at0019 = ╱22╱"╱ // 0x4c5c @0x19
0x4c43…4c5e at001a = EOL // 0x4c5d @0x1a
0x4c43…4c5e }
0x4c5e…4c64 d9bb 9030 CLOSE
0x4c5e…4c64 LineComalBin {
0x4c5e…4c64 ptr = 0xd9bb // 0x4c5e @0x0
0x4c5e…4c64 lno = 0x2346 // 0x4c60 @0x2
0x4c5e…4c64 at0004 = ╱a8╱ CLOSE ╱ // 0x4c62 @0x4
0x4c5e…4c64 at0005 = EOL // 0x4c63 @0x5
0x4c5e…4c64 }
0x4c64…4c75 d9cc 9040 IF SVAR1$="5" THEN
0x4c64…4c75 LineComalBin {
0x4c64…4c75 ptr = 0xd9cc // 0x4c64 @0x0
0x4c64…4c75 lno = 0x2350 // 0x4c66 @0x2
0x4c64…4c75 at0004 = ╱9c╱ IF ╱ // 0x4c68 @0x4
0x4c64…4c75 at0005 = ╱53╱S╱ // 0x4c69 @0x5
0x4c64…4c75 at0006 = ╱56╱V╱ // 0x4c6a @0x6
0x4c64…4c75 at0007 = ╱41╱A╱ // 0x4c6b @0x7
0x4c64…4c75 at0008 = ╱52╱R╱ // 0x4c6c @0x8
0x4c64…4c75 at0009 = ╱31╱1╱ // 0x4c6d @0x9
0x4c64…4c75 at000a = ╱ef╱$╱ // 0x4c6e @0xa
0x4c64…4c75 at000b = ╱dc╱=╱ // 0x4c6f @0xb
0x4c64…4c75 at000c = ╱22╱"╱ // 0x4c70 @0xc
0x4c64…4c75 at000d = ╱35╱5╱ // 0x4c71 @0xd
0x4c64…4c75 at000e = ╱22╱"╱ // 0x4c72 @0xe
0x4c64…4c75 at000f = ╱b6╱ THEN ╱ // 0x4c73 @0xf
0x4c64…4c75 at0010 = EOL // 0x4c74 @0x10
0x4c64…4c75 }
0x4c75…4c83 d9da 9050 EXEC FAKTBUND
0x4c75…4c83 LineComalBin {
0x4c75…4c83 ptr = 0xd9da // 0x4c75 @0x0
0x4c75…4c83 lno = 0x235a // 0x4c77 @0x2
0x4c75…4c83 at0004 = ╱9d╱ EXEC ╱ // 0x4c79 @0x4
0x4c75…4c83 at0005 = ╱46╱F╱ // 0x4c7a @0x5
0x4c75…4c83 at0006 = ╱41╱A╱ // 0x4c7b @0x6
0x4c75…4c83 at0007 = ╱4b╱K╱ // 0x4c7c @0x7
0x4c75…4c83 at0008 = ╱54╱T╱ // 0x4c7d @0x8
0x4c75…4c83 at0009 = ╱42╱B╱ // 0x4c7e @0x9
0x4c75…4c83 at000a = ╱55╱U╱ // 0x4c7f @0xa
0x4c75…4c83 at000b = ╱4e╱N╱ // 0x4c80 @0xb
0x4c75…4c83 at000c = ╱44╱D╱ // 0x4c81 @0xc
0x4c75…4c83 at000d = EOL // 0x4c82 @0xd
0x4c75…4c83 }
0x4c83…4c92 d9e9 9060 CURSOR W,23
0x4c83…4c92 LineComalBin {
0x4c83…4c92 ptr = 0xd9e9 // 0x4c83 @0x0
0x4c83…4c92 lno = 0x2364 // 0x4c85 @0x2
0x4c83…4c92 at0004 = ╱a1╱ CURSOR ╱ // 0x4c87 @0x4
0x4c83…4c92 at0005 = ╱57╱W╱ // 0x4c88 @0x5
0x4c83…4c92 at0006 = ╱ec╱,╱ // 0x4c89 @0x6
0x4c83…4c92 at0007 = ╱32╱2╱ // 0x4c8a @0x7
0x4c83…4c92 at0008 = ╱33╱3╱ // 0x4c8b @0x8
0x4c83…4c92 at0009 = ╱fe0000b805╱ // 0x4c8c @0x9
0x4c83…4c92 at000e = EOL // 0x4c91 @0xe
0x4c83…4c92 }
0x4c92…4ccb da22 9070 PRINT "Maskinen overfører faktura til fakturaregisteret."
0x4c92…4ccb LineComalBin {
0x4c92…4ccb ptr = 0xda22 // 0x4c92 @0x0
0x4c92…4ccb lno = 0x236e // 0x4c94 @0x2
0x4c92…4ccb at0004 = ╱92╱ PRINT ╱ // 0x4c96 @0x4
0x4c92…4ccb at0005 = ╱22╱"╱ // 0x4c97 @0x5
0x4c92…4ccb at0006 = ╱4d╱M╱ // 0x4c98 @0x6
0x4c92…4ccb at0007 = ╱61╱a╱ // 0x4c99 @0x7
0x4c92…4ccb at0008 = ╱73╱s╱ // 0x4c9a @0x8
0x4c92…4ccb at0009 = ╱6b╱k╱ // 0x4c9b @0x9
0x4c92…4ccb at000a = ╱69╱i╱ // 0x4c9c @0xa
0x4c92…4ccb at000b = ╱6e╱n╱ // 0x4c9d @0xb
0x4c92…4ccb at000c = ╱65╱e╱ // 0x4c9e @0xc
0x4c92…4ccb at000d = ╱6e╱n╱ // 0x4c9f @0xd
0x4c92…4ccb at000e = ╱20╱…╱ // 0x4ca0 @0xe
0x4c92…4ccb at000f = ╱6f╱o╱ // 0x4ca1 @0xf
0x4c92…4ccb at0010 = ╱76╱v╱ // 0x4ca2 @0x10
0x4c92…4ccb at0011 = ╱65╱e╱ // 0x4ca3 @0x11
0x4c92…4ccb at0012 = ╱72╱r╱ // 0x4ca4 @0x12
0x4c92…4ccb at0013 = ╱66╱f╱ // 0x4ca5 @0x13
0x4c92…4ccb at0014 = ╱7c╱ø╱ // 0x4ca6 @0x14
0x4c92…4ccb at0015 = ╱72╱r╱ // 0x4ca7 @0x15
0x4c92…4ccb at0016 = ╱65╱e╱ // 0x4ca8 @0x16
0x4c92…4ccb at0017 = ╱72╱r╱ // 0x4ca9 @0x17
0x4c92…4ccb at0018 = ╱20╱…╱ // 0x4caa @0x18
0x4c92…4ccb at0019 = ╱66╱f╱ // 0x4cab @0x19
0x4c92…4ccb at001a = ╱61╱a╱ // 0x4cac @0x1a
0x4c92…4ccb at001b = ╱6b╱k╱ // 0x4cad @0x1b
0x4c92…4ccb at001c = ╱74╱t╱ // 0x4cae @0x1c
0x4c92…4ccb at001d = ╱75╱u╱ // 0x4caf @0x1d
0x4c92…4ccb at001e = ╱72╱r╱ // 0x4cb0 @0x1e
0x4c92…4ccb at001f = ╱61╱a╱ // 0x4cb1 @0x1f
0x4c92…4ccb at0020 = ╱20╱…╱ // 0x4cb2 @0x20
0x4c92…4ccb at0021 = ╱74╱t╱ // 0x4cb3 @0x21
0x4c92…4ccb at0022 = ╱69╱i╱ // 0x4cb4 @0x22
0x4c92…4ccb at0023 = ╱6c╱l╱ // 0x4cb5 @0x23
0x4c92…4ccb at0024 = ╱20╱…╱ // 0x4cb6 @0x24
0x4c92…4ccb at0025 = ╱66╱f╱ // 0x4cb7 @0x25
0x4c92…4ccb at0026 = ╱61╱a╱ // 0x4cb8 @0x26
0x4c92…4ccb at0027 = ╱6b╱k╱ // 0x4cb9 @0x27
0x4c92…4ccb at0028 = ╱74╱t╱ // 0x4cba @0x28
0x4c92…4ccb at0029 = ╱75╱u╱ // 0x4cbb @0x29
0x4c92…4ccb at002a = ╱72╱r╱ // 0x4cbc @0x2a
0x4c92…4ccb at002b = ╱61╱a╱ // 0x4cbd @0x2b
0x4c92…4ccb at002c = ╱72╱r╱ // 0x4cbe @0x2c
0x4c92…4ccb at002d = ╱65╱e╱ // 0x4cbf @0x2d
0x4c92…4ccb at002e = ╱67╱g╱ // 0x4cc0 @0x2e
0x4c92…4ccb at002f = ╱69╱i╱ // 0x4cc1 @0x2f
0x4c92…4ccb at0030 = ╱73╱s╱ // 0x4cc2 @0x30
0x4c92…4ccb at0031 = ╱74╱t╱ // 0x4cc3 @0x31
0x4c92…4ccb at0032 = ╱65╱e╱ // 0x4cc4 @0x32
0x4c92…4ccb at0033 = ╱72╱r╱ // 0x4cc5 @0x33
0x4c92…4ccb at0034 = ╱65╱e╱ // 0x4cc6 @0x34
0x4c92…4ccb at0035 = ╱74╱t╱ // 0x4cc7 @0x35
0x4c92…4ccb at0036 = ╱2e╱.╱ // 0x4cc8 @0x36
0x4c92…4ccb at0037 = ╱22╱"╱ // 0x4cc9 @0x37
0x4c92…4ccb at0038 = EOL // 0x4cca @0x38
0x4c92…4ccb }
0x4ccb…4cd8 da2f 9080 EXEC FAKTGEM
0x4ccb…4cd8 LineComalBin {
0x4ccb…4cd8 ptr = 0xda2f // 0x4ccb @0x0
0x4ccb…4cd8 lno = 0x2378 // 0x4ccd @0x2
0x4ccb…4cd8 at0004 = ╱9d╱ EXEC ╱ // 0x4ccf @0x4
0x4ccb…4cd8 at0005 = ╱46╱F╱ // 0x4cd0 @0x5
0x4ccb…4cd8 at0006 = ╱41╱A╱ // 0x4cd1 @0x6
0x4ccb…4cd8 at0007 = ╱4b╱K╱ // 0x4cd2 @0x7
0x4ccb…4cd8 at0008 = ╱54╱T╱ // 0x4cd3 @0x8
0x4ccb…4cd8 at0009 = ╱47╱G╱ // 0x4cd4 @0x9
0x4ccb…4cd8 at000a = ╱45╱E╱ // 0x4cd5 @0xa
0x4ccb…4cd8 at000b = ╱4d╱M╱ // 0x4cd6 @0xb
0x4ccb…4cd8 at000c = EOL // 0x4cd7 @0xc
0x4ccb…4cd8 }
0x4cd8…4ce4 da3b 9090 EXEC SYSGEM
0x4cd8…4ce4 LineComalBin {
0x4cd8…4ce4 ptr = 0xda3b // 0x4cd8 @0x0
0x4cd8…4ce4 lno = 0x2382 // 0x4cda @0x2
0x4cd8…4ce4 at0004 = ╱9d╱ EXEC ╱ // 0x4cdc @0x4
0x4cd8…4ce4 at0005 = ╱53╱S╱ // 0x4cdd @0x5
0x4cd8…4ce4 at0006 = ╱59╱Y╱ // 0x4cde @0x6
0x4cd8…4ce4 at0007 = ╱53╱S╱ // 0x4cdf @0x7
0x4cd8…4ce4 at0008 = ╱47╱G╱ // 0x4ce0 @0x8
0x4cd8…4ce4 at0009 = ╱45╱E╱ // 0x4ce1 @0x9
0x4cd8…4ce4 at000a = ╱4d╱M╱ // 0x4ce2 @0xa
0x4cd8…4ce4 at000b = EOL // 0x4ce3 @0xb
0x4cd8…4ce4 }
0x4ce4…4cea da41 9100 ENDIF
0x4ce4…4cea LineComalBin {
0x4ce4…4cea ptr = 0xda41 // 0x4ce4 @0x0
0x4ce4…4cea lno = 0x238c // 0x4ce6 @0x2
0x4ce4…4cea at0004 = ╱9b╱ ENDIF ╱ // 0x4ce8 @0x4
0x4ce4…4cea at0005 = EOL // 0x4ce9 @0x5
0x4ce4…4cea }
0x4cea…4cf0 da47 9110 ENDIF
0x4cea…4cf0 LineComalBin {
0x4cea…4cf0 ptr = 0xda47 // 0x4cea @0x0
0x4cea…4cf0 lno = 0x2396 // 0x4cec @0x2
0x4cea…4cf0 at0004 = ╱9b╱ ENDIF ╱ // 0x4cee @0x4
0x4cea…4cf0 at0005 = EOL // 0x4cef @0x5
0x4cea…4cf0 }
0x4cf0…4cf6 da4d 9120 ENDIF
0x4cf0…4cf6 LineComalBin {
0x4cf0…4cf6 ptr = 0xda4d // 0x4cf0 @0x0
0x4cf0…4cf6 lno = 0x23a0 // 0x4cf2 @0x2
0x4cf0…4cf6 at0004 = ╱9b╱ ENDIF ╱ // 0x4cf4 @0x4
0x4cf0…4cf6 at0005 = EOL // 0x4cf5 @0x5
0x4cf0…4cf6 }
0x4cf6…4cfc da53 9130 CLOSE
0x4cf6…4cfc LineComalBin {
0x4cf6…4cfc ptr = 0xda53 // 0x4cf6 @0x0
0x4cf6…4cfc lno = 0x23aa // 0x4cf8 @0x2
0x4cf6…4cfc at0004 = ╱a8╱ CLOSE ╱ // 0x4cfa @0x4
0x4cf6…4cfc at0005 = EOL // 0x4cfb @0x5
0x4cf6…4cfc }
0x4cfc…4d0b da62 9140 UNTIL KUNDENR=B
0x4cfc…4d0b LineComalBin {
0x4cfc…4d0b ptr = 0xda62 // 0x4cfc @0x0
0x4cfc…4d0b lno = 0x23b4 // 0x4cfe @0x2
0x4cfc…4d0b at0004 = ╱98╱ UNTIL ╱ // 0x4d00 @0x4
0x4cfc…4d0b at0005 = ╱4b╱K╱ // 0x4d01 @0x5
0x4cfc…4d0b at0006 = ╱55╱U╱ // 0x4d02 @0x6
0x4cfc…4d0b at0007 = ╱4e╱N╱ // 0x4d03 @0x7
0x4cfc…4d0b at0008 = ╱44╱D╱ // 0x4d04 @0x8
0x4cfc…4d0b at0009 = ╱45╱E╱ // 0x4d05 @0x9
0x4cfc…4d0b at000a = ╱4e╱N╱ // 0x4d06 @0xa
0x4cfc…4d0b at000b = ╱52╱R╱ // 0x4d07 @0xb
0x4cfc…4d0b at000c = ╱dc╱=╱ // 0x4d08 @0xc
0x4cfc…4d0b at000d = ╱42╱B╱ // 0x4d09 @0xd
0x4cfc…4d0b at000e = EOL // 0x4d0a @0xe
0x4cfc…4d0b }
0x4d0b…4d11 da68 9150 CLEAR
0x4d0b…4d11 LineComalBin {
0x4d0b…4d11 ptr = 0xda68 // 0x4d0b @0x0
0x4d0b…4d11 lno = 0x23be // 0x4d0d @0x2
0x4d0b…4d11 at0004 = ╱a0╱ CLEAR ╱ // 0x4d0f @0x4
0x4d0b…4d11 at0005 = EOL // 0x4d10 @0x5
0x4d0b…4d11 }
0x4d11…4d28 0000 9160 CHAIN "P641210:OPSTART"
0x4d11…4d28 LineComalBin {
0x4d11…4d28 ptr = 0x0000 // 0x4d11 @0x0
0x4d11…4d28 lno = 0x23c8 // 0x4d13 @0x2
0x4d11…4d28 at0004 = ╱ac╱ CHAIN ╱ // 0x4d15 @0x4
0x4d11…4d28 at0005 = ╱22╱"╱ // 0x4d16 @0x5
0x4d11…4d28 at0006 = ╱50╱P╱ // 0x4d17 @0x6
0x4d11…4d28 at0007 = ╱36╱6╱ // 0x4d18 @0x7
0x4d11…4d28 at0008 = ╱34╱4╱ // 0x4d19 @0x8
0x4d11…4d28 at0009 = ╱31╱1╱ // 0x4d1a @0x9
0x4d11…4d28 at000a = ╱32╱2╱ // 0x4d1b @0xa
0x4d11…4d28 at000b = ╱31╱1╱ // 0x4d1c @0xb
0x4d11…4d28 at000c = ╱30╱0╱ // 0x4d1d @0xc
0x4d11…4d28 at000d = ╱3a╱:╱ // 0x4d1e @0xd
0x4d11…4d28 at000e = ╱4f╱O╱ // 0x4d1f @0xe
0x4d11…4d28 at000f = ╱50╱P╱ // 0x4d20 @0xf
0x4d11…4d28 at0010 = ╱53╱S╱ // 0x4d21 @0x10
0x4d11…4d28 at0011 = ╱54╱T╱ // 0x4d22 @0x11
0x4d11…4d28 at0012 = ╱41╱A╱ // 0x4d23 @0x12
0x4d11…4d28 at0013 = ╱52╱R╱ // 0x4d24 @0x13
0x4d11…4d28 at0014 = ╱54╱T╱ // 0x4d25 @0x14
0x4d11…4d28 at0015 = ╱22╱"╱ // 0x4d26 @0x15
0x4d11…4d28 at0016 = EOL // 0x4d27 @0x16
0x4d11…4d28 }
0x4d28…4d2e (257,) 57 8d 57 8d 10 00 ┆W W ┆