|
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: 6341 (0x18c5)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »AFSLJOUR.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »AFSLJOUR.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »AFSLJOUR.B«
0900 PROC INLØNMOD(N) 0902 GET FIL1$,G*N-E:POST1$ 0904 GET FIL1$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD 0906 EXEC FEJL(E,N,FIL1$) 0908 ENDPROC 0910 PROC NÆSTE 0912 REPEAT 0914 LMNR=LMNR+E 0916 LA=E 0918 IF LMNR<=MLMNR THEN 0920 EXEC INLØNMOD(LMNR) 0922 IF LP$<>POST2$(21) THEN LA=B 0924 IF ORK$="A" AND POST2$(24,25)>"89" THEN LA=B 0926 IF ORK$="F" AND POST2$(24,25)<"90" THEN LA=B 0928 ENDIF 0930 UNTIL LA>B 0932 ENDPROC 1000 DIM STARTPER$(8),SLUTPER$(8),DAD$(6) 1010 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12) 1020 DIM TOTAL$(W,12),FIL1$(16),LP$(E),ORK$(E),POST1$(71),POST2$(27) 1030 DIM RESUL$(12),RESUL1$(12),TV$(45,11),POST5$(55),MF11$(40),MF12$(50) 1040 DIM FIL$(16),FIL2$(16),POST3$(55),POST4$(34) 1050 DIM MF1$(16) 1060 TAH$=" 0+" 1070 DIM BL$(79),L$(79),LIN$(12),LIN1$(12) 1080 FOR I=E TO 79 1090 BL$=BL$+" " 1100 NEXT I 1110 PROC CALC(AR3,B1,B2,ES) 1120 RES$=ES$;OP1$=B1$;OP2$=B2$;SI=B;FLAG=B;ART=AR3-6*(AR3>5) 1130 CALL "P641210:REGN" 1140 IF AR3<6 THEN 1150 IF FLAG THEN STOP 1160 ENDIF 1170 ES$=RES$ 1180 ENDPROC 1190 PROC UDTÆL 1200 J=W*(LMNR-E) 1210 FOR K=4 TO W 1220 FOR I=E TO 5 1230 POST5$((I-E)*11+E:11)=TV$((K-E)*5+I) 1240 NEXT I 1250 PUT FIL2$,J+K:POST5$ 1260 NEXT K 1270 EXEC FEJL(-LMNR,-K,FIL2$) 1280 ENDPROC 1290 PROC INDTÆL 1300 J=W*(LMNR-E) 1310 FOR K=4 TO W 1320 GET FIL2$,J+K:POST5$ 1330 FOR I=E TO 5 1340 TV$((K-E)*5+I)=POST5$((I-E)*11+E:11) 1350 NEXT I 1360 NEXT K 1370 EXEC FEJL(LMNR,K,FIL2$) 1380 ENDPROC 1390 PROC SKRIVHOVED 1400 PRINT 1410 SLJNR=SLJNR+E 1420 PRINT USING " SIDE ####":SLJNR; 1425 PRINT " UDSKRIFTSDATO ";DAD$; 1430 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$; 1440 LINIE=5 1450 PRINT TAB(35);"LØNJOURNAL" 1460 PRINT TAB(35);"**********" 1470 PRINT 1510 ENDPROC 1520 PROC INDVIRK 1530 OPEN FIL$,W 1540 EXEC FEJL(B,B,FIL$) 1550 GET FIL$,E:POST3$ 1560 GET FIL$,G:POST4$,SLJNR,MLMNR,ATPLM 1565 GET FIL$,V:DAD$ 1570 ENDPROC 1580 PROC FEJL(P1,P2,P3) 1590 IF STATUS(P3$)<>B THEN 1600 OUTPUT T 1610 PRINT "FIL-FEJL ";P3$;STATUS(P3$),P1;P2 1620 STOP 1630 ENDIF 1640 ENDPROC 1650 FIL2$="P641220:" 1660 FIL$=FIL2$+"VIRKKART" 1670 EXEC INDVIRK 1675 FIL1$=FIL2$+"LØNMODRG" 1680 OPEN FIL1$,R 1690 FIL2$=FIL2$+"TÆLLEREG" 1700 OPEN FIL2$,W 1710 MF1$="P641210:LØNJOUR" 1720 OPEN MF1$,R 1730 MAXLIN=72 1740 L$=BL$ 1745 CURSOR E,11 1750 GET MF1$:STARTPER$,SLUTPER$,LP$,ORK$,MFD 1760 OUTPUT P 1770 FOR I=E TO W 1780 TOTAL$(I)=TAH$ 1790 NEXT I 1800 EXEC SKRIVHOVED 2820 LMNR=B 2825 PRINT " Rettelse i særlige årstælleværker" 2830 PRINT " Lønnr";TAB(14);"Trækpligtig A-indk Trækfri A-indk";TAB(57); 2840 PRINT "A-skat" 2850 LINIE=LINIE+G 2860 REPEAT 2870 EXEC NÆSTE 2880 IF LMNR<=MLMNR THEN 2890 EXEC INDTÆL 2900 EXEC CALC(E,TV$(36),TV$(35),RESUL$) 2910 EXEC CALC(E,TV$(39),TV$(38),RESUL1$) 2920 EXEC CALC(E,TV$(42),TV$(41),LIN$) 2930 TV$(35)=TAH$(G:11);TV$(36)=TAH$(G:11) 2940 TV$(38)=TAH$(G:11);TV$(39)=TAH$(G:11) 2950 TV$(41)=TAH$(G:11);TV$(42)=TAH$(G:11) 2960 OUTP=B 2970 EXEC CALC(4,RESUL$,TAH$,RESUL$) 2980 IF SI<>B THEN 2990 OUTP=E 3000 EXEC CALC(B,RESUL$,TOTAL$(E),TOTAL$(E)) 3010 ENDIF 3020 EXEC CALC(4,RESUL1$,TAH$,RESUL1$) 3030 IF SI<>B THEN 3040 OUTP=E 3050 EXEC CALC(B,RESUL1$,TOTAL$(G),TOTAL$(G)) 3060 ENDIF 3070 EXEC CALC(4,LIN$,TAH$,LIN$) 3080 IF SI<>B THEN 3090 OUTP=E 3100 EXEC CALC(B,LIN$,TOTAL$(V),TOTAL$(V)) 3110 ENDIF 3120 IF OUTP THEN 3130 LINIE=LINIE+E 3140 IF LINIE>MAXLIN-6 THEN 3150 WHILE LINIE<MAXLIN 3160 PRINT 3170 LINIE=LINIE+E 3180 ENDWHILE 3190 PRINT 3195 SLJNR=SLJNR+E 3196 PRINT USING " SIDE ####":SLJNR; 3198 PRINT " UDSKRIFTSDATO ";DAD$; 3200 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$; 3205 PRINT 3207 PRINT 3210 PRINT 3220 LINIE=5 3240 PRINT " Lønnr";TAB(14);"Trækpligtig A-indk Trækfri A-indk";TAB(57); 3250 PRINT "A-skat" 3260 LINIE=LINIE+V 3262 ENDIF 3264 IF RESUL$(12)="+" THEN RESUL$(12)=" " 3266 IF RESUL1$(12)="+" THEN RESUL1$(12)=" " 3268 IF LIN$(12)="+" THEN LIN$(12)=" " 3270 PRINT USING "####":LMNR; 3272 PRINT TAB(21);RESUL$;TAB(36);RESUL1$;TAB(52);LIN$ 3275 ENDIF 3277 EXEC UDTÆL 3278 ENDIF 3279 UNTIL LMNR=>MLMNR 3280 FOR I=E TO V 3290 IF TOTAL$(I,12)="+" THEN TOTAL$(I,12)=" " 3300 NEXT I 3310 PRINT " ***";TAB(21);TOTAL$(E);TAB(36);TOTAL$(G);TAB(52);TOTAL$(V) 3320 FOR I=E TO V 3330 TOTAL$(I)=TAH$ 3340 NEXT I 3345 PRINT 3347 LINIE=LINIE+E 3350 LMNR=B 3360 IF LINIE>MAXLIN-10 THEN 3370 WHILE LINIE<MAXLIN 3380 PRINT 3390 LINIE=LINIE+E 3400 ENDWHILE 3410 PRINT 3415 SLJNR=SLJNR+E 3420 PRINT USING " SIDE ####":SLJNR; 3421 PRINT " UDSKRIFTSDATO ";DAD$; 3422 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$; 3425 PRINT 3427 PRINT 3430 PRINT 3440 LINIE=5 3450 ENDIF 3455 PRINT " Rettelse i tælleværker til brug for ferie- og SH-opgørelse" 3460 PRINT " Lønnr";TAB(18);"Sygeferiepenge Beregn feriep SH-opsparing"; 3470 PRINT " SH-forskud" 3480 LINIE=LINIE+G 3490 REPEAT 3500 EXEC NÆSTE 3510 IF LMNR<=MLMNR THEN 3520 EXEC INDTÆL 3530 EXEC CALC(E,TV$(19),TV$(18),RESUL$) 3540 EXEC CALC(E,TV$(22),TV$(21),RESUL1$) 3550 EXEC CALC(E,TV$(25),TV$(24),LIN$) 3555 EXEC CALC(E,TV$(28),TV$(27),LIN1$) 3560 TV$(18)=TAH$(G:11);TV$(19)=TAH$(G:11) 3570 TV$(21)=TAH$(G:11);TV$(22)=TAH$(G:11) 3580 TV$(24)=TAH$(G:11);TV$(25)=TAH$(G:11) 3585 TV$(27)=TAH$(G:11);TV$(28)=TAH$(G:11) 3590 OUTP=B 3600 EXEC CALC(4,RESUL$,TAH$,RESUL$) 3610 IF SI<>B THEN 3620 OUTP=E 3630 EXEC CALC(B,RESUL$,TOTAL$(E),TOTAL$(E)) 3640 ENDIF 3650 EXEC CALC(4,RESUL1$,TAH$,RESUL1$) 3660 IF SI<>B THEN 3670 OUTP=E 3680 EXEC CALC(B,RESUL1$,TOTAL$(G),TOTAL$(G)) 3690 ENDIF 3700 EXEC CALC(4,LIN$,TAH$,LIN$) 3710 IF SI<>B THEN 3720 OUTP=E 3730 EXEC CALC(B,LIN$,TOTAL$(V),TOTAL$(V)) 3740 ENDIF 3741 EXEC CALC(4,LIN1$,TAH$,LIN1$) 3742 IF SI<>B THEN 3743 OUTP=E 3744 EXEC CALC(B,LIN1$,TOTAL$(4),TOTAL$(4)) 3745 ENDIF 3750 IF OUTP THEN 3760 LINIE=LINIE+E 3770 IF LINIE>MAXLIN-6 THEN 3780 WHILE LINIE<MAXLIN 3790 PRINT 3800 LINIE=LINIE+E 3810 ENDWHILE 3820 PRINT 3825 SLJNR=SLJNR+E 3830 PRINT USING " SIDE ####":SLJNR; 3831 PRINT " UDSKRIFTSDATO ";DAD$; 3832 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$; 3835 PRINT 3837 PRINT 3840 PRINT 3850 LINIE=5 3870 PRINT " Lønnr";TAB(18);"Sygeferiepenge Beregn feriep SH-opsparing"; 3880 PRINT " SH-forskud" 3890 LINIE=LINIE+V 3900 ENDIF 3901 IF RESUL$(12)="+" THEN RESUL$(12)=" " 3902 IF RESUL1$(12)="+" THEN RESUL$(12)=" " 3903 IF LIN$(12)="+" THEN LIN$(12)=" " 3904 IF LIN1$(12)="+" THEN LIN1$(12)=" " 3905 PRINT USING "####":LMNR; 3906 PRINT TAB(21);RESUL$;TAB(36);RESUL1$;TAB(52);LIN$;TAB(68);LIN1$; 3910 ENDIF 3912 EXEC UDTÆL 3915 ENDIF 3920 UNTIL LMNR=>MLMNR 3930 FOR I=E TO 4 3940 IF TOTAL$(I,12)="+" THEN TOTAL$(I,12)=" " 3950 NEXT I 3960 PRINT " ***";TAB(21);TOTAL$(E);TAB(36);TOTAL$(G);TAB(52);TOTAL$(V); 3970 PRINT TAB(68);TOTAL$(4); 3990 LINIE=LINIE+G 4010 WHILE LINIE<MAXLIN 4020 PRINT 4030 LINIE=LINIE+E 4040 ENDWHILE 4170 PUT FIL$,E:POST3$ 4180 PUT FIL$,G:POST4$,SLJNR,MLMNR,ATPLM 4190 CLOSE 4195 OUTPUT T 4200 CHAIN "P641210:LFERIE"
0x0000…0011 (0,) 8d68 0900 PROC INLØNMOD(N)
0x0000…0011 LineComalBin {
0x0000…0011 ptr = 0x8d68 // 0x0 @0x0
0x0000…0011 lno = 0x0384 // 0x2 @0x2
0x0000…0011 at0004 = ╱9e╱ PROC ╱ // 0x4 @0x4
0x0000…0011 at0005 = ╱49╱I╱ // 0x5 @0x5
0x0000…0011 at0006 = ╱4e╱N╱ // 0x6 @0x6
0x0000…0011 at0007 = ╱4c╱L╱ // 0x7 @0x7
0x0000…0011 at0008 = ╱5c╱Ø╱ // 0x8 @0x8
0x0000…0011 at0009 = ╱4e╱N╱ // 0x9 @0x9
0x0000…0011 at000a = ╱4d╱M╱ // 0xa @0xa
0x0000…0011 at000b = ╱4f╱O╱ // 0xb @0xb
0x0000…0011 at000c = ╱44╱D╱ // 0xc @0xc
0x0000…0011 at000d = ╱ed╱(╱ // 0xd @0xd
0x0000…0011 at000e = ╱4e╱N╱ // 0xe @0xe
0x0000…0011 at000f = ╱ee╱)╱ // 0xf @0xf
0x0000…0011 at0010 = EOL // 0x10 @0x10
0x0000…0011 }
0x0011…0029 8d80 0902 GET FIL1$,G*N-E:POST1$
0x0011…0029 LineComalBin {
0x0011…0029 ptr = 0x8d80 // 0x11 @0x0
0x0011…0029 lno = 0x0386 // 0x13 @0x2
0x0011…0029 at0004 = ╱a9╱ GET ╱ // 0x15 @0x4
0x0011…0029 at0005 = ╱46╱F╱ // 0x16 @0x5
0x0011…0029 at0006 = ╱49╱I╱ // 0x17 @0x6
0x0011…0029 at0007 = ╱4c╱L╱ // 0x18 @0x7
0x0011…0029 at0008 = ╱31╱1╱ // 0x19 @0x8
0x0011…0029 at0009 = ╱ef╱$╱ // 0x1a @0x9
0x0011…0029 at000a = ╱ec╱,╱ // 0x1b @0xa
0x0011…0029 at000b = ╱47╱G╱ // 0x1c @0xb
0x0011…0029 at000c = ╱e4╱*╱ // 0x1d @0xc
0x0011…0029 at000d = ╱4e╱N╱ // 0x1e @0xd
0x0011…0029 at000e = ╱e3╱-╱ // 0x1f @0xe
0x0011…0029 at000f = ╱45╱E╱ // 0x20 @0xf
0x0011…0029 at0010 = ╱f0╱:╱ // 0x21 @0x10
0x0011…0029 at0011 = ╱50╱P╱ // 0x22 @0x11
0x0011…0029 at0012 = ╱4f╱O╱ // 0x23 @0x12
0x0011…0029 at0013 = ╱53╱S╱ // 0x24 @0x13
0x0011…0029 at0014 = ╱54╱T╱ // 0x25 @0x14
0x0011…0029 at0015 = ╱31╱1╱ // 0x26 @0x15
0x0011…0029 at0016 = ╱ef╱$╱ // 0x27 @0x16
0x0011…0029 at0017 = EOL // 0x28 @0x17
0x0011…0029 }
0x0029…0061 8db8 0904 GET FIL1$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD
0x0029…0061 LineComalBin {
0x0029…0061 ptr = 0x8db8 // 0x29 @0x0
0x0029…0061 lno = 0x0388 // 0x2b @0x2
0x0029…0061 at0004 = ╱a9╱ GET ╱ // 0x2d @0x4
0x0029…0061 at0005 = ╱46╱F╱ // 0x2e @0x5
0x0029…0061 at0006 = ╱49╱I╱ // 0x2f @0x6
0x0029…0061 at0007 = ╱4c╱L╱ // 0x30 @0x7
0x0029…0061 at0008 = ╱31╱1╱ // 0x31 @0x8
0x0029…0061 at0009 = ╱ef╱$╱ // 0x32 @0x9
0x0029…0061 at000a = ╱ec╱,╱ // 0x33 @0xa
0x0029…0061 at000b = ╱47╱G╱ // 0x34 @0xb
0x0029…0061 at000c = ╱e4╱*╱ // 0x35 @0xc
0x0029…0061 at000d = ╱4e╱N╱ // 0x36 @0xd
0x0029…0061 at000e = ╱f0╱:╱ // 0x37 @0xe
0x0029…0061 at000f = ╱50╱P╱ // 0x38 @0xf
0x0029…0061 at0010 = ╱4f╱O╱ // 0x39 @0x10
0x0029…0061 at0011 = ╱53╱S╱ // 0x3a @0x11
0x0029…0061 at0012 = ╱54╱T╱ // 0x3b @0x12
0x0029…0061 at0013 = ╱32╱2╱ // 0x3c @0x13
0x0029…0061 at0014 = ╱ef╱$╱ // 0x3d @0x14
0x0029…0061 at0015 = ╱ec╱,╱ // 0x3e @0x15
0x0029…0061 at0016 = ╱43╱C╱ // 0x3f @0x16
0x0029…0061 at0017 = ╱31╱1╱ // 0x40 @0x17
0x0029…0061 at0018 = ╱ec╱,╱ // 0x41 @0x18
0x0029…0061 at0019 = ╱43╱C╱ // 0x42 @0x19
0x0029…0061 at001a = ╱32╱2╱ // 0x43 @0x1a
0x0029…0061 at001b = ╱ec╱,╱ // 0x44 @0x1b
0x0029…0061 at001c = ╱4c╱L╱ // 0x45 @0x1c
0x0029…0061 at001d = ╱54╱T╱ // 0x46 @0x1d
0x0029…0061 at001e = ╱ec╱,╱ // 0x47 @0x1e
0x0029…0061 at001f = ╱4c╱L╱ // 0x48 @0x1f
0x0029…0061 at0020 = ╱46╱F╱ // 0x49 @0x20
0x0029…0061 at0021 = ╱ec╱,╱ // 0x4a @0x21
0x0029…0061 at0022 = ╱4c╱L╱ // 0x4b @0x22
0x0029…0061 at0023 = ╱52╱R╱ // 0x4c @0x23
0x0029…0061 at0024 = ╱ec╱,╱ // 0x4d @0x24
0x0029…0061 at0025 = ╱4c╱L╱ // 0x4e @0x25
0x0029…0061 at0026 = ╱41╱A╱ // 0x4f @0x26
0x0029…0061 at0027 = ╱ec╱,╱ // 0x50 @0x27
0x0029…0061 at0028 = ╱52╱R╱ // 0x51 @0x28
0x0029…0061 at0029 = ╱50╱P╱ // 0x52 @0x29
0x0029…0061 at002a = ╱49╱I╱ // 0x53 @0x2a
0x0029…0061 at002b = ╱ec╱,╱ // 0x54 @0x2b
0x0029…0061 at002c = ╱4b╱K╱ // 0x55 @0x2c
0x0029…0061 at002d = ╱31╱1╱ // 0x56 @0x2d
0x0029…0061 at002e = ╱ec╱,╱ // 0x57 @0x2e
0x0029…0061 at002f = ╱4b╱K╱ // 0x58 @0x2f
0x0029…0061 at0030 = ╱32╱2╱ // 0x59 @0x30
0x0029…0061 at0031 = ╱ec╱,╱ // 0x5a @0x31
0x0029…0061 at0032 = ╱46╱F╱ // 0x5b @0x32
0x0029…0061 at0033 = ╱47╱G╱ // 0x5c @0x33
0x0029…0061 at0034 = ╱ec╱,╱ // 0x5d @0x34
0x0029…0061 at0035 = ╱46╱F╱ // 0x5e @0x35
0x0029…0061 at0036 = ╱44╱D╱ // 0x5f @0x36
0x0029…0061 at0037 = EOL // 0x60 @0x37
0x0029…0061 }
0x0061…0076 8dcd 0906 EXEC FEJL(E,N,FIL1$)
0x0061…0076 LineComalBin {
0x0061…0076 ptr = 0x8dcd // 0x61 @0x0
0x0061…0076 lno = 0x038a // 0x63 @0x2
0x0061…0076 at0004 = ╱9d╱ EXEC ╱ // 0x65 @0x4
0x0061…0076 at0005 = ╱46╱F╱ // 0x66 @0x5
0x0061…0076 at0006 = ╱45╱E╱ // 0x67 @0x6
0x0061…0076 at0007 = ╱4a╱J╱ // 0x68 @0x7
0x0061…0076 at0008 = ╱4c╱L╱ // 0x69 @0x8
0x0061…0076 at0009 = ╱ed╱(╱ // 0x6a @0x9
0x0061…0076 at000a = ╱45╱E╱ // 0x6b @0xa
0x0061…0076 at000b = ╱ec╱,╱ // 0x6c @0xb
0x0061…0076 at000c = ╱4e╱N╱ // 0x6d @0xc
0x0061…0076 at000d = ╱ec╱,╱ // 0x6e @0xd
0x0061…0076 at000e = ╱46╱F╱ // 0x6f @0xe
0x0061…0076 at000f = ╱49╱I╱ // 0x70 @0xf
0x0061…0076 at0010 = ╱4c╱L╱ // 0x71 @0x10
0x0061…0076 at0011 = ╱31╱1╱ // 0x72 @0x11
0x0061…0076 at0012 = ╱ef╱$╱ // 0x73 @0x12
0x0061…0076 at0013 = ╱ee╱)╱ // 0x74 @0x13
0x0061…0076 at0014 = EOL // 0x75 @0x14
0x0061…0076 }
0x0076…007c 8dd3 0908 ENDPROC
0x0076…007c LineComalBin {
0x0076…007c ptr = 0x8dd3 // 0x76 @0x0
0x0076…007c lno = 0x038c // 0x78 @0x2
0x0076…007c at0004 = ╱9f╱ ENDPROC ╱ // 0x7a @0x4
0x0076…007c at0005 = EOL // 0x7b @0x5
0x0076…007c }
0x007c…0087 8dde 0910 PROC NÆSTE
0x007c…0087 LineComalBin {
0x007c…0087 ptr = 0x8dde // 0x7c @0x0
0x007c…0087 lno = 0x038e // 0x7e @0x2
0x007c…0087 at0004 = ╱9e╱ PROC ╱ // 0x80 @0x4
0x007c…0087 at0005 = ╱4e╱N╱ // 0x81 @0x5
0x007c…0087 at0006 = ╱5b╱Æ╱ // 0x82 @0x6
0x007c…0087 at0007 = ╱53╱S╱ // 0x83 @0x7
0x007c…0087 at0008 = ╱54╱T╱ // 0x84 @0x8
0x007c…0087 at0009 = ╱45╱E╱ // 0x85 @0x9
0x007c…0087 at000a = EOL // 0x86 @0xa
0x007c…0087 }
0x0087…008d 8de4 0912 REPEAT
0x0087…008d LineComalBin {
0x0087…008d ptr = 0x8de4 // 0x87 @0x0
0x0087…008d lno = 0x0390 // 0x89 @0x2
0x0087…008d at0004 = ╱97╱ REPEAT ╱ // 0x8b @0x4
0x0087…008d at0005 = EOL // 0x8c @0x5
0x0087…008d }
0x008d…009d 8df4 0914 LMNR=LMNR+E
0x008d…009d LineComalBin {
0x008d…009d ptr = 0x8df4 // 0x8d @0x0
0x008d…009d lno = 0x0392 // 0x8f @0x2
0x008d…009d at0004 = ╱4c╱L╱ // 0x91 @0x4
0x008d…009d at0005 = ╱4d╱M╱ // 0x92 @0x5
0x008d…009d at0006 = ╱4e╱N╱ // 0x93 @0x6
0x008d…009d at0007 = ╱52╱R╱ // 0x94 @0x7
0x008d…009d at0008 = ╱dc╱=╱ // 0x95 @0x8
0x008d…009d at0009 = ╱4c╱L╱ // 0x96 @0x9
0x008d…009d at000a = ╱4d╱M╱ // 0x97 @0xa
0x008d…009d at000b = ╱4e╱N╱ // 0x98 @0xb
0x008d…009d at000c = ╱52╱R╱ // 0x99 @0xc
0x008d…009d at000d = ╱e2╱+╱ // 0x9a @0xd
0x008d…009d at000e = ╱45╱E╱ // 0x9b @0xe
0x008d…009d at000f = EOL // 0x9c @0xf
0x008d…009d }
0x009d…00a6 8dfd 0916 LA=E
0x009d…00a6 LineComalBin {
0x009d…00a6 ptr = 0x8dfd // 0x9d @0x0
0x009d…00a6 lno = 0x0394 // 0x9f @0x2
0x009d…00a6 at0004 = ╱4c╱L╱ // 0xa1 @0x4
0x009d…00a6 at0005 = ╱41╱A╱ // 0xa2 @0x5
0x009d…00a6 at0006 = ╱dc╱=╱ // 0xa3 @0x6
0x009d…00a6 at0007 = ╱45╱E╱ // 0xa4 @0x7
0x009d…00a6 at0008 = EOL // 0xa5 @0x8
0x009d…00a6 }
0x00a6…00b7 8e0e 0918 IF LMNR<=MLMNR THEN
0x00a6…00b7 LineComalBin {
0x00a6…00b7 ptr = 0x8e0e // 0xa6 @0x0
0x00a6…00b7 lno = 0x0396 // 0xa8 @0x2
0x00a6…00b7 at0004 = ╱9c╱ IF ╱ // 0xaa @0x4
0x00a6…00b7 at0005 = ╱4c╱L╱ // 0xab @0x5
0x00a6…00b7 at0006 = ╱4d╱M╱ // 0xac @0x6
0x00a6…00b7 at0007 = ╱4e╱N╱ // 0xad @0x7
0x00a6…00b7 at0008 = ╱52╱R╱ // 0xae @0x8
0x00a6…00b7 at0009 = ╱df╱<=╱ // 0xaf @0x9
0x00a6…00b7 at000a = ╱4d╱M╱ // 0xb0 @0xa
0x00a6…00b7 at000b = ╱4c╱L╱ // 0xb1 @0xb
0x00a6…00b7 at000c = ╱4d╱M╱ // 0xb2 @0xc
0x00a6…00b7 at000d = ╱4e╱N╱ // 0xb3 @0xd
0x00a6…00b7 at000e = ╱52╱R╱ // 0xb4 @0xe
0x00a6…00b7 at000f = ╱b6╱ THEN ╱ // 0xb5 @0xf
0x00a6…00b7 at0010 = EOL // 0xb6 @0x10
0x00a6…00b7 }
0x00b7…00cb 8e22 0920 EXEC INLØNMOD(LMNR)
0x00b7…00cb LineComalBin {
0x00b7…00cb ptr = 0x8e22 // 0xb7 @0x0
0x00b7…00cb lno = 0x0398 // 0xb9 @0x2
0x00b7…00cb at0004 = ╱9d╱ EXEC ╱ // 0xbb @0x4
0x00b7…00cb at0005 = ╱49╱I╱ // 0xbc @0x5
0x00b7…00cb at0006 = ╱4e╱N╱ // 0xbd @0x6
0x00b7…00cb at0007 = ╱4c╱L╱ // 0xbe @0x7
0x00b7…00cb at0008 = ╱5c╱Ø╱ // 0xbf @0x8
0x00b7…00cb at0009 = ╱4e╱N╱ // 0xc0 @0x9
0x00b7…00cb at000a = ╱4d╱M╱ // 0xc1 @0xa
0x00b7…00cb at000b = ╱4f╱O╱ // 0xc2 @0xb
0x00b7…00cb at000c = ╱44╱D╱ // 0xc3 @0xc
0x00b7…00cb at000d = ╱ed╱(╱ // 0xc4 @0xd
0x00b7…00cb at000e = ╱4c╱L╱ // 0xc5 @0xe
0x00b7…00cb at000f = ╱4d╱M╱ // 0xc6 @0xf
0x00b7…00cb at0010 = ╱4e╱N╱ // 0xc7 @0x10
0x00b7…00cb at0011 = ╱52╱R╱ // 0xc8 @0x11
0x00b7…00cb at0012 = ╱ee╱)╱ // 0xc9 @0x12
0x00b7…00cb at0013 = EOL // 0xca @0x13
0x00b7…00cb }
0x00cb…00e9 8e40 0922 IF LP$<>POST2$(21) THEN LA=B
0x00cb…00e9 LineComalBin {
0x00cb…00e9 ptr = 0x8e40 // 0xcb @0x0
0x00cb…00e9 lno = 0x039a // 0xcd @0x2
0x00cb…00e9 at0004 = ╱82╱ IF ╱ // 0xcf @0x4
0x00cb…00e9 at0005 = ╱4c╱L╱ // 0xd0 @0x5
0x00cb…00e9 at0006 = ╱50╱P╱ // 0xd1 @0x6
0x00cb…00e9 at0007 = ╱ef╱$╱ // 0xd2 @0x7
0x00cb…00e9 at0008 = ╱e1╱<>╱ // 0xd3 @0x8
0x00cb…00e9 at0009 = ╱50╱P╱ // 0xd4 @0x9
0x00cb…00e9 at000a = ╱4f╱O╱ // 0xd5 @0xa
0x00cb…00e9 at000b = ╱53╱S╱ // 0xd6 @0xb
0x00cb…00e9 at000c = ╱54╱T╱ // 0xd7 @0xc
0x00cb…00e9 at000d = ╱32╱2╱ // 0xd8 @0xd
0x00cb…00e9 at000e = ╱ef╱$╱ // 0xd9 @0xe
0x00cb…00e9 at000f = ╱ed╱(╱ // 0xda @0xf
0x00cb…00e9 at0010 = ╱32╱2╱ // 0xdb @0x10
0x00cb…00e9 at0011 = ╱31╱1╱ // 0xdc @0x11
0x00cb…00e9 at0012 = ╱fe0000a805╱ // 0xdd @0x12
0x00cb…00e9 at0017 = ╱ee╱)╱ // 0xe2 @0x17
0x00cb…00e9 at0018 = ╱b6╱ THEN ╱ // 0xe3 @0x18
0x00cb…00e9 at0019 = ╱4c╱L╱ // 0xe4 @0x19
0x00cb…00e9 at001a = ╱41╱A╱ // 0xe5 @0x1a
0x00cb…00e9 at001b = ╱dc╱=╱ // 0xe6 @0x1b
0x00cb…00e9 at001c = ╱42╱B╱ // 0xe7 @0x1c
0x00cb…00e9 at001d = EOL // 0xe8 @0x1d
0x00cb…00e9 }
0x00e9…0119 8e70 0924 IF ORK$="A" AND POST2$(24,25)>"89" THEN LA=B
0x00e9…0119 LineComalBin {
0x00e9…0119 ptr = 0x8e70 // 0xe9 @0x0
0x00e9…0119 lno = 0x039c // 0xeb @0x2
0x00e9…0119 at0004 = ╱82╱ IF ╱ // 0xed @0x4
0x00e9…0119 at0005 = ╱4f╱O╱ // 0xee @0x5
0x00e9…0119 at0006 = ╱52╱R╱ // 0xef @0x6
0x00e9…0119 at0007 = ╱4b╱K╱ // 0xf0 @0x7
0x00e9…0119 at0008 = ╱ef╱$╱ // 0xf1 @0x8
0x00e9…0119 at0009 = ╱dc╱=╱ // 0xf2 @0x9
0x00e9…0119 at000a = ╱22╱"╱ // 0xf3 @0xa
0x00e9…0119 at000b = ╱41╱A╱ // 0xf4 @0xb
0x00e9…0119 at000c = ╱22╱"╱ // 0xf5 @0xc
0x00e9…0119 at000d = ╱da╱ AND ╱ // 0xf6 @0xd
0x00e9…0119 at000e = ╱50╱P╱ // 0xf7 @0xe
0x00e9…0119 at000f = ╱4f╱O╱ // 0xf8 @0xf
0x00e9…0119 at0010 = ╱53╱S╱ // 0xf9 @0x10
0x00e9…0119 at0011 = ╱54╱T╱ // 0xfa @0x11
0x00e9…0119 at0012 = ╱32╱2╱ // 0xfb @0x12
0x00e9…0119 at0013 = ╱ef╱$╱ // 0xfc @0x13
0x00e9…0119 at0014 = ╱ed╱(╱ // 0xfd @0x14
0x00e9…0119 at0015 = ╱32╱2╱ // 0xfe @0x15
0x00e9…0119 at0016 = ╱34╱4╱ // 0xff @0x16
0x00e9…0119 at0017 = ╱fe0000c005╱ // 0x100 @0x17
0x00e9…0119 at001c = ╱ec╱,╱ // 0x105 @0x1c
0x00e9…0119 at001d = ╱32╱2╱ // 0x106 @0x1d
0x00e9…0119 at001e = ╱35╱5╱ // 0x107 @0x1e
0x00e9…0119 at001f = ╱fe0000c805╱ // 0x108 @0x1f
0x00e9…0119 at0024 = ╱ee╱)╱ // 0x10d @0x24
0x00e9…0119 at0025 = ╱de╱>╱ // 0x10e @0x25
0x00e9…0119 at0026 = ╱22╱"╱ // 0x10f @0x26
0x00e9…0119 at0027 = ╱38╱8╱ // 0x110 @0x27
0x00e9…0119 at0028 = ╱39╱9╱ // 0x111 @0x28
0x00e9…0119 at0029 = ╱22╱"╱ // 0x112 @0x29
0x00e9…0119 at002a = ╱b6╱ THEN ╱ // 0x113 @0x2a
0x00e9…0119 at002b = ╱4c╱L╱ // 0x114 @0x2b
0x00e9…0119 at002c = ╱41╱A╱ // 0x115 @0x2c
0x00e9…0119 at002d = ╱dc╱=╱ // 0x116 @0x2d
0x00e9…0119 at002e = ╱42╱B╱ // 0x117 @0x2e
0x00e9…0119 at002f = EOL // 0x118 @0x2f
0x00e9…0119 }
0x0119…0149 8ea0 0926 IF ORK$="F" AND POST2$(24,25)<"90" THEN LA=B
0x0119…0149 LineComalBin {
0x0119…0149 ptr = 0x8ea0 // 0x119 @0x0
0x0119…0149 lno = 0x039e // 0x11b @0x2
0x0119…0149 at0004 = ╱82╱ IF ╱ // 0x11d @0x4
0x0119…0149 at0005 = ╱4f╱O╱ // 0x11e @0x5
0x0119…0149 at0006 = ╱52╱R╱ // 0x11f @0x6
0x0119…0149 at0007 = ╱4b╱K╱ // 0x120 @0x7
0x0119…0149 at0008 = ╱ef╱$╱ // 0x121 @0x8
0x0119…0149 at0009 = ╱dc╱=╱ // 0x122 @0x9
0x0119…0149 at000a = ╱22╱"╱ // 0x123 @0xa
0x0119…0149 at000b = ╱46╱F╱ // 0x124 @0xb
0x0119…0149 at000c = ╱22╱"╱ // 0x125 @0xc
0x0119…0149 at000d = ╱da╱ AND ╱ // 0x126 @0xd
0x0119…0149 at000e = ╱50╱P╱ // 0x127 @0xe
0x0119…0149 at000f = ╱4f╱O╱ // 0x128 @0xf
0x0119…0149 at0010 = ╱53╱S╱ // 0x129 @0x10
0x0119…0149 at0011 = ╱54╱T╱ // 0x12a @0x11
0x0119…0149 at0012 = ╱32╱2╱ // 0x12b @0x12
0x0119…0149 at0013 = ╱ef╱$╱ // 0x12c @0x13
0x0119…0149 at0014 = ╱ed╱(╱ // 0x12d @0x14
0x0119…0149 at0015 = ╱32╱2╱ // 0x12e @0x15
0x0119…0149 at0016 = ╱34╱4╱ // 0x12f @0x16
0x0119…0149 at0017 = ╱fe0000c005╱ // 0x130 @0x17
0x0119…0149 at001c = ╱ec╱,╱ // 0x135 @0x1c
0x0119…0149 at001d = ╱32╱2╱ // 0x136 @0x1d
0x0119…0149 at001e = ╱35╱5╱ // 0x137 @0x1e
0x0119…0149 at001f = ╱fe0000c805╱ // 0x138 @0x1f
0x0119…0149 at0024 = ╱ee╱)╱ // 0x13d @0x24
0x0119…0149 at0025 = ╱dd╱<╱ // 0x13e @0x25
0x0119…0149 at0026 = ╱22╱"╱ // 0x13f @0x26
0x0119…0149 at0027 = ╱39╱9╱ // 0x140 @0x27
0x0119…0149 at0028 = ╱30╱0╱ // 0x141 @0x28
0x0119…0149 at0029 = ╱22╱"╱ // 0x142 @0x29
0x0119…0149 at002a = ╱b6╱ THEN ╱ // 0x143 @0x2a
0x0119…0149 at002b = ╱4c╱L╱ // 0x144 @0x2b
0x0119…0149 at002c = ╱41╱A╱ // 0x145 @0x2c
0x0119…0149 at002d = ╱dc╱=╱ // 0x146 @0x2d
0x0119…0149 at002e = ╱42╱B╱ // 0x147 @0x2e
0x0119…0149 at002f = EOL // 0x148 @0x2f
0x0119…0149 }
0x0149…014f 8ea6 0928 ENDIF
0x0149…014f LineComalBin {
0x0149…014f ptr = 0x8ea6 // 0x149 @0x0
0x0149…014f lno = 0x03a0 // 0x14b @0x2
0x0149…014f at0004 = ╱9b╱ ENDIF ╱ // 0x14d @0x4
0x0149…014f at0005 = EOL // 0x14e @0x5
0x0149…014f }
0x014f…0159 8eb0 0930 UNTIL LA>B
0x014f…0159 LineComalBin {
0x014f…0159 ptr = 0x8eb0 // 0x14f @0x0
0x014f…0159 lno = 0x03a2 // 0x151 @0x2
0x014f…0159 at0004 = ╱98╱ UNTIL ╱ // 0x153 @0x4
0x014f…0159 at0005 = ╱4c╱L╱ // 0x154 @0x5
0x014f…0159 at0006 = ╱41╱A╱ // 0x155 @0x6
0x014f…0159 at0007 = ╱de╱>╱ // 0x156 @0x7
0x014f…0159 at0008 = ╱42╱B╱ // 0x157 @0x8
0x014f…0159 at0009 = EOL // 0x158 @0x9
0x014f…0159 }
0x0159…015f 8eb6 0932 ENDPROC
0x0159…015f LineComalBin {
0x0159…015f ptr = 0x8eb6 // 0x159 @0x0
0x0159…015f lno = 0x03a4 // 0x15b @0x2
0x0159…015f at0004 = ╱9f╱ ENDPROC ╱ // 0x15d @0x4
0x0159…015f at0005 = EOL // 0x15e @0x5
0x0159…015f }
0x015f…0194 8eeb 1000 DIM STARTPER$(8),SLUTPER$(8),DAD$(6)
0x015f…0194 LineComalBin {
0x015f…0194 ptr = 0x8eeb // 0x15f @0x0
0x015f…0194 lno = 0x03e8 // 0x161 @0x2
0x015f…0194 at0004 = ╱87╱ DIM ╱ // 0x163 @0x4
0x015f…0194 at0005 = ╱53╱S╱ // 0x164 @0x5
0x015f…0194 at0006 = ╱54╱T╱ // 0x165 @0x6
0x015f…0194 at0007 = ╱41╱A╱ // 0x166 @0x7
0x015f…0194 at0008 = ╱52╱R╱ // 0x167 @0x8
0x015f…0194 at0009 = ╱54╱T╱ // 0x168 @0x9
0x015f…0194 at000a = ╱50╱P╱ // 0x169 @0xa
0x015f…0194 at000b = ╱45╱E╱ // 0x16a @0xb
0x015f…0194 at000c = ╱52╱R╱ // 0x16b @0xc
0x015f…0194 at000d = ╱ef╱$╱ // 0x16c @0xd
0x015f…0194 at000e = ╱ed╱(╱ // 0x16d @0xe
0x015f…0194 at000f = ╱38╱8╱ // 0x16e @0xf
0x015f…0194 at0010 = ╱fe00008004╱ // 0x16f @0x10
0x015f…0194 at0015 = ╱ee╱)╱ // 0x174 @0x15
0x015f…0194 at0016 = ╱ec╱,╱ // 0x175 @0x16
0x015f…0194 at0017 = ╱53╱S╱ // 0x176 @0x17
0x015f…0194 at0018 = ╱4c╱L╱ // 0x177 @0x18
0x015f…0194 at0019 = ╱55╱U╱ // 0x178 @0x19
0x015f…0194 at001a = ╱54╱T╱ // 0x179 @0x1a
0x015f…0194 at001b = ╱50╱P╱ // 0x17a @0x1b
0x015f…0194 at001c = ╱45╱E╱ // 0x17b @0x1c
0x015f…0194 at001d = ╱52╱R╱ // 0x17c @0x1d
0x015f…0194 at001e = ╱ef╱$╱ // 0x17d @0x1e
0x015f…0194 at001f = ╱ed╱(╱ // 0x17e @0x1f
0x015f…0194 at0020 = ╱38╱8╱ // 0x17f @0x20
0x015f…0194 at0021 = ╱fe00008004╱ // 0x180 @0x21
0x015f…0194 at0026 = ╱ee╱)╱ // 0x185 @0x26
0x015f…0194 at0027 = ╱ec╱,╱ // 0x186 @0x27
0x015f…0194 at0028 = ╱44╱D╱ // 0x187 @0x28
0x015f…0194 at0029 = ╱41╱A╱ // 0x188 @0x29
0x015f…0194 at002a = ╱44╱D╱ // 0x189 @0x2a
0x015f…0194 at002b = ╱ef╱$╱ // 0x18a @0x2b
0x015f…0194 at002c = ╱ed╱(╱ // 0x18b @0x2c
0x015f…0194 at002d = ╱36╱6╱ // 0x18c @0x2d
0x015f…0194 at002e = ╱fe0000c003╱ // 0x18d @0x2e
0x015f…0194 at0033 = ╱ee╱)╱ // 0x192 @0x33
0x015f…0194 at0034 = EOL // 0x193 @0x34
0x015f…0194 }
0x0194…01d1 8f28 1010 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12)
0x0194…01d1 LineComalBin {
0x0194…01d1 ptr = 0x8f28 // 0x194 @0x0
0x0194…01d1 lno = 0x03f2 // 0x196 @0x2
0x0194…01d1 at0004 = ╱87╱ DIM ╱ // 0x198 @0x4
0x0194…01d1 at0005 = ╱52╱R╱ // 0x199 @0x5
0x0194…01d1 at0006 = ╱45╱E╱ // 0x19a @0x6
0x0194…01d1 at0007 = ╱53╱S╱ // 0x19b @0x7
0x0194…01d1 at0008 = ╱ef╱$╱ // 0x19c @0x8
0x0194…01d1 at0009 = ╱ed╱(╱ // 0x19d @0x9
0x0194…01d1 at000a = ╱31╱1╱ // 0x19e @0xa
0x0194…01d1 at000b = ╱35╱5╱ // 0x19f @0xb
0x0194…01d1 at000c = ╱fe0000f004╱ // 0x1a0 @0xc
0x0194…01d1 at0011 = ╱ee╱)╱ // 0x1a5 @0x11
0x0194…01d1 at0012 = ╱ec╱,╱ // 0x1a6 @0x12
0x0194…01d1 at0013 = ╱4f╱O╱ // 0x1a7 @0x13
0x0194…01d1 at0014 = ╱50╱P╱ // 0x1a8 @0x14
0x0194…01d1 at0015 = ╱31╱1╱ // 0x1a9 @0x15
0x0194…01d1 at0016 = ╱ef╱$╱ // 0x1aa @0x16
0x0194…01d1 at0017 = ╱ed╱(╱ // 0x1ab @0x17
0x0194…01d1 at0018 = ╱31╱1╱ // 0x1ac @0x18
0x0194…01d1 at0019 = ╱32╱2╱ // 0x1ad @0x19
0x0194…01d1 at001a = ╱fe0000c004╱ // 0x1ae @0x1a
0x0194…01d1 at001f = ╱ee╱)╱ // 0x1b3 @0x1f
0x0194…01d1 at0020 = ╱ec╱,╱ // 0x1b4 @0x20
0x0194…01d1 at0021 = ╱4f╱O╱ // 0x1b5 @0x21
0x0194…01d1 at0022 = ╱50╱P╱ // 0x1b6 @0x22
0x0194…01d1 at0023 = ╱32╱2╱ // 0x1b7 @0x23
0x0194…01d1 at0024 = ╱ef╱$╱ // 0x1b8 @0x24
0x0194…01d1 at0025 = ╱ed╱(╱ // 0x1b9 @0x25
0x0194…01d1 at0026 = ╱31╱1╱ // 0x1ba @0x26
0x0194…01d1 at0027 = ╱32╱2╱ // 0x1bb @0x27
0x0194…01d1 at0028 = ╱fe0000c004╱ // 0x1bc @0x28
0x0194…01d1 at002d = ╱ee╱)╱ // 0x1c1 @0x2d
0x0194…01d1 at002e = ╱ec╱,╱ // 0x1c2 @0x2e
0x0194…01d1 at002f = ╱54╱T╱ // 0x1c3 @0x2f
0x0194…01d1 at0030 = ╱41╱A╱ // 0x1c4 @0x30
0x0194…01d1 at0031 = ╱48╱H╱ // 0x1c5 @0x31
0x0194…01d1 at0032 = ╱ef╱$╱ // 0x1c6 @0x32
0x0194…01d1 at0033 = ╱ed╱(╱ // 0x1c7 @0x33
0x0194…01d1 at0034 = ╱31╱1╱ // 0x1c8 @0x34
0x0194…01d1 at0035 = ╱32╱2╱ // 0x1c9 @0x35
0x0194…01d1 at0036 = ╱fe0000c004╱ // 0x1ca @0x36
0x0194…01d1 at003b = ╱ee╱)╱ // 0x1cf @0x3b
0x0194…01d1 at003c = EOL // 0x1d0 @0x3c
0x0194…01d1 }
0x01d1…0226 8f7d 1020 DIM TOTAL$(W,12),FIL1$(16),LP$(E),ORK$(E),POST1$(71),POST2$(27)
0x01d1…0226 LineComalBin {
0x01d1…0226 ptr = 0x8f7d // 0x1d1 @0x0
0x01d1…0226 lno = 0x03fc // 0x1d3 @0x2
0x01d1…0226 at0004 = ╱87╱ DIM ╱ // 0x1d5 @0x4
0x01d1…0226 at0005 = ╱54╱T╱ // 0x1d6 @0x5
0x01d1…0226 at0006 = ╱4f╱O╱ // 0x1d7 @0x6
0x01d1…0226 at0007 = ╱54╱T╱ // 0x1d8 @0x7
0x01d1…0226 at0008 = ╱41╱A╱ // 0x1d9 @0x8
0x01d1…0226 at0009 = ╱4c╱L╱ // 0x1da @0x9
0x01d1…0226 at000a = ╱ef╱$╱ // 0x1db @0xa
0x01d1…0226 at000b = ╱ed╱(╱ // 0x1dc @0xb
0x01d1…0226 at000c = ╱57╱W╱ // 0x1dd @0xc
0x01d1…0226 at000d = ╱ec╱,╱ // 0x1de @0xd
0x01d1…0226 at000e = ╱31╱1╱ // 0x1df @0xe
0x01d1…0226 at000f = ╱32╱2╱ // 0x1e0 @0xf
0x01d1…0226 at0010 = ╱fe0000c004╱ // 0x1e1 @0x10
0x01d1…0226 at0015 = ╱ee╱)╱ // 0x1e6 @0x15
0x01d1…0226 at0016 = ╱ec╱,╱ // 0x1e7 @0x16
0x01d1…0226 at0017 = ╱46╱F╱ // 0x1e8 @0x17
0x01d1…0226 at0018 = ╱49╱I╱ // 0x1e9 @0x18
0x01d1…0226 at0019 = ╱4c╱L╱ // 0x1ea @0x19
0x01d1…0226 at001a = ╱31╱1╱ // 0x1eb @0x1a
0x01d1…0226 at001b = ╱ef╱$╱ // 0x1ec @0x1b
0x01d1…0226 at001c = ╱ed╱(╱ // 0x1ed @0x1c
0x01d1…0226 at001d = ╱31╱1╱ // 0x1ee @0x1d
0x01d1…0226 at001e = ╱36╱6╱ // 0x1ef @0x1e
0x01d1…0226 at001f = ╱fe00008005╱ // 0x1f0 @0x1f
0x01d1…0226 at0024 = ╱ee╱)╱ // 0x1f5 @0x24
0x01d1…0226 at0025 = ╱ec╱,╱ // 0x1f6 @0x25
0x01d1…0226 at0026 = ╱4c╱L╱ // 0x1f7 @0x26
0x01d1…0226 at0027 = ╱50╱P╱ // 0x1f8 @0x27
0x01d1…0226 at0028 = ╱ef╱$╱ // 0x1f9 @0x28
0x01d1…0226 at0029 = ╱ed╱(╱ // 0x1fa @0x29
0x01d1…0226 at002a = ╱45╱E╱ // 0x1fb @0x2a
0x01d1…0226 at002b = ╱ee╱)╱ // 0x1fc @0x2b
0x01d1…0226 at002c = ╱ec╱,╱ // 0x1fd @0x2c
0x01d1…0226 at002d = ╱4f╱O╱ // 0x1fe @0x2d
0x01d1…0226 at002e = ╱52╱R╱ // 0x1ff @0x2e
0x01d1…0226 at002f = ╱4b╱K╱ // 0x200 @0x2f
0x01d1…0226 at0030 = ╱ef╱$╱ // 0x201 @0x30
0x01d1…0226 at0031 = ╱ed╱(╱ // 0x202 @0x31
0x01d1…0226 at0032 = ╱45╱E╱ // 0x203 @0x32
0x01d1…0226 at0033 = ╱ee╱)╱ // 0x204 @0x33
0x01d1…0226 at0034 = ╱ec╱,╱ // 0x205 @0x34
0x01d1…0226 at0035 = ╱50╱P╱ // 0x206 @0x35
0x01d1…0226 at0036 = ╱4f╱O╱ // 0x207 @0x36
0x01d1…0226 at0037 = ╱53╱S╱ // 0x208 @0x37
0x01d1…0226 at0038 = ╱54╱T╱ // 0x209 @0x38
0x01d1…0226 at0039 = ╱31╱1╱ // 0x20a @0x39
0x01d1…0226 at003a = ╱ef╱$╱ // 0x20b @0x3a
0x01d1…0226 at003b = ╱ed╱(╱ // 0x20c @0x3b
0x01d1…0226 at003c = ╱37╱7╱ // 0x20d @0x3c
0x01d1…0226 at003d = ╱31╱1╱ // 0x20e @0x3d
0x01d1…0226 at003e = ╱fe00008e07╱ // 0x20f @0x3e
0x01d1…0226 at0043 = ╱ee╱)╱ // 0x214 @0x43
0x01d1…0226 at0044 = ╱ec╱,╱ // 0x215 @0x44
0x01d1…0226 at0045 = ╱50╱P╱ // 0x216 @0x45
0x01d1…0226 at0046 = ╱4f╱O╱ // 0x217 @0x46
0x01d1…0226 at0047 = ╱53╱S╱ // 0x218 @0x47
0x01d1…0226 at0048 = ╱54╱T╱ // 0x219 @0x48
0x01d1…0226 at0049 = ╱32╱2╱ // 0x21a @0x49
0x01d1…0226 at004a = ╱ef╱$╱ // 0x21b @0x4a
0x01d1…0226 at004b = ╱ed╱(╱ // 0x21c @0x4b
0x01d1…0226 at004c = ╱32╱2╱ // 0x21d @0x4c
0x01d1…0226 at004d = ╱37╱7╱ // 0x21e @0x4d
0x01d1…0226 at004e = ╱fe0000d805╱ // 0x21f @0x4e
0x01d1…0226 at0053 = ╱ee╱)╱ // 0x224 @0x53
0x01d1…0226 at0054 = EOL // 0x225 @0x54
0x01d1…0226 }
0x0226…028f 8fe6 1030 DIM RESUL$(12),RESUL1$(12),TV$(45,11),POST5$(55),MF11$(40),MF12$(50)
0x0226…028f LineComalBin {
0x0226…028f ptr = 0x8fe6 // 0x226 @0x0
0x0226…028f lno = 0x0406 // 0x228 @0x2
0x0226…028f at0004 = ╱87╱ DIM ╱ // 0x22a @0x4
0x0226…028f at0005 = ╱52╱R╱ // 0x22b @0x5
0x0226…028f at0006 = ╱45╱E╱ // 0x22c @0x6
0x0226…028f at0007 = ╱53╱S╱ // 0x22d @0x7
0x0226…028f at0008 = ╱55╱U╱ // 0x22e @0x8
0x0226…028f at0009 = ╱4c╱L╱ // 0x22f @0x9
0x0226…028f at000a = ╱ef╱$╱ // 0x230 @0xa
0x0226…028f at000b = ╱ed╱(╱ // 0x231 @0xb
0x0226…028f at000c = ╱31╱1╱ // 0x232 @0xc
0x0226…028f at000d = ╱32╱2╱ // 0x233 @0xd
0x0226…028f at000e = ╱fe0000c004╱ // 0x234 @0xe
0x0226…028f at0013 = ╱ee╱)╱ // 0x239 @0x13
0x0226…028f at0014 = ╱ec╱,╱ // 0x23a @0x14
0x0226…028f at0015 = ╱52╱R╱ // 0x23b @0x15
0x0226…028f at0016 = ╱45╱E╱ // 0x23c @0x16
0x0226…028f at0017 = ╱53╱S╱ // 0x23d @0x17
0x0226…028f at0018 = ╱55╱U╱ // 0x23e @0x18
0x0226…028f at0019 = ╱4c╱L╱ // 0x23f @0x19
0x0226…028f at001a = ╱31╱1╱ // 0x240 @0x1a
0x0226…028f at001b = ╱ef╱$╱ // 0x241 @0x1b
0x0226…028f at001c = ╱ed╱(╱ // 0x242 @0x1c
0x0226…028f at001d = ╱31╱1╱ // 0x243 @0x1d
0x0226…028f at001e = ╱32╱2╱ // 0x244 @0x1e
0x0226…028f at001f = ╱fe0000c004╱ // 0x245 @0x1f
0x0226…028f at0024 = ╱ee╱)╱ // 0x24a @0x24
0x0226…028f at0025 = ╱ec╱,╱ // 0x24b @0x25
0x0226…028f at0026 = ╱54╱T╱ // 0x24c @0x26
0x0226…028f at0027 = ╱56╱V╱ // 0x24d @0x27
0x0226…028f at0028 = ╱ef╱$╱ // 0x24e @0x28
0x0226…028f at0029 = ╱ed╱(╱ // 0x24f @0x29
0x0226…028f at002a = ╱34╱4╱ // 0x250 @0x2a
0x0226…028f at002b = ╱35╱5╱ // 0x251 @0x2b
0x0226…028f at002c = ╱fe0000b406╱ // 0x252 @0x2c
0x0226…028f at0031 = ╱ec╱,╱ // 0x257 @0x31
0x0226…028f at0032 = ╱31╱1╱ // 0x258 @0x32
0x0226…028f at0033 = ╱31╱1╱ // 0x259 @0x33
0x0226…028f at0034 = ╱fe0000b004╱ // 0x25a @0x34
0x0226…028f at0039 = ╱ee╱)╱ // 0x25f @0x39
0x0226…028f at003a = ╱ec╱,╱ // 0x260 @0x3a
0x0226…028f at003b = ╱50╱P╱ // 0x261 @0x3b
0x0226…028f at003c = ╱4f╱O╱ // 0x262 @0x3c
0x0226…028f at003d = ╱53╱S╱ // 0x263 @0x3d
0x0226…028f at003e = ╱54╱T╱ // 0x264 @0x3e
0x0226…028f at003f = ╱35╱5╱ // 0x265 @0x3f
0x0226…028f at0040 = ╱ef╱$╱ // 0x266 @0x40
0x0226…028f at0041 = ╱ed╱(╱ // 0x267 @0x41
0x0226…028f at0042 = ╱35╱5╱ // 0x268 @0x42
0x0226…028f at0043 = ╱35╱5╱ // 0x269 @0x43
0x0226…028f at0044 = ╱fe0000dc06╱ // 0x26a @0x44
0x0226…028f at0049 = ╱ee╱)╱ // 0x26f @0x49
0x0226…028f at004a = ╱ec╱,╱ // 0x270 @0x4a
0x0226…028f at004b = ╱4d╱M╱ // 0x271 @0x4b
0x0226…028f at004c = ╱46╱F╱ // 0x272 @0x4c
0x0226…028f at004d = ╱31╱1╱ // 0x273 @0x4d
0x0226…028f at004e = ╱31╱1╱ // 0x274 @0x4e
0x0226…028f at004f = ╱ef╱$╱ // 0x275 @0x4f
0x0226…028f at0050 = ╱ed╱(╱ // 0x276 @0x50
0x0226…028f at0051 = ╱34╱4╱ // 0x277 @0x51
0x0226…028f at0052 = ╱30╱0╱ // 0x278 @0x52
0x0226…028f at0053 = ╱fe0000a006╱ // 0x279 @0x53
0x0226…028f at0058 = ╱ee╱)╱ // 0x27e @0x58
0x0226…028f at0059 = ╱ec╱,╱ // 0x27f @0x59
0x0226…028f at005a = ╱4d╱M╱ // 0x280 @0x5a
0x0226…028f at005b = ╱46╱F╱ // 0x281 @0x5b
0x0226…028f at005c = ╱31╱1╱ // 0x282 @0x5c
0x0226…028f at005d = ╱32╱2╱ // 0x283 @0x5d
0x0226…028f at005e = ╱ef╱$╱ // 0x284 @0x5e
0x0226…028f at005f = ╱ed╱(╱ // 0x285 @0x5f
0x0226…028f at0060 = ╱35╱5╱ // 0x286 @0x60
0x0226…028f at0061 = ╱30╱0╱ // 0x287 @0x61
0x0226…028f at0062 = ╱fe0000c806╱ // 0x288 @0x62
0x0226…028f at0067 = ╱ee╱)╱ // 0x28d @0x67
0x0226…028f at0068 = EOL // 0x28e @0x68
0x0226…028f }
0x028f…02d1 9028 1040 DIM FIL$(16),FIL2$(16),POST3$(55),POST4$(34)
0x028f…02d1 LineComalBin {
0x028f…02d1 ptr = 0x9028 // 0x28f @0x0
0x028f…02d1 lno = 0x0410 // 0x291 @0x2
0x028f…02d1 at0004 = ╱87╱ DIM ╱ // 0x293 @0x4
0x028f…02d1 at0005 = ╱46╱F╱ // 0x294 @0x5
0x028f…02d1 at0006 = ╱49╱I╱ // 0x295 @0x6
0x028f…02d1 at0007 = ╱4c╱L╱ // 0x296 @0x7
0x028f…02d1 at0008 = ╱ef╱$╱ // 0x297 @0x8
0x028f…02d1 at0009 = ╱ed╱(╱ // 0x298 @0x9
0x028f…02d1 at000a = ╱31╱1╱ // 0x299 @0xa
0x028f…02d1 at000b = ╱36╱6╱ // 0x29a @0xb
0x028f…02d1 at000c = ╱fe00008005╱ // 0x29b @0xc
0x028f…02d1 at0011 = ╱ee╱)╱ // 0x2a0 @0x11
0x028f…02d1 at0012 = ╱ec╱,╱ // 0x2a1 @0x12
0x028f…02d1 at0013 = ╱46╱F╱ // 0x2a2 @0x13
0x028f…02d1 at0014 = ╱49╱I╱ // 0x2a3 @0x14
0x028f…02d1 at0015 = ╱4c╱L╱ // 0x2a4 @0x15
0x028f…02d1 at0016 = ╱32╱2╱ // 0x2a5 @0x16
0x028f…02d1 at0017 = ╱ef╱$╱ // 0x2a6 @0x17
0x028f…02d1 at0018 = ╱ed╱(╱ // 0x2a7 @0x18
0x028f…02d1 at0019 = ╱31╱1╱ // 0x2a8 @0x19
0x028f…02d1 at001a = ╱36╱6╱ // 0x2a9 @0x1a
0x028f…02d1 at001b = ╱fe00008005╱ // 0x2aa @0x1b
0x028f…02d1 at0020 = ╱ee╱)╱ // 0x2af @0x20
0x028f…02d1 at0021 = ╱ec╱,╱ // 0x2b0 @0x21
0x028f…02d1 at0022 = ╱50╱P╱ // 0x2b1 @0x22
0x028f…02d1 at0023 = ╱4f╱O╱ // 0x2b2 @0x23
0x028f…02d1 at0024 = ╱53╱S╱ // 0x2b3 @0x24
0x028f…02d1 at0025 = ╱54╱T╱ // 0x2b4 @0x25
0x028f…02d1 at0026 = ╱33╱3╱ // 0x2b5 @0x26
0x028f…02d1 at0027 = ╱ef╱$╱ // 0x2b6 @0x27
0x028f…02d1 at0028 = ╱ed╱(╱ // 0x2b7 @0x28
0x028f…02d1 at0029 = ╱35╱5╱ // 0x2b8 @0x29
0x028f…02d1 at002a = ╱35╱5╱ // 0x2b9 @0x2a
0x028f…02d1 at002b = ╱fe0000dc06╱ // 0x2ba @0x2b
0x028f…02d1 at0030 = ╱ee╱)╱ // 0x2bf @0x30
0x028f…02d1 at0031 = ╱ec╱,╱ // 0x2c0 @0x31
0x028f…02d1 at0032 = ╱50╱P╱ // 0x2c1 @0x32
0x028f…02d1 at0033 = ╱4f╱O╱ // 0x2c2 @0x33
0x028f…02d1 at0034 = ╱53╱S╱ // 0x2c3 @0x34
0x028f…02d1 at0035 = ╱54╱T╱ // 0x2c4 @0x35
0x028f…02d1 at0036 = ╱34╱4╱ // 0x2c5 @0x36
0x028f…02d1 at0037 = ╱ef╱$╱ // 0x2c6 @0x37
0x028f…02d1 at0038 = ╱ed╱(╱ // 0x2c7 @0x38
0x028f…02d1 at0039 = ╱33╱3╱ // 0x2c8 @0x39
0x028f…02d1 at003a = ╱34╱4╱ // 0x2c9 @0x3a
0x028f…02d1 at003b = ╱fe00008806╱ // 0x2ca @0x3b
0x028f…02d1 at0040 = ╱ee╱)╱ // 0x2cf @0x40
0x028f…02d1 at0041 = EOL // 0x2d0 @0x41
0x028f…02d1 }
0x02d1…02e4 903b 1050 DIM MF1$(16)
0x02d1…02e4 LineComalBin {
0x02d1…02e4 ptr = 0x903b // 0x2d1 @0x0
0x02d1…02e4 lno = 0x041a // 0x2d3 @0x2
0x02d1…02e4 at0004 = ╱87╱ DIM ╱ // 0x2d5 @0x4
0x02d1…02e4 at0005 = ╱4d╱M╱ // 0x2d6 @0x5
0x02d1…02e4 at0006 = ╱46╱F╱ // 0x2d7 @0x6
0x02d1…02e4 at0007 = ╱31╱1╱ // 0x2d8 @0x7
0x02d1…02e4 at0008 = ╱ef╱$╱ // 0x2d9 @0x8
0x02d1…02e4 at0009 = ╱ed╱(╱ // 0x2da @0x9
0x02d1…02e4 at000a = ╱31╱1╱ // 0x2db @0xa
0x02d1…02e4 at000b = ╱36╱6╱ // 0x2dc @0xb
0x02d1…02e4 at000c = ╱fe00008005╱ // 0x2dd @0xc
0x02d1…02e4 at0011 = ╱ee╱)╱ // 0x2e2 @0x11
0x02d1…02e4 at0012 = EOL // 0x2e3 @0x12
0x02d1…02e4 }
0x02e4…02fc 9053 1060 TAH$=" 0+"
0x02e4…02fc LineComalBin {
0x02e4…02fc ptr = 0x9053 // 0x2e4 @0x0
0x02e4…02fc lno = 0x0424 // 0x2e6 @0x2
0x02e4…02fc at0004 = ╱54╱T╱ // 0x2e8 @0x4
0x02e4…02fc at0005 = ╱41╱A╱ // 0x2e9 @0x5
0x02e4…02fc at0006 = ╱48╱H╱ // 0x2ea @0x6
0x02e4…02fc at0007 = ╱ef╱$╱ // 0x2eb @0x7
0x02e4…02fc at0008 = ╱dc╱=╱ // 0x2ec @0x8
0x02e4…02fc at0009 = ╱22╱"╱ // 0x2ed @0x9
0x02e4…02fc at000a = ╱20╱…╱ // 0x2ee @0xa
0x02e4…02fc at000b = ╱20╱…╱ // 0x2ef @0xb
0x02e4…02fc at000c = ╱20╱…╱ // 0x2f0 @0xc
0x02e4…02fc at000d = ╱20╱…╱ // 0x2f1 @0xd
0x02e4…02fc at000e = ╱20╱…╱ // 0x2f2 @0xe
0x02e4…02fc at000f = ╱20╱…╱ // 0x2f3 @0xf
0x02e4…02fc at0010 = ╱20╱…╱ // 0x2f4 @0x10
0x02e4…02fc at0011 = ╱20╱…╱ // 0x2f5 @0x11
0x02e4…02fc at0012 = ╱20╱…╱ // 0x2f6 @0x12
0x02e4…02fc at0013 = ╱20╱…╱ // 0x2f7 @0x13
0x02e4…02fc at0014 = ╱30╱0╱ // 0x2f8 @0x14
0x02e4…02fc at0015 = ╱2b╱+╱ // 0x2f9 @0x15
0x02e4…02fc at0016 = ╱22╱"╱ // 0x2fa @0x16
0x02e4…02fc at0017 = EOL // 0x2fb @0x17
0x02e4…02fc }
0x02fc…0337 908e 1070 DIM BL$(79),L$(79),LIN$(12),LIN1$(12)
0x02fc…0337 LineComalBin {
0x02fc…0337 ptr = 0x908e // 0x2fc @0x0
0x02fc…0337 lno = 0x042e // 0x2fe @0x2
0x02fc…0337 at0004 = ╱87╱ DIM ╱ // 0x300 @0x4
0x02fc…0337 at0005 = ╱42╱B╱ // 0x301 @0x5
0x02fc…0337 at0006 = ╱4c╱L╱ // 0x302 @0x6
0x02fc…0337 at0007 = ╱ef╱$╱ // 0x303 @0x7
0x02fc…0337 at0008 = ╱ed╱(╱ // 0x304 @0x8
0x02fc…0337 at0009 = ╱37╱7╱ // 0x305 @0x9
0x02fc…0337 at000a = ╱39╱9╱ // 0x306 @0xa
0x02fc…0337 at000b = ╱fe00009e07╱ // 0x307 @0xb
0x02fc…0337 at0010 = ╱ee╱)╱ // 0x30c @0x10
0x02fc…0337 at0011 = ╱ec╱,╱ // 0x30d @0x11
0x02fc…0337 at0012 = ╱4c╱L╱ // 0x30e @0x12
0x02fc…0337 at0013 = ╱ef╱$╱ // 0x30f @0x13
0x02fc…0337 at0014 = ╱ed╱(╱ // 0x310 @0x14
0x02fc…0337 at0015 = ╱37╱7╱ // 0x311 @0x15
0x02fc…0337 at0016 = ╱39╱9╱ // 0x312 @0x16
0x02fc…0337 at0017 = ╱fe00009e07╱ // 0x313 @0x17
0x02fc…0337 at001c = ╱ee╱)╱ // 0x318 @0x1c
0x02fc…0337 at001d = ╱ec╱,╱ // 0x319 @0x1d
0x02fc…0337 at001e = ╱4c╱L╱ // 0x31a @0x1e
0x02fc…0337 at001f = ╱49╱I╱ // 0x31b @0x1f
0x02fc…0337 at0020 = ╱4e╱N╱ // 0x31c @0x20
0x02fc…0337 at0021 = ╱ef╱$╱ // 0x31d @0x21
0x02fc…0337 at0022 = ╱ed╱(╱ // 0x31e @0x22
0x02fc…0337 at0023 = ╱31╱1╱ // 0x31f @0x23
0x02fc…0337 at0024 = ╱32╱2╱ // 0x320 @0x24
0x02fc…0337 at0025 = ╱fe0000c004╱ // 0x321 @0x25
0x02fc…0337 at002a = ╱ee╱)╱ // 0x326 @0x2a
0x02fc…0337 at002b = ╱ec╱,╱ // 0x327 @0x2b
0x02fc…0337 at002c = ╱4c╱L╱ // 0x328 @0x2c
0x02fc…0337 at002d = ╱49╱I╱ // 0x329 @0x2d
0x02fc…0337 at002e = ╱4e╱N╱ // 0x32a @0x2e
0x02fc…0337 at002f = ╱31╱1╱ // 0x32b @0x2f
0x02fc…0337 at0030 = ╱ef╱$╱ // 0x32c @0x30
0x02fc…0337 at0031 = ╱ed╱(╱ // 0x32d @0x31
0x02fc…0337 at0032 = ╱31╱1╱ // 0x32e @0x32
0x02fc…0337 at0033 = ╱32╱2╱ // 0x32f @0x33
0x02fc…0337 at0034 = ╱fe0000c004╱ // 0x330 @0x34
0x02fc…0337 at0039 = ╱ee╱)╱ // 0x335 @0x39
0x02fc…0337 at003a = EOL // 0x336 @0x3a
0x02fc…0337 }
0x0337…0348 909f 1080 FOR I=E TO 79
0x0337…0348 LineComalBin {
0x0337…0348 ptr = 0x909f // 0x337 @0x0
0x0337…0348 lno = 0x0438 // 0x339 @0x2
0x0337…0348 at0004 = ╱83╱ FOR ╱ // 0x33b @0x4
0x0337…0348 at0005 = ╱49╱I╱ // 0x33c @0x5
0x0337…0348 at0006 = ╱dc╱=╱ // 0x33d @0x6
0x0337…0348 at0007 = ╱45╱E╱ // 0x33e @0x7
0x0337…0348 at0008 = ╱b7╱ TO ╱ // 0x33f @0x8
0x0337…0348 at0009 = ╱37╱7╱ // 0x340 @0x9
0x0337…0348 at000a = ╱39╱9╱ // 0x341 @0xa
0x0337…0348 at000b = ╱fe00009e07╱ // 0x342 @0xb
0x0337…0348 at0010 = EOL // 0x347 @0x10
0x0337…0348 }
0x0348…0358 90af 1090 BL$=BL$+" "
0x0348…0358 LineComalBin {
0x0348…0358 ptr = 0x90af // 0x348 @0x0
0x0348…0358 lno = 0x0442 // 0x34a @0x2
0x0348…0358 at0004 = ╱42╱B╱ // 0x34c @0x4
0x0348…0358 at0005 = ╱4c╱L╱ // 0x34d @0x5
0x0348…0358 at0006 = ╱ef╱$╱ // 0x34e @0x6
0x0348…0358 at0007 = ╱dc╱=╱ // 0x34f @0x7
0x0348…0358 at0008 = ╱42╱B╱ // 0x350 @0x8
0x0348…0358 at0009 = ╱4c╱L╱ // 0x351 @0x9
0x0348…0358 at000a = ╱ef╱$╱ // 0x352 @0xa
0x0348…0358 at000b = ╱f1╱+╱ // 0x353 @0xb
0x0348…0358 at000c = ╱22╱"╱ // 0x354 @0xc
0x0348…0358 at000d = ╱20╱…╱ // 0x355 @0xd
0x0348…0358 at000e = ╱22╱"╱ // 0x356 @0xe
0x0348…0358 at000f = EOL // 0x357 @0xf
0x0348…0358 }
0x0358…035f 90b6 1100 NEXT I
0x0358…035f LineComalBin {
0x0358…035f ptr = 0x90b6 // 0x358 @0x0
0x0358…035f lno = 0x044c // 0x35a @0x2
0x0358…035f at0004 = ╱84╱ NEXT ╱ // 0x35c @0x4
0x0358…035f at0005 = ╱49╱I╱ // 0x35d @0x5
0x0358…035f at0006 = EOL // 0x35e @0x6
0x0358…035f }
0x035f…0377 90ce 1110 PROC CALC(AR3,B1,B2,ES)
0x035f…0377 LineComalBin {
0x035f…0377 ptr = 0x90ce // 0x35f @0x0
0x035f…0377 lno = 0x0456 // 0x361 @0x2
0x035f…0377 at0004 = ╱9e╱ PROC ╱ // 0x363 @0x4
0x035f…0377 at0005 = ╱43╱C╱ // 0x364 @0x5
0x035f…0377 at0006 = ╱41╱A╱ // 0x365 @0x6
0x035f…0377 at0007 = ╱4c╱L╱ // 0x366 @0x7
0x035f…0377 at0008 = ╱43╱C╱ // 0x367 @0x8
0x035f…0377 at0009 = ╱ed╱(╱ // 0x368 @0x9
0x035f…0377 at000a = ╱41╱A╱ // 0x369 @0xa
0x035f…0377 at000b = ╱52╱R╱ // 0x36a @0xb
0x035f…0377 at000c = ╱33╱3╱ // 0x36b @0xc
0x035f…0377 at000d = ╱ec╱,╱ // 0x36c @0xd
0x035f…0377 at000e = ╱42╱B╱ // 0x36d @0xe
0x035f…0377 at000f = ╱31╱1╱ // 0x36e @0xf
0x035f…0377 at0010 = ╱ec╱,╱ // 0x36f @0x10
0x035f…0377 at0011 = ╱42╱B╱ // 0x370 @0x11
0x035f…0377 at0012 = ╱32╱2╱ // 0x371 @0x12
0x035f…0377 at0013 = ╱ec╱,╱ // 0x372 @0x13
0x035f…0377 at0014 = ╱45╱E╱ // 0x373 @0x14
0x035f…0377 at0015 = ╱53╱S╱ // 0x374 @0x15
0x035f…0377 at0016 = ╱ee╱)╱ // 0x375 @0x16
0x035f…0377 at0017 = EOL // 0x376 @0x17
0x035f…0377 }
0x0377…03be 9115 1120 RES$=ES$;OP1$=B1$;OP2$=B2$;SI=B;FLAG=B;ART=AR3-6*(AR3>5)
0x0377…03be LineComalBin {
0x0377…03be ptr = 0x9115 // 0x377 @0x0
0x0377…03be lno = 0x0460 // 0x379 @0x2
0x0377…03be at0004 = ╱52╱R╱ // 0x37b @0x4
0x0377…03be at0005 = ╱45╱E╱ // 0x37c @0x5
0x0377…03be at0006 = ╱53╱S╱ // 0x37d @0x6
0x0377…03be at0007 = ╱ef╱$╱ // 0x37e @0x7
0x0377…03be at0008 = ╱dc╱=╱ // 0x37f @0x8
0x0377…03be at0009 = ╱45╱E╱ // 0x380 @0x9
0x0377…03be at000a = ╱53╱S╱ // 0x381 @0xa
0x0377…03be at000b = ╱ef╱$╱ // 0x382 @0xb
0x0377…03be at000c = ╱eb╱;╱ // 0x383 @0xc
0x0377…03be at000d = ╱4f╱O╱ // 0x384 @0xd
0x0377…03be at000e = ╱50╱P╱ // 0x385 @0xe
0x0377…03be at000f = ╱31╱1╱ // 0x386 @0xf
0x0377…03be at0010 = ╱ef╱$╱ // 0x387 @0x10
0x0377…03be at0011 = ╱dc╱=╱ // 0x388 @0x11
0x0377…03be at0012 = ╱42╱B╱ // 0x389 @0x12
0x0377…03be at0013 = ╱31╱1╱ // 0x38a @0x13
0x0377…03be at0014 = ╱ef╱$╱ // 0x38b @0x14
0x0377…03be at0015 = ╱eb╱;╱ // 0x38c @0x15
0x0377…03be at0016 = ╱4f╱O╱ // 0x38d @0x16
0x0377…03be at0017 = ╱50╱P╱ // 0x38e @0x17
0x0377…03be at0018 = ╱32╱2╱ // 0x38f @0x18
0x0377…03be at0019 = ╱ef╱$╱ // 0x390 @0x19
0x0377…03be at001a = ╱dc╱=╱ // 0x391 @0x1a
0x0377…03be at001b = ╱42╱B╱ // 0x392 @0x1b
0x0377…03be at001c = ╱32╱2╱ // 0x393 @0x1c
0x0377…03be at001d = ╱ef╱$╱ // 0x394 @0x1d
0x0377…03be at001e = ╱eb╱;╱ // 0x395 @0x1e
0x0377…03be at001f = ╱53╱S╱ // 0x396 @0x1f
0x0377…03be at0020 = ╱49╱I╱ // 0x397 @0x20
0x0377…03be at0021 = ╱dc╱=╱ // 0x398 @0x21
0x0377…03be at0022 = ╱42╱B╱ // 0x399 @0x22
0x0377…03be at0023 = ╱eb╱;╱ // 0x39a @0x23
0x0377…03be at0024 = ╱46╱F╱ // 0x39b @0x24
0x0377…03be at0025 = ╱4c╱L╱ // 0x39c @0x25
0x0377…03be at0026 = ╱41╱A╱ // 0x39d @0x26
0x0377…03be at0027 = ╱47╱G╱ // 0x39e @0x27
0x0377…03be at0028 = ╱dc╱=╱ // 0x39f @0x28
0x0377…03be at0029 = ╱42╱B╱ // 0x3a0 @0x29
0x0377…03be at002a = ╱eb╱;╱ // 0x3a1 @0x2a
0x0377…03be at002b = ╱41╱A╱ // 0x3a2 @0x2b
0x0377…03be at002c = ╱52╱R╱ // 0x3a3 @0x2c
0x0377…03be at002d = ╱54╱T╱ // 0x3a4 @0x2d
0x0377…03be at002e = ╱dc╱=╱ // 0x3a5 @0x2e
0x0377…03be at002f = ╱41╱A╱ // 0x3a6 @0x2f
0x0377…03be at0030 = ╱52╱R╱ // 0x3a7 @0x30
0x0377…03be at0031 = ╱33╱3╱ // 0x3a8 @0x31
0x0377…03be at0032 = ╱e3╱-╱ // 0x3a9 @0x32
0x0377…03be at0033 = ╱36╱6╱ // 0x3aa @0x33
0x0377…03be at0034 = ╱fe0000c003╱ // 0x3ab @0x34
0x0377…03be at0039 = ╱e4╱*╱ // 0x3b0 @0x39
0x0377…03be at003a = ╱ed╱(╱ // 0x3b1 @0x3a
0x0377…03be at003b = ╱41╱A╱ // 0x3b2 @0x3b
0x0377…03be at003c = ╱52╱R╱ // 0x3b3 @0x3c
0x0377…03be at003d = ╱33╱3╱ // 0x3b4 @0x3d
0x0377…03be at003e = ╱de╱>╱ // 0x3b5 @0x3e
0x0377…03be at003f = ╱35╱5╱ // 0x3b6 @0x3f
0x0377…03be at0040 = ╱fe0000a003╱ // 0x3b7 @0x40
0x0377…03be at0045 = ╱ee╱)╱ // 0x3bc @0x45
0x0377…03be at0046 = EOL // 0x3bd @0x46
0x0377…03be }
0x03be…03d4 912b 1130 CALL "P641210:REGN"
0x03be…03d4 LineComalBin {
0x03be…03d4 ptr = 0x912b // 0x3be @0x0
0x03be…03d4 lno = 0x046a // 0x3c0 @0x2
0x03be…03d4 at0004 = ╱ad4553╱ CALL ╱ // 0x3c2 @0x4
0x03be…03d4 at0007 = ╱22╱"╱ // 0x3c5 @0x7
0x03be…03d4 at0008 = ╱50╱P╱ // 0x3c6 @0x8
0x03be…03d4 at0009 = ╱36╱6╱ // 0x3c7 @0x9
0x03be…03d4 at000a = ╱34╱4╱ // 0x3c8 @0xa
0x03be…03d4 at000b = ╱31╱1╱ // 0x3c9 @0xb
0x03be…03d4 at000c = ╱32╱2╱ // 0x3ca @0xc
0x03be…03d4 at000d = ╱31╱1╱ // 0x3cb @0xd
0x03be…03d4 at000e = ╱30╱0╱ // 0x3cc @0xe
0x03be…03d4 at000f = ╱3a╱:╱ // 0x3cd @0xf
0x03be…03d4 at0010 = ╱52╱R╱ // 0x3ce @0x10
0x03be…03d4 at0011 = ╱45╱E╱ // 0x3cf @0x11
0x03be…03d4 at0012 = ╱47╱G╱ // 0x3d0 @0x12
0x03be…03d4 at0013 = ╱4e╱N╱ // 0x3d1 @0x13
0x03be…03d4 at0014 = ╱22╱"╱ // 0x3d2 @0x14
0x03be…03d4 at0015 = EOL // 0x3d3 @0x15
0x03be…03d4 }
0x03d4…03e5 913c 1140 IF AR3<6 THEN
0x03d4…03e5 LineComalBin {
0x03d4…03e5 ptr = 0x913c // 0x3d4 @0x0
0x03d4…03e5 lno = 0x0474 // 0x3d6 @0x2
0x03d4…03e5 at0004 = ╱9c╱ IF ╱ // 0x3d8 @0x4
0x03d4…03e5 at0005 = ╱41╱A╱ // 0x3d9 @0x5
0x03d4…03e5 at0006 = ╱52╱R╱ // 0x3da @0x6
0x03d4…03e5 at0007 = ╱33╱3╱ // 0x3db @0x7
0x03d4…03e5 at0008 = ╱dd╱<╱ // 0x3dc @0x8
0x03d4…03e5 at0009 = ╱36╱6╱ // 0x3dd @0x9
0x03d4…03e5 at000a = ╱fe0000c003╱ // 0x3de @0xa
0x03d4…03e5 at000f = ╱b6╱ THEN ╱ // 0x3e3 @0xf
0x03d4…03e5 at0010 = EOL // 0x3e4 @0x10
0x03d4…03e5 }
0x03e5…03f1 9148 1150 IF FLAG THEN STOP
0x03e5…03f1 LineComalBin {
0x03e5…03f1 ptr = 0x9148 // 0x3e5 @0x0
0x03e5…03f1 lno = 0x047e // 0x3e7 @0x2
0x03e5…03f1 at0004 = ╱82╱ IF ╱ // 0x3e9 @0x4
0x03e5…03f1 at0005 = ╱46╱F╱ // 0x3ea @0x5
0x03e5…03f1 at0006 = ╱4c╱L╱ // 0x3eb @0x6
0x03e5…03f1 at0007 = ╱41╱A╱ // 0x3ec @0x7
0x03e5…03f1 at0008 = ╱47╱G╱ // 0x3ed @0x8
0x03e5…03f1 at0009 = ╱b6╱ THEN ╱ // 0x3ee @0x9
0x03e5…03f1 at000a = ╱8d╱ STOP ╱ // 0x3ef @0xa
0x03e5…03f1 at000b = EOL // 0x3f0 @0xb
0x03e5…03f1 }
0x03f1…03f7 914e 1160 ENDIF
0x03f1…03f7 LineComalBin {
0x03f1…03f7 ptr = 0x914e // 0x3f1 @0x0
0x03f1…03f7 lno = 0x0488 // 0x3f3 @0x2
0x03f1…03f7 at0004 = ╱9b╱ ENDIF ╱ // 0x3f5 @0x4
0x03f1…03f7 at0005 = EOL // 0x3f6 @0x5
0x03f1…03f7 }
0x03f7…0404 915b 1170 ES$=RES$
0x03f7…0404 LineComalBin {
0x03f7…0404 ptr = 0x915b // 0x3f7 @0x0
0x03f7…0404 lno = 0x0492 // 0x3f9 @0x2
0x03f7…0404 at0004 = ╱45╱E╱ // 0x3fb @0x4
0x03f7…0404 at0005 = ╱53╱S╱ // 0x3fc @0x5
0x03f7…0404 at0006 = ╱ef╱$╱ // 0x3fd @0x6
0x03f7…0404 at0007 = ╱dc╱=╱ // 0x3fe @0x7
0x03f7…0404 at0008 = ╱52╱R╱ // 0x3ff @0x8
0x03f7…0404 at0009 = ╱45╱E╱ // 0x400 @0x9
0x03f7…0404 at000a = ╱53╱S╱ // 0x401 @0xa
0x03f7…0404 at000b = ╱ef╱$╱ // 0x402 @0xb
0x03f7…0404 at000c = EOL // 0x403 @0xc
0x03f7…0404 }
0x0404…040a 9161 1180 ENDPROC
0x0404…040a LineComalBin {
0x0404…040a ptr = 0x9161 // 0x404 @0x0
0x0404…040a lno = 0x049c // 0x406 @0x2
0x0404…040a at0004 = ╱9f╱ ENDPROC ╱ // 0x408 @0x4
0x0404…040a at0005 = EOL // 0x409 @0x5
0x0404…040a }
0x040a…0415 916c 1190 PROC UDTÆL
0x040a…0415 LineComalBin {
0x040a…0415 ptr = 0x916c // 0x40a @0x0
0x040a…0415 lno = 0x04a6 // 0x40c @0x2
0x040a…0415 at0004 = ╱9e╱ PROC ╱ // 0x40e @0x4
0x040a…0415 at0005 = ╱55╱U╱ // 0x40f @0x5
0x040a…0415 at0006 = ╱44╱D╱ // 0x410 @0x6
0x040a…0415 at0007 = ╱54╱T╱ // 0x411 @0x7
0x040a…0415 at0008 = ╱5b╱Æ╱ // 0x412 @0x8
0x040a…0415 at0009 = ╱4c╱L╱ // 0x413 @0x9
0x040a…0415 at000a = EOL // 0x414 @0xa
0x040a…0415 }
0x0415…0426 917d 1200 J=W*(LMNR-E)
0x0415…0426 LineComalBin {
0x0415…0426 ptr = 0x917d // 0x415 @0x0
0x0415…0426 lno = 0x04b0 // 0x417 @0x2
0x0415…0426 at0004 = ╱4a╱J╱ // 0x419 @0x4
0x0415…0426 at0005 = ╱dc╱=╱ // 0x41a @0x5
0x0415…0426 at0006 = ╱57╱W╱ // 0x41b @0x6
0x0415…0426 at0007 = ╱e4╱*╱ // 0x41c @0x7
0x0415…0426 at0008 = ╱ed╱(╱ // 0x41d @0x8
0x0415…0426 at0009 = ╱4c╱L╱ // 0x41e @0x9
0x0415…0426 at000a = ╱4d╱M╱ // 0x41f @0xa
0x0415…0426 at000b = ╱4e╱N╱ // 0x420 @0xb
0x0415…0426 at000c = ╱52╱R╱ // 0x421 @0xc
0x0415…0426 at000d = ╱e3╱-╱ // 0x422 @0xd
0x0415…0426 at000e = ╱45╱E╱ // 0x423 @0xe
0x0415…0426 at000f = ╱ee╱)╱ // 0x424 @0xf
0x0415…0426 at0010 = EOL // 0x425 @0x10
0x0415…0426 }
0x0426…0436 918d 1210 FOR K=4 TO W
0x0426…0436 LineComalBin {
0x0426…0436 ptr = 0x918d // 0x426 @0x0
0x0426…0436 lno = 0x04ba // 0x428 @0x2
0x0426…0436 at0004 = ╱83╱ FOR ╱ // 0x42a @0x4
0x0426…0436 at0005 = ╱4b╱K╱ // 0x42b @0x5
0x0426…0436 at0006 = ╱dc╱=╱ // 0x42c @0x6
0x0426…0436 at0007 = ╱34╱4╱ // 0x42d @0x7
0x0426…0436 at0008 = ╱fe00008003╱ // 0x42e @0x8
0x0426…0436 at000d = ╱b7╱ TO ╱ // 0x433 @0xd
0x0426…0436 at000e = ╱57╱W╱ // 0x434 @0xe
0x0426…0436 at000f = EOL // 0x435 @0xf
0x0426…0436 }
0x0436…0446 (14,) 919d 1220 FOR I=E TO 5
0x0436…0446 LineComalBin {
0x0436…0446 ptr = 0x919d // 0x436 @0x0
0x0436…0446 lno = 0x04c4 // 0x438 @0x2
0x0436…0446 at0004 = ╱83╱ FOR ╱ // 0x43a @0x4
0x0436…0446 at0005 = ╱49╱I╱ // 0x43b @0x5
0x0436…0446 at0006 = ╱dc╱=╱ // 0x43c @0x6
0x0436…0446 at0007 = ╱45╱E╱ // 0x43d @0x7
0x0436…0446 at0008 = ╱b7╱ TO ╱ // 0x43e @0x8
0x0436…0446 at0009 = ╱35╱5╱ // 0x43f @0x9
0x0436…0446 at000a = ╱fe0000a003╱ // 0x440 @0xa
0x0436…0446 at000f = EOL // 0x445 @0xf
0x0436…0446 }
0x0446…047e 91d5 1230 POST5$((I-E)*11+E:11)=TV$((K-E)*5+I)
0x0446…047e LineComalBin {
0x0446…047e ptr = 0x91d5 // 0x446 @0x0
0x0446…047e lno = 0x04ce // 0x448 @0x2
0x0446…047e at0004 = ╱50╱P╱ // 0x44a @0x4
0x0446…047e at0005 = ╱4f╱O╱ // 0x44b @0x5
0x0446…047e at0006 = ╱53╱S╱ // 0x44c @0x6
0x0446…047e at0007 = ╱54╱T╱ // 0x44d @0x7
0x0446…047e at0008 = ╱35╱5╱ // 0x44e @0x8
0x0446…047e at0009 = ╱ef╱$╱ // 0x44f @0x9
0x0446…047e at000a = ╱ed╱(╱ // 0x450 @0xa
0x0446…047e at000b = ╱ed╱(╱ // 0x451 @0xb
0x0446…047e at000c = ╱49╱I╱ // 0x452 @0xc
0x0446…047e at000d = ╱e3╱-╱ // 0x453 @0xd
0x0446…047e at000e = ╱45╱E╱ // 0x454 @0xe
0x0446…047e at000f = ╱ee╱)╱ // 0x455 @0xf
0x0446…047e at0010 = ╱e4╱*╱ // 0x456 @0x10
0x0446…047e at0011 = ╱31╱1╱ // 0x457 @0x11
0x0446…047e at0012 = ╱31╱1╱ // 0x458 @0x12
0x0446…047e at0013 = ╱fe0000b004╱ // 0x459 @0x13
0x0446…047e at0018 = ╱e2╱+╱ // 0x45e @0x18
0x0446…047e at0019 = ╱45╱E╱ // 0x45f @0x19
0x0446…047e at001a = ╱f0╱:╱ // 0x460 @0x1a
0x0446…047e at001b = ╱31╱1╱ // 0x461 @0x1b
0x0446…047e at001c = ╱31╱1╱ // 0x462 @0x1c
0x0446…047e at001d = ╱fe0000b004╱ // 0x463 @0x1d
0x0446…047e at0022 = ╱ee╱)╱ // 0x468 @0x22
0x0446…047e at0023 = ╱dc╱=╱ // 0x469 @0x23
0x0446…047e at0024 = ╱54╱T╱ // 0x46a @0x24
0x0446…047e at0025 = ╱56╱V╱ // 0x46b @0x25
0x0446…047e at0026 = ╱ef╱$╱ // 0x46c @0x26
0x0446…047e at0027 = ╱ed╱(╱ // 0x46d @0x27
0x0446…047e at0028 = ╱ed╱(╱ // 0x46e @0x28
0x0446…047e at0029 = ╱4b╱K╱ // 0x46f @0x29
0x0446…047e at002a = ╱e3╱-╱ // 0x470 @0x2a
0x0446…047e at002b = ╱45╱E╱ // 0x471 @0x2b
0x0446…047e at002c = ╱ee╱)╱ // 0x472 @0x2c
0x0446…047e at002d = ╱e4╱*╱ // 0x473 @0x2d
0x0446…047e at002e = ╱35╱5╱ // 0x474 @0x2e
0x0446…047e at002f = ╱fe0000a003╱ // 0x475 @0x2f
0x0446…047e at0034 = ╱e2╱+╱ // 0x47a @0x34
0x0446…047e at0035 = ╱49╱I╱ // 0x47b @0x35
0x0446…047e at0036 = ╱ee╱)╱ // 0x47c @0x36
0x0446…047e at0037 = EOL // 0x47d @0x37
0x0446…047e }
0x047e…0485 91dc 1240 NEXT I
0x047e…0485 LineComalBin {
0x047e…0485 ptr = 0x91dc // 0x47e @0x0
0x047e…0485 lno = 0x04d8 // 0x480 @0x2
0x047e…0485 at0004 = ╱84╱ NEXT ╱ // 0x482 @0x4
0x047e…0485 at0005 = ╱49╱I╱ // 0x483 @0x5
0x047e…0485 at0006 = EOL // 0x484 @0x6
0x047e…0485 }
0x0485…049b 91f2 1250 PUT FIL2$,J+K:POST5$
0x0485…049b LineComalBin {
0x0485…049b ptr = 0x91f2 // 0x485 @0x0
0x0485…049b lno = 0x04e2 // 0x487 @0x2
0x0485…049b at0004 = ╱aa╱ PUT ╱ // 0x489 @0x4
0x0485…049b at0005 = ╱46╱F╱ // 0x48a @0x5
0x0485…049b at0006 = ╱49╱I╱ // 0x48b @0x6
0x0485…049b at0007 = ╱4c╱L╱ // 0x48c @0x7
0x0485…049b at0008 = ╱32╱2╱ // 0x48d @0x8
0x0485…049b at0009 = ╱ef╱$╱ // 0x48e @0x9
0x0485…049b at000a = ╱ec╱,╱ // 0x48f @0xa
0x0485…049b at000b = ╱4a╱J╱ // 0x490 @0xb
0x0485…049b at000c = ╱e2╱+╱ // 0x491 @0xc
0x0485…049b at000d = ╱4b╱K╱ // 0x492 @0xd
0x0485…049b at000e = ╱f0╱:╱ // 0x493 @0xe
0x0485…049b at000f = ╱50╱P╱ // 0x494 @0xf
0x0485…049b at0010 = ╱4f╱O╱ // 0x495 @0x10
0x0485…049b at0011 = ╱53╱S╱ // 0x496 @0x11
0x0485…049b at0012 = ╱54╱T╱ // 0x497 @0x12
0x0485…049b at0013 = ╱35╱5╱ // 0x498 @0x13
0x0485…049b at0014 = ╱ef╱$╱ // 0x499 @0x14
0x0485…049b at0015 = EOL // 0x49a @0x15
0x0485…049b }
0x049b…04a2 91f9 1260 NEXT K
0x049b…04a2 LineComalBin {
0x049b…04a2 ptr = 0x91f9 // 0x49b @0x0
0x049b…04a2 lno = 0x04ec // 0x49d @0x2
0x049b…04a2 at0004 = ╱84╱ NEXT ╱ // 0x49f @0x4
0x049b…04a2 at0005 = ╱4b╱K╱ // 0x4a0 @0x5
0x049b…04a2 at0006 = EOL // 0x4a1 @0x6
0x049b…04a2 }
0x04a2…04bc 9213 1270 EXEC FEJL(-LMNR,-K,FIL2$)
0x04a2…04bc LineComalBin {
0x04a2…04bc ptr = 0x9213 // 0x4a2 @0x0
0x04a2…04bc lno = 0x04f6 // 0x4a4 @0x2
0x04a2…04bc at0004 = ╱9d╱ EXEC ╱ // 0x4a6 @0x4
0x04a2…04bc at0005 = ╱46╱F╱ // 0x4a7 @0x5
0x04a2…04bc at0006 = ╱45╱E╱ // 0x4a8 @0x6
0x04a2…04bc at0007 = ╱4a╱J╱ // 0x4a9 @0x7
0x04a2…04bc at0008 = ╱4c╱L╱ // 0x4aa @0x8
0x04a2…04bc at0009 = ╱ed╱(╱ // 0x4ab @0x9
0x04a2…04bc at000a = ╱e9╱-╱ // 0x4ac @0xa
0x04a2…04bc at000b = ╱4c╱L╱ // 0x4ad @0xb
0x04a2…04bc at000c = ╱4d╱M╱ // 0x4ae @0xc
0x04a2…04bc at000d = ╱4e╱N╱ // 0x4af @0xd
0x04a2…04bc at000e = ╱52╱R╱ // 0x4b0 @0xe
0x04a2…04bc at000f = ╱ec╱,╱ // 0x4b1 @0xf
0x04a2…04bc at0010 = ╱e9╱-╱ // 0x4b2 @0x10
0x04a2…04bc at0011 = ╱4b╱K╱ // 0x4b3 @0x11
0x04a2…04bc at0012 = ╱ec╱,╱ // 0x4b4 @0x12
0x04a2…04bc at0013 = ╱46╱F╱ // 0x4b5 @0x13
0x04a2…04bc at0014 = ╱49╱I╱ // 0x4b6 @0x14
0x04a2…04bc at0015 = ╱4c╱L╱ // 0x4b7 @0x15
0x04a2…04bc at0016 = ╱32╱2╱ // 0x4b8 @0x16
0x04a2…04bc at0017 = ╱ef╱$╱ // 0x4b9 @0x17
0x04a2…04bc at0018 = ╱ee╱)╱ // 0x4ba @0x18
0x04a2…04bc at0019 = EOL // 0x4bb @0x19
0x04a2…04bc }
0x04bc…04c2 9219 1280 ENDPROC
0x04bc…04c2 LineComalBin {
0x04bc…04c2 ptr = 0x9219 // 0x4bc @0x0
0x04bc…04c2 lno = 0x0500 // 0x4be @0x2
0x04bc…04c2 at0004 = ╱9f╱ ENDPROC ╱ // 0x4c0 @0x4
0x04bc…04c2 at0005 = EOL // 0x4c1 @0x5
0x04bc…04c2 }
0x04c2…04ce 9225 1290 PROC INDTÆL
0x04c2…04ce LineComalBin {
0x04c2…04ce ptr = 0x9225 // 0x4c2 @0x0
0x04c2…04ce lno = 0x050a // 0x4c4 @0x2
0x04c2…04ce at0004 = ╱9e╱ PROC ╱ // 0x4c6 @0x4
0x04c2…04ce at0005 = ╱49╱I╱ // 0x4c7 @0x5
0x04c2…04ce at0006 = ╱4e╱N╱ // 0x4c8 @0x6
0x04c2…04ce at0007 = ╱44╱D╱ // 0x4c9 @0x7
0x04c2…04ce at0008 = ╱54╱T╱ // 0x4ca @0x8
0x04c2…04ce at0009 = ╱5b╱Æ╱ // 0x4cb @0x9
0x04c2…04ce at000a = ╱4c╱L╱ // 0x4cc @0xa
0x04c2…04ce at000b = EOL // 0x4cd @0xb
0x04c2…04ce }
0x04ce…04df 9236 1300 J=W*(LMNR-E)
0x04ce…04df LineComalBin {
0x04ce…04df ptr = 0x9236 // 0x4ce @0x0
0x04ce…04df lno = 0x0514 // 0x4d0 @0x2
0x04ce…04df at0004 = ╱4a╱J╱ // 0x4d2 @0x4
0x04ce…04df at0005 = ╱dc╱=╱ // 0x4d3 @0x5
0x04ce…04df at0006 = ╱57╱W╱ // 0x4d4 @0x6
0x04ce…04df at0007 = ╱e4╱*╱ // 0x4d5 @0x7
0x04ce…04df at0008 = ╱ed╱(╱ // 0x4d6 @0x8
0x04ce…04df at0009 = ╱4c╱L╱ // 0x4d7 @0x9
0x04ce…04df at000a = ╱4d╱M╱ // 0x4d8 @0xa
0x04ce…04df at000b = ╱4e╱N╱ // 0x4d9 @0xb
0x04ce…04df at000c = ╱52╱R╱ // 0x4da @0xc
0x04ce…04df at000d = ╱e3╱-╱ // 0x4db @0xd
0x04ce…04df at000e = ╱45╱E╱ // 0x4dc @0xe
0x04ce…04df at000f = ╱ee╱)╱ // 0x4dd @0xf
0x04ce…04df at0010 = EOL // 0x4de @0x10
0x04ce…04df }
0x04df…04ef 9246 1310 FOR K=4 TO W
0x04df…04ef LineComalBin {
0x04df…04ef ptr = 0x9246 // 0x4df @0x0
0x04df…04ef lno = 0x051e // 0x4e1 @0x2
0x04df…04ef at0004 = ╱83╱ FOR ╱ // 0x4e3 @0x4
0x04df…04ef at0005 = ╱4b╱K╱ // 0x4e4 @0x5
0x04df…04ef at0006 = ╱dc╱=╱ // 0x4e5 @0x6
0x04df…04ef at0007 = ╱34╱4╱ // 0x4e6 @0x7
0x04df…04ef at0008 = ╱fe00008003╱ // 0x4e7 @0x8
0x04df…04ef at000d = ╱b7╱ TO ╱ // 0x4ec @0xd
0x04df…04ef at000e = ╱57╱W╱ // 0x4ed @0xe
0x04df…04ef at000f = EOL // 0x4ee @0xf
0x04df…04ef }
0x04ef…0505 925c 1320 GET FIL2$,J+K:POST5$
0x04ef…0505 LineComalBin {
0x04ef…0505 ptr = 0x925c // 0x4ef @0x0
0x04ef…0505 lno = 0x0528 // 0x4f1 @0x2
0x04ef…0505 at0004 = ╱a9╱ GET ╱ // 0x4f3 @0x4
0x04ef…0505 at0005 = ╱46╱F╱ // 0x4f4 @0x5
0x04ef…0505 at0006 = ╱49╱I╱ // 0x4f5 @0x6
0x04ef…0505 at0007 = ╱4c╱L╱ // 0x4f6 @0x7
0x04ef…0505 at0008 = ╱32╱2╱ // 0x4f7 @0x8
0x04ef…0505 at0009 = ╱ef╱$╱ // 0x4f8 @0x9
0x04ef…0505 at000a = ╱ec╱,╱ // 0x4f9 @0xa
0x04ef…0505 at000b = ╱4a╱J╱ // 0x4fa @0xb
0x04ef…0505 at000c = ╱e2╱+╱ // 0x4fb @0xc
0x04ef…0505 at000d = ╱4b╱K╱ // 0x4fc @0xd
0x04ef…0505 at000e = ╱f0╱:╱ // 0x4fd @0xe
0x04ef…0505 at000f = ╱50╱P╱ // 0x4fe @0xf
0x04ef…0505 at0010 = ╱4f╱O╱ // 0x4ff @0x10
0x04ef…0505 at0011 = ╱53╱S╱ // 0x500 @0x11
0x04ef…0505 at0012 = ╱54╱T╱ // 0x501 @0x12
0x04ef…0505 at0013 = ╱35╱5╱ // 0x502 @0x13
0x04ef…0505 at0014 = ╱ef╱$╱ // 0x503 @0x14
0x04ef…0505 at0015 = EOL // 0x504 @0x15
0x04ef…0505 }
0x0505…0515 926c 1330 FOR I=E TO 5
0x0505…0515 LineComalBin {
0x0505…0515 ptr = 0x926c // 0x505 @0x0
0x0505…0515 lno = 0x0532 // 0x507 @0x2
0x0505…0515 at0004 = ╱83╱ FOR ╱ // 0x509 @0x4
0x0505…0515 at0005 = ╱49╱I╱ // 0x50a @0x5
0x0505…0515 at0006 = ╱dc╱=╱ // 0x50b @0x6
0x0505…0515 at0007 = ╱45╱E╱ // 0x50c @0x7
0x0505…0515 at0008 = ╱b7╱ TO ╱ // 0x50d @0x8
0x0505…0515 at0009 = ╱35╱5╱ // 0x50e @0x9
0x0505…0515 at000a = ╱fe0000a003╱ // 0x50f @0xa
0x0505…0515 at000f = EOL // 0x514 @0xf
0x0505…0515 }
0x0515…054d 92a4 1340 TV$((K-E)*5+I)=POST5$((I-E)*11+E:11)
0x0515…054d LineComalBin {
0x0515…054d ptr = 0x92a4 // 0x515 @0x0
0x0515…054d lno = 0x053c // 0x517 @0x2
0x0515…054d at0004 = ╱54╱T╱ // 0x519 @0x4
0x0515…054d at0005 = ╱56╱V╱ // 0x51a @0x5
0x0515…054d at0006 = ╱ef╱$╱ // 0x51b @0x6
0x0515…054d at0007 = ╱ed╱(╱ // 0x51c @0x7
0x0515…054d at0008 = ╱ed╱(╱ // 0x51d @0x8
0x0515…054d at0009 = ╱4b╱K╱ // 0x51e @0x9
0x0515…054d at000a = ╱e3╱-╱ // 0x51f @0xa
0x0515…054d at000b = ╱45╱E╱ // 0x520 @0xb
0x0515…054d at000c = ╱ee╱)╱ // 0x521 @0xc
0x0515…054d at000d = ╱e4╱*╱ // 0x522 @0xd
0x0515…054d at000e = ╱35╱5╱ // 0x523 @0xe
0x0515…054d at000f = ╱fe0000a003╱ // 0x524 @0xf
0x0515…054d at0014 = ╱e2╱+╱ // 0x529 @0x14
0x0515…054d at0015 = ╱49╱I╱ // 0x52a @0x15
0x0515…054d at0016 = ╱ee╱)╱ // 0x52b @0x16
0x0515…054d at0017 = ╱dc╱=╱ // 0x52c @0x17
0x0515…054d at0018 = ╱50╱P╱ // 0x52d @0x18
0x0515…054d at0019 = ╱4f╱O╱ // 0x52e @0x19
0x0515…054d at001a = ╱53╱S╱ // 0x52f @0x1a
0x0515…054d at001b = ╱54╱T╱ // 0x530 @0x1b
0x0515…054d at001c = ╱35╱5╱ // 0x531 @0x1c
0x0515…054d at001d = ╱ef╱$╱ // 0x532 @0x1d
0x0515…054d at001e = ╱ed╱(╱ // 0x533 @0x1e
0x0515…054d at001f = ╱ed╱(╱ // 0x534 @0x1f
0x0515…054d at0020 = ╱49╱I╱ // 0x535 @0x20
0x0515…054d at0021 = ╱e3╱-╱ // 0x536 @0x21
0x0515…054d at0022 = ╱45╱E╱ // 0x537 @0x22
0x0515…054d at0023 = ╱ee╱)╱ // 0x538 @0x23
0x0515…054d at0024 = ╱e4╱*╱ // 0x539 @0x24
0x0515…054d at0025 = ╱31╱1╱ // 0x53a @0x25
0x0515…054d at0026 = ╱31╱1╱ // 0x53b @0x26
0x0515…054d at0027 = ╱fe0000b004╱ // 0x53c @0x27
0x0515…054d at002c = ╱e2╱+╱ // 0x541 @0x2c
0x0515…054d at002d = ╱45╱E╱ // 0x542 @0x2d
0x0515…054d at002e = ╱f0╱:╱ // 0x543 @0x2e
0x0515…054d at002f = ╱31╱1╱ // 0x544 @0x2f
0x0515…054d at0030 = ╱31╱1╱ // 0x545 @0x30
0x0515…054d at0031 = ╱fe0000b004╱ // 0x546 @0x31
0x0515…054d at0036 = ╱ee╱)╱ // 0x54b @0x36
0x0515…054d at0037 = EOL // 0x54c @0x37
0x0515…054d }
0x054d…0554 92ab 1350 NEXT I
0x054d…0554 LineComalBin {
0x054d…0554 ptr = 0x92ab // 0x54d @0x0
0x054d…0554 lno = 0x0546 // 0x54f @0x2
0x054d…0554 at0004 = ╱84╱ NEXT ╱ // 0x551 @0x4
0x054d…0554 at0005 = ╱49╱I╱ // 0x552 @0x5
0x054d…0554 at0006 = EOL // 0x553 @0x6
0x054d…0554 }
0x0554…055b 92b2 1360 NEXT K
0x0554…055b LineComalBin {
0x0554…055b ptr = 0x92b2 // 0x554 @0x0
0x0554…055b lno = 0x0550 // 0x556 @0x2
0x0554…055b at0004 = ╱84╱ NEXT ╱ // 0x558 @0x4
0x0554…055b at0005 = ╱4b╱K╱ // 0x559 @0x5
0x0554…055b at0006 = EOL // 0x55a @0x6
0x0554…055b }
0x055b…0573 92ca 1370 EXEC FEJL(LMNR,K,FIL2$)
0x055b…0573 LineComalBin {
0x055b…0573 ptr = 0x92ca // 0x55b @0x0
0x055b…0573 lno = 0x055a // 0x55d @0x2
0x055b…0573 at0004 = ╱9d╱ EXEC ╱ // 0x55f @0x4
0x055b…0573 at0005 = ╱46╱F╱ // 0x560 @0x5
0x055b…0573 at0006 = ╱45╱E╱ // 0x561 @0x6
0x055b…0573 at0007 = ╱4a╱J╱ // 0x562 @0x7
0x055b…0573 at0008 = ╱4c╱L╱ // 0x563 @0x8
0x055b…0573 at0009 = ╱ed╱(╱ // 0x564 @0x9
0x055b…0573 at000a = ╱4c╱L╱ // 0x565 @0xa
0x055b…0573 at000b = ╱4d╱M╱ // 0x566 @0xb
0x055b…0573 at000c = ╱4e╱N╱ // 0x567 @0xc
0x055b…0573 at000d = ╱52╱R╱ // 0x568 @0xd
0x055b…0573 at000e = ╱ec╱,╱ // 0x569 @0xe
0x055b…0573 at000f = ╱4b╱K╱ // 0x56a @0xf
0x055b…0573 at0010 = ╱ec╱,╱ // 0x56b @0x10
0x055b…0573 at0011 = ╱46╱F╱ // 0x56c @0x11
0x055b…0573 at0012 = ╱49╱I╱ // 0x56d @0x12
0x055b…0573 at0013 = ╱4c╱L╱ // 0x56e @0x13
0x055b…0573 at0014 = ╱32╱2╱ // 0x56f @0x14
0x055b…0573 at0015 = ╱ef╱$╱ // 0x570 @0x15
0x055b…0573 at0016 = ╱ee╱)╱ // 0x571 @0x16
0x055b…0573 at0017 = EOL // 0x572 @0x17
0x055b…0573 }
0x0573…0579 92d0 1380 ENDPROC
0x0573…0579 LineComalBin {
0x0573…0579 ptr = 0x92d0 // 0x573 @0x0
0x0573…0579 lno = 0x0564 // 0x575 @0x2
0x0573…0579 at0004 = ╱9f╱ ENDPROC ╱ // 0x577 @0x4
0x0573…0579 at0005 = EOL // 0x578 @0x5
0x0573…0579 }
0x0579…0589 92e0 1390 PROC SKRIVHOVED
0x0579…0589 LineComalBin {
0x0579…0589 ptr = 0x92e0 // 0x579 @0x0
0x0579…0589 lno = 0x056e // 0x57b @0x2
0x0579…0589 at0004 = ╱9e╱ PROC ╱ // 0x57d @0x4
0x0579…0589 at0005 = ╱53╱S╱ // 0x57e @0x5
0x0579…0589 at0006 = ╱4b╱K╱ // 0x57f @0x6
0x0579…0589 at0007 = ╱52╱R╱ // 0x580 @0x7
0x0579…0589 at0008 = ╱49╱I╱ // 0x581 @0x8
0x0579…0589 at0009 = ╱56╱V╱ // 0x582 @0x9
0x0579…0589 at000a = ╱48╱H╱ // 0x583 @0xa
0x0579…0589 at000b = ╱4f╱O╱ // 0x584 @0xb
0x0579…0589 at000c = ╱56╱V╱ // 0x585 @0xc
0x0579…0589 at000d = ╱45╱E╱ // 0x586 @0xd
0x0579…0589 at000e = ╱44╱D╱ // 0x587 @0xe
0x0579…0589 at000f = EOL // 0x588 @0xf
0x0579…0589 }
0x0589…058f 92e6 1400 PRINT
0x0589…058f LineComalBin {
0x0589…058f ptr = 0x92e6 // 0x589 @0x0
0x0589…058f lno = 0x0578 // 0x58b @0x2
0x0589…058f at0004 = ╱92╱ PRINT ╱ // 0x58d @0x4
0x0589…058f at0005 = EOL // 0x58e @0x5
0x0589…058f }
0x058f…05a1 92f8 1410 SLJNR=SLJNR+E
0x058f…05a1 LineComalBin {
0x058f…05a1 ptr = 0x92f8 // 0x58f @0x0
0x058f…05a1 lno = 0x0582 // 0x591 @0x2
0x058f…05a1 at0004 = ╱53╱S╱ // 0x593 @0x4
0x058f…05a1 at0005 = ╱4c╱L╱ // 0x594 @0x5
0x058f…05a1 at0006 = ╱4a╱J╱ // 0x595 @0x6
0x058f…05a1 at0007 = ╱4e╱N╱ // 0x596 @0x7
0x058f…05a1 at0008 = ╱52╱R╱ // 0x597 @0x8
0x058f…05a1 at0009 = ╱dc╱=╱ // 0x598 @0x9
0x058f…05a1 at000a = ╱53╱S╱ // 0x599 @0xa
0x058f…05a1 at000b = ╱4c╱L╱ // 0x59a @0xb
0x058f…05a1 at000c = ╱4a╱J╱ // 0x59b @0xc
0x058f…05a1 at000d = ╱4e╱N╱ // 0x59c @0xd
0x058f…05a1 at000e = ╱52╱R╱ // 0x59d @0xe
0x058f…05a1 at000f = ╱e2╱+╱ // 0x59e @0xf
0x058f…05a1 at0010 = ╱45╱E╱ // 0x59f @0x10
0x058f…05a1 at0011 = EOL // 0x5a0 @0x11
0x058f…05a1 }
0x05a1…05bb 9312 1420 PRINT USING " SIDE ####":SLJNR;
0x05a1…05bb LineComalBin {
0x05a1…05bb ptr = 0x9312 // 0x5a1 @0x0
0x05a1…05bb lno = 0x058c // 0x5a3 @0x2
0x05a1…05bb at0004 = ╱92╱ PRINT ╱ // 0x5a5 @0x4
0x05a1…05bb at0005 = ╱b9╱ USING ╱ // 0x5a6 @0x5
0x05a1…05bb at0006 = ╱22╱"╱ // 0x5a7 @0x6
0x05a1…05bb at0007 = ╱20╱…╱ // 0x5a8 @0x7
0x05a1…05bb at0008 = ╱53╱S╱ // 0x5a9 @0x8
0x05a1…05bb at0009 = ╱49╱I╱ // 0x5aa @0x9
0x05a1…05bb at000a = ╱44╱D╱ // 0x5ab @0xa
0x05a1…05bb at000b = ╱45╱E╱ // 0x5ac @0xb
0x05a1…05bb at000c = ╱20╱…╱ // 0x5ad @0xc
0x05a1…05bb at000d = ╱23╱#╱ // 0x5ae @0xd
0x05a1…05bb at000e = ╱23╱#╱ // 0x5af @0xe
0x05a1…05bb at000f = ╱23╱#╱ // 0x5b0 @0xf
0x05a1…05bb at0010 = ╱23╱#╱ // 0x5b1 @0x10
0x05a1…05bb at0011 = ╱22╱"╱ // 0x5b2 @0x11
0x05a1…05bb at0012 = ╱f0╱:╱ // 0x5b3 @0x12
0x05a1…05bb at0013 = ╱53╱S╱ // 0x5b4 @0x13
0x05a1…05bb at0014 = ╱4c╱L╱ // 0x5b5 @0x14
0x05a1…05bb at0015 = ╱4a╱J╱ // 0x5b6 @0x15
0x05a1…05bb at0016 = ╱4e╱N╱ // 0x5b7 @0x16
0x05a1…05bb at0017 = ╱52╱R╱ // 0x5b8 @0x17
0x05a1…05bb at0018 = ╱eb╱;╱ // 0x5b9 @0x18
0x05a1…05bb at0019 = EOL // 0x5ba @0x19
0x05a1…05bb }
0x05bb…05dc 9333 1425 PRINT " UDSKRIFTSDATO ";DAD$;
0x05bb…05dc LineComalBin {
0x05bb…05dc ptr = 0x9333 // 0x5bb @0x0
0x05bb…05dc lno = 0x0591 // 0x5bd @0x2
0x05bb…05dc at0004 = ╱92╱ PRINT ╱ // 0x5bf @0x4
0x05bb…05dc at0005 = ╱22╱"╱ // 0x5c0 @0x5
0x05bb…05dc at0006 = ╱20╱…╱ // 0x5c1 @0x6
0x05bb…05dc at0007 = ╱20╱…╱ // 0x5c2 @0x7
0x05bb…05dc at0008 = ╱20╱…╱ // 0x5c3 @0x8
0x05bb…05dc at0009 = ╱20╱…╱ // 0x5c4 @0x9
0x05bb…05dc at000a = ╱20╱…╱ // 0x5c5 @0xa
0x05bb…05dc at000b = ╱55╱U╱ // 0x5c6 @0xb
0x05bb…05dc at000c = ╱44╱D╱ // 0x5c7 @0xc
0x05bb…05dc at000d = ╱53╱S╱ // 0x5c8 @0xd
0x05bb…05dc at000e = ╱4b╱K╱ // 0x5c9 @0xe
0x05bb…05dc at000f = ╱52╱R╱ // 0x5ca @0xf
0x05bb…05dc at0010 = ╱49╱I╱ // 0x5cb @0x10
0x05bb…05dc at0011 = ╱46╱F╱ // 0x5cc @0x11
0x05bb…05dc at0012 = ╱54╱T╱ // 0x5cd @0x12
0x05bb…05dc at0013 = ╱53╱S╱ // 0x5ce @0x13
0x05bb…05dc at0014 = ╱44╱D╱ // 0x5cf @0x14
0x05bb…05dc at0015 = ╱41╱A╱ // 0x5d0 @0x15
0x05bb…05dc at0016 = ╱54╱T╱ // 0x5d1 @0x16
0x05bb…05dc at0017 = ╱4f╱O╱ // 0x5d2 @0x17
0x05bb…05dc at0018 = ╱20╱…╱ // 0x5d3 @0x18
0x05bb…05dc at0019 = ╱22╱"╱ // 0x5d4 @0x19
0x05bb…05dc at001a = ╱eb╱;╱ // 0x5d5 @0x1a
0x05bb…05dc at001b = ╱44╱D╱ // 0x5d6 @0x1b
0x05bb…05dc at001c = ╱41╱A╱ // 0x5d7 @0x1c
0x05bb…05dc at001d = ╱44╱D╱ // 0x5d8 @0x1d
0x05bb…05dc at001e = ╱ef╱$╱ // 0x5d9 @0x1e
0x05bb…05dc at001f = ╱eb╱;╱ // 0x5da @0x1f
0x05bb…05dc at0020 = EOL // 0x5db @0x20
0x05bb…05dc }
0x05dc…0615 936c 1430 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$;
0x05dc…0615 LineComalBin {
0x05dc…0615 ptr = 0x936c // 0x5dc @0x0
0x05dc…0615 lno = 0x0596 // 0x5de @0x2
0x05dc…0615 at0004 = ╱92╱ PRINT ╱ // 0x5e0 @0x4
0x05dc…0615 at0005 = ╱d2╱TAB╱ // 0x5e1 @0x5
0x05dc…0615 at0006 = ╱ed╱(╱ // 0x5e2 @0x6
0x05dc…0615 at0007 = ╱34╱4╱ // 0x5e3 @0x7
0x05dc…0615 at0008 = ╱39╱9╱ // 0x5e4 @0x8
0x05dc…0615 at0009 = ╱fe0000c406╱ // 0x5e5 @0x9
0x05dc…0615 at000e = ╱ee╱)╱ // 0x5ea @0xe
0x05dc…0615 at000f = ╱eb╱;╱ // 0x5eb @0xf
0x05dc…0615 at0010 = ╱22╱"╱ // 0x5ec @0x10
0x05dc…0615 at0011 = ╱4c╱L╱ // 0x5ed @0x11
0x05dc…0615 at0012 = ╱5c╱Ø╱ // 0x5ee @0x12
0x05dc…0615 at0013 = ╱4e╱N╱ // 0x5ef @0x13
0x05dc…0615 at0014 = ╱50╱P╱ // 0x5f0 @0x14
0x05dc…0615 at0015 = ╱45╱E╱ // 0x5f1 @0x15
0x05dc…0615 at0016 = ╱52╱R╱ // 0x5f2 @0x16
0x05dc…0615 at0017 = ╱49╱I╱ // 0x5f3 @0x17
0x05dc…0615 at0018 = ╱4f╱O╱ // 0x5f4 @0x18
0x05dc…0615 at0019 = ╱44╱D╱ // 0x5f5 @0x19
0x05dc…0615 at001a = ╱45╱E╱ // 0x5f6 @0x1a
0x05dc…0615 at001b = ╱4e╱N╱ // 0x5f7 @0x1b
0x05dc…0615 at001c = ╱20╱…╱ // 0x5f8 @0x1c
0x05dc…0615 at001d = ╱22╱"╱ // 0x5f9 @0x1d
0x05dc…0615 at001e = ╱eb╱;╱ // 0x5fa @0x1e
0x05dc…0615 at001f = ╱53╱S╱ // 0x5fb @0x1f
0x05dc…0615 at0020 = ╱54╱T╱ // 0x5fc @0x20
0x05dc…0615 at0021 = ╱41╱A╱ // 0x5fd @0x21
0x05dc…0615 at0022 = ╱52╱R╱ // 0x5fe @0x22
0x05dc…0615 at0023 = ╱54╱T╱ // 0x5ff @0x23
0x05dc…0615 at0024 = ╱50╱P╱ // 0x600 @0x24
0x05dc…0615 at0025 = ╱45╱E╱ // 0x601 @0x25
0x05dc…0615 at0026 = ╱52╱R╱ // 0x602 @0x26
0x05dc…0615 at0027 = ╱ef╱$╱ // 0x603 @0x27
0x05dc…0615 at0028 = ╱eb╱;╱ // 0x604 @0x28
0x05dc…0615 at0029 = ╱22╱"╱ // 0x605 @0x29
0x05dc…0615 at002a = ╱20╱…╱ // 0x606 @0x2a
0x05dc…0615 at002b = ╱2f╱/╱ // 0x607 @0x2b
0x05dc…0615 at002c = ╱20╱…╱ // 0x608 @0x2c
0x05dc…0615 at002d = ╱22╱"╱ // 0x609 @0x2d
0x05dc…0615 at002e = ╱eb╱;╱ // 0x60a @0x2e
0x05dc…0615 at002f = ╱53╱S╱ // 0x60b @0x2f
0x05dc…0615 at0030 = ╱4c╱L╱ // 0x60c @0x30
0x05dc…0615 at0031 = ╱55╱U╱ // 0x60d @0x31
0x05dc…0615 at0032 = ╱54╱T╱ // 0x60e @0x32
0x05dc…0615 at0033 = ╱50╱P╱ // 0x60f @0x33
0x05dc…0615 at0034 = ╱45╱E╱ // 0x610 @0x34
0x05dc…0615 at0035 = ╱52╱R╱ // 0x611 @0x35
0x05dc…0615 at0036 = ╱ef╱$╱ // 0x612 @0x36
0x05dc…0615 at0037 = ╱eb╱;╱ // 0x613 @0x37
0x05dc…0615 at0038 = EOL // 0x614 @0x38
0x05dc…0615 }
0x0615…0626 937d 1440 LINIE=5
0x0615…0626 LineComalBin {
0x0615…0626 ptr = 0x937d // 0x615 @0x0
0x0615…0626 lno = 0x05a0 // 0x617 @0x2
0x0615…0626 at0004 = ╱4c╱L╱ // 0x619 @0x4
0x0615…0626 at0005 = ╱49╱I╱ // 0x61a @0x5
0x0615…0626 at0006 = ╱4e╱N╱ // 0x61b @0x6
0x0615…0626 at0007 = ╱49╱I╱ // 0x61c @0x7
0x0615…0626 at0008 = ╱45╱E╱ // 0x61d @0x8
0x0615…0626 at0009 = ╱dc╱=╱ // 0x61e @0x9
0x0615…0626 at000a = ╱35╱5╱ // 0x61f @0xa
0x0615…0626 at000b = ╱fe0000a003╱ // 0x620 @0xb
0x0615…0626 at0010 = EOL // 0x625 @0x10
0x0615…0626 }
0x0626…0643 939a 1450 PRINT TAB(35);"LØNJOURNAL"
0x0626…0643 LineComalBin {
0x0626…0643 ptr = 0x939a // 0x626 @0x0
0x0626…0643 lno = 0x05aa // 0x628 @0x2
0x0626…0643 at0004 = ╱92╱ PRINT ╱ // 0x62a @0x4
0x0626…0643 at0005 = ╱d2╱TAB╱ // 0x62b @0x5
0x0626…0643 at0006 = ╱ed╱(╱ // 0x62c @0x6
0x0626…0643 at0007 = ╱33╱3╱ // 0x62d @0x7
0x0626…0643 at0008 = ╱35╱5╱ // 0x62e @0x8
0x0626…0643 at0009 = ╱fe00008c06╱ // 0x62f @0x9
0x0626…0643 at000e = ╱ee╱)╱ // 0x634 @0xe
0x0626…0643 at000f = ╱eb╱;╱ // 0x635 @0xf
0x0626…0643 at0010 = ╱22╱"╱ // 0x636 @0x10
0x0626…0643 at0011 = ╱4c╱L╱ // 0x637 @0x11
0x0626…0643 at0012 = ╱5c╱Ø╱ // 0x638 @0x12
0x0626…0643 at0013 = ╱4e╱N╱ // 0x639 @0x13
0x0626…0643 at0014 = ╱4a╱J╱ // 0x63a @0x14
0x0626…0643 at0015 = ╱4f╱O╱ // 0x63b @0x15
0x0626…0643 at0016 = ╱55╱U╱ // 0x63c @0x16
0x0626…0643 at0017 = ╱52╱R╱ // 0x63d @0x17
0x0626…0643 at0018 = ╱4e╱N╱ // 0x63e @0x18
0x0626…0643 at0019 = ╱41╱A╱ // 0x63f @0x19
0x0626…0643 at001a = ╱4c╱L╱ // 0x640 @0x1a
0x0626…0643 at001b = ╱22╱"╱ // 0x641 @0x1b
0x0626…0643 at001c = EOL // 0x642 @0x1c
0x0626…0643 }
0x0643…0660 93b7 1460 PRINT TAB(35);"**********"
0x0643…0660 LineComalBin {
0x0643…0660 ptr = 0x93b7 // 0x643 @0x0
0x0643…0660 lno = 0x05b4 // 0x645 @0x2
0x0643…0660 at0004 = ╱92╱ PRINT ╱ // 0x647 @0x4
0x0643…0660 at0005 = ╱d2╱TAB╱ // 0x648 @0x5
0x0643…0660 at0006 = ╱ed╱(╱ // 0x649 @0x6
0x0643…0660 at0007 = ╱33╱3╱ // 0x64a @0x7
0x0643…0660 at0008 = ╱35╱5╱ // 0x64b @0x8
0x0643…0660 at0009 = ╱fe00008c06╱ // 0x64c @0x9
0x0643…0660 at000e = ╱ee╱)╱ // 0x651 @0xe
0x0643…0660 at000f = ╱eb╱;╱ // 0x652 @0xf
0x0643…0660 at0010 = ╱22╱"╱ // 0x653 @0x10
0x0643…0660 at0011 = ╱2a╱*╱ // 0x654 @0x11
0x0643…0660 at0012 = ╱2a╱*╱ // 0x655 @0x12
0x0643…0660 at0013 = ╱2a╱*╱ // 0x656 @0x13
0x0643…0660 at0014 = ╱2a╱*╱ // 0x657 @0x14
0x0643…0660 at0015 = ╱2a╱*╱ // 0x658 @0x15
0x0643…0660 at0016 = ╱2a╱*╱ // 0x659 @0x16
0x0643…0660 at0017 = ╱2a╱*╱ // 0x65a @0x17
0x0643…0660 at0018 = ╱2a╱*╱ // 0x65b @0x18
0x0643…0660 at0019 = ╱2a╱*╱ // 0x65c @0x19
0x0643…0660 at001a = ╱2a╱*╱ // 0x65d @0x1a
0x0643…0660 at001b = ╱22╱"╱ // 0x65e @0x1b
0x0643…0660 at001c = EOL // 0x65f @0x1c
0x0643…0660 }
0x0660…0666 93bd 1470 PRINT
0x0660…0666 LineComalBin {
0x0660…0666 ptr = 0x93bd // 0x660 @0x0
0x0660…0666 lno = 0x05be // 0x662 @0x2
0x0660…0666 at0004 = ╱92╱ PRINT ╱ // 0x664 @0x4
0x0660…0666 at0005 = EOL // 0x665 @0x5
0x0660…0666 }
0x0666…066c 93c3 1510 ENDPROC
0x0666…066c LineComalBin {
0x0666…066c ptr = 0x93c3 // 0x666 @0x0
0x0666…066c lno = 0x05e6 // 0x668 @0x2
0x0666…066c at0004 = ╱9f╱ ENDPROC ╱ // 0x66a @0x4
0x0666…066c at0005 = EOL // 0x66b @0x5
0x0666…066c }
0x066c…0679 93d0 1520 PROC INDVIRK
0x066c…0679 LineComalBin {
0x066c…0679 ptr = 0x93d0 // 0x66c @0x0
0x066c…0679 lno = 0x05f0 // 0x66e @0x2
0x066c…0679 at0004 = ╱9e╱ PROC ╱ // 0x670 @0x4
0x066c…0679 at0005 = ╱49╱I╱ // 0x671 @0x5
0x066c…0679 at0006 = ╱4e╱N╱ // 0x672 @0x6
0x066c…0679 at0007 = ╱44╱D╱ // 0x673 @0x7
0x066c…0679 at0008 = ╱56╱V╱ // 0x674 @0x8
0x066c…0679 at0009 = ╱49╱I╱ // 0x675 @0x9
0x066c…0679 at000a = ╱52╱R╱ // 0x676 @0xa
0x066c…0679 at000b = ╱4b╱K╱ // 0x677 @0xb
0x066c…0679 at000c = EOL // 0x678 @0xc
0x066c…0679 }
0x0679…0685 93dc 1530 OPEN FIL$,W
0x0679…0685 LineComalBin {
0x0679…0685 ptr = 0x93dc // 0x679 @0x0
0x0679…0685 lno = 0x05fa // 0x67b @0x2
0x0679…0685 at0004 = ╱a7╱ OPEN ╱ // 0x67d @0x4
0x0679…0685 at0005 = ╱46╱F╱ // 0x67e @0x5
0x0679…0685 at0006 = ╱49╱I╱ // 0x67f @0x6
0x0679…0685 at0007 = ╱4c╱L╱ // 0x680 @0x7
0x0679…0685 at0008 = ╱ef╱$╱ // 0x681 @0x8
0x0679…0685 at0009 = ╱ec╱,╱ // 0x682 @0x9
0x0679…0685 at000a = ╱57╱W╱ // 0x683 @0xa
0x0679…0685 at000b = EOL // 0x684 @0xb
0x0679…0685 }
0x0685…0699 93f0 1540 EXEC FEJL(B,B,FIL$)
0x0685…0699 LineComalBin {
0x0685…0699 ptr = 0x93f0 // 0x685 @0x0
0x0685…0699 lno = 0x0604 // 0x687 @0x2
0x0685…0699 at0004 = ╱9d╱ EXEC ╱ // 0x689 @0x4
0x0685…0699 at0005 = ╱46╱F╱ // 0x68a @0x5
0x0685…0699 at0006 = ╱45╱E╱ // 0x68b @0x6
0x0685…0699 at0007 = ╱4a╱J╱ // 0x68c @0x7
0x0685…0699 at0008 = ╱4c╱L╱ // 0x68d @0x8
0x0685…0699 at0009 = ╱ed╱(╱ // 0x68e @0x9
0x0685…0699 at000a = ╱42╱B╱ // 0x68f @0xa
0x0685…0699 at000b = ╱ec╱,╱ // 0x690 @0xb
0x0685…0699 at000c = ╱42╱B╱ // 0x691 @0xc
0x0685…0699 at000d = ╱ec╱,╱ // 0x692 @0xd
0x0685…0699 at000e = ╱46╱F╱ // 0x693 @0xe
0x0685…0699 at000f = ╱49╱I╱ // 0x694 @0xf
0x0685…0699 at0010 = ╱4c╱L╱ // 0x695 @0x10
0x0685…0699 at0011 = ╱ef╱$╱ // 0x696 @0x11
0x0685…0699 at0012 = ╱ee╱)╱ // 0x697 @0x12
0x0685…0699 at0013 = EOL // 0x698 @0x13
0x0685…0699 }
0x0699…06ac 9403 1550 GET FIL$,E:POST3$
0x0699…06ac LineComalBin {
0x0699…06ac ptr = 0x9403 // 0x699 @0x0
0x0699…06ac lno = 0x060e // 0x69b @0x2
0x0699…06ac at0004 = ╱a9╱ GET ╱ // 0x69d @0x4
0x0699…06ac at0005 = ╱46╱F╱ // 0x69e @0x5
0x0699…06ac at0006 = ╱49╱I╱ // 0x69f @0x6
0x0699…06ac at0007 = ╱4c╱L╱ // 0x6a0 @0x7
0x0699…06ac at0008 = ╱ef╱$╱ // 0x6a1 @0x8
0x0699…06ac at0009 = ╱ec╱,╱ // 0x6a2 @0x9
0x0699…06ac at000a = ╱45╱E╱ // 0x6a3 @0xa
0x0699…06ac at000b = ╱f0╱:╱ // 0x6a4 @0xb
0x0699…06ac at000c = ╱50╱P╱ // 0x6a5 @0xc
0x0699…06ac at000d = ╱4f╱O╱ // 0x6a6 @0xd
0x0699…06ac at000e = ╱53╱S╱ // 0x6a7 @0xe
0x0699…06ac at000f = ╱54╱T╱ // 0x6a8 @0xf
0x0699…06ac at0010 = ╱33╱3╱ // 0x6a9 @0x10
0x0699…06ac at0011 = ╱ef╱$╱ // 0x6aa @0x11
0x0699…06ac at0012 = EOL // 0x6ab @0x12
0x0699…06ac }
0x06ac…06d1 9428 1560 GET FIL$,G:POST4$,SLJNR,MLMNR,ATPLM
0x06ac…06d1 LineComalBin {
0x06ac…06d1 ptr = 0x9428 // 0x6ac @0x0
0x06ac…06d1 lno = 0x0618 // 0x6ae @0x2
0x06ac…06d1 at0004 = ╱a9╱ GET ╱ // 0x6b0 @0x4
0x06ac…06d1 at0005 = ╱46╱F╱ // 0x6b1 @0x5
0x06ac…06d1 at0006 = ╱49╱I╱ // 0x6b2 @0x6
0x06ac…06d1 at0007 = ╱4c╱L╱ // 0x6b3 @0x7
0x06ac…06d1 at0008 = ╱ef╱$╱ // 0x6b4 @0x8
0x06ac…06d1 at0009 = ╱ec╱,╱ // 0x6b5 @0x9
0x06ac…06d1 at000a = ╱47╱G╱ // 0x6b6 @0xa
0x06ac…06d1 at000b = ╱f0╱:╱ // 0x6b7 @0xb
0x06ac…06d1 at000c = ╱50╱P╱ // 0x6b8 @0xc
0x06ac…06d1 at000d = ╱4f╱O╱ // 0x6b9 @0xd
0x06ac…06d1 at000e = ╱53╱S╱ // 0x6ba @0xe
0x06ac…06d1 at000f = ╱54╱T╱ // 0x6bb @0xf
0x06ac…06d1 at0010 = ╱34╱4╱ // 0x6bc @0x10
0x06ac…06d1 at0011 = ╱ef╱$╱ // 0x6bd @0x11
0x06ac…06d1 at0012 = ╱ec╱,╱ // 0x6be @0x12
0x06ac…06d1 at0013 = ╱53╱S╱ // 0x6bf @0x13
0x06ac…06d1 at0014 = ╱4c╱L╱ // 0x6c0 @0x14
0x06ac…06d1 at0015 = ╱4a╱J╱ // 0x6c1 @0x15
0x06ac…06d1 at0016 = ╱4e╱N╱ // 0x6c2 @0x16
0x06ac…06d1 at0017 = ╱52╱R╱ // 0x6c3 @0x17
0x06ac…06d1 at0018 = ╱ec╱,╱ // 0x6c4 @0x18
0x06ac…06d1 at0019 = ╱4d╱M╱ // 0x6c5 @0x19
0x06ac…06d1 at001a = ╱4c╱L╱ // 0x6c6 @0x1a
0x06ac…06d1 at001b = ╱4d╱M╱ // 0x6c7 @0x1b
0x06ac…06d1 at001c = ╱4e╱N╱ // 0x6c8 @0x1c
0x06ac…06d1 at001d = ╱52╱R╱ // 0x6c9 @0x1d
0x06ac…06d1 at001e = ╱ec╱,╱ // 0x6ca @0x1e
0x06ac…06d1 at001f = ╱41╱A╱ // 0x6cb @0x1f
0x06ac…06d1 at0020 = ╱54╱T╱ // 0x6cc @0x20
0x06ac…06d1 at0021 = ╱50╱P╱ // 0x6cd @0x21
0x06ac…06d1 at0022 = ╱4c╱L╱ // 0x6ce @0x22
0x06ac…06d1 at0023 = ╱4d╱M╱ // 0x6cf @0x23
0x06ac…06d1 at0024 = EOL // 0x6d0 @0x24
0x06ac…06d1 }
0x06d1…06e2 9439 1565 GET FIL$,V:DAD$
0x06d1…06e2 LineComalBin {
0x06d1…06e2 ptr = 0x9439 // 0x6d1 @0x0
0x06d1…06e2 lno = 0x061d // 0x6d3 @0x2
0x06d1…06e2 at0004 = ╱a9╱ GET ╱ // 0x6d5 @0x4
0x06d1…06e2 at0005 = ╱46╱F╱ // 0x6d6 @0x5
0x06d1…06e2 at0006 = ╱49╱I╱ // 0x6d7 @0x6
0x06d1…06e2 at0007 = ╱4c╱L╱ // 0x6d8 @0x7
0x06d1…06e2 at0008 = ╱ef╱$╱ // 0x6d9 @0x8
0x06d1…06e2 at0009 = ╱ec╱,╱ // 0x6da @0x9
0x06d1…06e2 at000a = ╱56╱V╱ // 0x6db @0xa
0x06d1…06e2 at000b = ╱f0╱:╱ // 0x6dc @0xb
0x06d1…06e2 at000c = ╱44╱D╱ // 0x6dd @0xc
0x06d1…06e2 at000d = ╱41╱A╱ // 0x6de @0xd
0x06d1…06e2 at000e = ╱44╱D╱ // 0x6df @0xe
0x06d1…06e2 at000f = ╱ef╱$╱ // 0x6e0 @0xf
0x06d1…06e2 at0010 = EOL // 0x6e1 @0x10
0x06d1…06e2 }
0x06e2…06e8 943f 1570 ENDPROC
0x06e2…06e8 LineComalBin {
0x06e2…06e8 ptr = 0x943f // 0x6e2 @0x0
0x06e2…06e8 lno = 0x0622 // 0x6e4 @0x2
0x06e2…06e8 at0004 = ╱9f╱ ENDPROC ╱ // 0x6e6 @0x4
0x06e2…06e8 at0005 = EOL // 0x6e7 @0x5
0x06e2…06e8 }
0x06e8…06fc 9453 1580 PROC FEJL(P1,P2,P3)
0x06e8…06fc LineComalBin {
0x06e8…06fc ptr = 0x9453 // 0x6e8 @0x0
0x06e8…06fc lno = 0x062c // 0x6ea @0x2
0x06e8…06fc at0004 = ╱9e╱ PROC ╱ // 0x6ec @0x4
0x06e8…06fc at0005 = ╱46╱F╱ // 0x6ed @0x5
0x06e8…06fc at0006 = ╱45╱E╱ // 0x6ee @0x6
0x06e8…06fc at0007 = ╱4a╱J╱ // 0x6ef @0x7
0x06e8…06fc at0008 = ╱4c╱L╱ // 0x6f0 @0x8
0x06e8…06fc at0009 = ╱ed╱(╱ // 0x6f1 @0x9
0x06e8…06fc at000a = ╱50╱P╱ // 0x6f2 @0xa
0x06e8…06fc at000b = ╱31╱1╱ // 0x6f3 @0xb
0x06e8…06fc at000c = ╱ec╱,╱ // 0x6f4 @0xc
0x06e8…06fc at000d = ╱50╱P╱ // 0x6f5 @0xd
0x06e8…06fc at000e = ╱32╱2╱ // 0x6f6 @0xe
0x06e8…06fc at000f = ╱ec╱,╱ // 0x6f7 @0xf
0x06e8…06fc at0010 = ╱50╱P╱ // 0x6f8 @0x10
0x06e8…06fc at0011 = ╱33╱3╱ // 0x6f9 @0x11
0x06e8…06fc at0012 = ╱ee╱)╱ // 0x6fa @0x12
0x06e8…06fc at0013 = EOL // 0x6fb @0x13
0x06e8…06fc }
0x06fc…070b 9462 1590 IF STATUS(P3$)<>B THEN
0x06fc…070b LineComalBin {
0x06fc…070b ptr = 0x9462 // 0x6fc @0x0
0x06fc…070b lno = 0x0636 // 0x6fe @0x2
0x06fc…070b at0004 = ╱9c╱ IF ╱ // 0x700 @0x4
0x06fc…070b at0005 = ╱ce╱STATUS╱ // 0x701 @0x5
0x06fc…070b at0006 = ╱ed╱(╱ // 0x702 @0x6
0x06fc…070b at0007 = ╱50╱P╱ // 0x703 @0x7
0x06fc…070b at0008 = ╱33╱3╱ // 0x704 @0x8
0x06fc…070b at0009 = ╱ef╱$╱ // 0x705 @0x9
0x06fc…070b at000a = ╱ee╱)╱ // 0x706 @0xa
0x06fc…070b at000b = ╱e1╱<>╱ // 0x707 @0xb
0x06fc…070b at000c = ╱42╱B╱ // 0x708 @0xc
0x06fc…070b at000d = ╱b6╱ THEN ╱ // 0x709 @0xd
0x06fc…070b at000e = EOL // 0x70a @0xe
0x06fc…070b }
0x070b…0712 9469 1600 OUTPUT T
0x070b…0712 LineComalBin {
0x070b…0712 ptr = 0x9469 // 0x70b @0x0
0x070b…0712 lno = 0x0640 // 0x70d @0x2
0x070b…0712 at0004 = ╱a5╱ OUTPUT ╱ // 0x70f @0x4
0x070b…0712 at0005 = ╱54╱T╱ // 0x710 @0x5
0x070b…0712 at0006 = EOL // 0x711 @0x6
0x070b…0712 }
0x0712…0734 948b 1610 PRINT "FIL-FEJL ";P3$;STATUS(P3$),P1;P2
0x0712…0734 LineComalBin {
0x0712…0734 ptr = 0x948b // 0x712 @0x0
0x0712…0734 lno = 0x064a // 0x714 @0x2
0x0712…0734 at0004 = ╱92╱ PRINT ╱ // 0x716 @0x4
0x0712…0734 at0005 = ╱22╱"╱ // 0x717 @0x5
0x0712…0734 at0006 = ╱46╱F╱ // 0x718 @0x6
0x0712…0734 at0007 = ╱49╱I╱ // 0x719 @0x7
0x0712…0734 at0008 = ╱4c╱L╱ // 0x71a @0x8
0x0712…0734 at0009 = ╱2d╱-╱ // 0x71b @0x9
0x0712…0734 at000a = ╱46╱F╱ // 0x71c @0xa
0x0712…0734 at000b = ╱45╱E╱ // 0x71d @0xb
0x0712…0734 at000c = ╱4a╱J╱ // 0x71e @0xc
0x0712…0734 at000d = ╱4c╱L╱ // 0x71f @0xd
0x0712…0734 at000e = ╱20╱…╱ // 0x720 @0xe
0x0712…0734 at000f = ╱22╱"╱ // 0x721 @0xf
0x0712…0734 at0010 = ╱eb╱;╱ // 0x722 @0x10
0x0712…0734 at0011 = ╱50╱P╱ // 0x723 @0x11
0x0712…0734 at0012 = ╱33╱3╱ // 0x724 @0x12
0x0712…0734 at0013 = ╱ef╱$╱ // 0x725 @0x13
0x0712…0734 at0014 = ╱eb╱;╱ // 0x726 @0x14
0x0712…0734 at0015 = ╱ce╱STATUS╱ // 0x727 @0x15
0x0712…0734 at0016 = ╱ed╱(╱ // 0x728 @0x16
0x0712…0734 at0017 = ╱50╱P╱ // 0x729 @0x17
0x0712…0734 at0018 = ╱33╱3╱ // 0x72a @0x18
0x0712…0734 at0019 = ╱ef╱$╱ // 0x72b @0x19
0x0712…0734 at001a = ╱ee╱)╱ // 0x72c @0x1a
0x0712…0734 at001b = ╱ec╱,╱ // 0x72d @0x1b
0x0712…0734 at001c = ╱50╱P╱ // 0x72e @0x1c
0x0712…0734 at001d = ╱31╱1╱ // 0x72f @0x1d
0x0712…0734 at001e = ╱eb╱;╱ // 0x730 @0x1e
0x0712…0734 at001f = ╱50╱P╱ // 0x731 @0x1f
0x0712…0734 at0020 = ╱32╱2╱ // 0x732 @0x20
0x0712…0734 at0021 = EOL // 0x733 @0x21
0x0712…0734 }
0x0734…073a 9491 1620 STOP
0x0734…073a LineComalBin {
0x0734…073a ptr = 0x9491 // 0x734 @0x0
0x0734…073a lno = 0x0654 // 0x736 @0x2
0x0734…073a at0004 = ╱8d╱ STOP ╱ // 0x738 @0x4
0x0734…073a at0005 = EOL // 0x739 @0x5
0x0734…073a }
0x073a…0740 9497 1630 ENDIF
0x073a…0740 LineComalBin {
0x073a…0740 ptr = 0x9497 // 0x73a @0x0
0x073a…0740 lno = 0x065e // 0x73c @0x2
0x073a…0740 at0004 = ╱9b╱ ENDIF ╱ // 0x73e @0x4
0x073a…0740 at0005 = EOL // 0x73f @0x5
0x073a…0740 }
0x0740…0746 949d 1640 ENDPROC
0x0740…0746 LineComalBin {
0x0740…0746 ptr = 0x949d // 0x740 @0x0
0x0740…0746 lno = 0x0668 // 0x742 @0x2
0x0740…0746 at0004 = ╱9f╱ ENDPROC ╱ // 0x744 @0x4
0x0740…0746 at0005 = EOL // 0x745 @0x5
0x0740…0746 }
0x0746…075b 94b2 1650 FIL2$="P641220:"
0x0746…075b LineComalBin {
0x0746…075b ptr = 0x94b2 // 0x746 @0x0
0x0746…075b lno = 0x0672 // 0x748 @0x2
0x0746…075b at0004 = ╱46╱F╱ // 0x74a @0x4
0x0746…075b at0005 = ╱49╱I╱ // 0x74b @0x5
0x0746…075b at0006 = ╱4c╱L╱ // 0x74c @0x6
0x0746…075b at0007 = ╱32╱2╱ // 0x74d @0x7
0x0746…075b at0008 = ╱ef╱$╱ // 0x74e @0x8
0x0746…075b at0009 = ╱dc╱=╱ // 0x74f @0x9
0x0746…075b at000a = ╱22╱"╱ // 0x750 @0xa
0x0746…075b at000b = ╱50╱P╱ // 0x751 @0xb
0x0746…075b at000c = ╱36╱6╱ // 0x752 @0xc
0x0746…075b at000d = ╱34╱4╱ // 0x753 @0xd
0x0746…075b at000e = ╱31╱1╱ // 0x754 @0xe
0x0746…075b at000f = ╱32╱2╱ // 0x755 @0xf
0x0746…075b at0010 = ╱32╱2╱ // 0x756 @0x10
0x0746…075b at0011 = ╱30╱0╱ // 0x757 @0x11
0x0746…075b at0012 = ╱3a╱:╱ // 0x758 @0x12
0x0746…075b at0013 = ╱22╱"╱ // 0x759 @0x13
0x0746…075b at0014 = EOL // 0x75a @0x14
0x0746…075b }
0x075b…0775 94cc 1660 FIL$=FIL2$+"VIRKKART"
0x075b…0775 LineComalBin {
0x075b…0775 ptr = 0x94cc // 0x75b @0x0
0x075b…0775 lno = 0x067c // 0x75d @0x2
0x075b…0775 at0004 = ╱46╱F╱ // 0x75f @0x4
0x075b…0775 at0005 = ╱49╱I╱ // 0x760 @0x5
0x075b…0775 at0006 = ╱4c╱L╱ // 0x761 @0x6
0x075b…0775 at0007 = ╱ef╱$╱ // 0x762 @0x7
0x075b…0775 at0008 = ╱dc╱=╱ // 0x763 @0x8
0x075b…0775 at0009 = ╱46╱F╱ // 0x764 @0x9
0x075b…0775 at000a = ╱49╱I╱ // 0x765 @0xa
0x075b…0775 at000b = ╱4c╱L╱ // 0x766 @0xb
0x075b…0775 at000c = ╱32╱2╱ // 0x767 @0xc
0x075b…0775 at000d = ╱ef╱$╱ // 0x768 @0xd
0x075b…0775 at000e = ╱f1╱+╱ // 0x769 @0xe
0x075b…0775 at000f = ╱22╱"╱ // 0x76a @0xf
0x075b…0775 at0010 = ╱56╱V╱ // 0x76b @0x10
0x075b…0775 at0011 = ╱49╱I╱ // 0x76c @0x11
0x075b…0775 at0012 = ╱52╱R╱ // 0x76d @0x12
0x075b…0775 at0013 = ╱4b╱K╱ // 0x76e @0x13
0x075b…0775 at0014 = ╱4b╱K╱ // 0x76f @0x14
0x075b…0775 at0015 = ╱41╱A╱ // 0x770 @0x15
0x075b…0775 at0016 = ╱52╱R╱ // 0x771 @0x16
0x075b…0775 at0017 = ╱54╱T╱ // 0x772 @0x17
0x075b…0775 at0018 = ╱22╱"╱ // 0x773 @0x18
0x075b…0775 at0019 = EOL // 0x774 @0x19
0x075b…0775 }
0x0775…0782 94d9 1670 EXEC INDVIRK
0x0775…0782 LineComalBin {
0x0775…0782 ptr = 0x94d9 // 0x775 @0x0
0x0775…0782 lno = 0x0686 // 0x777 @0x2
0x0775…0782 at0004 = ╱9d╱ EXEC ╱ // 0x779 @0x4
0x0775…0782 at0005 = ╱49╱I╱ // 0x77a @0x5
0x0775…0782 at0006 = ╱4e╱N╱ // 0x77b @0x6
0x0775…0782 at0007 = ╱44╱D╱ // 0x77c @0x7
0x0775…0782 at0008 = ╱56╱V╱ // 0x77d @0x8
0x0775…0782 at0009 = ╱49╱I╱ // 0x77e @0x9
0x0775…0782 at000a = ╱52╱R╱ // 0x77f @0xa
0x0775…0782 at000b = ╱4b╱K╱ // 0x780 @0xb
0x0775…0782 at000c = EOL // 0x781 @0xc
0x0775…0782 }
0x0782…079d 94f4 1675 FIL1$=FIL2$+"LØNMODRG"
0x0782…079d LineComalBin {
0x0782…079d ptr = 0x94f4 // 0x782 @0x0
0x0782…079d lno = 0x068b // 0x784 @0x2
0x0782…079d at0004 = ╱46╱F╱ // 0x786 @0x4
0x0782…079d at0005 = ╱49╱I╱ // 0x787 @0x5
0x0782…079d at0006 = ╱4c╱L╱ // 0x788 @0x6
0x0782…079d at0007 = ╱31╱1╱ // 0x789 @0x7
0x0782…079d at0008 = ╱ef╱$╱ // 0x78a @0x8
0x0782…079d at0009 = ╱dc╱=╱ // 0x78b @0x9
0x0782…079d at000a = ╱46╱F╱ // 0x78c @0xa
0x0782…079d at000b = ╱49╱I╱ // 0x78d @0xb
0x0782…079d at000c = ╱4c╱L╱ // 0x78e @0xc
0x0782…079d at000d = ╱32╱2╱ // 0x78f @0xd
0x0782…079d at000e = ╱ef╱$╱ // 0x790 @0xe
0x0782…079d at000f = ╱f1╱+╱ // 0x791 @0xf
0x0782…079d at0010 = ╱22╱"╱ // 0x792 @0x10
0x0782…079d at0011 = ╱4c╱L╱ // 0x793 @0x11
0x0782…079d at0012 = ╱5c╱Ø╱ // 0x794 @0x12
0x0782…079d at0013 = ╱4e╱N╱ // 0x795 @0x13
0x0782…079d at0014 = ╱4d╱M╱ // 0x796 @0x14
0x0782…079d at0015 = ╱4f╱O╱ // 0x797 @0x15
0x0782…079d at0016 = ╱44╱D╱ // 0x798 @0x16
0x0782…079d at0017 = ╱52╱R╱ // 0x799 @0x17
0x0782…079d at0018 = ╱47╱G╱ // 0x79a @0x18
0x0782…079d at0019 = ╱22╱"╱ // 0x79b @0x19
0x0782…079d at001a = EOL // 0x79c @0x1a
0x0782…079d }
0x079d…07aa 9501 1680 OPEN FIL1$,R
0x079d…07aa LineComalBin {
0x079d…07aa ptr = 0x9501 // 0x79d @0x0
0x079d…07aa lno = 0x0690 // 0x79f @0x2
0x079d…07aa at0004 = ╱a7╱ OPEN ╱ // 0x7a1 @0x4
0x079d…07aa at0005 = ╱46╱F╱ // 0x7a2 @0x5
0x079d…07aa at0006 = ╱49╱I╱ // 0x7a3 @0x6
0x079d…07aa at0007 = ╱4c╱L╱ // 0x7a4 @0x7
0x079d…07aa at0008 = ╱31╱1╱ // 0x7a5 @0x8
0x079d…07aa at0009 = ╱ef╱$╱ // 0x7a6 @0x9
0x079d…07aa at000a = ╱ec╱,╱ // 0x7a7 @0xa
0x079d…07aa at000b = ╱52╱R╱ // 0x7a8 @0xb
0x079d…07aa at000c = EOL // 0x7a9 @0xc
0x079d…07aa }
0x07aa…07c5 951c 1690 FIL2$=FIL2$+"TÆLLEREG"
0x07aa…07c5 LineComalBin {
0x07aa…07c5 ptr = 0x951c // 0x7aa @0x0
0x07aa…07c5 lno = 0x069a // 0x7ac @0x2
0x07aa…07c5 at0004 = ╱46╱F╱ // 0x7ae @0x4
0x07aa…07c5 at0005 = ╱49╱I╱ // 0x7af @0x5
0x07aa…07c5 at0006 = ╱4c╱L╱ // 0x7b0 @0x6
0x07aa…07c5 at0007 = ╱32╱2╱ // 0x7b1 @0x7
0x07aa…07c5 at0008 = ╱ef╱$╱ // 0x7b2 @0x8
0x07aa…07c5 at0009 = ╱dc╱=╱ // 0x7b3 @0x9
0x07aa…07c5 at000a = ╱46╱F╱ // 0x7b4 @0xa
0x07aa…07c5 at000b = ╱49╱I╱ // 0x7b5 @0xb
0x07aa…07c5 at000c = ╱4c╱L╱ // 0x7b6 @0xc
0x07aa…07c5 at000d = ╱32╱2╱ // 0x7b7 @0xd
0x07aa…07c5 at000e = ╱ef╱$╱ // 0x7b8 @0xe
0x07aa…07c5 at000f = ╱f1╱+╱ // 0x7b9 @0xf
0x07aa…07c5 at0010 = ╱22╱"╱ // 0x7ba @0x10
0x07aa…07c5 at0011 = ╱54╱T╱ // 0x7bb @0x11
0x07aa…07c5 at0012 = ╱5b╱Æ╱ // 0x7bc @0x12
0x07aa…07c5 at0013 = ╱4c╱L╱ // 0x7bd @0x13
0x07aa…07c5 at0014 = ╱4c╱L╱ // 0x7be @0x14
0x07aa…07c5 at0015 = ╱45╱E╱ // 0x7bf @0x15
0x07aa…07c5 at0016 = ╱52╱R╱ // 0x7c0 @0x16
0x07aa…07c5 at0017 = ╱45╱E╱ // 0x7c1 @0x17
0x07aa…07c5 at0018 = ╱47╱G╱ // 0x7c2 @0x18
0x07aa…07c5 at0019 = ╱22╱"╱ // 0x7c3 @0x19
0x07aa…07c5 at001a = EOL // 0x7c4 @0x1a
0x07aa…07c5 }
0x07c5…07d2 9529 1700 OPEN FIL2$,W
0x07c5…07d2 LineComalBin {
0x07c5…07d2 ptr = 0x9529 // 0x7c5 @0x0
0x07c5…07d2 lno = 0x06a4 // 0x7c7 @0x2
0x07c5…07d2 at0004 = ╱a7╱ OPEN ╱ // 0x7c9 @0x4
0x07c5…07d2 at0005 = ╱46╱F╱ // 0x7ca @0x5
0x07c5…07d2 at0006 = ╱49╱I╱ // 0x7cb @0x6
0x07c5…07d2 at0007 = ╱4c╱L╱ // 0x7cc @0x7
0x07c5…07d2 at0008 = ╱32╱2╱ // 0x7cd @0x8
0x07c5…07d2 at0009 = ╱ef╱$╱ // 0x7ce @0x9
0x07c5…07d2 at000a = ╱ec╱,╱ // 0x7cf @0xa
0x07c5…07d2 at000b = ╱57╱W╱ // 0x7d0 @0xb
0x07c5…07d2 at000c = EOL // 0x7d1 @0xc
0x07c5…07d2 }
0x07d2…07ed (26,) 9544 1710 MF1$="P641210:LØNJOUR"
0x07d2…07ed LineComalBin {
0x07d2…07ed ptr = 0x9544 // 0x7d2 @0x0
0x07d2…07ed lno = 0x06ae // 0x7d4 @0x2
0x07d2…07ed at0004 = ╱4d╱M╱ // 0x7d6 @0x4
0x07d2…07ed at0005 = ╱46╱F╱ // 0x7d7 @0x5
0x07d2…07ed at0006 = ╱31╱1╱ // 0x7d8 @0x6
0x07d2…07ed at0007 = ╱ef╱$╱ // 0x7d9 @0x7
0x07d2…07ed at0008 = ╱dc╱=╱ // 0x7da @0x8
0x07d2…07ed at0009 = ╱22╱"╱ // 0x7db @0x9
0x07d2…07ed at000a = ╱50╱P╱ // 0x7dc @0xa
0x07d2…07ed at000b = ╱36╱6╱ // 0x7dd @0xb
0x07d2…07ed at000c = ╱34╱4╱ // 0x7de @0xc
0x07d2…07ed at000d = ╱31╱1╱ // 0x7df @0xd
0x07d2…07ed at000e = ╱32╱2╱ // 0x7e0 @0xe
0x07d2…07ed at000f = ╱31╱1╱ // 0x7e1 @0xf
0x07d2…07ed at0010 = ╱30╱0╱ // 0x7e2 @0x10
0x07d2…07ed at0011 = ╱3a╱:╱ // 0x7e3 @0x11
0x07d2…07ed at0012 = ╱4c╱L╱ // 0x7e4 @0x12
0x07d2…07ed at0013 = ╱5c╱Ø╱ // 0x7e5 @0x13
0x07d2…07ed at0014 = ╱4e╱N╱ // 0x7e6 @0x14
0x07d2…07ed at0015 = ╱4a╱J╱ // 0x7e7 @0x15
0x07d2…07ed at0016 = ╱4f╱O╱ // 0x7e8 @0x16
0x07d2…07ed at0017 = ╱55╱U╱ // 0x7e9 @0x17
0x07d2…07ed at0018 = ╱52╱R╱ // 0x7ea @0x18
0x07d2…07ed at0019 = ╱22╱"╱ // 0x7eb @0x19
0x07d2…07ed at001a = EOL // 0x7ec @0x1a
0x07d2…07ed }
0x07ed…07f9 9550 1720 OPEN MF1$,R
0x07ed…07f9 LineComalBin {
0x07ed…07f9 ptr = 0x9550 // 0x7ed @0x0
0x07ed…07f9 lno = 0x06b8 // 0x7ef @0x2
0x07ed…07f9 at0004 = ╱a7╱ OPEN ╱ // 0x7f1 @0x4
0x07ed…07f9 at0005 = ╱4d╱M╱ // 0x7f2 @0x5
0x07ed…07f9 at0006 = ╱46╱F╱ // 0x7f3 @0x6
0x07ed…07f9 at0007 = ╱31╱1╱ // 0x7f4 @0x7
0x07ed…07f9 at0008 = ╱ef╱$╱ // 0x7f5 @0x8
0x07ed…07f9 at0009 = ╱ec╱,╱ // 0x7f6 @0x9
0x07ed…07f9 at000a = ╱52╱R╱ // 0x7f7 @0xa
0x07ed…07f9 at000b = EOL // 0x7f8 @0xb
0x07ed…07f9 }
0x07f9…080c 9563 1730 MAXLIN=72
0x07f9…080c LineComalBin {
0x07f9…080c ptr = 0x9563 // 0x7f9 @0x0
0x07f9…080c lno = 0x06c2 // 0x7fb @0x2
0x07f9…080c at0004 = ╱4d╱M╱ // 0x7fd @0x4
0x07f9…080c at0005 = ╱41╱A╱ // 0x7fe @0x5
0x07f9…080c at0006 = ╱58╱X╱ // 0x7ff @0x6
0x07f9…080c at0007 = ╱4c╱L╱ // 0x800 @0x7
0x07f9…080c at0008 = ╱49╱I╱ // 0x801 @0x8
0x07f9…080c at0009 = ╱4e╱N╱ // 0x802 @0x9
0x07f9…080c at000a = ╱dc╱=╱ // 0x803 @0xa
0x07f9…080c at000b = ╱37╱7╱ // 0x804 @0xb
0x07f9…080c at000c = ╱32╱2╱ // 0x805 @0xc
0x07f9…080c at000d = ╱fe00009007╱ // 0x806 @0xd
0x07f9…080c at0012 = EOL // 0x80b @0x12
0x07f9…080c }
0x080c…0817 956e 1740 L$=BL$
0x080c…0817 LineComalBin {
0x080c…0817 ptr = 0x956e // 0x80c @0x0
0x080c…0817 lno = 0x06cc // 0x80e @0x2
0x080c…0817 at0004 = ╱4c╱L╱ // 0x810 @0x4
0x080c…0817 at0005 = ╱ef╱$╱ // 0x811 @0x5
0x080c…0817 at0006 = ╱dc╱=╱ // 0x812 @0x6
0x080c…0817 at0007 = ╱42╱B╱ // 0x813 @0x7
0x080c…0817 at0008 = ╱4c╱L╱ // 0x814 @0x8
0x080c…0817 at0009 = ╱ef╱$╱ // 0x815 @0x9
0x080c…0817 at000a = EOL // 0x816 @0xa
0x080c…0817 }
0x0817…0826 957d 1745 CURSOR E,11
0x0817…0826 LineComalBin {
0x0817…0826 ptr = 0x957d // 0x817 @0x0
0x0817…0826 lno = 0x06d1 // 0x819 @0x2
0x0817…0826 at0004 = ╱a1╱ CURSOR ╱ // 0x81b @0x4
0x0817…0826 at0005 = ╱45╱E╱ // 0x81c @0x5
0x0817…0826 at0006 = ╱ec╱,╱ // 0x81d @0x6
0x0817…0826 at0007 = ╱31╱1╱ // 0x81e @0x7
0x0817…0826 at0008 = ╱31╱1╱ // 0x81f @0x8
0x0817…0826 at0009 = ╱fe0000b004╱ // 0x820 @0x9
0x0817…0826 at000e = EOL // 0x825 @0xe
0x0817…0826 }
0x0826…0850 95a7 1750 GET MF1$:STARTPER$,SLUTPER$,LP$,ORK$,MFD
0x0826…0850 LineComalBin {
0x0826…0850 ptr = 0x95a7 // 0x826 @0x0
0x0826…0850 lno = 0x06d6 // 0x828 @0x2
0x0826…0850 at0004 = ╱a9╱ GET ╱ // 0x82a @0x4
0x0826…0850 at0005 = ╱4d╱M╱ // 0x82b @0x5
0x0826…0850 at0006 = ╱46╱F╱ // 0x82c @0x6
0x0826…0850 at0007 = ╱31╱1╱ // 0x82d @0x7
0x0826…0850 at0008 = ╱ef╱$╱ // 0x82e @0x8
0x0826…0850 at0009 = ╱f0╱:╱ // 0x82f @0x9
0x0826…0850 at000a = ╱53╱S╱ // 0x830 @0xa
0x0826…0850 at000b = ╱54╱T╱ // 0x831 @0xb
0x0826…0850 at000c = ╱41╱A╱ // 0x832 @0xc
0x0826…0850 at000d = ╱52╱R╱ // 0x833 @0xd
0x0826…0850 at000e = ╱54╱T╱ // 0x834 @0xe
0x0826…0850 at000f = ╱50╱P╱ // 0x835 @0xf
0x0826…0850 at0010 = ╱45╱E╱ // 0x836 @0x10
0x0826…0850 at0011 = ╱52╱R╱ // 0x837 @0x11
0x0826…0850 at0012 = ╱ef╱$╱ // 0x838 @0x12
0x0826…0850 at0013 = ╱ec╱,╱ // 0x839 @0x13
0x0826…0850 at0014 = ╱53╱S╱ // 0x83a @0x14
0x0826…0850 at0015 = ╱4c╱L╱ // 0x83b @0x15
0x0826…0850 at0016 = ╱55╱U╱ // 0x83c @0x16
0x0826…0850 at0017 = ╱54╱T╱ // 0x83d @0x17
0x0826…0850 at0018 = ╱50╱P╱ // 0x83e @0x18
0x0826…0850 at0019 = ╱45╱E╱ // 0x83f @0x19
0x0826…0850 at001a = ╱52╱R╱ // 0x840 @0x1a
0x0826…0850 at001b = ╱ef╱$╱ // 0x841 @0x1b
0x0826…0850 at001c = ╱ec╱,╱ // 0x842 @0x1c
0x0826…0850 at001d = ╱4c╱L╱ // 0x843 @0x1d
0x0826…0850 at001e = ╱50╱P╱ // 0x844 @0x1e
0x0826…0850 at001f = ╱ef╱$╱ // 0x845 @0x1f
0x0826…0850 at0020 = ╱ec╱,╱ // 0x846 @0x20
0x0826…0850 at0021 = ╱4f╱O╱ // 0x847 @0x21
0x0826…0850 at0022 = ╱52╱R╱ // 0x848 @0x22
0x0826…0850 at0023 = ╱4b╱K╱ // 0x849 @0x23
0x0826…0850 at0024 = ╱ef╱$╱ // 0x84a @0x24
0x0826…0850 at0025 = ╱ec╱,╱ // 0x84b @0x25
0x0826…0850 at0026 = ╱4d╱M╱ // 0x84c @0x26
0x0826…0850 at0027 = ╱46╱F╱ // 0x84d @0x27
0x0826…0850 at0028 = ╱44╱D╱ // 0x84e @0x28
0x0826…0850 at0029 = EOL // 0x84f @0x29
0x0826…0850 }
0x0850…0857 95ae 1760 OUTPUT P
0x0850…0857 LineComalBin {
0x0850…0857 ptr = 0x95ae // 0x850 @0x0
0x0850…0857 lno = 0x06e0 // 0x852 @0x2
0x0850…0857 at0004 = ╱a5╱ OUTPUT ╱ // 0x854 @0x4
0x0850…0857 at0005 = ╱50╱P╱ // 0x855 @0x5
0x0850…0857 at0006 = EOL // 0x856 @0x6
0x0850…0857 }
0x0857…0862 95b9 1770 FOR I=E TO W
0x0857…0862 LineComalBin {
0x0857…0862 ptr = 0x95b9 // 0x857 @0x0
0x0857…0862 lno = 0x06ea // 0x859 @0x2
0x0857…0862 at0004 = ╱83╱ FOR ╱ // 0x85b @0x4
0x0857…0862 at0005 = ╱49╱I╱ // 0x85c @0x5
0x0857…0862 at0006 = ╱dc╱=╱ // 0x85d @0x6
0x0857…0862 at0007 = ╱45╱E╱ // 0x85e @0x7
0x0857…0862 at0008 = ╱b7╱ TO ╱ // 0x85f @0x8
0x0857…0862 at0009 = ╱57╱W╱ // 0x860 @0x9
0x0857…0862 at000a = EOL // 0x861 @0xa
0x0857…0862 }
0x0862…0875 95cc 1780 TOTAL$(I)=TAH$
0x0862…0875 LineComalBin {
0x0862…0875 ptr = 0x95cc // 0x862 @0x0
0x0862…0875 lno = 0x06f4 // 0x864 @0x2
0x0862…0875 at0004 = ╱54╱T╱ // 0x866 @0x4
0x0862…0875 at0005 = ╱4f╱O╱ // 0x867 @0x5
0x0862…0875 at0006 = ╱54╱T╱ // 0x868 @0x6
0x0862…0875 at0007 = ╱41╱A╱ // 0x869 @0x7
0x0862…0875 at0008 = ╱4c╱L╱ // 0x86a @0x8
0x0862…0875 at0009 = ╱ef╱$╱ // 0x86b @0x9
0x0862…0875 at000a = ╱ed╱(╱ // 0x86c @0xa
0x0862…0875 at000b = ╱49╱I╱ // 0x86d @0xb
0x0862…0875 at000c = ╱ee╱)╱ // 0x86e @0xc
0x0862…0875 at000d = ╱dc╱=╱ // 0x86f @0xd
0x0862…0875 at000e = ╱54╱T╱ // 0x870 @0xe
0x0862…0875 at000f = ╱41╱A╱ // 0x871 @0xf
0x0862…0875 at0010 = ╱48╱H╱ // 0x872 @0x10
0x0862…0875 at0011 = ╱ef╱$╱ // 0x873 @0x11
0x0862…0875 at0012 = EOL // 0x874 @0x12
0x0862…0875 }
0x0875…087c 95d3 1790 NEXT I
0x0875…087c LineComalBin {
0x0875…087c ptr = 0x95d3 // 0x875 @0x0
0x0875…087c lno = 0x06fe // 0x877 @0x2
0x0875…087c at0004 = ╱84╱ NEXT ╱ // 0x879 @0x4
0x0875…087c at0005 = ╱49╱I╱ // 0x87a @0x5
0x0875…087c at0006 = EOL // 0x87b @0x6
0x0875…087c }
0x087c…088c 95e3 1800 EXEC SKRIVHOVED
0x087c…088c LineComalBin {
0x087c…088c ptr = 0x95e3 // 0x87c @0x0
0x087c…088c lno = 0x0708 // 0x87e @0x2
0x087c…088c at0004 = ╱9d╱ EXEC ╱ // 0x880 @0x4
0x087c…088c at0005 = ╱53╱S╱ // 0x881 @0x5
0x087c…088c at0006 = ╱4b╱K╱ // 0x882 @0x6
0x087c…088c at0007 = ╱52╱R╱ // 0x883 @0x7
0x087c…088c at0008 = ╱49╱I╱ // 0x884 @0x8
0x087c…088c at0009 = ╱56╱V╱ // 0x885 @0x9
0x087c…088c at000a = ╱48╱H╱ // 0x886 @0xa
0x087c…088c at000b = ╱4f╱O╱ // 0x887 @0xb
0x087c…088c at000c = ╱56╱V╱ // 0x888 @0xc
0x087c…088c at000d = ╱45╱E╱ // 0x889 @0xd
0x087c…088c at000e = ╱44╱D╱ // 0x88a @0xe
0x087c…088c at000f = EOL // 0x88b @0xf
0x087c…088c }
0x088c…0897 95ee 2820 LMNR=B
0x088c…0897 LineComalBin {
0x088c…0897 ptr = 0x95ee // 0x88c @0x0
0x088c…0897 lno = 0x0b04 // 0x88e @0x2
0x088c…0897 at0004 = ╱4c╱L╱ // 0x890 @0x4
0x088c…0897 at0005 = ╱4d╱M╱ // 0x891 @0x5
0x088c…0897 at0006 = ╱4e╱N╱ // 0x892 @0x6
0x088c…0897 at0007 = ╱52╱R╱ // 0x893 @0x7
0x088c…0897 at0008 = ╱dc╱=╱ // 0x894 @0x8
0x088c…0897 at0009 = ╱42╱B╱ // 0x895 @0x9
0x088c…0897 at000a = EOL // 0x896 @0xa
0x088c…0897 }
0x0897…08c1 9618 2825 PRINT " Rettelse i særlige årstælleværker"
0x0897…08c1 LineComalBin {
0x0897…08c1 ptr = 0x9618 // 0x897 @0x0
0x0897…08c1 lno = 0x0b09 // 0x899 @0x2
0x0897…08c1 at0004 = ╱92╱ PRINT ╱ // 0x89b @0x4
0x0897…08c1 at0005 = ╱22╱"╱ // 0x89c @0x5
0x0897…08c1 at0006 = ╱20╱…╱ // 0x89d @0x6
0x0897…08c1 at0007 = ╱52╱R╱ // 0x89e @0x7
0x0897…08c1 at0008 = ╱65╱e╱ // 0x89f @0x8
0x0897…08c1 at0009 = ╱74╱t╱ // 0x8a0 @0x9
0x0897…08c1 at000a = ╱74╱t╱ // 0x8a1 @0xa
0x0897…08c1 at000b = ╱65╱e╱ // 0x8a2 @0xb
0x0897…08c1 at000c = ╱6c╱l╱ // 0x8a3 @0xc
0x0897…08c1 at000d = ╱73╱s╱ // 0x8a4 @0xd
0x0897…08c1 at000e = ╱65╱e╱ // 0x8a5 @0xe
0x0897…08c1 at000f = ╱20╱…╱ // 0x8a6 @0xf
0x0897…08c1 at0010 = ╱69╱i╱ // 0x8a7 @0x10
0x0897…08c1 at0011 = ╱20╱…╱ // 0x8a8 @0x11
0x0897…08c1 at0012 = ╱73╱s╱ // 0x8a9 @0x12
0x0897…08c1 at0013 = ╱7b╱æ╱ // 0x8aa @0x13
0x0897…08c1 at0014 = ╱72╱r╱ // 0x8ab @0x14
0x0897…08c1 at0015 = ╱6c╱l╱ // 0x8ac @0x15
0x0897…08c1 at0016 = ╱69╱i╱ // 0x8ad @0x16
0x0897…08c1 at0017 = ╱67╱g╱ // 0x8ae @0x17
0x0897…08c1 at0018 = ╱65╱e╱ // 0x8af @0x18
0x0897…08c1 at0019 = ╱20╱…╱ // 0x8b0 @0x19
0x0897…08c1 at001a = ╱7d╱å╱ // 0x8b1 @0x1a
0x0897…08c1 at001b = ╱72╱r╱ // 0x8b2 @0x1b
0x0897…08c1 at001c = ╱73╱s╱ // 0x8b3 @0x1c
0x0897…08c1 at001d = ╱74╱t╱ // 0x8b4 @0x1d
0x0897…08c1 at001e = ╱7b╱æ╱ // 0x8b5 @0x1e
0x0897…08c1 at001f = ╱6c╱l╱ // 0x8b6 @0x1f
0x0897…08c1 at0020 = ╱6c╱l╱ // 0x8b7 @0x20
0x0897…08c1 at0021 = ╱65╱e╱ // 0x8b8 @0x21
0x0897…08c1 at0022 = ╱76╱v╱ // 0x8b9 @0x22
0x0897…08c1 at0023 = ╱7b╱æ╱ // 0x8ba @0x23
0x0897…08c1 at0024 = ╱72╱r╱ // 0x8bb @0x24
0x0897…08c1 at0025 = ╱6b╱k╱ // 0x8bc @0x25
0x0897…08c1 at0026 = ╱65╱e╱ // 0x8bd @0x26
0x0897…08c1 at0027 = ╱72╱r╱ // 0x8be @0x27
0x0897…08c1 at0028 = ╱22╱"╱ // 0x8bf @0x28
0x0897…08c1 at0029 = EOL // 0x8c0 @0x29
0x0897…08c1 }
0x08c1…090a 9661 2830 PRINT " Lønnr";TAB(14);"Trækpligtig A-indk Trækfri A-indk";TAB(57);
0x08c1…090a LineComalBin {
0x08c1…090a ptr = 0x9661 // 0x8c1 @0x0
0x08c1…090a lno = 0x0b0e // 0x8c3 @0x2
0x08c1…090a at0004 = ╱92╱ PRINT ╱ // 0x8c5 @0x4
0x08c1…090a at0005 = ╱22╱"╱ // 0x8c6 @0x5
0x08c1…090a at0006 = ╱20╱…╱ // 0x8c7 @0x6
0x08c1…090a at0007 = ╱4c╱L╱ // 0x8c8 @0x7
0x08c1…090a at0008 = ╱7c╱ø╱ // 0x8c9 @0x8
0x08c1…090a at0009 = ╱6e╱n╱ // 0x8ca @0x9
0x08c1…090a at000a = ╱6e╱n╱ // 0x8cb @0xa
0x08c1…090a at000b = ╱72╱r╱ // 0x8cc @0xb
0x08c1…090a at000c = ╱22╱"╱ // 0x8cd @0xc
0x08c1…090a at000d = ╱eb╱;╱ // 0x8ce @0xd
0x08c1…090a at000e = ╱d2╱TAB╱ // 0x8cf @0xe
0x08c1…090a at000f = ╱ed╱(╱ // 0x8d0 @0xf
0x08c1…090a at0010 = ╱31╱1╱ // 0x8d1 @0x10
0x08c1…090a at0011 = ╱34╱4╱ // 0x8d2 @0x11
0x08c1…090a at0012 = ╱fe0000e004╱ // 0x8d3 @0x12
0x08c1…090a at0017 = ╱ee╱)╱ // 0x8d8 @0x17
0x08c1…090a at0018 = ╱eb╱;╱ // 0x8d9 @0x18
0x08c1…090a at0019 = ╱22╱"╱ // 0x8da @0x19
0x08c1…090a at001a = ╱54╱T╱ // 0x8db @0x1a
0x08c1…090a at001b = ╱72╱r╱ // 0x8dc @0x1b
0x08c1…090a at001c = ╱7b╱æ╱ // 0x8dd @0x1c
0x08c1…090a at001d = ╱6b╱k╱ // 0x8de @0x1d
0x08c1…090a at001e = ╱70╱p╱ // 0x8df @0x1e
0x08c1…090a at001f = ╱6c╱l╱ // 0x8e0 @0x1f
0x08c1…090a at0020 = ╱69╱i╱ // 0x8e1 @0x20
0x08c1…090a at0021 = ╱67╱g╱ // 0x8e2 @0x21
0x08c1…090a at0022 = ╱74╱t╱ // 0x8e3 @0x22
0x08c1…090a at0023 = ╱69╱i╱ // 0x8e4 @0x23
0x08c1…090a at0024 = ╱67╱g╱ // 0x8e5 @0x24
0x08c1…090a at0025 = ╱20╱…╱ // 0x8e6 @0x25
0x08c1…090a at0026 = ╱41╱A╱ // 0x8e7 @0x26
0x08c1…090a at0027 = ╱2d╱-╱ // 0x8e8 @0x27
0x08c1…090a at0028 = ╱69╱i╱ // 0x8e9 @0x28
0x08c1…090a at0029 = ╱6e╱n╱ // 0x8ea @0x29
0x08c1…090a at002a = ╱64╱d╱ // 0x8eb @0x2a
0x08c1…090a at002b = ╱6b╱k╱ // 0x8ec @0x2b
0x08c1…090a at002c = ╱20╱…╱ // 0x8ed @0x2c
0x08c1…090a at002d = ╱54╱T╱ // 0x8ee @0x2d
0x08c1…090a at002e = ╱72╱r╱ // 0x8ef @0x2e
0x08c1…090a at002f = ╱7b╱æ╱ // 0x8f0 @0x2f
0x08c1…090a at0030 = ╱6b╱k╱ // 0x8f1 @0x30
0x08c1…090a at0031 = ╱66╱f╱ // 0x8f2 @0x31
0x08c1…090a at0032 = ╱72╱r╱ // 0x8f3 @0x32
0x08c1…090a at0033 = ╱69╱i╱ // 0x8f4 @0x33
0x08c1…090a at0034 = ╱20╱…╱ // 0x8f5 @0x34
0x08c1…090a at0035 = ╱41╱A╱ // 0x8f6 @0x35
0x08c1…090a at0036 = ╱2d╱-╱ // 0x8f7 @0x36
0x08c1…090a at0037 = ╱69╱i╱ // 0x8f8 @0x37
0x08c1…090a at0038 = ╱6e╱n╱ // 0x8f9 @0x38
0x08c1…090a at0039 = ╱64╱d╱ // 0x8fa @0x39
0x08c1…090a at003a = ╱6b╱k╱ // 0x8fb @0x3a
0x08c1…090a at003b = ╱22╱"╱ // 0x8fc @0x3b
0x08c1…090a at003c = ╱eb╱;╱ // 0x8fd @0x3c
0x08c1…090a at003d = ╱d2╱TAB╱ // 0x8fe @0x3d
0x08c1…090a at003e = ╱ed╱(╱ // 0x8ff @0x3e
0x08c1…090a at003f = ╱35╱5╱ // 0x900 @0x3f
0x08c1…090a at0040 = ╱37╱7╱ // 0x901 @0x40
0x08c1…090a at0041 = ╱fe0000e406╱ // 0x902 @0x41
0x08c1…090a at0046 = ╱ee╱)╱ // 0x907 @0x46
0x08c1…090a at0047 = ╱eb╱;╱ // 0x908 @0x47
0x08c1…090a at0048 = EOL // 0x909 @0x48
0x08c1…090a }
0x090a…0918 966f 2840 PRINT "A-skat"
0x090a…0918 LineComalBin {
0x090a…0918 ptr = 0x966f // 0x90a @0x0
0x090a…0918 lno = 0x0b18 // 0x90c @0x2
0x090a…0918 at0004 = ╱92╱ PRINT ╱ // 0x90e @0x4
0x090a…0918 at0005 = ╱22╱"╱ // 0x90f @0x5
0x090a…0918 at0006 = ╱41╱A╱ // 0x910 @0x6
0x090a…0918 at0007 = ╱2d╱-╱ // 0x911 @0x7
0x090a…0918 at0008 = ╱73╱s╱ // 0x912 @0x8
0x090a…0918 at0009 = ╱6b╱k╱ // 0x913 @0x9
0x090a…0918 at000a = ╱61╱a╱ // 0x914 @0xa
0x090a…0918 at000b = ╱74╱t╱ // 0x915 @0xb
0x090a…0918 at000c = ╱22╱"╱ // 0x916 @0xc
0x090a…0918 at000d = EOL // 0x917 @0xd
0x090a…0918 }
0x0918…092a 9681 2850 LINIE=LINIE+G
0x0918…092a LineComalBin {
0x0918…092a ptr = 0x9681 // 0x918 @0x0
0x0918…092a lno = 0x0b22 // 0x91a @0x2
0x0918…092a at0004 = ╱4c╱L╱ // 0x91c @0x4
0x0918…092a at0005 = ╱49╱I╱ // 0x91d @0x5
0x0918…092a at0006 = ╱4e╱N╱ // 0x91e @0x6
0x0918…092a at0007 = ╱49╱I╱ // 0x91f @0x7
0x0918…092a at0008 = ╱45╱E╱ // 0x920 @0x8
0x0918…092a at0009 = ╱dc╱=╱ // 0x921 @0x9
0x0918…092a at000a = ╱4c╱L╱ // 0x922 @0xa
0x0918…092a at000b = ╱49╱I╱ // 0x923 @0xb
0x0918…092a at000c = ╱4e╱N╱ // 0x924 @0xc
0x0918…092a at000d = ╱49╱I╱ // 0x925 @0xd
0x0918…092a at000e = ╱45╱E╱ // 0x926 @0xe
0x0918…092a at000f = ╱e2╱+╱ // 0x927 @0xf
0x0918…092a at0010 = ╱47╱G╱ // 0x928 @0x10
0x0918…092a at0011 = EOL // 0x929 @0x11
0x0918…092a }
0x092a…0930 9687 2860 REPEAT
0x092a…0930 LineComalBin {
0x092a…0930 ptr = 0x9687 // 0x92a @0x0
0x092a…0930 lno = 0x0b2c // 0x92c @0x2
0x092a…0930 at0004 = ╱97╱ REPEAT ╱ // 0x92e @0x4
0x092a…0930 at0005 = EOL // 0x92f @0x5
0x092a…0930 }
0x0930…093b 9692 2870 EXEC NÆSTE
0x0930…093b LineComalBin {
0x0930…093b ptr = 0x9692 // 0x930 @0x0
0x0930…093b lno = 0x0b36 // 0x932 @0x2
0x0930…093b at0004 = ╱9d╱ EXEC ╱ // 0x934 @0x4
0x0930…093b at0005 = ╱4e╱N╱ // 0x935 @0x5
0x0930…093b at0006 = ╱5b╱Æ╱ // 0x936 @0x6
0x0930…093b at0007 = ╱53╱S╱ // 0x937 @0x7
0x0930…093b at0008 = ╱54╱T╱ // 0x938 @0x8
0x0930…093b at0009 = ╱45╱E╱ // 0x939 @0x9
0x0930…093b at000a = EOL // 0x93a @0xa
0x0930…093b }
0x093b…094c 96a3 2880 IF LMNR<=MLMNR THEN
0x093b…094c LineComalBin {
0x093b…094c ptr = 0x96a3 // 0x93b @0x0
0x093b…094c lno = 0x0b40 // 0x93d @0x2
0x093b…094c at0004 = ╱9c╱ IF ╱ // 0x93f @0x4
0x093b…094c at0005 = ╱4c╱L╱ // 0x940 @0x5
0x093b…094c at0006 = ╱4d╱M╱ // 0x941 @0x6
0x093b…094c at0007 = ╱4e╱N╱ // 0x942 @0x7
0x093b…094c at0008 = ╱52╱R╱ // 0x943 @0x8
0x093b…094c at0009 = ╱df╱<=╱ // 0x944 @0x9
0x093b…094c at000a = ╱4d╱M╱ // 0x945 @0xa
0x093b…094c at000b = ╱4c╱L╱ // 0x946 @0xb
0x093b…094c at000c = ╱4d╱M╱ // 0x947 @0xc
0x093b…094c at000d = ╱4e╱N╱ // 0x948 @0xd
0x093b…094c at000e = ╱52╱R╱ // 0x949 @0xe
0x093b…094c at000f = ╱b6╱ THEN ╱ // 0x94a @0xf
0x093b…094c at0010 = EOL // 0x94b @0x10
0x093b…094c }
0x094c…0958 96af 2890 EXEC INDTÆL
0x094c…0958 LineComalBin {
0x094c…0958 ptr = 0x96af // 0x94c @0x0
0x094c…0958 lno = 0x0b4a // 0x94e @0x2
0x094c…0958 at0004 = ╱9d╱ EXEC ╱ // 0x950 @0x4
0x094c…0958 at0005 = ╱49╱I╱ // 0x951 @0x5
0x094c…0958 at0006 = ╱4e╱N╱ // 0x952 @0x6
0x094c…0958 at0007 = ╱44╱D╱ // 0x953 @0x7
0x094c…0958 at0008 = ╱54╱T╱ // 0x954 @0x8
0x094c…0958 at0009 = ╱5b╱Æ╱ // 0x955 @0x9
0x094c…0958 at000a = ╱4c╱L╱ // 0x956 @0xa
0x094c…0958 at000b = EOL // 0x957 @0xb
0x094c…0958 }
0x0958…0986 96dd 2900 EXEC CALC(E,TV$(36),TV$(35),RESUL$)
0x0958…0986 LineComalBin {
0x0958…0986 ptr = 0x96dd // 0x958 @0x0
0x0958…0986 lno = 0x0b54 // 0x95a @0x2
0x0958…0986 at0004 = ╱9d╱ EXEC ╱ // 0x95c @0x4
0x0958…0986 at0005 = ╱43╱C╱ // 0x95d @0x5
0x0958…0986 at0006 = ╱41╱A╱ // 0x95e @0x6
0x0958…0986 at0007 = ╱4c╱L╱ // 0x95f @0x7
0x0958…0986 at0008 = ╱43╱C╱ // 0x960 @0x8
0x0958…0986 at0009 = ╱ed╱(╱ // 0x961 @0x9
0x0958…0986 at000a = ╱45╱E╱ // 0x962 @0xa
0x0958…0986 at000b = ╱ec╱,╱ // 0x963 @0xb
0x0958…0986 at000c = ╱54╱T╱ // 0x964 @0xc
0x0958…0986 at000d = ╱56╱V╱ // 0x965 @0xd
0x0958…0986 at000e = ╱ef╱$╱ // 0x966 @0xe
0x0958…0986 at000f = ╱ed╱(╱ // 0x967 @0xf
0x0958…0986 at0010 = ╱33╱3╱ // 0x968 @0x10
0x0958…0986 at0011 = ╱36╱6╱ // 0x969 @0x11
0x0958…0986 at0012 = ╱fe00009006╱ // 0x96a @0x12
0x0958…0986 at0017 = ╱ee╱)╱ // 0x96f @0x17
0x0958…0986 at0018 = ╱ec╱,╱ // 0x970 @0x18
0x0958…0986 at0019 = ╱54╱T╱ // 0x971 @0x19
0x0958…0986 at001a = ╱56╱V╱ // 0x972 @0x1a
0x0958…0986 at001b = ╱ef╱$╱ // 0x973 @0x1b
0x0958…0986 at001c = ╱ed╱(╱ // 0x974 @0x1c
0x0958…0986 at001d = ╱33╱3╱ // 0x975 @0x1d
0x0958…0986 at001e = ╱35╱5╱ // 0x976 @0x1e
0x0958…0986 at001f = ╱fe00008c06╱ // 0x977 @0x1f
0x0958…0986 at0024 = ╱ee╱)╱ // 0x97c @0x24
0x0958…0986 at0025 = ╱ec╱,╱ // 0x97d @0x25
0x0958…0986 at0026 = ╱52╱R╱ // 0x97e @0x26
0x0958…0986 at0027 = ╱45╱E╱ // 0x97f @0x27
0x0958…0986 at0028 = ╱53╱S╱ // 0x980 @0x28
0x0958…0986 at0029 = ╱55╱U╱ // 0x981 @0x29
0x0958…0986 at002a = ╱4c╱L╱ // 0x982 @0x2a
0x0958…0986 at002b = ╱ef╱$╱ // 0x983 @0x2b
0x0958…0986 at002c = ╱ee╱)╱ // 0x984 @0x2c
0x0958…0986 at002d = EOL // 0x985 @0x2d
0x0958…0986 }
0x0986…09b5 970c 2910 EXEC CALC(E,TV$(39),TV$(38),RESUL1$)
0x0986…09b5 LineComalBin {
0x0986…09b5 ptr = 0x970c // 0x986 @0x0
0x0986…09b5 lno = 0x0b5e // 0x988 @0x2
0x0986…09b5 at0004 = ╱9d╱ EXEC ╱ // 0x98a @0x4
0x0986…09b5 at0005 = ╱43╱C╱ // 0x98b @0x5
0x0986…09b5 at0006 = ╱41╱A╱ // 0x98c @0x6
0x0986…09b5 at0007 = ╱4c╱L╱ // 0x98d @0x7
0x0986…09b5 at0008 = ╱43╱C╱ // 0x98e @0x8
0x0986…09b5 at0009 = ╱ed╱(╱ // 0x98f @0x9
0x0986…09b5 at000a = ╱45╱E╱ // 0x990 @0xa
0x0986…09b5 at000b = ╱ec╱,╱ // 0x991 @0xb
0x0986…09b5 at000c = ╱54╱T╱ // 0x992 @0xc
0x0986…09b5 at000d = ╱56╱V╱ // 0x993 @0xd
0x0986…09b5 at000e = ╱ef╱$╱ // 0x994 @0xe
0x0986…09b5 at000f = ╱ed╱(╱ // 0x995 @0xf
0x0986…09b5 at0010 = ╱33╱3╱ // 0x996 @0x10
0x0986…09b5 at0011 = ╱39╱9╱ // 0x997 @0x11
0x0986…09b5 at0012 = ╱fe00009c06╱ // 0x998 @0x12
0x0986…09b5 at0017 = ╱ee╱)╱ // 0x99d @0x17
0x0986…09b5 at0018 = ╱ec╱,╱ // 0x99e @0x18
0x0986…09b5 at0019 = ╱54╱T╱ // 0x99f @0x19
0x0986…09b5 at001a = ╱56╱V╱ // 0x9a0 @0x1a
0x0986…09b5 at001b = ╱ef╱$╱ // 0x9a1 @0x1b
0x0986…09b5 at001c = ╱ed╱(╱ // 0x9a2 @0x1c
0x0986…09b5 at001d = ╱33╱3╱ // 0x9a3 @0x1d
0x0986…09b5 at001e = ╱38╱8╱ // 0x9a4 @0x1e
0x0986…09b5 at001f = ╱fe00009806╱ // 0x9a5 @0x1f
0x0986…09b5 at0024 = ╱ee╱)╱ // 0x9aa @0x24
0x0986…09b5 at0025 = ╱ec╱,╱ // 0x9ab @0x25
0x0986…09b5 at0026 = ╱52╱R╱ // 0x9ac @0x26
0x0986…09b5 at0027 = ╱45╱E╱ // 0x9ad @0x27
0x0986…09b5 at0028 = ╱53╱S╱ // 0x9ae @0x28
0x0986…09b5 at0029 = ╱55╱U╱ // 0x9af @0x29
0x0986…09b5 at002a = ╱4c╱L╱ // 0x9b0 @0x2a
0x0986…09b5 at002b = ╱31╱1╱ // 0x9b1 @0x2b
0x0986…09b5 at002c = ╱ef╱$╱ // 0x9b2 @0x2c
0x0986…09b5 at002d = ╱ee╱)╱ // 0x9b3 @0x2d
0x0986…09b5 at002e = EOL // 0x9b4 @0x2e
0x0986…09b5 }
0x09b5…09e1 9738 2920 EXEC CALC(E,TV$(42),TV$(41),LIN$)
0x09b5…09e1 LineComalBin {
0x09b5…09e1 ptr = 0x9738 // 0x9b5 @0x0
0x09b5…09e1 lno = 0x0b68 // 0x9b7 @0x2
0x09b5…09e1 at0004 = ╱9d╱ EXEC ╱ // 0x9b9 @0x4
0x09b5…09e1 at0005 = ╱43╱C╱ // 0x9ba @0x5
0x09b5…09e1 at0006 = ╱41╱A╱ // 0x9bb @0x6
0x09b5…09e1 at0007 = ╱4c╱L╱ // 0x9bc @0x7
0x09b5…09e1 at0008 = ╱43╱C╱ // 0x9bd @0x8
0x09b5…09e1 at0009 = ╱ed╱(╱ // 0x9be @0x9
0x09b5…09e1 at000a = ╱45╱E╱ // 0x9bf @0xa
0x09b5…09e1 at000b = ╱ec╱,╱ // 0x9c0 @0xb
0x09b5…09e1 at000c = ╱54╱T╱ // 0x9c1 @0xc
0x09b5…09e1 at000d = ╱56╱V╱ // 0x9c2 @0xd
0x09b5…09e1 at000e = ╱ef╱$╱ // 0x9c3 @0xe
0x09b5…09e1 at000f = ╱ed╱(╱ // 0x9c4 @0xf
0x09b5…09e1 at0010 = ╱34╱4╱ // 0x9c5 @0x10
0x09b5…09e1 at0011 = ╱32╱2╱ // 0x9c6 @0x11
0x09b5…09e1 at0012 = ╱fe0000a806╱ // 0x9c7 @0x12
0x09b5…09e1 at0017 = ╱ee╱)╱ // 0x9cc @0x17
0x09b5…09e1 at0018 = ╱ec╱,╱ // 0x9cd @0x18
0x09b5…09e1 at0019 = ╱54╱T╱ // 0x9ce @0x19
0x09b5…09e1 at001a = ╱56╱V╱ // 0x9cf @0x1a
0x09b5…09e1 at001b = ╱ef╱$╱ // 0x9d0 @0x1b
0x09b5…09e1 at001c = ╱ed╱(╱ // 0x9d1 @0x1c
0x09b5…09e1 at001d = ╱34╱4╱ // 0x9d2 @0x1d
0x09b5…09e1 at001e = ╱31╱1╱ // 0x9d3 @0x1e
0x09b5…09e1 at001f = ╱fe0000a406╱ // 0x9d4 @0x1f
0x09b5…09e1 at0024 = ╱ee╱)╱ // 0x9d9 @0x24
0x09b5…09e1 at0025 = ╱ec╱,╱ // 0x9da @0x25
0x09b5…09e1 at0026 = ╱4c╱L╱ // 0x9db @0x26
0x09b5…09e1 at0027 = ╱49╱I╱ // 0x9dc @0x27
0x09b5…09e1 at0028 = ╱4e╱N╱ // 0x9dd @0x28
0x09b5…09e1 at0029 = ╱ef╱$╱ // 0x9de @0x29
0x09b5…09e1 at002a = ╱ee╱)╱ // 0x9df @0x2a
0x09b5…09e1 at002b = EOL // 0x9e0 @0x2b
0x09b5…09e1 }
0x09e1…0a1f 9776 2930 TV$(35)=TAH$(G:11);TV$(36)=TAH$(G:11)
0x09e1…0a1f LineComalBin {
0x09e1…0a1f ptr = 0x9776 // 0x9e1 @0x0
0x09e1…0a1f lno = 0x0b72 // 0x9e3 @0x2
0x09e1…0a1f at0004 = ╱54╱T╱ // 0x9e5 @0x4
0x09e1…0a1f at0005 = ╱56╱V╱ // 0x9e6 @0x5
0x09e1…0a1f at0006 = ╱ef╱$╱ // 0x9e7 @0x6
0x09e1…0a1f at0007 = ╱ed╱(╱ // 0x9e8 @0x7
0x09e1…0a1f at0008 = ╱33╱3╱ // 0x9e9 @0x8
0x09e1…0a1f at0009 = ╱35╱5╱ // 0x9ea @0x9
0x09e1…0a1f at000a = ╱fe00008c06╱ // 0x9eb @0xa
0x09e1…0a1f at000f = ╱ee╱)╱ // 0x9f0 @0xf
0x09e1…0a1f at0010 = ╱dc╱=╱ // 0x9f1 @0x10
0x09e1…0a1f at0011 = ╱54╱T╱ // 0x9f2 @0x11
0x09e1…0a1f at0012 = ╱41╱A╱ // 0x9f3 @0x12
0x09e1…0a1f at0013 = ╱48╱H╱ // 0x9f4 @0x13
0x09e1…0a1f at0014 = ╱ef╱$╱ // 0x9f5 @0x14
0x09e1…0a1f at0015 = ╱ed╱(╱ // 0x9f6 @0x15
0x09e1…0a1f at0016 = ╱47╱G╱ // 0x9f7 @0x16
0x09e1…0a1f at0017 = ╱f0╱:╱ // 0x9f8 @0x17
0x09e1…0a1f at0018 = ╱31╱1╱ // 0x9f9 @0x18
0x09e1…0a1f at0019 = ╱31╱1╱ // 0x9fa @0x19
0x09e1…0a1f at001a = ╱fe0000b004╱ // 0x9fb @0x1a
0x09e1…0a1f at001f = ╱ee╱)╱ // 0xa00 @0x1f
0x09e1…0a1f at0020 = ╱eb╱;╱ // 0xa01 @0x20
0x09e1…0a1f at0021 = ╱54╱T╱ // 0xa02 @0x21
0x09e1…0a1f at0022 = ╱56╱V╱ // 0xa03 @0x22
0x09e1…0a1f at0023 = ╱ef╱$╱ // 0xa04 @0x23
0x09e1…0a1f at0024 = ╱ed╱(╱ // 0xa05 @0x24
0x09e1…0a1f at0025 = ╱33╱3╱ // 0xa06 @0x25
0x09e1…0a1f at0026 = ╱36╱6╱ // 0xa07 @0x26
0x09e1…0a1f at0027 = ╱fe00009006╱ // 0xa08 @0x27
0x09e1…0a1f at002c = ╱ee╱)╱ // 0xa0d @0x2c
0x09e1…0a1f at002d = ╱dc╱=╱ // 0xa0e @0x2d
0x09e1…0a1f at002e = ╱54╱T╱ // 0xa0f @0x2e
0x09e1…0a1f at002f = ╱41╱A╱ // 0xa10 @0x2f
0x09e1…0a1f at0030 = ╱48╱H╱ // 0xa11 @0x30
0x09e1…0a1f at0031 = ╱ef╱$╱ // 0xa12 @0x31
0x09e1…0a1f at0032 = ╱ed╱(╱ // 0xa13 @0x32
0x09e1…0a1f at0033 = ╱47╱G╱ // 0xa14 @0x33
0x09e1…0a1f at0034 = ╱f0╱:╱ // 0xa15 @0x34
0x09e1…0a1f at0035 = ╱31╱1╱ // 0xa16 @0x35
0x09e1…0a1f at0036 = ╱31╱1╱ // 0xa17 @0x36
0x09e1…0a1f at0037 = ╱fe0000b004╱ // 0xa18 @0x37
0x09e1…0a1f at003c = ╱ee╱)╱ // 0xa1d @0x3c
0x09e1…0a1f at003d = EOL // 0xa1e @0x3d
0x09e1…0a1f }
0x0a1f…0a5d 97b4 2940 TV$(38)=TAH$(G:11);TV$(39)=TAH$(G:11)
0x0a1f…0a5d LineComalBin {
0x0a1f…0a5d ptr = 0x97b4 // 0xa1f @0x0
0x0a1f…0a5d lno = 0x0b7c // 0xa21 @0x2
0x0a1f…0a5d at0004 = ╱54╱T╱ // 0xa23 @0x4
0x0a1f…0a5d at0005 = ╱56╱V╱ // 0xa24 @0x5
0x0a1f…0a5d at0006 = ╱ef╱$╱ // 0xa25 @0x6
0x0a1f…0a5d at0007 = ╱ed╱(╱ // 0xa26 @0x7
0x0a1f…0a5d at0008 = ╱33╱3╱ // 0xa27 @0x8
0x0a1f…0a5d at0009 = ╱38╱8╱ // 0xa28 @0x9
0x0a1f…0a5d at000a = ╱fe00009806╱ // 0xa29 @0xa
0x0a1f…0a5d at000f = ╱ee╱)╱ // 0xa2e @0xf
0x0a1f…0a5d at0010 = ╱dc╱=╱ // 0xa2f @0x10
0x0a1f…0a5d at0011 = ╱54╱T╱ // 0xa30 @0x11
0x0a1f…0a5d at0012 = ╱41╱A╱ // 0xa31 @0x12
0x0a1f…0a5d at0013 = ╱48╱H╱ // 0xa32 @0x13
0x0a1f…0a5d at0014 = ╱ef╱$╱ // 0xa33 @0x14
0x0a1f…0a5d at0015 = ╱ed╱(╱ // 0xa34 @0x15
0x0a1f…0a5d at0016 = ╱47╱G╱ // 0xa35 @0x16
0x0a1f…0a5d at0017 = ╱f0╱:╱ // 0xa36 @0x17
0x0a1f…0a5d at0018 = ╱31╱1╱ // 0xa37 @0x18
0x0a1f…0a5d at0019 = ╱31╱1╱ // 0xa38 @0x19
0x0a1f…0a5d at001a = ╱fe0000b004╱ // 0xa39 @0x1a
0x0a1f…0a5d at001f = ╱ee╱)╱ // 0xa3e @0x1f
0x0a1f…0a5d at0020 = ╱eb╱;╱ // 0xa3f @0x20
0x0a1f…0a5d at0021 = ╱54╱T╱ // 0xa40 @0x21
0x0a1f…0a5d at0022 = ╱56╱V╱ // 0xa41 @0x22
0x0a1f…0a5d at0023 = ╱ef╱$╱ // 0xa42 @0x23
0x0a1f…0a5d at0024 = ╱ed╱(╱ // 0xa43 @0x24
0x0a1f…0a5d at0025 = ╱33╱3╱ // 0xa44 @0x25
0x0a1f…0a5d at0026 = ╱39╱9╱ // 0xa45 @0x26
0x0a1f…0a5d at0027 = ╱fe00009c06╱ // 0xa46 @0x27
0x0a1f…0a5d at002c = ╱ee╱)╱ // 0xa4b @0x2c
0x0a1f…0a5d at002d = ╱dc╱=╱ // 0xa4c @0x2d
0x0a1f…0a5d at002e = ╱54╱T╱ // 0xa4d @0x2e
0x0a1f…0a5d at002f = ╱41╱A╱ // 0xa4e @0x2f
0x0a1f…0a5d at0030 = ╱48╱H╱ // 0xa4f @0x30
0x0a1f…0a5d at0031 = ╱ef╱$╱ // 0xa50 @0x31
0x0a1f…0a5d at0032 = ╱ed╱(╱ // 0xa51 @0x32
0x0a1f…0a5d at0033 = ╱47╱G╱ // 0xa52 @0x33
0x0a1f…0a5d at0034 = ╱f0╱:╱ // 0xa53 @0x34
0x0a1f…0a5d at0035 = ╱31╱1╱ // 0xa54 @0x35
0x0a1f…0a5d at0036 = ╱31╱1╱ // 0xa55 @0x36
0x0a1f…0a5d at0037 = ╱fe0000b004╱ // 0xa56 @0x37
0x0a1f…0a5d at003c = ╱ee╱)╱ // 0xa5b @0x3c
0x0a1f…0a5d at003d = EOL // 0xa5c @0x3d
0x0a1f…0a5d }
0x0a5d…0a9b 97f2 2950 TV$(41)=TAH$(G:11);TV$(42)=TAH$(G:11)
0x0a5d…0a9b LineComalBin {
0x0a5d…0a9b ptr = 0x97f2 // 0xa5d @0x0
0x0a5d…0a9b lno = 0x0b86 // 0xa5f @0x2
0x0a5d…0a9b at0004 = ╱54╱T╱ // 0xa61 @0x4
0x0a5d…0a9b at0005 = ╱56╱V╱ // 0xa62 @0x5
0x0a5d…0a9b at0006 = ╱ef╱$╱ // 0xa63 @0x6
0x0a5d…0a9b at0007 = ╱ed╱(╱ // 0xa64 @0x7
0x0a5d…0a9b at0008 = ╱34╱4╱ // 0xa65 @0x8
0x0a5d…0a9b at0009 = ╱31╱1╱ // 0xa66 @0x9
0x0a5d…0a9b at000a = ╱fe0000a406╱ // 0xa67 @0xa
0x0a5d…0a9b at000f = ╱ee╱)╱ // 0xa6c @0xf
0x0a5d…0a9b at0010 = ╱dc╱=╱ // 0xa6d @0x10
0x0a5d…0a9b at0011 = ╱54╱T╱ // 0xa6e @0x11
0x0a5d…0a9b at0012 = ╱41╱A╱ // 0xa6f @0x12
0x0a5d…0a9b at0013 = ╱48╱H╱ // 0xa70 @0x13
0x0a5d…0a9b at0014 = ╱ef╱$╱ // 0xa71 @0x14
0x0a5d…0a9b at0015 = ╱ed╱(╱ // 0xa72 @0x15
0x0a5d…0a9b at0016 = ╱47╱G╱ // 0xa73 @0x16
0x0a5d…0a9b at0017 = ╱f0╱:╱ // 0xa74 @0x17
0x0a5d…0a9b at0018 = ╱31╱1╱ // 0xa75 @0x18
0x0a5d…0a9b at0019 = ╱31╱1╱ // 0xa76 @0x19
0x0a5d…0a9b at001a = ╱fe0000b004╱ // 0xa77 @0x1a
0x0a5d…0a9b at001f = ╱ee╱)╱ // 0xa7c @0x1f
0x0a5d…0a9b at0020 = ╱eb╱;╱ // 0xa7d @0x20
0x0a5d…0a9b at0021 = ╱54╱T╱ // 0xa7e @0x21
0x0a5d…0a9b at0022 = ╱56╱V╱ // 0xa7f @0x22
0x0a5d…0a9b at0023 = ╱ef╱$╱ // 0xa80 @0x23
0x0a5d…0a9b at0024 = ╱ed╱(╱ // 0xa81 @0x24
0x0a5d…0a9b at0025 = ╱34╱4╱ // 0xa82 @0x25
0x0a5d…0a9b at0026 = ╱32╱2╱ // 0xa83 @0x26
0x0a5d…0a9b at0027 = ╱fe0000a806╱ // 0xa84 @0x27
0x0a5d…0a9b at002c = ╱ee╱)╱ // 0xa89 @0x2c
0x0a5d…0a9b at002d = ╱dc╱=╱ // 0xa8a @0x2d
0x0a5d…0a9b at002e = ╱54╱T╱ // 0xa8b @0x2e
0x0a5d…0a9b at002f = ╱41╱A╱ // 0xa8c @0x2f
0x0a5d…0a9b at0030 = ╱48╱H╱ // 0xa8d @0x30
0x0a5d…0a9b at0031 = ╱ef╱$╱ // 0xa8e @0x31
0x0a5d…0a9b at0032 = ╱ed╱(╱ // 0xa8f @0x32
0x0a5d…0a9b at0033 = ╱47╱G╱ // 0xa90 @0x33
0x0a5d…0a9b at0034 = ╱f0╱:╱ // 0xa91 @0x34
0x0a5d…0a9b at0035 = ╱31╱1╱ // 0xa92 @0x35
0x0a5d…0a9b at0036 = ╱31╱1╱ // 0xa93 @0x36
0x0a5d…0a9b at0037 = ╱fe0000b004╱ // 0xa94 @0x37
0x0a5d…0a9b at003c = ╱ee╱)╱ // 0xa99 @0x3c
0x0a5d…0a9b at003d = EOL // 0xa9a @0x3d
0x0a5d…0a9b }
0x0a9b…0aa6 97fd 2960 OUTP=B
0x0a9b…0aa6 LineComalBin {
0x0a9b…0aa6 ptr = 0x97fd // 0xa9b @0x0
0x0a9b…0aa6 lno = 0x0b90 // 0xa9d @0x2
0x0a9b…0aa6 at0004 = ╱4f╱O╱ // 0xa9f @0x4
0x0a9b…0aa6 at0005 = ╱55╱U╱ // 0xaa0 @0x5
0x0a9b…0aa6 at0006 = ╱54╱T╱ // 0xaa1 @0x6
0x0a9b…0aa6 at0007 = ╱50╱P╱ // 0xaa2 @0x7
0x0a9b…0aa6 at0008 = ╱dc╱=╱ // 0xaa3 @0x8
0x0a9b…0aa6 at0009 = ╱42╱B╱ // 0xaa4 @0x9
0x0a9b…0aa6 at000a = EOL // 0xaa5 @0xa
0x0a9b…0aa6 }
0x0aa6…0acb 9822 2970 EXEC CALC(4,RESUL$,TAH$,RESUL$)
0x0aa6…0acb LineComalBin {
0x0aa6…0acb ptr = 0x9822 // 0xaa6 @0x0
0x0aa6…0acb lno = 0x0b9a // 0xaa8 @0x2
0x0aa6…0acb at0004 = ╱9d╱ EXEC ╱ // 0xaaa @0x4
0x0aa6…0acb at0005 = ╱43╱C╱ // 0xaab @0x5
0x0aa6…0acb at0006 = ╱41╱A╱ // 0xaac @0x6
0x0aa6…0acb at0007 = ╱4c╱L╱ // 0xaad @0x7
0x0aa6…0acb at0008 = ╱43╱C╱ // 0xaae @0x8
0x0aa6…0acb at0009 = ╱ed╱(╱ // 0xaaf @0x9
0x0aa6…0acb at000a = ╱34╱4╱ // 0xab0 @0xa
0x0aa6…0acb at000b = ╱fe00008003╱ // 0xab1 @0xb
0x0aa6…0acb at0010 = ╱ec╱,╱ // 0xab6 @0x10
0x0aa6…0acb at0011 = ╱52╱R╱ // 0xab7 @0x11
0x0aa6…0acb at0012 = ╱45╱E╱ // 0xab8 @0x12
0x0aa6…0acb at0013 = ╱53╱S╱ // 0xab9 @0x13
0x0aa6…0acb at0014 = ╱55╱U╱ // 0xaba @0x14
0x0aa6…0acb at0015 = ╱4c╱L╱ // 0xabb @0x15
0x0aa6…0acb at0016 = ╱ef╱$╱ // 0xabc @0x16
0x0aa6…0acb at0017 = ╱ec╱,╱ // 0xabd @0x17
0x0aa6…0acb at0018 = ╱54╱T╱ // 0xabe @0x18
0x0aa6…0acb at0019 = ╱41╱A╱ // 0xabf @0x19
0x0aa6…0acb at001a = ╱48╱H╱ // 0xac0 @0x1a
0x0aa6…0acb at001b = ╱ef╱$╱ // 0xac1 @0x1b
0x0aa6…0acb at001c = ╱ec╱,╱ // 0xac2 @0x1c
0x0aa6…0acb at001d = ╱52╱R╱ // 0xac3 @0x1d
0x0aa6…0acb at001e = ╱45╱E╱ // 0xac4 @0x1e
0x0aa6…0acb at001f = ╱53╱S╱ // 0xac5 @0x1f
0x0aa6…0acb at0020 = ╱55╱U╱ // 0xac6 @0x20
0x0aa6…0acb at0021 = ╱4c╱L╱ // 0xac7 @0x21
0x0aa6…0acb at0022 = ╱ef╱$╱ // 0xac8 @0x22
0x0aa6…0acb at0023 = ╱ee╱)╱ // 0xac9 @0x23
0x0aa6…0acb at0024 = EOL // 0xaca @0x24
0x0aa6…0acb }
0x0acb…0ad6 982d 2980 IF SI<>B THEN
0x0acb…0ad6 LineComalBin {
0x0acb…0ad6 ptr = 0x982d // 0xacb @0x0
0x0acb…0ad6 lno = 0x0ba4 // 0xacd @0x2
0x0acb…0ad6 at0004 = ╱9c╱ IF ╱ // 0xacf @0x4
0x0acb…0ad6 at0005 = ╱53╱S╱ // 0xad0 @0x5
0x0acb…0ad6 at0006 = ╱49╱I╱ // 0xad1 @0x6
0x0acb…0ad6 at0007 = ╱e1╱<>╱ // 0xad2 @0x7
0x0acb…0ad6 at0008 = ╱42╱B╱ // 0xad3 @0x8
0x0acb…0ad6 at0009 = ╱b6╱ THEN ╱ // 0xad4 @0x9
0x0acb…0ad6 at000a = EOL // 0xad5 @0xa
0x0acb…0ad6 }
0x0ad6…0ae1 9838 2990 OUTP=E
0x0ad6…0ae1 LineComalBin {
0x0ad6…0ae1 ptr = 0x9838 // 0xad6 @0x0
0x0ad6…0ae1 lno = 0x0bae // 0xad8 @0x2
0x0ad6…0ae1 at0004 = ╱4f╱O╱ // 0xada @0x4
0x0ad6…0ae1 at0005 = ╱55╱U╱ // 0xadb @0x5
0x0ad6…0ae1 at0006 = ╱54╱T╱ // 0xadc @0x6
0x0ad6…0ae1 at0007 = ╱50╱P╱ // 0xadd @0x7
0x0ad6…0ae1 at0008 = ╱dc╱=╱ // 0xade @0x8
0x0ad6…0ae1 at0009 = ╱45╱E╱ // 0xadf @0x9
0x0ad6…0ae1 at000a = EOL // 0xae0 @0xa
0x0ad6…0ae1 }
0x0ae1…0b09 9860 3000 EXEC CALC(B,RESUL$,TOTAL$(E),TOTAL$(E))
0x0ae1…0b09 LineComalBin {
0x0ae1…0b09 ptr = 0x9860 // 0xae1 @0x0
0x0ae1…0b09 lno = 0x0bb8 // 0xae3 @0x2
0x0ae1…0b09 at0004 = ╱9d╱ EXEC ╱ // 0xae5 @0x4
0x0ae1…0b09 at0005 = ╱43╱C╱ // 0xae6 @0x5
0x0ae1…0b09 at0006 = ╱41╱A╱ // 0xae7 @0x6
0x0ae1…0b09 at0007 = ╱4c╱L╱ // 0xae8 @0x7
0x0ae1…0b09 at0008 = ╱43╱C╱ // 0xae9 @0x8
0x0ae1…0b09 at0009 = ╱ed╱(╱ // 0xaea @0x9
0x0ae1…0b09 at000a = ╱42╱B╱ // 0xaeb @0xa
0x0ae1…0b09 at000b = ╱ec╱,╱ // 0xaec @0xb
0x0ae1…0b09 at000c = ╱52╱R╱ // 0xaed @0xc
0x0ae1…0b09 at000d = ╱45╱E╱ // 0xaee @0xd
0x0ae1…0b09 at000e = ╱53╱S╱ // 0xaef @0xe
0x0ae1…0b09 at000f = ╱55╱U╱ // 0xaf0 @0xf
0x0ae1…0b09 at0010 = ╱4c╱L╱ // 0xaf1 @0x10
0x0ae1…0b09 at0011 = ╱ef╱$╱ // 0xaf2 @0x11
0x0ae1…0b09 at0012 = ╱ec╱,╱ // 0xaf3 @0x12
0x0ae1…0b09 at0013 = ╱54╱T╱ // 0xaf4 @0x13
0x0ae1…0b09 at0014 = ╱4f╱O╱ // 0xaf5 @0x14
0x0ae1…0b09 at0015 = ╱54╱T╱ // 0xaf6 @0x15
0x0ae1…0b09 at0016 = ╱41╱A╱ // 0xaf7 @0x16
0x0ae1…0b09 at0017 = ╱4c╱L╱ // 0xaf8 @0x17
0x0ae1…0b09 at0018 = ╱ef╱$╱ // 0xaf9 @0x18
0x0ae1…0b09 at0019 = ╱ed╱(╱ // 0xafa @0x19
0x0ae1…0b09 at001a = ╱45╱E╱ // 0xafb @0x1a
0x0ae1…0b09 at001b = ╱ee╱)╱ // 0xafc @0x1b
0x0ae1…0b09 at001c = ╱ec╱,╱ // 0xafd @0x1c
0x0ae1…0b09 at001d = ╱54╱T╱ // 0xafe @0x1d
0x0ae1…0b09 at001e = ╱4f╱O╱ // 0xaff @0x1e
0x0ae1…0b09 at001f = ╱54╱T╱ // 0xb00 @0x1f
0x0ae1…0b09 at0020 = ╱41╱A╱ // 0xb01 @0x20
0x0ae1…0b09 at0021 = ╱4c╱L╱ // 0xb02 @0x21
0x0ae1…0b09 at0022 = ╱ef╱$╱ // 0xb03 @0x22
0x0ae1…0b09 at0023 = ╱ed╱(╱ // 0xb04 @0x23
0x0ae1…0b09 at0024 = ╱45╱E╱ // 0xb05 @0x24
0x0ae1…0b09 at0025 = ╱ee╱)╱ // 0xb06 @0x25
0x0ae1…0b09 at0026 = ╱ee╱)╱ // 0xb07 @0x26
0x0ae1…0b09 at0027 = EOL // 0xb08 @0x27
0x0ae1…0b09 }
0x0b09…0b0f 9866 3010 ENDIF
0x0b09…0b0f LineComalBin {
0x0b09…0b0f ptr = 0x9866 // 0xb09 @0x0
0x0b09…0b0f lno = 0x0bc2 // 0xb0b @0x2
0x0b09…0b0f at0004 = ╱9b╱ ENDIF ╱ // 0xb0d @0x4
0x0b09…0b0f at0005 = EOL // 0xb0e @0x5
0x0b09…0b0f }
0x0b0f…0b36 988d 3020 EXEC CALC(4,RESUL1$,TAH$,RESUL1$)
0x0b0f…0b36 LineComalBin {
0x0b0f…0b36 ptr = 0x988d // 0xb0f @0x0
0x0b0f…0b36 lno = 0x0bcc // 0xb11 @0x2
0x0b0f…0b36 at0004 = ╱9d╱ EXEC ╱ // 0xb13 @0x4
0x0b0f…0b36 at0005 = ╱43╱C╱ // 0xb14 @0x5
0x0b0f…0b36 at0006 = ╱41╱A╱ // 0xb15 @0x6
0x0b0f…0b36 at0007 = ╱4c╱L╱ // 0xb16 @0x7
0x0b0f…0b36 at0008 = ╱43╱C╱ // 0xb17 @0x8
0x0b0f…0b36 at0009 = ╱ed╱(╱ // 0xb18 @0x9
0x0b0f…0b36 at000a = ╱34╱4╱ // 0xb19 @0xa
0x0b0f…0b36 at000b = ╱fe00008003╱ // 0xb1a @0xb
0x0b0f…0b36 at0010 = ╱ec╱,╱ // 0xb1f @0x10
0x0b0f…0b36 at0011 = ╱52╱R╱ // 0xb20 @0x11
0x0b0f…0b36 at0012 = ╱45╱E╱ // 0xb21 @0x12
0x0b0f…0b36 at0013 = ╱53╱S╱ // 0xb22 @0x13
0x0b0f…0b36 at0014 = ╱55╱U╱ // 0xb23 @0x14
0x0b0f…0b36 at0015 = ╱4c╱L╱ // 0xb24 @0x15
0x0b0f…0b36 at0016 = ╱31╱1╱ // 0xb25 @0x16
0x0b0f…0b36 at0017 = ╱ef╱$╱ // 0xb26 @0x17
0x0b0f…0b36 at0018 = ╱ec╱,╱ // 0xb27 @0x18
0x0b0f…0b36 at0019 = ╱54╱T╱ // 0xb28 @0x19
0x0b0f…0b36 at001a = ╱41╱A╱ // 0xb29 @0x1a
0x0b0f…0b36 at001b = ╱48╱H╱ // 0xb2a @0x1b
0x0b0f…0b36 at001c = ╱ef╱$╱ // 0xb2b @0x1c
0x0b0f…0b36 at001d = ╱ec╱,╱ // 0xb2c @0x1d
0x0b0f…0b36 at001e = ╱52╱R╱ // 0xb2d @0x1e
0x0b0f…0b36 at001f = ╱45╱E╱ // 0xb2e @0x1f
0x0b0f…0b36 at0020 = ╱53╱S╱ // 0xb2f @0x20
0x0b0f…0b36 at0021 = ╱55╱U╱ // 0xb30 @0x21
0x0b0f…0b36 at0022 = ╱4c╱L╱ // 0xb31 @0x22
0x0b0f…0b36 at0023 = ╱31╱1╱ // 0xb32 @0x23
0x0b0f…0b36 at0024 = ╱ef╱$╱ // 0xb33 @0x24
0x0b0f…0b36 at0025 = ╱ee╱)╱ // 0xb34 @0x25
0x0b0f…0b36 at0026 = EOL // 0xb35 @0x26
0x0b0f…0b36 }
0x0b36…0b41 9898 3030 IF SI<>B THEN
0x0b36…0b41 LineComalBin {
0x0b36…0b41 ptr = 0x9898 // 0xb36 @0x0
0x0b36…0b41 lno = 0x0bd6 // 0xb38 @0x2
0x0b36…0b41 at0004 = ╱9c╱ IF ╱ // 0xb3a @0x4
0x0b36…0b41 at0005 = ╱53╱S╱ // 0xb3b @0x5
0x0b36…0b41 at0006 = ╱49╱I╱ // 0xb3c @0x6
0x0b36…0b41 at0007 = ╱e1╱<>╱ // 0xb3d @0x7
0x0b36…0b41 at0008 = ╱42╱B╱ // 0xb3e @0x8
0x0b36…0b41 at0009 = ╱b6╱ THEN ╱ // 0xb3f @0x9
0x0b36…0b41 at000a = EOL // 0xb40 @0xa
0x0b36…0b41 }
0x0b41…0b4c 98a3 3040 OUTP=E
0x0b41…0b4c LineComalBin {
0x0b41…0b4c ptr = 0x98a3 // 0xb41 @0x0
0x0b41…0b4c lno = 0x0be0 // 0xb43 @0x2
0x0b41…0b4c at0004 = ╱4f╱O╱ // 0xb45 @0x4
0x0b41…0b4c at0005 = ╱55╱U╱ // 0xb46 @0x5
0x0b41…0b4c at0006 = ╱54╱T╱ // 0xb47 @0x6
0x0b41…0b4c at0007 = ╱50╱P╱ // 0xb48 @0x7
0x0b41…0b4c at0008 = ╱dc╱=╱ // 0xb49 @0x8
0x0b41…0b4c at0009 = ╱45╱E╱ // 0xb4a @0x9
0x0b41…0b4c at000a = EOL // 0xb4b @0xa
0x0b41…0b4c }
0x0b4c…0b75 98cc 3050 EXEC CALC(B,RESUL1$,TOTAL$(G),TOTAL$(G))
0x0b4c…0b75 LineComalBin {
0x0b4c…0b75 ptr = 0x98cc // 0xb4c @0x0
0x0b4c…0b75 lno = 0x0bea // 0xb4e @0x2
0x0b4c…0b75 at0004 = ╱9d╱ EXEC ╱ // 0xb50 @0x4
0x0b4c…0b75 at0005 = ╱43╱C╱ // 0xb51 @0x5
0x0b4c…0b75 at0006 = ╱41╱A╱ // 0xb52 @0x6
0x0b4c…0b75 at0007 = ╱4c╱L╱ // 0xb53 @0x7
0x0b4c…0b75 at0008 = ╱43╱C╱ // 0xb54 @0x8
0x0b4c…0b75 at0009 = ╱ed╱(╱ // 0xb55 @0x9
0x0b4c…0b75 at000a = ╱42╱B╱ // 0xb56 @0xa
0x0b4c…0b75 at000b = ╱ec╱,╱ // 0xb57 @0xb
0x0b4c…0b75 at000c = ╱52╱R╱ // 0xb58 @0xc
0x0b4c…0b75 at000d = ╱45╱E╱ // 0xb59 @0xd
0x0b4c…0b75 at000e = ╱53╱S╱ // 0xb5a @0xe
0x0b4c…0b75 at000f = ╱55╱U╱ // 0xb5b @0xf
0x0b4c…0b75 at0010 = ╱4c╱L╱ // 0xb5c @0x10
0x0b4c…0b75 at0011 = ╱31╱1╱ // 0xb5d @0x11
0x0b4c…0b75 at0012 = ╱ef╱$╱ // 0xb5e @0x12
0x0b4c…0b75 at0013 = ╱ec╱,╱ // 0xb5f @0x13
0x0b4c…0b75 at0014 = ╱54╱T╱ // 0xb60 @0x14
0x0b4c…0b75 at0015 = ╱4f╱O╱ // 0xb61 @0x15
0x0b4c…0b75 at0016 = ╱54╱T╱ // 0xb62 @0x16
0x0b4c…0b75 at0017 = ╱41╱A╱ // 0xb63 @0x17
0x0b4c…0b75 at0018 = ╱4c╱L╱ // 0xb64 @0x18
0x0b4c…0b75 at0019 = ╱ef╱$╱ // 0xb65 @0x19
0x0b4c…0b75 at001a = ╱ed╱(╱ // 0xb66 @0x1a
0x0b4c…0b75 at001b = ╱47╱G╱ // 0xb67 @0x1b
0x0b4c…0b75 at001c = ╱ee╱)╱ // 0xb68 @0x1c
0x0b4c…0b75 at001d = ╱ec╱,╱ // 0xb69 @0x1d
0x0b4c…0b75 at001e = ╱54╱T╱ // 0xb6a @0x1e
0x0b4c…0b75 at001f = ╱4f╱O╱ // 0xb6b @0x1f
0x0b4c…0b75 at0020 = ╱54╱T╱ // 0xb6c @0x20
0x0b4c…0b75 at0021 = ╱41╱A╱ // 0xb6d @0x21
0x0b4c…0b75 at0022 = ╱4c╱L╱ // 0xb6e @0x22
0x0b4c…0b75 at0023 = ╱ef╱$╱ // 0xb6f @0x23
0x0b4c…0b75 at0024 = ╱ed╱(╱ // 0xb70 @0x24
0x0b4c…0b75 at0025 = ╱47╱G╱ // 0xb71 @0x25
0x0b4c…0b75 at0026 = ╱ee╱)╱ // 0xb72 @0x26
0x0b4c…0b75 at0027 = ╱ee╱)╱ // 0xb73 @0x27
0x0b4c…0b75 at0028 = EOL // 0xb74 @0x28
0x0b4c…0b75 }
0x0b75…0b7b 98d2 3060 ENDIF
0x0b75…0b7b LineComalBin {
0x0b75…0b7b ptr = 0x98d2 // 0xb75 @0x0
0x0b75…0b7b lno = 0x0bf4 // 0xb77 @0x2
0x0b75…0b7b at0004 = ╱9b╱ ENDIF ╱ // 0xb79 @0x4
0x0b75…0b7b at0005 = EOL // 0xb7a @0x5
0x0b75…0b7b }
0x0b7b…0b9c 98f3 3070 EXEC CALC(4,LIN$,TAH$,LIN$)
0x0b7b…0b9c LineComalBin {
0x0b7b…0b9c ptr = 0x98f3 // 0xb7b @0x0
0x0b7b…0b9c lno = 0x0bfe // 0xb7d @0x2
0x0b7b…0b9c at0004 = ╱9d╱ EXEC ╱ // 0xb7f @0x4
0x0b7b…0b9c at0005 = ╱43╱C╱ // 0xb80 @0x5
0x0b7b…0b9c at0006 = ╱41╱A╱ // 0xb81 @0x6
0x0b7b…0b9c at0007 = ╱4c╱L╱ // 0xb82 @0x7
0x0b7b…0b9c at0008 = ╱43╱C╱ // 0xb83 @0x8
0x0b7b…0b9c at0009 = ╱ed╱(╱ // 0xb84 @0x9
0x0b7b…0b9c at000a = ╱34╱4╱ // 0xb85 @0xa
0x0b7b…0b9c at000b = ╱fe00008003╱ // 0xb86 @0xb
0x0b7b…0b9c at0010 = ╱ec╱,╱ // 0xb8b @0x10
0x0b7b…0b9c at0011 = ╱4c╱L╱ // 0xb8c @0x11
0x0b7b…0b9c at0012 = ╱49╱I╱ // 0xb8d @0x12
0x0b7b…0b9c at0013 = ╱4e╱N╱ // 0xb8e @0x13
0x0b7b…0b9c at0014 = ╱ef╱$╱ // 0xb8f @0x14
0x0b7b…0b9c at0015 = ╱ec╱,╱ // 0xb90 @0x15
0x0b7b…0b9c at0016 = ╱54╱T╱ // 0xb91 @0x16
0x0b7b…0b9c at0017 = ╱41╱A╱ // 0xb92 @0x17
0x0b7b…0b9c at0018 = ╱48╱H╱ // 0xb93 @0x18
0x0b7b…0b9c at0019 = ╱ef╱$╱ // 0xb94 @0x19
0x0b7b…0b9c at001a = ╱ec╱,╱ // 0xb95 @0x1a
0x0b7b…0b9c at001b = ╱4c╱L╱ // 0xb96 @0x1b
0x0b7b…0b9c at001c = ╱49╱I╱ // 0xb97 @0x1c
0x0b7b…0b9c at001d = ╱4e╱N╱ // 0xb98 @0x1d
0x0b7b…0b9c at001e = ╱ef╱$╱ // 0xb99 @0x1e
0x0b7b…0b9c at001f = ╱ee╱)╱ // 0xb9a @0x1f
0x0b7b…0b9c at0020 = EOL // 0xb9b @0x20
0x0b7b…0b9c }
0x0b9c…0ba7 98fe 3080 IF SI<>B THEN
0x0b9c…0ba7 LineComalBin {
0x0b9c…0ba7 ptr = 0x98fe // 0xb9c @0x0
0x0b9c…0ba7 lno = 0x0c08 // 0xb9e @0x2
0x0b9c…0ba7 at0004 = ╱9c╱ IF ╱ // 0xba0 @0x4
0x0b9c…0ba7 at0005 = ╱53╱S╱ // 0xba1 @0x5
0x0b9c…0ba7 at0006 = ╱49╱I╱ // 0xba2 @0x6
0x0b9c…0ba7 at0007 = ╱e1╱<>╱ // 0xba3 @0x7
0x0b9c…0ba7 at0008 = ╱42╱B╱ // 0xba4 @0x8
0x0b9c…0ba7 at0009 = ╱b6╱ THEN ╱ // 0xba5 @0x9
0x0b9c…0ba7 at000a = EOL // 0xba6 @0xa
0x0b9c…0ba7 }
0x0ba7…0bb2 9909 3090 OUTP=E
0x0ba7…0bb2 LineComalBin {
0x0ba7…0bb2 ptr = 0x9909 // 0xba7 @0x0
0x0ba7…0bb2 lno = 0x0c12 // 0xba9 @0x2
0x0ba7…0bb2 at0004 = ╱4f╱O╱ // 0xbab @0x4
0x0ba7…0bb2 at0005 = ╱55╱U╱ // 0xbac @0x5
0x0ba7…0bb2 at0006 = ╱54╱T╱ // 0xbad @0x6
0x0ba7…0bb2 at0007 = ╱50╱P╱ // 0xbae @0x7
0x0ba7…0bb2 at0008 = ╱dc╱=╱ // 0xbaf @0x8
0x0ba7…0bb2 at0009 = ╱45╱E╱ // 0xbb0 @0x9
0x0ba7…0bb2 at000a = EOL // 0xbb1 @0xa
0x0ba7…0bb2 }
0x0bb2…0bd8 992f 3100 EXEC CALC(B,LIN$,TOTAL$(V),TOTAL$(V))
0x0bb2…0bd8 LineComalBin {
0x0bb2…0bd8 ptr = 0x992f // 0xbb2 @0x0
0x0bb2…0bd8 lno = 0x0c1c // 0xbb4 @0x2
0x0bb2…0bd8 at0004 = ╱9d╱ EXEC ╱ // 0xbb6 @0x4
0x0bb2…0bd8 at0005 = ╱43╱C╱ // 0xbb7 @0x5
0x0bb2…0bd8 at0006 = ╱41╱A╱ // 0xbb8 @0x6
0x0bb2…0bd8 at0007 = ╱4c╱L╱ // 0xbb9 @0x7
0x0bb2…0bd8 at0008 = ╱43╱C╱ // 0xbba @0x8
0x0bb2…0bd8 at0009 = ╱ed╱(╱ // 0xbbb @0x9
0x0bb2…0bd8 at000a = ╱42╱B╱ // 0xbbc @0xa
0x0bb2…0bd8 at000b = ╱ec╱,╱ // 0xbbd @0xb
0x0bb2…0bd8 at000c = ╱4c╱L╱ // 0xbbe @0xc
0x0bb2…0bd8 at000d = ╱49╱I╱ // 0xbbf @0xd
0x0bb2…0bd8 at000e = ╱4e╱N╱ // 0xbc0 @0xe
0x0bb2…0bd8 at000f = ╱ef╱$╱ // 0xbc1 @0xf
0x0bb2…0bd8 at0010 = ╱ec╱,╱ // 0xbc2 @0x10
0x0bb2…0bd8 at0011 = ╱54╱T╱ // 0xbc3 @0x11
0x0bb2…0bd8 at0012 = ╱4f╱O╱ // 0xbc4 @0x12
0x0bb2…0bd8 at0013 = ╱54╱T╱ // 0xbc5 @0x13
0x0bb2…0bd8 at0014 = ╱41╱A╱ // 0xbc6 @0x14
0x0bb2…0bd8 at0015 = ╱4c╱L╱ // 0xbc7 @0x15
0x0bb2…0bd8 at0016 = ╱ef╱$╱ // 0xbc8 @0x16
0x0bb2…0bd8 at0017 = ╱ed╱(╱ // 0xbc9 @0x17
0x0bb2…0bd8 at0018 = ╱56╱V╱ // 0xbca @0x18
0x0bb2…0bd8 at0019 = ╱ee╱)╱ // 0xbcb @0x19
0x0bb2…0bd8 at001a = ╱ec╱,╱ // 0xbcc @0x1a
0x0bb2…0bd8 at001b = ╱54╱T╱ // 0xbcd @0x1b
0x0bb2…0bd8 at001c = ╱4f╱O╱ // 0xbce @0x1c
0x0bb2…0bd8 at001d = ╱54╱T╱ // 0xbcf @0x1d
0x0bb2…0bd8 at001e = ╱41╱A╱ // 0xbd0 @0x1e
0x0bb2…0bd8 at001f = ╱4c╱L╱ // 0xbd1 @0x1f
0x0bb2…0bd8 at0020 = ╱ef╱$╱ // 0xbd2 @0x20
0x0bb2…0bd8 at0021 = ╱ed╱(╱ // 0xbd3 @0x21
0x0bb2…0bd8 at0022 = ╱56╱V╱ // 0xbd4 @0x22
0x0bb2…0bd8 at0023 = ╱ee╱)╱ // 0xbd5 @0x23
0x0bb2…0bd8 at0024 = ╱ee╱)╱ // 0xbd6 @0x24
0x0bb2…0bd8 at0025 = EOL // 0xbd7 @0x25
0x0bb2…0bd8 }
0x0bd8…0bde 9935 3110 ENDIF
0x0bd8…0bde LineComalBin {
0x0bd8…0bde ptr = 0x9935 // 0xbd8 @0x0
0x0bd8…0bde lno = 0x0c26 // 0xbda @0x2
0x0bd8…0bde at0004 = ╱9b╱ ENDIF ╱ // 0xbdc @0x4
0x0bd8…0bde at0005 = EOL // 0xbdd @0x5
0x0bd8…0bde }
0x0bde…0be9 9940 3120 IF OUTP THEN
0x0bde…0be9 LineComalBin {
0x0bde…0be9 ptr = 0x9940 // 0xbde @0x0
0x0bde…0be9 lno = 0x0c30 // 0xbe0 @0x2
0x0bde…0be9 at0004 = ╱9c╱ IF ╱ // 0xbe2 @0x4
0x0bde…0be9 at0005 = ╱4f╱O╱ // 0xbe3 @0x5
0x0bde…0be9 at0006 = ╱55╱U╱ // 0xbe4 @0x6
0x0bde…0be9 at0007 = ╱54╱T╱ // 0xbe5 @0x7
0x0bde…0be9 at0008 = ╱50╱P╱ // 0xbe6 @0x8
0x0bde…0be9 at0009 = ╱b6╱ THEN ╱ // 0xbe7 @0x9
0x0bde…0be9 at000a = EOL // 0xbe8 @0xa
0x0bde…0be9 }
0x0be9…0bfb 9952 3130 LINIE=LINIE+E
0x0be9…0bfb LineComalBin {
0x0be9…0bfb ptr = 0x9952 // 0xbe9 @0x0
0x0be9…0bfb lno = 0x0c3a // 0xbeb @0x2
0x0be9…0bfb at0004 = ╱4c╱L╱ // 0xbed @0x4
0x0be9…0bfb at0005 = ╱49╱I╱ // 0xbee @0x5
0x0be9…0bfb at0006 = ╱4e╱N╱ // 0xbef @0x6
0x0be9…0bfb at0007 = ╱49╱I╱ // 0xbf0 @0x7
0x0be9…0bfb at0008 = ╱45╱E╱ // 0xbf1 @0x8
0x0be9…0bfb at0009 = ╱dc╱=╱ // 0xbf2 @0x9
0x0be9…0bfb at000a = ╱4c╱L╱ // 0xbf3 @0xa
0x0be9…0bfb at000b = ╱49╱I╱ // 0xbf4 @0xb
0x0be9…0bfb at000c = ╱4e╱N╱ // 0xbf5 @0xc
0x0be9…0bfb at000d = ╱49╱I╱ // 0xbf6 @0xd
0x0be9…0bfb at000e = ╱45╱E╱ // 0xbf7 @0xe
0x0be9…0bfb at000f = ╱e2╱+╱ // 0xbf8 @0xf
0x0be9…0bfb at0010 = ╱45╱E╱ // 0xbf9 @0x10
0x0be9…0bfb at0011 = EOL // 0xbfa @0x11
0x0be9…0bfb }
0x0bfb…0c15 996c 3140 IF LINIE>MAXLIN-6 THEN
0x0bfb…0c15 LineComalBin {
0x0bfb…0c15 ptr = 0x996c // 0xbfb @0x0
0x0bfb…0c15 lno = 0x0c44 // 0xbfd @0x2
0x0bfb…0c15 at0004 = ╱9c╱ IF ╱ // 0xbff @0x4
0x0bfb…0c15 at0005 = ╱4c╱L╱ // 0xc00 @0x5
0x0bfb…0c15 at0006 = ╱49╱I╱ // 0xc01 @0x6
0x0bfb…0c15 at0007 = ╱4e╱N╱ // 0xc02 @0x7
0x0bfb…0c15 at0008 = ╱49╱I╱ // 0xc03 @0x8
0x0bfb…0c15 at0009 = ╱45╱E╱ // 0xc04 @0x9
0x0bfb…0c15 at000a = ╱de╱>╱ // 0xc05 @0xa
0x0bfb…0c15 at000b = ╱4d╱M╱ // 0xc06 @0xb
0x0bfb…0c15 at000c = ╱41╱A╱ // 0xc07 @0xc
0x0bfb…0c15 at000d = ╱58╱X╱ // 0xc08 @0xd
0x0bfb…0c15 at000e = ╱4c╱L╱ // 0xc09 @0xe
0x0bfb…0c15 at000f = ╱49╱I╱ // 0xc0a @0xf
0x0bfb…0c15 at0010 = ╱4e╱N╱ // 0xc0b @0x10
0x0bfb…0c15 at0011 = ╱e3╱-╱ // 0xc0c @0x11
0x0bfb…0c15 at0012 = ╱36╱6╱ // 0xc0d @0x12
0x0bfb…0c15 at0013 = ╱fe0000c003╱ // 0xc0e @0x13
0x0bfb…0c15 at0018 = ╱b6╱ THEN ╱ // 0xc13 @0x18
0x0bfb…0c15 at0019 = EOL // 0xc14 @0x19
0x0bfb…0c15 }
0x0c15…0c27 997e 3150 WHILE LINIE<MAXLIN
0x0c15…0c27 LineComalBin {
0x0c15…0c27 ptr = 0x997e // 0xc15 @0x0
0x0c15…0c27 lno = 0x0c4e // 0xc17 @0x2
0x0c15…0c27 at0004 = ╱93╱ WHILE ╱ // 0xc19 @0x4
0x0c15…0c27 at0005 = ╱4c╱L╱ // 0xc1a @0x5
0x0c15…0c27 at0006 = ╱49╱I╱ // 0xc1b @0x6
0x0c15…0c27 at0007 = ╱4e╱N╱ // 0xc1c @0x7
0x0c15…0c27 at0008 = ╱49╱I╱ // 0xc1d @0x8
0x0c15…0c27 at0009 = ╱45╱E╱ // 0xc1e @0x9
0x0c15…0c27 at000a = ╱dd╱<╱ // 0xc1f @0xa
0x0c15…0c27 at000b = ╱4d╱M╱ // 0xc20 @0xb
0x0c15…0c27 at000c = ╱41╱A╱ // 0xc21 @0xc
0x0c15…0c27 at000d = ╱58╱X╱ // 0xc22 @0xd
0x0c15…0c27 at000e = ╱4c╱L╱ // 0xc23 @0xe
0x0c15…0c27 at000f = ╱49╱I╱ // 0xc24 @0xf
0x0c15…0c27 at0010 = ╱4e╱N╱ // 0xc25 @0x10
0x0c15…0c27 at0011 = EOL // 0xc26 @0x11
0x0c15…0c27 }
0x0c27…0c2d 9984 3160 PRINT
0x0c27…0c2d LineComalBin {
0x0c27…0c2d ptr = 0x9984 // 0xc27 @0x0
0x0c27…0c2d lno = 0x0c58 // 0xc29 @0x2
0x0c27…0c2d at0004 = ╱92╱ PRINT ╱ // 0xc2b @0x4
0x0c27…0c2d at0005 = EOL // 0xc2c @0x5
0x0c27…0c2d }
0x0c2d…0c3f 9996 3170 LINIE=LINIE+E
0x0c2d…0c3f LineComalBin {
0x0c2d…0c3f ptr = 0x9996 // 0xc2d @0x0
0x0c2d…0c3f lno = 0x0c62 // 0xc2f @0x2
0x0c2d…0c3f at0004 = ╱4c╱L╱ // 0xc31 @0x4
0x0c2d…0c3f at0005 = ╱49╱I╱ // 0xc32 @0x5
0x0c2d…0c3f at0006 = ╱4e╱N╱ // 0xc33 @0x6
0x0c2d…0c3f at0007 = ╱49╱I╱ // 0xc34 @0x7
0x0c2d…0c3f at0008 = ╱45╱E╱ // 0xc35 @0x8
0x0c2d…0c3f at0009 = ╱dc╱=╱ // 0xc36 @0x9
0x0c2d…0c3f at000a = ╱4c╱L╱ // 0xc37 @0xa
0x0c2d…0c3f at000b = ╱49╱I╱ // 0xc38 @0xb
0x0c2d…0c3f at000c = ╱4e╱N╱ // 0xc39 @0xc
0x0c2d…0c3f at000d = ╱49╱I╱ // 0xc3a @0xd
0x0c2d…0c3f at000e = ╱45╱E╱ // 0xc3b @0xe
0x0c2d…0c3f at000f = ╱e2╱+╱ // 0xc3c @0xf
0x0c2d…0c3f at0010 = ╱45╱E╱ // 0xc3d @0x10
0x0c2d…0c3f at0011 = EOL // 0xc3e @0x11
0x0c2d…0c3f }
0x0c3f…0c45 999c 3180 ENDWHILE
0x0c3f…0c45 LineComalBin {
0x0c3f…0c45 ptr = 0x999c // 0xc3f @0x0
0x0c3f…0c45 lno = 0x0c6c // 0xc41 @0x2
0x0c3f…0c45 at0004 = ╱94╱ ENDWHILE ╱ // 0xc43 @0x4
0x0c3f…0c45 at0005 = EOL // 0xc44 @0x5
0x0c3f…0c45 }
0x0c45…0c4b 99a2 3190 PRINT
0x0c45…0c4b LineComalBin {
0x0c45…0c4b ptr = 0x99a2 // 0xc45 @0x0
0x0c45…0c4b lno = 0x0c76 // 0xc47 @0x2
0x0c45…0c4b at0004 = ╱92╱ PRINT ╱ // 0xc49 @0x4
0x0c45…0c4b at0005 = EOL // 0xc4a @0x5
0x0c45…0c4b }
0x0c4b…0c5d 99b4 3195 SLJNR=SLJNR+E
0x0c4b…0c5d LineComalBin {
0x0c4b…0c5d ptr = 0x99b4 // 0xc4b @0x0
0x0c4b…0c5d lno = 0x0c7b // 0xc4d @0x2
0x0c4b…0c5d at0004 = ╱53╱S╱ // 0xc4f @0x4
0x0c4b…0c5d at0005 = ╱4c╱L╱ // 0xc50 @0x5
0x0c4b…0c5d at0006 = ╱4a╱J╱ // 0xc51 @0x6
0x0c4b…0c5d at0007 = ╱4e╱N╱ // 0xc52 @0x7
0x0c4b…0c5d at0008 = ╱52╱R╱ // 0xc53 @0x8
0x0c4b…0c5d at0009 = ╱dc╱=╱ // 0xc54 @0x9
0x0c4b…0c5d at000a = ╱53╱S╱ // 0xc55 @0xa
0x0c4b…0c5d at000b = ╱4c╱L╱ // 0xc56 @0xb
0x0c4b…0c5d at000c = ╱4a╱J╱ // 0xc57 @0xc
0x0c4b…0c5d at000d = ╱4e╱N╱ // 0xc58 @0xd
0x0c4b…0c5d at000e = ╱52╱R╱ // 0xc59 @0xe
0x0c4b…0c5d at000f = ╱e2╱+╱ // 0xc5a @0xf
0x0c4b…0c5d at0010 = ╱45╱E╱ // 0xc5b @0x10
0x0c4b…0c5d at0011 = EOL // 0xc5c @0x11
0x0c4b…0c5d }
0x0c5d…0c77 99ce 3196 PRINT USING " SIDE ####":SLJNR;
0x0c5d…0c77 LineComalBin {
0x0c5d…0c77 ptr = 0x99ce // 0xc5d @0x0
0x0c5d…0c77 lno = 0x0c7c // 0xc5f @0x2
0x0c5d…0c77 at0004 = ╱92╱ PRINT ╱ // 0xc61 @0x4
0x0c5d…0c77 at0005 = ╱b9╱ USING ╱ // 0xc62 @0x5
0x0c5d…0c77 at0006 = ╱22╱"╱ // 0xc63 @0x6
0x0c5d…0c77 at0007 = ╱20╱…╱ // 0xc64 @0x7
0x0c5d…0c77 at0008 = ╱53╱S╱ // 0xc65 @0x8
0x0c5d…0c77 at0009 = ╱49╱I╱ // 0xc66 @0x9
0x0c5d…0c77 at000a = ╱44╱D╱ // 0xc67 @0xa
0x0c5d…0c77 at000b = ╱45╱E╱ // 0xc68 @0xb
0x0c5d…0c77 at000c = ╱20╱…╱ // 0xc69 @0xc
0x0c5d…0c77 at000d = ╱23╱#╱ // 0xc6a @0xd
0x0c5d…0c77 at000e = ╱23╱#╱ // 0xc6b @0xe
0x0c5d…0c77 at000f = ╱23╱#╱ // 0xc6c @0xf
0x0c5d…0c77 at0010 = ╱23╱#╱ // 0xc6d @0x10
0x0c5d…0c77 at0011 = ╱22╱"╱ // 0xc6e @0x11
0x0c5d…0c77 at0012 = ╱f0╱:╱ // 0xc6f @0x12
0x0c5d…0c77 at0013 = ╱53╱S╱ // 0xc70 @0x13
0x0c5d…0c77 at0014 = ╱4c╱L╱ // 0xc71 @0x14
0x0c5d…0c77 at0015 = ╱4a╱J╱ // 0xc72 @0x15
0x0c5d…0c77 at0016 = ╱4e╱N╱ // 0xc73 @0x16
0x0c5d…0c77 at0017 = ╱52╱R╱ // 0xc74 @0x17
0x0c5d…0c77 at0018 = ╱eb╱;╱ // 0xc75 @0x18
0x0c5d…0c77 at0019 = EOL // 0xc76 @0x19
0x0c5d…0c77 }
0x0c77…0c98 99ef 3198 PRINT " UDSKRIFTSDATO ";DAD$;
0x0c77…0c98 LineComalBin {
0x0c77…0c98 ptr = 0x99ef // 0xc77 @0x0
0x0c77…0c98 lno = 0x0c7e // 0xc79 @0x2
0x0c77…0c98 at0004 = ╱92╱ PRINT ╱ // 0xc7b @0x4
0x0c77…0c98 at0005 = ╱22╱"╱ // 0xc7c @0x5
0x0c77…0c98 at0006 = ╱20╱…╱ // 0xc7d @0x6
0x0c77…0c98 at0007 = ╱20╱…╱ // 0xc7e @0x7
0x0c77…0c98 at0008 = ╱20╱…╱ // 0xc7f @0x8
0x0c77…0c98 at0009 = ╱20╱…╱ // 0xc80 @0x9
0x0c77…0c98 at000a = ╱20╱…╱ // 0xc81 @0xa
0x0c77…0c98 at000b = ╱55╱U╱ // 0xc82 @0xb
0x0c77…0c98 at000c = ╱44╱D╱ // 0xc83 @0xc
0x0c77…0c98 at000d = ╱53╱S╱ // 0xc84 @0xd
0x0c77…0c98 at000e = ╱4b╱K╱ // 0xc85 @0xe
0x0c77…0c98 at000f = ╱52╱R╱ // 0xc86 @0xf
0x0c77…0c98 at0010 = ╱49╱I╱ // 0xc87 @0x10
0x0c77…0c98 at0011 = ╱46╱F╱ // 0xc88 @0x11
0x0c77…0c98 at0012 = ╱54╱T╱ // 0xc89 @0x12
0x0c77…0c98 at0013 = ╱53╱S╱ // 0xc8a @0x13
0x0c77…0c98 at0014 = ╱44╱D╱ // 0xc8b @0x14
0x0c77…0c98 at0015 = ╱41╱A╱ // 0xc8c @0x15
0x0c77…0c98 at0016 = ╱54╱T╱ // 0xc8d @0x16
0x0c77…0c98 at0017 = ╱4f╱O╱ // 0xc8e @0x17
0x0c77…0c98 at0018 = ╱20╱…╱ // 0xc8f @0x18
0x0c77…0c98 at0019 = ╱22╱"╱ // 0xc90 @0x19
0x0c77…0c98 at001a = ╱eb╱;╱ // 0xc91 @0x1a
0x0c77…0c98 at001b = ╱44╱D╱ // 0xc92 @0x1b
0x0c77…0c98 at001c = ╱41╱A╱ // 0xc93 @0x1c
0x0c77…0c98 at001d = ╱44╱D╱ // 0xc94 @0x1d
0x0c77…0c98 at001e = ╱ef╱$╱ // 0xc95 @0x1e
0x0c77…0c98 at001f = ╱eb╱;╱ // 0xc96 @0x1f
0x0c77…0c98 at0020 = EOL // 0xc97 @0x20
0x0c77…0c98 }
0x0c98…0cd1 9a28 3200 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$;
0x0c98…0cd1 LineComalBin {
0x0c98…0cd1 ptr = 0x9a28 // 0xc98 @0x0
0x0c98…0cd1 lno = 0x0c80 // 0xc9a @0x2
0x0c98…0cd1 at0004 = ╱92╱ PRINT ╱ // 0xc9c @0x4
0x0c98…0cd1 at0005 = ╱d2╱TAB╱ // 0xc9d @0x5
0x0c98…0cd1 at0006 = ╱ed╱(╱ // 0xc9e @0x6
0x0c98…0cd1 at0007 = ╱34╱4╱ // 0xc9f @0x7
0x0c98…0cd1 at0008 = ╱39╱9╱ // 0xca0 @0x8
0x0c98…0cd1 at0009 = ╱fe0000c406╱ // 0xca1 @0x9
0x0c98…0cd1 at000e = ╱ee╱)╱ // 0xca6 @0xe
0x0c98…0cd1 at000f = ╱eb╱;╱ // 0xca7 @0xf
0x0c98…0cd1 at0010 = ╱22╱"╱ // 0xca8 @0x10
0x0c98…0cd1 at0011 = ╱4c╱L╱ // 0xca9 @0x11
0x0c98…0cd1 at0012 = ╱5c╱Ø╱ // 0xcaa @0x12
0x0c98…0cd1 at0013 = ╱4e╱N╱ // 0xcab @0x13
0x0c98…0cd1 at0014 = ╱50╱P╱ // 0xcac @0x14
0x0c98…0cd1 at0015 = ╱45╱E╱ // 0xcad @0x15
0x0c98…0cd1 at0016 = ╱52╱R╱ // 0xcae @0x16
0x0c98…0cd1 at0017 = ╱49╱I╱ // 0xcaf @0x17
0x0c98…0cd1 at0018 = ╱4f╱O╱ // 0xcb0 @0x18
0x0c98…0cd1 at0019 = ╱44╱D╱ // 0xcb1 @0x19
0x0c98…0cd1 at001a = ╱45╱E╱ // 0xcb2 @0x1a
0x0c98…0cd1 at001b = ╱4e╱N╱ // 0xcb3 @0x1b
0x0c98…0cd1 at001c = ╱20╱…╱ // 0xcb4 @0x1c
0x0c98…0cd1 at001d = ╱22╱"╱ // 0xcb5 @0x1d
0x0c98…0cd1 at001e = ╱eb╱;╱ // 0xcb6 @0x1e
0x0c98…0cd1 at001f = ╱53╱S╱ // 0xcb7 @0x1f
0x0c98…0cd1 at0020 = ╱54╱T╱ // 0xcb8 @0x20
0x0c98…0cd1 at0021 = ╱41╱A╱ // 0xcb9 @0x21
0x0c98…0cd1 at0022 = ╱52╱R╱ // 0xcba @0x22
0x0c98…0cd1 at0023 = ╱54╱T╱ // 0xcbb @0x23
0x0c98…0cd1 at0024 = ╱50╱P╱ // 0xcbc @0x24
0x0c98…0cd1 at0025 = ╱45╱E╱ // 0xcbd @0x25
0x0c98…0cd1 at0026 = ╱52╱R╱ // 0xcbe @0x26
0x0c98…0cd1 at0027 = ╱ef╱$╱ // 0xcbf @0x27
0x0c98…0cd1 at0028 = ╱eb╱;╱ // 0xcc0 @0x28
0x0c98…0cd1 at0029 = ╱22╱"╱ // 0xcc1 @0x29
0x0c98…0cd1 at002a = ╱20╱…╱ // 0xcc2 @0x2a
0x0c98…0cd1 at002b = ╱2f╱/╱ // 0xcc3 @0x2b
0x0c98…0cd1 at002c = ╱20╱…╱ // 0xcc4 @0x2c
0x0c98…0cd1 at002d = ╱22╱"╱ // 0xcc5 @0x2d
0x0c98…0cd1 at002e = ╱eb╱;╱ // 0xcc6 @0x2e
0x0c98…0cd1 at002f = ╱53╱S╱ // 0xcc7 @0x2f
0x0c98…0cd1 at0030 = ╱4c╱L╱ // 0xcc8 @0x30
0x0c98…0cd1 at0031 = ╱55╱U╱ // 0xcc9 @0x31
0x0c98…0cd1 at0032 = ╱54╱T╱ // 0xcca @0x32
0x0c98…0cd1 at0033 = ╱50╱P╱ // 0xccb @0x33
0x0c98…0cd1 at0034 = ╱45╱E╱ // 0xccc @0x34
0x0c98…0cd1 at0035 = ╱52╱R╱ // 0xccd @0x35
0x0c98…0cd1 at0036 = ╱ef╱$╱ // 0xcce @0x36
0x0c98…0cd1 at0037 = ╱eb╱;╱ // 0xccf @0x37
0x0c98…0cd1 at0038 = EOL // 0xcd0 @0x38
0x0c98…0cd1 }
0x0cd1…0cd7 9a2e 3205 PRINT
0x0cd1…0cd7 LineComalBin {
0x0cd1…0cd7 ptr = 0x9a2e // 0xcd1 @0x0
0x0cd1…0cd7 lno = 0x0c85 // 0xcd3 @0x2
0x0cd1…0cd7 at0004 = ╱92╱ PRINT ╱ // 0xcd5 @0x4
0x0cd1…0cd7 at0005 = EOL // 0xcd6 @0x5
0x0cd1…0cd7 }
0x0cd7…0cdd 9a34 3207 PRINT
0x0cd7…0cdd LineComalBin {
0x0cd7…0cdd ptr = 0x9a34 // 0xcd7 @0x0
0x0cd7…0cdd lno = 0x0c87 // 0xcd9 @0x2
0x0cd7…0cdd at0004 = ╱92╱ PRINT ╱ // 0xcdb @0x4
0x0cd7…0cdd at0005 = EOL // 0xcdc @0x5
0x0cd7…0cdd }
0x0cdd…0ce3 9a3a 3210 PRINT
0x0cdd…0ce3 LineComalBin {
0x0cdd…0ce3 ptr = 0x9a3a // 0xcdd @0x0
0x0cdd…0ce3 lno = 0x0c8a // 0xcdf @0x2
0x0cdd…0ce3 at0004 = ╱92╱ PRINT ╱ // 0xce1 @0x4
0x0cdd…0ce3 at0005 = EOL // 0xce2 @0x5
0x0cdd…0ce3 }
0x0ce3…0cf4 9a4b 3220 LINIE=5
0x0ce3…0cf4 LineComalBin {
0x0ce3…0cf4 ptr = 0x9a4b // 0xce3 @0x0
0x0ce3…0cf4 lno = 0x0c94 // 0xce5 @0x2
0x0ce3…0cf4 at0004 = ╱4c╱L╱ // 0xce7 @0x4
0x0ce3…0cf4 at0005 = ╱49╱I╱ // 0xce8 @0x5
0x0ce3…0cf4 at0006 = ╱4e╱N╱ // 0xce9 @0x6
0x0ce3…0cf4 at0007 = ╱49╱I╱ // 0xcea @0x7
0x0ce3…0cf4 at0008 = ╱45╱E╱ // 0xceb @0x8
0x0ce3…0cf4 at0009 = ╱dc╱=╱ // 0xcec @0x9
0x0ce3…0cf4 at000a = ╱35╱5╱ // 0xced @0xa
0x0ce3…0cf4 at000b = ╱fe0000a003╱ // 0xcee @0xb
0x0ce3…0cf4 at0010 = EOL // 0xcf3 @0x10
0x0ce3…0cf4 }
0x0cf4…0d3d 9a94 3240 PRINT " Lønnr";TAB(14);"Trækpligtig A-indk Trækfri A-indk";TAB(57);
0x0cf4…0d3d LineComalBin {
0x0cf4…0d3d ptr = 0x9a94 // 0xcf4 @0x0
0x0cf4…0d3d lno = 0x0ca8 // 0xcf6 @0x2
0x0cf4…0d3d at0004 = ╱92╱ PRINT ╱ // 0xcf8 @0x4
0x0cf4…0d3d at0005 = ╱22╱"╱ // 0xcf9 @0x5
0x0cf4…0d3d at0006 = ╱20╱…╱ // 0xcfa @0x6
0x0cf4…0d3d at0007 = ╱4c╱L╱ // 0xcfb @0x7
0x0cf4…0d3d at0008 = ╱7c╱ø╱ // 0xcfc @0x8
0x0cf4…0d3d at0009 = ╱6e╱n╱ // 0xcfd @0x9
0x0cf4…0d3d at000a = ╱6e╱n╱ // 0xcfe @0xa
0x0cf4…0d3d at000b = ╱72╱r╱ // 0xcff @0xb
0x0cf4…0d3d at000c = ╱22╱"╱ // 0xd00 @0xc
0x0cf4…0d3d at000d = ╱eb╱;╱ // 0xd01 @0xd
0x0cf4…0d3d at000e = ╱d2╱TAB╱ // 0xd02 @0xe
0x0cf4…0d3d at000f = ╱ed╱(╱ // 0xd03 @0xf
0x0cf4…0d3d at0010 = ╱31╱1╱ // 0xd04 @0x10
0x0cf4…0d3d at0011 = ╱34╱4╱ // 0xd05 @0x11
0x0cf4…0d3d at0012 = ╱fe0000e004╱ // 0xd06 @0x12
0x0cf4…0d3d at0017 = ╱ee╱)╱ // 0xd0b @0x17
0x0cf4…0d3d at0018 = ╱eb╱;╱ // 0xd0c @0x18
0x0cf4…0d3d at0019 = ╱22╱"╱ // 0xd0d @0x19
0x0cf4…0d3d at001a = ╱54╱T╱ // 0xd0e @0x1a
0x0cf4…0d3d at001b = ╱72╱r╱ // 0xd0f @0x1b
0x0cf4…0d3d at001c = ╱7b╱æ╱ // 0xd10 @0x1c
0x0cf4…0d3d at001d = ╱6b╱k╱ // 0xd11 @0x1d
0x0cf4…0d3d at001e = ╱70╱p╱ // 0xd12 @0x1e
0x0cf4…0d3d at001f = ╱6c╱l╱ // 0xd13 @0x1f
0x0cf4…0d3d at0020 = ╱69╱i╱ // 0xd14 @0x20
0x0cf4…0d3d at0021 = ╱67╱g╱ // 0xd15 @0x21
0x0cf4…0d3d at0022 = ╱74╱t╱ // 0xd16 @0x22
0x0cf4…0d3d at0023 = ╱69╱i╱ // 0xd17 @0x23
0x0cf4…0d3d at0024 = ╱67╱g╱ // 0xd18 @0x24
0x0cf4…0d3d at0025 = ╱20╱…╱ // 0xd19 @0x25
0x0cf4…0d3d at0026 = ╱41╱A╱ // 0xd1a @0x26
0x0cf4…0d3d at0027 = ╱2d╱-╱ // 0xd1b @0x27
0x0cf4…0d3d at0028 = ╱69╱i╱ // 0xd1c @0x28
0x0cf4…0d3d at0029 = ╱6e╱n╱ // 0xd1d @0x29
0x0cf4…0d3d at002a = ╱64╱d╱ // 0xd1e @0x2a
0x0cf4…0d3d at002b = ╱6b╱k╱ // 0xd1f @0x2b
0x0cf4…0d3d at002c = ╱20╱…╱ // 0xd20 @0x2c
0x0cf4…0d3d at002d = ╱54╱T╱ // 0xd21 @0x2d
0x0cf4…0d3d at002e = ╱72╱r╱ // 0xd22 @0x2e
0x0cf4…0d3d at002f = ╱7b╱æ╱ // 0xd23 @0x2f
0x0cf4…0d3d at0030 = ╱6b╱k╱ // 0xd24 @0x30
0x0cf4…0d3d at0031 = ╱66╱f╱ // 0xd25 @0x31
0x0cf4…0d3d at0032 = ╱72╱r╱ // 0xd26 @0x32
0x0cf4…0d3d at0033 = ╱69╱i╱ // 0xd27 @0x33
0x0cf4…0d3d at0034 = ╱20╱…╱ // 0xd28 @0x34
0x0cf4…0d3d at0035 = ╱41╱A╱ // 0xd29 @0x35
0x0cf4…0d3d at0036 = ╱2d╱-╱ // 0xd2a @0x36
0x0cf4…0d3d at0037 = ╱69╱i╱ // 0xd2b @0x37
0x0cf4…0d3d at0038 = ╱6e╱n╱ // 0xd2c @0x38
0x0cf4…0d3d at0039 = ╱64╱d╱ // 0xd2d @0x39
0x0cf4…0d3d at003a = ╱6b╱k╱ // 0xd2e @0x3a
0x0cf4…0d3d at003b = ╱22╱"╱ // 0xd2f @0x3b
0x0cf4…0d3d at003c = ╱eb╱;╱ // 0xd30 @0x3c
0x0cf4…0d3d at003d = ╱d2╱TAB╱ // 0xd31 @0x3d
0x0cf4…0d3d at003e = ╱ed╱(╱ // 0xd32 @0x3e
0x0cf4…0d3d at003f = ╱35╱5╱ // 0xd33 @0x3f
0x0cf4…0d3d at0040 = ╱37╱7╱ // 0xd34 @0x40
0x0cf4…0d3d at0041 = ╱fe0000e406╱ // 0xd35 @0x41
0x0cf4…0d3d at0046 = ╱ee╱)╱ // 0xd3a @0x46
0x0cf4…0d3d at0047 = ╱eb╱;╱ // 0xd3b @0x47
0x0cf4…0d3d at0048 = EOL // 0xd3c @0x48
0x0cf4…0d3d }
0x0d3d…0d4b 9aa2 3250 PRINT "A-skat"
0x0d3d…0d4b LineComalBin {
0x0d3d…0d4b ptr = 0x9aa2 // 0xd3d @0x0
0x0d3d…0d4b lno = 0x0cb2 // 0xd3f @0x2
0x0d3d…0d4b at0004 = ╱92╱ PRINT ╱ // 0xd41 @0x4
0x0d3d…0d4b at0005 = ╱22╱"╱ // 0xd42 @0x5
0x0d3d…0d4b at0006 = ╱41╱A╱ // 0xd43 @0x6
0x0d3d…0d4b at0007 = ╱2d╱-╱ // 0xd44 @0x7
0x0d3d…0d4b at0008 = ╱73╱s╱ // 0xd45 @0x8
0x0d3d…0d4b at0009 = ╱6b╱k╱ // 0xd46 @0x9
0x0d3d…0d4b at000a = ╱61╱a╱ // 0xd47 @0xa
0x0d3d…0d4b at000b = ╱74╱t╱ // 0xd48 @0xb
0x0d3d…0d4b at000c = ╱22╱"╱ // 0xd49 @0xc
0x0d3d…0d4b at000d = EOL // 0xd4a @0xd
0x0d3d…0d4b }
0x0d4b…0d5d 9ab4 3260 LINIE=LINIE+V
0x0d4b…0d5d LineComalBin {
0x0d4b…0d5d ptr = 0x9ab4 // 0xd4b @0x0
0x0d4b…0d5d lno = 0x0cbc // 0xd4d @0x2
0x0d4b…0d5d at0004 = ╱4c╱L╱ // 0xd4f @0x4
0x0d4b…0d5d at0005 = ╱49╱I╱ // 0xd50 @0x5
0x0d4b…0d5d at0006 = ╱4e╱N╱ // 0xd51 @0x6
0x0d4b…0d5d at0007 = ╱49╱I╱ // 0xd52 @0x7
0x0d4b…0d5d at0008 = ╱45╱E╱ // 0xd53 @0x8
0x0d4b…0d5d at0009 = ╱dc╱=╱ // 0xd54 @0x9
0x0d4b…0d5d at000a = ╱4c╱L╱ // 0xd55 @0xa
0x0d4b…0d5d at000b = ╱49╱I╱ // 0xd56 @0xb
0x0d4b…0d5d at000c = ╱4e╱N╱ // 0xd57 @0xc
0x0d4b…0d5d at000d = ╱49╱I╱ // 0xd58 @0xd
0x0d4b…0d5d at000e = ╱45╱E╱ // 0xd59 @0xe
0x0d4b…0d5d at000f = ╱e2╱+╱ // 0xd5a @0xf
0x0d4b…0d5d at0010 = ╱56╱V╱ // 0xd5b @0x10
0x0d4b…0d5d at0011 = EOL // 0xd5c @0x11
0x0d4b…0d5d }
0x0d5d…0d63 9aba 3262 ENDIF
0x0d5d…0d63 LineComalBin {
0x0d5d…0d63 ptr = 0x9aba // 0xd5d @0x0
0x0d5d…0d63 lno = 0x0cbe // 0xd5f @0x2
0x0d5d…0d63 at0004 = ╱9b╱ ENDIF ╱ // 0xd61 @0x4
0x0d5d…0d63 at0005 = EOL // 0xd62 @0x5
0x0d5d…0d63 }
0x0d63…0d90 9ae7 3264 IF RESUL$(12)="+" THEN RESUL$(12)=" "
0x0d63…0d90 LineComalBin {
0x0d63…0d90 ptr = 0x9ae7 // 0xd63 @0x0
0x0d63…0d90 lno = 0x0cc0 // 0xd65 @0x2
0x0d63…0d90 at0004 = ╱82╱ IF ╱ // 0xd67 @0x4
0x0d63…0d90 at0005 = ╱52╱R╱ // 0xd68 @0x5
0x0d63…0d90 at0006 = ╱45╱E╱ // 0xd69 @0x6
0x0d63…0d90 at0007 = ╱53╱S╱ // 0xd6a @0x7
0x0d63…0d90 at0008 = ╱55╱U╱ // 0xd6b @0x8
0x0d63…0d90 at0009 = ╱4c╱L╱ // 0xd6c @0x9
0x0d63…0d90 at000a = ╱ef╱$╱ // 0xd6d @0xa
0x0d63…0d90 at000b = ╱ed╱(╱ // 0xd6e @0xb
0x0d63…0d90 at000c = ╱31╱1╱ // 0xd6f @0xc
0x0d63…0d90 at000d = ╱32╱2╱ // 0xd70 @0xd
0x0d63…0d90 at000e = ╱fe0000c004╱ // 0xd71 @0xe
0x0d63…0d90 at0013 = ╱ee╱)╱ // 0xd76 @0x13
0x0d63…0d90 at0014 = ╱dc╱=╱ // 0xd77 @0x14
0x0d63…0d90 at0015 = ╱22╱"╱ // 0xd78 @0x15
0x0d63…0d90 at0016 = ╱2b╱+╱ // 0xd79 @0x16
0x0d63…0d90 at0017 = ╱22╱"╱ // 0xd7a @0x17
0x0d63…0d90 at0018 = ╱b6╱ THEN ╱ // 0xd7b @0x18
0x0d63…0d90 at0019 = ╱52╱R╱ // 0xd7c @0x19
0x0d63…0d90 at001a = ╱45╱E╱ // 0xd7d @0x1a
0x0d63…0d90 at001b = ╱53╱S╱ // 0xd7e @0x1b
0x0d63…0d90 at001c = ╱55╱U╱ // 0xd7f @0x1c
0x0d63…0d90 at001d = ╱4c╱L╱ // 0xd80 @0x1d
0x0d63…0d90 at001e = ╱ef╱$╱ // 0xd81 @0x1e
0x0d63…0d90 at001f = ╱ed╱(╱ // 0xd82 @0x1f
0x0d63…0d90 at0020 = ╱31╱1╱ // 0xd83 @0x20
0x0d63…0d90 at0021 = ╱32╱2╱ // 0xd84 @0x21
0x0d63…0d90 at0022 = ╱fe0000c004╱ // 0xd85 @0x22
0x0d63…0d90 at0027 = ╱ee╱)╱ // 0xd8a @0x27
0x0d63…0d90 at0028 = ╱dc╱=╱ // 0xd8b @0x28
0x0d63…0d90 at0029 = ╱22╱"╱ // 0xd8c @0x29
0x0d63…0d90 at002a = ╱20╱…╱ // 0xd8d @0x2a
0x0d63…0d90 at002b = ╱22╱"╱ // 0xd8e @0x2b
0x0d63…0d90 at002c = EOL // 0xd8f @0x2c
0x0d63…0d90 }
0x0d90…0dbf 9b16 3266 IF RESUL1$(12)="+" THEN RESUL1$(12)=" "
0x0d90…0dbf LineComalBin {
0x0d90…0dbf ptr = 0x9b16 // 0xd90 @0x0
0x0d90…0dbf lno = 0x0cc2 // 0xd92 @0x2
0x0d90…0dbf at0004 = ╱82╱ IF ╱ // 0xd94 @0x4
0x0d90…0dbf at0005 = ╱52╱R╱ // 0xd95 @0x5
0x0d90…0dbf at0006 = ╱45╱E╱ // 0xd96 @0x6
0x0d90…0dbf at0007 = ╱53╱S╱ // 0xd97 @0x7
0x0d90…0dbf at0008 = ╱55╱U╱ // 0xd98 @0x8
0x0d90…0dbf at0009 = ╱4c╱L╱ // 0xd99 @0x9
0x0d90…0dbf at000a = ╱31╱1╱ // 0xd9a @0xa
0x0d90…0dbf at000b = ╱ef╱$╱ // 0xd9b @0xb
0x0d90…0dbf at000c = ╱ed╱(╱ // 0xd9c @0xc
0x0d90…0dbf at000d = ╱31╱1╱ // 0xd9d @0xd
0x0d90…0dbf at000e = ╱32╱2╱ // 0xd9e @0xe
0x0d90…0dbf at000f = ╱fe0000c004╱ // 0xd9f @0xf
0x0d90…0dbf at0014 = ╱ee╱)╱ // 0xda4 @0x14
0x0d90…0dbf at0015 = ╱dc╱=╱ // 0xda5 @0x15
0x0d90…0dbf at0016 = ╱22╱"╱ // 0xda6 @0x16
0x0d90…0dbf at0017 = ╱2b╱+╱ // 0xda7 @0x17
0x0d90…0dbf at0018 = ╱22╱"╱ // 0xda8 @0x18
0x0d90…0dbf at0019 = ╱b6╱ THEN ╱ // 0xda9 @0x19
0x0d90…0dbf at001a = ╱52╱R╱ // 0xdaa @0x1a
0x0d90…0dbf at001b = ╱45╱E╱ // 0xdab @0x1b
0x0d90…0dbf at001c = ╱53╱S╱ // 0xdac @0x1c
0x0d90…0dbf at001d = ╱55╱U╱ // 0xdad @0x1d
0x0d90…0dbf at001e = ╱4c╱L╱ // 0xdae @0x1e
0x0d90…0dbf at001f = ╱31╱1╱ // 0xdaf @0x1f
0x0d90…0dbf at0020 = ╱ef╱$╱ // 0xdb0 @0x20
0x0d90…0dbf at0021 = ╱ed╱(╱ // 0xdb1 @0x21
0x0d90…0dbf at0022 = ╱31╱1╱ // 0xdb2 @0x22
0x0d90…0dbf at0023 = ╱32╱2╱ // 0xdb3 @0x23
0x0d90…0dbf at0024 = ╱fe0000c004╱ // 0xdb4 @0x24
0x0d90…0dbf at0029 = ╱ee╱)╱ // 0xdb9 @0x29
0x0d90…0dbf at002a = ╱dc╱=╱ // 0xdba @0x2a
0x0d90…0dbf at002b = ╱22╱"╱ // 0xdbb @0x2b
0x0d90…0dbf at002c = ╱20╱…╱ // 0xdbc @0x2c
0x0d90…0dbf at002d = ╱22╱"╱ // 0xdbd @0x2d
0x0d90…0dbf at002e = EOL // 0xdbe @0x2e
0x0d90…0dbf }
0x0dbf…0de8 9b3f 3268 IF LIN$(12)="+" THEN LIN$(12)=" "
0x0dbf…0de8 LineComalBin {
0x0dbf…0de8 ptr = 0x9b3f // 0xdbf @0x0
0x0dbf…0de8 lno = 0x0cc4 // 0xdc1 @0x2
0x0dbf…0de8 at0004 = ╱82╱ IF ╱ // 0xdc3 @0x4
0x0dbf…0de8 at0005 = ╱4c╱L╱ // 0xdc4 @0x5
0x0dbf…0de8 at0006 = ╱49╱I╱ // 0xdc5 @0x6
0x0dbf…0de8 at0007 = ╱4e╱N╱ // 0xdc6 @0x7
0x0dbf…0de8 at0008 = ╱ef╱$╱ // 0xdc7 @0x8
0x0dbf…0de8 at0009 = ╱ed╱(╱ // 0xdc8 @0x9
0x0dbf…0de8 at000a = ╱31╱1╱ // 0xdc9 @0xa
0x0dbf…0de8 at000b = ╱32╱2╱ // 0xdca @0xb
0x0dbf…0de8 at000c = ╱fe0000c004╱ // 0xdcb @0xc
0x0dbf…0de8 at0011 = ╱ee╱)╱ // 0xdd0 @0x11
0x0dbf…0de8 at0012 = ╱dc╱=╱ // 0xdd1 @0x12
0x0dbf…0de8 at0013 = ╱22╱"╱ // 0xdd2 @0x13
0x0dbf…0de8 at0014 = ╱2b╱+╱ // 0xdd3 @0x14
0x0dbf…0de8 at0015 = ╱22╱"╱ // 0xdd4 @0x15
0x0dbf…0de8 at0016 = ╱b6╱ THEN ╱ // 0xdd5 @0x16
0x0dbf…0de8 at0017 = ╱4c╱L╱ // 0xdd6 @0x17
0x0dbf…0de8 at0018 = ╱49╱I╱ // 0xdd7 @0x18
0x0dbf…0de8 at0019 = ╱4e╱N╱ // 0xdd8 @0x19
0x0dbf…0de8 at001a = ╱ef╱$╱ // 0xdd9 @0x1a
0x0dbf…0de8 at001b = ╱ed╱(╱ // 0xdda @0x1b
0x0dbf…0de8 at001c = ╱31╱1╱ // 0xddb @0x1c
0x0dbf…0de8 at001d = ╱32╱2╱ // 0xddc @0x1d
0x0dbf…0de8 at001e = ╱fe0000c004╱ // 0xddd @0x1e
0x0dbf…0de8 at0023 = ╱ee╱)╱ // 0xde2 @0x23
0x0dbf…0de8 at0024 = ╱dc╱=╱ // 0xde3 @0x24
0x0dbf…0de8 at0025 = ╱22╱"╱ // 0xde4 @0x25
0x0dbf…0de8 at0026 = ╱20╱…╱ // 0xde5 @0x26
0x0dbf…0de8 at0027 = ╱22╱"╱ // 0xde6 @0x27
0x0dbf…0de8 at0028 = EOL // 0xde7 @0x28
0x0dbf…0de8 }
0x0de8…0dfb 9b52 3270 PRINT USING "####":LMNR;
0x0de8…0dfb LineComalBin {
0x0de8…0dfb ptr = 0x9b52 // 0xde8 @0x0
0x0de8…0dfb lno = 0x0cc6 // 0xdea @0x2
0x0de8…0dfb at0004 = ╱92╱ PRINT ╱ // 0xdec @0x4
0x0de8…0dfb at0005 = ╱b9╱ USING ╱ // 0xded @0x5
0x0de8…0dfb at0006 = ╱22╱"╱ // 0xdee @0x6
0x0de8…0dfb at0007 = ╱23╱#╱ // 0xdef @0x7
0x0de8…0dfb at0008 = ╱23╱#╱ // 0xdf0 @0x8
0x0de8…0dfb at0009 = ╱23╱#╱ // 0xdf1 @0x9
0x0de8…0dfb at000a = ╱23╱#╱ // 0xdf2 @0xa
0x0de8…0dfb at000b = ╱22╱"╱ // 0xdf3 @0xb
0x0de8…0dfb at000c = ╱f0╱:╱ // 0xdf4 @0xc
0x0de8…0dfb at000d = ╱4c╱L╱ // 0xdf5 @0xd
0x0de8…0dfb at000e = ╱4d╱M╱ // 0xdf6 @0xe
0x0de8…0dfb at000f = ╱4e╱N╱ // 0xdf7 @0xf
0x0de8…0dfb at0010 = ╱52╱R╱ // 0xdf8 @0x10
0x0de8…0dfb at0011 = ╱eb╱;╱ // 0xdf9 @0x11
0x0de8…0dfb at0012 = EOL // 0xdfa @0x12
0x0de8…0dfb }
0x0dfb…0e35 9b8c 3272 PRINT TAB(21);RESUL$;TAB(36);RESUL1$;TAB(52);LIN$
0x0dfb…0e35 LineComalBin {
0x0dfb…0e35 ptr = 0x9b8c // 0xdfb @0x0
0x0dfb…0e35 lno = 0x0cc8 // 0xdfd @0x2
0x0dfb…0e35 at0004 = ╱92╱ PRINT ╱ // 0xdff @0x4
0x0dfb…0e35 at0005 = ╱d2╱TAB╱ // 0xe00 @0x5
0x0dfb…0e35 at0006 = ╱ed╱(╱ // 0xe01 @0x6
0x0dfb…0e35 at0007 = ╱32╱2╱ // 0xe02 @0x7
0x0dfb…0e35 at0008 = ╱31╱1╱ // 0xe03 @0x8
0x0dfb…0e35 at0009 = ╱fe0000a805╱ // 0xe04 @0x9
0x0dfb…0e35 at000e = ╱ee╱)╱ // 0xe09 @0xe
0x0dfb…0e35 at000f = ╱eb╱;╱ // 0xe0a @0xf
0x0dfb…0e35 at0010 = ╱52╱R╱ // 0xe0b @0x10
0x0dfb…0e35 at0011 = ╱45╱E╱ // 0xe0c @0x11
0x0dfb…0e35 at0012 = ╱53╱S╱ // 0xe0d @0x12
0x0dfb…0e35 at0013 = ╱55╱U╱ // 0xe0e @0x13
0x0dfb…0e35 at0014 = ╱4c╱L╱ // 0xe0f @0x14
0x0dfb…0e35 at0015 = ╱ef╱$╱ // 0xe10 @0x15
0x0dfb…0e35 at0016 = ╱eb╱;╱ // 0xe11 @0x16
0x0dfb…0e35 at0017 = ╱d2╱TAB╱ // 0xe12 @0x17
0x0dfb…0e35 at0018 = ╱ed╱(╱ // 0xe13 @0x18
0x0dfb…0e35 at0019 = ╱33╱3╱ // 0xe14 @0x19
0x0dfb…0e35 at001a = ╱36╱6╱ // 0xe15 @0x1a
0x0dfb…0e35 at001b = ╱fe00009006╱ // 0xe16 @0x1b
0x0dfb…0e35 at0020 = ╱ee╱)╱ // 0xe1b @0x20
0x0dfb…0e35 at0021 = ╱eb╱;╱ // 0xe1c @0x21
0x0dfb…0e35 at0022 = ╱52╱R╱ // 0xe1d @0x22
0x0dfb…0e35 at0023 = ╱45╱E╱ // 0xe1e @0x23
0x0dfb…0e35 at0024 = ╱53╱S╱ // 0xe1f @0x24
0x0dfb…0e35 at0025 = ╱55╱U╱ // 0xe20 @0x25
0x0dfb…0e35 at0026 = ╱4c╱L╱ // 0xe21 @0x26
0x0dfb…0e35 at0027 = ╱31╱1╱ // 0xe22 @0x27
0x0dfb…0e35 at0028 = ╱ef╱$╱ // 0xe23 @0x28
0x0dfb…0e35 at0029 = ╱eb╱;╱ // 0xe24 @0x29
0x0dfb…0e35 at002a = ╱d2╱TAB╱ // 0xe25 @0x2a
0x0dfb…0e35 at002b = ╱ed╱(╱ // 0xe26 @0x2b
0x0dfb…0e35 at002c = ╱35╱5╱ // 0xe27 @0x2c
0x0dfb…0e35 at002d = ╱32╱2╱ // 0xe28 @0x2d
0x0dfb…0e35 at002e = ╱fe0000d006╱ // 0xe29 @0x2e
0x0dfb…0e35 at0033 = ╱ee╱)╱ // 0xe2e @0x33
0x0dfb…0e35 at0034 = ╱eb╱;╱ // 0xe2f @0x34
0x0dfb…0e35 at0035 = ╱4c╱L╱ // 0xe30 @0x35
0x0dfb…0e35 at0036 = ╱49╱I╱ // 0xe31 @0x36
0x0dfb…0e35 at0037 = ╱4e╱N╱ // 0xe32 @0x37
0x0dfb…0e35 at0038 = ╱ef╱$╱ // 0xe33 @0x38
0x0dfb…0e35 at0039 = EOL // 0xe34 @0x39
0x0dfb…0e35 }
0x0e35…0e3b 9b92 3275 ENDIF
0x0e35…0e3b LineComalBin {
0x0e35…0e3b ptr = 0x9b92 // 0xe35 @0x0
0x0e35…0e3b lno = 0x0ccb // 0xe37 @0x2
0x0e35…0e3b at0004 = ╱9b╱ ENDIF ╱ // 0xe39 @0x4
0x0e35…0e3b at0005 = EOL // 0xe3a @0x5
0x0e35…0e3b }
0x0e3b…0e46 9b9d 3277 EXEC UDTÆL
0x0e3b…0e46 LineComalBin {
0x0e3b…0e46 ptr = 0x9b9d // 0xe3b @0x0
0x0e3b…0e46 lno = 0x0ccd // 0xe3d @0x2
0x0e3b…0e46 at0004 = ╱9d╱ EXEC ╱ // 0xe3f @0x4
0x0e3b…0e46 at0005 = ╱55╱U╱ // 0xe40 @0x5
0x0e3b…0e46 at0006 = ╱44╱D╱ // 0xe41 @0x6
0x0e3b…0e46 at0007 = ╱54╱T╱ // 0xe42 @0x7
0x0e3b…0e46 at0008 = ╱5b╱Æ╱ // 0xe43 @0x8
0x0e3b…0e46 at0009 = ╱4c╱L╱ // 0xe44 @0x9
0x0e3b…0e46 at000a = EOL // 0xe45 @0xa
0x0e3b…0e46 }
0x0e46…0e4c 9ba3 3278 ENDIF
0x0e46…0e4c LineComalBin {
0x0e46…0e4c ptr = 0x9ba3 // 0xe46 @0x0
0x0e46…0e4c lno = 0x0cce // 0xe48 @0x2
0x0e46…0e4c at0004 = ╱9b╱ ENDIF ╱ // 0xe4a @0x4
0x0e46…0e4c at0005 = EOL // 0xe4b @0x5
0x0e46…0e4c }
0x0e4c…0e5c 9bb3 3279 UNTIL LMNR=>MLMNR
0x0e4c…0e5c LineComalBin {
0x0e4c…0e5c ptr = 0x9bb3 // 0xe4c @0x0
0x0e4c…0e5c lno = 0x0ccf // 0xe4e @0x2
0x0e4c…0e5c at0004 = ╱98╱ UNTIL ╱ // 0xe50 @0x4
0x0e4c…0e5c at0005 = ╱4c╱L╱ // 0xe51 @0x5
0x0e4c…0e5c at0006 = ╱4d╱M╱ // 0xe52 @0x6
0x0e4c…0e5c at0007 = ╱4e╱N╱ // 0xe53 @0x7
0x0e4c…0e5c at0008 = ╱52╱R╱ // 0xe54 @0x8
0x0e4c…0e5c at0009 = ╱e0╱=>╱ // 0xe55 @0x9
0x0e4c…0e5c at000a = ╱4d╱M╱ // 0xe56 @0xa
0x0e4c…0e5c at000b = ╱4c╱L╱ // 0xe57 @0xb
0x0e4c…0e5c at000c = ╱4d╱M╱ // 0xe58 @0xc
0x0e4c…0e5c at000d = ╱4e╱N╱ // 0xe59 @0xd
0x0e4c…0e5c at000e = ╱52╱R╱ // 0xe5a @0xe
0x0e4c…0e5c at000f = EOL // 0xe5b @0xf
0x0e4c…0e5c }
0x0e5c…0e67 9bbe 3280 FOR I=E TO V
0x0e5c…0e67 LineComalBin {
0x0e5c…0e67 ptr = 0x9bbe // 0xe5c @0x0
0x0e5c…0e67 lno = 0x0cd0 // 0xe5e @0x2
0x0e5c…0e67 at0004 = ╱83╱ FOR ╱ // 0xe60 @0x4
0x0e5c…0e67 at0005 = ╱49╱I╱ // 0xe61 @0x5
0x0e5c…0e67 at0006 = ╱dc╱=╱ // 0xe62 @0x6
0x0e5c…0e67 at0007 = ╱45╱E╱ // 0xe63 @0x7
0x0e5c…0e67 at0008 = ╱b7╱ TO ╱ // 0xe64 @0x8
0x0e5c…0e67 at0009 = ╱56╱V╱ // 0xe65 @0x9
0x0e5c…0e67 at000a = EOL // 0xe66 @0xa
0x0e5c…0e67 }
0x0e67…0e98 9bef 3290 IF TOTAL$(I,12)="+" THEN TOTAL$(I,12)=" "
0x0e67…0e98 LineComalBin {
0x0e67…0e98 ptr = 0x9bef // 0xe67 @0x0
0x0e67…0e98 lno = 0x0cda // 0xe69 @0x2
0x0e67…0e98 at0004 = ╱82╱ IF ╱ // 0xe6b @0x4
0x0e67…0e98 at0005 = ╱54╱T╱ // 0xe6c @0x5
0x0e67…0e98 at0006 = ╱4f╱O╱ // 0xe6d @0x6
0x0e67…0e98 at0007 = ╱54╱T╱ // 0xe6e @0x7
0x0e67…0e98 at0008 = ╱41╱A╱ // 0xe6f @0x8
0x0e67…0e98 at0009 = ╱4c╱L╱ // 0xe70 @0x9
0x0e67…0e98 at000a = ╱ef╱$╱ // 0xe71 @0xa
0x0e67…0e98 at000b = ╱ed╱(╱ // 0xe72 @0xb
0x0e67…0e98 at000c = ╱49╱I╱ // 0xe73 @0xc
0x0e67…0e98 at000d = ╱ec╱,╱ // 0xe74 @0xd
0x0e67…0e98 at000e = ╱31╱1╱ // 0xe75 @0xe
0x0e67…0e98 at000f = ╱32╱2╱ // 0xe76 @0xf
0x0e67…0e98 at0010 = ╱fe0000c004╱ // 0xe77 @0x10
0x0e67…0e98 at0015 = ╱ee╱)╱ // 0xe7c @0x15
0x0e67…0e98 at0016 = ╱dc╱=╱ // 0xe7d @0x16
0x0e67…0e98 at0017 = ╱22╱"╱ // 0xe7e @0x17
0x0e67…0e98 at0018 = ╱2b╱+╱ // 0xe7f @0x18
0x0e67…0e98 at0019 = ╱22╱"╱ // 0xe80 @0x19
0x0e67…0e98 at001a = ╱b6╱ THEN ╱ // 0xe81 @0x1a
0x0e67…0e98 at001b = ╱54╱T╱ // 0xe82 @0x1b
0x0e67…0e98 at001c = ╱4f╱O╱ // 0xe83 @0x1c
0x0e67…0e98 at001d = ╱54╱T╱ // 0xe84 @0x1d
0x0e67…0e98 at001e = ╱41╱A╱ // 0xe85 @0x1e
0x0e67…0e98 at001f = ╱4c╱L╱ // 0xe86 @0x1f
0x0e67…0e98 at0020 = ╱ef╱$╱ // 0xe87 @0x20
0x0e67…0e98 at0021 = ╱ed╱(╱ // 0xe88 @0x21
0x0e67…0e98 at0022 = ╱49╱I╱ // 0xe89 @0x22
0x0e67…0e98 at0023 = ╱ec╱,╱ // 0xe8a @0x23
0x0e67…0e98 at0024 = ╱31╱1╱ // 0xe8b @0x24
0x0e67…0e98 at0025 = ╱32╱2╱ // 0xe8c @0x25
0x0e67…0e98 at0026 = ╱fe0000c004╱ // 0xe8d @0x26
0x0e67…0e98 at002b = ╱ee╱)╱ // 0xe92 @0x2b
0x0e67…0e98 at002c = ╱dc╱=╱ // 0xe93 @0x2c
0x0e67…0e98 at002d = ╱22╱"╱ // 0xe94 @0x2d
0x0e67…0e98 at002e = ╱20╱…╱ // 0xe95 @0x2e
0x0e67…0e98 at002f = ╱22╱"╱ // 0xe96 @0x2f
0x0e67…0e98 at0030 = EOL // 0xe97 @0x30
0x0e67…0e98 }
0x0e98…0e9f 9bf6 3300 NEXT I
0x0e98…0e9f LineComalBin {
0x0e98…0e9f ptr = 0x9bf6 // 0xe98 @0x0
0x0e98…0e9f lno = 0x0ce4 // 0xe9a @0x2
0x0e98…0e9f at0004 = ╱84╱ NEXT ╱ // 0xe9c @0x4
0x0e98…0e9f at0005 = ╱49╱I╱ // 0xe9d @0x5
0x0e98…0e9f at0006 = EOL // 0xe9e @0x6
0x0e98…0e9f }
0x0e9f…0eea 9c41 3310 PRINT " ***";TAB(21);TOTAL$(E);TAB(36);TOTAL$(G);TAB(52);TOTAL$(V)
0x0e9f…0eea LineComalBin {
0x0e9f…0eea ptr = 0x9c41 // 0xe9f @0x0
0x0e9f…0eea lno = 0x0cee // 0xea1 @0x2
0x0e9f…0eea at0004 = ╱92╱ PRINT ╱ // 0xea3 @0x4
0x0e9f…0eea at0005 = ╱22╱"╱ // 0xea4 @0x5
0x0e9f…0eea at0006 = ╱20╱…╱ // 0xea5 @0x6
0x0e9f…0eea at0007 = ╱2a╱*╱ // 0xea6 @0x7
0x0e9f…0eea at0008 = ╱2a╱*╱ // 0xea7 @0x8
0x0e9f…0eea at0009 = ╱2a╱*╱ // 0xea8 @0x9
0x0e9f…0eea at000a = ╱22╱"╱ // 0xea9 @0xa
0x0e9f…0eea at000b = ╱eb╱;╱ // 0xeaa @0xb
0x0e9f…0eea at000c = ╱d2╱TAB╱ // 0xeab @0xc
0x0e9f…0eea at000d = ╱ed╱(╱ // 0xeac @0xd
0x0e9f…0eea at000e = ╱32╱2╱ // 0xead @0xe
0x0e9f…0eea at000f = ╱31╱1╱ // 0xeae @0xf
0x0e9f…0eea at0010 = ╱fe0000a805╱ // 0xeaf @0x10
0x0e9f…0eea at0015 = ╱ee╱)╱ // 0xeb4 @0x15
0x0e9f…0eea at0016 = ╱eb╱;╱ // 0xeb5 @0x16
0x0e9f…0eea at0017 = ╱54╱T╱ // 0xeb6 @0x17
0x0e9f…0eea at0018 = ╱4f╱O╱ // 0xeb7 @0x18
0x0e9f…0eea at0019 = ╱54╱T╱ // 0xeb8 @0x19
0x0e9f…0eea at001a = ╱41╱A╱ // 0xeb9 @0x1a
0x0e9f…0eea at001b = ╱4c╱L╱ // 0xeba @0x1b
0x0e9f…0eea at001c = ╱ef╱$╱ // 0xebb @0x1c
0x0e9f…0eea at001d = ╱ed╱(╱ // 0xebc @0x1d
0x0e9f…0eea at001e = ╱45╱E╱ // 0xebd @0x1e
0x0e9f…0eea at001f = ╱ee╱)╱ // 0xebe @0x1f
0x0e9f…0eea at0020 = ╱eb╱;╱ // 0xebf @0x20
0x0e9f…0eea at0021 = ╱d2╱TAB╱ // 0xec0 @0x21
0x0e9f…0eea at0022 = ╱ed╱(╱ // 0xec1 @0x22
0x0e9f…0eea at0023 = ╱33╱3╱ // 0xec2 @0x23
0x0e9f…0eea at0024 = ╱36╱6╱ // 0xec3 @0x24
0x0e9f…0eea at0025 = ╱fe00009006╱ // 0xec4 @0x25
0x0e9f…0eea at002a = ╱ee╱)╱ // 0xec9 @0x2a
0x0e9f…0eea at002b = ╱eb╱;╱ // 0xeca @0x2b
0x0e9f…0eea at002c = ╱54╱T╱ // 0xecb @0x2c
0x0e9f…0eea at002d = ╱4f╱O╱ // 0xecc @0x2d
0x0e9f…0eea at002e = ╱54╱T╱ // 0xecd @0x2e
0x0e9f…0eea at002f = ╱41╱A╱ // 0xece @0x2f
0x0e9f…0eea at0030 = ╱4c╱L╱ // 0xecf @0x30
0x0e9f…0eea at0031 = ╱ef╱$╱ // 0xed0 @0x31
0x0e9f…0eea at0032 = ╱ed╱(╱ // 0xed1 @0x32
0x0e9f…0eea at0033 = ╱47╱G╱ // 0xed2 @0x33
0x0e9f…0eea at0034 = ╱ee╱)╱ // 0xed3 @0x34
0x0e9f…0eea at0035 = ╱eb╱;╱ // 0xed4 @0x35
0x0e9f…0eea at0036 = ╱d2╱TAB╱ // 0xed5 @0x36
0x0e9f…0eea at0037 = ╱ed╱(╱ // 0xed6 @0x37
0x0e9f…0eea at0038 = ╱35╱5╱ // 0xed7 @0x38
0x0e9f…0eea at0039 = ╱32╱2╱ // 0xed8 @0x39
0x0e9f…0eea at003a = ╱fe0000d006╱ // 0xed9 @0x3a
0x0e9f…0eea at003f = ╱ee╱)╱ // 0xede @0x3f
0x0e9f…0eea at0040 = ╱eb╱;╱ // 0xedf @0x40
0x0e9f…0eea at0041 = ╱54╱T╱ // 0xee0 @0x41
0x0e9f…0eea at0042 = ╱4f╱O╱ // 0xee1 @0x42
0x0e9f…0eea at0043 = ╱54╱T╱ // 0xee2 @0x43
0x0e9f…0eea at0044 = ╱41╱A╱ // 0xee3 @0x44
0x0e9f…0eea at0045 = ╱4c╱L╱ // 0xee4 @0x45
0x0e9f…0eea at0046 = ╱ef╱$╱ // 0xee5 @0x46
0x0e9f…0eea at0047 = ╱ed╱(╱ // 0xee6 @0x47
0x0e9f…0eea at0048 = ╱56╱V╱ // 0xee7 @0x48
0x0e9f…0eea at0049 = ╱ee╱)╱ // 0xee8 @0x49
0x0e9f…0eea at004a = EOL // 0xee9 @0x4a
0x0e9f…0eea }
0x0eea…0ef5 9c4c 3320 FOR I=E TO V
0x0eea…0ef5 LineComalBin {
0x0eea…0ef5 ptr = 0x9c4c // 0xeea @0x0
0x0eea…0ef5 lno = 0x0cf8 // 0xeec @0x2
0x0eea…0ef5 at0004 = ╱83╱ FOR ╱ // 0xeee @0x4
0x0eea…0ef5 at0005 = ╱49╱I╱ // 0xeef @0x5
0x0eea…0ef5 at0006 = ╱dc╱=╱ // 0xef0 @0x6
0x0eea…0ef5 at0007 = ╱45╱E╱ // 0xef1 @0x7
0x0eea…0ef5 at0008 = ╱b7╱ TO ╱ // 0xef2 @0x8
0x0eea…0ef5 at0009 = ╱56╱V╱ // 0xef3 @0x9
0x0eea…0ef5 at000a = EOL // 0xef4 @0xa
0x0eea…0ef5 }
0x0ef5…0f08 9c5f 3330 TOTAL$(I)=TAH$
0x0ef5…0f08 LineComalBin {
0x0ef5…0f08 ptr = 0x9c5f // 0xef5 @0x0
0x0ef5…0f08 lno = 0x0d02 // 0xef7 @0x2
0x0ef5…0f08 at0004 = ╱54╱T╱ // 0xef9 @0x4
0x0ef5…0f08 at0005 = ╱4f╱O╱ // 0xefa @0x5
0x0ef5…0f08 at0006 = ╱54╱T╱ // 0xefb @0x6
0x0ef5…0f08 at0007 = ╱41╱A╱ // 0xefc @0x7
0x0ef5…0f08 at0008 = ╱4c╱L╱ // 0xefd @0x8
0x0ef5…0f08 at0009 = ╱ef╱$╱ // 0xefe @0x9
0x0ef5…0f08 at000a = ╱ed╱(╱ // 0xeff @0xa
0x0ef5…0f08 at000b = ╱49╱I╱ // 0xf00 @0xb
0x0ef5…0f08 at000c = ╱ee╱)╱ // 0xf01 @0xc
0x0ef5…0f08 at000d = ╱dc╱=╱ // 0xf02 @0xd
0x0ef5…0f08 at000e = ╱54╱T╱ // 0xf03 @0xe
0x0ef5…0f08 at000f = ╱41╱A╱ // 0xf04 @0xf
0x0ef5…0f08 at0010 = ╱48╱H╱ // 0xf05 @0x10
0x0ef5…0f08 at0011 = ╱ef╱$╱ // 0xf06 @0x11
0x0ef5…0f08 at0012 = EOL // 0xf07 @0x12
0x0ef5…0f08 }
0x0f08…0f0f 9c66 3340 NEXT I
0x0f08…0f0f LineComalBin {
0x0f08…0f0f ptr = 0x9c66 // 0xf08 @0x0
0x0f08…0f0f lno = 0x0d0c // 0xf0a @0x2
0x0f08…0f0f at0004 = ╱84╱ NEXT ╱ // 0xf0c @0x4
0x0f08…0f0f at0005 = ╱49╱I╱ // 0xf0d @0x5
0x0f08…0f0f at0006 = EOL // 0xf0e @0x6
0x0f08…0f0f }
0x0f0f…0f15 9c6c 3345 PRINT
0x0f0f…0f15 LineComalBin {
0x0f0f…0f15 ptr = 0x9c6c // 0xf0f @0x0
0x0f0f…0f15 lno = 0x0d11 // 0xf11 @0x2
0x0f0f…0f15 at0004 = ╱92╱ PRINT ╱ // 0xf13 @0x4
0x0f0f…0f15 at0005 = EOL // 0xf14 @0x5
0x0f0f…0f15 }
0x0f15…0f27 9c7e 3347 LINIE=LINIE+E
0x0f15…0f27 LineComalBin {
0x0f15…0f27 ptr = 0x9c7e // 0xf15 @0x0
0x0f15…0f27 lno = 0x0d13 // 0xf17 @0x2
0x0f15…0f27 at0004 = ╱4c╱L╱ // 0xf19 @0x4
0x0f15…0f27 at0005 = ╱49╱I╱ // 0xf1a @0x5
0x0f15…0f27 at0006 = ╱4e╱N╱ // 0xf1b @0x6
0x0f15…0f27 at0007 = ╱49╱I╱ // 0xf1c @0x7
0x0f15…0f27 at0008 = ╱45╱E╱ // 0xf1d @0x8
0x0f15…0f27 at0009 = ╱dc╱=╱ // 0xf1e @0x9
0x0f15…0f27 at000a = ╱4c╱L╱ // 0xf1f @0xa
0x0f15…0f27 at000b = ╱49╱I╱ // 0xf20 @0xb
0x0f15…0f27 at000c = ╱4e╱N╱ // 0xf21 @0xc
0x0f15…0f27 at000d = ╱49╱I╱ // 0xf22 @0xd
0x0f15…0f27 at000e = ╱45╱E╱ // 0xf23 @0xe
0x0f15…0f27 at000f = ╱e2╱+╱ // 0xf24 @0xf
0x0f15…0f27 at0010 = ╱45╱E╱ // 0xf25 @0x10
0x0f15…0f27 at0011 = EOL // 0xf26 @0x11
0x0f15…0f27 }
0x0f27…0f32 9c89 3350 LMNR=B
0x0f27…0f32 LineComalBin {
0x0f27…0f32 ptr = 0x9c89 // 0xf27 @0x0
0x0f27…0f32 lno = 0x0d16 // 0xf29 @0x2
0x0f27…0f32 at0004 = ╱4c╱L╱ // 0xf2b @0x4
0x0f27…0f32 at0005 = ╱4d╱M╱ // 0xf2c @0x5
0x0f27…0f32 at0006 = ╱4e╱N╱ // 0xf2d @0x6
0x0f27…0f32 at0007 = ╱52╱R╱ // 0xf2e @0x7
0x0f27…0f32 at0008 = ╱dc╱=╱ // 0xf2f @0x8
0x0f27…0f32 at0009 = ╱42╱B╱ // 0xf30 @0x9
0x0f27…0f32 at000a = EOL // 0xf31 @0xa
0x0f27…0f32 }
0x0f32…0f4d 9ca4 3360 IF LINIE>MAXLIN-10 THEN
0x0f32…0f4d LineComalBin {
0x0f32…0f4d ptr = 0x9ca4 // 0xf32 @0x0
0x0f32…0f4d lno = 0x0d20 // 0xf34 @0x2
0x0f32…0f4d at0004 = ╱9c╱ IF ╱ // 0xf36 @0x4
0x0f32…0f4d at0005 = ╱4c╱L╱ // 0xf37 @0x5
0x0f32…0f4d at0006 = ╱49╱I╱ // 0xf38 @0x6
0x0f32…0f4d at0007 = ╱4e╱N╱ // 0xf39 @0x7
0x0f32…0f4d at0008 = ╱49╱I╱ // 0xf3a @0x8
0x0f32…0f4d at0009 = ╱45╱E╱ // 0xf3b @0x9
0x0f32…0f4d at000a = ╱de╱>╱ // 0xf3c @0xa
0x0f32…0f4d at000b = ╱4d╱M╱ // 0xf3d @0xb
0x0f32…0f4d at000c = ╱41╱A╱ // 0xf3e @0xc
0x0f32…0f4d at000d = ╱58╱X╱ // 0xf3f @0xd
0x0f32…0f4d at000e = ╱4c╱L╱ // 0xf40 @0xe
0x0f32…0f4d at000f = ╱49╱I╱ // 0xf41 @0xf
0x0f32…0f4d at0010 = ╱4e╱N╱ // 0xf42 @0x10
0x0f32…0f4d at0011 = ╱e3╱-╱ // 0xf43 @0x11
0x0f32…0f4d at0012 = ╱31╱1╱ // 0xf44 @0x12
0x0f32…0f4d at0013 = ╱30╱0╱ // 0xf45 @0x13
0x0f32…0f4d at0014 = ╱fe0000a004╱ // 0xf46 @0x14
0x0f32…0f4d at0019 = ╱b6╱ THEN ╱ // 0xf4b @0x19
0x0f32…0f4d at001a = EOL // 0xf4c @0x1a
0x0f32…0f4d }
0x0f4d…0f5f 9cb6 3370 WHILE LINIE<MAXLIN
0x0f4d…0f5f LineComalBin {
0x0f4d…0f5f ptr = 0x9cb6 // 0xf4d @0x0
0x0f4d…0f5f lno = 0x0d2a // 0xf4f @0x2
0x0f4d…0f5f at0004 = ╱93╱ WHILE ╱ // 0xf51 @0x4
0x0f4d…0f5f at0005 = ╱4c╱L╱ // 0xf52 @0x5
0x0f4d…0f5f at0006 = ╱49╱I╱ // 0xf53 @0x6
0x0f4d…0f5f at0007 = ╱4e╱N╱ // 0xf54 @0x7
0x0f4d…0f5f at0008 = ╱49╱I╱ // 0xf55 @0x8
0x0f4d…0f5f at0009 = ╱45╱E╱ // 0xf56 @0x9
0x0f4d…0f5f at000a = ╱dd╱<╱ // 0xf57 @0xa
0x0f4d…0f5f at000b = ╱4d╱M╱ // 0xf58 @0xb
0x0f4d…0f5f at000c = ╱41╱A╱ // 0xf59 @0xc
0x0f4d…0f5f at000d = ╱58╱X╱ // 0xf5a @0xd
0x0f4d…0f5f at000e = ╱4c╱L╱ // 0xf5b @0xe
0x0f4d…0f5f at000f = ╱49╱I╱ // 0xf5c @0xf
0x0f4d…0f5f at0010 = ╱4e╱N╱ // 0xf5d @0x10
0x0f4d…0f5f at0011 = EOL // 0xf5e @0x11
0x0f4d…0f5f }
0x0f5f…0f65 9cbc 3380 PRINT
0x0f5f…0f65 LineComalBin {
0x0f5f…0f65 ptr = 0x9cbc // 0xf5f @0x0
0x0f5f…0f65 lno = 0x0d34 // 0xf61 @0x2
0x0f5f…0f65 at0004 = ╱92╱ PRINT ╱ // 0xf63 @0x4
0x0f5f…0f65 at0005 = EOL // 0xf64 @0x5
0x0f5f…0f65 }
0x0f65…0f77 9cce 3390 LINIE=LINIE+E
0x0f65…0f77 LineComalBin {
0x0f65…0f77 ptr = 0x9cce // 0xf65 @0x0
0x0f65…0f77 lno = 0x0d3e // 0xf67 @0x2
0x0f65…0f77 at0004 = ╱4c╱L╱ // 0xf69 @0x4
0x0f65…0f77 at0005 = ╱49╱I╱ // 0xf6a @0x5
0x0f65…0f77 at0006 = ╱4e╱N╱ // 0xf6b @0x6
0x0f65…0f77 at0007 = ╱49╱I╱ // 0xf6c @0x7
0x0f65…0f77 at0008 = ╱45╱E╱ // 0xf6d @0x8
0x0f65…0f77 at0009 = ╱dc╱=╱ // 0xf6e @0x9
0x0f65…0f77 at000a = ╱4c╱L╱ // 0xf6f @0xa
0x0f65…0f77 at000b = ╱49╱I╱ // 0xf70 @0xb
0x0f65…0f77 at000c = ╱4e╱N╱ // 0xf71 @0xc
0x0f65…0f77 at000d = ╱49╱I╱ // 0xf72 @0xd
0x0f65…0f77 at000e = ╱45╱E╱ // 0xf73 @0xe
0x0f65…0f77 at000f = ╱e2╱+╱ // 0xf74 @0xf
0x0f65…0f77 at0010 = ╱45╱E╱ // 0xf75 @0x10
0x0f65…0f77 at0011 = EOL // 0xf76 @0x11
0x0f65…0f77 }
0x0f77…0f7d 9cd4 3400 ENDWHILE
0x0f77…0f7d LineComalBin {
0x0f77…0f7d ptr = 0x9cd4 // 0xf77 @0x0
0x0f77…0f7d lno = 0x0d48 // 0xf79 @0x2
0x0f77…0f7d at0004 = ╱94╱ ENDWHILE ╱ // 0xf7b @0x4
0x0f77…0f7d at0005 = EOL // 0xf7c @0x5
0x0f77…0f7d }
0x0f7d…0f83 9cda 3410 PRINT
0x0f7d…0f83 LineComalBin {
0x0f7d…0f83 ptr = 0x9cda // 0xf7d @0x0
0x0f7d…0f83 lno = 0x0d52 // 0xf7f @0x2
0x0f7d…0f83 at0004 = ╱92╱ PRINT ╱ // 0xf81 @0x4
0x0f7d…0f83 at0005 = EOL // 0xf82 @0x5
0x0f7d…0f83 }
0x0f83…0f95 9cec 3415 SLJNR=SLJNR+E
0x0f83…0f95 LineComalBin {
0x0f83…0f95 ptr = 0x9cec // 0xf83 @0x0
0x0f83…0f95 lno = 0x0d57 // 0xf85 @0x2
0x0f83…0f95 at0004 = ╱53╱S╱ // 0xf87 @0x4
0x0f83…0f95 at0005 = ╱4c╱L╱ // 0xf88 @0x5
0x0f83…0f95 at0006 = ╱4a╱J╱ // 0xf89 @0x6
0x0f83…0f95 at0007 = ╱4e╱N╱ // 0xf8a @0x7
0x0f83…0f95 at0008 = ╱52╱R╱ // 0xf8b @0x8
0x0f83…0f95 at0009 = ╱dc╱=╱ // 0xf8c @0x9
0x0f83…0f95 at000a = ╱53╱S╱ // 0xf8d @0xa
0x0f83…0f95 at000b = ╱4c╱L╱ // 0xf8e @0xb
0x0f83…0f95 at000c = ╱4a╱J╱ // 0xf8f @0xc
0x0f83…0f95 at000d = ╱4e╱N╱ // 0xf90 @0xd
0x0f83…0f95 at000e = ╱52╱R╱ // 0xf91 @0xe
0x0f83…0f95 at000f = ╱e2╱+╱ // 0xf92 @0xf
0x0f83…0f95 at0010 = ╱45╱E╱ // 0xf93 @0x10
0x0f83…0f95 at0011 = EOL // 0xf94 @0x11
0x0f83…0f95 }
0x0f95…0faf 9d06 3420 PRINT USING " SIDE ####":SLJNR;
0x0f95…0faf LineComalBin {
0x0f95…0faf ptr = 0x9d06 // 0xf95 @0x0
0x0f95…0faf lno = 0x0d5c // 0xf97 @0x2
0x0f95…0faf at0004 = ╱92╱ PRINT ╱ // 0xf99 @0x4
0x0f95…0faf at0005 = ╱b9╱ USING ╱ // 0xf9a @0x5
0x0f95…0faf at0006 = ╱22╱"╱ // 0xf9b @0x6
0x0f95…0faf at0007 = ╱20╱…╱ // 0xf9c @0x7
0x0f95…0faf at0008 = ╱53╱S╱ // 0xf9d @0x8
0x0f95…0faf at0009 = ╱49╱I╱ // 0xf9e @0x9
0x0f95…0faf at000a = ╱44╱D╱ // 0xf9f @0xa
0x0f95…0faf at000b = ╱45╱E╱ // 0xfa0 @0xb
0x0f95…0faf at000c = ╱20╱…╱ // 0xfa1 @0xc
0x0f95…0faf at000d = ╱23╱#╱ // 0xfa2 @0xd
0x0f95…0faf at000e = ╱23╱#╱ // 0xfa3 @0xe
0x0f95…0faf at000f = ╱23╱#╱ // 0xfa4 @0xf
0x0f95…0faf at0010 = ╱23╱#╱ // 0xfa5 @0x10
0x0f95…0faf at0011 = ╱22╱"╱ // 0xfa6 @0x11
0x0f95…0faf at0012 = ╱f0╱:╱ // 0xfa7 @0x12
0x0f95…0faf at0013 = ╱53╱S╱ // 0xfa8 @0x13
0x0f95…0faf at0014 = ╱4c╱L╱ // 0xfa9 @0x14
0x0f95…0faf at0015 = ╱4a╱J╱ // 0xfaa @0x15
0x0f95…0faf at0016 = ╱4e╱N╱ // 0xfab @0x16
0x0f95…0faf at0017 = ╱52╱R╱ // 0xfac @0x17
0x0f95…0faf at0018 = ╱eb╱;╱ // 0xfad @0x18
0x0f95…0faf at0019 = EOL // 0xfae @0x19
0x0f95…0faf }
0x0faf…0fd0 9d27 3421 PRINT " UDSKRIFTSDATO ";DAD$;
0x0faf…0fd0 LineComalBin {
0x0faf…0fd0 ptr = 0x9d27 // 0xfaf @0x0
0x0faf…0fd0 lno = 0x0d5d // 0xfb1 @0x2
0x0faf…0fd0 at0004 = ╱92╱ PRINT ╱ // 0xfb3 @0x4
0x0faf…0fd0 at0005 = ╱22╱"╱ // 0xfb4 @0x5
0x0faf…0fd0 at0006 = ╱20╱…╱ // 0xfb5 @0x6
0x0faf…0fd0 at0007 = ╱20╱…╱ // 0xfb6 @0x7
0x0faf…0fd0 at0008 = ╱20╱…╱ // 0xfb7 @0x8
0x0faf…0fd0 at0009 = ╱20╱…╱ // 0xfb8 @0x9
0x0faf…0fd0 at000a = ╱20╱…╱ // 0xfb9 @0xa
0x0faf…0fd0 at000b = ╱55╱U╱ // 0xfba @0xb
0x0faf…0fd0 at000c = ╱44╱D╱ // 0xfbb @0xc
0x0faf…0fd0 at000d = ╱53╱S╱ // 0xfbc @0xd
0x0faf…0fd0 at000e = ╱4b╱K╱ // 0xfbd @0xe
0x0faf…0fd0 at000f = ╱52╱R╱ // 0xfbe @0xf
0x0faf…0fd0 at0010 = ╱49╱I╱ // 0xfbf @0x10
0x0faf…0fd0 at0011 = ╱46╱F╱ // 0xfc0 @0x11
0x0faf…0fd0 at0012 = ╱54╱T╱ // 0xfc1 @0x12
0x0faf…0fd0 at0013 = ╱53╱S╱ // 0xfc2 @0x13
0x0faf…0fd0 at0014 = ╱44╱D╱ // 0xfc3 @0x14
0x0faf…0fd0 at0015 = ╱41╱A╱ // 0xfc4 @0x15
0x0faf…0fd0 at0016 = ╱54╱T╱ // 0xfc5 @0x16
0x0faf…0fd0 at0017 = ╱4f╱O╱ // 0xfc6 @0x17
0x0faf…0fd0 at0018 = ╱20╱…╱ // 0xfc7 @0x18
0x0faf…0fd0 at0019 = ╱22╱"╱ // 0xfc8 @0x19
0x0faf…0fd0 at001a = ╱eb╱;╱ // 0xfc9 @0x1a
0x0faf…0fd0 at001b = ╱44╱D╱ // 0xfca @0x1b
0x0faf…0fd0 at001c = ╱41╱A╱ // 0xfcb @0x1c
0x0faf…0fd0 at001d = ╱44╱D╱ // 0xfcc @0x1d
0x0faf…0fd0 at001e = ╱ef╱$╱ // 0xfcd @0x1e
0x0faf…0fd0 at001f = ╱eb╱;╱ // 0xfce @0x1f
0x0faf…0fd0 at0020 = EOL // 0xfcf @0x20
0x0faf…0fd0 }
0x0fd0…1009 9d60 3422 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$;
0x0fd0…1009 LineComalBin {
0x0fd0…1009 ptr = 0x9d60 // 0xfd0 @0x0
0x0fd0…1009 lno = 0x0d5e // 0xfd2 @0x2
0x0fd0…1009 at0004 = ╱92╱ PRINT ╱ // 0xfd4 @0x4
0x0fd0…1009 at0005 = ╱d2╱TAB╱ // 0xfd5 @0x5
0x0fd0…1009 at0006 = ╱ed╱(╱ // 0xfd6 @0x6
0x0fd0…1009 at0007 = ╱34╱4╱ // 0xfd7 @0x7
0x0fd0…1009 at0008 = ╱39╱9╱ // 0xfd8 @0x8
0x0fd0…1009 at0009 = ╱fe0000c406╱ // 0xfd9 @0x9
0x0fd0…1009 at000e = ╱ee╱)╱ // 0xfde @0xe
0x0fd0…1009 at000f = ╱eb╱;╱ // 0xfdf @0xf
0x0fd0…1009 at0010 = ╱22╱"╱ // 0xfe0 @0x10
0x0fd0…1009 at0011 = ╱4c╱L╱ // 0xfe1 @0x11
0x0fd0…1009 at0012 = ╱5c╱Ø╱ // 0xfe2 @0x12
0x0fd0…1009 at0013 = ╱4e╱N╱ // 0xfe3 @0x13
0x0fd0…1009 at0014 = ╱50╱P╱ // 0xfe4 @0x14
0x0fd0…1009 at0015 = ╱45╱E╱ // 0xfe5 @0x15
0x0fd0…1009 at0016 = ╱52╱R╱ // 0xfe6 @0x16
0x0fd0…1009 at0017 = ╱49╱I╱ // 0xfe7 @0x17
0x0fd0…1009 at0018 = ╱4f╱O╱ // 0xfe8 @0x18
0x0fd0…1009 at0019 = ╱44╱D╱ // 0xfe9 @0x19
0x0fd0…1009 at001a = ╱45╱E╱ // 0xfea @0x1a
0x0fd0…1009 at001b = ╱4e╱N╱ // 0xfeb @0x1b
0x0fd0…1009 at001c = ╱20╱…╱ // 0xfec @0x1c
0x0fd0…1009 at001d = ╱22╱"╱ // 0xfed @0x1d
0x0fd0…1009 at001e = ╱eb╱;╱ // 0xfee @0x1e
0x0fd0…1009 at001f = ╱53╱S╱ // 0xfef @0x1f
0x0fd0…1009 at0020 = ╱54╱T╱ // 0xff0 @0x20
0x0fd0…1009 at0021 = ╱41╱A╱ // 0xff1 @0x21
0x0fd0…1009 at0022 = ╱52╱R╱ // 0xff2 @0x22
0x0fd0…1009 at0023 = ╱54╱T╱ // 0xff3 @0x23
0x0fd0…1009 at0024 = ╱50╱P╱ // 0xff4 @0x24
0x0fd0…1009 at0025 = ╱45╱E╱ // 0xff5 @0x25
0x0fd0…1009 at0026 = ╱52╱R╱ // 0xff6 @0x26
0x0fd0…1009 at0027 = ╱ef╱$╱ // 0xff7 @0x27
0x0fd0…1009 at0028 = ╱eb╱;╱ // 0xff8 @0x28
0x0fd0…1009 at0029 = ╱22╱"╱ // 0xff9 @0x29
0x0fd0…1009 at002a = ╱20╱…╱ // 0xffa @0x2a
0x0fd0…1009 at002b = ╱2f╱/╱ // 0xffb @0x2b
0x0fd0…1009 at002c = ╱20╱…╱ // 0xffc @0x2c
0x0fd0…1009 at002d = ╱22╱"╱ // 0xffd @0x2d
0x0fd0…1009 at002e = ╱eb╱;╱ // 0xffe @0x2e
0x0fd0…1009 at002f = ╱53╱S╱ // 0xfff @0x2f
0x0fd0…1009 at0030 = ╱4c╱L╱ // 0x1000 @0x30
0x0fd0…1009 at0031 = ╱55╱U╱ // 0x1001 @0x31
0x0fd0…1009 at0032 = ╱54╱T╱ // 0x1002 @0x32
0x0fd0…1009 at0033 = ╱50╱P╱ // 0x1003 @0x33
0x0fd0…1009 at0034 = ╱45╱E╱ // 0x1004 @0x34
0x0fd0…1009 at0035 = ╱52╱R╱ // 0x1005 @0x35
0x0fd0…1009 at0036 = ╱ef╱$╱ // 0x1006 @0x36
0x0fd0…1009 at0037 = ╱eb╱;╱ // 0x1007 @0x37
0x0fd0…1009 at0038 = EOL // 0x1008 @0x38
0x0fd0…1009 }
0x1009…100f 9d66 3425 PRINT
0x1009…100f LineComalBin {
0x1009…100f ptr = 0x9d66 // 0x1009 @0x0
0x1009…100f lno = 0x0d61 // 0x100b @0x2
0x1009…100f at0004 = ╱92╱ PRINT ╱ // 0x100d @0x4
0x1009…100f at0005 = EOL // 0x100e @0x5
0x1009…100f }
0x100f…1015 9d6c 3427 PRINT
0x100f…1015 LineComalBin {
0x100f…1015 ptr = 0x9d6c // 0x100f @0x0
0x100f…1015 lno = 0x0d63 // 0x1011 @0x2
0x100f…1015 at0004 = ╱92╱ PRINT ╱ // 0x1013 @0x4
0x100f…1015 at0005 = EOL // 0x1014 @0x5
0x100f…1015 }
0x1015…101b 9d72 3430 PRINT
0x1015…101b LineComalBin {
0x1015…101b ptr = 0x9d72 // 0x1015 @0x0
0x1015…101b lno = 0x0d66 // 0x1017 @0x2
0x1015…101b at0004 = ╱92╱ PRINT ╱ // 0x1019 @0x4
0x1015…101b at0005 = EOL // 0x101a @0x5
0x1015…101b }
0x101b…102c 9d83 3440 LINIE=5
0x101b…102c LineComalBin {
0x101b…102c ptr = 0x9d83 // 0x101b @0x0
0x101b…102c lno = 0x0d70 // 0x101d @0x2
0x101b…102c at0004 = ╱4c╱L╱ // 0x101f @0x4
0x101b…102c at0005 = ╱49╱I╱ // 0x1020 @0x5
0x101b…102c at0006 = ╱4e╱N╱ // 0x1021 @0x6
0x101b…102c at0007 = ╱49╱I╱ // 0x1022 @0x7
0x101b…102c at0008 = ╱45╱E╱ // 0x1023 @0x8
0x101b…102c at0009 = ╱dc╱=╱ // 0x1024 @0x9
0x101b…102c at000a = ╱35╱5╱ // 0x1025 @0xa
0x101b…102c at000b = ╱fe0000a003╱ // 0x1026 @0xb
0x101b…102c at0010 = EOL // 0x102b @0x10
0x101b…102c }
0x102c…1032 9d89 3450 ENDIF
0x102c…1032 LineComalBin {
0x102c…1032 ptr = 0x9d89 // 0x102c @0x0
0x102c…1032 lno = 0x0d7a // 0x102e @0x2
0x102c…1032 at0004 = ╱9b╱ ENDIF ╱ // 0x1030 @0x4
0x102c…1032 at0005 = EOL // 0x1031 @0x5
0x102c…1032 }
0x1032…1075 9dcc 3455 PRINT " Rettelse i tælleværker til brug for ferie- og SH-opgørelse"
0x1032…1075 LineComalBin {
0x1032…1075 ptr = 0x9dcc // 0x1032 @0x0
0x1032…1075 lno = 0x0d7f // 0x1034 @0x2
0x1032…1075 at0004 = ╱92╱ PRINT ╱ // 0x1036 @0x4
0x1032…1075 at0005 = ╱22╱"╱ // 0x1037 @0x5
0x1032…1075 at0006 = ╱20╱…╱ // 0x1038 @0x6
0x1032…1075 at0007 = ╱52╱R╱ // 0x1039 @0x7
0x1032…1075 at0008 = ╱65╱e╱ // 0x103a @0x8
0x1032…1075 at0009 = ╱74╱t╱ // 0x103b @0x9
0x1032…1075 at000a = ╱74╱t╱ // 0x103c @0xa
0x1032…1075 at000b = ╱65╱e╱ // 0x103d @0xb
0x1032…1075 at000c = ╱6c╱l╱ // 0x103e @0xc
0x1032…1075 at000d = ╱73╱s╱ // 0x103f @0xd
0x1032…1075 at000e = ╱65╱e╱ // 0x1040 @0xe
0x1032…1075 at000f = ╱20╱…╱ // 0x1041 @0xf
0x1032…1075 at0010 = ╱69╱i╱ // 0x1042 @0x10
0x1032…1075 at0011 = ╱20╱…╱ // 0x1043 @0x11
0x1032…1075 at0012 = ╱74╱t╱ // 0x1044 @0x12
0x1032…1075 at0013 = ╱7b╱æ╱ // 0x1045 @0x13
0x1032…1075 at0014 = ╱6c╱l╱ // 0x1046 @0x14
0x1032…1075 at0015 = ╱6c╱l╱ // 0x1047 @0x15
0x1032…1075 at0016 = ╱65╱e╱ // 0x1048 @0x16
0x1032…1075 at0017 = ╱76╱v╱ // 0x1049 @0x17
0x1032…1075 at0018 = ╱7b╱æ╱ // 0x104a @0x18
0x1032…1075 at0019 = ╱72╱r╱ // 0x104b @0x19
0x1032…1075 at001a = ╱6b╱k╱ // 0x104c @0x1a
0x1032…1075 at001b = ╱65╱e╱ // 0x104d @0x1b
0x1032…1075 at001c = ╱72╱r╱ // 0x104e @0x1c
0x1032…1075 at001d = ╱20╱…╱ // 0x104f @0x1d
0x1032…1075 at001e = ╱74╱t╱ // 0x1050 @0x1e
0x1032…1075 at001f = ╱69╱i╱ // 0x1051 @0x1f
0x1032…1075 at0020 = ╱6c╱l╱ // 0x1052 @0x20
0x1032…1075 at0021 = ╱20╱…╱ // 0x1053 @0x21
0x1032…1075 at0022 = ╱62╱b╱ // 0x1054 @0x22
0x1032…1075 at0023 = ╱72╱r╱ // 0x1055 @0x23
0x1032…1075 at0024 = ╱75╱u╱ // 0x1056 @0x24
0x1032…1075 at0025 = ╱67╱g╱ // 0x1057 @0x25
0x1032…1075 at0026 = ╱20╱…╱ // 0x1058 @0x26
0x1032…1075 at0027 = ╱66╱f╱ // 0x1059 @0x27
0x1032…1075 at0028 = ╱6f╱o╱ // 0x105a @0x28
0x1032…1075 at0029 = ╱72╱r╱ // 0x105b @0x29
0x1032…1075 at002a = ╱20╱…╱ // 0x105c @0x2a
0x1032…1075 at002b = ╱66╱f╱ // 0x105d @0x2b
0x1032…1075 at002c = ╱65╱e╱ // 0x105e @0x2c
0x1032…1075 at002d = ╱72╱r╱ // 0x105f @0x2d
0x1032…1075 at002e = ╱69╱i╱ // 0x1060 @0x2e
0x1032…1075 at002f = ╱65╱e╱ // 0x1061 @0x2f
0x1032…1075 at0030 = ╱2d╱-╱ // 0x1062 @0x30
0x1032…1075 at0031 = ╱20╱…╱ // 0x1063 @0x31
0x1032…1075 at0032 = ╱6f╱o╱ // 0x1064 @0x32
0x1032…1075 at0033 = ╱67╱g╱ // 0x1065 @0x33
0x1032…1075 at0034 = ╱20╱…╱ // 0x1066 @0x34
0x1032…1075 at0035 = ╱53╱S╱ // 0x1067 @0x35
0x1032…1075 at0036 = ╱48╱H╱ // 0x1068 @0x36
0x1032…1075 at0037 = ╱2d╱-╱ // 0x1069 @0x37
0x1032…1075 at0038 = ╱6f╱o╱ // 0x106a @0x38
0x1032…1075 at0039 = ╱70╱p╱ // 0x106b @0x39
0x1032…1075 at003a = ╱67╱g╱ // 0x106c @0x3a
0x1032…1075 at003b = ╱7c╱ø╱ // 0x106d @0x3b
0x1032…1075 at003c = ╱72╱r╱ // 0x106e @0x3c
0x1032…1075 at003d = ╱65╱e╱ // 0x106f @0x3d
0x1032…1075 at003e = ╱6c╱l╱ // 0x1070 @0x3e
0x1032…1075 at003f = ╱73╱s╱ // 0x1071 @0x3f
0x1032…1075 at0040 = ╱65╱e╱ // 0x1072 @0x40
0x1032…1075 at0041 = ╱22╱"╱ // 0x1073 @0x41
0x1032…1075 at0042 = EOL // 0x1074 @0x42
0x1032…1075 }
0x1075…10bf 9e16 3460 PRINT " Lønnr";TAB(18);"Sygeferiepenge Beregn feriep SH-opsparing";
0x1075…10bf LineComalBin {
0x1075…10bf ptr = 0x9e16 // 0x1075 @0x0
0x1075…10bf lno = 0x0d84 // 0x1077 @0x2
0x1075…10bf at0004 = ╱92╱ PRINT ╱ // 0x1079 @0x4
0x1075…10bf at0005 = ╱22╱"╱ // 0x107a @0x5
0x1075…10bf at0006 = ╱20╱…╱ // 0x107b @0x6
0x1075…10bf at0007 = ╱4c╱L╱ // 0x107c @0x7
0x1075…10bf at0008 = ╱7c╱ø╱ // 0x107d @0x8
0x1075…10bf at0009 = ╱6e╱n╱ // 0x107e @0x9
0x1075…10bf at000a = ╱6e╱n╱ // 0x107f @0xa
0x1075…10bf at000b = ╱72╱r╱ // 0x1080 @0xb
0x1075…10bf at000c = ╱22╱"╱ // 0x1081 @0xc
0x1075…10bf at000d = ╱eb╱;╱ // 0x1082 @0xd
0x1075…10bf at000e = ╱d2╱TAB╱ // 0x1083 @0xe
0x1075…10bf at000f = ╱ed╱(╱ // 0x1084 @0xf
0x1075…10bf at0010 = ╱31╱1╱ // 0x1085 @0x10
0x1075…10bf at0011 = ╱38╱8╱ // 0x1086 @0x11
0x1075…10bf at0012 = ╱fe00009005╱ // 0x1087 @0x12
0x1075…10bf at0017 = ╱ee╱)╱ // 0x108c @0x17
0x1075…10bf at0018 = ╱eb╱;╱ // 0x108d @0x18
0x1075…10bf at0019 = ╱22╱"╱ // 0x108e @0x19
0x1075…10bf at001a = ╱53╱S╱ // 0x108f @0x1a
0x1075…10bf at001b = ╱79╱y╱ // 0x1090 @0x1b
0x1075…10bf at001c = ╱67╱g╱ // 0x1091 @0x1c
0x1075…10bf at001d = ╱65╱e╱ // 0x1092 @0x1d
0x1075…10bf at001e = ╱66╱f╱ // 0x1093 @0x1e
0x1075…10bf at001f = ╱65╱e╱ // 0x1094 @0x1f
0x1075…10bf at0020 = ╱72╱r╱ // 0x1095 @0x20
0x1075…10bf at0021 = ╱69╱i╱ // 0x1096 @0x21
0x1075…10bf at0022 = ╱65╱e╱ // 0x1097 @0x22
0x1075…10bf at0023 = ╱70╱p╱ // 0x1098 @0x23
0x1075…10bf at0024 = ╱65╱e╱ // 0x1099 @0x24
0x1075…10bf at0025 = ╱6e╱n╱ // 0x109a @0x25
0x1075…10bf at0026 = ╱67╱g╱ // 0x109b @0x26
0x1075…10bf at0027 = ╱65╱e╱ // 0x109c @0x27
0x1075…10bf at0028 = ╱20╱…╱ // 0x109d @0x28
0x1075…10bf at0029 = ╱20╱…╱ // 0x109e @0x29
0x1075…10bf at002a = ╱42╱B╱ // 0x109f @0x2a
0x1075…10bf at002b = ╱65╱e╱ // 0x10a0 @0x2b
0x1075…10bf at002c = ╱72╱r╱ // 0x10a1 @0x2c
0x1075…10bf at002d = ╱65╱e╱ // 0x10a2 @0x2d
0x1075…10bf at002e = ╱67╱g╱ // 0x10a3 @0x2e
0x1075…10bf at002f = ╱6e╱n╱ // 0x10a4 @0x2f
0x1075…10bf at0030 = ╱20╱…╱ // 0x10a5 @0x30
0x1075…10bf at0031 = ╱66╱f╱ // 0x10a6 @0x31
0x1075…10bf at0032 = ╱65╱e╱ // 0x10a7 @0x32
0x1075…10bf at0033 = ╱72╱r╱ // 0x10a8 @0x33
0x1075…10bf at0034 = ╱69╱i╱ // 0x10a9 @0x34
0x1075…10bf at0035 = ╱65╱e╱ // 0x10aa @0x35
0x1075…10bf at0036 = ╱70╱p╱ // 0x10ab @0x36
0x1075…10bf at0037 = ╱20╱…╱ // 0x10ac @0x37
0x1075…10bf at0038 = ╱20╱…╱ // 0x10ad @0x38
0x1075…10bf at0039 = ╱20╱…╱ // 0x10ae @0x39
0x1075…10bf at003a = ╱20╱…╱ // 0x10af @0x3a
0x1075…10bf at003b = ╱53╱S╱ // 0x10b0 @0x3b
0x1075…10bf at003c = ╱48╱H╱ // 0x10b1 @0x3c
0x1075…10bf at003d = ╱2d╱-╱ // 0x10b2 @0x3d
0x1075…10bf at003e = ╱6f╱o╱ // 0x10b3 @0x3e
0x1075…10bf at003f = ╱70╱p╱ // 0x10b4 @0x3f
0x1075…10bf at0040 = ╱73╱s╱ // 0x10b5 @0x40
0x1075…10bf at0041 = ╱70╱p╱ // 0x10b6 @0x41
0x1075…10bf at0042 = ╱61╱a╱ // 0x10b7 @0x42
0x1075…10bf at0043 = ╱72╱r╱ // 0x10b8 @0x43
0x1075…10bf at0044 = ╱69╱i╱ // 0x10b9 @0x44
0x1075…10bf at0045 = ╱6e╱n╱ // 0x10ba @0x45
0x1075…10bf at0046 = ╱67╱g╱ // 0x10bb @0x46
0x1075…10bf at0047 = ╱22╱"╱ // 0x10bc @0x47
0x1075…10bf at0048 = ╱eb╱;╱ // 0x10bd @0x48
0x1075…10bf at0049 = EOL // 0x10be @0x49
0x1075…10bf }
0x10bf…10d7 9e2e 3470 PRINT " SH-forskud"
0x10bf…10d7 LineComalBin {
0x10bf…10d7 ptr = 0x9e2e // 0x10bf @0x0
0x10bf…10d7 lno = 0x0d8e // 0x10c1 @0x2
0x10bf…10d7 at0004 = ╱92╱ PRINT ╱ // 0x10c3 @0x4
0x10bf…10d7 at0005 = ╱22╱"╱ // 0x10c4 @0x5
0x10bf…10d7 at0006 = ╱20╱…╱ // 0x10c5 @0x6
0x10bf…10d7 at0007 = ╱20╱…╱ // 0x10c6 @0x7
0x10bf…10d7 at0008 = ╱20╱…╱ // 0x10c7 @0x8
0x10bf…10d7 at0009 = ╱20╱…╱ // 0x10c8 @0x9
0x10bf…10d7 at000a = ╱20╱…╱ // 0x10c9 @0xa
0x10bf…10d7 at000b = ╱20╱…╱ // 0x10ca @0xb
0x10bf…10d7 at000c = ╱53╱S╱ // 0x10cb @0xc
0x10bf…10d7 at000d = ╱48╱H╱ // 0x10cc @0xd
0x10bf…10d7 at000e = ╱2d╱-╱ // 0x10cd @0xe
0x10bf…10d7 at000f = ╱66╱f╱ // 0x10ce @0xf
0x10bf…10d7 at0010 = ╱6f╱o╱ // 0x10cf @0x10
0x10bf…10d7 at0011 = ╱72╱r╱ // 0x10d0 @0x11
0x10bf…10d7 at0012 = ╱73╱s╱ // 0x10d1 @0x12
0x10bf…10d7 at0013 = ╱6b╱k╱ // 0x10d2 @0x13
0x10bf…10d7 at0014 = ╱75╱u╱ // 0x10d3 @0x14
0x10bf…10d7 at0015 = ╱64╱d╱ // 0x10d4 @0x15
0x10bf…10d7 at0016 = ╱22╱"╱ // 0x10d5 @0x16
0x10bf…10d7 at0017 = EOL // 0x10d6 @0x17
0x10bf…10d7 }
0x10d7…10e9 9e40 3480 LINIE=LINIE+G
0x10d7…10e9 LineComalBin {
0x10d7…10e9 ptr = 0x9e40 // 0x10d7 @0x0
0x10d7…10e9 lno = 0x0d98 // 0x10d9 @0x2
0x10d7…10e9 at0004 = ╱4c╱L╱ // 0x10db @0x4
0x10d7…10e9 at0005 = ╱49╱I╱ // 0x10dc @0x5
0x10d7…10e9 at0006 = ╱4e╱N╱ // 0x10dd @0x6
0x10d7…10e9 at0007 = ╱49╱I╱ // 0x10de @0x7
0x10d7…10e9 at0008 = ╱45╱E╱ // 0x10df @0x8
0x10d7…10e9 at0009 = ╱dc╱=╱ // 0x10e0 @0x9
0x10d7…10e9 at000a = ╱4c╱L╱ // 0x10e1 @0xa
0x10d7…10e9 at000b = ╱49╱I╱ // 0x10e2 @0xb
0x10d7…10e9 at000c = ╱4e╱N╱ // 0x10e3 @0xc
0x10d7…10e9 at000d = ╱49╱I╱ // 0x10e4 @0xd
0x10d7…10e9 at000e = ╱45╱E╱ // 0x10e5 @0xe
0x10d7…10e9 at000f = ╱e2╱+╱ // 0x10e6 @0xf
0x10d7…10e9 at0010 = ╱47╱G╱ // 0x10e7 @0x10
0x10d7…10e9 at0011 = EOL // 0x10e8 @0x11
0x10d7…10e9 }
0x10e9…10ef 9e46 3490 REPEAT
0x10e9…10ef LineComalBin {
0x10e9…10ef ptr = 0x9e46 // 0x10e9 @0x0
0x10e9…10ef lno = 0x0da2 // 0x10eb @0x2
0x10e9…10ef at0004 = ╱97╱ REPEAT ╱ // 0x10ed @0x4
0x10e9…10ef at0005 = EOL // 0x10ee @0x5
0x10e9…10ef }
0x10ef…10fa 9e51 3500 EXEC NÆSTE
0x10ef…10fa LineComalBin {
0x10ef…10fa ptr = 0x9e51 // 0x10ef @0x0
0x10ef…10fa lno = 0x0dac // 0x10f1 @0x2
0x10ef…10fa at0004 = ╱9d╱ EXEC ╱ // 0x10f3 @0x4
0x10ef…10fa at0005 = ╱4e╱N╱ // 0x10f4 @0x5
0x10ef…10fa at0006 = ╱5b╱Æ╱ // 0x10f5 @0x6
0x10ef…10fa at0007 = ╱53╱S╱ // 0x10f6 @0x7
0x10ef…10fa at0008 = ╱54╱T╱ // 0x10f7 @0x8
0x10ef…10fa at0009 = ╱45╱E╱ // 0x10f8 @0x9
0x10ef…10fa at000a = EOL // 0x10f9 @0xa
0x10ef…10fa }
0x10fa…110b 9e62 3510 IF LMNR<=MLMNR THEN
0x10fa…110b LineComalBin {
0x10fa…110b ptr = 0x9e62 // 0x10fa @0x0
0x10fa…110b lno = 0x0db6 // 0x10fc @0x2
0x10fa…110b at0004 = ╱9c╱ IF ╱ // 0x10fe @0x4
0x10fa…110b at0005 = ╱4c╱L╱ // 0x10ff @0x5
0x10fa…110b at0006 = ╱4d╱M╱ // 0x1100 @0x6
0x10fa…110b at0007 = ╱4e╱N╱ // 0x1101 @0x7
0x10fa…110b at0008 = ╱52╱R╱ // 0x1102 @0x8
0x10fa…110b at0009 = ╱df╱<=╱ // 0x1103 @0x9
0x10fa…110b at000a = ╱4d╱M╱ // 0x1104 @0xa
0x10fa…110b at000b = ╱4c╱L╱ // 0x1105 @0xb
0x10fa…110b at000c = ╱4d╱M╱ // 0x1106 @0xc
0x10fa…110b at000d = ╱4e╱N╱ // 0x1107 @0xd
0x10fa…110b at000e = ╱52╱R╱ // 0x1108 @0xe
0x10fa…110b at000f = ╱b6╱ THEN ╱ // 0x1109 @0xf
0x10fa…110b at0010 = EOL // 0x110a @0x10
0x10fa…110b }
0x110b…1117 9e6e 3520 EXEC INDTÆL
0x110b…1117 LineComalBin {
0x110b…1117 ptr = 0x9e6e // 0x110b @0x0
0x110b…1117 lno = 0x0dc0 // 0x110d @0x2
0x110b…1117 at0004 = ╱9d╱ EXEC ╱ // 0x110f @0x4
0x110b…1117 at0005 = ╱49╱I╱ // 0x1110 @0x5
0x110b…1117 at0006 = ╱4e╱N╱ // 0x1111 @0x6
0x110b…1117 at0007 = ╱44╱D╱ // 0x1112 @0x7
0x110b…1117 at0008 = ╱54╱T╱ // 0x1113 @0x8
0x110b…1117 at0009 = ╱5b╱Æ╱ // 0x1114 @0x9
0x110b…1117 at000a = ╱4c╱L╱ // 0x1115 @0xa
0x110b…1117 at000b = EOL // 0x1116 @0xb
0x110b…1117 }
0x1117…1145 9e9c 3530 EXEC CALC(E,TV$(19),TV$(18),RESUL$)
0x1117…1145 LineComalBin {
0x1117…1145 ptr = 0x9e9c // 0x1117 @0x0
0x1117…1145 lno = 0x0dca // 0x1119 @0x2
0x1117…1145 at0004 = ╱9d╱ EXEC ╱ // 0x111b @0x4
0x1117…1145 at0005 = ╱43╱C╱ // 0x111c @0x5
0x1117…1145 at0006 = ╱41╱A╱ // 0x111d @0x6
0x1117…1145 at0007 = ╱4c╱L╱ // 0x111e @0x7
0x1117…1145 at0008 = ╱43╱C╱ // 0x111f @0x8
0x1117…1145 at0009 = ╱ed╱(╱ // 0x1120 @0x9
0x1117…1145 at000a = ╱45╱E╱ // 0x1121 @0xa
0x1117…1145 at000b = ╱ec╱,╱ // 0x1122 @0xb
0x1117…1145 at000c = ╱54╱T╱ // 0x1123 @0xc
0x1117…1145 at000d = ╱56╱V╱ // 0x1124 @0xd
0x1117…1145 at000e = ╱ef╱$╱ // 0x1125 @0xe
0x1117…1145 at000f = ╱ed╱(╱ // 0x1126 @0xf
0x1117…1145 at0010 = ╱31╱1╱ // 0x1127 @0x10
0x1117…1145 at0011 = ╱39╱9╱ // 0x1128 @0x11
0x1117…1145 at0012 = ╱fe00009805╱ // 0x1129 @0x12
0x1117…1145 at0017 = ╱ee╱)╱ // 0x112e @0x17
0x1117…1145 at0018 = ╱ec╱,╱ // 0x112f @0x18
0x1117…1145 at0019 = ╱54╱T╱ // 0x1130 @0x19
0x1117…1145 at001a = ╱56╱V╱ // 0x1131 @0x1a
0x1117…1145 at001b = ╱ef╱$╱ // 0x1132 @0x1b
0x1117…1145 at001c = ╱ed╱(╱ // 0x1133 @0x1c
0x1117…1145 at001d = ╱31╱1╱ // 0x1134 @0x1d
0x1117…1145 at001e = ╱38╱8╱ // 0x1135 @0x1e
0x1117…1145 at001f = ╱fe00009005╱ // 0x1136 @0x1f
0x1117…1145 at0024 = ╱ee╱)╱ // 0x113b @0x24
0x1117…1145 at0025 = ╱ec╱,╱ // 0x113c @0x25
0x1117…1145 at0026 = ╱52╱R╱ // 0x113d @0x26
0x1117…1145 at0027 = ╱45╱E╱ // 0x113e @0x27
0x1117…1145 at0028 = ╱53╱S╱ // 0x113f @0x28
0x1117…1145 at0029 = ╱55╱U╱ // 0x1140 @0x29
0x1117…1145 at002a = ╱4c╱L╱ // 0x1141 @0x2a
0x1117…1145 at002b = ╱ef╱$╱ // 0x1142 @0x2b
0x1117…1145 at002c = ╱ee╱)╱ // 0x1143 @0x2c
0x1117…1145 at002d = EOL // 0x1144 @0x2d
0x1117…1145 }
0x1145…1174 9ecb 3540 EXEC CALC(E,TV$(22),TV$(21),RESUL1$)
0x1145…1174 LineComalBin {
0x1145…1174 ptr = 0x9ecb // 0x1145 @0x0
0x1145…1174 lno = 0x0dd4 // 0x1147 @0x2
0x1145…1174 at0004 = ╱9d╱ EXEC ╱ // 0x1149 @0x4
0x1145…1174 at0005 = ╱43╱C╱ // 0x114a @0x5
0x1145…1174 at0006 = ╱41╱A╱ // 0x114b @0x6
0x1145…1174 at0007 = ╱4c╱L╱ // 0x114c @0x7
0x1145…1174 at0008 = ╱43╱C╱ // 0x114d @0x8
0x1145…1174 at0009 = ╱ed╱(╱ // 0x114e @0x9
0x1145…1174 at000a = ╱45╱E╱ // 0x114f @0xa
0x1145…1174 at000b = ╱ec╱,╱ // 0x1150 @0xb
0x1145…1174 at000c = ╱54╱T╱ // 0x1151 @0xc
0x1145…1174 at000d = ╱56╱V╱ // 0x1152 @0xd
0x1145…1174 at000e = ╱ef╱$╱ // 0x1153 @0xe
0x1145…1174 at000f = ╱ed╱(╱ // 0x1154 @0xf
0x1145…1174 at0010 = ╱32╱2╱ // 0x1155 @0x10
0x1145…1174 at0011 = ╱32╱2╱ // 0x1156 @0x11
0x1145…1174 at0012 = ╱fe0000b005╱ // 0x1157 @0x12
0x1145…1174 at0017 = ╱ee╱)╱ // 0x115c @0x17
0x1145…1174 at0018 = ╱ec╱,╱ // 0x115d @0x18
0x1145…1174 at0019 = ╱54╱T╱ // 0x115e @0x19
0x1145…1174 at001a = ╱56╱V╱ // 0x115f @0x1a
0x1145…1174 at001b = ╱ef╱$╱ // 0x1160 @0x1b
0x1145…1174 at001c = ╱ed╱(╱ // 0x1161 @0x1c
0x1145…1174 at001d = ╱32╱2╱ // 0x1162 @0x1d
0x1145…1174 at001e = ╱31╱1╱ // 0x1163 @0x1e
0x1145…1174 at001f = ╱fe0000a805╱ // 0x1164 @0x1f
0x1145…1174 at0024 = ╱ee╱)╱ // 0x1169 @0x24
0x1145…1174 at0025 = ╱ec╱,╱ // 0x116a @0x25
0x1145…1174 at0026 = ╱52╱R╱ // 0x116b @0x26
0x1145…1174 at0027 = ╱45╱E╱ // 0x116c @0x27
0x1145…1174 at0028 = ╱53╱S╱ // 0x116d @0x28
0x1145…1174 at0029 = ╱55╱U╱ // 0x116e @0x29
0x1145…1174 at002a = ╱4c╱L╱ // 0x116f @0x2a
0x1145…1174 at002b = ╱31╱1╱ // 0x1170 @0x2b
0x1145…1174 at002c = ╱ef╱$╱ // 0x1171 @0x2c
0x1145…1174 at002d = ╱ee╱)╱ // 0x1172 @0x2d
0x1145…1174 at002e = EOL // 0x1173 @0x2e
0x1145…1174 }
0x1174…11a0 9ef7 3550 EXEC CALC(E,TV$(25),TV$(24),LIN$)
0x1174…11a0 LineComalBin {
0x1174…11a0 ptr = 0x9ef7 // 0x1174 @0x0
0x1174…11a0 lno = 0x0dde // 0x1176 @0x2
0x1174…11a0 at0004 = ╱9d╱ EXEC ╱ // 0x1178 @0x4
0x1174…11a0 at0005 = ╱43╱C╱ // 0x1179 @0x5
0x1174…11a0 at0006 = ╱41╱A╱ // 0x117a @0x6
0x1174…11a0 at0007 = ╱4c╱L╱ // 0x117b @0x7
0x1174…11a0 at0008 = ╱43╱C╱ // 0x117c @0x8
0x1174…11a0 at0009 = ╱ed╱(╱ // 0x117d @0x9
0x1174…11a0 at000a = ╱45╱E╱ // 0x117e @0xa
0x1174…11a0 at000b = ╱ec╱,╱ // 0x117f @0xb
0x1174…11a0 at000c = ╱54╱T╱ // 0x1180 @0xc
0x1174…11a0 at000d = ╱56╱V╱ // 0x1181 @0xd
0x1174…11a0 at000e = ╱ef╱$╱ // 0x1182 @0xe
0x1174…11a0 at000f = ╱ed╱(╱ // 0x1183 @0xf
0x1174…11a0 at0010 = ╱32╱2╱ // 0x1184 @0x10
0x1174…11a0 at0011 = ╱35╱5╱ // 0x1185 @0x11
0x1174…11a0 at0012 = ╱fe0000c805╱ // 0x1186 @0x12
0x1174…11a0 at0017 = ╱ee╱)╱ // 0x118b @0x17
0x1174…11a0 at0018 = ╱ec╱,╱ // 0x118c @0x18
0x1174…11a0 at0019 = ╱54╱T╱ // 0x118d @0x19
0x1174…11a0 at001a = ╱56╱V╱ // 0x118e @0x1a
0x1174…11a0 at001b = ╱ef╱$╱ // 0x118f @0x1b
0x1174…11a0 at001c = ╱ed╱(╱ // 0x1190 @0x1c
0x1174…11a0 at001d = ╱32╱2╱ // 0x1191 @0x1d
0x1174…11a0 at001e = ╱34╱4╱ // 0x1192 @0x1e
0x1174…11a0 at001f = ╱fe0000c005╱ // 0x1193 @0x1f
0x1174…11a0 at0024 = ╱ee╱)╱ // 0x1198 @0x24
0x1174…11a0 at0025 = ╱ec╱,╱ // 0x1199 @0x25
0x1174…11a0 at0026 = ╱4c╱L╱ // 0x119a @0x26
0x1174…11a0 at0027 = ╱49╱I╱ // 0x119b @0x27
0x1174…11a0 at0028 = ╱4e╱N╱ // 0x119c @0x28
0x1174…11a0 at0029 = ╱ef╱$╱ // 0x119d @0x29
0x1174…11a0 at002a = ╱ee╱)╱ // 0x119e @0x2a
0x1174…11a0 at002b = EOL // 0x119f @0x2b
0x1174…11a0 }
0x11a0…11cd 9f24 3555 EXEC CALC(E,TV$(28),TV$(27),LIN1$)
0x11a0…11cd LineComalBin {
0x11a0…11cd ptr = 0x9f24 // 0x11a0 @0x0
0x11a0…11cd lno = 0x0de3 // 0x11a2 @0x2
0x11a0…11cd at0004 = ╱9d╱ EXEC ╱ // 0x11a4 @0x4
0x11a0…11cd at0005 = ╱43╱C╱ // 0x11a5 @0x5
0x11a0…11cd at0006 = ╱41╱A╱ // 0x11a6 @0x6
0x11a0…11cd at0007 = ╱4c╱L╱ // 0x11a7 @0x7
0x11a0…11cd at0008 = ╱43╱C╱ // 0x11a8 @0x8
0x11a0…11cd at0009 = ╱ed╱(╱ // 0x11a9 @0x9
0x11a0…11cd at000a = ╱45╱E╱ // 0x11aa @0xa
0x11a0…11cd at000b = ╱ec╱,╱ // 0x11ab @0xb
0x11a0…11cd at000c = ╱54╱T╱ // 0x11ac @0xc
0x11a0…11cd at000d = ╱56╱V╱ // 0x11ad @0xd
0x11a0…11cd at000e = ╱ef╱$╱ // 0x11ae @0xe
0x11a0…11cd at000f = ╱ed╱(╱ // 0x11af @0xf
0x11a0…11cd at0010 = ╱32╱2╱ // 0x11b0 @0x10
0x11a0…11cd at0011 = ╱38╱8╱ // 0x11b1 @0x11
0x11a0…11cd at0012 = ╱fe0000e005╱ // 0x11b2 @0x12
0x11a0…11cd at0017 = ╱ee╱)╱ // 0x11b7 @0x17
0x11a0…11cd at0018 = ╱ec╱,╱ // 0x11b8 @0x18
0x11a0…11cd at0019 = ╱54╱T╱ // 0x11b9 @0x19
0x11a0…11cd at001a = ╱56╱V╱ // 0x11ba @0x1a
0x11a0…11cd at001b = ╱ef╱$╱ // 0x11bb @0x1b
0x11a0…11cd at001c = ╱ed╱(╱ // 0x11bc @0x1c
0x11a0…11cd at001d = ╱32╱2╱ // 0x11bd @0x1d
0x11a0…11cd at001e = ╱37╱7╱ // 0x11be @0x1e
0x11a0…11cd at001f = ╱fe0000d805╱ // 0x11bf @0x1f
0x11a0…11cd at0024 = ╱ee╱)╱ // 0x11c4 @0x24
0x11a0…11cd at0025 = ╱ec╱,╱ // 0x11c5 @0x25
0x11a0…11cd at0026 = ╱4c╱L╱ // 0x11c6 @0x26
0x11a0…11cd at0027 = ╱49╱I╱ // 0x11c7 @0x27
0x11a0…11cd at0028 = ╱4e╱N╱ // 0x11c8 @0x28
0x11a0…11cd at0029 = ╱31╱1╱ // 0x11c9 @0x29
0x11a0…11cd at002a = ╱ef╱$╱ // 0x11ca @0x2a
0x11a0…11cd at002b = ╱ee╱)╱ // 0x11cb @0x2b
0x11a0…11cd at002c = EOL // 0x11cc @0x2c
0x11a0…11cd }
0x11cd…120b 9f62 3560 TV$(18)=TAH$(G:11);TV$(19)=TAH$(G:11)
0x11cd…120b LineComalBin {
0x11cd…120b ptr = 0x9f62 // 0x11cd @0x0
0x11cd…120b lno = 0x0de8 // 0x11cf @0x2
0x11cd…120b at0004 = ╱54╱T╱ // 0x11d1 @0x4
0x11cd…120b at0005 = ╱56╱V╱ // 0x11d2 @0x5
0x11cd…120b at0006 = ╱ef╱$╱ // 0x11d3 @0x6
0x11cd…120b at0007 = ╱ed╱(╱ // 0x11d4 @0x7
0x11cd…120b at0008 = ╱31╱1╱ // 0x11d5 @0x8
0x11cd…120b at0009 = ╱38╱8╱ // 0x11d6 @0x9
0x11cd…120b at000a = ╱fe00009005╱ // 0x11d7 @0xa
0x11cd…120b at000f = ╱ee╱)╱ // 0x11dc @0xf
0x11cd…120b at0010 = ╱dc╱=╱ // 0x11dd @0x10
0x11cd…120b at0011 = ╱54╱T╱ // 0x11de @0x11
0x11cd…120b at0012 = ╱41╱A╱ // 0x11df @0x12
0x11cd…120b at0013 = ╱48╱H╱ // 0x11e0 @0x13
0x11cd…120b at0014 = ╱ef╱$╱ // 0x11e1 @0x14
0x11cd…120b at0015 = ╱ed╱(╱ // 0x11e2 @0x15
0x11cd…120b at0016 = ╱47╱G╱ // 0x11e3 @0x16
0x11cd…120b at0017 = ╱f0╱:╱ // 0x11e4 @0x17
0x11cd…120b at0018 = ╱31╱1╱ // 0x11e5 @0x18
0x11cd…120b at0019 = ╱31╱1╱ // 0x11e6 @0x19
0x11cd…120b at001a = ╱fe0000b004╱ // 0x11e7 @0x1a
0x11cd…120b at001f = ╱ee╱)╱ // 0x11ec @0x1f
0x11cd…120b at0020 = ╱eb╱;╱ // 0x11ed @0x20
0x11cd…120b at0021 = ╱54╱T╱ // 0x11ee @0x21
0x11cd…120b at0022 = ╱56╱V╱ // 0x11ef @0x22
0x11cd…120b at0023 = ╱ef╱$╱ // 0x11f0 @0x23
0x11cd…120b at0024 = ╱ed╱(╱ // 0x11f1 @0x24
0x11cd…120b at0025 = ╱31╱1╱ // 0x11f2 @0x25
0x11cd…120b at0026 = ╱39╱9╱ // 0x11f3 @0x26
0x11cd…120b at0027 = ╱fe00009805╱ // 0x11f4 @0x27
0x11cd…120b at002c = ╱ee╱)╱ // 0x11f9 @0x2c
0x11cd…120b at002d = ╱dc╱=╱ // 0x11fa @0x2d
0x11cd…120b at002e = ╱54╱T╱ // 0x11fb @0x2e
0x11cd…120b at002f = ╱41╱A╱ // 0x11fc @0x2f
0x11cd…120b at0030 = ╱48╱H╱ // 0x11fd @0x30
0x11cd…120b at0031 = ╱ef╱$╱ // 0x11fe @0x31
0x11cd…120b at0032 = ╱ed╱(╱ // 0x11ff @0x32
0x11cd…120b at0033 = ╱47╱G╱ // 0x1200 @0x33
0x11cd…120b at0034 = ╱f0╱:╱ // 0x1201 @0x34
0x11cd…120b at0035 = ╱31╱1╱ // 0x1202 @0x35
0x11cd…120b at0036 = ╱31╱1╱ // 0x1203 @0x36
0x11cd…120b at0037 = ╱fe0000b004╱ // 0x1204 @0x37
0x11cd…120b at003c = ╱ee╱)╱ // 0x1209 @0x3c
0x11cd…120b at003d = EOL // 0x120a @0x3d
0x11cd…120b }
0x120b…1249 9fa0 3570 TV$(21)=TAH$(G:11);TV$(22)=TAH$(G:11)
0x120b…1249 LineComalBin {
0x120b…1249 ptr = 0x9fa0 // 0x120b @0x0
0x120b…1249 lno = 0x0df2 // 0x120d @0x2
0x120b…1249 at0004 = ╱54╱T╱ // 0x120f @0x4
0x120b…1249 at0005 = ╱56╱V╱ // 0x1210 @0x5
0x120b…1249 at0006 = ╱ef╱$╱ // 0x1211 @0x6
0x120b…1249 at0007 = ╱ed╱(╱ // 0x1212 @0x7
0x120b…1249 at0008 = ╱32╱2╱ // 0x1213 @0x8
0x120b…1249 at0009 = ╱31╱1╱ // 0x1214 @0x9
0x120b…1249 at000a = ╱fe0000a805╱ // 0x1215 @0xa
0x120b…1249 at000f = ╱ee╱)╱ // 0x121a @0xf
0x120b…1249 at0010 = ╱dc╱=╱ // 0x121b @0x10
0x120b…1249 at0011 = ╱54╱T╱ // 0x121c @0x11
0x120b…1249 at0012 = ╱41╱A╱ // 0x121d @0x12
0x120b…1249 at0013 = ╱48╱H╱ // 0x121e @0x13
0x120b…1249 at0014 = ╱ef╱$╱ // 0x121f @0x14
0x120b…1249 at0015 = ╱ed╱(╱ // 0x1220 @0x15
0x120b…1249 at0016 = ╱47╱G╱ // 0x1221 @0x16
0x120b…1249 at0017 = ╱f0╱:╱ // 0x1222 @0x17
0x120b…1249 at0018 = ╱31╱1╱ // 0x1223 @0x18
0x120b…1249 at0019 = ╱31╱1╱ // 0x1224 @0x19
0x120b…1249 at001a = ╱fe0000b004╱ // 0x1225 @0x1a
0x120b…1249 at001f = ╱ee╱)╱ // 0x122a @0x1f
0x120b…1249 at0020 = ╱eb╱;╱ // 0x122b @0x20
0x120b…1249 at0021 = ╱54╱T╱ // 0x122c @0x21
0x120b…1249 at0022 = ╱56╱V╱ // 0x122d @0x22
0x120b…1249 at0023 = ╱ef╱$╱ // 0x122e @0x23
0x120b…1249 at0024 = ╱ed╱(╱ // 0x122f @0x24
0x120b…1249 at0025 = ╱32╱2╱ // 0x1230 @0x25
0x120b…1249 at0026 = ╱32╱2╱ // 0x1231 @0x26
0x120b…1249 at0027 = ╱fe0000b005╱ // 0x1232 @0x27
0x120b…1249 at002c = ╱ee╱)╱ // 0x1237 @0x2c
0x120b…1249 at002d = ╱dc╱=╱ // 0x1238 @0x2d
0x120b…1249 at002e = ╱54╱T╱ // 0x1239 @0x2e
0x120b…1249 at002f = ╱41╱A╱ // 0x123a @0x2f
0x120b…1249 at0030 = ╱48╱H╱ // 0x123b @0x30
0x120b…1249 at0031 = ╱ef╱$╱ // 0x123c @0x31
0x120b…1249 at0032 = ╱ed╱(╱ // 0x123d @0x32
0x120b…1249 at0033 = ╱47╱G╱ // 0x123e @0x33
0x120b…1249 at0034 = ╱f0╱:╱ // 0x123f @0x34
0x120b…1249 at0035 = ╱31╱1╱ // 0x1240 @0x35
0x120b…1249 at0036 = ╱31╱1╱ // 0x1241 @0x36
0x120b…1249 at0037 = ╱fe0000b004╱ // 0x1242 @0x37
0x120b…1249 at003c = ╱ee╱)╱ // 0x1247 @0x3c
0x120b…1249 at003d = EOL // 0x1248 @0x3d
0x120b…1249 }
0x1249…1287 9fde 3580 TV$(24)=TAH$(G:11);TV$(25)=TAH$(G:11)
0x1249…1287 LineComalBin {
0x1249…1287 ptr = 0x9fde // 0x1249 @0x0
0x1249…1287 lno = 0x0dfc // 0x124b @0x2
0x1249…1287 at0004 = ╱54╱T╱ // 0x124d @0x4
0x1249…1287 at0005 = ╱56╱V╱ // 0x124e @0x5
0x1249…1287 at0006 = ╱ef╱$╱ // 0x124f @0x6
0x1249…1287 at0007 = ╱ed╱(╱ // 0x1250 @0x7
0x1249…1287 at0008 = ╱32╱2╱ // 0x1251 @0x8
0x1249…1287 at0009 = ╱34╱4╱ // 0x1252 @0x9
0x1249…1287 at000a = ╱fe0000c005╱ // 0x1253 @0xa
0x1249…1287 at000f = ╱ee╱)╱ // 0x1258 @0xf
0x1249…1287 at0010 = ╱dc╱=╱ // 0x1259 @0x10
0x1249…1287 at0011 = ╱54╱T╱ // 0x125a @0x11
0x1249…1287 at0012 = ╱41╱A╱ // 0x125b @0x12
0x1249…1287 at0013 = ╱48╱H╱ // 0x125c @0x13
0x1249…1287 at0014 = ╱ef╱$╱ // 0x125d @0x14
0x1249…1287 at0015 = ╱ed╱(╱ // 0x125e @0x15
0x1249…1287 at0016 = ╱47╱G╱ // 0x125f @0x16
0x1249…1287 at0017 = ╱f0╱:╱ // 0x1260 @0x17
0x1249…1287 at0018 = ╱31╱1╱ // 0x1261 @0x18
0x1249…1287 at0019 = ╱31╱1╱ // 0x1262 @0x19
0x1249…1287 at001a = ╱fe0000b004╱ // 0x1263 @0x1a
0x1249…1287 at001f = ╱ee╱)╱ // 0x1268 @0x1f
0x1249…1287 at0020 = ╱eb╱;╱ // 0x1269 @0x20
0x1249…1287 at0021 = ╱54╱T╱ // 0x126a @0x21
0x1249…1287 at0022 = ╱56╱V╱ // 0x126b @0x22
0x1249…1287 at0023 = ╱ef╱$╱ // 0x126c @0x23
0x1249…1287 at0024 = ╱ed╱(╱ // 0x126d @0x24
0x1249…1287 at0025 = ╱32╱2╱ // 0x126e @0x25
0x1249…1287 at0026 = ╱35╱5╱ // 0x126f @0x26
0x1249…1287 at0027 = ╱fe0000c805╱ // 0x1270 @0x27
0x1249…1287 at002c = ╱ee╱)╱ // 0x1275 @0x2c
0x1249…1287 at002d = ╱dc╱=╱ // 0x1276 @0x2d
0x1249…1287 at002e = ╱54╱T╱ // 0x1277 @0x2e
0x1249…1287 at002f = ╱41╱A╱ // 0x1278 @0x2f
0x1249…1287 at0030 = ╱48╱H╱ // 0x1279 @0x30
0x1249…1287 at0031 = ╱ef╱$╱ // 0x127a @0x31
0x1249…1287 at0032 = ╱ed╱(╱ // 0x127b @0x32
0x1249…1287 at0033 = ╱47╱G╱ // 0x127c @0x33
0x1249…1287 at0034 = ╱f0╱:╱ // 0x127d @0x34
0x1249…1287 at0035 = ╱31╱1╱ // 0x127e @0x35
0x1249…1287 at0036 = ╱31╱1╱ // 0x127f @0x36
0x1249…1287 at0037 = ╱fe0000b004╱ // 0x1280 @0x37
0x1249…1287 at003c = ╱ee╱)╱ // 0x1285 @0x3c
0x1249…1287 at003d = EOL // 0x1286 @0x3d
0x1249…1287 }
0x1287…12c5 a01c 3585 TV$(27)=TAH$(G:11);TV$(28)=TAH$(G:11)
0x1287…12c5 LineComalBin {
0x1287…12c5 ptr = 0xa01c // 0x1287 @0x0
0x1287…12c5 lno = 0x0e01 // 0x1289 @0x2
0x1287…12c5 at0004 = ╱54╱T╱ // 0x128b @0x4
0x1287…12c5 at0005 = ╱56╱V╱ // 0x128c @0x5
0x1287…12c5 at0006 = ╱ef╱$╱ // 0x128d @0x6
0x1287…12c5 at0007 = ╱ed╱(╱ // 0x128e @0x7
0x1287…12c5 at0008 = ╱32╱2╱ // 0x128f @0x8
0x1287…12c5 at0009 = ╱37╱7╱ // 0x1290 @0x9
0x1287…12c5 at000a = ╱fe0000d805╱ // 0x1291 @0xa
0x1287…12c5 at000f = ╱ee╱)╱ // 0x1296 @0xf
0x1287…12c5 at0010 = ╱dc╱=╱ // 0x1297 @0x10
0x1287…12c5 at0011 = ╱54╱T╱ // 0x1298 @0x11
0x1287…12c5 at0012 = ╱41╱A╱ // 0x1299 @0x12
0x1287…12c5 at0013 = ╱48╱H╱ // 0x129a @0x13
0x1287…12c5 at0014 = ╱ef╱$╱ // 0x129b @0x14
0x1287…12c5 at0015 = ╱ed╱(╱ // 0x129c @0x15
0x1287…12c5 at0016 = ╱47╱G╱ // 0x129d @0x16
0x1287…12c5 at0017 = ╱f0╱:╱ // 0x129e @0x17
0x1287…12c5 at0018 = ╱31╱1╱ // 0x129f @0x18
0x1287…12c5 at0019 = ╱31╱1╱ // 0x12a0 @0x19
0x1287…12c5 at001a = ╱fe0000b004╱ // 0x12a1 @0x1a
0x1287…12c5 at001f = ╱ee╱)╱ // 0x12a6 @0x1f
0x1287…12c5 at0020 = ╱eb╱;╱ // 0x12a7 @0x20
0x1287…12c5 at0021 = ╱54╱T╱ // 0x12a8 @0x21
0x1287…12c5 at0022 = ╱56╱V╱ // 0x12a9 @0x22
0x1287…12c5 at0023 = ╱ef╱$╱ // 0x12aa @0x23
0x1287…12c5 at0024 = ╱ed╱(╱ // 0x12ab @0x24
0x1287…12c5 at0025 = ╱32╱2╱ // 0x12ac @0x25
0x1287…12c5 at0026 = ╱38╱8╱ // 0x12ad @0x26
0x1287…12c5 at0027 = ╱fe0000e005╱ // 0x12ae @0x27
0x1287…12c5 at002c = ╱ee╱)╱ // 0x12b3 @0x2c
0x1287…12c5 at002d = ╱dc╱=╱ // 0x12b4 @0x2d
0x1287…12c5 at002e = ╱54╱T╱ // 0x12b5 @0x2e
0x1287…12c5 at002f = ╱41╱A╱ // 0x12b6 @0x2f
0x1287…12c5 at0030 = ╱48╱H╱ // 0x12b7 @0x30
0x1287…12c5 at0031 = ╱ef╱$╱ // 0x12b8 @0x31
0x1287…12c5 at0032 = ╱ed╱(╱ // 0x12b9 @0x32
0x1287…12c5 at0033 = ╱47╱G╱ // 0x12ba @0x33
0x1287…12c5 at0034 = ╱f0╱:╱ // 0x12bb @0x34
0x1287…12c5 at0035 = ╱31╱1╱ // 0x12bc @0x35
0x1287…12c5 at0036 = ╱31╱1╱ // 0x12bd @0x36
0x1287…12c5 at0037 = ╱fe0000b004╱ // 0x12be @0x37
0x1287…12c5 at003c = ╱ee╱)╱ // 0x12c3 @0x3c
0x1287…12c5 at003d = EOL // 0x12c4 @0x3d
0x1287…12c5 }
0x12c5…12d0 a027 3590 OUTP=B
0x12c5…12d0 LineComalBin {
0x12c5…12d0 ptr = 0xa027 // 0x12c5 @0x0
0x12c5…12d0 lno = 0x0e06 // 0x12c7 @0x2
0x12c5…12d0 at0004 = ╱4f╱O╱ // 0x12c9 @0x4
0x12c5…12d0 at0005 = ╱55╱U╱ // 0x12ca @0x5
0x12c5…12d0 at0006 = ╱54╱T╱ // 0x12cb @0x6
0x12c5…12d0 at0007 = ╱50╱P╱ // 0x12cc @0x7
0x12c5…12d0 at0008 = ╱dc╱=╱ // 0x12cd @0x8
0x12c5…12d0 at0009 = ╱42╱B╱ // 0x12ce @0x9
0x12c5…12d0 at000a = EOL // 0x12cf @0xa
0x12c5…12d0 }
0x12d0…12f5 a04c 3600 EXEC CALC(4,RESUL$,TAH$,RESUL$)
0x12d0…12f5 LineComalBin {
0x12d0…12f5 ptr = 0xa04c // 0x12d0 @0x0
0x12d0…12f5 lno = 0x0e10 // 0x12d2 @0x2
0x12d0…12f5 at0004 = ╱9d╱ EXEC ╱ // 0x12d4 @0x4
0x12d0…12f5 at0005 = ╱43╱C╱ // 0x12d5 @0x5
0x12d0…12f5 at0006 = ╱41╱A╱ // 0x12d6 @0x6
0x12d0…12f5 at0007 = ╱4c╱L╱ // 0x12d7 @0x7
0x12d0…12f5 at0008 = ╱43╱C╱ // 0x12d8 @0x8
0x12d0…12f5 at0009 = ╱ed╱(╱ // 0x12d9 @0x9
0x12d0…12f5 at000a = ╱34╱4╱ // 0x12da @0xa
0x12d0…12f5 at000b = ╱fe00008003╱ // 0x12db @0xb
0x12d0…12f5 at0010 = ╱ec╱,╱ // 0x12e0 @0x10
0x12d0…12f5 at0011 = ╱52╱R╱ // 0x12e1 @0x11
0x12d0…12f5 at0012 = ╱45╱E╱ // 0x12e2 @0x12
0x12d0…12f5 at0013 = ╱53╱S╱ // 0x12e3 @0x13
0x12d0…12f5 at0014 = ╱55╱U╱ // 0x12e4 @0x14
0x12d0…12f5 at0015 = ╱4c╱L╱ // 0x12e5 @0x15
0x12d0…12f5 at0016 = ╱ef╱$╱ // 0x12e6 @0x16
0x12d0…12f5 at0017 = ╱ec╱,╱ // 0x12e7 @0x17
0x12d0…12f5 at0018 = ╱54╱T╱ // 0x12e8 @0x18
0x12d0…12f5 at0019 = ╱41╱A╱ // 0x12e9 @0x19
0x12d0…12f5 at001a = ╱48╱H╱ // 0x12ea @0x1a
0x12d0…12f5 at001b = ╱ef╱$╱ // 0x12eb @0x1b
0x12d0…12f5 at001c = ╱ec╱,╱ // 0x12ec @0x1c
0x12d0…12f5 at001d = ╱52╱R╱ // 0x12ed @0x1d
0x12d0…12f5 at001e = ╱45╱E╱ // 0x12ee @0x1e
0x12d0…12f5 at001f = ╱53╱S╱ // 0x12ef @0x1f
0x12d0…12f5 at0020 = ╱55╱U╱ // 0x12f0 @0x20
0x12d0…12f5 at0021 = ╱4c╱L╱ // 0x12f1 @0x21
0x12d0…12f5 at0022 = ╱ef╱$╱ // 0x12f2 @0x22
0x12d0…12f5 at0023 = ╱ee╱)╱ // 0x12f3 @0x23
0x12d0…12f5 at0024 = EOL // 0x12f4 @0x24
0x12d0…12f5 }
0x12f5…1300 a057 3610 IF SI<>B THEN
0x12f5…1300 LineComalBin {
0x12f5…1300 ptr = 0xa057 // 0x12f5 @0x0
0x12f5…1300 lno = 0x0e1a // 0x12f7 @0x2
0x12f5…1300 at0004 = ╱9c╱ IF ╱ // 0x12f9 @0x4
0x12f5…1300 at0005 = ╱53╱S╱ // 0x12fa @0x5
0x12f5…1300 at0006 = ╱49╱I╱ // 0x12fb @0x6
0x12f5…1300 at0007 = ╱e1╱<>╱ // 0x12fc @0x7
0x12f5…1300 at0008 = ╱42╱B╱ // 0x12fd @0x8
0x12f5…1300 at0009 = ╱b6╱ THEN ╱ // 0x12fe @0x9
0x12f5…1300 at000a = EOL // 0x12ff @0xa
0x12f5…1300 }
0x1300…130b a062 3620 OUTP=E
0x1300…130b LineComalBin {
0x1300…130b ptr = 0xa062 // 0x1300 @0x0
0x1300…130b lno = 0x0e24 // 0x1302 @0x2
0x1300…130b at0004 = ╱4f╱O╱ // 0x1304 @0x4
0x1300…130b at0005 = ╱55╱U╱ // 0x1305 @0x5
0x1300…130b at0006 = ╱54╱T╱ // 0x1306 @0x6
0x1300…130b at0007 = ╱50╱P╱ // 0x1307 @0x7
0x1300…130b at0008 = ╱dc╱=╱ // 0x1308 @0x8
0x1300…130b at0009 = ╱45╱E╱ // 0x1309 @0x9
0x1300…130b at000a = EOL // 0x130a @0xa
0x1300…130b }
0x130b…1333 a08a 3630 EXEC CALC(B,RESUL$,TOTAL$(E),TOTAL$(E))
0x130b…1333 LineComalBin {
0x130b…1333 ptr = 0xa08a // 0x130b @0x0
0x130b…1333 lno = 0x0e2e // 0x130d @0x2
0x130b…1333 at0004 = ╱9d╱ EXEC ╱ // 0x130f @0x4
0x130b…1333 at0005 = ╱43╱C╱ // 0x1310 @0x5
0x130b…1333 at0006 = ╱41╱A╱ // 0x1311 @0x6
0x130b…1333 at0007 = ╱4c╱L╱ // 0x1312 @0x7
0x130b…1333 at0008 = ╱43╱C╱ // 0x1313 @0x8
0x130b…1333 at0009 = ╱ed╱(╱ // 0x1314 @0x9
0x130b…1333 at000a = ╱42╱B╱ // 0x1315 @0xa
0x130b…1333 at000b = ╱ec╱,╱ // 0x1316 @0xb
0x130b…1333 at000c = ╱52╱R╱ // 0x1317 @0xc
0x130b…1333 at000d = ╱45╱E╱ // 0x1318 @0xd
0x130b…1333 at000e = ╱53╱S╱ // 0x1319 @0xe
0x130b…1333 at000f = ╱55╱U╱ // 0x131a @0xf
0x130b…1333 at0010 = ╱4c╱L╱ // 0x131b @0x10
0x130b…1333 at0011 = ╱ef╱$╱ // 0x131c @0x11
0x130b…1333 at0012 = ╱ec╱,╱ // 0x131d @0x12
0x130b…1333 at0013 = ╱54╱T╱ // 0x131e @0x13
0x130b…1333 at0014 = ╱4f╱O╱ // 0x131f @0x14
0x130b…1333 at0015 = ╱54╱T╱ // 0x1320 @0x15
0x130b…1333 at0016 = ╱41╱A╱ // 0x1321 @0x16
0x130b…1333 at0017 = ╱4c╱L╱ // 0x1322 @0x17
0x130b…1333 at0018 = ╱ef╱$╱ // 0x1323 @0x18
0x130b…1333 at0019 = ╱ed╱(╱ // 0x1324 @0x19
0x130b…1333 at001a = ╱45╱E╱ // 0x1325 @0x1a
0x130b…1333 at001b = ╱ee╱)╱ // 0x1326 @0x1b
0x130b…1333 at001c = ╱ec╱,╱ // 0x1327 @0x1c
0x130b…1333 at001d = ╱54╱T╱ // 0x1328 @0x1d
0x130b…1333 at001e = ╱4f╱O╱ // 0x1329 @0x1e
0x130b…1333 at001f = ╱54╱T╱ // 0x132a @0x1f
0x130b…1333 at0020 = ╱41╱A╱ // 0x132b @0x20
0x130b…1333 at0021 = ╱4c╱L╱ // 0x132c @0x21
0x130b…1333 at0022 = ╱ef╱$╱ // 0x132d @0x22
0x130b…1333 at0023 = ╱ed╱(╱ // 0x132e @0x23
0x130b…1333 at0024 = ╱45╱E╱ // 0x132f @0x24
0x130b…1333 at0025 = ╱ee╱)╱ // 0x1330 @0x25
0x130b…1333 at0026 = ╱ee╱)╱ // 0x1331 @0x26
0x130b…1333 at0027 = EOL // 0x1332 @0x27
0x130b…1333 }
0x1333…1339 a090 3640 ENDIF
0x1333…1339 LineComalBin {
0x1333…1339 ptr = 0xa090 // 0x1333 @0x0
0x1333…1339 lno = 0x0e38 // 0x1335 @0x2
0x1333…1339 at0004 = ╱9b╱ ENDIF ╱ // 0x1337 @0x4
0x1333…1339 at0005 = EOL // 0x1338 @0x5
0x1333…1339 }
0x1339…1360 a0b7 3650 EXEC CALC(4,RESUL1$,TAH$,RESUL1$)
0x1339…1360 LineComalBin {
0x1339…1360 ptr = 0xa0b7 // 0x1339 @0x0
0x1339…1360 lno = 0x0e42 // 0x133b @0x2
0x1339…1360 at0004 = ╱9d╱ EXEC ╱ // 0x133d @0x4
0x1339…1360 at0005 = ╱43╱C╱ // 0x133e @0x5
0x1339…1360 at0006 = ╱41╱A╱ // 0x133f @0x6
0x1339…1360 at0007 = ╱4c╱L╱ // 0x1340 @0x7
0x1339…1360 at0008 = ╱43╱C╱ // 0x1341 @0x8
0x1339…1360 at0009 = ╱ed╱(╱ // 0x1342 @0x9
0x1339…1360 at000a = ╱34╱4╱ // 0x1343 @0xa
0x1339…1360 at000b = ╱fe00008003╱ // 0x1344 @0xb
0x1339…1360 at0010 = ╱ec╱,╱ // 0x1349 @0x10
0x1339…1360 at0011 = ╱52╱R╱ // 0x134a @0x11
0x1339…1360 at0012 = ╱45╱E╱ // 0x134b @0x12
0x1339…1360 at0013 = ╱53╱S╱ // 0x134c @0x13
0x1339…1360 at0014 = ╱55╱U╱ // 0x134d @0x14
0x1339…1360 at0015 = ╱4c╱L╱ // 0x134e @0x15
0x1339…1360 at0016 = ╱31╱1╱ // 0x134f @0x16
0x1339…1360 at0017 = ╱ef╱$╱ // 0x1350 @0x17
0x1339…1360 at0018 = ╱ec╱,╱ // 0x1351 @0x18
0x1339…1360 at0019 = ╱54╱T╱ // 0x1352 @0x19
0x1339…1360 at001a = ╱41╱A╱ // 0x1353 @0x1a
0x1339…1360 at001b = ╱48╱H╱ // 0x1354 @0x1b
0x1339…1360 at001c = ╱ef╱$╱ // 0x1355 @0x1c
0x1339…1360 at001d = ╱ec╱,╱ // 0x1356 @0x1d
0x1339…1360 at001e = ╱52╱R╱ // 0x1357 @0x1e
0x1339…1360 at001f = ╱45╱E╱ // 0x1358 @0x1f
0x1339…1360 at0020 = ╱53╱S╱ // 0x1359 @0x20
0x1339…1360 at0021 = ╱55╱U╱ // 0x135a @0x21
0x1339…1360 at0022 = ╱4c╱L╱ // 0x135b @0x22
0x1339…1360 at0023 = ╱31╱1╱ // 0x135c @0x23
0x1339…1360 at0024 = ╱ef╱$╱ // 0x135d @0x24
0x1339…1360 at0025 = ╱ee╱)╱ // 0x135e @0x25
0x1339…1360 at0026 = EOL // 0x135f @0x26
0x1339…1360 }
0x1360…136b a0c2 3660 IF SI<>B THEN
0x1360…136b LineComalBin {
0x1360…136b ptr = 0xa0c2 // 0x1360 @0x0
0x1360…136b lno = 0x0e4c // 0x1362 @0x2
0x1360…136b at0004 = ╱9c╱ IF ╱ // 0x1364 @0x4
0x1360…136b at0005 = ╱53╱S╱ // 0x1365 @0x5
0x1360…136b at0006 = ╱49╱I╱ // 0x1366 @0x6
0x1360…136b at0007 = ╱e1╱<>╱ // 0x1367 @0x7
0x1360…136b at0008 = ╱42╱B╱ // 0x1368 @0x8
0x1360…136b at0009 = ╱b6╱ THEN ╱ // 0x1369 @0x9
0x1360…136b at000a = EOL // 0x136a @0xa
0x1360…136b }
0x136b…1376 a0cd 3670 OUTP=E
0x136b…1376 LineComalBin {
0x136b…1376 ptr = 0xa0cd // 0x136b @0x0
0x136b…1376 lno = 0x0e56 // 0x136d @0x2
0x136b…1376 at0004 = ╱4f╱O╱ // 0x136f @0x4
0x136b…1376 at0005 = ╱55╱U╱ // 0x1370 @0x5
0x136b…1376 at0006 = ╱54╱T╱ // 0x1371 @0x6
0x136b…1376 at0007 = ╱50╱P╱ // 0x1372 @0x7
0x136b…1376 at0008 = ╱dc╱=╱ // 0x1373 @0x8
0x136b…1376 at0009 = ╱45╱E╱ // 0x1374 @0x9
0x136b…1376 at000a = EOL // 0x1375 @0xa
0x136b…1376 }
0x1376…139f a0f6 3680 EXEC CALC(B,RESUL1$,TOTAL$(G),TOTAL$(G))
0x1376…139f LineComalBin {
0x1376…139f ptr = 0xa0f6 // 0x1376 @0x0
0x1376…139f lno = 0x0e60 // 0x1378 @0x2
0x1376…139f at0004 = ╱9d╱ EXEC ╱ // 0x137a @0x4
0x1376…139f at0005 = ╱43╱C╱ // 0x137b @0x5
0x1376…139f at0006 = ╱41╱A╱ // 0x137c @0x6
0x1376…139f at0007 = ╱4c╱L╱ // 0x137d @0x7
0x1376…139f at0008 = ╱43╱C╱ // 0x137e @0x8
0x1376…139f at0009 = ╱ed╱(╱ // 0x137f @0x9
0x1376…139f at000a = ╱42╱B╱ // 0x1380 @0xa
0x1376…139f at000b = ╱ec╱,╱ // 0x1381 @0xb
0x1376…139f at000c = ╱52╱R╱ // 0x1382 @0xc
0x1376…139f at000d = ╱45╱E╱ // 0x1383 @0xd
0x1376…139f at000e = ╱53╱S╱ // 0x1384 @0xe
0x1376…139f at000f = ╱55╱U╱ // 0x1385 @0xf
0x1376…139f at0010 = ╱4c╱L╱ // 0x1386 @0x10
0x1376…139f at0011 = ╱31╱1╱ // 0x1387 @0x11
0x1376…139f at0012 = ╱ef╱$╱ // 0x1388 @0x12
0x1376…139f at0013 = ╱ec╱,╱ // 0x1389 @0x13
0x1376…139f at0014 = ╱54╱T╱ // 0x138a @0x14
0x1376…139f at0015 = ╱4f╱O╱ // 0x138b @0x15
0x1376…139f at0016 = ╱54╱T╱ // 0x138c @0x16
0x1376…139f at0017 = ╱41╱A╱ // 0x138d @0x17
0x1376…139f at0018 = ╱4c╱L╱ // 0x138e @0x18
0x1376…139f at0019 = ╱ef╱$╱ // 0x138f @0x19
0x1376…139f at001a = ╱ed╱(╱ // 0x1390 @0x1a
0x1376…139f at001b = ╱47╱G╱ // 0x1391 @0x1b
0x1376…139f at001c = ╱ee╱)╱ // 0x1392 @0x1c
0x1376…139f at001d = ╱ec╱,╱ // 0x1393 @0x1d
0x1376…139f at001e = ╱54╱T╱ // 0x1394 @0x1e
0x1376…139f at001f = ╱4f╱O╱ // 0x1395 @0x1f
0x1376…139f at0020 = ╱54╱T╱ // 0x1396 @0x20
0x1376…139f at0021 = ╱41╱A╱ // 0x1397 @0x21
0x1376…139f at0022 = ╱4c╱L╱ // 0x1398 @0x22
0x1376…139f at0023 = ╱ef╱$╱ // 0x1399 @0x23
0x1376…139f at0024 = ╱ed╱(╱ // 0x139a @0x24
0x1376…139f at0025 = ╱47╱G╱ // 0x139b @0x25
0x1376…139f at0026 = ╱ee╱)╱ // 0x139c @0x26
0x1376…139f at0027 = ╱ee╱)╱ // 0x139d @0x27
0x1376…139f at0028 = EOL // 0x139e @0x28
0x1376…139f }
0x139f…13a5 a0fc 3690 ENDIF
0x139f…13a5 LineComalBin {
0x139f…13a5 ptr = 0xa0fc // 0x139f @0x0
0x139f…13a5 lno = 0x0e6a // 0x13a1 @0x2
0x139f…13a5 at0004 = ╱9b╱ ENDIF ╱ // 0x13a3 @0x4
0x139f…13a5 at0005 = EOL // 0x13a4 @0x5
0x139f…13a5 }
0x13a5…13c6 a11d 3700 EXEC CALC(4,LIN$,TAH$,LIN$)
0x13a5…13c6 LineComalBin {
0x13a5…13c6 ptr = 0xa11d // 0x13a5 @0x0
0x13a5…13c6 lno = 0x0e74 // 0x13a7 @0x2
0x13a5…13c6 at0004 = ╱9d╱ EXEC ╱ // 0x13a9 @0x4
0x13a5…13c6 at0005 = ╱43╱C╱ // 0x13aa @0x5
0x13a5…13c6 at0006 = ╱41╱A╱ // 0x13ab @0x6
0x13a5…13c6 at0007 = ╱4c╱L╱ // 0x13ac @0x7
0x13a5…13c6 at0008 = ╱43╱C╱ // 0x13ad @0x8
0x13a5…13c6 at0009 = ╱ed╱(╱ // 0x13ae @0x9
0x13a5…13c6 at000a = ╱34╱4╱ // 0x13af @0xa
0x13a5…13c6 at000b = ╱fe00008003╱ // 0x13b0 @0xb
0x13a5…13c6 at0010 = ╱ec╱,╱ // 0x13b5 @0x10
0x13a5…13c6 at0011 = ╱4c╱L╱ // 0x13b6 @0x11
0x13a5…13c6 at0012 = ╱49╱I╱ // 0x13b7 @0x12
0x13a5…13c6 at0013 = ╱4e╱N╱ // 0x13b8 @0x13
0x13a5…13c6 at0014 = ╱ef╱$╱ // 0x13b9 @0x14
0x13a5…13c6 at0015 = ╱ec╱,╱ // 0x13ba @0x15
0x13a5…13c6 at0016 = ╱54╱T╱ // 0x13bb @0x16
0x13a5…13c6 at0017 = ╱41╱A╱ // 0x13bc @0x17
0x13a5…13c6 at0018 = ╱48╱H╱ // 0x13bd @0x18
0x13a5…13c6 at0019 = ╱ef╱$╱ // 0x13be @0x19
0x13a5…13c6 at001a = ╱ec╱,╱ // 0x13bf @0x1a
0x13a5…13c6 at001b = ╱4c╱L╱ // 0x13c0 @0x1b
0x13a5…13c6 at001c = ╱49╱I╱ // 0x13c1 @0x1c
0x13a5…13c6 at001d = ╱4e╱N╱ // 0x13c2 @0x1d
0x13a5…13c6 at001e = ╱ef╱$╱ // 0x13c3 @0x1e
0x13a5…13c6 at001f = ╱ee╱)╱ // 0x13c4 @0x1f
0x13a5…13c6 at0020 = EOL // 0x13c5 @0x20
0x13a5…13c6 }
0x13c6…13d1 a128 3710 IF SI<>B THEN
0x13c6…13d1 LineComalBin {
0x13c6…13d1 ptr = 0xa128 // 0x13c6 @0x0
0x13c6…13d1 lno = 0x0e7e // 0x13c8 @0x2
0x13c6…13d1 at0004 = ╱9c╱ IF ╱ // 0x13ca @0x4
0x13c6…13d1 at0005 = ╱53╱S╱ // 0x13cb @0x5
0x13c6…13d1 at0006 = ╱49╱I╱ // 0x13cc @0x6
0x13c6…13d1 at0007 = ╱e1╱<>╱ // 0x13cd @0x7
0x13c6…13d1 at0008 = ╱42╱B╱ // 0x13ce @0x8
0x13c6…13d1 at0009 = ╱b6╱ THEN ╱ // 0x13cf @0x9
0x13c6…13d1 at000a = EOL // 0x13d0 @0xa
0x13c6…13d1 }
0x13d1…13dc a133 3720 OUTP=E
0x13d1…13dc LineComalBin {
0x13d1…13dc ptr = 0xa133 // 0x13d1 @0x0
0x13d1…13dc lno = 0x0e88 // 0x13d3 @0x2
0x13d1…13dc at0004 = ╱4f╱O╱ // 0x13d5 @0x4
0x13d1…13dc at0005 = ╱55╱U╱ // 0x13d6 @0x5
0x13d1…13dc at0006 = ╱54╱T╱ // 0x13d7 @0x6
0x13d1…13dc at0007 = ╱50╱P╱ // 0x13d8 @0x7
0x13d1…13dc at0008 = ╱dc╱=╱ // 0x13d9 @0x8
0x13d1…13dc at0009 = ╱45╱E╱ // 0x13da @0x9
0x13d1…13dc at000a = EOL // 0x13db @0xa
0x13d1…13dc }
0x13dc…1402 a159 3730 EXEC CALC(B,LIN$,TOTAL$(V),TOTAL$(V))
0x13dc…1402 LineComalBin {
0x13dc…1402 ptr = 0xa159 // 0x13dc @0x0
0x13dc…1402 lno = 0x0e92 // 0x13de @0x2
0x13dc…1402 at0004 = ╱9d╱ EXEC ╱ // 0x13e0 @0x4
0x13dc…1402 at0005 = ╱43╱C╱ // 0x13e1 @0x5
0x13dc…1402 at0006 = ╱41╱A╱ // 0x13e2 @0x6
0x13dc…1402 at0007 = ╱4c╱L╱ // 0x13e3 @0x7
0x13dc…1402 at0008 = ╱43╱C╱ // 0x13e4 @0x8
0x13dc…1402 at0009 = ╱ed╱(╱ // 0x13e5 @0x9
0x13dc…1402 at000a = ╱42╱B╱ // 0x13e6 @0xa
0x13dc…1402 at000b = ╱ec╱,╱ // 0x13e7 @0xb
0x13dc…1402 at000c = ╱4c╱L╱ // 0x13e8 @0xc
0x13dc…1402 at000d = ╱49╱I╱ // 0x13e9 @0xd
0x13dc…1402 at000e = ╱4e╱N╱ // 0x13ea @0xe
0x13dc…1402 at000f = ╱ef╱$╱ // 0x13eb @0xf
0x13dc…1402 at0010 = ╱ec╱,╱ // 0x13ec @0x10
0x13dc…1402 at0011 = ╱54╱T╱ // 0x13ed @0x11
0x13dc…1402 at0012 = ╱4f╱O╱ // 0x13ee @0x12
0x13dc…1402 at0013 = ╱54╱T╱ // 0x13ef @0x13
0x13dc…1402 at0014 = ╱41╱A╱ // 0x13f0 @0x14
0x13dc…1402 at0015 = ╱4c╱L╱ // 0x13f1 @0x15
0x13dc…1402 at0016 = ╱ef╱$╱ // 0x13f2 @0x16
0x13dc…1402 at0017 = ╱ed╱(╱ // 0x13f3 @0x17
0x13dc…1402 at0018 = ╱56╱V╱ // 0x13f4 @0x18
0x13dc…1402 at0019 = ╱ee╱)╱ // 0x13f5 @0x19
0x13dc…1402 at001a = ╱ec╱,╱ // 0x13f6 @0x1a
0x13dc…1402 at001b = ╱54╱T╱ // 0x13f7 @0x1b
0x13dc…1402 at001c = ╱4f╱O╱ // 0x13f8 @0x1c
0x13dc…1402 at001d = ╱54╱T╱ // 0x13f9 @0x1d
0x13dc…1402 at001e = ╱41╱A╱ // 0x13fa @0x1e
0x13dc…1402 at001f = ╱4c╱L╱ // 0x13fb @0x1f
0x13dc…1402 at0020 = ╱ef╱$╱ // 0x13fc @0x20
0x13dc…1402 at0021 = ╱ed╱(╱ // 0x13fd @0x21
0x13dc…1402 at0022 = ╱56╱V╱ // 0x13fe @0x22
0x13dc…1402 at0023 = ╱ee╱)╱ // 0x13ff @0x23
0x13dc…1402 at0024 = ╱ee╱)╱ // 0x1400 @0x24
0x13dc…1402 at0025 = EOL // 0x1401 @0x25
0x13dc…1402 }
0x1402…1408 a15f 3740 ENDIF
0x1402…1408 LineComalBin {
0x1402…1408 ptr = 0xa15f // 0x1402 @0x0
0x1402…1408 lno = 0x0e9c // 0x1404 @0x2
0x1402…1408 at0004 = ╱9b╱ ENDIF ╱ // 0x1406 @0x4
0x1402…1408 at0005 = EOL // 0x1407 @0x5
0x1402…1408 }
0x1408…142b a182 3741 EXEC CALC(4,LIN1$,TAH$,LIN1$)
0x1408…142b LineComalBin {
0x1408…142b ptr = 0xa182 // 0x1408 @0x0
0x1408…142b lno = 0x0e9d // 0x140a @0x2
0x1408…142b at0004 = ╱9d╱ EXEC ╱ // 0x140c @0x4
0x1408…142b at0005 = ╱43╱C╱ // 0x140d @0x5
0x1408…142b at0006 = ╱41╱A╱ // 0x140e @0x6
0x1408…142b at0007 = ╱4c╱L╱ // 0x140f @0x7
0x1408…142b at0008 = ╱43╱C╱ // 0x1410 @0x8
0x1408…142b at0009 = ╱ed╱(╱ // 0x1411 @0x9
0x1408…142b at000a = ╱34╱4╱ // 0x1412 @0xa
0x1408…142b at000b = ╱fe00008003╱ // 0x1413 @0xb
0x1408…142b at0010 = ╱ec╱,╱ // 0x1418 @0x10
0x1408…142b at0011 = ╱4c╱L╱ // 0x1419 @0x11
0x1408…142b at0012 = ╱49╱I╱ // 0x141a @0x12
0x1408…142b at0013 = ╱4e╱N╱ // 0x141b @0x13
0x1408…142b at0014 = ╱31╱1╱ // 0x141c @0x14
0x1408…142b at0015 = ╱ef╱$╱ // 0x141d @0x15
0x1408…142b at0016 = ╱ec╱,╱ // 0x141e @0x16
0x1408…142b at0017 = ╱54╱T╱ // 0x141f @0x17
0x1408…142b at0018 = ╱41╱A╱ // 0x1420 @0x18
0x1408…142b at0019 = ╱48╱H╱ // 0x1421 @0x19
0x1408…142b at001a = ╱ef╱$╱ // 0x1422 @0x1a
0x1408…142b at001b = ╱ec╱,╱ // 0x1423 @0x1b
0x1408…142b at001c = ╱4c╱L╱ // 0x1424 @0x1c
0x1408…142b at001d = ╱49╱I╱ // 0x1425 @0x1d
0x1408…142b at001e = ╱4e╱N╱ // 0x1426 @0x1e
0x1408…142b at001f = ╱31╱1╱ // 0x1427 @0x1f
0x1408…142b at0020 = ╱ef╱$╱ // 0x1428 @0x20
0x1408…142b at0021 = ╱ee╱)╱ // 0x1429 @0x21
0x1408…142b at0022 = EOL // 0x142a @0x22
0x1408…142b }
0x142b…1436 a18d 3742 IF SI<>B THEN
0x142b…1436 LineComalBin {
0x142b…1436 ptr = 0xa18d // 0x142b @0x0
0x142b…1436 lno = 0x0e9e // 0x142d @0x2
0x142b…1436 at0004 = ╱9c╱ IF ╱ // 0x142f @0x4
0x142b…1436 at0005 = ╱53╱S╱ // 0x1430 @0x5
0x142b…1436 at0006 = ╱49╱I╱ // 0x1431 @0x6
0x142b…1436 at0007 = ╱e1╱<>╱ // 0x1432 @0x7
0x142b…1436 at0008 = ╱42╱B╱ // 0x1433 @0x8
0x142b…1436 at0009 = ╱b6╱ THEN ╱ // 0x1434 @0x9
0x142b…1436 at000a = EOL // 0x1435 @0xa
0x142b…1436 }
0x1436…1441 a198 3743 OUTP=E
0x1436…1441 LineComalBin {
0x1436…1441 ptr = 0xa198 // 0x1436 @0x0
0x1436…1441 lno = 0x0e9f // 0x1438 @0x2
0x1436…1441 at0004 = ╱4f╱O╱ // 0x143a @0x4
0x1436…1441 at0005 = ╱55╱U╱ // 0x143b @0x5
0x1436…1441 at0006 = ╱54╱T╱ // 0x143c @0x6
0x1436…1441 at0007 = ╱50╱P╱ // 0x143d @0x7
0x1436…1441 at0008 = ╱dc╱=╱ // 0x143e @0x8
0x1436…1441 at0009 = ╱45╱E╱ // 0x143f @0x9
0x1436…1441 at000a = EOL // 0x1440 @0xa
0x1436…1441 }
0x1441…1472 a1c9 3744 EXEC CALC(B,LIN1$,TOTAL$(4),TOTAL$(4))
0x1441…1472 LineComalBin {
0x1441…1472 ptr = 0xa1c9 // 0x1441 @0x0
0x1441…1472 lno = 0x0ea0 // 0x1443 @0x2
0x1441…1472 at0004 = ╱9d╱ EXEC ╱ // 0x1445 @0x4
0x1441…1472 at0005 = ╱43╱C╱ // 0x1446 @0x5
0x1441…1472 at0006 = ╱41╱A╱ // 0x1447 @0x6
0x1441…1472 at0007 = ╱4c╱L╱ // 0x1448 @0x7
0x1441…1472 at0008 = ╱43╱C╱ // 0x1449 @0x8
0x1441…1472 at0009 = ╱ed╱(╱ // 0x144a @0x9
0x1441…1472 at000a = ╱42╱B╱ // 0x144b @0xa
0x1441…1472 at000b = ╱ec╱,╱ // 0x144c @0xb
0x1441…1472 at000c = ╱4c╱L╱ // 0x144d @0xc
0x1441…1472 at000d = ╱49╱I╱ // 0x144e @0xd
0x1441…1472 at000e = ╱4e╱N╱ // 0x144f @0xe
0x1441…1472 at000f = ╱31╱1╱ // 0x1450 @0xf
0x1441…1472 at0010 = ╱ef╱$╱ // 0x1451 @0x10
0x1441…1472 at0011 = ╱ec╱,╱ // 0x1452 @0x11
0x1441…1472 at0012 = ╱54╱T╱ // 0x1453 @0x12
0x1441…1472 at0013 = ╱4f╱O╱ // 0x1454 @0x13
0x1441…1472 at0014 = ╱54╱T╱ // 0x1455 @0x14
0x1441…1472 at0015 = ╱41╱A╱ // 0x1456 @0x15
0x1441…1472 at0016 = ╱4c╱L╱ // 0x1457 @0x16
0x1441…1472 at0017 = ╱ef╱$╱ // 0x1458 @0x17
0x1441…1472 at0018 = ╱ed╱(╱ // 0x1459 @0x18
0x1441…1472 at0019 = ╱34╱4╱ // 0x145a @0x19
0x1441…1472 at001a = ╱fe00008003╱ // 0x145b @0x1a
0x1441…1472 at001f = ╱ee╱)╱ // 0x1460 @0x1f
0x1441…1472 at0020 = ╱ec╱,╱ // 0x1461 @0x20
0x1441…1472 at0021 = ╱54╱T╱ // 0x1462 @0x21
0x1441…1472 at0022 = ╱4f╱O╱ // 0x1463 @0x22
0x1441…1472 at0023 = ╱54╱T╱ // 0x1464 @0x23
0x1441…1472 at0024 = ╱41╱A╱ // 0x1465 @0x24
0x1441…1472 at0025 = ╱4c╱L╱ // 0x1466 @0x25
0x1441…1472 at0026 = ╱ef╱$╱ // 0x1467 @0x26
0x1441…1472 at0027 = ╱ed╱(╱ // 0x1468 @0x27
0x1441…1472 at0028 = ╱34╱4╱ // 0x1469 @0x28
0x1441…1472 at0029 = ╱fe00008003╱ // 0x146a @0x29
0x1441…1472 at002e = ╱ee╱)╱ // 0x146f @0x2e
0x1441…1472 at002f = ╱ee╱)╱ // 0x1470 @0x2f
0x1441…1472 at0030 = EOL // 0x1471 @0x30
0x1441…1472 }
0x1472…1478 a1cf 3745 ENDIF
0x1472…1478 LineComalBin {
0x1472…1478 ptr = 0xa1cf // 0x1472 @0x0
0x1472…1478 lno = 0x0ea1 // 0x1474 @0x2
0x1472…1478 at0004 = ╱9b╱ ENDIF ╱ // 0x1476 @0x4
0x1472…1478 at0005 = EOL // 0x1477 @0x5
0x1472…1478 }
0x1478…1483 a1da 3750 IF OUTP THEN
0x1478…1483 LineComalBin {
0x1478…1483 ptr = 0xa1da // 0x1478 @0x0
0x1478…1483 lno = 0x0ea6 // 0x147a @0x2
0x1478…1483 at0004 = ╱9c╱ IF ╱ // 0x147c @0x4
0x1478…1483 at0005 = ╱4f╱O╱ // 0x147d @0x5
0x1478…1483 at0006 = ╱55╱U╱ // 0x147e @0x6
0x1478…1483 at0007 = ╱54╱T╱ // 0x147f @0x7
0x1478…1483 at0008 = ╱50╱P╱ // 0x1480 @0x8
0x1478…1483 at0009 = ╱b6╱ THEN ╱ // 0x1481 @0x9
0x1478…1483 at000a = EOL // 0x1482 @0xa
0x1478…1483 }
0x1483…1495 a1ec 3760 LINIE=LINIE+E
0x1483…1495 LineComalBin {
0x1483…1495 ptr = 0xa1ec // 0x1483 @0x0
0x1483…1495 lno = 0x0eb0 // 0x1485 @0x2
0x1483…1495 at0004 = ╱4c╱L╱ // 0x1487 @0x4
0x1483…1495 at0005 = ╱49╱I╱ // 0x1488 @0x5
0x1483…1495 at0006 = ╱4e╱N╱ // 0x1489 @0x6
0x1483…1495 at0007 = ╱49╱I╱ // 0x148a @0x7
0x1483…1495 at0008 = ╱45╱E╱ // 0x148b @0x8
0x1483…1495 at0009 = ╱dc╱=╱ // 0x148c @0x9
0x1483…1495 at000a = ╱4c╱L╱ // 0x148d @0xa
0x1483…1495 at000b = ╱49╱I╱ // 0x148e @0xb
0x1483…1495 at000c = ╱4e╱N╱ // 0x148f @0xc
0x1483…1495 at000d = ╱49╱I╱ // 0x1490 @0xd
0x1483…1495 at000e = ╱45╱E╱ // 0x1491 @0xe
0x1483…1495 at000f = ╱e2╱+╱ // 0x1492 @0xf
0x1483…1495 at0010 = ╱45╱E╱ // 0x1493 @0x10
0x1483…1495 at0011 = EOL // 0x1494 @0x11
0x1483…1495 }
0x1495…14af a206 3770 IF LINIE>MAXLIN-6 THEN
0x1495…14af LineComalBin {
0x1495…14af ptr = 0xa206 // 0x1495 @0x0
0x1495…14af lno = 0x0eba // 0x1497 @0x2
0x1495…14af at0004 = ╱9c╱ IF ╱ // 0x1499 @0x4
0x1495…14af at0005 = ╱4c╱L╱ // 0x149a @0x5
0x1495…14af at0006 = ╱49╱I╱ // 0x149b @0x6
0x1495…14af at0007 = ╱4e╱N╱ // 0x149c @0x7
0x1495…14af at0008 = ╱49╱I╱ // 0x149d @0x8
0x1495…14af at0009 = ╱45╱E╱ // 0x149e @0x9
0x1495…14af at000a = ╱de╱>╱ // 0x149f @0xa
0x1495…14af at000b = ╱4d╱M╱ // 0x14a0 @0xb
0x1495…14af at000c = ╱41╱A╱ // 0x14a1 @0xc
0x1495…14af at000d = ╱58╱X╱ // 0x14a2 @0xd
0x1495…14af at000e = ╱4c╱L╱ // 0x14a3 @0xe
0x1495…14af at000f = ╱49╱I╱ // 0x14a4 @0xf
0x1495…14af at0010 = ╱4e╱N╱ // 0x14a5 @0x10
0x1495…14af at0011 = ╱e3╱-╱ // 0x14a6 @0x11
0x1495…14af at0012 = ╱36╱6╱ // 0x14a7 @0x12
0x1495…14af at0013 = ╱fe0000c003╱ // 0x14a8 @0x13
0x1495…14af at0018 = ╱b6╱ THEN ╱ // 0x14ad @0x18
0x1495…14af at0019 = EOL // 0x14ae @0x19
0x1495…14af }
0x14af…14c1 a218 3780 WHILE LINIE<MAXLIN
0x14af…14c1 LineComalBin {
0x14af…14c1 ptr = 0xa218 // 0x14af @0x0
0x14af…14c1 lno = 0x0ec4 // 0x14b1 @0x2
0x14af…14c1 at0004 = ╱93╱ WHILE ╱ // 0x14b3 @0x4
0x14af…14c1 at0005 = ╱4c╱L╱ // 0x14b4 @0x5
0x14af…14c1 at0006 = ╱49╱I╱ // 0x14b5 @0x6
0x14af…14c1 at0007 = ╱4e╱N╱ // 0x14b6 @0x7
0x14af…14c1 at0008 = ╱49╱I╱ // 0x14b7 @0x8
0x14af…14c1 at0009 = ╱45╱E╱ // 0x14b8 @0x9
0x14af…14c1 at000a = ╱dd╱<╱ // 0x14b9 @0xa
0x14af…14c1 at000b = ╱4d╱M╱ // 0x14ba @0xb
0x14af…14c1 at000c = ╱41╱A╱ // 0x14bb @0xc
0x14af…14c1 at000d = ╱58╱X╱ // 0x14bc @0xd
0x14af…14c1 at000e = ╱4c╱L╱ // 0x14bd @0xe
0x14af…14c1 at000f = ╱49╱I╱ // 0x14be @0xf
0x14af…14c1 at0010 = ╱4e╱N╱ // 0x14bf @0x10
0x14af…14c1 at0011 = EOL // 0x14c0 @0x11
0x14af…14c1 }
0x14c1…14c7 (69,) a21e 3790 PRINT
0x14c1…14c7 LineComalBin {
0x14c1…14c7 ptr = 0xa21e // 0x14c1 @0x0
0x14c1…14c7 lno = 0x0ece // 0x14c3 @0x2
0x14c1…14c7 at0004 = ╱92╱ PRINT ╱ // 0x14c5 @0x4
0x14c1…14c7 at0005 = EOL // 0x14c6 @0x5
0x14c1…14c7 }
0x14c7…14d9 a230 3800 LINIE=LINIE+E
0x14c7…14d9 LineComalBin {
0x14c7…14d9 ptr = 0xa230 // 0x14c7 @0x0
0x14c7…14d9 lno = 0x0ed8 // 0x14c9 @0x2
0x14c7…14d9 at0004 = ╱4c╱L╱ // 0x14cb @0x4
0x14c7…14d9 at0005 = ╱49╱I╱ // 0x14cc @0x5
0x14c7…14d9 at0006 = ╱4e╱N╱ // 0x14cd @0x6
0x14c7…14d9 at0007 = ╱49╱I╱ // 0x14ce @0x7
0x14c7…14d9 at0008 = ╱45╱E╱ // 0x14cf @0x8
0x14c7…14d9 at0009 = ╱dc╱=╱ // 0x14d0 @0x9
0x14c7…14d9 at000a = ╱4c╱L╱ // 0x14d1 @0xa
0x14c7…14d9 at000b = ╱49╱I╱ // 0x14d2 @0xb
0x14c7…14d9 at000c = ╱4e╱N╱ // 0x14d3 @0xc
0x14c7…14d9 at000d = ╱49╱I╱ // 0x14d4 @0xd
0x14c7…14d9 at000e = ╱45╱E╱ // 0x14d5 @0xe
0x14c7…14d9 at000f = ╱e2╱+╱ // 0x14d6 @0xf
0x14c7…14d9 at0010 = ╱45╱E╱ // 0x14d7 @0x10
0x14c7…14d9 at0011 = EOL // 0x14d8 @0x11
0x14c7…14d9 }
0x14d9…14df a236 3810 ENDWHILE
0x14d9…14df LineComalBin {
0x14d9…14df ptr = 0xa236 // 0x14d9 @0x0
0x14d9…14df lno = 0x0ee2 // 0x14db @0x2
0x14d9…14df at0004 = ╱94╱ ENDWHILE ╱ // 0x14dd @0x4
0x14d9…14df at0005 = EOL // 0x14de @0x5
0x14d9…14df }
0x14df…14e5 a23c 3820 PRINT
0x14df…14e5 LineComalBin {
0x14df…14e5 ptr = 0xa23c // 0x14df @0x0
0x14df…14e5 lno = 0x0eec // 0x14e1 @0x2
0x14df…14e5 at0004 = ╱92╱ PRINT ╱ // 0x14e3 @0x4
0x14df…14e5 at0005 = EOL // 0x14e4 @0x5
0x14df…14e5 }
0x14e5…14f7 a24e 3825 SLJNR=SLJNR+E
0x14e5…14f7 LineComalBin {
0x14e5…14f7 ptr = 0xa24e // 0x14e5 @0x0
0x14e5…14f7 lno = 0x0ef1 // 0x14e7 @0x2
0x14e5…14f7 at0004 = ╱53╱S╱ // 0x14e9 @0x4
0x14e5…14f7 at0005 = ╱4c╱L╱ // 0x14ea @0x5
0x14e5…14f7 at0006 = ╱4a╱J╱ // 0x14eb @0x6
0x14e5…14f7 at0007 = ╱4e╱N╱ // 0x14ec @0x7
0x14e5…14f7 at0008 = ╱52╱R╱ // 0x14ed @0x8
0x14e5…14f7 at0009 = ╱dc╱=╱ // 0x14ee @0x9
0x14e5…14f7 at000a = ╱53╱S╱ // 0x14ef @0xa
0x14e5…14f7 at000b = ╱4c╱L╱ // 0x14f0 @0xb
0x14e5…14f7 at000c = ╱4a╱J╱ // 0x14f1 @0xc
0x14e5…14f7 at000d = ╱4e╱N╱ // 0x14f2 @0xd
0x14e5…14f7 at000e = ╱52╱R╱ // 0x14f3 @0xe
0x14e5…14f7 at000f = ╱e2╱+╱ // 0x14f4 @0xf
0x14e5…14f7 at0010 = ╱45╱E╱ // 0x14f5 @0x10
0x14e5…14f7 at0011 = EOL // 0x14f6 @0x11
0x14e5…14f7 }
0x14f7…1511 a268 3830 PRINT USING " SIDE ####":SLJNR;
0x14f7…1511 LineComalBin {
0x14f7…1511 ptr = 0xa268 // 0x14f7 @0x0
0x14f7…1511 lno = 0x0ef6 // 0x14f9 @0x2
0x14f7…1511 at0004 = ╱92╱ PRINT ╱ // 0x14fb @0x4
0x14f7…1511 at0005 = ╱b9╱ USING ╱ // 0x14fc @0x5
0x14f7…1511 at0006 = ╱22╱"╱ // 0x14fd @0x6
0x14f7…1511 at0007 = ╱20╱…╱ // 0x14fe @0x7
0x14f7…1511 at0008 = ╱53╱S╱ // 0x14ff @0x8
0x14f7…1511 at0009 = ╱49╱I╱ // 0x1500 @0x9
0x14f7…1511 at000a = ╱44╱D╱ // 0x1501 @0xa
0x14f7…1511 at000b = ╱45╱E╱ // 0x1502 @0xb
0x14f7…1511 at000c = ╱20╱…╱ // 0x1503 @0xc
0x14f7…1511 at000d = ╱23╱#╱ // 0x1504 @0xd
0x14f7…1511 at000e = ╱23╱#╱ // 0x1505 @0xe
0x14f7…1511 at000f = ╱23╱#╱ // 0x1506 @0xf
0x14f7…1511 at0010 = ╱23╱#╱ // 0x1507 @0x10
0x14f7…1511 at0011 = ╱22╱"╱ // 0x1508 @0x11
0x14f7…1511 at0012 = ╱f0╱:╱ // 0x1509 @0x12
0x14f7…1511 at0013 = ╱53╱S╱ // 0x150a @0x13
0x14f7…1511 at0014 = ╱4c╱L╱ // 0x150b @0x14
0x14f7…1511 at0015 = ╱4a╱J╱ // 0x150c @0x15
0x14f7…1511 at0016 = ╱4e╱N╱ // 0x150d @0x16
0x14f7…1511 at0017 = ╱52╱R╱ // 0x150e @0x17
0x14f7…1511 at0018 = ╱eb╱;╱ // 0x150f @0x18
0x14f7…1511 at0019 = EOL // 0x1510 @0x19
0x14f7…1511 }
0x1511…1532 a289 3831 PRINT " UDSKRIFTSDATO ";DAD$;
0x1511…1532 LineComalBin {
0x1511…1532 ptr = 0xa289 // 0x1511 @0x0
0x1511…1532 lno = 0x0ef7 // 0x1513 @0x2
0x1511…1532 at0004 = ╱92╱ PRINT ╱ // 0x1515 @0x4
0x1511…1532 at0005 = ╱22╱"╱ // 0x1516 @0x5
0x1511…1532 at0006 = ╱20╱…╱ // 0x1517 @0x6
0x1511…1532 at0007 = ╱20╱…╱ // 0x1518 @0x7
0x1511…1532 at0008 = ╱20╱…╱ // 0x1519 @0x8
0x1511…1532 at0009 = ╱20╱…╱ // 0x151a @0x9
0x1511…1532 at000a = ╱20╱…╱ // 0x151b @0xa
0x1511…1532 at000b = ╱55╱U╱ // 0x151c @0xb
0x1511…1532 at000c = ╱44╱D╱ // 0x151d @0xc
0x1511…1532 at000d = ╱53╱S╱ // 0x151e @0xd
0x1511…1532 at000e = ╱4b╱K╱ // 0x151f @0xe
0x1511…1532 at000f = ╱52╱R╱ // 0x1520 @0xf
0x1511…1532 at0010 = ╱49╱I╱ // 0x1521 @0x10
0x1511…1532 at0011 = ╱46╱F╱ // 0x1522 @0x11
0x1511…1532 at0012 = ╱54╱T╱ // 0x1523 @0x12
0x1511…1532 at0013 = ╱53╱S╱ // 0x1524 @0x13
0x1511…1532 at0014 = ╱44╱D╱ // 0x1525 @0x14
0x1511…1532 at0015 = ╱41╱A╱ // 0x1526 @0x15
0x1511…1532 at0016 = ╱54╱T╱ // 0x1527 @0x16
0x1511…1532 at0017 = ╱4f╱O╱ // 0x1528 @0x17
0x1511…1532 at0018 = ╱20╱…╱ // 0x1529 @0x18
0x1511…1532 at0019 = ╱22╱"╱ // 0x152a @0x19
0x1511…1532 at001a = ╱eb╱;╱ // 0x152b @0x1a
0x1511…1532 at001b = ╱44╱D╱ // 0x152c @0x1b
0x1511…1532 at001c = ╱41╱A╱ // 0x152d @0x1c
0x1511…1532 at001d = ╱44╱D╱ // 0x152e @0x1d
0x1511…1532 at001e = ╱ef╱$╱ // 0x152f @0x1e
0x1511…1532 at001f = ╱eb╱;╱ // 0x1530 @0x1f
0x1511…1532 at0020 = EOL // 0x1531 @0x20
0x1511…1532 }
0x1532…156b a2c2 3832 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$;
0x1532…156b LineComalBin {
0x1532…156b ptr = 0xa2c2 // 0x1532 @0x0
0x1532…156b lno = 0x0ef8 // 0x1534 @0x2
0x1532…156b at0004 = ╱92╱ PRINT ╱ // 0x1536 @0x4
0x1532…156b at0005 = ╱d2╱TAB╱ // 0x1537 @0x5
0x1532…156b at0006 = ╱ed╱(╱ // 0x1538 @0x6
0x1532…156b at0007 = ╱34╱4╱ // 0x1539 @0x7
0x1532…156b at0008 = ╱39╱9╱ // 0x153a @0x8
0x1532…156b at0009 = ╱fe0000c406╱ // 0x153b @0x9
0x1532…156b at000e = ╱ee╱)╱ // 0x1540 @0xe
0x1532…156b at000f = ╱eb╱;╱ // 0x1541 @0xf
0x1532…156b at0010 = ╱22╱"╱ // 0x1542 @0x10
0x1532…156b at0011 = ╱4c╱L╱ // 0x1543 @0x11
0x1532…156b at0012 = ╱5c╱Ø╱ // 0x1544 @0x12
0x1532…156b at0013 = ╱4e╱N╱ // 0x1545 @0x13
0x1532…156b at0014 = ╱50╱P╱ // 0x1546 @0x14
0x1532…156b at0015 = ╱45╱E╱ // 0x1547 @0x15
0x1532…156b at0016 = ╱52╱R╱ // 0x1548 @0x16
0x1532…156b at0017 = ╱49╱I╱ // 0x1549 @0x17
0x1532…156b at0018 = ╱4f╱O╱ // 0x154a @0x18
0x1532…156b at0019 = ╱44╱D╱ // 0x154b @0x19
0x1532…156b at001a = ╱45╱E╱ // 0x154c @0x1a
0x1532…156b at001b = ╱4e╱N╱ // 0x154d @0x1b
0x1532…156b at001c = ╱20╱…╱ // 0x154e @0x1c
0x1532…156b at001d = ╱22╱"╱ // 0x154f @0x1d
0x1532…156b at001e = ╱eb╱;╱ // 0x1550 @0x1e
0x1532…156b at001f = ╱53╱S╱ // 0x1551 @0x1f
0x1532…156b at0020 = ╱54╱T╱ // 0x1552 @0x20
0x1532…156b at0021 = ╱41╱A╱ // 0x1553 @0x21
0x1532…156b at0022 = ╱52╱R╱ // 0x1554 @0x22
0x1532…156b at0023 = ╱54╱T╱ // 0x1555 @0x23
0x1532…156b at0024 = ╱50╱P╱ // 0x1556 @0x24
0x1532…156b at0025 = ╱45╱E╱ // 0x1557 @0x25
0x1532…156b at0026 = ╱52╱R╱ // 0x1558 @0x26
0x1532…156b at0027 = ╱ef╱$╱ // 0x1559 @0x27
0x1532…156b at0028 = ╱eb╱;╱ // 0x155a @0x28
0x1532…156b at0029 = ╱22╱"╱ // 0x155b @0x29
0x1532…156b at002a = ╱20╱…╱ // 0x155c @0x2a
0x1532…156b at002b = ╱2f╱/╱ // 0x155d @0x2b
0x1532…156b at002c = ╱20╱…╱ // 0x155e @0x2c
0x1532…156b at002d = ╱22╱"╱ // 0x155f @0x2d
0x1532…156b at002e = ╱eb╱;╱ // 0x1560 @0x2e
0x1532…156b at002f = ╱53╱S╱ // 0x1561 @0x2f
0x1532…156b at0030 = ╱4c╱L╱ // 0x1562 @0x30
0x1532…156b at0031 = ╱55╱U╱ // 0x1563 @0x31
0x1532…156b at0032 = ╱54╱T╱ // 0x1564 @0x32
0x1532…156b at0033 = ╱50╱P╱ // 0x1565 @0x33
0x1532…156b at0034 = ╱45╱E╱ // 0x1566 @0x34
0x1532…156b at0035 = ╱52╱R╱ // 0x1567 @0x35
0x1532…156b at0036 = ╱ef╱$╱ // 0x1568 @0x36
0x1532…156b at0037 = ╱eb╱;╱ // 0x1569 @0x37
0x1532…156b at0038 = EOL // 0x156a @0x38
0x1532…156b }
0x156b…1571 a2c8 3835 PRINT
0x156b…1571 LineComalBin {
0x156b…1571 ptr = 0xa2c8 // 0x156b @0x0
0x156b…1571 lno = 0x0efb // 0x156d @0x2
0x156b…1571 at0004 = ╱92╱ PRINT ╱ // 0x156f @0x4
0x156b…1571 at0005 = EOL // 0x1570 @0x5
0x156b…1571 }
0x1571…1577 a2ce 3837 PRINT
0x1571…1577 LineComalBin {
0x1571…1577 ptr = 0xa2ce // 0x1571 @0x0
0x1571…1577 lno = 0x0efd // 0x1573 @0x2
0x1571…1577 at0004 = ╱92╱ PRINT ╱ // 0x1575 @0x4
0x1571…1577 at0005 = EOL // 0x1576 @0x5
0x1571…1577 }
0x1577…157d a2d4 3840 PRINT
0x1577…157d LineComalBin {
0x1577…157d ptr = 0xa2d4 // 0x1577 @0x0
0x1577…157d lno = 0x0f00 // 0x1579 @0x2
0x1577…157d at0004 = ╱92╱ PRINT ╱ // 0x157b @0x4
0x1577…157d at0005 = EOL // 0x157c @0x5
0x1577…157d }
0x157d…158e a2e5 3850 LINIE=5
0x157d…158e LineComalBin {
0x157d…158e ptr = 0xa2e5 // 0x157d @0x0
0x157d…158e lno = 0x0f0a // 0x157f @0x2
0x157d…158e at0004 = ╱4c╱L╱ // 0x1581 @0x4
0x157d…158e at0005 = ╱49╱I╱ // 0x1582 @0x5
0x157d…158e at0006 = ╱4e╱N╱ // 0x1583 @0x6
0x157d…158e at0007 = ╱49╱I╱ // 0x1584 @0x7
0x157d…158e at0008 = ╱45╱E╱ // 0x1585 @0x8
0x157d…158e at0009 = ╱dc╱=╱ // 0x1586 @0x9
0x157d…158e at000a = ╱35╱5╱ // 0x1587 @0xa
0x157d…158e at000b = ╱fe0000a003╱ // 0x1588 @0xb
0x157d…158e at0010 = EOL // 0x158d @0x10
0x157d…158e }
0x158e…15d8 a32f 3870 PRINT " Lønnr";TAB(18);"Sygeferiepenge Beregn feriep SH-opsparing";
0x158e…15d8 LineComalBin {
0x158e…15d8 ptr = 0xa32f // 0x158e @0x0
0x158e…15d8 lno = 0x0f1e // 0x1590 @0x2
0x158e…15d8 at0004 = ╱92╱ PRINT ╱ // 0x1592 @0x4
0x158e…15d8 at0005 = ╱22╱"╱ // 0x1593 @0x5
0x158e…15d8 at0006 = ╱20╱…╱ // 0x1594 @0x6
0x158e…15d8 at0007 = ╱4c╱L╱ // 0x1595 @0x7
0x158e…15d8 at0008 = ╱7c╱ø╱ // 0x1596 @0x8
0x158e…15d8 at0009 = ╱6e╱n╱ // 0x1597 @0x9
0x158e…15d8 at000a = ╱6e╱n╱ // 0x1598 @0xa
0x158e…15d8 at000b = ╱72╱r╱ // 0x1599 @0xb
0x158e…15d8 at000c = ╱22╱"╱ // 0x159a @0xc
0x158e…15d8 at000d = ╱eb╱;╱ // 0x159b @0xd
0x158e…15d8 at000e = ╱d2╱TAB╱ // 0x159c @0xe
0x158e…15d8 at000f = ╱ed╱(╱ // 0x159d @0xf
0x158e…15d8 at0010 = ╱31╱1╱ // 0x159e @0x10
0x158e…15d8 at0011 = ╱38╱8╱ // 0x159f @0x11
0x158e…15d8 at0012 = ╱fe00009005╱ // 0x15a0 @0x12
0x158e…15d8 at0017 = ╱ee╱)╱ // 0x15a5 @0x17
0x158e…15d8 at0018 = ╱eb╱;╱ // 0x15a6 @0x18
0x158e…15d8 at0019 = ╱22╱"╱ // 0x15a7 @0x19
0x158e…15d8 at001a = ╱53╱S╱ // 0x15a8 @0x1a
0x158e…15d8 at001b = ╱79╱y╱ // 0x15a9 @0x1b
0x158e…15d8 at001c = ╱67╱g╱ // 0x15aa @0x1c
0x158e…15d8 at001d = ╱65╱e╱ // 0x15ab @0x1d
0x158e…15d8 at001e = ╱66╱f╱ // 0x15ac @0x1e
0x158e…15d8 at001f = ╱65╱e╱ // 0x15ad @0x1f
0x158e…15d8 at0020 = ╱72╱r╱ // 0x15ae @0x20
0x158e…15d8 at0021 = ╱69╱i╱ // 0x15af @0x21
0x158e…15d8 at0022 = ╱65╱e╱ // 0x15b0 @0x22
0x158e…15d8 at0023 = ╱70╱p╱ // 0x15b1 @0x23
0x158e…15d8 at0024 = ╱65╱e╱ // 0x15b2 @0x24
0x158e…15d8 at0025 = ╱6e╱n╱ // 0x15b3 @0x25
0x158e…15d8 at0026 = ╱67╱g╱ // 0x15b4 @0x26
0x158e…15d8 at0027 = ╱65╱e╱ // 0x15b5 @0x27
0x158e…15d8 at0028 = ╱20╱…╱ // 0x15b6 @0x28
0x158e…15d8 at0029 = ╱20╱…╱ // 0x15b7 @0x29
0x158e…15d8 at002a = ╱42╱B╱ // 0x15b8 @0x2a
0x158e…15d8 at002b = ╱65╱e╱ // 0x15b9 @0x2b
0x158e…15d8 at002c = ╱72╱r╱ // 0x15ba @0x2c
0x158e…15d8 at002d = ╱65╱e╱ // 0x15bb @0x2d
0x158e…15d8 at002e = ╱67╱g╱ // 0x15bc @0x2e
0x158e…15d8 at002f = ╱6e╱n╱ // 0x15bd @0x2f
0x158e…15d8 at0030 = ╱20╱…╱ // 0x15be @0x30
0x158e…15d8 at0031 = ╱66╱f╱ // 0x15bf @0x31
0x158e…15d8 at0032 = ╱65╱e╱ // 0x15c0 @0x32
0x158e…15d8 at0033 = ╱72╱r╱ // 0x15c1 @0x33
0x158e…15d8 at0034 = ╱69╱i╱ // 0x15c2 @0x34
0x158e…15d8 at0035 = ╱65╱e╱ // 0x15c3 @0x35
0x158e…15d8 at0036 = ╱70╱p╱ // 0x15c4 @0x36
0x158e…15d8 at0037 = ╱20╱…╱ // 0x15c5 @0x37
0x158e…15d8 at0038 = ╱20╱…╱ // 0x15c6 @0x38
0x158e…15d8 at0039 = ╱20╱…╱ // 0x15c7 @0x39
0x158e…15d8 at003a = ╱20╱…╱ // 0x15c8 @0x3a
0x158e…15d8 at003b = ╱53╱S╱ // 0x15c9 @0x3b
0x158e…15d8 at003c = ╱48╱H╱ // 0x15ca @0x3c
0x158e…15d8 at003d = ╱2d╱-╱ // 0x15cb @0x3d
0x158e…15d8 at003e = ╱6f╱o╱ // 0x15cc @0x3e
0x158e…15d8 at003f = ╱70╱p╱ // 0x15cd @0x3f
0x158e…15d8 at0040 = ╱73╱s╱ // 0x15ce @0x40
0x158e…15d8 at0041 = ╱70╱p╱ // 0x15cf @0x41
0x158e…15d8 at0042 = ╱61╱a╱ // 0x15d0 @0x42
0x158e…15d8 at0043 = ╱72╱r╱ // 0x15d1 @0x43
0x158e…15d8 at0044 = ╱69╱i╱ // 0x15d2 @0x44
0x158e…15d8 at0045 = ╱6e╱n╱ // 0x15d3 @0x45
0x158e…15d8 at0046 = ╱67╱g╱ // 0x15d4 @0x46
0x158e…15d8 at0047 = ╱22╱"╱ // 0x15d5 @0x47
0x158e…15d8 at0048 = ╱eb╱;╱ // 0x15d6 @0x48
0x158e…15d8 at0049 = EOL // 0x15d7 @0x49
0x158e…15d8 }
0x15d8…15f0 a347 3880 PRINT " SH-forskud"
0x15d8…15f0 LineComalBin {
0x15d8…15f0 ptr = 0xa347 // 0x15d8 @0x0
0x15d8…15f0 lno = 0x0f28 // 0x15da @0x2
0x15d8…15f0 at0004 = ╱92╱ PRINT ╱ // 0x15dc @0x4
0x15d8…15f0 at0005 = ╱22╱"╱ // 0x15dd @0x5
0x15d8…15f0 at0006 = ╱20╱…╱ // 0x15de @0x6
0x15d8…15f0 at0007 = ╱20╱…╱ // 0x15df @0x7
0x15d8…15f0 at0008 = ╱20╱…╱ // 0x15e0 @0x8
0x15d8…15f0 at0009 = ╱20╱…╱ // 0x15e1 @0x9
0x15d8…15f0 at000a = ╱20╱…╱ // 0x15e2 @0xa
0x15d8…15f0 at000b = ╱20╱…╱ // 0x15e3 @0xb
0x15d8…15f0 at000c = ╱53╱S╱ // 0x15e4 @0xc
0x15d8…15f0 at000d = ╱48╱H╱ // 0x15e5 @0xd
0x15d8…15f0 at000e = ╱2d╱-╱ // 0x15e6 @0xe
0x15d8…15f0 at000f = ╱66╱f╱ // 0x15e7 @0xf
0x15d8…15f0 at0010 = ╱6f╱o╱ // 0x15e8 @0x10
0x15d8…15f0 at0011 = ╱72╱r╱ // 0x15e9 @0x11
0x15d8…15f0 at0012 = ╱73╱s╱ // 0x15ea @0x12
0x15d8…15f0 at0013 = ╱6b╱k╱ // 0x15eb @0x13
0x15d8…15f0 at0014 = ╱75╱u╱ // 0x15ec @0x14
0x15d8…15f0 at0015 = ╱64╱d╱ // 0x15ed @0x15
0x15d8…15f0 at0016 = ╱22╱"╱ // 0x15ee @0x16
0x15d8…15f0 at0017 = EOL // 0x15ef @0x17
0x15d8…15f0 }
0x15f0…1602 a359 3890 LINIE=LINIE+V
0x15f0…1602 LineComalBin {
0x15f0…1602 ptr = 0xa359 // 0x15f0 @0x0
0x15f0…1602 lno = 0x0f32 // 0x15f2 @0x2
0x15f0…1602 at0004 = ╱4c╱L╱ // 0x15f4 @0x4
0x15f0…1602 at0005 = ╱49╱I╱ // 0x15f5 @0x5
0x15f0…1602 at0006 = ╱4e╱N╱ // 0x15f6 @0x6
0x15f0…1602 at0007 = ╱49╱I╱ // 0x15f7 @0x7
0x15f0…1602 at0008 = ╱45╱E╱ // 0x15f8 @0x8
0x15f0…1602 at0009 = ╱dc╱=╱ // 0x15f9 @0x9
0x15f0…1602 at000a = ╱4c╱L╱ // 0x15fa @0xa
0x15f0…1602 at000b = ╱49╱I╱ // 0x15fb @0xb
0x15f0…1602 at000c = ╱4e╱N╱ // 0x15fc @0xc
0x15f0…1602 at000d = ╱49╱I╱ // 0x15fd @0xd
0x15f0…1602 at000e = ╱45╱E╱ // 0x15fe @0xe
0x15f0…1602 at000f = ╱e2╱+╱ // 0x15ff @0xf
0x15f0…1602 at0010 = ╱56╱V╱ // 0x1600 @0x10
0x15f0…1602 at0011 = EOL // 0x1601 @0x11
0x15f0…1602 }
0x1602…1608 a35f 3900 ENDIF
0x1602…1608 LineComalBin {
0x1602…1608 ptr = 0xa35f // 0x1602 @0x0
0x1602…1608 lno = 0x0f3c // 0x1604 @0x2
0x1602…1608 at0004 = ╱9b╱ ENDIF ╱ // 0x1606 @0x4
0x1602…1608 at0005 = EOL // 0x1607 @0x5
0x1602…1608 }
0x1608…1635 a38c 3901 IF RESUL$(12)="+" THEN RESUL$(12)=" "
0x1608…1635 LineComalBin {
0x1608…1635 ptr = 0xa38c // 0x1608 @0x0
0x1608…1635 lno = 0x0f3d // 0x160a @0x2
0x1608…1635 at0004 = ╱82╱ IF ╱ // 0x160c @0x4
0x1608…1635 at0005 = ╱52╱R╱ // 0x160d @0x5
0x1608…1635 at0006 = ╱45╱E╱ // 0x160e @0x6
0x1608…1635 at0007 = ╱53╱S╱ // 0x160f @0x7
0x1608…1635 at0008 = ╱55╱U╱ // 0x1610 @0x8
0x1608…1635 at0009 = ╱4c╱L╱ // 0x1611 @0x9
0x1608…1635 at000a = ╱ef╱$╱ // 0x1612 @0xa
0x1608…1635 at000b = ╱ed╱(╱ // 0x1613 @0xb
0x1608…1635 at000c = ╱31╱1╱ // 0x1614 @0xc
0x1608…1635 at000d = ╱32╱2╱ // 0x1615 @0xd
0x1608…1635 at000e = ╱fe0000c004╱ // 0x1616 @0xe
0x1608…1635 at0013 = ╱ee╱)╱ // 0x161b @0x13
0x1608…1635 at0014 = ╱dc╱=╱ // 0x161c @0x14
0x1608…1635 at0015 = ╱22╱"╱ // 0x161d @0x15
0x1608…1635 at0016 = ╱2b╱+╱ // 0x161e @0x16
0x1608…1635 at0017 = ╱22╱"╱ // 0x161f @0x17
0x1608…1635 at0018 = ╱b6╱ THEN ╱ // 0x1620 @0x18
0x1608…1635 at0019 = ╱52╱R╱ // 0x1621 @0x19
0x1608…1635 at001a = ╱45╱E╱ // 0x1622 @0x1a
0x1608…1635 at001b = ╱53╱S╱ // 0x1623 @0x1b
0x1608…1635 at001c = ╱55╱U╱ // 0x1624 @0x1c
0x1608…1635 at001d = ╱4c╱L╱ // 0x1625 @0x1d
0x1608…1635 at001e = ╱ef╱$╱ // 0x1626 @0x1e
0x1608…1635 at001f = ╱ed╱(╱ // 0x1627 @0x1f
0x1608…1635 at0020 = ╱31╱1╱ // 0x1628 @0x20
0x1608…1635 at0021 = ╱32╱2╱ // 0x1629 @0x21
0x1608…1635 at0022 = ╱fe0000c004╱ // 0x162a @0x22
0x1608…1635 at0027 = ╱ee╱)╱ // 0x162f @0x27
0x1608…1635 at0028 = ╱dc╱=╱ // 0x1630 @0x28
0x1608…1635 at0029 = ╱22╱"╱ // 0x1631 @0x29
0x1608…1635 at002a = ╱20╱…╱ // 0x1632 @0x2a
0x1608…1635 at002b = ╱22╱"╱ // 0x1633 @0x2b
0x1608…1635 at002c = EOL // 0x1634 @0x2c
0x1608…1635 }
0x1635…1663 a3ba 3902 IF RESUL1$(12)="+" THEN RESUL$(12)=" "
0x1635…1663 LineComalBin {
0x1635…1663 ptr = 0xa3ba // 0x1635 @0x0
0x1635…1663 lno = 0x0f3e // 0x1637 @0x2
0x1635…1663 at0004 = ╱82╱ IF ╱ // 0x1639 @0x4
0x1635…1663 at0005 = ╱52╱R╱ // 0x163a @0x5
0x1635…1663 at0006 = ╱45╱E╱ // 0x163b @0x6
0x1635…1663 at0007 = ╱53╱S╱ // 0x163c @0x7
0x1635…1663 at0008 = ╱55╱U╱ // 0x163d @0x8
0x1635…1663 at0009 = ╱4c╱L╱ // 0x163e @0x9
0x1635…1663 at000a = ╱31╱1╱ // 0x163f @0xa
0x1635…1663 at000b = ╱ef╱$╱ // 0x1640 @0xb
0x1635…1663 at000c = ╱ed╱(╱ // 0x1641 @0xc
0x1635…1663 at000d = ╱31╱1╱ // 0x1642 @0xd
0x1635…1663 at000e = ╱32╱2╱ // 0x1643 @0xe
0x1635…1663 at000f = ╱fe0000c004╱ // 0x1644 @0xf
0x1635…1663 at0014 = ╱ee╱)╱ // 0x1649 @0x14
0x1635…1663 at0015 = ╱dc╱=╱ // 0x164a @0x15
0x1635…1663 at0016 = ╱22╱"╱ // 0x164b @0x16
0x1635…1663 at0017 = ╱2b╱+╱ // 0x164c @0x17
0x1635…1663 at0018 = ╱22╱"╱ // 0x164d @0x18
0x1635…1663 at0019 = ╱b6╱ THEN ╱ // 0x164e @0x19
0x1635…1663 at001a = ╱52╱R╱ // 0x164f @0x1a
0x1635…1663 at001b = ╱45╱E╱ // 0x1650 @0x1b
0x1635…1663 at001c = ╱53╱S╱ // 0x1651 @0x1c
0x1635…1663 at001d = ╱55╱U╱ // 0x1652 @0x1d
0x1635…1663 at001e = ╱4c╱L╱ // 0x1653 @0x1e
0x1635…1663 at001f = ╱ef╱$╱ // 0x1654 @0x1f
0x1635…1663 at0020 = ╱ed╱(╱ // 0x1655 @0x20
0x1635…1663 at0021 = ╱31╱1╱ // 0x1656 @0x21
0x1635…1663 at0022 = ╱32╱2╱ // 0x1657 @0x22
0x1635…1663 at0023 = ╱fe0000c004╱ // 0x1658 @0x23
0x1635…1663 at0028 = ╱ee╱)╱ // 0x165d @0x28
0x1635…1663 at0029 = ╱dc╱=╱ // 0x165e @0x29
0x1635…1663 at002a = ╱22╱"╱ // 0x165f @0x2a
0x1635…1663 at002b = ╱20╱…╱ // 0x1660 @0x2b
0x1635…1663 at002c = ╱22╱"╱ // 0x1661 @0x2c
0x1635…1663 at002d = EOL // 0x1662 @0x2d
0x1635…1663 }
0x1663…168c a3e3 3903 IF LIN$(12)="+" THEN LIN$(12)=" "
0x1663…168c LineComalBin {
0x1663…168c ptr = 0xa3e3 // 0x1663 @0x0
0x1663…168c lno = 0x0f3f // 0x1665 @0x2
0x1663…168c at0004 = ╱82╱ IF ╱ // 0x1667 @0x4
0x1663…168c at0005 = ╱4c╱L╱ // 0x1668 @0x5
0x1663…168c at0006 = ╱49╱I╱ // 0x1669 @0x6
0x1663…168c at0007 = ╱4e╱N╱ // 0x166a @0x7
0x1663…168c at0008 = ╱ef╱$╱ // 0x166b @0x8
0x1663…168c at0009 = ╱ed╱(╱ // 0x166c @0x9
0x1663…168c at000a = ╱31╱1╱ // 0x166d @0xa
0x1663…168c at000b = ╱32╱2╱ // 0x166e @0xb
0x1663…168c at000c = ╱fe0000c004╱ // 0x166f @0xc
0x1663…168c at0011 = ╱ee╱)╱ // 0x1674 @0x11
0x1663…168c at0012 = ╱dc╱=╱ // 0x1675 @0x12
0x1663…168c at0013 = ╱22╱"╱ // 0x1676 @0x13
0x1663…168c at0014 = ╱2b╱+╱ // 0x1677 @0x14
0x1663…168c at0015 = ╱22╱"╱ // 0x1678 @0x15
0x1663…168c at0016 = ╱b6╱ THEN ╱ // 0x1679 @0x16
0x1663…168c at0017 = ╱4c╱L╱ // 0x167a @0x17
0x1663…168c at0018 = ╱49╱I╱ // 0x167b @0x18
0x1663…168c at0019 = ╱4e╱N╱ // 0x167c @0x19
0x1663…168c at001a = ╱ef╱$╱ // 0x167d @0x1a
0x1663…168c at001b = ╱ed╱(╱ // 0x167e @0x1b
0x1663…168c at001c = ╱31╱1╱ // 0x167f @0x1c
0x1663…168c at001d = ╱32╱2╱ // 0x1680 @0x1d
0x1663…168c at001e = ╱fe0000c004╱ // 0x1681 @0x1e
0x1663…168c at0023 = ╱ee╱)╱ // 0x1686 @0x23
0x1663…168c at0024 = ╱dc╱=╱ // 0x1687 @0x24
0x1663…168c at0025 = ╱22╱"╱ // 0x1688 @0x25
0x1663…168c at0026 = ╱20╱…╱ // 0x1689 @0x26
0x1663…168c at0027 = ╱22╱"╱ // 0x168a @0x27
0x1663…168c at0028 = EOL // 0x168b @0x28
0x1663…168c }
0x168c…16b7 a40e 3904 IF LIN1$(12)="+" THEN LIN1$(12)=" "
0x168c…16b7 LineComalBin {
0x168c…16b7 ptr = 0xa40e // 0x168c @0x0
0x168c…16b7 lno = 0x0f40 // 0x168e @0x2
0x168c…16b7 at0004 = ╱82╱ IF ╱ // 0x1690 @0x4
0x168c…16b7 at0005 = ╱4c╱L╱ // 0x1691 @0x5
0x168c…16b7 at0006 = ╱49╱I╱ // 0x1692 @0x6
0x168c…16b7 at0007 = ╱4e╱N╱ // 0x1693 @0x7
0x168c…16b7 at0008 = ╱31╱1╱ // 0x1694 @0x8
0x168c…16b7 at0009 = ╱ef╱$╱ // 0x1695 @0x9
0x168c…16b7 at000a = ╱ed╱(╱ // 0x1696 @0xa
0x168c…16b7 at000b = ╱31╱1╱ // 0x1697 @0xb
0x168c…16b7 at000c = ╱32╱2╱ // 0x1698 @0xc
0x168c…16b7 at000d = ╱fe0000c004╱ // 0x1699 @0xd
0x168c…16b7 at0012 = ╱ee╱)╱ // 0x169e @0x12
0x168c…16b7 at0013 = ╱dc╱=╱ // 0x169f @0x13
0x168c…16b7 at0014 = ╱22╱"╱ // 0x16a0 @0x14
0x168c…16b7 at0015 = ╱2b╱+╱ // 0x16a1 @0x15
0x168c…16b7 at0016 = ╱22╱"╱ // 0x16a2 @0x16
0x168c…16b7 at0017 = ╱b6╱ THEN ╱ // 0x16a3 @0x17
0x168c…16b7 at0018 = ╱4c╱L╱ // 0x16a4 @0x18
0x168c…16b7 at0019 = ╱49╱I╱ // 0x16a5 @0x19
0x168c…16b7 at001a = ╱4e╱N╱ // 0x16a6 @0x1a
0x168c…16b7 at001b = ╱31╱1╱ // 0x16a7 @0x1b
0x168c…16b7 at001c = ╱ef╱$╱ // 0x16a8 @0x1c
0x168c…16b7 at001d = ╱ed╱(╱ // 0x16a9 @0x1d
0x168c…16b7 at001e = ╱31╱1╱ // 0x16aa @0x1e
0x168c…16b7 at001f = ╱32╱2╱ // 0x16ab @0x1f
0x168c…16b7 at0020 = ╱fe0000c004╱ // 0x16ac @0x20
0x168c…16b7 at0025 = ╱ee╱)╱ // 0x16b1 @0x25
0x168c…16b7 at0026 = ╱dc╱=╱ // 0x16b2 @0x26
0x168c…16b7 at0027 = ╱22╱"╱ // 0x16b3 @0x27
0x168c…16b7 at0028 = ╱20╱…╱ // 0x16b4 @0x28
0x168c…16b7 at0029 = ╱22╱"╱ // 0x16b5 @0x29
0x168c…16b7 at002a = EOL // 0x16b6 @0x2a
0x168c…16b7 }
0x16b7…16ca a421 3905 PRINT USING "####":LMNR;
0x16b7…16ca LineComalBin {
0x16b7…16ca ptr = 0xa421 // 0x16b7 @0x0
0x16b7…16ca lno = 0x0f41 // 0x16b9 @0x2
0x16b7…16ca at0004 = ╱92╱ PRINT ╱ // 0x16bb @0x4
0x16b7…16ca at0005 = ╱b9╱ USING ╱ // 0x16bc @0x5
0x16b7…16ca at0006 = ╱22╱"╱ // 0x16bd @0x6
0x16b7…16ca at0007 = ╱23╱#╱ // 0x16be @0x7
0x16b7…16ca at0008 = ╱23╱#╱ // 0x16bf @0x8
0x16b7…16ca at0009 = ╱23╱#╱ // 0x16c0 @0x9
0x16b7…16ca at000a = ╱23╱#╱ // 0x16c1 @0xa
0x16b7…16ca at000b = ╱22╱"╱ // 0x16c2 @0xb
0x16b7…16ca at000c = ╱f0╱:╱ // 0x16c3 @0xc
0x16b7…16ca at000d = ╱4c╱L╱ // 0x16c4 @0xd
0x16b7…16ca at000e = ╱4d╱M╱ // 0x16c5 @0xe
0x16b7…16ca at000f = ╱4e╱N╱ // 0x16c6 @0xf
0x16b7…16ca at0010 = ╱52╱R╱ // 0x16c7 @0x10
0x16b7…16ca at0011 = ╱eb╱;╱ // 0x16c8 @0x11
0x16b7…16ca at0012 = EOL // 0x16c9 @0x12
0x16b7…16ca }
0x16ca…1716 a46d 3906 PRINT TAB(21);RESUL$;TAB(36);RESUL1$;TAB(52);LIN$;TAB(68);LIN1$;
0x16ca…1716 LineComalBin {
0x16ca…1716 ptr = 0xa46d // 0x16ca @0x0
0x16ca…1716 lno = 0x0f42 // 0x16cc @0x2
0x16ca…1716 at0004 = ╱92╱ PRINT ╱ // 0x16ce @0x4
0x16ca…1716 at0005 = ╱d2╱TAB╱ // 0x16cf @0x5
0x16ca…1716 at0006 = ╱ed╱(╱ // 0x16d0 @0x6
0x16ca…1716 at0007 = ╱32╱2╱ // 0x16d1 @0x7
0x16ca…1716 at0008 = ╱31╱1╱ // 0x16d2 @0x8
0x16ca…1716 at0009 = ╱fe0000a805╱ // 0x16d3 @0x9
0x16ca…1716 at000e = ╱ee╱)╱ // 0x16d8 @0xe
0x16ca…1716 at000f = ╱eb╱;╱ // 0x16d9 @0xf
0x16ca…1716 at0010 = ╱52╱R╱ // 0x16da @0x10
0x16ca…1716 at0011 = ╱45╱E╱ // 0x16db @0x11
0x16ca…1716 at0012 = ╱53╱S╱ // 0x16dc @0x12
0x16ca…1716 at0013 = ╱55╱U╱ // 0x16dd @0x13
0x16ca…1716 at0014 = ╱4c╱L╱ // 0x16de @0x14
0x16ca…1716 at0015 = ╱ef╱$╱ // 0x16df @0x15
0x16ca…1716 at0016 = ╱eb╱;╱ // 0x16e0 @0x16
0x16ca…1716 at0017 = ╱d2╱TAB╱ // 0x16e1 @0x17
0x16ca…1716 at0018 = ╱ed╱(╱ // 0x16e2 @0x18
0x16ca…1716 at0019 = ╱33╱3╱ // 0x16e3 @0x19
0x16ca…1716 at001a = ╱36╱6╱ // 0x16e4 @0x1a
0x16ca…1716 at001b = ╱fe00009006╱ // 0x16e5 @0x1b
0x16ca…1716 at0020 = ╱ee╱)╱ // 0x16ea @0x20
0x16ca…1716 at0021 = ╱eb╱;╱ // 0x16eb @0x21
0x16ca…1716 at0022 = ╱52╱R╱ // 0x16ec @0x22
0x16ca…1716 at0023 = ╱45╱E╱ // 0x16ed @0x23
0x16ca…1716 at0024 = ╱53╱S╱ // 0x16ee @0x24
0x16ca…1716 at0025 = ╱55╱U╱ // 0x16ef @0x25
0x16ca…1716 at0026 = ╱4c╱L╱ // 0x16f0 @0x26
0x16ca…1716 at0027 = ╱31╱1╱ // 0x16f1 @0x27
0x16ca…1716 at0028 = ╱ef╱$╱ // 0x16f2 @0x28
0x16ca…1716 at0029 = ╱eb╱;╱ // 0x16f3 @0x29
0x16ca…1716 at002a = ╱d2╱TAB╱ // 0x16f4 @0x2a
0x16ca…1716 at002b = ╱ed╱(╱ // 0x16f5 @0x2b
0x16ca…1716 at002c = ╱35╱5╱ // 0x16f6 @0x2c
0x16ca…1716 at002d = ╱32╱2╱ // 0x16f7 @0x2d
0x16ca…1716 at002e = ╱fe0000d006╱ // 0x16f8 @0x2e
0x16ca…1716 at0033 = ╱ee╱)╱ // 0x16fd @0x33
0x16ca…1716 at0034 = ╱eb╱;╱ // 0x16fe @0x34
0x16ca…1716 at0035 = ╱4c╱L╱ // 0x16ff @0x35
0x16ca…1716 at0036 = ╱49╱I╱ // 0x1700 @0x36
0x16ca…1716 at0037 = ╱4e╱N╱ // 0x1701 @0x37
0x16ca…1716 at0038 = ╱ef╱$╱ // 0x1702 @0x38
0x16ca…1716 at0039 = ╱eb╱;╱ // 0x1703 @0x39
0x16ca…1716 at003a = ╱d2╱TAB╱ // 0x1704 @0x3a
0x16ca…1716 at003b = ╱ed╱(╱ // 0x1705 @0x3b
0x16ca…1716 at003c = ╱36╱6╱ // 0x1706 @0x3c
0x16ca…1716 at003d = ╱38╱8╱ // 0x1707 @0x3d
0x16ca…1716 at003e = ╱fe00008807╱ // 0x1708 @0x3e
0x16ca…1716 at0043 = ╱ee╱)╱ // 0x170d @0x43
0x16ca…1716 at0044 = ╱eb╱;╱ // 0x170e @0x44
0x16ca…1716 at0045 = ╱4c╱L╱ // 0x170f @0x45
0x16ca…1716 at0046 = ╱49╱I╱ // 0x1710 @0x46
0x16ca…1716 at0047 = ╱4e╱N╱ // 0x1711 @0x47
0x16ca…1716 at0048 = ╱31╱1╱ // 0x1712 @0x48
0x16ca…1716 at0049 = ╱ef╱$╱ // 0x1713 @0x49
0x16ca…1716 at004a = ╱eb╱;╱ // 0x1714 @0x4a
0x16ca…1716 at004b = EOL // 0x1715 @0x4b
0x16ca…1716 }
0x1716…171c a473 3910 ENDIF
0x1716…171c LineComalBin {
0x1716…171c ptr = 0xa473 // 0x1716 @0x0
0x1716…171c lno = 0x0f46 // 0x1718 @0x2
0x1716…171c at0004 = ╱9b╱ ENDIF ╱ // 0x171a @0x4
0x1716…171c at0005 = EOL // 0x171b @0x5
0x1716…171c }
0x171c…1727 a47e 3912 EXEC UDTÆL
0x171c…1727 LineComalBin {
0x171c…1727 ptr = 0xa47e // 0x171c @0x0
0x171c…1727 lno = 0x0f48 // 0x171e @0x2
0x171c…1727 at0004 = ╱9d╱ EXEC ╱ // 0x1720 @0x4
0x171c…1727 at0005 = ╱55╱U╱ // 0x1721 @0x5
0x171c…1727 at0006 = ╱44╱D╱ // 0x1722 @0x6
0x171c…1727 at0007 = ╱54╱T╱ // 0x1723 @0x7
0x171c…1727 at0008 = ╱5b╱Æ╱ // 0x1724 @0x8
0x171c…1727 at0009 = ╱4c╱L╱ // 0x1725 @0x9
0x171c…1727 at000a = EOL // 0x1726 @0xa
0x171c…1727 }
0x1727…172d a484 3915 ENDIF
0x1727…172d LineComalBin {
0x1727…172d ptr = 0xa484 // 0x1727 @0x0
0x1727…172d lno = 0x0f4b // 0x1729 @0x2
0x1727…172d at0004 = ╱9b╱ ENDIF ╱ // 0x172b @0x4
0x1727…172d at0005 = EOL // 0x172c @0x5
0x1727…172d }
0x172d…173d a494 3920 UNTIL LMNR=>MLMNR
0x172d…173d LineComalBin {
0x172d…173d ptr = 0xa494 // 0x172d @0x0
0x172d…173d lno = 0x0f50 // 0x172f @0x2
0x172d…173d at0004 = ╱98╱ UNTIL ╱ // 0x1731 @0x4
0x172d…173d at0005 = ╱4c╱L╱ // 0x1732 @0x5
0x172d…173d at0006 = ╱4d╱M╱ // 0x1733 @0x6
0x172d…173d at0007 = ╱4e╱N╱ // 0x1734 @0x7
0x172d…173d at0008 = ╱52╱R╱ // 0x1735 @0x8
0x172d…173d at0009 = ╱e0╱=>╱ // 0x1736 @0x9
0x172d…173d at000a = ╱4d╱M╱ // 0x1737 @0xa
0x172d…173d at000b = ╱4c╱L╱ // 0x1738 @0xb
0x172d…173d at000c = ╱4d╱M╱ // 0x1739 @0xc
0x172d…173d at000d = ╱4e╱N╱ // 0x173a @0xd
0x172d…173d at000e = ╱52╱R╱ // 0x173b @0xe
0x172d…173d at000f = EOL // 0x173c @0xf
0x172d…173d }
0x173d…174d a4a4 3930 FOR I=E TO 4
0x173d…174d LineComalBin {
0x173d…174d ptr = 0xa4a4 // 0x173d @0x0
0x173d…174d lno = 0x0f5a // 0x173f @0x2
0x173d…174d at0004 = ╱83╱ FOR ╱ // 0x1741 @0x4
0x173d…174d at0005 = ╱49╱I╱ // 0x1742 @0x5
0x173d…174d at0006 = ╱dc╱=╱ // 0x1743 @0x6
0x173d…174d at0007 = ╱45╱E╱ // 0x1744 @0x7
0x173d…174d at0008 = ╱b7╱ TO ╱ // 0x1745 @0x8
0x173d…174d at0009 = ╱34╱4╱ // 0x1746 @0x9
0x173d…174d at000a = ╱fe00008003╱ // 0x1747 @0xa
0x173d…174d at000f = EOL // 0x174c @0xf
0x173d…174d }
0x174d…177e a4d5 3940 IF TOTAL$(I,12)="+" THEN TOTAL$(I,12)=" "
0x174d…177e LineComalBin {
0x174d…177e ptr = 0xa4d5 // 0x174d @0x0
0x174d…177e lno = 0x0f64 // 0x174f @0x2
0x174d…177e at0004 = ╱82╱ IF ╱ // 0x1751 @0x4
0x174d…177e at0005 = ╱54╱T╱ // 0x1752 @0x5
0x174d…177e at0006 = ╱4f╱O╱ // 0x1753 @0x6
0x174d…177e at0007 = ╱54╱T╱ // 0x1754 @0x7
0x174d…177e at0008 = ╱41╱A╱ // 0x1755 @0x8
0x174d…177e at0009 = ╱4c╱L╱ // 0x1756 @0x9
0x174d…177e at000a = ╱ef╱$╱ // 0x1757 @0xa
0x174d…177e at000b = ╱ed╱(╱ // 0x1758 @0xb
0x174d…177e at000c = ╱49╱I╱ // 0x1759 @0xc
0x174d…177e at000d = ╱ec╱,╱ // 0x175a @0xd
0x174d…177e at000e = ╱31╱1╱ // 0x175b @0xe
0x174d…177e at000f = ╱32╱2╱ // 0x175c @0xf
0x174d…177e at0010 = ╱fe0000c004╱ // 0x175d @0x10
0x174d…177e at0015 = ╱ee╱)╱ // 0x1762 @0x15
0x174d…177e at0016 = ╱dc╱=╱ // 0x1763 @0x16
0x174d…177e at0017 = ╱22╱"╱ // 0x1764 @0x17
0x174d…177e at0018 = ╱2b╱+╱ // 0x1765 @0x18
0x174d…177e at0019 = ╱22╱"╱ // 0x1766 @0x19
0x174d…177e at001a = ╱b6╱ THEN ╱ // 0x1767 @0x1a
0x174d…177e at001b = ╱54╱T╱ // 0x1768 @0x1b
0x174d…177e at001c = ╱4f╱O╱ // 0x1769 @0x1c
0x174d…177e at001d = ╱54╱T╱ // 0x176a @0x1d
0x174d…177e at001e = ╱41╱A╱ // 0x176b @0x1e
0x174d…177e at001f = ╱4c╱L╱ // 0x176c @0x1f
0x174d…177e at0020 = ╱ef╱$╱ // 0x176d @0x20
0x174d…177e at0021 = ╱ed╱(╱ // 0x176e @0x21
0x174d…177e at0022 = ╱49╱I╱ // 0x176f @0x22
0x174d…177e at0023 = ╱ec╱,╱ // 0x1770 @0x23
0x174d…177e at0024 = ╱31╱1╱ // 0x1771 @0x24
0x174d…177e at0025 = ╱32╱2╱ // 0x1772 @0x25
0x174d…177e at0026 = ╱fe0000c004╱ // 0x1773 @0x26
0x174d…177e at002b = ╱ee╱)╱ // 0x1778 @0x2b
0x174d…177e at002c = ╱dc╱=╱ // 0x1779 @0x2c
0x174d…177e at002d = ╱22╱"╱ // 0x177a @0x2d
0x174d…177e at002e = ╱20╱…╱ // 0x177b @0x2e
0x174d…177e at002f = ╱22╱"╱ // 0x177c @0x2f
0x174d…177e at0030 = EOL // 0x177d @0x30
0x174d…177e }
0x177e…1785 a4dc 3950 NEXT I
0x177e…1785 LineComalBin {
0x177e…1785 ptr = 0xa4dc // 0x177e @0x0
0x177e…1785 lno = 0x0f6e // 0x1780 @0x2
0x177e…1785 at0004 = ╱84╱ NEXT ╱ // 0x1782 @0x4
0x177e…1785 at0005 = ╱49╱I╱ // 0x1783 @0x5
0x177e…1785 at0006 = EOL // 0x1784 @0x6
0x177e…1785 }
0x1785…17d1 a528 3960 PRINT " ***";TAB(21);TOTAL$(E);TAB(36);TOTAL$(G);TAB(52);TOTAL$(V);
0x1785…17d1 LineComalBin {
0x1785…17d1 ptr = 0xa528 // 0x1785 @0x0
0x1785…17d1 lno = 0x0f78 // 0x1787 @0x2
0x1785…17d1 at0004 = ╱92╱ PRINT ╱ // 0x1789 @0x4
0x1785…17d1 at0005 = ╱22╱"╱ // 0x178a @0x5
0x1785…17d1 at0006 = ╱20╱…╱ // 0x178b @0x6
0x1785…17d1 at0007 = ╱2a╱*╱ // 0x178c @0x7
0x1785…17d1 at0008 = ╱2a╱*╱ // 0x178d @0x8
0x1785…17d1 at0009 = ╱2a╱*╱ // 0x178e @0x9
0x1785…17d1 at000a = ╱22╱"╱ // 0x178f @0xa
0x1785…17d1 at000b = ╱eb╱;╱ // 0x1790 @0xb
0x1785…17d1 at000c = ╱d2╱TAB╱ // 0x1791 @0xc
0x1785…17d1 at000d = ╱ed╱(╱ // 0x1792 @0xd
0x1785…17d1 at000e = ╱32╱2╱ // 0x1793 @0xe
0x1785…17d1 at000f = ╱31╱1╱ // 0x1794 @0xf
0x1785…17d1 at0010 = ╱fe0000a805╱ // 0x1795 @0x10
0x1785…17d1 at0015 = ╱ee╱)╱ // 0x179a @0x15
0x1785…17d1 at0016 = ╱eb╱;╱ // 0x179b @0x16
0x1785…17d1 at0017 = ╱54╱T╱ // 0x179c @0x17
0x1785…17d1 at0018 = ╱4f╱O╱ // 0x179d @0x18
0x1785…17d1 at0019 = ╱54╱T╱ // 0x179e @0x19
0x1785…17d1 at001a = ╱41╱A╱ // 0x179f @0x1a
0x1785…17d1 at001b = ╱4c╱L╱ // 0x17a0 @0x1b
0x1785…17d1 at001c = ╱ef╱$╱ // 0x17a1 @0x1c
0x1785…17d1 at001d = ╱ed╱(╱ // 0x17a2 @0x1d
0x1785…17d1 at001e = ╱45╱E╱ // 0x17a3 @0x1e
0x1785…17d1 at001f = ╱ee╱)╱ // 0x17a4 @0x1f
0x1785…17d1 at0020 = ╱eb╱;╱ // 0x17a5 @0x20
0x1785…17d1 at0021 = ╱d2╱TAB╱ // 0x17a6 @0x21
0x1785…17d1 at0022 = ╱ed╱(╱ // 0x17a7 @0x22
0x1785…17d1 at0023 = ╱33╱3╱ // 0x17a8 @0x23
0x1785…17d1 at0024 = ╱36╱6╱ // 0x17a9 @0x24
0x1785…17d1 at0025 = ╱fe00009006╱ // 0x17aa @0x25
0x1785…17d1 at002a = ╱ee╱)╱ // 0x17af @0x2a
0x1785…17d1 at002b = ╱eb╱;╱ // 0x17b0 @0x2b
0x1785…17d1 at002c = ╱54╱T╱ // 0x17b1 @0x2c
0x1785…17d1 at002d = ╱4f╱O╱ // 0x17b2 @0x2d
0x1785…17d1 at002e = ╱54╱T╱ // 0x17b3 @0x2e
0x1785…17d1 at002f = ╱41╱A╱ // 0x17b4 @0x2f
0x1785…17d1 at0030 = ╱4c╱L╱ // 0x17b5 @0x30
0x1785…17d1 at0031 = ╱ef╱$╱ // 0x17b6 @0x31
0x1785…17d1 at0032 = ╱ed╱(╱ // 0x17b7 @0x32
0x1785…17d1 at0033 = ╱47╱G╱ // 0x17b8 @0x33
0x1785…17d1 at0034 = ╱ee╱)╱ // 0x17b9 @0x34
0x1785…17d1 at0035 = ╱eb╱;╱ // 0x17ba @0x35
0x1785…17d1 at0036 = ╱d2╱TAB╱ // 0x17bb @0x36
0x1785…17d1 at0037 = ╱ed╱(╱ // 0x17bc @0x37
0x1785…17d1 at0038 = ╱35╱5╱ // 0x17bd @0x38
0x1785…17d1 at0039 = ╱32╱2╱ // 0x17be @0x39
0x1785…17d1 at003a = ╱fe0000d006╱ // 0x17bf @0x3a
0x1785…17d1 at003f = ╱ee╱)╱ // 0x17c4 @0x3f
0x1785…17d1 at0040 = ╱eb╱;╱ // 0x17c5 @0x40
0x1785…17d1 at0041 = ╱54╱T╱ // 0x17c6 @0x41
0x1785…17d1 at0042 = ╱4f╱O╱ // 0x17c7 @0x42
0x1785…17d1 at0043 = ╱54╱T╱ // 0x17c8 @0x43
0x1785…17d1 at0044 = ╱41╱A╱ // 0x17c9 @0x44
0x1785…17d1 at0045 = ╱4c╱L╱ // 0x17ca @0x45
0x1785…17d1 at0046 = ╱ef╱$╱ // 0x17cb @0x46
0x1785…17d1 at0047 = ╱ed╱(╱ // 0x17cc @0x47
0x1785…17d1 at0048 = ╱56╱V╱ // 0x17cd @0x48
0x1785…17d1 at0049 = ╱ee╱)╱ // 0x17ce @0x49
0x1785…17d1 at004a = ╱eb╱;╱ // 0x17cf @0x4a
0x1785…17d1 at004b = EOL // 0x17d0 @0x4b
0x1785…17d1 }
0x17d1…17f1 a548 3970 PRINT TAB(68);TOTAL$(4);
0x17d1…17f1 LineComalBin {
0x17d1…17f1 ptr = 0xa548 // 0x17d1 @0x0
0x17d1…17f1 lno = 0x0f82 // 0x17d3 @0x2
0x17d1…17f1 at0004 = ╱92╱ PRINT ╱ // 0x17d5 @0x4
0x17d1…17f1 at0005 = ╱d2╱TAB╱ // 0x17d6 @0x5
0x17d1…17f1 at0006 = ╱ed╱(╱ // 0x17d7 @0x6
0x17d1…17f1 at0007 = ╱36╱6╱ // 0x17d8 @0x7
0x17d1…17f1 at0008 = ╱38╱8╱ // 0x17d9 @0x8
0x17d1…17f1 at0009 = ╱fe00008807╱ // 0x17da @0x9
0x17d1…17f1 at000e = ╱ee╱)╱ // 0x17df @0xe
0x17d1…17f1 at000f = ╱eb╱;╱ // 0x17e0 @0xf
0x17d1…17f1 at0010 = ╱54╱T╱ // 0x17e1 @0x10
0x17d1…17f1 at0011 = ╱4f╱O╱ // 0x17e2 @0x11
0x17d1…17f1 at0012 = ╱54╱T╱ // 0x17e3 @0x12
0x17d1…17f1 at0013 = ╱41╱A╱ // 0x17e4 @0x13
0x17d1…17f1 at0014 = ╱4c╱L╱ // 0x17e5 @0x14
0x17d1…17f1 at0015 = ╱ef╱$╱ // 0x17e6 @0x15
0x17d1…17f1 at0016 = ╱ed╱(╱ // 0x17e7 @0x16
0x17d1…17f1 at0017 = ╱34╱4╱ // 0x17e8 @0x17
0x17d1…17f1 at0018 = ╱fe00008003╱ // 0x17e9 @0x18
0x17d1…17f1 at001d = ╱ee╱)╱ // 0x17ee @0x1d
0x17d1…17f1 at001e = ╱eb╱;╱ // 0x17ef @0x1e
0x17d1…17f1 at001f = EOL // 0x17f0 @0x1f
0x17d1…17f1 }
0x17f1…1803 a55a 3990 LINIE=LINIE+G
0x17f1…1803 LineComalBin {
0x17f1…1803 ptr = 0xa55a // 0x17f1 @0x0
0x17f1…1803 lno = 0x0f96 // 0x17f3 @0x2
0x17f1…1803 at0004 = ╱4c╱L╱ // 0x17f5 @0x4
0x17f1…1803 at0005 = ╱49╱I╱ // 0x17f6 @0x5
0x17f1…1803 at0006 = ╱4e╱N╱ // 0x17f7 @0x6
0x17f1…1803 at0007 = ╱49╱I╱ // 0x17f8 @0x7
0x17f1…1803 at0008 = ╱45╱E╱ // 0x17f9 @0x8
0x17f1…1803 at0009 = ╱dc╱=╱ // 0x17fa @0x9
0x17f1…1803 at000a = ╱4c╱L╱ // 0x17fb @0xa
0x17f1…1803 at000b = ╱49╱I╱ // 0x17fc @0xb
0x17f1…1803 at000c = ╱4e╱N╱ // 0x17fd @0xc
0x17f1…1803 at000d = ╱49╱I╱ // 0x17fe @0xd
0x17f1…1803 at000e = ╱45╱E╱ // 0x17ff @0xe
0x17f1…1803 at000f = ╱e2╱+╱ // 0x1800 @0xf
0x17f1…1803 at0010 = ╱47╱G╱ // 0x1801 @0x10
0x17f1…1803 at0011 = EOL // 0x1802 @0x11
0x17f1…1803 }
0x1803…1815 a56c 4010 WHILE LINIE<MAXLIN
0x1803…1815 LineComalBin {
0x1803…1815 ptr = 0xa56c // 0x1803 @0x0
0x1803…1815 lno = 0x0faa // 0x1805 @0x2
0x1803…1815 at0004 = ╱93╱ WHILE ╱ // 0x1807 @0x4
0x1803…1815 at0005 = ╱4c╱L╱ // 0x1808 @0x5
0x1803…1815 at0006 = ╱49╱I╱ // 0x1809 @0x6
0x1803…1815 at0007 = ╱4e╱N╱ // 0x180a @0x7
0x1803…1815 at0008 = ╱49╱I╱ // 0x180b @0x8
0x1803…1815 at0009 = ╱45╱E╱ // 0x180c @0x9
0x1803…1815 at000a = ╱dd╱<╱ // 0x180d @0xa
0x1803…1815 at000b = ╱4d╱M╱ // 0x180e @0xb
0x1803…1815 at000c = ╱41╱A╱ // 0x180f @0xc
0x1803…1815 at000d = ╱58╱X╱ // 0x1810 @0xd
0x1803…1815 at000e = ╱4c╱L╱ // 0x1811 @0xe
0x1803…1815 at000f = ╱49╱I╱ // 0x1812 @0xf
0x1803…1815 at0010 = ╱4e╱N╱ // 0x1813 @0x10
0x1803…1815 at0011 = EOL // 0x1814 @0x11
0x1803…1815 }
0x1815…181b a572 4020 PRINT
0x1815…181b LineComalBin {
0x1815…181b ptr = 0xa572 // 0x1815 @0x0
0x1815…181b lno = 0x0fb4 // 0x1817 @0x2
0x1815…181b at0004 = ╱92╱ PRINT ╱ // 0x1819 @0x4
0x1815…181b at0005 = EOL // 0x181a @0x5
0x1815…181b }
0x181b…182d a584 4030 LINIE=LINIE+E
0x181b…182d LineComalBin {
0x181b…182d ptr = 0xa584 // 0x181b @0x0
0x181b…182d lno = 0x0fbe // 0x181d @0x2
0x181b…182d at0004 = ╱4c╱L╱ // 0x181f @0x4
0x181b…182d at0005 = ╱49╱I╱ // 0x1820 @0x5
0x181b…182d at0006 = ╱4e╱N╱ // 0x1821 @0x6
0x181b…182d at0007 = ╱49╱I╱ // 0x1822 @0x7
0x181b…182d at0008 = ╱45╱E╱ // 0x1823 @0x8
0x181b…182d at0009 = ╱dc╱=╱ // 0x1824 @0x9
0x181b…182d at000a = ╱4c╱L╱ // 0x1825 @0xa
0x181b…182d at000b = ╱49╱I╱ // 0x1826 @0xb
0x181b…182d at000c = ╱4e╱N╱ // 0x1827 @0xc
0x181b…182d at000d = ╱49╱I╱ // 0x1828 @0xd
0x181b…182d at000e = ╱45╱E╱ // 0x1829 @0xe
0x181b…182d at000f = ╱e2╱+╱ // 0x182a @0xf
0x181b…182d at0010 = ╱45╱E╱ // 0x182b @0x10
0x181b…182d at0011 = EOL // 0x182c @0x11
0x181b…182d }
0x182d…1833 a58a 4040 ENDWHILE
0x182d…1833 LineComalBin {
0x182d…1833 ptr = 0xa58a // 0x182d @0x0
0x182d…1833 lno = 0x0fc8 // 0x182f @0x2
0x182d…1833 at0004 = ╱94╱ ENDWHILE ╱ // 0x1831 @0x4
0x182d…1833 at0005 = EOL // 0x1832 @0x5
0x182d…1833 }
0x1833…1846 a59d 4170 PUT FIL$,E:POST3$
0x1833…1846 LineComalBin {
0x1833…1846 ptr = 0xa59d // 0x1833 @0x0
0x1833…1846 lno = 0x104a // 0x1835 @0x2
0x1833…1846 at0004 = ╱aa╱ PUT ╱ // 0x1837 @0x4
0x1833…1846 at0005 = ╱46╱F╱ // 0x1838 @0x5
0x1833…1846 at0006 = ╱49╱I╱ // 0x1839 @0x6
0x1833…1846 at0007 = ╱4c╱L╱ // 0x183a @0x7
0x1833…1846 at0008 = ╱ef╱$╱ // 0x183b @0x8
0x1833…1846 at0009 = ╱ec╱,╱ // 0x183c @0x9
0x1833…1846 at000a = ╱45╱E╱ // 0x183d @0xa
0x1833…1846 at000b = ╱f0╱:╱ // 0x183e @0xb
0x1833…1846 at000c = ╱50╱P╱ // 0x183f @0xc
0x1833…1846 at000d = ╱4f╱O╱ // 0x1840 @0xd
0x1833…1846 at000e = ╱53╱S╱ // 0x1841 @0xe
0x1833…1846 at000f = ╱54╱T╱ // 0x1842 @0xf
0x1833…1846 at0010 = ╱33╱3╱ // 0x1843 @0x10
0x1833…1846 at0011 = ╱ef╱$╱ // 0x1844 @0x11
0x1833…1846 at0012 = EOL // 0x1845 @0x12
0x1833…1846 }
0x1846…186b a5c2 4180 PUT FIL$,G:POST4$,SLJNR,MLMNR,ATPLM
0x1846…186b LineComalBin {
0x1846…186b ptr = 0xa5c2 // 0x1846 @0x0
0x1846…186b lno = 0x1054 // 0x1848 @0x2
0x1846…186b at0004 = ╱aa╱ PUT ╱ // 0x184a @0x4
0x1846…186b at0005 = ╱46╱F╱ // 0x184b @0x5
0x1846…186b at0006 = ╱49╱I╱ // 0x184c @0x6
0x1846…186b at0007 = ╱4c╱L╱ // 0x184d @0x7
0x1846…186b at0008 = ╱ef╱$╱ // 0x184e @0x8
0x1846…186b at0009 = ╱ec╱,╱ // 0x184f @0x9
0x1846…186b at000a = ╱47╱G╱ // 0x1850 @0xa
0x1846…186b at000b = ╱f0╱:╱ // 0x1851 @0xb
0x1846…186b at000c = ╱50╱P╱ // 0x1852 @0xc
0x1846…186b at000d = ╱4f╱O╱ // 0x1853 @0xd
0x1846…186b at000e = ╱53╱S╱ // 0x1854 @0xe
0x1846…186b at000f = ╱54╱T╱ // 0x1855 @0xf
0x1846…186b at0010 = ╱34╱4╱ // 0x1856 @0x10
0x1846…186b at0011 = ╱ef╱$╱ // 0x1857 @0x11
0x1846…186b at0012 = ╱ec╱,╱ // 0x1858 @0x12
0x1846…186b at0013 = ╱53╱S╱ // 0x1859 @0x13
0x1846…186b at0014 = ╱4c╱L╱ // 0x185a @0x14
0x1846…186b at0015 = ╱4a╱J╱ // 0x185b @0x15
0x1846…186b at0016 = ╱4e╱N╱ // 0x185c @0x16
0x1846…186b at0017 = ╱52╱R╱ // 0x185d @0x17
0x1846…186b at0018 = ╱ec╱,╱ // 0x185e @0x18
0x1846…186b at0019 = ╱4d╱M╱ // 0x185f @0x19
0x1846…186b at001a = ╱4c╱L╱ // 0x1860 @0x1a
0x1846…186b at001b = ╱4d╱M╱ // 0x1861 @0x1b
0x1846…186b at001c = ╱4e╱N╱ // 0x1862 @0x1c
0x1846…186b at001d = ╱52╱R╱ // 0x1863 @0x1d
0x1846…186b at001e = ╱ec╱,╱ // 0x1864 @0x1e
0x1846…186b at001f = ╱41╱A╱ // 0x1865 @0x1f
0x1846…186b at0020 = ╱54╱T╱ // 0x1866 @0x20
0x1846…186b at0021 = ╱50╱P╱ // 0x1867 @0x21
0x1846…186b at0022 = ╱4c╱L╱ // 0x1868 @0x22
0x1846…186b at0023 = ╱4d╱M╱ // 0x1869 @0x23
0x1846…186b at0024 = EOL // 0x186a @0x24
0x1846…186b }
0x186b…1871 a5c8 4190 CLOSE
0x186b…1871 LineComalBin {
0x186b…1871 ptr = 0xa5c8 // 0x186b @0x0
0x186b…1871 lno = 0x105e // 0x186d @0x2
0x186b…1871 at0004 = ╱a8╱ CLOSE ╱ // 0x186f @0x4
0x186b…1871 at0005 = EOL // 0x1870 @0x5
0x186b…1871 }
0x1871…1878 a5cf 4195 OUTPUT T
0x1871…1878 LineComalBin {
0x1871…1878 ptr = 0xa5cf // 0x1871 @0x0
0x1871…1878 lno = 0x1063 // 0x1873 @0x2
0x1871…1878 at0004 = ╱a5╱ OUTPUT ╱ // 0x1875 @0x4
0x1871…1878 at0005 = ╱54╱T╱ // 0x1876 @0x5
0x1871…1878 at0006 = EOL // 0x1877 @0x6
0x1871…1878 }
0x1878…188e 0000 4200 CHAIN "P641210:LFERIE"
0x1878…188e LineComalBin {
0x1878…188e ptr = 0x0000 // 0x1878 @0x0
0x1878…188e lno = 0x1068 // 0x187a @0x2
0x1878…188e at0004 = ╱ac╱ CHAIN ╱ // 0x187c @0x4
0x1878…188e at0005 = ╱22╱"╱ // 0x187d @0x5
0x1878…188e at0006 = ╱50╱P╱ // 0x187e @0x6
0x1878…188e at0007 = ╱36╱6╱ // 0x187f @0x7
0x1878…188e at0008 = ╱34╱4╱ // 0x1880 @0x8
0x1878…188e at0009 = ╱31╱1╱ // 0x1881 @0x9
0x1878…188e at000a = ╱32╱2╱ // 0x1882 @0xa
0x1878…188e at000b = ╱31╱1╱ // 0x1883 @0xb
0x1878…188e at000c = ╱30╱0╱ // 0x1884 @0xc
0x1878…188e at000d = ╱3a╱:╱ // 0x1885 @0xd
0x1878…188e at000e = ╱4c╱L╱ // 0x1886 @0xe
0x1878…188e at000f = ╱46╱F╱ // 0x1887 @0xf
0x1878…188e at0010 = ╱45╱E╱ // 0x1888 @0x10
0x1878…188e at0011 = ╱52╱R╱ // 0x1889 @0x11
0x1878…188e at0012 = ╱49╱I╱ // 0x188a @0x12
0x1878…188e at0013 = ╱45╱E╱ // 0x188b @0x13
0x1878…188e at0014 = ╱22╱"╱ // 0x188c @0x14
0x1878…188e at0015 = EOL // 0x188d @0x15
0x1878…188e }
0x188e…18a0 57 8d 20 03 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 ┆W B 0 E 1 ┆
0x18a0…18aa 00 80 01 eb 47 dc 32 fe 00 00 ┆ G 2 ┆
0x18aa…18bf (82,) 80 02 eb 56 dc 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 04 ff ┆ V 3 W 9 ┆
0x18bf…18c5 (83,) 57 8d e5 a5 10 00 ┆W ┆