|
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: 3577 (0xdf9)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »LFRADRAG.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »LFRADRAG.B«
0200 PROC INDVIRK 0210 OPEN FIL$,R 0220 EXEC FEJL(B,B,FIL$) 0230 GET FIL$,V:DAD$ 0240 CLOSE FIL$ 0250 ENDPROC 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 1000 DIM STARTPER$(8),SLUTPER$(8),DAD$(6),FIL$(20) 1010 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12) 1020 DIM TOTAL$(7,12),FIL1$(16),POST1$(71),POST2$(27) 1030 DIM RESUL$(12),RESUL1$(12),MF41$(50),MF42$(50),TOTAL1$(5,12) 1050 DIM MF4$(16) 1060 TAH$=" 0+" 1070 DIM BL$(79) 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 1390 PROC SKRIVHOVED 1400 PRINT 1410 SIDE=SIDE+E 1420 PRINT USING " SIDE ###":SIDE; 1425 PRINT " UDSKRIFTSDATO ";DAD$; 1430 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$; 1440 LINIE=7 1450 PRINT TAB(34);"FRADRAGSLISTE" 1460 PRINT TAB(34);"*************" 1470 PRINT " LØN NAVN";TAB(37);"LA";TAB(45);"LA";TAB(53);"LA";TAB(61);"LA"; 1480 PRINT TAB(69);"LA";TAB(75);"IALT" 1490 PRINT " NR";TAB(37);"60";TAB(45);"61";TAB(53);"62";TAB(61);"63";TAB(69); 1500 PRINT "64" 1501 PRINT TAB(37);"65";TAB(45);"66";TAB(53);"67";TAB(61);"68";TAB(69); 1502 PRINT "69" 1510 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 FIL$="P641220:VIRKKART" 1660 EXEC INDVIRK 1675 FIL1$="P641220:LØNMODRG" 1680 OPEN FIL1$,R 1710 MF4$="P641210:FRADRAG" 1720 OPEN MF4$,R 1730 MAXLIN=72 1740 SIDE=B 1750 GET MF4$:STARTPER$,SLUTPER$ 1760 OUTPUT P 1770 FOR I=E TO 7 1780 TOTAL$(I)=TAH$ 1790 NEXT I 1800 EXEC SKRIVHOVED 1810 GET MF4$:LMNR,MF41$ 1820 WHILE STATUS(MF4$)=B 1822 GET MF4$:LMNR,MF42$ 1825 EXEC INLØNMOD(LMNR) 1840 IF LINIE>MAXLIN-W THEN 1850 WHILE LINIE<MAXLIN 1860 PRINT 1870 LINIE=LINIE+E 1880 ENDWHILE 1890 EXEC SKRIVHOVED 1910 ENDIF 1915 LINIE=LINIE+5 1920 TOTAL$(7)=TAH$ 1930 FOR I=E TO 5 1940 RESUL$=MF41$(E+(I-E)*10:10) 1945 EXEC CALC(B,RESUL$,TOTAL$(7),TOTAL$(7)) 1950 EXEC CALC(B,RESUL$,TOTAL$(I),TOTAL$(I)) 1960 IF MF41$(I*10)="+" THEN MF41$(I*10)=" " 1962 RESUL$=MF42$(E+(I-E)*10:10) 1964 EXEC CALC(B,RESUL$,TOTAL1$(I),TOTAL1$(I)) 1966 EXEC CALC(B,RESUL$,TOTAL$(7),TOTAL$(7)) 1968 IF MF42$(I*10)="+" THEN MF42$(I*10)=" " 1970 NEXT I 1980 EXEC CALC(B,TOTAL$(7),TOTAL$(6),TOTAL$(6)) 1990 RESUL1$=TOTAL$(7,V:10) 2000 IF RESUL1$(10)="+" THEN RESUL1$(10)=" " 2030 PRINT USING "####":LMNR; 2035 PRINT TAB(7);POST1$(E,25); 2040 PRINT TAB(38);MF41$(E,10);TAB(54);MF41$(11,20);TAB(70);RESUL1$; 2050 PRINT TAB(30);MF41$(21,30);TAB(46);MF41$(31,40);TAB(62);MF41$(41,50) 2055 PRINT TAB(38);MF42$(11,20);TAB(54);MF42$(31,40) 2060 PRINT TAB(30);MF42$(E,10);TAB(46);MF42$(21,30);TAB(62);MF42$(41,50) 2075 PRINT "************************************************************"; 2076 PRINT "*******************"; 2080 GET MF4$:LMNR,MF41$ 2090 ENDWHILE 2095 IF STATUS(MF4$)<>19 THEN EXEC FEJL(LMNR,B,MF4$) 2100 FOR I=E TO 6 2110 IF TOTAL$(I,12)="+" THEN TOTAL$(I,12)=" " 2112 IF I<6 THEN 2114 IF TOTAL1$(I,12)="+" THEN TOTAL1$(I,12)=" " 2115 ENDIF 2120 NEXT I 2130 PRINT " ***";TAB(36);TOTAL$(E);TAB(52);TOTAL$(G);TAB(68);TOTAL$(6); 2132 PRINT TAB(28);TOTAL$(V);TAB(44);TOTAL$(4);TAB(60);TOTAL$(5) 2134 PRINT TAB(36);TOTAL1$(G);TAB(52);TOTAL1$(4) 2136 PRINT TAB(28);TOTAL1$(E);TAB(44);TOTAL1$(V);TAB(60);TOTAL1$(5) 2141 LINIE=LINIE+4 2142 WHILE LINIE<MAXLIN 2144 PRINT 2146 LINIE=LINIE+E 2148 ENDWHILE 2149 OUTPUT T 2150 CLOSE 2160 CHAIN "P641210:LBILAG"
0x000…00d (0,) 8d64 0200 PROC INDVIRK
0x000…00d LineComalBin {
0x000…00d ptr = 0x8d64 // 0x0 @0x0
0x000…00d lno = 0x00c8 // 0x2 @0x2
0x000…00d at0004 = ╱9e╱ PROC ╱ // 0x4 @0x4
0x000…00d at0005 = ╱49╱I╱ // 0x5 @0x5
0x000…00d at0006 = ╱4e╱N╱ // 0x6 @0x6
0x000…00d at0007 = ╱44╱D╱ // 0x7 @0x7
0x000…00d at0008 = ╱56╱V╱ // 0x8 @0x8
0x000…00d at0009 = ╱49╱I╱ // 0x9 @0x9
0x000…00d at000a = ╱52╱R╱ // 0xa @0xa
0x000…00d at000b = ╱4b╱K╱ // 0xb @0xb
0x000…00d at000c = EOL // 0xc @0xc
0x000…00d }
0x00d…019 8d70 0210 OPEN FIL$,R
0x00d…019 LineComalBin {
0x00d…019 ptr = 0x8d70 // 0xd @0x0
0x00d…019 lno = 0x00d2 // 0xf @0x2
0x00d…019 at0004 = ╱a7╱ OPEN ╱ // 0x11 @0x4
0x00d…019 at0005 = ╱46╱F╱ // 0x12 @0x5
0x00d…019 at0006 = ╱49╱I╱ // 0x13 @0x6
0x00d…019 at0007 = ╱4c╱L╱ // 0x14 @0x7
0x00d…019 at0008 = ╱ef╱$╱ // 0x15 @0x8
0x00d…019 at0009 = ╱ec╱,╱ // 0x16 @0x9
0x00d…019 at000a = ╱52╱R╱ // 0x17 @0xa
0x00d…019 at000b = EOL // 0x18 @0xb
0x00d…019 }
0x019…02d 8d84 0220 EXEC FEJL(B,B,FIL$)
0x019…02d LineComalBin {
0x019…02d ptr = 0x8d84 // 0x19 @0x0
0x019…02d lno = 0x00dc // 0x1b @0x2
0x019…02d at0004 = ╱9d╱ EXEC ╱ // 0x1d @0x4
0x019…02d at0005 = ╱46╱F╱ // 0x1e @0x5
0x019…02d at0006 = ╱45╱E╱ // 0x1f @0x6
0x019…02d at0007 = ╱4a╱J╱ // 0x20 @0x7
0x019…02d at0008 = ╱4c╱L╱ // 0x21 @0x8
0x019…02d at0009 = ╱ed╱(╱ // 0x22 @0x9
0x019…02d at000a = ╱42╱B╱ // 0x23 @0xa
0x019…02d at000b = ╱ec╱,╱ // 0x24 @0xb
0x019…02d at000c = ╱42╱B╱ // 0x25 @0xc
0x019…02d at000d = ╱ec╱,╱ // 0x26 @0xd
0x019…02d at000e = ╱46╱F╱ // 0x27 @0xe
0x019…02d at000f = ╱49╱I╱ // 0x28 @0xf
0x019…02d at0010 = ╱4c╱L╱ // 0x29 @0x10
0x019…02d at0011 = ╱ef╱$╱ // 0x2a @0x11
0x019…02d at0012 = ╱ee╱)╱ // 0x2b @0x12
0x019…02d at0013 = EOL // 0x2c @0x13
0x019…02d }
0x02d…03e 8d95 0230 GET FIL$,V:DAD$
0x02d…03e LineComalBin {
0x02d…03e ptr = 0x8d95 // 0x2d @0x0
0x02d…03e lno = 0x00e6 // 0x2f @0x2
0x02d…03e at0004 = ╱a9╱ GET ╱ // 0x31 @0x4
0x02d…03e at0005 = ╱46╱F╱ // 0x32 @0x5
0x02d…03e at0006 = ╱49╱I╱ // 0x33 @0x6
0x02d…03e at0007 = ╱4c╱L╱ // 0x34 @0x7
0x02d…03e at0008 = ╱ef╱$╱ // 0x35 @0x8
0x02d…03e at0009 = ╱ec╱,╱ // 0x36 @0x9
0x02d…03e at000a = ╱56╱V╱ // 0x37 @0xa
0x02d…03e at000b = ╱f0╱:╱ // 0x38 @0xb
0x02d…03e at000c = ╱44╱D╱ // 0x39 @0xc
0x02d…03e at000d = ╱41╱A╱ // 0x3a @0xd
0x02d…03e at000e = ╱44╱D╱ // 0x3b @0xe
0x02d…03e at000f = ╱ef╱$╱ // 0x3c @0xf
0x02d…03e at0010 = EOL // 0x3d @0x10
0x02d…03e }
0x03e…048 8d9f 0240 CLOSE FIL$
0x03e…048 LineComalBin {
0x03e…048 ptr = 0x8d9f // 0x3e @0x0
0x03e…048 lno = 0x00f0 // 0x40 @0x2
0x03e…048 at0004 = ╱a8╱ CLOSE ╱ // 0x42 @0x4
0x03e…048 at0005 = ╱46╱F╱ // 0x43 @0x5
0x03e…048 at0006 = ╱49╱I╱ // 0x44 @0x6
0x03e…048 at0007 = ╱4c╱L╱ // 0x45 @0x7
0x03e…048 at0008 = ╱ef╱$╱ // 0x46 @0x8
0x03e…048 at0009 = EOL // 0x47 @0x9
0x03e…048 }
0x048…04e 8da5 0250 ENDPROC
0x048…04e LineComalBin {
0x048…04e ptr = 0x8da5 // 0x48 @0x0
0x048…04e lno = 0x00fa // 0x4a @0x2
0x048…04e at0004 = ╱9f╱ ENDPROC ╱ // 0x4c @0x4
0x048…04e at0005 = EOL // 0x4d @0x5
0x048…04e }
0x04e…05f 8db6 0900 PROC INLØNMOD(N)
0x04e…05f LineComalBin {
0x04e…05f ptr = 0x8db6 // 0x4e @0x0
0x04e…05f lno = 0x0384 // 0x50 @0x2
0x04e…05f at0004 = ╱9e╱ PROC ╱ // 0x52 @0x4
0x04e…05f at0005 = ╱49╱I╱ // 0x53 @0x5
0x04e…05f at0006 = ╱4e╱N╱ // 0x54 @0x6
0x04e…05f at0007 = ╱4c╱L╱ // 0x55 @0x7
0x04e…05f at0008 = ╱5c╱Ø╱ // 0x56 @0x8
0x04e…05f at0009 = ╱4e╱N╱ // 0x57 @0x9
0x04e…05f at000a = ╱4d╱M╱ // 0x58 @0xa
0x04e…05f at000b = ╱4f╱O╱ // 0x59 @0xb
0x04e…05f at000c = ╱44╱D╱ // 0x5a @0xc
0x04e…05f at000d = ╱ed╱(╱ // 0x5b @0xd
0x04e…05f at000e = ╱4e╱N╱ // 0x5c @0xe
0x04e…05f at000f = ╱ee╱)╱ // 0x5d @0xf
0x04e…05f at0010 = EOL // 0x5e @0x10
0x04e…05f }
0x05f…077 8dce 0902 GET FIL1$,G*N-E:POST1$
0x05f…077 LineComalBin {
0x05f…077 ptr = 0x8dce // 0x5f @0x0
0x05f…077 lno = 0x0386 // 0x61 @0x2
0x05f…077 at0004 = ╱a9╱ GET ╱ // 0x63 @0x4
0x05f…077 at0005 = ╱46╱F╱ // 0x64 @0x5
0x05f…077 at0006 = ╱49╱I╱ // 0x65 @0x6
0x05f…077 at0007 = ╱4c╱L╱ // 0x66 @0x7
0x05f…077 at0008 = ╱31╱1╱ // 0x67 @0x8
0x05f…077 at0009 = ╱ef╱$╱ // 0x68 @0x9
0x05f…077 at000a = ╱ec╱,╱ // 0x69 @0xa
0x05f…077 at000b = ╱47╱G╱ // 0x6a @0xb
0x05f…077 at000c = ╱e4╱*╱ // 0x6b @0xc
0x05f…077 at000d = ╱4e╱N╱ // 0x6c @0xd
0x05f…077 at000e = ╱e3╱-╱ // 0x6d @0xe
0x05f…077 at000f = ╱45╱E╱ // 0x6e @0xf
0x05f…077 at0010 = ╱f0╱:╱ // 0x6f @0x10
0x05f…077 at0011 = ╱50╱P╱ // 0x70 @0x11
0x05f…077 at0012 = ╱4f╱O╱ // 0x71 @0x12
0x05f…077 at0013 = ╱53╱S╱ // 0x72 @0x13
0x05f…077 at0014 = ╱54╱T╱ // 0x73 @0x14
0x05f…077 at0015 = ╱31╱1╱ // 0x74 @0x15
0x05f…077 at0016 = ╱ef╱$╱ // 0x75 @0x16
0x05f…077 at0017 = EOL // 0x76 @0x17
0x05f…077 }
0x077…0af 8e06 0904 GET FIL1$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD
0x077…0af LineComalBin {
0x077…0af ptr = 0x8e06 // 0x77 @0x0
0x077…0af lno = 0x0388 // 0x79 @0x2
0x077…0af at0004 = ╱a9╱ GET ╱ // 0x7b @0x4
0x077…0af at0005 = ╱46╱F╱ // 0x7c @0x5
0x077…0af at0006 = ╱49╱I╱ // 0x7d @0x6
0x077…0af at0007 = ╱4c╱L╱ // 0x7e @0x7
0x077…0af at0008 = ╱31╱1╱ // 0x7f @0x8
0x077…0af at0009 = ╱ef╱$╱ // 0x80 @0x9
0x077…0af at000a = ╱ec╱,╱ // 0x81 @0xa
0x077…0af at000b = ╱47╱G╱ // 0x82 @0xb
0x077…0af at000c = ╱e4╱*╱ // 0x83 @0xc
0x077…0af at000d = ╱4e╱N╱ // 0x84 @0xd
0x077…0af at000e = ╱f0╱:╱ // 0x85 @0xe
0x077…0af at000f = ╱50╱P╱ // 0x86 @0xf
0x077…0af at0010 = ╱4f╱O╱ // 0x87 @0x10
0x077…0af at0011 = ╱53╱S╱ // 0x88 @0x11
0x077…0af at0012 = ╱54╱T╱ // 0x89 @0x12
0x077…0af at0013 = ╱32╱2╱ // 0x8a @0x13
0x077…0af at0014 = ╱ef╱$╱ // 0x8b @0x14
0x077…0af at0015 = ╱ec╱,╱ // 0x8c @0x15
0x077…0af at0016 = ╱43╱C╱ // 0x8d @0x16
0x077…0af at0017 = ╱31╱1╱ // 0x8e @0x17
0x077…0af at0018 = ╱ec╱,╱ // 0x8f @0x18
0x077…0af at0019 = ╱43╱C╱ // 0x90 @0x19
0x077…0af at001a = ╱32╱2╱ // 0x91 @0x1a
0x077…0af at001b = ╱ec╱,╱ // 0x92 @0x1b
0x077…0af at001c = ╱4c╱L╱ // 0x93 @0x1c
0x077…0af at001d = ╱54╱T╱ // 0x94 @0x1d
0x077…0af at001e = ╱ec╱,╱ // 0x95 @0x1e
0x077…0af at001f = ╱4c╱L╱ // 0x96 @0x1f
0x077…0af at0020 = ╱46╱F╱ // 0x97 @0x20
0x077…0af at0021 = ╱ec╱,╱ // 0x98 @0x21
0x077…0af at0022 = ╱4c╱L╱ // 0x99 @0x22
0x077…0af at0023 = ╱52╱R╱ // 0x9a @0x23
0x077…0af at0024 = ╱ec╱,╱ // 0x9b @0x24
0x077…0af at0025 = ╱4c╱L╱ // 0x9c @0x25
0x077…0af at0026 = ╱41╱A╱ // 0x9d @0x26
0x077…0af at0027 = ╱ec╱,╱ // 0x9e @0x27
0x077…0af at0028 = ╱52╱R╱ // 0x9f @0x28
0x077…0af at0029 = ╱50╱P╱ // 0xa0 @0x29
0x077…0af at002a = ╱49╱I╱ // 0xa1 @0x2a
0x077…0af at002b = ╱ec╱,╱ // 0xa2 @0x2b
0x077…0af at002c = ╱4b╱K╱ // 0xa3 @0x2c
0x077…0af at002d = ╱31╱1╱ // 0xa4 @0x2d
0x077…0af at002e = ╱ec╱,╱ // 0xa5 @0x2e
0x077…0af at002f = ╱4b╱K╱ // 0xa6 @0x2f
0x077…0af at0030 = ╱32╱2╱ // 0xa7 @0x30
0x077…0af at0031 = ╱ec╱,╱ // 0xa8 @0x31
0x077…0af at0032 = ╱46╱F╱ // 0xa9 @0x32
0x077…0af at0033 = ╱47╱G╱ // 0xaa @0x33
0x077…0af at0034 = ╱ec╱,╱ // 0xab @0x34
0x077…0af at0035 = ╱46╱F╱ // 0xac @0x35
0x077…0af at0036 = ╱44╱D╱ // 0xad @0x36
0x077…0af at0037 = EOL // 0xae @0x37
0x077…0af }
0x0af…0c4 8e1b 0906 EXEC FEJL(E,N,FIL1$)
0x0af…0c4 LineComalBin {
0x0af…0c4 ptr = 0x8e1b // 0xaf @0x0
0x0af…0c4 lno = 0x038a // 0xb1 @0x2
0x0af…0c4 at0004 = ╱9d╱ EXEC ╱ // 0xb3 @0x4
0x0af…0c4 at0005 = ╱46╱F╱ // 0xb4 @0x5
0x0af…0c4 at0006 = ╱45╱E╱ // 0xb5 @0x6
0x0af…0c4 at0007 = ╱4a╱J╱ // 0xb6 @0x7
0x0af…0c4 at0008 = ╱4c╱L╱ // 0xb7 @0x8
0x0af…0c4 at0009 = ╱ed╱(╱ // 0xb8 @0x9
0x0af…0c4 at000a = ╱45╱E╱ // 0xb9 @0xa
0x0af…0c4 at000b = ╱ec╱,╱ // 0xba @0xb
0x0af…0c4 at000c = ╱4e╱N╱ // 0xbb @0xc
0x0af…0c4 at000d = ╱ec╱,╱ // 0xbc @0xd
0x0af…0c4 at000e = ╱46╱F╱ // 0xbd @0xe
0x0af…0c4 at000f = ╱49╱I╱ // 0xbe @0xf
0x0af…0c4 at0010 = ╱4c╱L╱ // 0xbf @0x10
0x0af…0c4 at0011 = ╱31╱1╱ // 0xc0 @0x11
0x0af…0c4 at0012 = ╱ef╱$╱ // 0xc1 @0x12
0x0af…0c4 at0013 = ╱ee╱)╱ // 0xc2 @0x13
0x0af…0c4 at0014 = EOL // 0xc3 @0x14
0x0af…0c4 }
0x0c4…0ca 8e21 0908 ENDPROC
0x0c4…0ca LineComalBin {
0x0c4…0ca ptr = 0x8e21 // 0xc4 @0x0
0x0c4…0ca lno = 0x038c // 0xc6 @0x2
0x0c4…0ca at0004 = ╱9f╱ ENDPROC ╱ // 0xc8 @0x4
0x0c4…0ca at0005 = EOL // 0xc9 @0x5
0x0c4…0ca }
0x0ca…10d 8e64 1000 DIM STARTPER$(8),SLUTPER$(8),DAD$(6),FIL$(20)
0x0ca…10d LineComalBin {
0x0ca…10d ptr = 0x8e64 // 0xca @0x0
0x0ca…10d lno = 0x03e8 // 0xcc @0x2
0x0ca…10d at0004 = ╱87╱ DIM ╱ // 0xce @0x4
0x0ca…10d at0005 = ╱53╱S╱ // 0xcf @0x5
0x0ca…10d at0006 = ╱54╱T╱ // 0xd0 @0x6
0x0ca…10d at0007 = ╱41╱A╱ // 0xd1 @0x7
0x0ca…10d at0008 = ╱52╱R╱ // 0xd2 @0x8
0x0ca…10d at0009 = ╱54╱T╱ // 0xd3 @0x9
0x0ca…10d at000a = ╱50╱P╱ // 0xd4 @0xa
0x0ca…10d at000b = ╱45╱E╱ // 0xd5 @0xb
0x0ca…10d at000c = ╱52╱R╱ // 0xd6 @0xc
0x0ca…10d at000d = ╱ef╱$╱ // 0xd7 @0xd
0x0ca…10d at000e = ╱ed╱(╱ // 0xd8 @0xe
0x0ca…10d at000f = ╱38╱8╱ // 0xd9 @0xf
0x0ca…10d at0010 = ╱fe00008004╱ // 0xda @0x10
0x0ca…10d at0015 = ╱ee╱)╱ // 0xdf @0x15
0x0ca…10d at0016 = ╱ec╱,╱ // 0xe0 @0x16
0x0ca…10d at0017 = ╱53╱S╱ // 0xe1 @0x17
0x0ca…10d at0018 = ╱4c╱L╱ // 0xe2 @0x18
0x0ca…10d at0019 = ╱55╱U╱ // 0xe3 @0x19
0x0ca…10d at001a = ╱54╱T╱ // 0xe4 @0x1a
0x0ca…10d at001b = ╱50╱P╱ // 0xe5 @0x1b
0x0ca…10d at001c = ╱45╱E╱ // 0xe6 @0x1c
0x0ca…10d at001d = ╱52╱R╱ // 0xe7 @0x1d
0x0ca…10d at001e = ╱ef╱$╱ // 0xe8 @0x1e
0x0ca…10d at001f = ╱ed╱(╱ // 0xe9 @0x1f
0x0ca…10d at0020 = ╱38╱8╱ // 0xea @0x20
0x0ca…10d at0021 = ╱fe00008004╱ // 0xeb @0x21
0x0ca…10d at0026 = ╱ee╱)╱ // 0xf0 @0x26
0x0ca…10d at0027 = ╱ec╱,╱ // 0xf1 @0x27
0x0ca…10d at0028 = ╱44╱D╱ // 0xf2 @0x28
0x0ca…10d at0029 = ╱41╱A╱ // 0xf3 @0x29
0x0ca…10d at002a = ╱44╱D╱ // 0xf4 @0x2a
0x0ca…10d at002b = ╱ef╱$╱ // 0xf5 @0x2b
0x0ca…10d at002c = ╱ed╱(╱ // 0xf6 @0x2c
0x0ca…10d at002d = ╱36╱6╱ // 0xf7 @0x2d
0x0ca…10d at002e = ╱fe0000c003╱ // 0xf8 @0x2e
0x0ca…10d at0033 = ╱ee╱)╱ // 0xfd @0x33
0x0ca…10d at0034 = ╱ec╱,╱ // 0xfe @0x34
0x0ca…10d at0035 = ╱46╱F╱ // 0xff @0x35
0x0ca…10d at0036 = ╱49╱I╱ // 0x100 @0x36
0x0ca…10d at0037 = ╱4c╱L╱ // 0x101 @0x37
0x0ca…10d at0038 = ╱ef╱$╱ // 0x102 @0x38
0x0ca…10d at0039 = ╱ed╱(╱ // 0x103 @0x39
0x0ca…10d at003a = ╱32╱2╱ // 0x104 @0x3a
0x0ca…10d at003b = ╱30╱0╱ // 0x105 @0x3b
0x0ca…10d at003c = ╱fe0000a005╱ // 0x106 @0x3c
0x0ca…10d at0041 = ╱ee╱)╱ // 0x10b @0x41
0x0ca…10d at0042 = EOL // 0x10c @0x42
0x0ca…10d }
0x10d…14a 8ea1 1010 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12)
0x10d…14a LineComalBin {
0x10d…14a ptr = 0x8ea1 // 0x10d @0x0
0x10d…14a lno = 0x03f2 // 0x10f @0x2
0x10d…14a at0004 = ╱87╱ DIM ╱ // 0x111 @0x4
0x10d…14a at0005 = ╱52╱R╱ // 0x112 @0x5
0x10d…14a at0006 = ╱45╱E╱ // 0x113 @0x6
0x10d…14a at0007 = ╱53╱S╱ // 0x114 @0x7
0x10d…14a at0008 = ╱ef╱$╱ // 0x115 @0x8
0x10d…14a at0009 = ╱ed╱(╱ // 0x116 @0x9
0x10d…14a at000a = ╱31╱1╱ // 0x117 @0xa
0x10d…14a at000b = ╱35╱5╱ // 0x118 @0xb
0x10d…14a at000c = ╱fe0000f004╱ // 0x119 @0xc
0x10d…14a at0011 = ╱ee╱)╱ // 0x11e @0x11
0x10d…14a at0012 = ╱ec╱,╱ // 0x11f @0x12
0x10d…14a at0013 = ╱4f╱O╱ // 0x120 @0x13
0x10d…14a at0014 = ╱50╱P╱ // 0x121 @0x14
0x10d…14a at0015 = ╱31╱1╱ // 0x122 @0x15
0x10d…14a at0016 = ╱ef╱$╱ // 0x123 @0x16
0x10d…14a at0017 = ╱ed╱(╱ // 0x124 @0x17
0x10d…14a at0018 = ╱31╱1╱ // 0x125 @0x18
0x10d…14a at0019 = ╱32╱2╱ // 0x126 @0x19
0x10d…14a at001a = ╱fe0000c004╱ // 0x127 @0x1a
0x10d…14a at001f = ╱ee╱)╱ // 0x12c @0x1f
0x10d…14a at0020 = ╱ec╱,╱ // 0x12d @0x20
0x10d…14a at0021 = ╱4f╱O╱ // 0x12e @0x21
0x10d…14a at0022 = ╱50╱P╱ // 0x12f @0x22
0x10d…14a at0023 = ╱32╱2╱ // 0x130 @0x23
0x10d…14a at0024 = ╱ef╱$╱ // 0x131 @0x24
0x10d…14a at0025 = ╱ed╱(╱ // 0x132 @0x25
0x10d…14a at0026 = ╱31╱1╱ // 0x133 @0x26
0x10d…14a at0027 = ╱32╱2╱ // 0x134 @0x27
0x10d…14a at0028 = ╱fe0000c004╱ // 0x135 @0x28
0x10d…14a at002d = ╱ee╱)╱ // 0x13a @0x2d
0x10d…14a at002e = ╱ec╱,╱ // 0x13b @0x2e
0x10d…14a at002f = ╱54╱T╱ // 0x13c @0x2f
0x10d…14a at0030 = ╱41╱A╱ // 0x13d @0x30
0x10d…14a at0031 = ╱48╱H╱ // 0x13e @0x31
0x10d…14a at0032 = ╱ef╱$╱ // 0x13f @0x32
0x10d…14a at0033 = ╱ed╱(╱ // 0x140 @0x33
0x10d…14a at0034 = ╱31╱1╱ // 0x141 @0x34
0x10d…14a at0035 = ╱32╱2╱ // 0x142 @0x35
0x10d…14a at0036 = ╱fe0000c004╱ // 0x143 @0x36
0x10d…14a at003b = ╱ee╱)╱ // 0x148 @0x3b
0x10d…14a at003c = EOL // 0x149 @0x3c
0x10d…14a }
0x14a…195 8eec 1020 DIM TOTAL$(7,12),FIL1$(16),POST1$(71),POST2$(27)
0x14a…195 LineComalBin {
0x14a…195 ptr = 0x8eec // 0x14a @0x0
0x14a…195 lno = 0x03fc // 0x14c @0x2
0x14a…195 at0004 = ╱87╱ DIM ╱ // 0x14e @0x4
0x14a…195 at0005 = ╱54╱T╱ // 0x14f @0x5
0x14a…195 at0006 = ╱4f╱O╱ // 0x150 @0x6
0x14a…195 at0007 = ╱54╱T╱ // 0x151 @0x7
0x14a…195 at0008 = ╱41╱A╱ // 0x152 @0x8
0x14a…195 at0009 = ╱4c╱L╱ // 0x153 @0x9
0x14a…195 at000a = ╱ef╱$╱ // 0x154 @0xa
0x14a…195 at000b = ╱ed╱(╱ // 0x155 @0xb
0x14a…195 at000c = ╱37╱7╱ // 0x156 @0xc
0x14a…195 at000d = ╱fe0000e003╱ // 0x157 @0xd
0x14a…195 at0012 = ╱ec╱,╱ // 0x15c @0x12
0x14a…195 at0013 = ╱31╱1╱ // 0x15d @0x13
0x14a…195 at0014 = ╱32╱2╱ // 0x15e @0x14
0x14a…195 at0015 = ╱fe0000c004╱ // 0x15f @0x15
0x14a…195 at001a = ╱ee╱)╱ // 0x164 @0x1a
0x14a…195 at001b = ╱ec╱,╱ // 0x165 @0x1b
0x14a…195 at001c = ╱46╱F╱ // 0x166 @0x1c
0x14a…195 at001d = ╱49╱I╱ // 0x167 @0x1d
0x14a…195 at001e = ╱4c╱L╱ // 0x168 @0x1e
0x14a…195 at001f = ╱31╱1╱ // 0x169 @0x1f
0x14a…195 at0020 = ╱ef╱$╱ // 0x16a @0x20
0x14a…195 at0021 = ╱ed╱(╱ // 0x16b @0x21
0x14a…195 at0022 = ╱31╱1╱ // 0x16c @0x22
0x14a…195 at0023 = ╱36╱6╱ // 0x16d @0x23
0x14a…195 at0024 = ╱fe00008005╱ // 0x16e @0x24
0x14a…195 at0029 = ╱ee╱)╱ // 0x173 @0x29
0x14a…195 at002a = ╱ec╱,╱ // 0x174 @0x2a
0x14a…195 at002b = ╱50╱P╱ // 0x175 @0x2b
0x14a…195 at002c = ╱4f╱O╱ // 0x176 @0x2c
0x14a…195 at002d = ╱53╱S╱ // 0x177 @0x2d
0x14a…195 at002e = ╱54╱T╱ // 0x178 @0x2e
0x14a…195 at002f = ╱31╱1╱ // 0x179 @0x2f
0x14a…195 at0030 = ╱ef╱$╱ // 0x17a @0x30
0x14a…195 at0031 = ╱ed╱(╱ // 0x17b @0x31
0x14a…195 at0032 = ╱37╱7╱ // 0x17c @0x32
0x14a…195 at0033 = ╱31╱1╱ // 0x17d @0x33
0x14a…195 at0034 = ╱fe00008e07╱ // 0x17e @0x34
0x14a…195 at0039 = ╱ee╱)╱ // 0x183 @0x39
0x14a…195 at003a = ╱ec╱,╱ // 0x184 @0x3a
0x14a…195 at003b = ╱50╱P╱ // 0x185 @0x3b
0x14a…195 at003c = ╱4f╱O╱ // 0x186 @0x3c
0x14a…195 at003d = ╱53╱S╱ // 0x187 @0x3d
0x14a…195 at003e = ╱54╱T╱ // 0x188 @0x3e
0x14a…195 at003f = ╱32╱2╱ // 0x189 @0x3f
0x14a…195 at0040 = ╱ef╱$╱ // 0x18a @0x40
0x14a…195 at0041 = ╱ed╱(╱ // 0x18b @0x41
0x14a…195 at0042 = ╱32╱2╱ // 0x18c @0x42
0x14a…195 at0043 = ╱37╱7╱ // 0x18d @0x43
0x14a…195 at0044 = ╱fe0000d805╱ // 0x18e @0x44
0x14a…195 at0049 = ╱ee╱)╱ // 0x193 @0x49
0x14a…195 at004a = EOL // 0x194 @0x4a
0x14a…195 }
0x195…1f1 8f48 1030 DIM RESUL$(12),RESUL1$(12),MF41$(50),MF42$(50),TOTAL1$(5,12)
0x195…1f1 LineComalBin {
0x195…1f1 ptr = 0x8f48 // 0x195 @0x0
0x195…1f1 lno = 0x0406 // 0x197 @0x2
0x195…1f1 at0004 = ╱87╱ DIM ╱ // 0x199 @0x4
0x195…1f1 at0005 = ╱52╱R╱ // 0x19a @0x5
0x195…1f1 at0006 = ╱45╱E╱ // 0x19b @0x6
0x195…1f1 at0007 = ╱53╱S╱ // 0x19c @0x7
0x195…1f1 at0008 = ╱55╱U╱ // 0x19d @0x8
0x195…1f1 at0009 = ╱4c╱L╱ // 0x19e @0x9
0x195…1f1 at000a = ╱ef╱$╱ // 0x19f @0xa
0x195…1f1 at000b = ╱ed╱(╱ // 0x1a0 @0xb
0x195…1f1 at000c = ╱31╱1╱ // 0x1a1 @0xc
0x195…1f1 at000d = ╱32╱2╱ // 0x1a2 @0xd
0x195…1f1 at000e = ╱fe0000c004╱ // 0x1a3 @0xe
0x195…1f1 at0013 = ╱ee╱)╱ // 0x1a8 @0x13
0x195…1f1 at0014 = ╱ec╱,╱ // 0x1a9 @0x14
0x195…1f1 at0015 = ╱52╱R╱ // 0x1aa @0x15
0x195…1f1 at0016 = ╱45╱E╱ // 0x1ab @0x16
0x195…1f1 at0017 = ╱53╱S╱ // 0x1ac @0x17
0x195…1f1 at0018 = ╱55╱U╱ // 0x1ad @0x18
0x195…1f1 at0019 = ╱4c╱L╱ // 0x1ae @0x19
0x195…1f1 at001a = ╱31╱1╱ // 0x1af @0x1a
0x195…1f1 at001b = ╱ef╱$╱ // 0x1b0 @0x1b
0x195…1f1 at001c = ╱ed╱(╱ // 0x1b1 @0x1c
0x195…1f1 at001d = ╱31╱1╱ // 0x1b2 @0x1d
0x195…1f1 at001e = ╱32╱2╱ // 0x1b3 @0x1e
0x195…1f1 at001f = ╱fe0000c004╱ // 0x1b4 @0x1f
0x195…1f1 at0024 = ╱ee╱)╱ // 0x1b9 @0x24
0x195…1f1 at0025 = ╱ec╱,╱ // 0x1ba @0x25
0x195…1f1 at0026 = ╱4d╱M╱ // 0x1bb @0x26
0x195…1f1 at0027 = ╱46╱F╱ // 0x1bc @0x27
0x195…1f1 at0028 = ╱34╱4╱ // 0x1bd @0x28
0x195…1f1 at0029 = ╱31╱1╱ // 0x1be @0x29
0x195…1f1 at002a = ╱ef╱$╱ // 0x1bf @0x2a
0x195…1f1 at002b = ╱ed╱(╱ // 0x1c0 @0x2b
0x195…1f1 at002c = ╱35╱5╱ // 0x1c1 @0x2c
0x195…1f1 at002d = ╱30╱0╱ // 0x1c2 @0x2d
0x195…1f1 at002e = ╱fe0000c806╱ // 0x1c3 @0x2e
0x195…1f1 at0033 = ╱ee╱)╱ // 0x1c8 @0x33
0x195…1f1 at0034 = ╱ec╱,╱ // 0x1c9 @0x34
0x195…1f1 at0035 = ╱4d╱M╱ // 0x1ca @0x35
0x195…1f1 at0036 = ╱46╱F╱ // 0x1cb @0x36
0x195…1f1 at0037 = ╱34╱4╱ // 0x1cc @0x37
0x195…1f1 at0038 = ╱32╱2╱ // 0x1cd @0x38
0x195…1f1 at0039 = ╱ef╱$╱ // 0x1ce @0x39
0x195…1f1 at003a = ╱ed╱(╱ // 0x1cf @0x3a
0x195…1f1 at003b = ╱35╱5╱ // 0x1d0 @0x3b
0x195…1f1 at003c = ╱30╱0╱ // 0x1d1 @0x3c
0x195…1f1 at003d = ╱fe0000c806╱ // 0x1d2 @0x3d
0x195…1f1 at0042 = ╱ee╱)╱ // 0x1d7 @0x42
0x195…1f1 at0043 = ╱ec╱,╱ // 0x1d8 @0x43
0x195…1f1 at0044 = ╱54╱T╱ // 0x1d9 @0x44
0x195…1f1 at0045 = ╱4f╱O╱ // 0x1da @0x45
0x195…1f1 at0046 = ╱54╱T╱ // 0x1db @0x46
0x195…1f1 at0047 = ╱41╱A╱ // 0x1dc @0x47
0x195…1f1 at0048 = ╱4c╱L╱ // 0x1dd @0x48
0x195…1f1 at0049 = ╱31╱1╱ // 0x1de @0x49
0x195…1f1 at004a = ╱ef╱$╱ // 0x1df @0x4a
0x195…1f1 at004b = ╱ed╱(╱ // 0x1e0 @0x4b
0x195…1f1 at004c = ╱35╱5╱ // 0x1e1 @0x4c
0x195…1f1 at004d = ╱fe0000a003╱ // 0x1e2 @0x4d
0x195…1f1 at0052 = ╱ec╱,╱ // 0x1e7 @0x52
0x195…1f1 at0053 = ╱31╱1╱ // 0x1e8 @0x53
0x195…1f1 at0054 = ╱32╱2╱ // 0x1e9 @0x54
0x195…1f1 at0055 = ╱fe0000c004╱ // 0x1ea @0x55
0x195…1f1 at005a = ╱ee╱)╱ // 0x1ef @0x5a
0x195…1f1 at005b = EOL // 0x1f0 @0x5b
0x195…1f1 }
0x1f1…204 8f5b 1050 DIM MF4$(16)
0x1f1…204 LineComalBin {
0x1f1…204 ptr = 0x8f5b // 0x1f1 @0x0
0x1f1…204 lno = 0x041a // 0x1f3 @0x2
0x1f1…204 at0004 = ╱87╱ DIM ╱ // 0x1f5 @0x4
0x1f1…204 at0005 = ╱4d╱M╱ // 0x1f6 @0x5
0x1f1…204 at0006 = ╱46╱F╱ // 0x1f7 @0x6
0x1f1…204 at0007 = ╱34╱4╱ // 0x1f8 @0x7
0x1f1…204 at0008 = ╱ef╱$╱ // 0x1f9 @0x8
0x1f1…204 at0009 = ╱ed╱(╱ // 0x1fa @0x9
0x1f1…204 at000a = ╱31╱1╱ // 0x1fb @0xa
0x1f1…204 at000b = ╱36╱6╱ // 0x1fc @0xb
0x1f1…204 at000c = ╱fe00008005╱ // 0x1fd @0xc
0x1f1…204 at0011 = ╱ee╱)╱ // 0x202 @0x11
0x1f1…204 at0012 = EOL // 0x203 @0x12
0x1f1…204 }
0x204…21c 8f73 1060 TAH$=" 0+"
0x204…21c LineComalBin {
0x204…21c ptr = 0x8f73 // 0x204 @0x0
0x204…21c lno = 0x0424 // 0x206 @0x2
0x204…21c at0004 = ╱54╱T╱ // 0x208 @0x4
0x204…21c at0005 = ╱41╱A╱ // 0x209 @0x5
0x204…21c at0006 = ╱48╱H╱ // 0x20a @0x6
0x204…21c at0007 = ╱ef╱$╱ // 0x20b @0x7
0x204…21c at0008 = ╱dc╱=╱ // 0x20c @0x8
0x204…21c at0009 = ╱22╱"╱ // 0x20d @0x9
0x204…21c at000a = ╱20╱…╱ // 0x20e @0xa
0x204…21c at000b = ╱20╱…╱ // 0x20f @0xb
0x204…21c at000c = ╱20╱…╱ // 0x210 @0xc
0x204…21c at000d = ╱20╱…╱ // 0x211 @0xd
0x204…21c at000e = ╱20╱…╱ // 0x212 @0xe
0x204…21c at000f = ╱20╱…╱ // 0x213 @0xf
0x204…21c at0010 = ╱20╱…╱ // 0x214 @0x10
0x204…21c at0011 = ╱20╱…╱ // 0x215 @0x11
0x204…21c at0012 = ╱20╱…╱ // 0x216 @0x12
0x204…21c at0013 = ╱20╱…╱ // 0x217 @0x13
0x204…21c at0014 = ╱30╱0╱ // 0x218 @0x14
0x204…21c at0015 = ╱2b╱+╱ // 0x219 @0x15
0x204…21c at0016 = ╱22╱"╱ // 0x21a @0x16
0x204…21c at0017 = EOL // 0x21b @0x17
0x204…21c }
0x21c…22e 8f85 1070 DIM BL$(79)
0x21c…22e LineComalBin {
0x21c…22e ptr = 0x8f85 // 0x21c @0x0
0x21c…22e lno = 0x042e // 0x21e @0x2
0x21c…22e at0004 = ╱87╱ DIM ╱ // 0x220 @0x4
0x21c…22e at0005 = ╱42╱B╱ // 0x221 @0x5
0x21c…22e at0006 = ╱4c╱L╱ // 0x222 @0x6
0x21c…22e at0007 = ╱ef╱$╱ // 0x223 @0x7
0x21c…22e at0008 = ╱ed╱(╱ // 0x224 @0x8
0x21c…22e at0009 = ╱37╱7╱ // 0x225 @0x9
0x21c…22e at000a = ╱39╱9╱ // 0x226 @0xa
0x21c…22e at000b = ╱fe00009e07╱ // 0x227 @0xb
0x21c…22e at0010 = ╱ee╱)╱ // 0x22c @0x10
0x21c…22e at0011 = EOL // 0x22d @0x11
0x21c…22e }
0x22e…23f 8f96 1080 FOR I=E TO 79
0x22e…23f LineComalBin {
0x22e…23f ptr = 0x8f96 // 0x22e @0x0
0x22e…23f lno = 0x0438 // 0x230 @0x2
0x22e…23f at0004 = ╱83╱ FOR ╱ // 0x232 @0x4
0x22e…23f at0005 = ╱49╱I╱ // 0x233 @0x5
0x22e…23f at0006 = ╱dc╱=╱ // 0x234 @0x6
0x22e…23f at0007 = ╱45╱E╱ // 0x235 @0x7
0x22e…23f at0008 = ╱b7╱ TO ╱ // 0x236 @0x8
0x22e…23f at0009 = ╱37╱7╱ // 0x237 @0x9
0x22e…23f at000a = ╱39╱9╱ // 0x238 @0xa
0x22e…23f at000b = ╱fe00009e07╱ // 0x239 @0xb
0x22e…23f at0010 = EOL // 0x23e @0x10
0x22e…23f }
0x23f…24f 8fa6 1090 BL$=BL$+" "
0x23f…24f LineComalBin {
0x23f…24f ptr = 0x8fa6 // 0x23f @0x0
0x23f…24f lno = 0x0442 // 0x241 @0x2
0x23f…24f at0004 = ╱42╱B╱ // 0x243 @0x4
0x23f…24f at0005 = ╱4c╱L╱ // 0x244 @0x5
0x23f…24f at0006 = ╱ef╱$╱ // 0x245 @0x6
0x23f…24f at0007 = ╱dc╱=╱ // 0x246 @0x7
0x23f…24f at0008 = ╱42╱B╱ // 0x247 @0x8
0x23f…24f at0009 = ╱4c╱L╱ // 0x248 @0x9
0x23f…24f at000a = ╱ef╱$╱ // 0x249 @0xa
0x23f…24f at000b = ╱f1╱+╱ // 0x24a @0xb
0x23f…24f at000c = ╱22╱"╱ // 0x24b @0xc
0x23f…24f at000d = ╱20╱…╱ // 0x24c @0xd
0x23f…24f at000e = ╱22╱"╱ // 0x24d @0xe
0x23f…24f at000f = EOL // 0x24e @0xf
0x23f…24f }
0x24f…256 8fad 1100 NEXT I
0x24f…256 LineComalBin {
0x24f…256 ptr = 0x8fad // 0x24f @0x0
0x24f…256 lno = 0x044c // 0x251 @0x2
0x24f…256 at0004 = ╱84╱ NEXT ╱ // 0x253 @0x4
0x24f…256 at0005 = ╱49╱I╱ // 0x254 @0x5
0x24f…256 at0006 = EOL // 0x255 @0x6
0x24f…256 }
0x256…26e 8fc5 1110 PROC CALC(AR3,B1,B2,ES)
0x256…26e LineComalBin {
0x256…26e ptr = 0x8fc5 // 0x256 @0x0
0x256…26e lno = 0x0456 // 0x258 @0x2
0x256…26e at0004 = ╱9e╱ PROC ╱ // 0x25a @0x4
0x256…26e at0005 = ╱43╱C╱ // 0x25b @0x5
0x256…26e at0006 = ╱41╱A╱ // 0x25c @0x6
0x256…26e at0007 = ╱4c╱L╱ // 0x25d @0x7
0x256…26e at0008 = ╱43╱C╱ // 0x25e @0x8
0x256…26e at0009 = ╱ed╱(╱ // 0x25f @0x9
0x256…26e at000a = ╱41╱A╱ // 0x260 @0xa
0x256…26e at000b = ╱52╱R╱ // 0x261 @0xb
0x256…26e at000c = ╱33╱3╱ // 0x262 @0xc
0x256…26e at000d = ╱ec╱,╱ // 0x263 @0xd
0x256…26e at000e = ╱42╱B╱ // 0x264 @0xe
0x256…26e at000f = ╱31╱1╱ // 0x265 @0xf
0x256…26e at0010 = ╱ec╱,╱ // 0x266 @0x10
0x256…26e at0011 = ╱42╱B╱ // 0x267 @0x11
0x256…26e at0012 = ╱32╱2╱ // 0x268 @0x12
0x256…26e at0013 = ╱ec╱,╱ // 0x269 @0x13
0x256…26e at0014 = ╱45╱E╱ // 0x26a @0x14
0x256…26e at0015 = ╱53╱S╱ // 0x26b @0x15
0x256…26e at0016 = ╱ee╱)╱ // 0x26c @0x16
0x256…26e at0017 = EOL // 0x26d @0x17
0x256…26e }
0x26e…2b5 900c 1120 RES$=ES$;OP1$=B1$;OP2$=B2$;SI=B;FLAG=B;ART=AR3-6*(AR3>5)
0x26e…2b5 LineComalBin {
0x26e…2b5 ptr = 0x900c // 0x26e @0x0
0x26e…2b5 lno = 0x0460 // 0x270 @0x2
0x26e…2b5 at0004 = ╱52╱R╱ // 0x272 @0x4
0x26e…2b5 at0005 = ╱45╱E╱ // 0x273 @0x5
0x26e…2b5 at0006 = ╱53╱S╱ // 0x274 @0x6
0x26e…2b5 at0007 = ╱ef╱$╱ // 0x275 @0x7
0x26e…2b5 at0008 = ╱dc╱=╱ // 0x276 @0x8
0x26e…2b5 at0009 = ╱45╱E╱ // 0x277 @0x9
0x26e…2b5 at000a = ╱53╱S╱ // 0x278 @0xa
0x26e…2b5 at000b = ╱ef╱$╱ // 0x279 @0xb
0x26e…2b5 at000c = ╱eb╱;╱ // 0x27a @0xc
0x26e…2b5 at000d = ╱4f╱O╱ // 0x27b @0xd
0x26e…2b5 at000e = ╱50╱P╱ // 0x27c @0xe
0x26e…2b5 at000f = ╱31╱1╱ // 0x27d @0xf
0x26e…2b5 at0010 = ╱ef╱$╱ // 0x27e @0x10
0x26e…2b5 at0011 = ╱dc╱=╱ // 0x27f @0x11
0x26e…2b5 at0012 = ╱42╱B╱ // 0x280 @0x12
0x26e…2b5 at0013 = ╱31╱1╱ // 0x281 @0x13
0x26e…2b5 at0014 = ╱ef╱$╱ // 0x282 @0x14
0x26e…2b5 at0015 = ╱eb╱;╱ // 0x283 @0x15
0x26e…2b5 at0016 = ╱4f╱O╱ // 0x284 @0x16
0x26e…2b5 at0017 = ╱50╱P╱ // 0x285 @0x17
0x26e…2b5 at0018 = ╱32╱2╱ // 0x286 @0x18
0x26e…2b5 at0019 = ╱ef╱$╱ // 0x287 @0x19
0x26e…2b5 at001a = ╱dc╱=╱ // 0x288 @0x1a
0x26e…2b5 at001b = ╱42╱B╱ // 0x289 @0x1b
0x26e…2b5 at001c = ╱32╱2╱ // 0x28a @0x1c
0x26e…2b5 at001d = ╱ef╱$╱ // 0x28b @0x1d
0x26e…2b5 at001e = ╱eb╱;╱ // 0x28c @0x1e
0x26e…2b5 at001f = ╱53╱S╱ // 0x28d @0x1f
0x26e…2b5 at0020 = ╱49╱I╱ // 0x28e @0x20
0x26e…2b5 at0021 = ╱dc╱=╱ // 0x28f @0x21
0x26e…2b5 at0022 = ╱42╱B╱ // 0x290 @0x22
0x26e…2b5 at0023 = ╱eb╱;╱ // 0x291 @0x23
0x26e…2b5 at0024 = ╱46╱F╱ // 0x292 @0x24
0x26e…2b5 at0025 = ╱4c╱L╱ // 0x293 @0x25
0x26e…2b5 at0026 = ╱41╱A╱ // 0x294 @0x26
0x26e…2b5 at0027 = ╱47╱G╱ // 0x295 @0x27
0x26e…2b5 at0028 = ╱dc╱=╱ // 0x296 @0x28
0x26e…2b5 at0029 = ╱42╱B╱ // 0x297 @0x29
0x26e…2b5 at002a = ╱eb╱;╱ // 0x298 @0x2a
0x26e…2b5 at002b = ╱41╱A╱ // 0x299 @0x2b
0x26e…2b5 at002c = ╱52╱R╱ // 0x29a @0x2c
0x26e…2b5 at002d = ╱54╱T╱ // 0x29b @0x2d
0x26e…2b5 at002e = ╱dc╱=╱ // 0x29c @0x2e
0x26e…2b5 at002f = ╱41╱A╱ // 0x29d @0x2f
0x26e…2b5 at0030 = ╱52╱R╱ // 0x29e @0x30
0x26e…2b5 at0031 = ╱33╱3╱ // 0x29f @0x31
0x26e…2b5 at0032 = ╱e3╱-╱ // 0x2a0 @0x32
0x26e…2b5 at0033 = ╱36╱6╱ // 0x2a1 @0x33
0x26e…2b5 at0034 = ╱fe0000c003╱ // 0x2a2 @0x34
0x26e…2b5 at0039 = ╱e4╱*╱ // 0x2a7 @0x39
0x26e…2b5 at003a = ╱ed╱(╱ // 0x2a8 @0x3a
0x26e…2b5 at003b = ╱41╱A╱ // 0x2a9 @0x3b
0x26e…2b5 at003c = ╱52╱R╱ // 0x2aa @0x3c
0x26e…2b5 at003d = ╱33╱3╱ // 0x2ab @0x3d
0x26e…2b5 at003e = ╱de╱>╱ // 0x2ac @0x3e
0x26e…2b5 at003f = ╱35╱5╱ // 0x2ad @0x3f
0x26e…2b5 at0040 = ╱fe0000a003╱ // 0x2ae @0x40
0x26e…2b5 at0045 = ╱ee╱)╱ // 0x2b3 @0x45
0x26e…2b5 at0046 = EOL // 0x2b4 @0x46
0x26e…2b5 }
0x2b5…2cb (9,) 9022 1130 CALL "P641210:REGN"
0x2b5…2cb LineComalBin {
0x2b5…2cb ptr = 0x9022 // 0x2b5 @0x0
0x2b5…2cb lno = 0x046a // 0x2b7 @0x2
0x2b5…2cb at0004 = ╱adeee3╱ CALL ╱ // 0x2b9 @0x4
0x2b5…2cb at0007 = ╱22╱"╱ // 0x2bc @0x7
0x2b5…2cb at0008 = ╱50╱P╱ // 0x2bd @0x8
0x2b5…2cb at0009 = ╱36╱6╱ // 0x2be @0x9
0x2b5…2cb at000a = ╱34╱4╱ // 0x2bf @0xa
0x2b5…2cb at000b = ╱31╱1╱ // 0x2c0 @0xb
0x2b5…2cb at000c = ╱32╱2╱ // 0x2c1 @0xc
0x2b5…2cb at000d = ╱31╱1╱ // 0x2c2 @0xd
0x2b5…2cb at000e = ╱30╱0╱ // 0x2c3 @0xe
0x2b5…2cb at000f = ╱3a╱:╱ // 0x2c4 @0xf
0x2b5…2cb at0010 = ╱52╱R╱ // 0x2c5 @0x10
0x2b5…2cb at0011 = ╱45╱E╱ // 0x2c6 @0x11
0x2b5…2cb at0012 = ╱47╱G╱ // 0x2c7 @0x12
0x2b5…2cb at0013 = ╱4e╱N╱ // 0x2c8 @0x13
0x2b5…2cb at0014 = ╱22╱"╱ // 0x2c9 @0x14
0x2b5…2cb at0015 = EOL // 0x2ca @0x15
0x2b5…2cb }
0x2cb…2dc 9033 1140 IF AR3<6 THEN
0x2cb…2dc LineComalBin {
0x2cb…2dc ptr = 0x9033 // 0x2cb @0x0
0x2cb…2dc lno = 0x0474 // 0x2cd @0x2
0x2cb…2dc at0004 = ╱9c╱ IF ╱ // 0x2cf @0x4
0x2cb…2dc at0005 = ╱41╱A╱ // 0x2d0 @0x5
0x2cb…2dc at0006 = ╱52╱R╱ // 0x2d1 @0x6
0x2cb…2dc at0007 = ╱33╱3╱ // 0x2d2 @0x7
0x2cb…2dc at0008 = ╱dd╱<╱ // 0x2d3 @0x8
0x2cb…2dc at0009 = ╱36╱6╱ // 0x2d4 @0x9
0x2cb…2dc at000a = ╱fe0000c003╱ // 0x2d5 @0xa
0x2cb…2dc at000f = ╱b6╱ THEN ╱ // 0x2da @0xf
0x2cb…2dc at0010 = EOL // 0x2db @0x10
0x2cb…2dc }
0x2dc…2e8 903f 1150 IF FLAG THEN STOP
0x2dc…2e8 LineComalBin {
0x2dc…2e8 ptr = 0x903f // 0x2dc @0x0
0x2dc…2e8 lno = 0x047e // 0x2de @0x2
0x2dc…2e8 at0004 = ╱82╱ IF ╱ // 0x2e0 @0x4
0x2dc…2e8 at0005 = ╱46╱F╱ // 0x2e1 @0x5
0x2dc…2e8 at0006 = ╱4c╱L╱ // 0x2e2 @0x6
0x2dc…2e8 at0007 = ╱41╱A╱ // 0x2e3 @0x7
0x2dc…2e8 at0008 = ╱47╱G╱ // 0x2e4 @0x8
0x2dc…2e8 at0009 = ╱b6╱ THEN ╱ // 0x2e5 @0x9
0x2dc…2e8 at000a = ╱8d╱ STOP ╱ // 0x2e6 @0xa
0x2dc…2e8 at000b = EOL // 0x2e7 @0xb
0x2dc…2e8 }
0x2e8…2ee 9045 1160 ENDIF
0x2e8…2ee LineComalBin {
0x2e8…2ee ptr = 0x9045 // 0x2e8 @0x0
0x2e8…2ee lno = 0x0488 // 0x2ea @0x2
0x2e8…2ee at0004 = ╱9b╱ ENDIF ╱ // 0x2ec @0x4
0x2e8…2ee at0005 = EOL // 0x2ed @0x5
0x2e8…2ee }
0x2ee…2fb 9052 1170 ES$=RES$
0x2ee…2fb LineComalBin {
0x2ee…2fb ptr = 0x9052 // 0x2ee @0x0
0x2ee…2fb lno = 0x0492 // 0x2f0 @0x2
0x2ee…2fb at0004 = ╱45╱E╱ // 0x2f2 @0x4
0x2ee…2fb at0005 = ╱53╱S╱ // 0x2f3 @0x5
0x2ee…2fb at0006 = ╱ef╱$╱ // 0x2f4 @0x6
0x2ee…2fb at0007 = ╱dc╱=╱ // 0x2f5 @0x7
0x2ee…2fb at0008 = ╱52╱R╱ // 0x2f6 @0x8
0x2ee…2fb at0009 = ╱45╱E╱ // 0x2f7 @0x9
0x2ee…2fb at000a = ╱53╱S╱ // 0x2f8 @0xa
0x2ee…2fb at000b = ╱ef╱$╱ // 0x2f9 @0xb
0x2ee…2fb at000c = EOL // 0x2fa @0xc
0x2ee…2fb }
0x2fb…301 9058 1180 ENDPROC
0x2fb…301 LineComalBin {
0x2fb…301 ptr = 0x9058 // 0x2fb @0x0
0x2fb…301 lno = 0x049c // 0x2fd @0x2
0x2fb…301 at0004 = ╱9f╱ ENDPROC ╱ // 0x2ff @0x4
0x2fb…301 at0005 = EOL // 0x300 @0x5
0x2fb…301 }
0x301…311 9068 1390 PROC SKRIVHOVED
0x301…311 LineComalBin {
0x301…311 ptr = 0x9068 // 0x301 @0x0
0x301…311 lno = 0x056e // 0x303 @0x2
0x301…311 at0004 = ╱9e╱ PROC ╱ // 0x305 @0x4
0x301…311 at0005 = ╱53╱S╱ // 0x306 @0x5
0x301…311 at0006 = ╱4b╱K╱ // 0x307 @0x6
0x301…311 at0007 = ╱52╱R╱ // 0x308 @0x7
0x301…311 at0008 = ╱49╱I╱ // 0x309 @0x8
0x301…311 at0009 = ╱56╱V╱ // 0x30a @0x9
0x301…311 at000a = ╱48╱H╱ // 0x30b @0xa
0x301…311 at000b = ╱4f╱O╱ // 0x30c @0xb
0x301…311 at000c = ╱56╱V╱ // 0x30d @0xc
0x301…311 at000d = ╱45╱E╱ // 0x30e @0xd
0x301…311 at000e = ╱44╱D╱ // 0x30f @0xe
0x301…311 at000f = EOL // 0x310 @0xf
0x301…311 }
0x311…317 906e 1400 PRINT
0x311…317 LineComalBin {
0x311…317 ptr = 0x906e // 0x311 @0x0
0x311…317 lno = 0x0578 // 0x313 @0x2
0x311…317 at0004 = ╱92╱ PRINT ╱ // 0x315 @0x4
0x311…317 at0005 = EOL // 0x316 @0x5
0x311…317 }
0x317…327 907e 1410 SIDE=SIDE+E
0x317…327 LineComalBin {
0x317…327 ptr = 0x907e // 0x317 @0x0
0x317…327 lno = 0x0582 // 0x319 @0x2
0x317…327 at0004 = ╱53╱S╱ // 0x31b @0x4
0x317…327 at0005 = ╱49╱I╱ // 0x31c @0x5
0x317…327 at0006 = ╱44╱D╱ // 0x31d @0x6
0x317…327 at0007 = ╱45╱E╱ // 0x31e @0x7
0x317…327 at0008 = ╱dc╱=╱ // 0x31f @0x8
0x317…327 at0009 = ╱53╱S╱ // 0x320 @0x9
0x317…327 at000a = ╱49╱I╱ // 0x321 @0xa
0x317…327 at000b = ╱44╱D╱ // 0x322 @0xb
0x317…327 at000c = ╱45╱E╱ // 0x323 @0xc
0x317…327 at000d = ╱e2╱+╱ // 0x324 @0xd
0x317…327 at000e = ╱45╱E╱ // 0x325 @0xe
0x317…327 at000f = EOL // 0x326 @0xf
0x317…327 }
0x327…33f 9096 1420 PRINT USING " SIDE ###":SIDE;
0x327…33f LineComalBin {
0x327…33f ptr = 0x9096 // 0x327 @0x0
0x327…33f lno = 0x058c // 0x329 @0x2
0x327…33f at0004 = ╱92╱ PRINT ╱ // 0x32b @0x4
0x327…33f at0005 = ╱b9╱ USING ╱ // 0x32c @0x5
0x327…33f at0006 = ╱22╱"╱ // 0x32d @0x6
0x327…33f at0007 = ╱20╱…╱ // 0x32e @0x7
0x327…33f at0008 = ╱53╱S╱ // 0x32f @0x8
0x327…33f at0009 = ╱49╱I╱ // 0x330 @0x9
0x327…33f at000a = ╱44╱D╱ // 0x331 @0xa
0x327…33f at000b = ╱45╱E╱ // 0x332 @0xb
0x327…33f at000c = ╱20╱…╱ // 0x333 @0xc
0x327…33f at000d = ╱23╱#╱ // 0x334 @0xd
0x327…33f at000e = ╱23╱#╱ // 0x335 @0xe
0x327…33f at000f = ╱23╱#╱ // 0x336 @0xf
0x327…33f at0010 = ╱22╱"╱ // 0x337 @0x10
0x327…33f at0011 = ╱f0╱:╱ // 0x338 @0x11
0x327…33f at0012 = ╱53╱S╱ // 0x339 @0x12
0x327…33f at0013 = ╱49╱I╱ // 0x33a @0x13
0x327…33f at0014 = ╱44╱D╱ // 0x33b @0x14
0x327…33f at0015 = ╱45╱E╱ // 0x33c @0x15
0x327…33f at0016 = ╱eb╱;╱ // 0x33d @0x16
0x327…33f at0017 = EOL // 0x33e @0x17
0x327…33f }
0x33f…360 90b7 1425 PRINT " UDSKRIFTSDATO ";DAD$;
0x33f…360 LineComalBin {
0x33f…360 ptr = 0x90b7 // 0x33f @0x0
0x33f…360 lno = 0x0591 // 0x341 @0x2
0x33f…360 at0004 = ╱92╱ PRINT ╱ // 0x343 @0x4
0x33f…360 at0005 = ╱22╱"╱ // 0x344 @0x5
0x33f…360 at0006 = ╱20╱…╱ // 0x345 @0x6
0x33f…360 at0007 = ╱20╱…╱ // 0x346 @0x7
0x33f…360 at0008 = ╱20╱…╱ // 0x347 @0x8
0x33f…360 at0009 = ╱20╱…╱ // 0x348 @0x9
0x33f…360 at000a = ╱20╱…╱ // 0x349 @0xa
0x33f…360 at000b = ╱55╱U╱ // 0x34a @0xb
0x33f…360 at000c = ╱44╱D╱ // 0x34b @0xc
0x33f…360 at000d = ╱53╱S╱ // 0x34c @0xd
0x33f…360 at000e = ╱4b╱K╱ // 0x34d @0xe
0x33f…360 at000f = ╱52╱R╱ // 0x34e @0xf
0x33f…360 at0010 = ╱49╱I╱ // 0x34f @0x10
0x33f…360 at0011 = ╱46╱F╱ // 0x350 @0x11
0x33f…360 at0012 = ╱54╱T╱ // 0x351 @0x12
0x33f…360 at0013 = ╱53╱S╱ // 0x352 @0x13
0x33f…360 at0014 = ╱44╱D╱ // 0x353 @0x14
0x33f…360 at0015 = ╱41╱A╱ // 0x354 @0x15
0x33f…360 at0016 = ╱54╱T╱ // 0x355 @0x16
0x33f…360 at0017 = ╱4f╱O╱ // 0x356 @0x17
0x33f…360 at0018 = ╱20╱…╱ // 0x357 @0x18
0x33f…360 at0019 = ╱22╱"╱ // 0x358 @0x19
0x33f…360 at001a = ╱eb╱;╱ // 0x359 @0x1a
0x33f…360 at001b = ╱44╱D╱ // 0x35a @0x1b
0x33f…360 at001c = ╱41╱A╱ // 0x35b @0x1c
0x33f…360 at001d = ╱44╱D╱ // 0x35c @0x1d
0x33f…360 at001e = ╱ef╱$╱ // 0x35d @0x1e
0x33f…360 at001f = ╱eb╱;╱ // 0x35e @0x1f
0x33f…360 at0020 = EOL // 0x35f @0x20
0x33f…360 }
0x360…399 90f0 1430 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$;
0x360…399 LineComalBin {
0x360…399 ptr = 0x90f0 // 0x360 @0x0
0x360…399 lno = 0x0596 // 0x362 @0x2
0x360…399 at0004 = ╱92╱ PRINT ╱ // 0x364 @0x4
0x360…399 at0005 = ╱d2╱TAB╱ // 0x365 @0x5
0x360…399 at0006 = ╱ed╱(╱ // 0x366 @0x6
0x360…399 at0007 = ╱34╱4╱ // 0x367 @0x7
0x360…399 at0008 = ╱39╱9╱ // 0x368 @0x8
0x360…399 at0009 = ╱fe0000c406╱ // 0x369 @0x9
0x360…399 at000e = ╱ee╱)╱ // 0x36e @0xe
0x360…399 at000f = ╱eb╱;╱ // 0x36f @0xf
0x360…399 at0010 = ╱22╱"╱ // 0x370 @0x10
0x360…399 at0011 = ╱4c╱L╱ // 0x371 @0x11
0x360…399 at0012 = ╱5c╱Ø╱ // 0x372 @0x12
0x360…399 at0013 = ╱4e╱N╱ // 0x373 @0x13
0x360…399 at0014 = ╱50╱P╱ // 0x374 @0x14
0x360…399 at0015 = ╱45╱E╱ // 0x375 @0x15
0x360…399 at0016 = ╱52╱R╱ // 0x376 @0x16
0x360…399 at0017 = ╱49╱I╱ // 0x377 @0x17
0x360…399 at0018 = ╱4f╱O╱ // 0x378 @0x18
0x360…399 at0019 = ╱44╱D╱ // 0x379 @0x19
0x360…399 at001a = ╱45╱E╱ // 0x37a @0x1a
0x360…399 at001b = ╱4e╱N╱ // 0x37b @0x1b
0x360…399 at001c = ╱20╱…╱ // 0x37c @0x1c
0x360…399 at001d = ╱22╱"╱ // 0x37d @0x1d
0x360…399 at001e = ╱eb╱;╱ // 0x37e @0x1e
0x360…399 at001f = ╱53╱S╱ // 0x37f @0x1f
0x360…399 at0020 = ╱54╱T╱ // 0x380 @0x20
0x360…399 at0021 = ╱41╱A╱ // 0x381 @0x21
0x360…399 at0022 = ╱52╱R╱ // 0x382 @0x22
0x360…399 at0023 = ╱54╱T╱ // 0x383 @0x23
0x360…399 at0024 = ╱50╱P╱ // 0x384 @0x24
0x360…399 at0025 = ╱45╱E╱ // 0x385 @0x25
0x360…399 at0026 = ╱52╱R╱ // 0x386 @0x26
0x360…399 at0027 = ╱ef╱$╱ // 0x387 @0x27
0x360…399 at0028 = ╱eb╱;╱ // 0x388 @0x28
0x360…399 at0029 = ╱22╱"╱ // 0x389 @0x29
0x360…399 at002a = ╱20╱…╱ // 0x38a @0x2a
0x360…399 at002b = ╱2f╱/╱ // 0x38b @0x2b
0x360…399 at002c = ╱20╱…╱ // 0x38c @0x2c
0x360…399 at002d = ╱22╱"╱ // 0x38d @0x2d
0x360…399 at002e = ╱eb╱;╱ // 0x38e @0x2e
0x360…399 at002f = ╱53╱S╱ // 0x38f @0x2f
0x360…399 at0030 = ╱4c╱L╱ // 0x390 @0x30
0x360…399 at0031 = ╱55╱U╱ // 0x391 @0x31
0x360…399 at0032 = ╱54╱T╱ // 0x392 @0x32
0x360…399 at0033 = ╱50╱P╱ // 0x393 @0x33
0x360…399 at0034 = ╱45╱E╱ // 0x394 @0x34
0x360…399 at0035 = ╱52╱R╱ // 0x395 @0x35
0x360…399 at0036 = ╱ef╱$╱ // 0x396 @0x36
0x360…399 at0037 = ╱eb╱;╱ // 0x397 @0x37
0x360…399 at0038 = EOL // 0x398 @0x38
0x360…399 }
0x399…3aa 9101 1440 LINIE=7
0x399…3aa LineComalBin {
0x399…3aa ptr = 0x9101 // 0x399 @0x0
0x399…3aa lno = 0x05a0 // 0x39b @0x2
0x399…3aa at0004 = ╱4c╱L╱ // 0x39d @0x4
0x399…3aa at0005 = ╱49╱I╱ // 0x39e @0x5
0x399…3aa at0006 = ╱4e╱N╱ // 0x39f @0x6
0x399…3aa at0007 = ╱49╱I╱ // 0x3a0 @0x7
0x399…3aa at0008 = ╱45╱E╱ // 0x3a1 @0x8
0x399…3aa at0009 = ╱dc╱=╱ // 0x3a2 @0x9
0x399…3aa at000a = ╱37╱7╱ // 0x3a3 @0xa
0x399…3aa at000b = ╱fe0000e003╱ // 0x3a4 @0xb
0x399…3aa at0010 = EOL // 0x3a9 @0x10
0x399…3aa }
0x3aa…3ca 9121 1450 PRINT TAB(34);"FRADRAGSLISTE"
0x3aa…3ca LineComalBin {
0x3aa…3ca ptr = 0x9121 // 0x3aa @0x0
0x3aa…3ca lno = 0x05aa // 0x3ac @0x2
0x3aa…3ca at0004 = ╱92╱ PRINT ╱ // 0x3ae @0x4
0x3aa…3ca at0005 = ╱d2╱TAB╱ // 0x3af @0x5
0x3aa…3ca at0006 = ╱ed╱(╱ // 0x3b0 @0x6
0x3aa…3ca at0007 = ╱33╱3╱ // 0x3b1 @0x7
0x3aa…3ca at0008 = ╱34╱4╱ // 0x3b2 @0x8
0x3aa…3ca at0009 = ╱fe00008806╱ // 0x3b3 @0x9
0x3aa…3ca at000e = ╱ee╱)╱ // 0x3b8 @0xe
0x3aa…3ca at000f = ╱eb╱;╱ // 0x3b9 @0xf
0x3aa…3ca at0010 = ╱22╱"╱ // 0x3ba @0x10
0x3aa…3ca at0011 = ╱46╱F╱ // 0x3bb @0x11
0x3aa…3ca at0012 = ╱52╱R╱ // 0x3bc @0x12
0x3aa…3ca at0013 = ╱41╱A╱ // 0x3bd @0x13
0x3aa…3ca at0014 = ╱44╱D╱ // 0x3be @0x14
0x3aa…3ca at0015 = ╱52╱R╱ // 0x3bf @0x15
0x3aa…3ca at0016 = ╱41╱A╱ // 0x3c0 @0x16
0x3aa…3ca at0017 = ╱47╱G╱ // 0x3c1 @0x17
0x3aa…3ca at0018 = ╱53╱S╱ // 0x3c2 @0x18
0x3aa…3ca at0019 = ╱4c╱L╱ // 0x3c3 @0x19
0x3aa…3ca at001a = ╱49╱I╱ // 0x3c4 @0x1a
0x3aa…3ca at001b = ╱53╱S╱ // 0x3c5 @0x1b
0x3aa…3ca at001c = ╱54╱T╱ // 0x3c6 @0x1c
0x3aa…3ca at001d = ╱45╱E╱ // 0x3c7 @0x1d
0x3aa…3ca at001e = ╱22╱"╱ // 0x3c8 @0x1e
0x3aa…3ca at001f = EOL // 0x3c9 @0x1f
0x3aa…3ca }
0x3ca…3ea 9141 1460 PRINT TAB(34);"*************"
0x3ca…3ea LineComalBin {
0x3ca…3ea ptr = 0x9141 // 0x3ca @0x0
0x3ca…3ea lno = 0x05b4 // 0x3cc @0x2
0x3ca…3ea at0004 = ╱92╱ PRINT ╱ // 0x3ce @0x4
0x3ca…3ea at0005 = ╱d2╱TAB╱ // 0x3cf @0x5
0x3ca…3ea at0006 = ╱ed╱(╱ // 0x3d0 @0x6
0x3ca…3ea at0007 = ╱33╱3╱ // 0x3d1 @0x7
0x3ca…3ea at0008 = ╱34╱4╱ // 0x3d2 @0x8
0x3ca…3ea at0009 = ╱fe00008806╱ // 0x3d3 @0x9
0x3ca…3ea at000e = ╱ee╱)╱ // 0x3d8 @0xe
0x3ca…3ea at000f = ╱eb╱;╱ // 0x3d9 @0xf
0x3ca…3ea at0010 = ╱22╱"╱ // 0x3da @0x10
0x3ca…3ea at0011 = ╱2a╱*╱ // 0x3db @0x11
0x3ca…3ea at0012 = ╱2a╱*╱ // 0x3dc @0x12
0x3ca…3ea at0013 = ╱2a╱*╱ // 0x3dd @0x13
0x3ca…3ea at0014 = ╱2a╱*╱ // 0x3de @0x14
0x3ca…3ea at0015 = ╱2a╱*╱ // 0x3df @0x15
0x3ca…3ea at0016 = ╱2a╱*╱ // 0x3e0 @0x16
0x3ca…3ea at0017 = ╱2a╱*╱ // 0x3e1 @0x17
0x3ca…3ea at0018 = ╱2a╱*╱ // 0x3e2 @0x18
0x3ca…3ea at0019 = ╱2a╱*╱ // 0x3e3 @0x19
0x3ca…3ea at001a = ╱2a╱*╱ // 0x3e4 @0x1a
0x3ca…3ea at001b = ╱2a╱*╱ // 0x3e5 @0x1b
0x3ca…3ea at001c = ╱2a╱*╱ // 0x3e6 @0x1c
0x3ca…3ea at001d = ╱2a╱*╱ // 0x3e7 @0x1d
0x3ca…3ea at001e = ╱22╱"╱ // 0x3e8 @0x1e
0x3ca…3ea at001f = EOL // 0x3e9 @0x1f
0x3ca…3ea }
0x3ea…43d 9194 1470 PRINT " LØN NAVN";TAB(37);"LA";TAB(45);"LA";TAB(53);"LA";TAB(61);"LA";
0x3ea…43d LineComalBin {
0x3ea…43d ptr = 0x9194 // 0x3ea @0x0
0x3ea…43d lno = 0x05be // 0x3ec @0x2
0x3ea…43d at0004 = ╱92╱ PRINT ╱ // 0x3ee @0x4
0x3ea…43d at0005 = ╱22╱"╱ // 0x3ef @0x5
0x3ea…43d at0006 = ╱20╱…╱ // 0x3f0 @0x6
0x3ea…43d at0007 = ╱4c╱L╱ // 0x3f1 @0x7
0x3ea…43d at0008 = ╱5c╱Ø╱ // 0x3f2 @0x8
0x3ea…43d at0009 = ╱4e╱N╱ // 0x3f3 @0x9
0x3ea…43d at000a = ╱20╱…╱ // 0x3f4 @0xa
0x3ea…43d at000b = ╱20╱…╱ // 0x3f5 @0xb
0x3ea…43d at000c = ╱4e╱N╱ // 0x3f6 @0xc
0x3ea…43d at000d = ╱41╱A╱ // 0x3f7 @0xd
0x3ea…43d at000e = ╱56╱V╱ // 0x3f8 @0xe
0x3ea…43d at000f = ╱4e╱N╱ // 0x3f9 @0xf
0x3ea…43d at0010 = ╱22╱"╱ // 0x3fa @0x10
0x3ea…43d at0011 = ╱eb╱;╱ // 0x3fb @0x11
0x3ea…43d at0012 = ╱d2╱TAB╱ // 0x3fc @0x12
0x3ea…43d at0013 = ╱ed╱(╱ // 0x3fd @0x13
0x3ea…43d at0014 = ╱33╱3╱ // 0x3fe @0x14
0x3ea…43d at0015 = ╱37╱7╱ // 0x3ff @0x15
0x3ea…43d at0016 = ╱fe00009406╱ // 0x400 @0x16
0x3ea…43d at001b = ╱ee╱)╱ // 0x405 @0x1b
0x3ea…43d at001c = ╱eb╱;╱ // 0x406 @0x1c
0x3ea…43d at001d = ╱22╱"╱ // 0x407 @0x1d
0x3ea…43d at001e = ╱4c╱L╱ // 0x408 @0x1e
0x3ea…43d at001f = ╱41╱A╱ // 0x409 @0x1f
0x3ea…43d at0020 = ╱22╱"╱ // 0x40a @0x20
0x3ea…43d at0021 = ╱eb╱;╱ // 0x40b @0x21
0x3ea…43d at0022 = ╱d2╱TAB╱ // 0x40c @0x22
0x3ea…43d at0023 = ╱ed╱(╱ // 0x40d @0x23
0x3ea…43d at0024 = ╱34╱4╱ // 0x40e @0x24
0x3ea…43d at0025 = ╱35╱5╱ // 0x40f @0x25
0x3ea…43d at0026 = ╱fe0000b406╱ // 0x410 @0x26
0x3ea…43d at002b = ╱ee╱)╱ // 0x415 @0x2b
0x3ea…43d at002c = ╱eb╱;╱ // 0x416 @0x2c
0x3ea…43d at002d = ╱22╱"╱ // 0x417 @0x2d
0x3ea…43d at002e = ╱4c╱L╱ // 0x418 @0x2e
0x3ea…43d at002f = ╱41╱A╱ // 0x419 @0x2f
0x3ea…43d at0030 = ╱22╱"╱ // 0x41a @0x30
0x3ea…43d at0031 = ╱eb╱;╱ // 0x41b @0x31
0x3ea…43d at0032 = ╱d2╱TAB╱ // 0x41c @0x32
0x3ea…43d at0033 = ╱ed╱(╱ // 0x41d @0x33
0x3ea…43d at0034 = ╱35╱5╱ // 0x41e @0x34
0x3ea…43d at0035 = ╱33╱3╱ // 0x41f @0x35
0x3ea…43d at0036 = ╱fe0000d406╱ // 0x420 @0x36
0x3ea…43d at003b = ╱ee╱)╱ // 0x425 @0x3b
0x3ea…43d at003c = ╱eb╱;╱ // 0x426 @0x3c
0x3ea…43d at003d = ╱22╱"╱ // 0x427 @0x3d
0x3ea…43d at003e = ╱4c╱L╱ // 0x428 @0x3e
0x3ea…43d at003f = ╱41╱A╱ // 0x429 @0x3f
0x3ea…43d at0040 = ╱22╱"╱ // 0x42a @0x40
0x3ea…43d at0041 = ╱eb╱;╱ // 0x42b @0x41
0x3ea…43d at0042 = ╱d2╱TAB╱ // 0x42c @0x42
0x3ea…43d at0043 = ╱ed╱(╱ // 0x42d @0x43
0x3ea…43d at0044 = ╱36╱6╱ // 0x42e @0x44
0x3ea…43d at0045 = ╱31╱1╱ // 0x42f @0x45
0x3ea…43d at0046 = ╱fe0000f406╱ // 0x430 @0x46
0x3ea…43d at004b = ╱ee╱)╱ // 0x435 @0x4b
0x3ea…43d at004c = ╱eb╱;╱ // 0x436 @0x4c
0x3ea…43d at004d = ╱22╱"╱ // 0x437 @0x4d
0x3ea…43d at004e = ╱4c╱L╱ // 0x438 @0x4e
0x3ea…43d at004f = ╱41╱A╱ // 0x439 @0x4f
0x3ea…43d at0050 = ╱22╱"╱ // 0x43a @0x50
0x3ea…43d at0051 = ╱eb╱;╱ // 0x43b @0x51
0x3ea…43d at0052 = EOL // 0x43c @0x52
0x3ea…43d }
0x43d…464 91bb 1480 PRINT TAB(69);"LA";TAB(75);"IALT"
0x43d…464 LineComalBin {
0x43d…464 ptr = 0x91bb // 0x43d @0x0
0x43d…464 lno = 0x05c8 // 0x43f @0x2
0x43d…464 at0004 = ╱92╱ PRINT ╱ // 0x441 @0x4
0x43d…464 at0005 = ╱d2╱TAB╱ // 0x442 @0x5
0x43d…464 at0006 = ╱ed╱(╱ // 0x443 @0x6
0x43d…464 at0007 = ╱36╱6╱ // 0x444 @0x7
0x43d…464 at0008 = ╱39╱9╱ // 0x445 @0x8
0x43d…464 at0009 = ╱fe00008a07╱ // 0x446 @0x9
0x43d…464 at000e = ╱ee╱)╱ // 0x44b @0xe
0x43d…464 at000f = ╱eb╱;╱ // 0x44c @0xf
0x43d…464 at0010 = ╱22╱"╱ // 0x44d @0x10
0x43d…464 at0011 = ╱4c╱L╱ // 0x44e @0x11
0x43d…464 at0012 = ╱41╱A╱ // 0x44f @0x12
0x43d…464 at0013 = ╱22╱"╱ // 0x450 @0x13
0x43d…464 at0014 = ╱eb╱;╱ // 0x451 @0x14
0x43d…464 at0015 = ╱d2╱TAB╱ // 0x452 @0x15
0x43d…464 at0016 = ╱ed╱(╱ // 0x453 @0x16
0x43d…464 at0017 = ╱37╱7╱ // 0x454 @0x17
0x43d…464 at0018 = ╱35╱5╱ // 0x455 @0x18
0x43d…464 at0019 = ╱fe00009607╱ // 0x456 @0x19
0x43d…464 at001e = ╱ee╱)╱ // 0x45b @0x1e
0x43d…464 at001f = ╱eb╱;╱ // 0x45c @0x1f
0x43d…464 at0020 = ╱22╱"╱ // 0x45d @0x20
0x43d…464 at0021 = ╱49╱I╱ // 0x45e @0x21
0x43d…464 at0022 = ╱41╱A╱ // 0x45f @0x22
0x43d…464 at0023 = ╱4c╱L╱ // 0x460 @0x23
0x43d…464 at0024 = ╱54╱T╱ // 0x461 @0x24
0x43d…464 at0025 = ╱22╱"╱ // 0x462 @0x25
0x43d…464 at0026 = EOL // 0x463 @0x26
0x43d…464 }
0x464…4bb 9212 1490 PRINT " NR";TAB(37);"60";TAB(45);"61";TAB(53);"62";TAB(61);"63";TAB(69);
0x464…4bb LineComalBin {
0x464…4bb ptr = 0x9212 // 0x464 @0x0
0x464…4bb lno = 0x05d2 // 0x466 @0x2
0x464…4bb at0004 = ╱92╱ PRINT ╱ // 0x468 @0x4
0x464…4bb at0005 = ╱22╱"╱ // 0x469 @0x5
0x464…4bb at0006 = ╱20╱…╱ // 0x46a @0x6
0x464…4bb at0007 = ╱4e╱N╱ // 0x46b @0x7
0x464…4bb at0008 = ╱52╱R╱ // 0x46c @0x8
0x464…4bb at0009 = ╱22╱"╱ // 0x46d @0x9
0x464…4bb at000a = ╱eb╱;╱ // 0x46e @0xa
0x464…4bb at000b = ╱d2╱TAB╱ // 0x46f @0xb
0x464…4bb at000c = ╱ed╱(╱ // 0x470 @0xc
0x464…4bb at000d = ╱33╱3╱ // 0x471 @0xd
0x464…4bb at000e = ╱37╱7╱ // 0x472 @0xe
0x464…4bb at000f = ╱fe00009406╱ // 0x473 @0xf
0x464…4bb at0014 = ╱ee╱)╱ // 0x478 @0x14
0x464…4bb at0015 = ╱eb╱;╱ // 0x479 @0x15
0x464…4bb at0016 = ╱22╱"╱ // 0x47a @0x16
0x464…4bb at0017 = ╱36╱6╱ // 0x47b @0x17
0x464…4bb at0018 = ╱30╱0╱ // 0x47c @0x18
0x464…4bb at0019 = ╱22╱"╱ // 0x47d @0x19
0x464…4bb at001a = ╱eb╱;╱ // 0x47e @0x1a
0x464…4bb at001b = ╱d2╱TAB╱ // 0x47f @0x1b
0x464…4bb at001c = ╱ed╱(╱ // 0x480 @0x1c
0x464…4bb at001d = ╱34╱4╱ // 0x481 @0x1d
0x464…4bb at001e = ╱35╱5╱ // 0x482 @0x1e
0x464…4bb at001f = ╱fe0000b406╱ // 0x483 @0x1f
0x464…4bb at0024 = ╱ee╱)╱ // 0x488 @0x24
0x464…4bb at0025 = ╱eb╱;╱ // 0x489 @0x25
0x464…4bb at0026 = ╱22╱"╱ // 0x48a @0x26
0x464…4bb at0027 = ╱36╱6╱ // 0x48b @0x27
0x464…4bb at0028 = ╱31╱1╱ // 0x48c @0x28
0x464…4bb at0029 = ╱22╱"╱ // 0x48d @0x29
0x464…4bb at002a = ╱eb╱;╱ // 0x48e @0x2a
0x464…4bb at002b = ╱d2╱TAB╱ // 0x48f @0x2b
0x464…4bb at002c = ╱ed╱(╱ // 0x490 @0x2c
0x464…4bb at002d = ╱35╱5╱ // 0x491 @0x2d
0x464…4bb at002e = ╱33╱3╱ // 0x492 @0x2e
0x464…4bb at002f = ╱fe0000d406╱ // 0x493 @0x2f
0x464…4bb at0034 = ╱ee╱)╱ // 0x498 @0x34
0x464…4bb at0035 = ╱eb╱;╱ // 0x499 @0x35
0x464…4bb at0036 = ╱22╱"╱ // 0x49a @0x36
0x464…4bb at0037 = ╱36╱6╱ // 0x49b @0x37
0x464…4bb at0038 = ╱32╱2╱ // 0x49c @0x38
0x464…4bb at0039 = ╱22╱"╱ // 0x49d @0x39
0x464…4bb at003a = ╱eb╱;╱ // 0x49e @0x3a
0x464…4bb at003b = ╱d2╱TAB╱ // 0x49f @0x3b
0x464…4bb at003c = ╱ed╱(╱ // 0x4a0 @0x3c
0x464…4bb at003d = ╱36╱6╱ // 0x4a1 @0x3d
0x464…4bb at003e = ╱31╱1╱ // 0x4a2 @0x3e
0x464…4bb at003f = ╱fe0000f406╱ // 0x4a3 @0x3f
0x464…4bb at0044 = ╱ee╱)╱ // 0x4a8 @0x44
0x464…4bb at0045 = ╱eb╱;╱ // 0x4a9 @0x45
0x464…4bb at0046 = ╱22╱"╱ // 0x4aa @0x46
0x464…4bb at0047 = ╱36╱6╱ // 0x4ab @0x47
0x464…4bb at0048 = ╱33╱3╱ // 0x4ac @0x48
0x464…4bb at0049 = ╱22╱"╱ // 0x4ad @0x49
0x464…4bb at004a = ╱eb╱;╱ // 0x4ae @0x4a
0x464…4bb at004b = ╱d2╱TAB╱ // 0x4af @0x4b
0x464…4bb at004c = ╱ed╱(╱ // 0x4b0 @0x4c
0x464…4bb at004d = ╱36╱6╱ // 0x4b1 @0x4d
0x464…4bb at004e = ╱39╱9╱ // 0x4b2 @0x4e
0x464…4bb at004f = ╱fe00008a07╱ // 0x4b3 @0x4f
0x464…4bb at0054 = ╱ee╱)╱ // 0x4b8 @0x54
0x464…4bb at0055 = ╱eb╱;╱ // 0x4b9 @0x55
0x464…4bb at0056 = EOL // 0x4ba @0x56
0x464…4bb }
0x4bb…4c5 921c 1500 PRINT "64"
0x4bb…4c5 LineComalBin {
0x4bb…4c5 ptr = 0x921c // 0x4bb @0x0
0x4bb…4c5 lno = 0x05dc // 0x4bd @0x2
0x4bb…4c5 at0004 = ╱92╱ PRINT ╱ // 0x4bf @0x4
0x4bb…4c5 at0005 = ╱22╱"╱ // 0x4c0 @0x5
0x4bb…4c5 at0006 = ╱36╱6╱ // 0x4c1 @0x6
0x4bb…4c5 at0007 = ╱34╱4╱ // 0x4c2 @0x7
0x4bb…4c5 at0008 = ╱22╱"╱ // 0x4c3 @0x8
0x4bb…4c5 at0009 = EOL // 0x4c4 @0x9
0x4bb…4c5 }
0x4c5…516 926d 1501 PRINT TAB(37);"65";TAB(45);"66";TAB(53);"67";TAB(61);"68";TAB(69);
0x4c5…516 LineComalBin {
0x4c5…516 ptr = 0x926d // 0x4c5 @0x0
0x4c5…516 lno = 0x05dd // 0x4c7 @0x2
0x4c5…516 at0004 = ╱92╱ PRINT ╱ // 0x4c9 @0x4
0x4c5…516 at0005 = ╱d2╱TAB╱ // 0x4ca @0x5
0x4c5…516 at0006 = ╱ed╱(╱ // 0x4cb @0x6
0x4c5…516 at0007 = ╱33╱3╱ // 0x4cc @0x7
0x4c5…516 at0008 = ╱37╱7╱ // 0x4cd @0x8
0x4c5…516 at0009 = ╱fe00009406╱ // 0x4ce @0x9
0x4c5…516 at000e = ╱ee╱)╱ // 0x4d3 @0xe
0x4c5…516 at000f = ╱eb╱;╱ // 0x4d4 @0xf
0x4c5…516 at0010 = ╱22╱"╱ // 0x4d5 @0x10
0x4c5…516 at0011 = ╱36╱6╱ // 0x4d6 @0x11
0x4c5…516 at0012 = ╱35╱5╱ // 0x4d7 @0x12
0x4c5…516 at0013 = ╱22╱"╱ // 0x4d8 @0x13
0x4c5…516 at0014 = ╱eb╱;╱ // 0x4d9 @0x14
0x4c5…516 at0015 = ╱d2╱TAB╱ // 0x4da @0x15
0x4c5…516 at0016 = ╱ed╱(╱ // 0x4db @0x16
0x4c5…516 at0017 = ╱34╱4╱ // 0x4dc @0x17
0x4c5…516 at0018 = ╱35╱5╱ // 0x4dd @0x18
0x4c5…516 at0019 = ╱fe0000b406╱ // 0x4de @0x19
0x4c5…516 at001e = ╱ee╱)╱ // 0x4e3 @0x1e
0x4c5…516 at001f = ╱eb╱;╱ // 0x4e4 @0x1f
0x4c5…516 at0020 = ╱22╱"╱ // 0x4e5 @0x20
0x4c5…516 at0021 = ╱36╱6╱ // 0x4e6 @0x21
0x4c5…516 at0022 = ╱36╱6╱ // 0x4e7 @0x22
0x4c5…516 at0023 = ╱22╱"╱ // 0x4e8 @0x23
0x4c5…516 at0024 = ╱eb╱;╱ // 0x4e9 @0x24
0x4c5…516 at0025 = ╱d2╱TAB╱ // 0x4ea @0x25
0x4c5…516 at0026 = ╱ed╱(╱ // 0x4eb @0x26
0x4c5…516 at0027 = ╱35╱5╱ // 0x4ec @0x27
0x4c5…516 at0028 = ╱33╱3╱ // 0x4ed @0x28
0x4c5…516 at0029 = ╱fe0000d406╱ // 0x4ee @0x29
0x4c5…516 at002e = ╱ee╱)╱ // 0x4f3 @0x2e
0x4c5…516 at002f = ╱eb╱;╱ // 0x4f4 @0x2f
0x4c5…516 at0030 = ╱22╱"╱ // 0x4f5 @0x30
0x4c5…516 at0031 = ╱36╱6╱ // 0x4f6 @0x31
0x4c5…516 at0032 = ╱37╱7╱ // 0x4f7 @0x32
0x4c5…516 at0033 = ╱22╱"╱ // 0x4f8 @0x33
0x4c5…516 at0034 = ╱eb╱;╱ // 0x4f9 @0x34
0x4c5…516 at0035 = ╱d2╱TAB╱ // 0x4fa @0x35
0x4c5…516 at0036 = ╱ed╱(╱ // 0x4fb @0x36
0x4c5…516 at0037 = ╱36╱6╱ // 0x4fc @0x37
0x4c5…516 at0038 = ╱31╱1╱ // 0x4fd @0x38
0x4c5…516 at0039 = ╱fe0000f406╱ // 0x4fe @0x39
0x4c5…516 at003e = ╱ee╱)╱ // 0x503 @0x3e
0x4c5…516 at003f = ╱eb╱;╱ // 0x504 @0x3f
0x4c5…516 at0040 = ╱22╱"╱ // 0x505 @0x40
0x4c5…516 at0041 = ╱36╱6╱ // 0x506 @0x41
0x4c5…516 at0042 = ╱38╱8╱ // 0x507 @0x42
0x4c5…516 at0043 = ╱22╱"╱ // 0x508 @0x43
0x4c5…516 at0044 = ╱eb╱;╱ // 0x509 @0x44
0x4c5…516 at0045 = ╱d2╱TAB╱ // 0x50a @0x45
0x4c5…516 at0046 = ╱ed╱(╱ // 0x50b @0x46
0x4c5…516 at0047 = ╱36╱6╱ // 0x50c @0x47
0x4c5…516 at0048 = ╱39╱9╱ // 0x50d @0x48
0x4c5…516 at0049 = ╱fe00008a07╱ // 0x50e @0x49
0x4c5…516 at004e = ╱ee╱)╱ // 0x513 @0x4e
0x4c5…516 at004f = ╱eb╱;╱ // 0x514 @0x4f
0x4c5…516 at0050 = EOL // 0x515 @0x50
0x4c5…516 }
0x516…520 9277 1502 PRINT "69"
0x516…520 LineComalBin {
0x516…520 ptr = 0x9277 // 0x516 @0x0
0x516…520 lno = 0x05de // 0x518 @0x2
0x516…520 at0004 = ╱92╱ PRINT ╱ // 0x51a @0x4
0x516…520 at0005 = ╱22╱"╱ // 0x51b @0x5
0x516…520 at0006 = ╱36╱6╱ // 0x51c @0x6
0x516…520 at0007 = ╱39╱9╱ // 0x51d @0x7
0x516…520 at0008 = ╱22╱"╱ // 0x51e @0x8
0x516…520 at0009 = EOL // 0x51f @0x9
0x516…520 }
0x520…526 927d 1510 ENDPROC
0x520…526 LineComalBin {
0x520…526 ptr = 0x927d // 0x520 @0x0
0x520…526 lno = 0x05e6 // 0x522 @0x2
0x520…526 at0004 = ╱9f╱ ENDPROC ╱ // 0x524 @0x4
0x520…526 at0005 = EOL // 0x525 @0x5
0x520…526 }
0x526…53a 9291 1580 PROC FEJL(P1,P2,P3)
0x526…53a LineComalBin {
0x526…53a ptr = 0x9291 // 0x526 @0x0
0x526…53a lno = 0x062c // 0x528 @0x2
0x526…53a at0004 = ╱9e╱ PROC ╱ // 0x52a @0x4
0x526…53a at0005 = ╱46╱F╱ // 0x52b @0x5
0x526…53a at0006 = ╱45╱E╱ // 0x52c @0x6
0x526…53a at0007 = ╱4a╱J╱ // 0x52d @0x7
0x526…53a at0008 = ╱4c╱L╱ // 0x52e @0x8
0x526…53a at0009 = ╱ed╱(╱ // 0x52f @0x9
0x526…53a at000a = ╱50╱P╱ // 0x530 @0xa
0x526…53a at000b = ╱31╱1╱ // 0x531 @0xb
0x526…53a at000c = ╱ec╱,╱ // 0x532 @0xc
0x526…53a at000d = ╱50╱P╱ // 0x533 @0xd
0x526…53a at000e = ╱32╱2╱ // 0x534 @0xe
0x526…53a at000f = ╱ec╱,╱ // 0x535 @0xf
0x526…53a at0010 = ╱50╱P╱ // 0x536 @0x10
0x526…53a at0011 = ╱33╱3╱ // 0x537 @0x11
0x526…53a at0012 = ╱ee╱)╱ // 0x538 @0x12
0x526…53a at0013 = EOL // 0x539 @0x13
0x526…53a }
0x53a…549 92a0 1590 IF STATUS(P3$)<>B THEN
0x53a…549 LineComalBin {
0x53a…549 ptr = 0x92a0 // 0x53a @0x0
0x53a…549 lno = 0x0636 // 0x53c @0x2
0x53a…549 at0004 = ╱9c╱ IF ╱ // 0x53e @0x4
0x53a…549 at0005 = ╱ce╱STATUS╱ // 0x53f @0x5
0x53a…549 at0006 = ╱ed╱(╱ // 0x540 @0x6
0x53a…549 at0007 = ╱50╱P╱ // 0x541 @0x7
0x53a…549 at0008 = ╱33╱3╱ // 0x542 @0x8
0x53a…549 at0009 = ╱ef╱$╱ // 0x543 @0x9
0x53a…549 at000a = ╱ee╱)╱ // 0x544 @0xa
0x53a…549 at000b = ╱e1╱<>╱ // 0x545 @0xb
0x53a…549 at000c = ╱42╱B╱ // 0x546 @0xc
0x53a…549 at000d = ╱b6╱ THEN ╱ // 0x547 @0xd
0x53a…549 at000e = EOL // 0x548 @0xe
0x53a…549 }
0x549…550 92a7 1600 OUTPUT T
0x549…550 LineComalBin {
0x549…550 ptr = 0x92a7 // 0x549 @0x0
0x549…550 lno = 0x0640 // 0x54b @0x2
0x549…550 at0004 = ╱a5╱ OUTPUT ╱ // 0x54d @0x4
0x549…550 at0005 = ╱54╱T╱ // 0x54e @0x5
0x549…550 at0006 = EOL // 0x54f @0x6
0x549…550 }
0x550…572 92c9 1610 PRINT "FIL-FEJL ";P3$;STATUS(P3$),P1;P2
0x550…572 LineComalBin {
0x550…572 ptr = 0x92c9 // 0x550 @0x0
0x550…572 lno = 0x064a // 0x552 @0x2
0x550…572 at0004 = ╱92╱ PRINT ╱ // 0x554 @0x4
0x550…572 at0005 = ╱22╱"╱ // 0x555 @0x5
0x550…572 at0006 = ╱46╱F╱ // 0x556 @0x6
0x550…572 at0007 = ╱49╱I╱ // 0x557 @0x7
0x550…572 at0008 = ╱4c╱L╱ // 0x558 @0x8
0x550…572 at0009 = ╱2d╱-╱ // 0x559 @0x9
0x550…572 at000a = ╱46╱F╱ // 0x55a @0xa
0x550…572 at000b = ╱45╱E╱ // 0x55b @0xb
0x550…572 at000c = ╱4a╱J╱ // 0x55c @0xc
0x550…572 at000d = ╱4c╱L╱ // 0x55d @0xd
0x550…572 at000e = ╱20╱…╱ // 0x55e @0xe
0x550…572 at000f = ╱22╱"╱ // 0x55f @0xf
0x550…572 at0010 = ╱eb╱;╱ // 0x560 @0x10
0x550…572 at0011 = ╱50╱P╱ // 0x561 @0x11
0x550…572 at0012 = ╱33╱3╱ // 0x562 @0x12
0x550…572 at0013 = ╱ef╱$╱ // 0x563 @0x13
0x550…572 at0014 = ╱eb╱;╱ // 0x564 @0x14
0x550…572 at0015 = ╱ce╱STATUS╱ // 0x565 @0x15
0x550…572 at0016 = ╱ed╱(╱ // 0x566 @0x16
0x550…572 at0017 = ╱50╱P╱ // 0x567 @0x17
0x550…572 at0018 = ╱33╱3╱ // 0x568 @0x18
0x550…572 at0019 = ╱ef╱$╱ // 0x569 @0x19
0x550…572 at001a = ╱ee╱)╱ // 0x56a @0x1a
0x550…572 at001b = ╱ec╱,╱ // 0x56b @0x1b
0x550…572 at001c = ╱50╱P╱ // 0x56c @0x1c
0x550…572 at001d = ╱31╱1╱ // 0x56d @0x1d
0x550…572 at001e = ╱eb╱;╱ // 0x56e @0x1e
0x550…572 at001f = ╱50╱P╱ // 0x56f @0x1f
0x550…572 at0020 = ╱32╱2╱ // 0x570 @0x20
0x550…572 at0021 = EOL // 0x571 @0x21
0x550…572 }
0x572…578 92cf 1620 STOP
0x572…578 LineComalBin {
0x572…578 ptr = 0x92cf // 0x572 @0x0
0x572…578 lno = 0x0654 // 0x574 @0x2
0x572…578 at0004 = ╱8d╱ STOP ╱ // 0x576 @0x4
0x572…578 at0005 = EOL // 0x577 @0x5
0x572…578 }
0x578…57e 92d5 1630 ENDIF
0x578…57e LineComalBin {
0x578…57e ptr = 0x92d5 // 0x578 @0x0
0x578…57e lno = 0x065e // 0x57a @0x2
0x578…57e at0004 = ╱9b╱ ENDIF ╱ // 0x57c @0x4
0x578…57e at0005 = EOL // 0x57d @0x5
0x578…57e }
0x57e…584 92db 1640 ENDPROC
0x57e…584 LineComalBin {
0x57e…584 ptr = 0x92db // 0x57e @0x0
0x57e…584 lno = 0x0668 // 0x580 @0x2
0x57e…584 at0004 = ╱9f╱ ENDPROC ╱ // 0x582 @0x4
0x57e…584 at0005 = EOL // 0x583 @0x5
0x57e…584 }
0x584…5a0 92f7 1650 FIL$="P641220:VIRKKART"
0x584…5a0 LineComalBin {
0x584…5a0 ptr = 0x92f7 // 0x584 @0x0
0x584…5a0 lno = 0x0672 // 0x586 @0x2
0x584…5a0 at0004 = ╱46╱F╱ // 0x588 @0x4
0x584…5a0 at0005 = ╱49╱I╱ // 0x589 @0x5
0x584…5a0 at0006 = ╱4c╱L╱ // 0x58a @0x6
0x584…5a0 at0007 = ╱ef╱$╱ // 0x58b @0x7
0x584…5a0 at0008 = ╱dc╱=╱ // 0x58c @0x8
0x584…5a0 at0009 = ╱22╱"╱ // 0x58d @0x9
0x584…5a0 at000a = ╱50╱P╱ // 0x58e @0xa
0x584…5a0 at000b = ╱36╱6╱ // 0x58f @0xb
0x584…5a0 at000c = ╱34╱4╱ // 0x590 @0xc
0x584…5a0 at000d = ╱31╱1╱ // 0x591 @0xd
0x584…5a0 at000e = ╱32╱2╱ // 0x592 @0xe
0x584…5a0 at000f = ╱32╱2╱ // 0x593 @0xf
0x584…5a0 at0010 = ╱30╱0╱ // 0x594 @0x10
0x584…5a0 at0011 = ╱3a╱:╱ // 0x595 @0x11
0x584…5a0 at0012 = ╱56╱V╱ // 0x596 @0x12
0x584…5a0 at0013 = ╱49╱I╱ // 0x597 @0x13
0x584…5a0 at0014 = ╱52╱R╱ // 0x598 @0x14
0x584…5a0 at0015 = ╱4b╱K╱ // 0x599 @0x15
0x584…5a0 at0016 = ╱4b╱K╱ // 0x59a @0x16
0x584…5a0 at0017 = ╱41╱A╱ // 0x59b @0x17
0x584…5a0 at0018 = ╱52╱R╱ // 0x59c @0x18
0x584…5a0 at0019 = ╱54╱T╱ // 0x59d @0x19
0x584…5a0 at001a = ╱22╱"╱ // 0x59e @0x1a
0x584…5a0 at001b = EOL // 0x59f @0x1b
0x584…5a0 }
0x5a0…5ad 9304 1660 EXEC INDVIRK
0x5a0…5ad LineComalBin {
0x5a0…5ad ptr = 0x9304 // 0x5a0 @0x0
0x5a0…5ad lno = 0x067c // 0x5a2 @0x2
0x5a0…5ad at0004 = ╱9d╱ EXEC ╱ // 0x5a4 @0x4
0x5a0…5ad at0005 = ╱49╱I╱ // 0x5a5 @0x5
0x5a0…5ad at0006 = ╱4e╱N╱ // 0x5a6 @0x6
0x5a0…5ad at0007 = ╱44╱D╱ // 0x5a7 @0x7
0x5a0…5ad at0008 = ╱56╱V╱ // 0x5a8 @0x8
0x5a0…5ad at0009 = ╱49╱I╱ // 0x5a9 @0x9
0x5a0…5ad at000a = ╱52╱R╱ // 0x5aa @0xa
0x5a0…5ad at000b = ╱4b╱K╱ // 0x5ab @0xb
0x5a0…5ad at000c = EOL // 0x5ac @0xc
0x5a0…5ad }
0x5ad…5ca 9321 1675 FIL1$="P641220:LØNMODRG"
0x5ad…5ca LineComalBin {
0x5ad…5ca ptr = 0x9321 // 0x5ad @0x0
0x5ad…5ca lno = 0x068b // 0x5af @0x2
0x5ad…5ca at0004 = ╱46╱F╱ // 0x5b1 @0x4
0x5ad…5ca at0005 = ╱49╱I╱ // 0x5b2 @0x5
0x5ad…5ca at0006 = ╱4c╱L╱ // 0x5b3 @0x6
0x5ad…5ca at0007 = ╱31╱1╱ // 0x5b4 @0x7
0x5ad…5ca at0008 = ╱ef╱$╱ // 0x5b5 @0x8
0x5ad…5ca at0009 = ╱dc╱=╱ // 0x5b6 @0x9
0x5ad…5ca at000a = ╱22╱"╱ // 0x5b7 @0xa
0x5ad…5ca at000b = ╱50╱P╱ // 0x5b8 @0xb
0x5ad…5ca at000c = ╱36╱6╱ // 0x5b9 @0xc
0x5ad…5ca at000d = ╱34╱4╱ // 0x5ba @0xd
0x5ad…5ca at000e = ╱31╱1╱ // 0x5bb @0xe
0x5ad…5ca at000f = ╱32╱2╱ // 0x5bc @0xf
0x5ad…5ca at0010 = ╱32╱2╱ // 0x5bd @0x10
0x5ad…5ca at0011 = ╱30╱0╱ // 0x5be @0x11
0x5ad…5ca at0012 = ╱3a╱:╱ // 0x5bf @0x12
0x5ad…5ca at0013 = ╱4c╱L╱ // 0x5c0 @0x13
0x5ad…5ca at0014 = ╱5c╱Ø╱ // 0x5c1 @0x14
0x5ad…5ca at0015 = ╱4e╱N╱ // 0x5c2 @0x15
0x5ad…5ca at0016 = ╱4d╱M╱ // 0x5c3 @0x16
0x5ad…5ca at0017 = ╱4f╱O╱ // 0x5c4 @0x17
0x5ad…5ca at0018 = ╱44╱D╱ // 0x5c5 @0x18
0x5ad…5ca at0019 = ╱52╱R╱ // 0x5c6 @0x19
0x5ad…5ca at001a = ╱47╱G╱ // 0x5c7 @0x1a
0x5ad…5ca at001b = ╱22╱"╱ // 0x5c8 @0x1b
0x5ad…5ca at001c = EOL // 0x5c9 @0x1c
0x5ad…5ca }
0x5ca…5d7 932e 1680 OPEN FIL1$,R
0x5ca…5d7 LineComalBin {
0x5ca…5d7 ptr = 0x932e // 0x5ca @0x0
0x5ca…5d7 lno = 0x0690 // 0x5cc @0x2
0x5ca…5d7 at0004 = ╱a7╱ OPEN ╱ // 0x5ce @0x4
0x5ca…5d7 at0005 = ╱46╱F╱ // 0x5cf @0x5
0x5ca…5d7 at0006 = ╱49╱I╱ // 0x5d0 @0x6
0x5ca…5d7 at0007 = ╱4c╱L╱ // 0x5d1 @0x7
0x5ca…5d7 at0008 = ╱31╱1╱ // 0x5d2 @0x8
0x5ca…5d7 at0009 = ╱ef╱$╱ // 0x5d3 @0x9
0x5ca…5d7 at000a = ╱ec╱,╱ // 0x5d4 @0xa
0x5ca…5d7 at000b = ╱52╱R╱ // 0x5d5 @0xb
0x5ca…5d7 at000c = EOL // 0x5d6 @0xc
0x5ca…5d7 }
0x5d7…5f2 9349 1710 MF4$="P641210:FRADRAG"
0x5d7…5f2 LineComalBin {
0x5d7…5f2 ptr = 0x9349 // 0x5d7 @0x0
0x5d7…5f2 lno = 0x06ae // 0x5d9 @0x2
0x5d7…5f2 at0004 = ╱4d╱M╱ // 0x5db @0x4
0x5d7…5f2 at0005 = ╱46╱F╱ // 0x5dc @0x5
0x5d7…5f2 at0006 = ╱34╱4╱ // 0x5dd @0x6
0x5d7…5f2 at0007 = ╱ef╱$╱ // 0x5de @0x7
0x5d7…5f2 at0008 = ╱dc╱=╱ // 0x5df @0x8
0x5d7…5f2 at0009 = ╱22╱"╱ // 0x5e0 @0x9
0x5d7…5f2 at000a = ╱50╱P╱ // 0x5e1 @0xa
0x5d7…5f2 at000b = ╱36╱6╱ // 0x5e2 @0xb
0x5d7…5f2 at000c = ╱34╱4╱ // 0x5e3 @0xc
0x5d7…5f2 at000d = ╱31╱1╱ // 0x5e4 @0xd
0x5d7…5f2 at000e = ╱32╱2╱ // 0x5e5 @0xe
0x5d7…5f2 at000f = ╱31╱1╱ // 0x5e6 @0xf
0x5d7…5f2 at0010 = ╱30╱0╱ // 0x5e7 @0x10
0x5d7…5f2 at0011 = ╱3a╱:╱ // 0x5e8 @0x11
0x5d7…5f2 at0012 = ╱46╱F╱ // 0x5e9 @0x12
0x5d7…5f2 at0013 = ╱52╱R╱ // 0x5ea @0x13
0x5d7…5f2 at0014 = ╱41╱A╱ // 0x5eb @0x14
0x5d7…5f2 at0015 = ╱44╱D╱ // 0x5ec @0x15
0x5d7…5f2 at0016 = ╱52╱R╱ // 0x5ed @0x16
0x5d7…5f2 at0017 = ╱41╱A╱ // 0x5ee @0x17
0x5d7…5f2 at0018 = ╱47╱G╱ // 0x5ef @0x18
0x5d7…5f2 at0019 = ╱22╱"╱ // 0x5f0 @0x19
0x5d7…5f2 at001a = EOL // 0x5f1 @0x1a
0x5d7…5f2 }
0x5f2…5fe 9355 1720 OPEN MF4$,R
0x5f2…5fe LineComalBin {
0x5f2…5fe ptr = 0x9355 // 0x5f2 @0x0
0x5f2…5fe lno = 0x06b8 // 0x5f4 @0x2
0x5f2…5fe at0004 = ╱a7╱ OPEN ╱ // 0x5f6 @0x4
0x5f2…5fe at0005 = ╱4d╱M╱ // 0x5f7 @0x5
0x5f2…5fe at0006 = ╱46╱F╱ // 0x5f8 @0x6
0x5f2…5fe at0007 = ╱34╱4╱ // 0x5f9 @0x7
0x5f2…5fe at0008 = ╱ef╱$╱ // 0x5fa @0x8
0x5f2…5fe at0009 = ╱ec╱,╱ // 0x5fb @0x9
0x5f2…5fe at000a = ╱52╱R╱ // 0x5fc @0xa
0x5f2…5fe at000b = EOL // 0x5fd @0xb
0x5f2…5fe }
0x5fe…611 9368 1730 MAXLIN=72
0x5fe…611 LineComalBin {
0x5fe…611 ptr = 0x9368 // 0x5fe @0x0
0x5fe…611 lno = 0x06c2 // 0x600 @0x2
0x5fe…611 at0004 = ╱4d╱M╱ // 0x602 @0x4
0x5fe…611 at0005 = ╱41╱A╱ // 0x603 @0x5
0x5fe…611 at0006 = ╱58╱X╱ // 0x604 @0x6
0x5fe…611 at0007 = ╱4c╱L╱ // 0x605 @0x7
0x5fe…611 at0008 = ╱49╱I╱ // 0x606 @0x8
0x5fe…611 at0009 = ╱4e╱N╱ // 0x607 @0x9
0x5fe…611 at000a = ╱dc╱=╱ // 0x608 @0xa
0x5fe…611 at000b = ╱37╱7╱ // 0x609 @0xb
0x5fe…611 at000c = ╱32╱2╱ // 0x60a @0xc
0x5fe…611 at000d = ╱fe00009007╱ // 0x60b @0xd
0x5fe…611 at0012 = EOL // 0x610 @0x12
0x5fe…611 }
0x611…61c 9373 1740 SIDE=B
0x611…61c LineComalBin {
0x611…61c ptr = 0x9373 // 0x611 @0x0
0x611…61c lno = 0x06cc // 0x613 @0x2
0x611…61c at0004 = ╱53╱S╱ // 0x615 @0x4
0x611…61c at0005 = ╱49╱I╱ // 0x616 @0x5
0x611…61c at0006 = ╱44╱D╱ // 0x617 @0x6
0x611…61c at0007 = ╱45╱E╱ // 0x618 @0x7
0x611…61c at0008 = ╱dc╱=╱ // 0x619 @0x8
0x611…61c at0009 = ╱42╱B╱ // 0x61a @0x9
0x611…61c at000a = EOL // 0x61b @0xa
0x611…61c }
0x61c…639 9390 1750 GET MF4$:STARTPER$,SLUTPER$
0x61c…639 LineComalBin {
0x61c…639 ptr = 0x9390 // 0x61c @0x0
0x61c…639 lno = 0x06d6 // 0x61e @0x2
0x61c…639 at0004 = ╱a9╱ GET ╱ // 0x620 @0x4
0x61c…639 at0005 = ╱4d╱M╱ // 0x621 @0x5
0x61c…639 at0006 = ╱46╱F╱ // 0x622 @0x6
0x61c…639 at0007 = ╱34╱4╱ // 0x623 @0x7
0x61c…639 at0008 = ╱ef╱$╱ // 0x624 @0x8
0x61c…639 at0009 = ╱f0╱:╱ // 0x625 @0x9
0x61c…639 at000a = ╱53╱S╱ // 0x626 @0xa
0x61c…639 at000b = ╱54╱T╱ // 0x627 @0xb
0x61c…639 at000c = ╱41╱A╱ // 0x628 @0xc
0x61c…639 at000d = ╱52╱R╱ // 0x629 @0xd
0x61c…639 at000e = ╱54╱T╱ // 0x62a @0xe
0x61c…639 at000f = ╱50╱P╱ // 0x62b @0xf
0x61c…639 at0010 = ╱45╱E╱ // 0x62c @0x10
0x61c…639 at0011 = ╱52╱R╱ // 0x62d @0x11
0x61c…639 at0012 = ╱ef╱$╱ // 0x62e @0x12
0x61c…639 at0013 = ╱ec╱,╱ // 0x62f @0x13
0x61c…639 at0014 = ╱53╱S╱ // 0x630 @0x14
0x61c…639 at0015 = ╱4c╱L╱ // 0x631 @0x15
0x61c…639 at0016 = ╱55╱U╱ // 0x632 @0x16
0x61c…639 at0017 = ╱54╱T╱ // 0x633 @0x17
0x61c…639 at0018 = ╱50╱P╱ // 0x634 @0x18
0x61c…639 at0019 = ╱45╱E╱ // 0x635 @0x19
0x61c…639 at001a = ╱52╱R╱ // 0x636 @0x1a
0x61c…639 at001b = ╱ef╱$╱ // 0x637 @0x1b
0x61c…639 at001c = EOL // 0x638 @0x1c
0x61c…639 }
0x639…640 9397 1760 OUTPUT P
0x639…640 LineComalBin {
0x639…640 ptr = 0x9397 // 0x639 @0x0
0x639…640 lno = 0x06e0 // 0x63b @0x2
0x639…640 at0004 = ╱a5╱ OUTPUT ╱ // 0x63d @0x4
0x639…640 at0005 = ╱50╱P╱ // 0x63e @0x5
0x639…640 at0006 = EOL // 0x63f @0x6
0x639…640 }
0x640…650 93a7 1770 FOR I=E TO 7
0x640…650 LineComalBin {
0x640…650 ptr = 0x93a7 // 0x640 @0x0
0x640…650 lno = 0x06ea // 0x642 @0x2
0x640…650 at0004 = ╱83╱ FOR ╱ // 0x644 @0x4
0x640…650 at0005 = ╱49╱I╱ // 0x645 @0x5
0x640…650 at0006 = ╱dc╱=╱ // 0x646 @0x6
0x640…650 at0007 = ╱45╱E╱ // 0x647 @0x7
0x640…650 at0008 = ╱b7╱ TO ╱ // 0x648 @0x8
0x640…650 at0009 = ╱37╱7╱ // 0x649 @0x9
0x640…650 at000a = ╱fe0000e003╱ // 0x64a @0xa
0x640…650 at000f = EOL // 0x64f @0xf
0x640…650 }
0x650…663 93ba 1780 TOTAL$(I)=TAH$
0x650…663 LineComalBin {
0x650…663 ptr = 0x93ba // 0x650 @0x0
0x650…663 lno = 0x06f4 // 0x652 @0x2
0x650…663 at0004 = ╱54╱T╱ // 0x654 @0x4
0x650…663 at0005 = ╱4f╱O╱ // 0x655 @0x5
0x650…663 at0006 = ╱54╱T╱ // 0x656 @0x6
0x650…663 at0007 = ╱41╱A╱ // 0x657 @0x7
0x650…663 at0008 = ╱4c╱L╱ // 0x658 @0x8
0x650…663 at0009 = ╱ef╱$╱ // 0x659 @0x9
0x650…663 at000a = ╱ed╱(╱ // 0x65a @0xa
0x650…663 at000b = ╱49╱I╱ // 0x65b @0xb
0x650…663 at000c = ╱ee╱)╱ // 0x65c @0xc
0x650…663 at000d = ╱dc╱=╱ // 0x65d @0xd
0x650…663 at000e = ╱54╱T╱ // 0x65e @0xe
0x650…663 at000f = ╱41╱A╱ // 0x65f @0xf
0x650…663 at0010 = ╱48╱H╱ // 0x660 @0x10
0x650…663 at0011 = ╱ef╱$╱ // 0x661 @0x11
0x650…663 at0012 = EOL // 0x662 @0x12
0x650…663 }
0x663…66a 93c1 1790 NEXT I
0x663…66a LineComalBin {
0x663…66a ptr = 0x93c1 // 0x663 @0x0
0x663…66a lno = 0x06fe // 0x665 @0x2
0x663…66a at0004 = ╱84╱ NEXT ╱ // 0x667 @0x4
0x663…66a at0005 = ╱49╱I╱ // 0x668 @0x5
0x663…66a at0006 = EOL // 0x669 @0x6
0x663…66a }
0x66a…67a 93d1 1800 EXEC SKRIVHOVED
0x66a…67a LineComalBin {
0x66a…67a ptr = 0x93d1 // 0x66a @0x0
0x66a…67a lno = 0x0708 // 0x66c @0x2
0x66a…67a at0004 = ╱9d╱ EXEC ╱ // 0x66e @0x4
0x66a…67a at0005 = ╱53╱S╱ // 0x66f @0x5
0x66a…67a at0006 = ╱4b╱K╱ // 0x670 @0x6
0x66a…67a at0007 = ╱52╱R╱ // 0x671 @0x7
0x66a…67a at0008 = ╱49╱I╱ // 0x672 @0x8
0x66a…67a at0009 = ╱56╱V╱ // 0x673 @0x9
0x66a…67a at000a = ╱48╱H╱ // 0x674 @0xa
0x66a…67a at000b = ╱4f╱O╱ // 0x675 @0xb
0x66a…67a at000c = ╱56╱V╱ // 0x676 @0xc
0x66a…67a at000d = ╱45╱E╱ // 0x677 @0xd
0x66a…67a at000e = ╱44╱D╱ // 0x678 @0xe
0x66a…67a at000f = EOL // 0x679 @0xf
0x66a…67a }
0x67a…68f 93e6 1810 GET MF4$:LMNR,MF41$
0x67a…68f LineComalBin {
0x67a…68f ptr = 0x93e6 // 0x67a @0x0
0x67a…68f lno = 0x0712 // 0x67c @0x2
0x67a…68f at0004 = ╱a9╱ GET ╱ // 0x67e @0x4
0x67a…68f at0005 = ╱4d╱M╱ // 0x67f @0x5
0x67a…68f at0006 = ╱46╱F╱ // 0x680 @0x6
0x67a…68f at0007 = ╱34╱4╱ // 0x681 @0x7
0x67a…68f at0008 = ╱ef╱$╱ // 0x682 @0x8
0x67a…68f at0009 = ╱f0╱:╱ // 0x683 @0x9
0x67a…68f at000a = ╱4c╱L╱ // 0x684 @0xa
0x67a…68f at000b = ╱4d╱M╱ // 0x685 @0xb
0x67a…68f at000c = ╱4e╱N╱ // 0x686 @0xc
0x67a…68f at000d = ╱52╱R╱ // 0x687 @0xd
0x67a…68f at000e = ╱ec╱,╱ // 0x688 @0xe
0x67a…68f at000f = ╱4d╱M╱ // 0x689 @0xf
0x67a…68f at0010 = ╱46╱F╱ // 0x68a @0x10
0x67a…68f at0011 = ╱34╱4╱ // 0x68b @0x11
0x67a…68f at0012 = ╱31╱1╱ // 0x68c @0x12
0x67a…68f at0013 = ╱ef╱$╱ // 0x68d @0x13
0x67a…68f at0014 = EOL // 0x68e @0x14
0x67a…68f }
0x68f…69e 93f5 1820 WHILE STATUS(MF4$)=B
0x68f…69e LineComalBin {
0x68f…69e ptr = 0x93f5 // 0x68f @0x0
0x68f…69e lno = 0x071c // 0x691 @0x2
0x68f…69e at0004 = ╱93╱ WHILE ╱ // 0x693 @0x4
0x68f…69e at0005 = ╱ce╱STATUS╱ // 0x694 @0x5
0x68f…69e at0006 = ╱ed╱(╱ // 0x695 @0x6
0x68f…69e at0007 = ╱4d╱M╱ // 0x696 @0x7
0x68f…69e at0008 = ╱46╱F╱ // 0x697 @0x8
0x68f…69e at0009 = ╱34╱4╱ // 0x698 @0x9
0x68f…69e at000a = ╱ef╱$╱ // 0x699 @0xa
0x68f…69e at000b = ╱ee╱)╱ // 0x69a @0xb
0x68f…69e at000c = ╱dc╱=╱ // 0x69b @0xc
0x68f…69e at000d = ╱42╱B╱ // 0x69c @0xd
0x68f…69e at000e = EOL // 0x69d @0xe
0x68f…69e }
0x69e…6b3 (22,) 940a 1822 GET MF4$:LMNR,MF42$
0x69e…6b3 LineComalBin {
0x69e…6b3 ptr = 0x940a // 0x69e @0x0
0x69e…6b3 lno = 0x071e // 0x6a0 @0x2
0x69e…6b3 at0004 = ╱a9╱ GET ╱ // 0x6a2 @0x4
0x69e…6b3 at0005 = ╱4d╱M╱ // 0x6a3 @0x5
0x69e…6b3 at0006 = ╱46╱F╱ // 0x6a4 @0x6
0x69e…6b3 at0007 = ╱34╱4╱ // 0x6a5 @0x7
0x69e…6b3 at0008 = ╱ef╱$╱ // 0x6a6 @0x8
0x69e…6b3 at0009 = ╱f0╱:╱ // 0x6a7 @0x9
0x69e…6b3 at000a = ╱4c╱L╱ // 0x6a8 @0xa
0x69e…6b3 at000b = ╱4d╱M╱ // 0x6a9 @0xb
0x69e…6b3 at000c = ╱4e╱N╱ // 0x6aa @0xc
0x69e…6b3 at000d = ╱52╱R╱ // 0x6ab @0xd
0x69e…6b3 at000e = ╱ec╱,╱ // 0x6ac @0xe
0x69e…6b3 at000f = ╱4d╱M╱ // 0x6ad @0xf
0x69e…6b3 at0010 = ╱46╱F╱ // 0x6ae @0x10
0x69e…6b3 at0011 = ╱34╱4╱ // 0x6af @0x11
0x69e…6b3 at0012 = ╱32╱2╱ // 0x6b0 @0x12
0x69e…6b3 at0013 = ╱ef╱$╱ // 0x6b1 @0x13
0x69e…6b3 at0014 = EOL // 0x6b2 @0x14
0x69e…6b3 }
0x6b3…6c7 941e 1825 EXEC INLØNMOD(LMNR)
0x6b3…6c7 LineComalBin {
0x6b3…6c7 ptr = 0x941e // 0x6b3 @0x0
0x6b3…6c7 lno = 0x0721 // 0x6b5 @0x2
0x6b3…6c7 at0004 = ╱9d╱ EXEC ╱ // 0x6b7 @0x4
0x6b3…6c7 at0005 = ╱49╱I╱ // 0x6b8 @0x5
0x6b3…6c7 at0006 = ╱4e╱N╱ // 0x6b9 @0x6
0x6b3…6c7 at0007 = ╱4c╱L╱ // 0x6ba @0x7
0x6b3…6c7 at0008 = ╱5c╱Ø╱ // 0x6bb @0x8
0x6b3…6c7 at0009 = ╱4e╱N╱ // 0x6bc @0x9
0x6b3…6c7 at000a = ╱4d╱M╱ // 0x6bd @0xa
0x6b3…6c7 at000b = ╱4f╱O╱ // 0x6be @0xb
0x6b3…6c7 at000c = ╱44╱D╱ // 0x6bf @0xc
0x6b3…6c7 at000d = ╱ed╱(╱ // 0x6c0 @0xd
0x6b3…6c7 at000e = ╱4c╱L╱ // 0x6c1 @0xe
0x6b3…6c7 at000f = ╱4d╱M╱ // 0x6c2 @0xf
0x6b3…6c7 at0010 = ╱4e╱N╱ // 0x6c3 @0x10
0x6b3…6c7 at0011 = ╱52╱R╱ // 0x6c4 @0x11
0x6b3…6c7 at0012 = ╱ee╱)╱ // 0x6c5 @0x12
0x6b3…6c7 at0013 = EOL // 0x6c6 @0x13
0x6b3…6c7 }
0x6c7…6dc 9433 1840 IF LINIE>MAXLIN-W THEN
0x6c7…6dc LineComalBin {
0x6c7…6dc ptr = 0x9433 // 0x6c7 @0x0
0x6c7…6dc lno = 0x0730 // 0x6c9 @0x2
0x6c7…6dc at0004 = ╱9c╱ IF ╱ // 0x6cb @0x4
0x6c7…6dc at0005 = ╱4c╱L╱ // 0x6cc @0x5
0x6c7…6dc at0006 = ╱49╱I╱ // 0x6cd @0x6
0x6c7…6dc at0007 = ╱4e╱N╱ // 0x6ce @0x7
0x6c7…6dc at0008 = ╱49╱I╱ // 0x6cf @0x8
0x6c7…6dc at0009 = ╱45╱E╱ // 0x6d0 @0x9
0x6c7…6dc at000a = ╱de╱>╱ // 0x6d1 @0xa
0x6c7…6dc at000b = ╱4d╱M╱ // 0x6d2 @0xb
0x6c7…6dc at000c = ╱41╱A╱ // 0x6d3 @0xc
0x6c7…6dc at000d = ╱58╱X╱ // 0x6d4 @0xd
0x6c7…6dc at000e = ╱4c╱L╱ // 0x6d5 @0xe
0x6c7…6dc at000f = ╱49╱I╱ // 0x6d6 @0xf
0x6c7…6dc at0010 = ╱4e╱N╱ // 0x6d7 @0x10
0x6c7…6dc at0011 = ╱e3╱-╱ // 0x6d8 @0x11
0x6c7…6dc at0012 = ╱57╱W╱ // 0x6d9 @0x12
0x6c7…6dc at0013 = ╱b6╱ THEN ╱ // 0x6da @0x13
0x6c7…6dc at0014 = EOL // 0x6db @0x14
0x6c7…6dc }
0x6dc…6ee 9445 1850 WHILE LINIE<MAXLIN
0x6dc…6ee LineComalBin {
0x6dc…6ee ptr = 0x9445 // 0x6dc @0x0
0x6dc…6ee lno = 0x073a // 0x6de @0x2
0x6dc…6ee at0004 = ╱93╱ WHILE ╱ // 0x6e0 @0x4
0x6dc…6ee at0005 = ╱4c╱L╱ // 0x6e1 @0x5
0x6dc…6ee at0006 = ╱49╱I╱ // 0x6e2 @0x6
0x6dc…6ee at0007 = ╱4e╱N╱ // 0x6e3 @0x7
0x6dc…6ee at0008 = ╱49╱I╱ // 0x6e4 @0x8
0x6dc…6ee at0009 = ╱45╱E╱ // 0x6e5 @0x9
0x6dc…6ee at000a = ╱dd╱<╱ // 0x6e6 @0xa
0x6dc…6ee at000b = ╱4d╱M╱ // 0x6e7 @0xb
0x6dc…6ee at000c = ╱41╱A╱ // 0x6e8 @0xc
0x6dc…6ee at000d = ╱58╱X╱ // 0x6e9 @0xd
0x6dc…6ee at000e = ╱4c╱L╱ // 0x6ea @0xe
0x6dc…6ee at000f = ╱49╱I╱ // 0x6eb @0xf
0x6dc…6ee at0010 = ╱4e╱N╱ // 0x6ec @0x10
0x6dc…6ee at0011 = EOL // 0x6ed @0x11
0x6dc…6ee }
0x6ee…6f4 944b 1860 PRINT
0x6ee…6f4 LineComalBin {
0x6ee…6f4 ptr = 0x944b // 0x6ee @0x0
0x6ee…6f4 lno = 0x0744 // 0x6f0 @0x2
0x6ee…6f4 at0004 = ╱92╱ PRINT ╱ // 0x6f2 @0x4
0x6ee…6f4 at0005 = EOL // 0x6f3 @0x5
0x6ee…6f4 }
0x6f4…706 945d 1870 LINIE=LINIE+E
0x6f4…706 LineComalBin {
0x6f4…706 ptr = 0x945d // 0x6f4 @0x0
0x6f4…706 lno = 0x074e // 0x6f6 @0x2
0x6f4…706 at0004 = ╱4c╱L╱ // 0x6f8 @0x4
0x6f4…706 at0005 = ╱49╱I╱ // 0x6f9 @0x5
0x6f4…706 at0006 = ╱4e╱N╱ // 0x6fa @0x6
0x6f4…706 at0007 = ╱49╱I╱ // 0x6fb @0x7
0x6f4…706 at0008 = ╱45╱E╱ // 0x6fc @0x8
0x6f4…706 at0009 = ╱dc╱=╱ // 0x6fd @0x9
0x6f4…706 at000a = ╱4c╱L╱ // 0x6fe @0xa
0x6f4…706 at000b = ╱49╱I╱ // 0x6ff @0xb
0x6f4…706 at000c = ╱4e╱N╱ // 0x700 @0xc
0x6f4…706 at000d = ╱49╱I╱ // 0x701 @0xd
0x6f4…706 at000e = ╱45╱E╱ // 0x702 @0xe
0x6f4…706 at000f = ╱e2╱+╱ // 0x703 @0xf
0x6f4…706 at0010 = ╱45╱E╱ // 0x704 @0x10
0x6f4…706 at0011 = EOL // 0x705 @0x11
0x6f4…706 }
0x706…70c 9463 1880 ENDWHILE
0x706…70c LineComalBin {
0x706…70c ptr = 0x9463 // 0x706 @0x0
0x706…70c lno = 0x0758 // 0x708 @0x2
0x706…70c at0004 = ╱94╱ ENDWHILE ╱ // 0x70a @0x4
0x706…70c at0005 = EOL // 0x70b @0x5
0x706…70c }
0x70c…71c 9473 1890 EXEC SKRIVHOVED
0x70c…71c LineComalBin {
0x70c…71c ptr = 0x9473 // 0x70c @0x0
0x70c…71c lno = 0x0762 // 0x70e @0x2
0x70c…71c at0004 = ╱9d╱ EXEC ╱ // 0x710 @0x4
0x70c…71c at0005 = ╱53╱S╱ // 0x711 @0x5
0x70c…71c at0006 = ╱4b╱K╱ // 0x712 @0x6
0x70c…71c at0007 = ╱52╱R╱ // 0x713 @0x7
0x70c…71c at0008 = ╱49╱I╱ // 0x714 @0x8
0x70c…71c at0009 = ╱56╱V╱ // 0x715 @0x9
0x70c…71c at000a = ╱48╱H╱ // 0x716 @0xa
0x70c…71c at000b = ╱4f╱O╱ // 0x717 @0xb
0x70c…71c at000c = ╱56╱V╱ // 0x718 @0xc
0x70c…71c at000d = ╱45╱E╱ // 0x719 @0xd
0x70c…71c at000e = ╱44╱D╱ // 0x71a @0xe
0x70c…71c at000f = EOL // 0x71b @0xf
0x70c…71c }
0x71c…722 9479 1910 ENDIF
0x71c…722 LineComalBin {
0x71c…722 ptr = 0x9479 // 0x71c @0x0
0x71c…722 lno = 0x0776 // 0x71e @0x2
0x71c…722 at0004 = ╱9b╱ ENDIF ╱ // 0x720 @0x4
0x71c…722 at0005 = EOL // 0x721 @0x5
0x71c…722 }
0x722…739 9490 1915 LINIE=LINIE+5
0x722…739 LineComalBin {
0x722…739 ptr = 0x9490 // 0x722 @0x0
0x722…739 lno = 0x077b // 0x724 @0x2
0x722…739 at0004 = ╱4c╱L╱ // 0x726 @0x4
0x722…739 at0005 = ╱49╱I╱ // 0x727 @0x5
0x722…739 at0006 = ╱4e╱N╱ // 0x728 @0x6
0x722…739 at0007 = ╱49╱I╱ // 0x729 @0x7
0x722…739 at0008 = ╱45╱E╱ // 0x72a @0x8
0x722…739 at0009 = ╱dc╱=╱ // 0x72b @0x9
0x722…739 at000a = ╱4c╱L╱ // 0x72c @0xa
0x722…739 at000b = ╱49╱I╱ // 0x72d @0xb
0x722…739 at000c = ╱4e╱N╱ // 0x72e @0xc
0x722…739 at000d = ╱49╱I╱ // 0x72f @0xd
0x722…739 at000e = ╱45╱E╱ // 0x730 @0xe
0x722…739 at000f = ╱e2╱+╱ // 0x731 @0xf
0x722…739 at0010 = ╱35╱5╱ // 0x732 @0x10
0x722…739 at0011 = ╱fe0000a003╱ // 0x733 @0x11
0x722…739 at0016 = EOL // 0x738 @0x16
0x722…739 }
0x739…751 94a8 1920 TOTAL$(7)=TAH$
0x739…751 LineComalBin {
0x739…751 ptr = 0x94a8 // 0x739 @0x0
0x739…751 lno = 0x0780 // 0x73b @0x2
0x739…751 at0004 = ╱54╱T╱ // 0x73d @0x4
0x739…751 at0005 = ╱4f╱O╱ // 0x73e @0x5
0x739…751 at0006 = ╱54╱T╱ // 0x73f @0x6
0x739…751 at0007 = ╱41╱A╱ // 0x740 @0x7
0x739…751 at0008 = ╱4c╱L╱ // 0x741 @0x8
0x739…751 at0009 = ╱ef╱$╱ // 0x742 @0x9
0x739…751 at000a = ╱ed╱(╱ // 0x743 @0xa
0x739…751 at000b = ╱37╱7╱ // 0x744 @0xb
0x739…751 at000c = ╱fe0000e003╱ // 0x745 @0xc
0x739…751 at0011 = ╱ee╱)╱ // 0x74a @0x11
0x739…751 at0012 = ╱dc╱=╱ // 0x74b @0x12
0x739…751 at0013 = ╱54╱T╱ // 0x74c @0x13
0x739…751 at0014 = ╱41╱A╱ // 0x74d @0x14
0x739…751 at0015 = ╱48╱H╱ // 0x74e @0x15
0x739…751 at0016 = ╱ef╱$╱ // 0x74f @0x16
0x739…751 at0017 = EOL // 0x750 @0x17
0x739…751 }
0x751…761 94b8 1930 FOR I=E TO 5
0x751…761 LineComalBin {
0x751…761 ptr = 0x94b8 // 0x751 @0x0
0x751…761 lno = 0x078a // 0x753 @0x2
0x751…761 at0004 = ╱83╱ FOR ╱ // 0x755 @0x4
0x751…761 at0005 = ╱49╱I╱ // 0x756 @0x5
0x751…761 at0006 = ╱dc╱=╱ // 0x757 @0x6
0x751…761 at0007 = ╱45╱E╱ // 0x758 @0x7
0x751…761 at0008 = ╱b7╱ TO ╱ // 0x759 @0x8
0x751…761 at0009 = ╱35╱5╱ // 0x75a @0x9
0x751…761 at000a = ╱fe0000a003╱ // 0x75b @0xa
0x751…761 at000f = EOL // 0x760 @0xf
0x751…761 }
0x761…78b 94e2 1940 RESUL$=MF41$(E+(I-E)*10:10)
0x761…78b LineComalBin {
0x761…78b ptr = 0x94e2 // 0x761 @0x0
0x761…78b lno = 0x0794 // 0x763 @0x2
0x761…78b at0004 = ╱52╱R╱ // 0x765 @0x4
0x761…78b at0005 = ╱45╱E╱ // 0x766 @0x5
0x761…78b at0006 = ╱53╱S╱ // 0x767 @0x6
0x761…78b at0007 = ╱55╱U╱ // 0x768 @0x7
0x761…78b at0008 = ╱4c╱L╱ // 0x769 @0x8
0x761…78b at0009 = ╱ef╱$╱ // 0x76a @0x9
0x761…78b at000a = ╱dc╱=╱ // 0x76b @0xa
0x761…78b at000b = ╱4d╱M╱ // 0x76c @0xb
0x761…78b at000c = ╱46╱F╱ // 0x76d @0xc
0x761…78b at000d = ╱34╱4╱ // 0x76e @0xd
0x761…78b at000e = ╱31╱1╱ // 0x76f @0xe
0x761…78b at000f = ╱ef╱$╱ // 0x770 @0xf
0x761…78b at0010 = ╱ed╱(╱ // 0x771 @0x10
0x761…78b at0011 = ╱45╱E╱ // 0x772 @0x11
0x761…78b at0012 = ╱e2╱+╱ // 0x773 @0x12
0x761…78b at0013 = ╱ed╱(╱ // 0x774 @0x13
0x761…78b at0014 = ╱49╱I╱ // 0x775 @0x14
0x761…78b at0015 = ╱e3╱-╱ // 0x776 @0x15
0x761…78b at0016 = ╱45╱E╱ // 0x777 @0x16
0x761…78b at0017 = ╱ee╱)╱ // 0x778 @0x17
0x761…78b at0018 = ╱e4╱*╱ // 0x779 @0x18
0x761…78b at0019 = ╱31╱1╱ // 0x77a @0x19
0x761…78b at001a = ╱30╱0╱ // 0x77b @0x1a
0x761…78b at001b = ╱fe0000a004╱ // 0x77c @0x1b
0x761…78b at0020 = ╱f0╱:╱ // 0x781 @0x20
0x761…78b at0021 = ╱31╱1╱ // 0x782 @0x21
0x761…78b at0022 = ╱30╱0╱ // 0x783 @0x22
0x761…78b at0023 = ╱fe0000a004╱ // 0x784 @0x23
0x761…78b at0028 = ╱ee╱)╱ // 0x789 @0x28
0x761…78b at0029 = EOL // 0x78a @0x29
0x761…78b }
0x78b…7bd 9514 1945 EXEC CALC(B,RESUL$,TOTAL$(7),TOTAL$(7))
0x78b…7bd LineComalBin {
0x78b…7bd ptr = 0x9514 // 0x78b @0x0
0x78b…7bd lno = 0x0799 // 0x78d @0x2
0x78b…7bd at0004 = ╱9d╱ EXEC ╱ // 0x78f @0x4
0x78b…7bd at0005 = ╱43╱C╱ // 0x790 @0x5
0x78b…7bd at0006 = ╱41╱A╱ // 0x791 @0x6
0x78b…7bd at0007 = ╱4c╱L╱ // 0x792 @0x7
0x78b…7bd at0008 = ╱43╱C╱ // 0x793 @0x8
0x78b…7bd at0009 = ╱ed╱(╱ // 0x794 @0x9
0x78b…7bd at000a = ╱42╱B╱ // 0x795 @0xa
0x78b…7bd at000b = ╱ec╱,╱ // 0x796 @0xb
0x78b…7bd at000c = ╱52╱R╱ // 0x797 @0xc
0x78b…7bd at000d = ╱45╱E╱ // 0x798 @0xd
0x78b…7bd at000e = ╱53╱S╱ // 0x799 @0xe
0x78b…7bd at000f = ╱55╱U╱ // 0x79a @0xf
0x78b…7bd at0010 = ╱4c╱L╱ // 0x79b @0x10
0x78b…7bd at0011 = ╱ef╱$╱ // 0x79c @0x11
0x78b…7bd at0012 = ╱ec╱,╱ // 0x79d @0x12
0x78b…7bd at0013 = ╱54╱T╱ // 0x79e @0x13
0x78b…7bd at0014 = ╱4f╱O╱ // 0x79f @0x14
0x78b…7bd at0015 = ╱54╱T╱ // 0x7a0 @0x15
0x78b…7bd at0016 = ╱41╱A╱ // 0x7a1 @0x16
0x78b…7bd at0017 = ╱4c╱L╱ // 0x7a2 @0x17
0x78b…7bd at0018 = ╱ef╱$╱ // 0x7a3 @0x18
0x78b…7bd at0019 = ╱ed╱(╱ // 0x7a4 @0x19
0x78b…7bd at001a = ╱37╱7╱ // 0x7a5 @0x1a
0x78b…7bd at001b = ╱fe0000e003╱ // 0x7a6 @0x1b
0x78b…7bd at0020 = ╱ee╱)╱ // 0x7ab @0x20
0x78b…7bd at0021 = ╱ec╱,╱ // 0x7ac @0x21
0x78b…7bd at0022 = ╱54╱T╱ // 0x7ad @0x22
0x78b…7bd at0023 = ╱4f╱O╱ // 0x7ae @0x23
0x78b…7bd at0024 = ╱54╱T╱ // 0x7af @0x24
0x78b…7bd at0025 = ╱41╱A╱ // 0x7b0 @0x25
0x78b…7bd at0026 = ╱4c╱L╱ // 0x7b1 @0x26
0x78b…7bd at0027 = ╱ef╱$╱ // 0x7b2 @0x27
0x78b…7bd at0028 = ╱ed╱(╱ // 0x7b3 @0x28
0x78b…7bd at0029 = ╱37╱7╱ // 0x7b4 @0x29
0x78b…7bd at002a = ╱fe0000e003╱ // 0x7b5 @0x2a
0x78b…7bd at002f = ╱ee╱)╱ // 0x7ba @0x2f
0x78b…7bd at0030 = ╱ee╱)╱ // 0x7bb @0x30
0x78b…7bd at0031 = EOL // 0x7bc @0x31
0x78b…7bd }
0x7bd…7e5 953c 1950 EXEC CALC(B,RESUL$,TOTAL$(I),TOTAL$(I))
0x7bd…7e5 LineComalBin {
0x7bd…7e5 ptr = 0x953c // 0x7bd @0x0
0x7bd…7e5 lno = 0x079e // 0x7bf @0x2
0x7bd…7e5 at0004 = ╱9d╱ EXEC ╱ // 0x7c1 @0x4
0x7bd…7e5 at0005 = ╱43╱C╱ // 0x7c2 @0x5
0x7bd…7e5 at0006 = ╱41╱A╱ // 0x7c3 @0x6
0x7bd…7e5 at0007 = ╱4c╱L╱ // 0x7c4 @0x7
0x7bd…7e5 at0008 = ╱43╱C╱ // 0x7c5 @0x8
0x7bd…7e5 at0009 = ╱ed╱(╱ // 0x7c6 @0x9
0x7bd…7e5 at000a = ╱42╱B╱ // 0x7c7 @0xa
0x7bd…7e5 at000b = ╱ec╱,╱ // 0x7c8 @0xb
0x7bd…7e5 at000c = ╱52╱R╱ // 0x7c9 @0xc
0x7bd…7e5 at000d = ╱45╱E╱ // 0x7ca @0xd
0x7bd…7e5 at000e = ╱53╱S╱ // 0x7cb @0xe
0x7bd…7e5 at000f = ╱55╱U╱ // 0x7cc @0xf
0x7bd…7e5 at0010 = ╱4c╱L╱ // 0x7cd @0x10
0x7bd…7e5 at0011 = ╱ef╱$╱ // 0x7ce @0x11
0x7bd…7e5 at0012 = ╱ec╱,╱ // 0x7cf @0x12
0x7bd…7e5 at0013 = ╱54╱T╱ // 0x7d0 @0x13
0x7bd…7e5 at0014 = ╱4f╱O╱ // 0x7d1 @0x14
0x7bd…7e5 at0015 = ╱54╱T╱ // 0x7d2 @0x15
0x7bd…7e5 at0016 = ╱41╱A╱ // 0x7d3 @0x16
0x7bd…7e5 at0017 = ╱4c╱L╱ // 0x7d4 @0x17
0x7bd…7e5 at0018 = ╱ef╱$╱ // 0x7d5 @0x18
0x7bd…7e5 at0019 = ╱ed╱(╱ // 0x7d6 @0x19
0x7bd…7e5 at001a = ╱49╱I╱ // 0x7d7 @0x1a
0x7bd…7e5 at001b = ╱ee╱)╱ // 0x7d8 @0x1b
0x7bd…7e5 at001c = ╱ec╱,╱ // 0x7d9 @0x1c
0x7bd…7e5 at001d = ╱54╱T╱ // 0x7da @0x1d
0x7bd…7e5 at001e = ╱4f╱O╱ // 0x7db @0x1e
0x7bd…7e5 at001f = ╱54╱T╱ // 0x7dc @0x1f
0x7bd…7e5 at0020 = ╱41╱A╱ // 0x7dd @0x20
0x7bd…7e5 at0021 = ╱4c╱L╱ // 0x7de @0x21
0x7bd…7e5 at0022 = ╱ef╱$╱ // 0x7df @0x22
0x7bd…7e5 at0023 = ╱ed╱(╱ // 0x7e0 @0x23
0x7bd…7e5 at0024 = ╱49╱I╱ // 0x7e1 @0x24
0x7bd…7e5 at0025 = ╱ee╱)╱ // 0x7e2 @0x25
0x7bd…7e5 at0026 = ╱ee╱)╱ // 0x7e3 @0x26
0x7bd…7e5 at0027 = EOL // 0x7e4 @0x27
0x7bd…7e5 }
0x7e5…814 956b 1960 IF MF41$(I*10)="+" THEN MF41$(I*10)=" "
0x7e5…814 LineComalBin {
0x7e5…814 ptr = 0x956b // 0x7e5 @0x0
0x7e5…814 lno = 0x07a8 // 0x7e7 @0x2
0x7e5…814 at0004 = ╱82╱ IF ╱ // 0x7e9 @0x4
0x7e5…814 at0005 = ╱4d╱M╱ // 0x7ea @0x5
0x7e5…814 at0006 = ╱46╱F╱ // 0x7eb @0x6
0x7e5…814 at0007 = ╱34╱4╱ // 0x7ec @0x7
0x7e5…814 at0008 = ╱31╱1╱ // 0x7ed @0x8
0x7e5…814 at0009 = ╱ef╱$╱ // 0x7ee @0x9
0x7e5…814 at000a = ╱ed╱(╱ // 0x7ef @0xa
0x7e5…814 at000b = ╱49╱I╱ // 0x7f0 @0xb
0x7e5…814 at000c = ╱e4╱*╱ // 0x7f1 @0xc
0x7e5…814 at000d = ╱31╱1╱ // 0x7f2 @0xd
0x7e5…814 at000e = ╱30╱0╱ // 0x7f3 @0xe
0x7e5…814 at000f = ╱fe0000a004╱ // 0x7f4 @0xf
0x7e5…814 at0014 = ╱ee╱)╱ // 0x7f9 @0x14
0x7e5…814 at0015 = ╱dc╱=╱ // 0x7fa @0x15
0x7e5…814 at0016 = ╱22╱"╱ // 0x7fb @0x16
0x7e5…814 at0017 = ╱2b╱+╱ // 0x7fc @0x17
0x7e5…814 at0018 = ╱22╱"╱ // 0x7fd @0x18
0x7e5…814 at0019 = ╱b6╱ THEN ╱ // 0x7fe @0x19
0x7e5…814 at001a = ╱4d╱M╱ // 0x7ff @0x1a
0x7e5…814 at001b = ╱46╱F╱ // 0x800 @0x1b
0x7e5…814 at001c = ╱34╱4╱ // 0x801 @0x1c
0x7e5…814 at001d = ╱31╱1╱ // 0x802 @0x1d
0x7e5…814 at001e = ╱ef╱$╱ // 0x803 @0x1e
0x7e5…814 at001f = ╱ed╱(╱ // 0x804 @0x1f
0x7e5…814 at0020 = ╱49╱I╱ // 0x805 @0x20
0x7e5…814 at0021 = ╱e4╱*╱ // 0x806 @0x21
0x7e5…814 at0022 = ╱31╱1╱ // 0x807 @0x22
0x7e5…814 at0023 = ╱30╱0╱ // 0x808 @0x23
0x7e5…814 at0024 = ╱fe0000a004╱ // 0x809 @0x24
0x7e5…814 at0029 = ╱ee╱)╱ // 0x80e @0x29
0x7e5…814 at002a = ╱dc╱=╱ // 0x80f @0x2a
0x7e5…814 at002b = ╱22╱"╱ // 0x810 @0x2b
0x7e5…814 at002c = ╱20╱…╱ // 0x811 @0x2c
0x7e5…814 at002d = ╱22╱"╱ // 0x812 @0x2d
0x7e5…814 at002e = EOL // 0x813 @0x2e
0x7e5…814 }
0x814…83e 9595 1962 RESUL$=MF42$(E+(I-E)*10:10)
0x814…83e LineComalBin {
0x814…83e ptr = 0x9595 // 0x814 @0x0
0x814…83e lno = 0x07aa // 0x816 @0x2
0x814…83e at0004 = ╱52╱R╱ // 0x818 @0x4
0x814…83e at0005 = ╱45╱E╱ // 0x819 @0x5
0x814…83e at0006 = ╱53╱S╱ // 0x81a @0x6
0x814…83e at0007 = ╱55╱U╱ // 0x81b @0x7
0x814…83e at0008 = ╱4c╱L╱ // 0x81c @0x8
0x814…83e at0009 = ╱ef╱$╱ // 0x81d @0x9
0x814…83e at000a = ╱dc╱=╱ // 0x81e @0xa
0x814…83e at000b = ╱4d╱M╱ // 0x81f @0xb
0x814…83e at000c = ╱46╱F╱ // 0x820 @0xc
0x814…83e at000d = ╱34╱4╱ // 0x821 @0xd
0x814…83e at000e = ╱32╱2╱ // 0x822 @0xe
0x814…83e at000f = ╱ef╱$╱ // 0x823 @0xf
0x814…83e at0010 = ╱ed╱(╱ // 0x824 @0x10
0x814…83e at0011 = ╱45╱E╱ // 0x825 @0x11
0x814…83e at0012 = ╱e2╱+╱ // 0x826 @0x12
0x814…83e at0013 = ╱ed╱(╱ // 0x827 @0x13
0x814…83e at0014 = ╱49╱I╱ // 0x828 @0x14
0x814…83e at0015 = ╱e3╱-╱ // 0x829 @0x15
0x814…83e at0016 = ╱45╱E╱ // 0x82a @0x16
0x814…83e at0017 = ╱ee╱)╱ // 0x82b @0x17
0x814…83e at0018 = ╱e4╱*╱ // 0x82c @0x18
0x814…83e at0019 = ╱31╱1╱ // 0x82d @0x19
0x814…83e at001a = ╱30╱0╱ // 0x82e @0x1a
0x814…83e at001b = ╱fe0000a004╱ // 0x82f @0x1b
0x814…83e at0020 = ╱f0╱:╱ // 0x834 @0x20
0x814…83e at0021 = ╱31╱1╱ // 0x835 @0x21
0x814…83e at0022 = ╱30╱0╱ // 0x836 @0x22
0x814…83e at0023 = ╱fe0000a004╱ // 0x837 @0x23
0x814…83e at0028 = ╱ee╱)╱ // 0x83c @0x28
0x814…83e at0029 = EOL // 0x83d @0x29
0x814…83e }
0x83e…868 95bf 1964 EXEC CALC(B,RESUL$,TOTAL1$(I),TOTAL1$(I))
0x83e…868 LineComalBin {
0x83e…868 ptr = 0x95bf // 0x83e @0x0
0x83e…868 lno = 0x07ac // 0x840 @0x2
0x83e…868 at0004 = ╱9d╱ EXEC ╱ // 0x842 @0x4
0x83e…868 at0005 = ╱43╱C╱ // 0x843 @0x5
0x83e…868 at0006 = ╱41╱A╱ // 0x844 @0x6
0x83e…868 at0007 = ╱4c╱L╱ // 0x845 @0x7
0x83e…868 at0008 = ╱43╱C╱ // 0x846 @0x8
0x83e…868 at0009 = ╱ed╱(╱ // 0x847 @0x9
0x83e…868 at000a = ╱42╱B╱ // 0x848 @0xa
0x83e…868 at000b = ╱ec╱,╱ // 0x849 @0xb
0x83e…868 at000c = ╱52╱R╱ // 0x84a @0xc
0x83e…868 at000d = ╱45╱E╱ // 0x84b @0xd
0x83e…868 at000e = ╱53╱S╱ // 0x84c @0xe
0x83e…868 at000f = ╱55╱U╱ // 0x84d @0xf
0x83e…868 at0010 = ╱4c╱L╱ // 0x84e @0x10
0x83e…868 at0011 = ╱ef╱$╱ // 0x84f @0x11
0x83e…868 at0012 = ╱ec╱,╱ // 0x850 @0x12
0x83e…868 at0013 = ╱54╱T╱ // 0x851 @0x13
0x83e…868 at0014 = ╱4f╱O╱ // 0x852 @0x14
0x83e…868 at0015 = ╱54╱T╱ // 0x853 @0x15
0x83e…868 at0016 = ╱41╱A╱ // 0x854 @0x16
0x83e…868 at0017 = ╱4c╱L╱ // 0x855 @0x17
0x83e…868 at0018 = ╱31╱1╱ // 0x856 @0x18
0x83e…868 at0019 = ╱ef╱$╱ // 0x857 @0x19
0x83e…868 at001a = ╱ed╱(╱ // 0x858 @0x1a
0x83e…868 at001b = ╱49╱I╱ // 0x859 @0x1b
0x83e…868 at001c = ╱ee╱)╱ // 0x85a @0x1c
0x83e…868 at001d = ╱ec╱,╱ // 0x85b @0x1d
0x83e…868 at001e = ╱54╱T╱ // 0x85c @0x1e
0x83e…868 at001f = ╱4f╱O╱ // 0x85d @0x1f
0x83e…868 at0020 = ╱54╱T╱ // 0x85e @0x20
0x83e…868 at0021 = ╱41╱A╱ // 0x85f @0x21
0x83e…868 at0022 = ╱4c╱L╱ // 0x860 @0x22
0x83e…868 at0023 = ╱31╱1╱ // 0x861 @0x23
0x83e…868 at0024 = ╱ef╱$╱ // 0x862 @0x24
0x83e…868 at0025 = ╱ed╱(╱ // 0x863 @0x25
0x83e…868 at0026 = ╱49╱I╱ // 0x864 @0x26
0x83e…868 at0027 = ╱ee╱)╱ // 0x865 @0x27
0x83e…868 at0028 = ╱ee╱)╱ // 0x866 @0x28
0x83e…868 at0029 = EOL // 0x867 @0x29
0x83e…868 }
0x868…89a 95f1 1966 EXEC CALC(B,RESUL$,TOTAL$(7),TOTAL$(7))
0x868…89a LineComalBin {
0x868…89a ptr = 0x95f1 // 0x868 @0x0
0x868…89a lno = 0x07ae // 0x86a @0x2
0x868…89a at0004 = ╱9d╱ EXEC ╱ // 0x86c @0x4
0x868…89a at0005 = ╱43╱C╱ // 0x86d @0x5
0x868…89a at0006 = ╱41╱A╱ // 0x86e @0x6
0x868…89a at0007 = ╱4c╱L╱ // 0x86f @0x7
0x868…89a at0008 = ╱43╱C╱ // 0x870 @0x8
0x868…89a at0009 = ╱ed╱(╱ // 0x871 @0x9
0x868…89a at000a = ╱42╱B╱ // 0x872 @0xa
0x868…89a at000b = ╱ec╱,╱ // 0x873 @0xb
0x868…89a at000c = ╱52╱R╱ // 0x874 @0xc
0x868…89a at000d = ╱45╱E╱ // 0x875 @0xd
0x868…89a at000e = ╱53╱S╱ // 0x876 @0xe
0x868…89a at000f = ╱55╱U╱ // 0x877 @0xf
0x868…89a at0010 = ╱4c╱L╱ // 0x878 @0x10
0x868…89a at0011 = ╱ef╱$╱ // 0x879 @0x11
0x868…89a at0012 = ╱ec╱,╱ // 0x87a @0x12
0x868…89a at0013 = ╱54╱T╱ // 0x87b @0x13
0x868…89a at0014 = ╱4f╱O╱ // 0x87c @0x14
0x868…89a at0015 = ╱54╱T╱ // 0x87d @0x15
0x868…89a at0016 = ╱41╱A╱ // 0x87e @0x16
0x868…89a at0017 = ╱4c╱L╱ // 0x87f @0x17
0x868…89a at0018 = ╱ef╱$╱ // 0x880 @0x18
0x868…89a at0019 = ╱ed╱(╱ // 0x881 @0x19
0x868…89a at001a = ╱37╱7╱ // 0x882 @0x1a
0x868…89a at001b = ╱fe0000e003╱ // 0x883 @0x1b
0x868…89a at0020 = ╱ee╱)╱ // 0x888 @0x20
0x868…89a at0021 = ╱ec╱,╱ // 0x889 @0x21
0x868…89a at0022 = ╱54╱T╱ // 0x88a @0x22
0x868…89a at0023 = ╱4f╱O╱ // 0x88b @0x23
0x868…89a at0024 = ╱54╱T╱ // 0x88c @0x24
0x868…89a at0025 = ╱41╱A╱ // 0x88d @0x25
0x868…89a at0026 = ╱4c╱L╱ // 0x88e @0x26
0x868…89a at0027 = ╱ef╱$╱ // 0x88f @0x27
0x868…89a at0028 = ╱ed╱(╱ // 0x890 @0x28
0x868…89a at0029 = ╱37╱7╱ // 0x891 @0x29
0x868…89a at002a = ╱fe0000e003╱ // 0x892 @0x2a
0x868…89a at002f = ╱ee╱)╱ // 0x897 @0x2f
0x868…89a at0030 = ╱ee╱)╱ // 0x898 @0x30
0x868…89a at0031 = EOL // 0x899 @0x31
0x868…89a }
0x89a…8c9 9620 1968 IF MF42$(I*10)="+" THEN MF42$(I*10)=" "
0x89a…8c9 LineComalBin {
0x89a…8c9 ptr = 0x9620 // 0x89a @0x0
0x89a…8c9 lno = 0x07b0 // 0x89c @0x2
0x89a…8c9 at0004 = ╱82╱ IF ╱ // 0x89e @0x4
0x89a…8c9 at0005 = ╱4d╱M╱ // 0x89f @0x5
0x89a…8c9 at0006 = ╱46╱F╱ // 0x8a0 @0x6
0x89a…8c9 at0007 = ╱34╱4╱ // 0x8a1 @0x7
0x89a…8c9 at0008 = ╱32╱2╱ // 0x8a2 @0x8
0x89a…8c9 at0009 = ╱ef╱$╱ // 0x8a3 @0x9
0x89a…8c9 at000a = ╱ed╱(╱ // 0x8a4 @0xa
0x89a…8c9 at000b = ╱49╱I╱ // 0x8a5 @0xb
0x89a…8c9 at000c = ╱e4╱*╱ // 0x8a6 @0xc
0x89a…8c9 at000d = ╱31╱1╱ // 0x8a7 @0xd
0x89a…8c9 at000e = ╱30╱0╱ // 0x8a8 @0xe
0x89a…8c9 at000f = ╱fe0000a004╱ // 0x8a9 @0xf
0x89a…8c9 at0014 = ╱ee╱)╱ // 0x8ae @0x14
0x89a…8c9 at0015 = ╱dc╱=╱ // 0x8af @0x15
0x89a…8c9 at0016 = ╱22╱"╱ // 0x8b0 @0x16
0x89a…8c9 at0017 = ╱2b╱+╱ // 0x8b1 @0x17
0x89a…8c9 at0018 = ╱22╱"╱ // 0x8b2 @0x18
0x89a…8c9 at0019 = ╱b6╱ THEN ╱ // 0x8b3 @0x19
0x89a…8c9 at001a = ╱4d╱M╱ // 0x8b4 @0x1a
0x89a…8c9 at001b = ╱46╱F╱ // 0x8b5 @0x1b
0x89a…8c9 at001c = ╱34╱4╱ // 0x8b6 @0x1c
0x89a…8c9 at001d = ╱32╱2╱ // 0x8b7 @0x1d
0x89a…8c9 at001e = ╱ef╱$╱ // 0x8b8 @0x1e
0x89a…8c9 at001f = ╱ed╱(╱ // 0x8b9 @0x1f
0x89a…8c9 at0020 = ╱49╱I╱ // 0x8ba @0x20
0x89a…8c9 at0021 = ╱e4╱*╱ // 0x8bb @0x21
0x89a…8c9 at0022 = ╱31╱1╱ // 0x8bc @0x22
0x89a…8c9 at0023 = ╱30╱0╱ // 0x8bd @0x23
0x89a…8c9 at0024 = ╱fe0000a004╱ // 0x8be @0x24
0x89a…8c9 at0029 = ╱ee╱)╱ // 0x8c3 @0x29
0x89a…8c9 at002a = ╱dc╱=╱ // 0x8c4 @0x2a
0x89a…8c9 at002b = ╱22╱"╱ // 0x8c5 @0x2b
0x89a…8c9 at002c = ╱20╱…╱ // 0x8c6 @0x2c
0x89a…8c9 at002d = ╱22╱"╱ // 0x8c7 @0x2d
0x89a…8c9 at002e = EOL // 0x8c8 @0x2e
0x89a…8c9 }
0x8c9…8d0 9627 1970 NEXT I
0x8c9…8d0 LineComalBin {
0x8c9…8d0 ptr = 0x9627 // 0x8c9 @0x0
0x8c9…8d0 lno = 0x07b2 // 0x8cb @0x2
0x8c9…8d0 at0004 = ╱84╱ NEXT ╱ // 0x8cd @0x4
0x8c9…8d0 at0005 = ╱49╱I╱ // 0x8ce @0x5
0x8c9…8d0 at0006 = EOL // 0x8cf @0x6
0x8c9…8d0 }
0x8d0…90a 9661 1980 EXEC CALC(B,TOTAL$(7),TOTAL$(6),TOTAL$(6))
0x8d0…90a LineComalBin {
0x8d0…90a ptr = 0x9661 // 0x8d0 @0x0
0x8d0…90a lno = 0x07bc // 0x8d2 @0x2
0x8d0…90a at0004 = ╱9d╱ EXEC ╱ // 0x8d4 @0x4
0x8d0…90a at0005 = ╱43╱C╱ // 0x8d5 @0x5
0x8d0…90a at0006 = ╱41╱A╱ // 0x8d6 @0x6
0x8d0…90a at0007 = ╱4c╱L╱ // 0x8d7 @0x7
0x8d0…90a at0008 = ╱43╱C╱ // 0x8d8 @0x8
0x8d0…90a at0009 = ╱ed╱(╱ // 0x8d9 @0x9
0x8d0…90a at000a = ╱42╱B╱ // 0x8da @0xa
0x8d0…90a at000b = ╱ec╱,╱ // 0x8db @0xb
0x8d0…90a at000c = ╱54╱T╱ // 0x8dc @0xc
0x8d0…90a at000d = ╱4f╱O╱ // 0x8dd @0xd
0x8d0…90a at000e = ╱54╱T╱ // 0x8de @0xe
0x8d0…90a at000f = ╱41╱A╱ // 0x8df @0xf
0x8d0…90a at0010 = ╱4c╱L╱ // 0x8e0 @0x10
0x8d0…90a at0011 = ╱ef╱$╱ // 0x8e1 @0x11
0x8d0…90a at0012 = ╱ed╱(╱ // 0x8e2 @0x12
0x8d0…90a at0013 = ╱37╱7╱ // 0x8e3 @0x13
0x8d0…90a at0014 = ╱fe0000e003╱ // 0x8e4 @0x14
0x8d0…90a at0019 = ╱ee╱)╱ // 0x8e9 @0x19
0x8d0…90a at001a = ╱ec╱,╱ // 0x8ea @0x1a
0x8d0…90a at001b = ╱54╱T╱ // 0x8eb @0x1b
0x8d0…90a at001c = ╱4f╱O╱ // 0x8ec @0x1c
0x8d0…90a at001d = ╱54╱T╱ // 0x8ed @0x1d
0x8d0…90a at001e = ╱41╱A╱ // 0x8ee @0x1e
0x8d0…90a at001f = ╱4c╱L╱ // 0x8ef @0x1f
0x8d0…90a at0020 = ╱ef╱$╱ // 0x8f0 @0x20
0x8d0…90a at0021 = ╱ed╱(╱ // 0x8f1 @0x21
0x8d0…90a at0022 = ╱36╱6╱ // 0x8f2 @0x22
0x8d0…90a at0023 = ╱fe0000c003╱ // 0x8f3 @0x23
0x8d0…90a at0028 = ╱ee╱)╱ // 0x8f8 @0x28
0x8d0…90a at0029 = ╱ec╱,╱ // 0x8f9 @0x29
0x8d0…90a at002a = ╱54╱T╱ // 0x8fa @0x2a
0x8d0…90a at002b = ╱4f╱O╱ // 0x8fb @0x2b
0x8d0…90a at002c = ╱54╱T╱ // 0x8fc @0x2c
0x8d0…90a at002d = ╱41╱A╱ // 0x8fd @0x2d
0x8d0…90a at002e = ╱4c╱L╱ // 0x8fe @0x2e
0x8d0…90a at002f = ╱ef╱$╱ // 0x8ff @0x2f
0x8d0…90a at0030 = ╱ed╱(╱ // 0x900 @0x30
0x8d0…90a at0031 = ╱36╱6╱ // 0x901 @0x31
0x8d0…90a at0032 = ╱fe0000c003╱ // 0x902 @0x32
0x8d0…90a at0037 = ╱ee╱)╱ // 0x907 @0x37
0x8d0…90a at0038 = ╱ee╱)╱ // 0x908 @0x38
0x8d0…90a at0039 = EOL // 0x909 @0x39
0x8d0…90a }
0x90a…92f 9686 1990 RESUL1$=TOTAL$(7,V:10)
0x90a…92f LineComalBin {
0x90a…92f ptr = 0x9686 // 0x90a @0x0
0x90a…92f lno = 0x07c6 // 0x90c @0x2
0x90a…92f at0004 = ╱52╱R╱ // 0x90e @0x4
0x90a…92f at0005 = ╱45╱E╱ // 0x90f @0x5
0x90a…92f at0006 = ╱53╱S╱ // 0x910 @0x6
0x90a…92f at0007 = ╱55╱U╱ // 0x911 @0x7
0x90a…92f at0008 = ╱4c╱L╱ // 0x912 @0x8
0x90a…92f at0009 = ╱31╱1╱ // 0x913 @0x9
0x90a…92f at000a = ╱ef╱$╱ // 0x914 @0xa
0x90a…92f at000b = ╱dc╱=╱ // 0x915 @0xb
0x90a…92f at000c = ╱54╱T╱ // 0x916 @0xc
0x90a…92f at000d = ╱4f╱O╱ // 0x917 @0xd
0x90a…92f at000e = ╱54╱T╱ // 0x918 @0xe
0x90a…92f at000f = ╱41╱A╱ // 0x919 @0xf
0x90a…92f at0010 = ╱4c╱L╱ // 0x91a @0x10
0x90a…92f at0011 = ╱ef╱$╱ // 0x91b @0x11
0x90a…92f at0012 = ╱ed╱(╱ // 0x91c @0x12
0x90a…92f at0013 = ╱37╱7╱ // 0x91d @0x13
0x90a…92f at0014 = ╱fe0000e003╱ // 0x91e @0x14
0x90a…92f at0019 = ╱ec╱,╱ // 0x923 @0x19
0x90a…92f at001a = ╱56╱V╱ // 0x924 @0x1a
0x90a…92f at001b = ╱f0╱:╱ // 0x925 @0x1b
0x90a…92f at001c = ╱31╱1╱ // 0x926 @0x1c
0x90a…92f at001d = ╱30╱0╱ // 0x927 @0x1d
0x90a…92f at001e = ╱fe0000a004╱ // 0x928 @0x1e
0x90a…92f at0023 = ╱ee╱)╱ // 0x92d @0x23
0x90a…92f at0024 = EOL // 0x92e @0x24
0x90a…92f }
0x92f…95e 96b5 2000 IF RESUL1$(10)="+" THEN RESUL1$(10)=" "
0x92f…95e LineComalBin {
0x92f…95e ptr = 0x96b5 // 0x92f @0x0
0x92f…95e lno = 0x07d0 // 0x931 @0x2
0x92f…95e at0004 = ╱82╱ IF ╱ // 0x933 @0x4
0x92f…95e at0005 = ╱52╱R╱ // 0x934 @0x5
0x92f…95e at0006 = ╱45╱E╱ // 0x935 @0x6
0x92f…95e at0007 = ╱53╱S╱ // 0x936 @0x7
0x92f…95e at0008 = ╱55╱U╱ // 0x937 @0x8
0x92f…95e at0009 = ╱4c╱L╱ // 0x938 @0x9
0x92f…95e at000a = ╱31╱1╱ // 0x939 @0xa
0x92f…95e at000b = ╱ef╱$╱ // 0x93a @0xb
0x92f…95e at000c = ╱ed╱(╱ // 0x93b @0xc
0x92f…95e at000d = ╱31╱1╱ // 0x93c @0xd
0x92f…95e at000e = ╱30╱0╱ // 0x93d @0xe
0x92f…95e at000f = ╱fe0000a004╱ // 0x93e @0xf
0x92f…95e at0014 = ╱ee╱)╱ // 0x943 @0x14
0x92f…95e at0015 = ╱dc╱=╱ // 0x944 @0x15
0x92f…95e at0016 = ╱22╱"╱ // 0x945 @0x16
0x92f…95e at0017 = ╱2b╱+╱ // 0x946 @0x17
0x92f…95e at0018 = ╱22╱"╱ // 0x947 @0x18
0x92f…95e at0019 = ╱b6╱ THEN ╱ // 0x948 @0x19
0x92f…95e at001a = ╱52╱R╱ // 0x949 @0x1a
0x92f…95e at001b = ╱45╱E╱ // 0x94a @0x1b
0x92f…95e at001c = ╱53╱S╱ // 0x94b @0x1c
0x92f…95e at001d = ╱55╱U╱ // 0x94c @0x1d
0x92f…95e at001e = ╱4c╱L╱ // 0x94d @0x1e
0x92f…95e at001f = ╱31╱1╱ // 0x94e @0x1f
0x92f…95e at0020 = ╱ef╱$╱ // 0x94f @0x20
0x92f…95e at0021 = ╱ed╱(╱ // 0x950 @0x21
0x92f…95e at0022 = ╱31╱1╱ // 0x951 @0x22
0x92f…95e at0023 = ╱30╱0╱ // 0x952 @0x23
0x92f…95e at0024 = ╱fe0000a004╱ // 0x953 @0x24
0x92f…95e at0029 = ╱ee╱)╱ // 0x958 @0x29
0x92f…95e at002a = ╱dc╱=╱ // 0x959 @0x2a
0x92f…95e at002b = ╱22╱"╱ // 0x95a @0x2b
0x92f…95e at002c = ╱20╱…╱ // 0x95b @0x2c
0x92f…95e at002d = ╱22╱"╱ // 0x95c @0x2d
0x92f…95e at002e = EOL // 0x95d @0x2e
0x92f…95e }
0x95e…971 96c8 2030 PRINT USING "####":LMNR;
0x95e…971 LineComalBin {
0x95e…971 ptr = 0x96c8 // 0x95e @0x0
0x95e…971 lno = 0x07ee // 0x960 @0x2
0x95e…971 at0004 = ╱92╱ PRINT ╱ // 0x962 @0x4
0x95e…971 at0005 = ╱b9╱ USING ╱ // 0x963 @0x5
0x95e…971 at0006 = ╱22╱"╱ // 0x964 @0x6
0x95e…971 at0007 = ╱23╱#╱ // 0x965 @0x7
0x95e…971 at0008 = ╱23╱#╱ // 0x966 @0x8
0x95e…971 at0009 = ╱23╱#╱ // 0x967 @0x9
0x95e…971 at000a = ╱23╱#╱ // 0x968 @0xa
0x95e…971 at000b = ╱22╱"╱ // 0x969 @0xb
0x95e…971 at000c = ╱f0╱:╱ // 0x96a @0xc
0x95e…971 at000d = ╱4c╱L╱ // 0x96b @0xd
0x95e…971 at000e = ╱4d╱M╱ // 0x96c @0xe
0x95e…971 at000f = ╱4e╱N╱ // 0x96d @0xf
0x95e…971 at0010 = ╱52╱R╱ // 0x96e @0x10
0x95e…971 at0011 = ╱eb╱;╱ // 0x96f @0x11
0x95e…971 at0012 = EOL // 0x970 @0x12
0x95e…971 }
0x971…993 96ea 2035 PRINT TAB(7);POST1$(E,25);
0x971…993 LineComalBin {
0x971…993 ptr = 0x96ea // 0x971 @0x0
0x971…993 lno = 0x07f3 // 0x973 @0x2
0x971…993 at0004 = ╱92╱ PRINT ╱ // 0x975 @0x4
0x971…993 at0005 = ╱d2╱TAB╱ // 0x976 @0x5
0x971…993 at0006 = ╱ed╱(╱ // 0x977 @0x6
0x971…993 at0007 = ╱37╱7╱ // 0x978 @0x7
0x971…993 at0008 = ╱fe0000e003╱ // 0x979 @0x8
0x971…993 at000d = ╱ee╱)╱ // 0x97e @0xd
0x971…993 at000e = ╱eb╱;╱ // 0x97f @0xe
0x971…993 at000f = ╱50╱P╱ // 0x980 @0xf
0x971…993 at0010 = ╱4f╱O╱ // 0x981 @0x10
0x971…993 at0011 = ╱53╱S╱ // 0x982 @0x11
0x971…993 at0012 = ╱54╱T╱ // 0x983 @0x12
0x971…993 at0013 = ╱31╱1╱ // 0x984 @0x13
0x971…993 at0014 = ╱ef╱$╱ // 0x985 @0x14
0x971…993 at0015 = ╱ed╱(╱ // 0x986 @0x15
0x971…993 at0016 = ╱45╱E╱ // 0x987 @0x16
0x971…993 at0017 = ╱ec╱,╱ // 0x988 @0x17
0x971…993 at0018 = ╱32╱2╱ // 0x989 @0x18
0x971…993 at0019 = ╱35╱5╱ // 0x98a @0x19
0x971…993 at001a = ╱fe0000c805╱ // 0x98b @0x1a
0x971…993 at001f = ╱ee╱)╱ // 0x990 @0x1f
0x971…993 at0020 = ╱eb╱;╱ // 0x991 @0x20
0x971…993 at0021 = EOL // 0x992 @0x21
0x971…993 }
0x993…9ea 9741 2040 PRINT TAB(38);MF41$(E,10);TAB(54);MF41$(11,20);TAB(70);RESUL1$;
0x993…9ea LineComalBin {
0x993…9ea ptr = 0x9741 // 0x993 @0x0
0x993…9ea lno = 0x07f8 // 0x995 @0x2
0x993…9ea at0004 = ╱92╱ PRINT ╱ // 0x997 @0x4
0x993…9ea at0005 = ╱d2╱TAB╱ // 0x998 @0x5
0x993…9ea at0006 = ╱ed╱(╱ // 0x999 @0x6
0x993…9ea at0007 = ╱33╱3╱ // 0x99a @0x7
0x993…9ea at0008 = ╱38╱8╱ // 0x99b @0x8
0x993…9ea at0009 = ╱fe00009806╱ // 0x99c @0x9
0x993…9ea at000e = ╱ee╱)╱ // 0x9a1 @0xe
0x993…9ea at000f = ╱eb╱;╱ // 0x9a2 @0xf
0x993…9ea at0010 = ╱4d╱M╱ // 0x9a3 @0x10
0x993…9ea at0011 = ╱46╱F╱ // 0x9a4 @0x11
0x993…9ea at0012 = ╱34╱4╱ // 0x9a5 @0x12
0x993…9ea at0013 = ╱31╱1╱ // 0x9a6 @0x13
0x993…9ea at0014 = ╱ef╱$╱ // 0x9a7 @0x14
0x993…9ea at0015 = ╱ed╱(╱ // 0x9a8 @0x15
0x993…9ea at0016 = ╱45╱E╱ // 0x9a9 @0x16
0x993…9ea at0017 = ╱ec╱,╱ // 0x9aa @0x17
0x993…9ea at0018 = ╱31╱1╱ // 0x9ab @0x18
0x993…9ea at0019 = ╱30╱0╱ // 0x9ac @0x19
0x993…9ea at001a = ╱fe0000a004╱ // 0x9ad @0x1a
0x993…9ea at001f = ╱ee╱)╱ // 0x9b2 @0x1f
0x993…9ea at0020 = ╱eb╱;╱ // 0x9b3 @0x20
0x993…9ea at0021 = ╱d2╱TAB╱ // 0x9b4 @0x21
0x993…9ea at0022 = ╱ed╱(╱ // 0x9b5 @0x22
0x993…9ea at0023 = ╱35╱5╱ // 0x9b6 @0x23
0x993…9ea at0024 = ╱34╱4╱ // 0x9b7 @0x24
0x993…9ea at0025 = ╱fe0000d806╱ // 0x9b8 @0x25
0x993…9ea at002a = ╱ee╱)╱ // 0x9bd @0x2a
0x993…9ea at002b = ╱eb╱;╱ // 0x9be @0x2b
0x993…9ea at002c = ╱4d╱M╱ // 0x9bf @0x2c
0x993…9ea at002d = ╱46╱F╱ // 0x9c0 @0x2d
0x993…9ea at002e = ╱34╱4╱ // 0x9c1 @0x2e
0x993…9ea at002f = ╱31╱1╱ // 0x9c2 @0x2f
0x993…9ea at0030 = ╱ef╱$╱ // 0x9c3 @0x30
0x993…9ea at0031 = ╱ed╱(╱ // 0x9c4 @0x31
0x993…9ea at0032 = ╱31╱1╱ // 0x9c5 @0x32
0x993…9ea at0033 = ╱31╱1╱ // 0x9c6 @0x33
0x993…9ea at0034 = ╱fe0000b004╱ // 0x9c7 @0x34
0x993…9ea at0039 = ╱ec╱,╱ // 0x9cc @0x39
0x993…9ea at003a = ╱32╱2╱ // 0x9cd @0x3a
0x993…9ea at003b = ╱30╱0╱ // 0x9ce @0x3b
0x993…9ea at003c = ╱fe0000a005╱ // 0x9cf @0x3c
0x993…9ea at0041 = ╱ee╱)╱ // 0x9d4 @0x41
0x993…9ea at0042 = ╱eb╱;╱ // 0x9d5 @0x42
0x993…9ea at0043 = ╱d2╱TAB╱ // 0x9d6 @0x43
0x993…9ea at0044 = ╱ed╱(╱ // 0x9d7 @0x44
0x993…9ea at0045 = ╱37╱7╱ // 0x9d8 @0x45
0x993…9ea at0046 = ╱30╱0╱ // 0x9d9 @0x46
0x993…9ea at0047 = ╱fe00008c07╱ // 0x9da @0x47
0x993…9ea at004c = ╱ee╱)╱ // 0x9df @0x4c
0x993…9ea at004d = ╱eb╱;╱ // 0x9e0 @0x4d
0x993…9ea at004e = ╱52╱R╱ // 0x9e1 @0x4e
0x993…9ea at004f = ╱45╱E╱ // 0x9e2 @0x4f
0x993…9ea at0050 = ╱53╱S╱ // 0x9e3 @0x50
0x993…9ea at0051 = ╱55╱U╱ // 0x9e4 @0x51
0x993…9ea at0052 = ╱4c╱L╱ // 0x9e5 @0x52
0x993…9ea at0053 = ╱31╱1╱ // 0x9e6 @0x53
0x993…9ea at0054 = ╱ef╱$╱ // 0x9e7 @0x54
0x993…9ea at0055 = ╱eb╱;╱ // 0x9e8 @0x55
0x993…9ea at0056 = EOL // 0x9e9 @0x56
0x993…9ea }
0x9ea…a55 97ac 2050 PRINT TAB(30);MF41$(21,30);TAB(46);MF41$(31,40);TAB(62);MF41$(41,50)
0x9ea…a55 LineComalBin {
0x9ea…a55 ptr = 0x97ac // 0x9ea @0x0
0x9ea…a55 lno = 0x0802 // 0x9ec @0x2
0x9ea…a55 at0004 = ╱92╱ PRINT ╱ // 0x9ee @0x4
0x9ea…a55 at0005 = ╱d2╱TAB╱ // 0x9ef @0x5
0x9ea…a55 at0006 = ╱ed╱(╱ // 0x9f0 @0x6
0x9ea…a55 at0007 = ╱33╱3╱ // 0x9f1 @0x7
0x9ea…a55 at0008 = ╱30╱0╱ // 0x9f2 @0x8
0x9ea…a55 at0009 = ╱fe0000f005╱ // 0x9f3 @0x9
0x9ea…a55 at000e = ╱ee╱)╱ // 0x9f8 @0xe
0x9ea…a55 at000f = ╱eb╱;╱ // 0x9f9 @0xf
0x9ea…a55 at0010 = ╱4d╱M╱ // 0x9fa @0x10
0x9ea…a55 at0011 = ╱46╱F╱ // 0x9fb @0x11
0x9ea…a55 at0012 = ╱34╱4╱ // 0x9fc @0x12
0x9ea…a55 at0013 = ╱31╱1╱ // 0x9fd @0x13
0x9ea…a55 at0014 = ╱ef╱$╱ // 0x9fe @0x14
0x9ea…a55 at0015 = ╱ed╱(╱ // 0x9ff @0x15
0x9ea…a55 at0016 = ╱32╱2╱ // 0xa00 @0x16
0x9ea…a55 at0017 = ╱31╱1╱ // 0xa01 @0x17
0x9ea…a55 at0018 = ╱fe0000a805╱ // 0xa02 @0x18
0x9ea…a55 at001d = ╱ec╱,╱ // 0xa07 @0x1d
0x9ea…a55 at001e = ╱33╱3╱ // 0xa08 @0x1e
0x9ea…a55 at001f = ╱30╱0╱ // 0xa09 @0x1f
0x9ea…a55 at0020 = ╱fe0000f005╱ // 0xa0a @0x20
0x9ea…a55 at0025 = ╱ee╱)╱ // 0xa0f @0x25
0x9ea…a55 at0026 = ╱eb╱;╱ // 0xa10 @0x26
0x9ea…a55 at0027 = ╱d2╱TAB╱ // 0xa11 @0x27
0x9ea…a55 at0028 = ╱ed╱(╱ // 0xa12 @0x28
0x9ea…a55 at0029 = ╱34╱4╱ // 0xa13 @0x29
0x9ea…a55 at002a = ╱36╱6╱ // 0xa14 @0x2a
0x9ea…a55 at002b = ╱fe0000b806╱ // 0xa15 @0x2b
0x9ea…a55 at0030 = ╱ee╱)╱ // 0xa1a @0x30
0x9ea…a55 at0031 = ╱eb╱;╱ // 0xa1b @0x31
0x9ea…a55 at0032 = ╱4d╱M╱ // 0xa1c @0x32
0x9ea…a55 at0033 = ╱46╱F╱ // 0xa1d @0x33
0x9ea…a55 at0034 = ╱34╱4╱ // 0xa1e @0x34
0x9ea…a55 at0035 = ╱31╱1╱ // 0xa1f @0x35
0x9ea…a55 at0036 = ╱ef╱$╱ // 0xa20 @0x36
0x9ea…a55 at0037 = ╱ed╱(╱ // 0xa21 @0x37
0x9ea…a55 at0038 = ╱33╱3╱ // 0xa22 @0x38
0x9ea…a55 at0039 = ╱31╱1╱ // 0xa23 @0x39
0x9ea…a55 at003a = ╱fe0000f805╱ // 0xa24 @0x3a
0x9ea…a55 at003f = ╱ec╱,╱ // 0xa29 @0x3f
0x9ea…a55 at0040 = ╱34╱4╱ // 0xa2a @0x40
0x9ea…a55 at0041 = ╱30╱0╱ // 0xa2b @0x41
0x9ea…a55 at0042 = ╱fe0000a006╱ // 0xa2c @0x42
0x9ea…a55 at0047 = ╱ee╱)╱ // 0xa31 @0x47
0x9ea…a55 at0048 = ╱eb╱;╱ // 0xa32 @0x48
0x9ea…a55 at0049 = ╱d2╱TAB╱ // 0xa33 @0x49
0x9ea…a55 at004a = ╱ed╱(╱ // 0xa34 @0x4a
0x9ea…a55 at004b = ╱36╱6╱ // 0xa35 @0x4b
0x9ea…a55 at004c = ╱32╱2╱ // 0xa36 @0x4c
0x9ea…a55 at004d = ╱fe0000f806╱ // 0xa37 @0x4d
0x9ea…a55 at0052 = ╱ee╱)╱ // 0xa3c @0x52
0x9ea…a55 at0053 = ╱eb╱;╱ // 0xa3d @0x53
0x9ea…a55 at0054 = ╱4d╱M╱ // 0xa3e @0x54
0x9ea…a55 at0055 = ╱46╱F╱ // 0xa3f @0x55
0x9ea…a55 at0056 = ╱34╱4╱ // 0xa40 @0x56
0x9ea…a55 at0057 = ╱31╱1╱ // 0xa41 @0x57
0x9ea…a55 at0058 = ╱ef╱$╱ // 0xa42 @0x58
0x9ea…a55 at0059 = ╱ed╱(╱ // 0xa43 @0x59
0x9ea…a55 at005a = ╱34╱4╱ // 0xa44 @0x5a
0x9ea…a55 at005b = ╱31╱1╱ // 0xa45 @0x5b
0x9ea…a55 at005c = ╱fe0000a406╱ // 0xa46 @0x5c
0x9ea…a55 at0061 = ╱ec╱,╱ // 0xa4b @0x61
0x9ea…a55 at0062 = ╱35╱5╱ // 0xa4c @0x62
0x9ea…a55 at0063 = ╱30╱0╱ // 0xa4d @0x63
0x9ea…a55 at0064 = ╱fe0000c806╱ // 0xa4e @0x64
0x9ea…a55 at0069 = ╱ee╱)╱ // 0xa53 @0x69
0x9ea…a55 at006a = EOL // 0xa54 @0x6a
0x9ea…a55 }
0xa55…a9e 97f5 2055 PRINT TAB(38);MF42$(11,20);TAB(54);MF42$(31,40)
0xa55…a9e LineComalBin {
0xa55…a9e ptr = 0x97f5 // 0xa55 @0x0
0xa55…a9e lno = 0x0807 // 0xa57 @0x2
0xa55…a9e at0004 = ╱92╱ PRINT ╱ // 0xa59 @0x4
0xa55…a9e at0005 = ╱d2╱TAB╱ // 0xa5a @0x5
0xa55…a9e at0006 = ╱ed╱(╱ // 0xa5b @0x6
0xa55…a9e at0007 = ╱33╱3╱ // 0xa5c @0x7
0xa55…a9e at0008 = ╱38╱8╱ // 0xa5d @0x8
0xa55…a9e at0009 = ╱fe00009806╱ // 0xa5e @0x9
0xa55…a9e at000e = ╱ee╱)╱ // 0xa63 @0xe
0xa55…a9e at000f = ╱eb╱;╱ // 0xa64 @0xf
0xa55…a9e at0010 = ╱4d╱M╱ // 0xa65 @0x10
0xa55…a9e at0011 = ╱46╱F╱ // 0xa66 @0x11
0xa55…a9e at0012 = ╱34╱4╱ // 0xa67 @0x12
0xa55…a9e at0013 = ╱32╱2╱ // 0xa68 @0x13
0xa55…a9e at0014 = ╱ef╱$╱ // 0xa69 @0x14
0xa55…a9e at0015 = ╱ed╱(╱ // 0xa6a @0x15
0xa55…a9e at0016 = ╱31╱1╱ // 0xa6b @0x16
0xa55…a9e at0017 = ╱31╱1╱ // 0xa6c @0x17
0xa55…a9e at0018 = ╱fe0000b004╱ // 0xa6d @0x18
0xa55…a9e at001d = ╱ec╱,╱ // 0xa72 @0x1d
0xa55…a9e at001e = ╱32╱2╱ // 0xa73 @0x1e
0xa55…a9e at001f = ╱30╱0╱ // 0xa74 @0x1f
0xa55…a9e at0020 = ╱fe0000a005╱ // 0xa75 @0x20
0xa55…a9e at0025 = ╱ee╱)╱ // 0xa7a @0x25
0xa55…a9e at0026 = ╱eb╱;╱ // 0xa7b @0x26
0xa55…a9e at0027 = ╱d2╱TAB╱ // 0xa7c @0x27
0xa55…a9e at0028 = ╱ed╱(╱ // 0xa7d @0x28
0xa55…a9e at0029 = ╱35╱5╱ // 0xa7e @0x29
0xa55…a9e at002a = ╱34╱4╱ // 0xa7f @0x2a
0xa55…a9e at002b = ╱fe0000d806╱ // 0xa80 @0x2b
0xa55…a9e at0030 = ╱ee╱)╱ // 0xa85 @0x30
0xa55…a9e at0031 = ╱eb╱;╱ // 0xa86 @0x31
0xa55…a9e at0032 = ╱4d╱M╱ // 0xa87 @0x32
0xa55…a9e at0033 = ╱46╱F╱ // 0xa88 @0x33
0xa55…a9e at0034 = ╱34╱4╱ // 0xa89 @0x34
0xa55…a9e at0035 = ╱32╱2╱ // 0xa8a @0x35
0xa55…a9e at0036 = ╱ef╱$╱ // 0xa8b @0x36
0xa55…a9e at0037 = ╱ed╱(╱ // 0xa8c @0x37
0xa55…a9e at0038 = ╱33╱3╱ // 0xa8d @0x38
0xa55…a9e at0039 = ╱31╱1╱ // 0xa8e @0x39
0xa55…a9e at003a = ╱fe0000f805╱ // 0xa8f @0x3a
0xa55…a9e at003f = ╱ec╱,╱ // 0xa94 @0x3f
0xa55…a9e at0040 = ╱34╱4╱ // 0xa95 @0x40
0xa55…a9e at0041 = ╱30╱0╱ // 0xa96 @0x41
0xa55…a9e at0042 = ╱fe0000a006╱ // 0xa97 @0x42
0xa55…a9e at0047 = ╱ee╱)╱ // 0xa9c @0x47
0xa55…a9e at0048 = EOL // 0xa9d @0x48
0xa55…a9e }
0xa9e…b03 985a 2060 PRINT TAB(30);MF42$(E,10);TAB(46);MF42$(21,30);TAB(62);MF42$(41,50)
0xa9e…b03 LineComalBin {
0xa9e…b03 ptr = 0x985a // 0xa9e @0x0
0xa9e…b03 lno = 0x080c // 0xaa0 @0x2
0xa9e…b03 at0004 = ╱92╱ PRINT ╱ // 0xaa2 @0x4
0xa9e…b03 at0005 = ╱d2╱TAB╱ // 0xaa3 @0x5
0xa9e…b03 at0006 = ╱ed╱(╱ // 0xaa4 @0x6
0xa9e…b03 at0007 = ╱33╱3╱ // 0xaa5 @0x7
0xa9e…b03 at0008 = ╱30╱0╱ // 0xaa6 @0x8
0xa9e…b03 at0009 = ╱fe0000f005╱ // 0xaa7 @0x9
0xa9e…b03 at000e = ╱ee╱)╱ // 0xaac @0xe
0xa9e…b03 at000f = ╱eb╱;╱ // 0xaad @0xf
0xa9e…b03 at0010 = ╱4d╱M╱ // 0xaae @0x10
0xa9e…b03 at0011 = ╱46╱F╱ // 0xaaf @0x11
0xa9e…b03 at0012 = ╱34╱4╱ // 0xab0 @0x12
0xa9e…b03 at0013 = ╱32╱2╱ // 0xab1 @0x13
0xa9e…b03 at0014 = ╱ef╱$╱ // 0xab2 @0x14
0xa9e…b03 at0015 = ╱ed╱(╱ // 0xab3 @0x15
0xa9e…b03 at0016 = ╱45╱E╱ // 0xab4 @0x16
0xa9e…b03 at0017 = ╱ec╱,╱ // 0xab5 @0x17
0xa9e…b03 at0018 = ╱31╱1╱ // 0xab6 @0x18
0xa9e…b03 at0019 = ╱30╱0╱ // 0xab7 @0x19
0xa9e…b03 at001a = ╱fe0000a004╱ // 0xab8 @0x1a
0xa9e…b03 at001f = ╱ee╱)╱ // 0xabd @0x1f
0xa9e…b03 at0020 = ╱eb╱;╱ // 0xabe @0x20
0xa9e…b03 at0021 = ╱d2╱TAB╱ // 0xabf @0x21
0xa9e…b03 at0022 = ╱ed╱(╱ // 0xac0 @0x22
0xa9e…b03 at0023 = ╱34╱4╱ // 0xac1 @0x23
0xa9e…b03 at0024 = ╱36╱6╱ // 0xac2 @0x24
0xa9e…b03 at0025 = ╱fe0000b806╱ // 0xac3 @0x25
0xa9e…b03 at002a = ╱ee╱)╱ // 0xac8 @0x2a
0xa9e…b03 at002b = ╱eb╱;╱ // 0xac9 @0x2b
0xa9e…b03 at002c = ╱4d╱M╱ // 0xaca @0x2c
0xa9e…b03 at002d = ╱46╱F╱ // 0xacb @0x2d
0xa9e…b03 at002e = ╱34╱4╱ // 0xacc @0x2e
0xa9e…b03 at002f = ╱32╱2╱ // 0xacd @0x2f
0xa9e…b03 at0030 = ╱ef╱$╱ // 0xace @0x30
0xa9e…b03 at0031 = ╱ed╱(╱ // 0xacf @0x31
0xa9e…b03 at0032 = ╱32╱2╱ // 0xad0 @0x32
0xa9e…b03 at0033 = ╱31╱1╱ // 0xad1 @0x33
0xa9e…b03 at0034 = ╱fe0000a805╱ // 0xad2 @0x34
0xa9e…b03 at0039 = ╱ec╱,╱ // 0xad7 @0x39
0xa9e…b03 at003a = ╱33╱3╱ // 0xad8 @0x3a
0xa9e…b03 at003b = ╱30╱0╱ // 0xad9 @0x3b
0xa9e…b03 at003c = ╱fe0000f005╱ // 0xada @0x3c
0xa9e…b03 at0041 = ╱ee╱)╱ // 0xadf @0x41
0xa9e…b03 at0042 = ╱eb╱;╱ // 0xae0 @0x42
0xa9e…b03 at0043 = ╱d2╱TAB╱ // 0xae1 @0x43
0xa9e…b03 at0044 = ╱ed╱(╱ // 0xae2 @0x44
0xa9e…b03 at0045 = ╱36╱6╱ // 0xae3 @0x45
0xa9e…b03 at0046 = ╱32╱2╱ // 0xae4 @0x46
0xa9e…b03 at0047 = ╱fe0000f806╱ // 0xae5 @0x47
0xa9e…b03 at004c = ╱ee╱)╱ // 0xaea @0x4c
0xa9e…b03 at004d = ╱eb╱;╱ // 0xaeb @0x4d
0xa9e…b03 at004e = ╱4d╱M╱ // 0xaec @0x4e
0xa9e…b03 at004f = ╱46╱F╱ // 0xaed @0x4f
0xa9e…b03 at0050 = ╱34╱4╱ // 0xaee @0x50
0xa9e…b03 at0051 = ╱32╱2╱ // 0xaef @0x51
0xa9e…b03 at0052 = ╱ef╱$╱ // 0xaf0 @0x52
0xa9e…b03 at0053 = ╱ed╱(╱ // 0xaf1 @0x53
0xa9e…b03 at0054 = ╱34╱4╱ // 0xaf2 @0x54
0xa9e…b03 at0055 = ╱31╱1╱ // 0xaf3 @0x55
0xa9e…b03 at0056 = ╱fe0000a406╱ // 0xaf4 @0x56
0xa9e…b03 at005b = ╱ec╱,╱ // 0xaf9 @0x5b
0xa9e…b03 at005c = ╱35╱5╱ // 0xafa @0x5c
0xa9e…b03 at005d = ╱30╱0╱ // 0xafb @0x5d
0xa9e…b03 at005e = ╱fe0000c806╱ // 0xafc @0x5e
0xa9e…b03 at0063 = ╱ee╱)╱ // 0xb01 @0x63
0xa9e…b03 at0064 = EOL // 0xb02 @0x64
0xa9e…b03 }
0xb03…b48 989f 2075 PRINT "************************************************************";
0xb03…b48 LineComalBin {
0xb03…b48 ptr = 0x989f // 0xb03 @0x0
0xb03…b48 lno = 0x081b // 0xb05 @0x2
0xb03…b48 at0004 = ╱92╱ PRINT ╱ // 0xb07 @0x4
0xb03…b48 at0005 = ╱22╱"╱ // 0xb08 @0x5
0xb03…b48 at0006 = ╱2a╱*╱ // 0xb09 @0x6
0xb03…b48 at0007 = ╱2a╱*╱ // 0xb0a @0x7
0xb03…b48 at0008 = ╱2a╱*╱ // 0xb0b @0x8
0xb03…b48 at0009 = ╱2a╱*╱ // 0xb0c @0x9
0xb03…b48 at000a = ╱2a╱*╱ // 0xb0d @0xa
0xb03…b48 at000b = ╱2a╱*╱ // 0xb0e @0xb
0xb03…b48 at000c = ╱2a╱*╱ // 0xb0f @0xc
0xb03…b48 at000d = ╱2a╱*╱ // 0xb10 @0xd
0xb03…b48 at000e = ╱2a╱*╱ // 0xb11 @0xe
0xb03…b48 at000f = ╱2a╱*╱ // 0xb12 @0xf
0xb03…b48 at0010 = ╱2a╱*╱ // 0xb13 @0x10
0xb03…b48 at0011 = ╱2a╱*╱ // 0xb14 @0x11
0xb03…b48 at0012 = ╱2a╱*╱ // 0xb15 @0x12
0xb03…b48 at0013 = ╱2a╱*╱ // 0xb16 @0x13
0xb03…b48 at0014 = ╱2a╱*╱ // 0xb17 @0x14
0xb03…b48 at0015 = ╱2a╱*╱ // 0xb18 @0x15
0xb03…b48 at0016 = ╱2a╱*╱ // 0xb19 @0x16
0xb03…b48 at0017 = ╱2a╱*╱ // 0xb1a @0x17
0xb03…b48 at0018 = ╱2a╱*╱ // 0xb1b @0x18
0xb03…b48 at0019 = ╱2a╱*╱ // 0xb1c @0x19
0xb03…b48 at001a = ╱2a╱*╱ // 0xb1d @0x1a
0xb03…b48 at001b = ╱2a╱*╱ // 0xb1e @0x1b
0xb03…b48 at001c = ╱2a╱*╱ // 0xb1f @0x1c
0xb03…b48 at001d = ╱2a╱*╱ // 0xb20 @0x1d
0xb03…b48 at001e = ╱2a╱*╱ // 0xb21 @0x1e
0xb03…b48 at001f = ╱2a╱*╱ // 0xb22 @0x1f
0xb03…b48 at0020 = ╱2a╱*╱ // 0xb23 @0x20
0xb03…b48 at0021 = ╱2a╱*╱ // 0xb24 @0x21
0xb03…b48 at0022 = ╱2a╱*╱ // 0xb25 @0x22
0xb03…b48 at0023 = ╱2a╱*╱ // 0xb26 @0x23
0xb03…b48 at0024 = ╱2a╱*╱ // 0xb27 @0x24
0xb03…b48 at0025 = ╱2a╱*╱ // 0xb28 @0x25
0xb03…b48 at0026 = ╱2a╱*╱ // 0xb29 @0x26
0xb03…b48 at0027 = ╱2a╱*╱ // 0xb2a @0x27
0xb03…b48 at0028 = ╱2a╱*╱ // 0xb2b @0x28
0xb03…b48 at0029 = ╱2a╱*╱ // 0xb2c @0x29
0xb03…b48 at002a = ╱2a╱*╱ // 0xb2d @0x2a
0xb03…b48 at002b = ╱2a╱*╱ // 0xb2e @0x2b
0xb03…b48 at002c = ╱2a╱*╱ // 0xb2f @0x2c
0xb03…b48 at002d = ╱2a╱*╱ // 0xb30 @0x2d
0xb03…b48 at002e = ╱2a╱*╱ // 0xb31 @0x2e
0xb03…b48 at002f = ╱2a╱*╱ // 0xb32 @0x2f
0xb03…b48 at0030 = ╱2a╱*╱ // 0xb33 @0x30
0xb03…b48 at0031 = ╱2a╱*╱ // 0xb34 @0x31
0xb03…b48 at0032 = ╱2a╱*╱ // 0xb35 @0x32
0xb03…b48 at0033 = ╱2a╱*╱ // 0xb36 @0x33
0xb03…b48 at0034 = ╱2a╱*╱ // 0xb37 @0x34
0xb03…b48 at0035 = ╱2a╱*╱ // 0xb38 @0x35
0xb03…b48 at0036 = ╱2a╱*╱ // 0xb39 @0x36
0xb03…b48 at0037 = ╱2a╱*╱ // 0xb3a @0x37
0xb03…b48 at0038 = ╱2a╱*╱ // 0xb3b @0x38
0xb03…b48 at0039 = ╱2a╱*╱ // 0xb3c @0x39
0xb03…b48 at003a = ╱2a╱*╱ // 0xb3d @0x3a
0xb03…b48 at003b = ╱2a╱*╱ // 0xb3e @0x3b
0xb03…b48 at003c = ╱2a╱*╱ // 0xb3f @0x3c
0xb03…b48 at003d = ╱2a╱*╱ // 0xb40 @0x3d
0xb03…b48 at003e = ╱2a╱*╱ // 0xb41 @0x3e
0xb03…b48 at003f = ╱2a╱*╱ // 0xb42 @0x3f
0xb03…b48 at0040 = ╱2a╱*╱ // 0xb43 @0x40
0xb03…b48 at0041 = ╱2a╱*╱ // 0xb44 @0x41
0xb03…b48 at0042 = ╱22╱"╱ // 0xb45 @0x42
0xb03…b48 at0043 = ╱eb╱;╱ // 0xb46 @0x43
0xb03…b48 at0044 = EOL // 0xb47 @0x44
0xb03…b48 }
0xb48…b64 98bb 2076 PRINT "*******************";
0xb48…b64 LineComalBin {
0xb48…b64 ptr = 0x98bb // 0xb48 @0x0
0xb48…b64 lno = 0x081c // 0xb4a @0x2
0xb48…b64 at0004 = ╱92╱ PRINT ╱ // 0xb4c @0x4
0xb48…b64 at0005 = ╱22╱"╱ // 0xb4d @0x5
0xb48…b64 at0006 = ╱2a╱*╱ // 0xb4e @0x6
0xb48…b64 at0007 = ╱2a╱*╱ // 0xb4f @0x7
0xb48…b64 at0008 = ╱2a╱*╱ // 0xb50 @0x8
0xb48…b64 at0009 = ╱2a╱*╱ // 0xb51 @0x9
0xb48…b64 at000a = ╱2a╱*╱ // 0xb52 @0xa
0xb48…b64 at000b = ╱2a╱*╱ // 0xb53 @0xb
0xb48…b64 at000c = ╱2a╱*╱ // 0xb54 @0xc
0xb48…b64 at000d = ╱2a╱*╱ // 0xb55 @0xd
0xb48…b64 at000e = ╱2a╱*╱ // 0xb56 @0xe
0xb48…b64 at000f = ╱2a╱*╱ // 0xb57 @0xf
0xb48…b64 at0010 = ╱2a╱*╱ // 0xb58 @0x10
0xb48…b64 at0011 = ╱2a╱*╱ // 0xb59 @0x11
0xb48…b64 at0012 = ╱2a╱*╱ // 0xb5a @0x12
0xb48…b64 at0013 = ╱2a╱*╱ // 0xb5b @0x13
0xb48…b64 at0014 = ╱2a╱*╱ // 0xb5c @0x14
0xb48…b64 at0015 = ╱2a╱*╱ // 0xb5d @0x15
0xb48…b64 at0016 = ╱2a╱*╱ // 0xb5e @0x16
0xb48…b64 at0017 = ╱2a╱*╱ // 0xb5f @0x17
0xb48…b64 at0018 = ╱2a╱*╱ // 0xb60 @0x18
0xb48…b64 at0019 = ╱22╱"╱ // 0xb61 @0x19
0xb48…b64 at001a = ╱eb╱;╱ // 0xb62 @0x1a
0xb48…b64 at001b = EOL // 0xb63 @0x1b
0xb48…b64 }
0xb64…b79 98d0 2080 GET MF4$:LMNR,MF41$
0xb64…b79 LineComalBin {
0xb64…b79 ptr = 0x98d0 // 0xb64 @0x0
0xb64…b79 lno = 0x0820 // 0xb66 @0x2
0xb64…b79 at0004 = ╱a9╱ GET ╱ // 0xb68 @0x4
0xb64…b79 at0005 = ╱4d╱M╱ // 0xb69 @0x5
0xb64…b79 at0006 = ╱46╱F╱ // 0xb6a @0x6
0xb64…b79 at0007 = ╱34╱4╱ // 0xb6b @0x7
0xb64…b79 at0008 = ╱ef╱$╱ // 0xb6c @0x8
0xb64…b79 at0009 = ╱f0╱:╱ // 0xb6d @0x9
0xb64…b79 at000a = ╱4c╱L╱ // 0xb6e @0xa
0xb64…b79 at000b = ╱4d╱M╱ // 0xb6f @0xb
0xb64…b79 at000c = ╱4e╱N╱ // 0xb70 @0xc
0xb64…b79 at000d = ╱52╱R╱ // 0xb71 @0xd
0xb64…b79 at000e = ╱ec╱,╱ // 0xb72 @0xe
0xb64…b79 at000f = ╱4d╱M╱ // 0xb73 @0xf
0xb64…b79 at0010 = ╱46╱F╱ // 0xb74 @0x10
0xb64…b79 at0011 = ╱34╱4╱ // 0xb75 @0x11
0xb64…b79 at0012 = ╱31╱1╱ // 0xb76 @0x12
0xb64…b79 at0013 = ╱ef╱$╱ // 0xb77 @0x13
0xb64…b79 at0014 = EOL // 0xb78 @0x14
0xb64…b79 }
0xb79…b7f 98d6 2090 ENDWHILE
0xb79…b7f LineComalBin {
0xb79…b7f ptr = 0x98d6 // 0xb79 @0x0
0xb79…b7f lno = 0x082a // 0xb7b @0x2
0xb79…b7f at0004 = ╱94╱ ENDWHILE ╱ // 0xb7d @0x4
0xb79…b7f at0005 = EOL // 0xb7e @0x5
0xb79…b7f }
0xb7f…ba7 98fe 2095 IF STATUS(MF4$)<>19 THEN EXEC FEJL(LMNR,B,MF4$)
0xb7f…ba7 LineComalBin {
0xb7f…ba7 ptr = 0x98fe // 0xb7f @0x0
0xb7f…ba7 lno = 0x082f // 0xb81 @0x2
0xb7f…ba7 at0004 = ╱82╱ IF ╱ // 0xb83 @0x4
0xb7f…ba7 at0005 = ╱ce╱STATUS╱ // 0xb84 @0x5
0xb7f…ba7 at0006 = ╱ed╱(╱ // 0xb85 @0x6
0xb7f…ba7 at0007 = ╱4d╱M╱ // 0xb86 @0x7
0xb7f…ba7 at0008 = ╱46╱F╱ // 0xb87 @0x8
0xb7f…ba7 at0009 = ╱34╱4╱ // 0xb88 @0x9
0xb7f…ba7 at000a = ╱ef╱$╱ // 0xb89 @0xa
0xb7f…ba7 at000b = ╱ee╱)╱ // 0xb8a @0xb
0xb7f…ba7 at000c = ╱e1╱<>╱ // 0xb8b @0xc
0xb7f…ba7 at000d = ╱31╱1╱ // 0xb8c @0xd
0xb7f…ba7 at000e = ╱39╱9╱ // 0xb8d @0xe
0xb7f…ba7 at000f = ╱fe00009805╱ // 0xb8e @0xf
0xb7f…ba7 at0014 = ╱b6╱ THEN ╱ // 0xb93 @0x14
0xb7f…ba7 at0015 = ╱9d╱ EXEC ╱ // 0xb94 @0x15
0xb7f…ba7 at0016 = ╱46╱F╱ // 0xb95 @0x16
0xb7f…ba7 at0017 = ╱45╱E╱ // 0xb96 @0x17
0xb7f…ba7 at0018 = ╱4a╱J╱ // 0xb97 @0x18
0xb7f…ba7 at0019 = ╱4c╱L╱ // 0xb98 @0x19
0xb7f…ba7 at001a = ╱ed╱(╱ // 0xb99 @0x1a
0xb7f…ba7 at001b = ╱4c╱L╱ // 0xb9a @0x1b
0xb7f…ba7 at001c = ╱4d╱M╱ // 0xb9b @0x1c
0xb7f…ba7 at001d = ╱4e╱N╱ // 0xb9c @0x1d
0xb7f…ba7 at001e = ╱52╱R╱ // 0xb9d @0x1e
0xb7f…ba7 at001f = ╱ec╱,╱ // 0xb9e @0x1f
0xb7f…ba7 at0020 = ╱42╱B╱ // 0xb9f @0x20
0xb7f…ba7 at0021 = ╱ec╱,╱ // 0xba0 @0x21
0xb7f…ba7 at0022 = ╱4d╱M╱ // 0xba1 @0x22
0xb7f…ba7 at0023 = ╱46╱F╱ // 0xba2 @0x23
0xb7f…ba7 at0024 = ╱34╱4╱ // 0xba3 @0x24
0xb7f…ba7 at0025 = ╱ef╱$╱ // 0xba4 @0x25
0xb7f…ba7 at0026 = ╱ee╱)╱ // 0xba5 @0x26
0xb7f…ba7 at0027 = EOL // 0xba6 @0x27
0xb7f…ba7 }
0xba7…bb7 990e 2100 FOR I=E TO 6
0xba7…bb7 LineComalBin {
0xba7…bb7 ptr = 0x990e // 0xba7 @0x0
0xba7…bb7 lno = 0x0834 // 0xba9 @0x2
0xba7…bb7 at0004 = ╱83╱ FOR ╱ // 0xbab @0x4
0xba7…bb7 at0005 = ╱49╱I╱ // 0xbac @0x5
0xba7…bb7 at0006 = ╱dc╱=╱ // 0xbad @0x6
0xba7…bb7 at0007 = ╱45╱E╱ // 0xbae @0x7
0xba7…bb7 at0008 = ╱b7╱ TO ╱ // 0xbaf @0x8
0xba7…bb7 at0009 = ╱36╱6╱ // 0xbb0 @0x9
0xba7…bb7 at000a = ╱fe0000c003╱ // 0xbb1 @0xa
0xba7…bb7 at000f = EOL // 0xbb6 @0xf
0xba7…bb7 }
0xbb7…be8 993f 2110 IF TOTAL$(I,12)="+" THEN TOTAL$(I,12)=" "
0xbb7…be8 LineComalBin {
0xbb7…be8 ptr = 0x993f // 0xbb7 @0x0
0xbb7…be8 lno = 0x083e // 0xbb9 @0x2
0xbb7…be8 at0004 = ╱82╱ IF ╱ // 0xbbb @0x4
0xbb7…be8 at0005 = ╱54╱T╱ // 0xbbc @0x5
0xbb7…be8 at0006 = ╱4f╱O╱ // 0xbbd @0x6
0xbb7…be8 at0007 = ╱54╱T╱ // 0xbbe @0x7
0xbb7…be8 at0008 = ╱41╱A╱ // 0xbbf @0x8
0xbb7…be8 at0009 = ╱4c╱L╱ // 0xbc0 @0x9
0xbb7…be8 at000a = ╱ef╱$╱ // 0xbc1 @0xa
0xbb7…be8 at000b = ╱ed╱(╱ // 0xbc2 @0xb
0xbb7…be8 at000c = ╱49╱I╱ // 0xbc3 @0xc
0xbb7…be8 at000d = ╱ec╱,╱ // 0xbc4 @0xd
0xbb7…be8 at000e = ╱31╱1╱ // 0xbc5 @0xe
0xbb7…be8 at000f = ╱32╱2╱ // 0xbc6 @0xf
0xbb7…be8 at0010 = ╱fe0000c004╱ // 0xbc7 @0x10
0xbb7…be8 at0015 = ╱ee╱)╱ // 0xbcc @0x15
0xbb7…be8 at0016 = ╱dc╱=╱ // 0xbcd @0x16
0xbb7…be8 at0017 = ╱22╱"╱ // 0xbce @0x17
0xbb7…be8 at0018 = ╱2b╱+╱ // 0xbcf @0x18
0xbb7…be8 at0019 = ╱22╱"╱ // 0xbd0 @0x19
0xbb7…be8 at001a = ╱b6╱ THEN ╱ // 0xbd1 @0x1a
0xbb7…be8 at001b = ╱54╱T╱ // 0xbd2 @0x1b
0xbb7…be8 at001c = ╱4f╱O╱ // 0xbd3 @0x1c
0xbb7…be8 at001d = ╱54╱T╱ // 0xbd4 @0x1d
0xbb7…be8 at001e = ╱41╱A╱ // 0xbd5 @0x1e
0xbb7…be8 at001f = ╱4c╱L╱ // 0xbd6 @0x1f
0xbb7…be8 at0020 = ╱ef╱$╱ // 0xbd7 @0x20
0xbb7…be8 at0021 = ╱ed╱(╱ // 0xbd8 @0x21
0xbb7…be8 at0022 = ╱49╱I╱ // 0xbd9 @0x22
0xbb7…be8 at0023 = ╱ec╱,╱ // 0xbda @0x23
0xbb7…be8 at0024 = ╱31╱1╱ // 0xbdb @0x24
0xbb7…be8 at0025 = ╱32╱2╱ // 0xbdc @0x25
0xbb7…be8 at0026 = ╱fe0000c004╱ // 0xbdd @0x26
0xbb7…be8 at002b = ╱ee╱)╱ // 0xbe2 @0x2b
0xbb7…be8 at002c = ╱dc╱=╱ // 0xbe3 @0x2c
0xbb7…be8 at002d = ╱22╱"╱ // 0xbe4 @0x2d
0xbb7…be8 at002e = ╱20╱…╱ // 0xbe5 @0x2e
0xbb7…be8 at002f = ╱22╱"╱ // 0xbe6 @0x2f
0xbb7…be8 at0030 = EOL // 0xbe7 @0x30
0xbb7…be8 }
0xbe8…bf7 994e 2112 IF I<6 THEN
0xbe8…bf7 LineComalBin {
0xbe8…bf7 ptr = 0x994e // 0xbe8 @0x0
0xbe8…bf7 lno = 0x0840 // 0xbea @0x2
0xbe8…bf7 at0004 = ╱9c╱ IF ╱ // 0xbec @0x4
0xbe8…bf7 at0005 = ╱49╱I╱ // 0xbed @0x5
0xbe8…bf7 at0006 = ╱dd╱<╱ // 0xbee @0x6
0xbe8…bf7 at0007 = ╱36╱6╱ // 0xbef @0x7
0xbe8…bf7 at0008 = ╱fe0000c003╱ // 0xbf0 @0x8
0xbe8…bf7 at000d = ╱b6╱ THEN ╱ // 0xbf5 @0xd
0xbe8…bf7 at000e = EOL // 0xbf6 @0xe
0xbe8…bf7 }
0xbf7…c2a 9981 2114 IF TOTAL1$(I,12)="+" THEN TOTAL1$(I,12)=" "
0xbf7…c2a LineComalBin {
0xbf7…c2a ptr = 0x9981 // 0xbf7 @0x0
0xbf7…c2a lno = 0x0842 // 0xbf9 @0x2
0xbf7…c2a at0004 = ╱82╱ IF ╱ // 0xbfb @0x4
0xbf7…c2a at0005 = ╱54╱T╱ // 0xbfc @0x5
0xbf7…c2a at0006 = ╱4f╱O╱ // 0xbfd @0x6
0xbf7…c2a at0007 = ╱54╱T╱ // 0xbfe @0x7
0xbf7…c2a at0008 = ╱41╱A╱ // 0xbff @0x8
0xbf7…c2a at0009 = ╱4c╱L╱ // 0xc00 @0x9
0xbf7…c2a at000a = ╱31╱1╱ // 0xc01 @0xa
0xbf7…c2a at000b = ╱ef╱$╱ // 0xc02 @0xb
0xbf7…c2a at000c = ╱ed╱(╱ // 0xc03 @0xc
0xbf7…c2a at000d = ╱49╱I╱ // 0xc04 @0xd
0xbf7…c2a at000e = ╱ec╱,╱ // 0xc05 @0xe
0xbf7…c2a at000f = ╱31╱1╱ // 0xc06 @0xf
0xbf7…c2a at0010 = ╱32╱2╱ // 0xc07 @0x10
0xbf7…c2a at0011 = ╱fe0000c004╱ // 0xc08 @0x11
0xbf7…c2a at0016 = ╱ee╱)╱ // 0xc0d @0x16
0xbf7…c2a at0017 = ╱dc╱=╱ // 0xc0e @0x17
0xbf7…c2a at0018 = ╱22╱"╱ // 0xc0f @0x18
0xbf7…c2a at0019 = ╱2b╱+╱ // 0xc10 @0x19
0xbf7…c2a at001a = ╱22╱"╱ // 0xc11 @0x1a
0xbf7…c2a at001b = ╱b6╱ THEN ╱ // 0xc12 @0x1b
0xbf7…c2a at001c = ╱54╱T╱ // 0xc13 @0x1c
0xbf7…c2a at001d = ╱4f╱O╱ // 0xc14 @0x1d
0xbf7…c2a at001e = ╱54╱T╱ // 0xc15 @0x1e
0xbf7…c2a at001f = ╱41╱A╱ // 0xc16 @0x1f
0xbf7…c2a at0020 = ╱4c╱L╱ // 0xc17 @0x20
0xbf7…c2a at0021 = ╱31╱1╱ // 0xc18 @0x21
0xbf7…c2a at0022 = ╱ef╱$╱ // 0xc19 @0x22
0xbf7…c2a at0023 = ╱ed╱(╱ // 0xc1a @0x23
0xbf7…c2a at0024 = ╱49╱I╱ // 0xc1b @0x24
0xbf7…c2a at0025 = ╱ec╱,╱ // 0xc1c @0x25
0xbf7…c2a at0026 = ╱31╱1╱ // 0xc1d @0x26
0xbf7…c2a at0027 = ╱32╱2╱ // 0xc1e @0x27
0xbf7…c2a at0028 = ╱fe0000c004╱ // 0xc1f @0x28
0xbf7…c2a at002d = ╱ee╱)╱ // 0xc24 @0x2d
0xbf7…c2a at002e = ╱dc╱=╱ // 0xc25 @0x2e
0xbf7…c2a at002f = ╱22╱"╱ // 0xc26 @0x2f
0xbf7…c2a at0030 = ╱20╱…╱ // 0xc27 @0x30
0xbf7…c2a at0031 = ╱22╱"╱ // 0xc28 @0x31
0xbf7…c2a at0032 = EOL // 0xc29 @0x32
0xbf7…c2a }
0xc2a…c30 9987 2115 ENDIF
0xc2a…c30 LineComalBin {
0xc2a…c30 ptr = 0x9987 // 0xc2a @0x0
0xc2a…c30 lno = 0x0843 // 0xc2c @0x2
0xc2a…c30 at0004 = ╱9b╱ ENDIF ╱ // 0xc2e @0x4
0xc2a…c30 at0005 = EOL // 0xc2f @0x5
0xc2a…c30 }
0xc30…c37 998e 2120 NEXT I
0xc30…c37 LineComalBin {
0xc30…c37 ptr = 0x998e // 0xc30 @0x0
0xc30…c37 lno = 0x0848 // 0xc32 @0x2
0xc30…c37 at0004 = ╱84╱ NEXT ╱ // 0xc34 @0x4
0xc30…c37 at0005 = ╱49╱I╱ // 0xc35 @0x5
0xc30…c37 at0006 = EOL // 0xc36 @0x6
0xc30…c37 }
0xc37…c88 99df 2130 PRINT " ***";TAB(36);TOTAL$(E);TAB(52);TOTAL$(G);TAB(68);TOTAL$(6);
0xc37…c88 LineComalBin {
0xc37…c88 ptr = 0x99df // 0xc37 @0x0
0xc37…c88 lno = 0x0852 // 0xc39 @0x2
0xc37…c88 at0004 = ╱92╱ PRINT ╱ // 0xc3b @0x4
0xc37…c88 at0005 = ╱22╱"╱ // 0xc3c @0x5
0xc37…c88 at0006 = ╱20╱…╱ // 0xc3d @0x6
0xc37…c88 at0007 = ╱2a╱*╱ // 0xc3e @0x7
0xc37…c88 at0008 = ╱2a╱*╱ // 0xc3f @0x8
0xc37…c88 at0009 = ╱2a╱*╱ // 0xc40 @0x9
0xc37…c88 at000a = ╱22╱"╱ // 0xc41 @0xa
0xc37…c88 at000b = ╱eb╱;╱ // 0xc42 @0xb
0xc37…c88 at000c = ╱d2╱TAB╱ // 0xc43 @0xc
0xc37…c88 at000d = ╱ed╱(╱ // 0xc44 @0xd
0xc37…c88 at000e = ╱33╱3╱ // 0xc45 @0xe
0xc37…c88 at000f = ╱36╱6╱ // 0xc46 @0xf
0xc37…c88 at0010 = ╱fe00009006╱ // 0xc47 @0x10
0xc37…c88 at0015 = ╱ee╱)╱ // 0xc4c @0x15
0xc37…c88 at0016 = ╱eb╱;╱ // 0xc4d @0x16
0xc37…c88 at0017 = ╱54╱T╱ // 0xc4e @0x17
0xc37…c88 at0018 = ╱4f╱O╱ // 0xc4f @0x18
0xc37…c88 at0019 = ╱54╱T╱ // 0xc50 @0x19
0xc37…c88 at001a = ╱41╱A╱ // 0xc51 @0x1a
0xc37…c88 at001b = ╱4c╱L╱ // 0xc52 @0x1b
0xc37…c88 at001c = ╱ef╱$╱ // 0xc53 @0x1c
0xc37…c88 at001d = ╱ed╱(╱ // 0xc54 @0x1d
0xc37…c88 at001e = ╱45╱E╱ // 0xc55 @0x1e
0xc37…c88 at001f = ╱ee╱)╱ // 0xc56 @0x1f
0xc37…c88 at0020 = ╱eb╱;╱ // 0xc57 @0x20
0xc37…c88 at0021 = ╱d2╱TAB╱ // 0xc58 @0x21
0xc37…c88 at0022 = ╱ed╱(╱ // 0xc59 @0x22
0xc37…c88 at0023 = ╱35╱5╱ // 0xc5a @0x23
0xc37…c88 at0024 = ╱32╱2╱ // 0xc5b @0x24
0xc37…c88 at0025 = ╱fe0000d006╱ // 0xc5c @0x25
0xc37…c88 at002a = ╱ee╱)╱ // 0xc61 @0x2a
0xc37…c88 at002b = ╱eb╱;╱ // 0xc62 @0x2b
0xc37…c88 at002c = ╱54╱T╱ // 0xc63 @0x2c
0xc37…c88 at002d = ╱4f╱O╱ // 0xc64 @0x2d
0xc37…c88 at002e = ╱54╱T╱ // 0xc65 @0x2e
0xc37…c88 at002f = ╱41╱A╱ // 0xc66 @0x2f
0xc37…c88 at0030 = ╱4c╱L╱ // 0xc67 @0x30
0xc37…c88 at0031 = ╱ef╱$╱ // 0xc68 @0x31
0xc37…c88 at0032 = ╱ed╱(╱ // 0xc69 @0x32
0xc37…c88 at0033 = ╱47╱G╱ // 0xc6a @0x33
0xc37…c88 at0034 = ╱ee╱)╱ // 0xc6b @0x34
0xc37…c88 at0035 = ╱eb╱;╱ // 0xc6c @0x35
0xc37…c88 at0036 = ╱d2╱TAB╱ // 0xc6d @0x36
0xc37…c88 at0037 = ╱ed╱(╱ // 0xc6e @0x37
0xc37…c88 at0038 = ╱36╱6╱ // 0xc6f @0x38
0xc37…c88 at0039 = ╱38╱8╱ // 0xc70 @0x39
0xc37…c88 at003a = ╱fe00008807╱ // 0xc71 @0x3a
0xc37…c88 at003f = ╱ee╱)╱ // 0xc76 @0x3f
0xc37…c88 at0040 = ╱eb╱;╱ // 0xc77 @0x40
0xc37…c88 at0041 = ╱54╱T╱ // 0xc78 @0x41
0xc37…c88 at0042 = ╱4f╱O╱ // 0xc79 @0x42
0xc37…c88 at0043 = ╱54╱T╱ // 0xc7a @0x43
0xc37…c88 at0044 = ╱41╱A╱ // 0xc7b @0x44
0xc37…c88 at0045 = ╱4c╱L╱ // 0xc7c @0x45
0xc37…c88 at0046 = ╱ef╱$╱ // 0xc7d @0x46
0xc37…c88 at0047 = ╱ed╱(╱ // 0xc7e @0x47
0xc37…c88 at0048 = ╱36╱6╱ // 0xc7f @0x48
0xc37…c88 at0049 = ╱fe0000c003╱ // 0xc80 @0x49
0xc37…c88 at004e = ╱ee╱)╱ // 0xc85 @0x4e
0xc37…c88 at004f = ╱eb╱;╱ // 0xc86 @0x4f
0xc37…c88 at0050 = EOL // 0xc87 @0x50
0xc37…c88 }
0xc88…cd6 9a2d 2132 PRINT TAB(28);TOTAL$(V);TAB(44);TOTAL$(4);TAB(60);TOTAL$(5)
0xc88…cd6 LineComalBin {
0xc88…cd6 ptr = 0x9a2d // 0xc88 @0x0
0xc88…cd6 lno = 0x0854 // 0xc8a @0x2
0xc88…cd6 at0004 = ╱92╱ PRINT ╱ // 0xc8c @0x4
0xc88…cd6 at0005 = ╱d2╱TAB╱ // 0xc8d @0x5
0xc88…cd6 at0006 = ╱ed╱(╱ // 0xc8e @0x6
0xc88…cd6 at0007 = ╱32╱2╱ // 0xc8f @0x7
0xc88…cd6 at0008 = ╱38╱8╱ // 0xc90 @0x8
0xc88…cd6 at0009 = ╱fe0000e005╱ // 0xc91 @0x9
0xc88…cd6 at000e = ╱ee╱)╱ // 0xc96 @0xe
0xc88…cd6 at000f = ╱eb╱;╱ // 0xc97 @0xf
0xc88…cd6 at0010 = ╱54╱T╱ // 0xc98 @0x10
0xc88…cd6 at0011 = ╱4f╱O╱ // 0xc99 @0x11
0xc88…cd6 at0012 = ╱54╱T╱ // 0xc9a @0x12
0xc88…cd6 at0013 = ╱41╱A╱ // 0xc9b @0x13
0xc88…cd6 at0014 = ╱4c╱L╱ // 0xc9c @0x14
0xc88…cd6 at0015 = ╱ef╱$╱ // 0xc9d @0x15
0xc88…cd6 at0016 = ╱ed╱(╱ // 0xc9e @0x16
0xc88…cd6 at0017 = ╱56╱V╱ // 0xc9f @0x17
0xc88…cd6 at0018 = ╱ee╱)╱ // 0xca0 @0x18
0xc88…cd6 at0019 = ╱eb╱;╱ // 0xca1 @0x19
0xc88…cd6 at001a = ╱d2╱TAB╱ // 0xca2 @0x1a
0xc88…cd6 at001b = ╱ed╱(╱ // 0xca3 @0x1b
0xc88…cd6 at001c = ╱34╱4╱ // 0xca4 @0x1c
0xc88…cd6 at001d = ╱34╱4╱ // 0xca5 @0x1d
0xc88…cd6 at001e = ╱fe0000b006╱ // 0xca6 @0x1e
0xc88…cd6 at0023 = ╱ee╱)╱ // 0xcab @0x23
0xc88…cd6 at0024 = ╱eb╱;╱ // 0xcac @0x24
0xc88…cd6 at0025 = ╱54╱T╱ // 0xcad @0x25
0xc88…cd6 at0026 = ╱4f╱O╱ // 0xcae @0x26
0xc88…cd6 at0027 = ╱54╱T╱ // 0xcaf @0x27
0xc88…cd6 at0028 = ╱41╱A╱ // 0xcb0 @0x28
0xc88…cd6 at0029 = ╱4c╱L╱ // 0xcb1 @0x29
0xc88…cd6 at002a = ╱ef╱$╱ // 0xcb2 @0x2a
0xc88…cd6 at002b = ╱ed╱(╱ // 0xcb3 @0x2b
0xc88…cd6 at002c = ╱34╱4╱ // 0xcb4 @0x2c
0xc88…cd6 at002d = ╱fe00008003╱ // 0xcb5 @0x2d
0xc88…cd6 at0032 = ╱ee╱)╱ // 0xcba @0x32
0xc88…cd6 at0033 = ╱eb╱;╱ // 0xcbb @0x33
0xc88…cd6 at0034 = ╱d2╱TAB╱ // 0xcbc @0x34
0xc88…cd6 at0035 = ╱ed╱(╱ // 0xcbd @0x35
0xc88…cd6 at0036 = ╱36╱6╱ // 0xcbe @0x36
0xc88…cd6 at0037 = ╱30╱0╱ // 0xcbf @0x37
0xc88…cd6 at0038 = ╱fe0000f006╱ // 0xcc0 @0x38
0xc88…cd6 at003d = ╱ee╱)╱ // 0xcc5 @0x3d
0xc88…cd6 at003e = ╱eb╱;╱ // 0xcc6 @0x3e
0xc88…cd6 at003f = ╱54╱T╱ // 0xcc7 @0x3f
0xc88…cd6 at0040 = ╱4f╱O╱ // 0xcc8 @0x40
0xc88…cd6 at0041 = ╱54╱T╱ // 0xcc9 @0x41
0xc88…cd6 at0042 = ╱41╱A╱ // 0xcca @0x42
0xc88…cd6 at0043 = ╱4c╱L╱ // 0xccb @0x43
0xc88…cd6 at0044 = ╱ef╱$╱ // 0xccc @0x44
0xc88…cd6 at0045 = ╱ed╱(╱ // 0xccd @0x45
0xc88…cd6 at0046 = ╱35╱5╱ // 0xcce @0x46
0xc88…cd6 at0047 = ╱fe0000a003╱ // 0xccf @0x47
0xc88…cd6 at004c = ╱ee╱)╱ // 0xcd4 @0x4c
0xc88…cd6 at004d = EOL // 0xcd5 @0x4d
0xc88…cd6 }
0xcd6…d0c 9a63 2134 PRINT TAB(36);TOTAL1$(G);TAB(52);TOTAL1$(4)
0xcd6…d0c LineComalBin {
0xcd6…d0c ptr = 0x9a63 // 0xcd6 @0x0
0xcd6…d0c lno = 0x0856 // 0xcd8 @0x2
0xcd6…d0c at0004 = ╱92╱ PRINT ╱ // 0xcda @0x4
0xcd6…d0c at0005 = ╱d2╱TAB╱ // 0xcdb @0x5
0xcd6…d0c at0006 = ╱ed╱(╱ // 0xcdc @0x6
0xcd6…d0c at0007 = ╱33╱3╱ // 0xcdd @0x7
0xcd6…d0c at0008 = ╱36╱6╱ // 0xcde @0x8
0xcd6…d0c at0009 = ╱fe00009006╱ // 0xcdf @0x9
0xcd6…d0c at000e = ╱ee╱)╱ // 0xce4 @0xe
0xcd6…d0c at000f = ╱eb╱;╱ // 0xce5 @0xf
0xcd6…d0c at0010 = ╱54╱T╱ // 0xce6 @0x10
0xcd6…d0c at0011 = ╱4f╱O╱ // 0xce7 @0x11
0xcd6…d0c at0012 = ╱54╱T╱ // 0xce8 @0x12
0xcd6…d0c at0013 = ╱41╱A╱ // 0xce9 @0x13
0xcd6…d0c at0014 = ╱4c╱L╱ // 0xcea @0x14
0xcd6…d0c at0015 = ╱31╱1╱ // 0xceb @0x15
0xcd6…d0c at0016 = ╱ef╱$╱ // 0xcec @0x16
0xcd6…d0c at0017 = ╱ed╱(╱ // 0xced @0x17
0xcd6…d0c at0018 = ╱47╱G╱ // 0xcee @0x18
0xcd6…d0c at0019 = ╱ee╱)╱ // 0xcef @0x19
0xcd6…d0c at001a = ╱eb╱;╱ // 0xcf0 @0x1a
0xcd6…d0c at001b = ╱d2╱TAB╱ // 0xcf1 @0x1b
0xcd6…d0c at001c = ╱ed╱(╱ // 0xcf2 @0x1c
0xcd6…d0c at001d = ╱35╱5╱ // 0xcf3 @0x1d
0xcd6…d0c at001e = ╱32╱2╱ // 0xcf4 @0x1e
0xcd6…d0c at001f = ╱fe0000d006╱ // 0xcf5 @0x1f
0xcd6…d0c at0024 = ╱ee╱)╱ // 0xcfa @0x24
0xcd6…d0c at0025 = ╱eb╱;╱ // 0xcfb @0x25
0xcd6…d0c at0026 = ╱54╱T╱ // 0xcfc @0x26
0xcd6…d0c at0027 = ╱4f╱O╱ // 0xcfd @0x27
0xcd6…d0c at0028 = ╱54╱T╱ // 0xcfe @0x28
0xcd6…d0c at0029 = ╱41╱A╱ // 0xcff @0x29
0xcd6…d0c at002a = ╱4c╱L╱ // 0xd00 @0x2a
0xcd6…d0c at002b = ╱31╱1╱ // 0xd01 @0x2b
0xcd6…d0c at002c = ╱ef╱$╱ // 0xd02 @0x2c
0xcd6…d0c at002d = ╱ed╱(╱ // 0xd03 @0x2d
0xcd6…d0c at002e = ╱34╱4╱ // 0xd04 @0x2e
0xcd6…d0c at002f = ╱fe00008003╱ // 0xd05 @0x2f
0xcd6…d0c at0034 = ╱ee╱)╱ // 0xd0a @0x34
0xcd6…d0c at0035 = EOL // 0xd0b @0x35
0xcd6…d0c }
0xd0c…d58 9aaf 2136 PRINT TAB(28);TOTAL1$(E);TAB(44);TOTAL1$(V);TAB(60);TOTAL1$(5)
0xd0c…d58 LineComalBin {
0xd0c…d58 ptr = 0x9aaf // 0xd0c @0x0
0xd0c…d58 lno = 0x0858 // 0xd0e @0x2
0xd0c…d58 at0004 = ╱92╱ PRINT ╱ // 0xd10 @0x4
0xd0c…d58 at0005 = ╱d2╱TAB╱ // 0xd11 @0x5
0xd0c…d58 at0006 = ╱ed╱(╱ // 0xd12 @0x6
0xd0c…d58 at0007 = ╱32╱2╱ // 0xd13 @0x7
0xd0c…d58 at0008 = ╱38╱8╱ // 0xd14 @0x8
0xd0c…d58 at0009 = ╱fe0000e005╱ // 0xd15 @0x9
0xd0c…d58 at000e = ╱ee╱)╱ // 0xd1a @0xe
0xd0c…d58 at000f = ╱eb╱;╱ // 0xd1b @0xf
0xd0c…d58 at0010 = ╱54╱T╱ // 0xd1c @0x10
0xd0c…d58 at0011 = ╱4f╱O╱ // 0xd1d @0x11
0xd0c…d58 at0012 = ╱54╱T╱ // 0xd1e @0x12
0xd0c…d58 at0013 = ╱41╱A╱ // 0xd1f @0x13
0xd0c…d58 at0014 = ╱4c╱L╱ // 0xd20 @0x14
0xd0c…d58 at0015 = ╱31╱1╱ // 0xd21 @0x15
0xd0c…d58 at0016 = ╱ef╱$╱ // 0xd22 @0x16
0xd0c…d58 at0017 = ╱ed╱(╱ // 0xd23 @0x17
0xd0c…d58 at0018 = ╱45╱E╱ // 0xd24 @0x18
0xd0c…d58 at0019 = ╱ee╱)╱ // 0xd25 @0x19
0xd0c…d58 at001a = ╱eb╱;╱ // 0xd26 @0x1a
0xd0c…d58 at001b = ╱d2╱TAB╱ // 0xd27 @0x1b
0xd0c…d58 at001c = ╱ed╱(╱ // 0xd28 @0x1c
0xd0c…d58 at001d = ╱34╱4╱ // 0xd29 @0x1d
0xd0c…d58 at001e = ╱34╱4╱ // 0xd2a @0x1e
0xd0c…d58 at001f = ╱fe0000b006╱ // 0xd2b @0x1f
0xd0c…d58 at0024 = ╱ee╱)╱ // 0xd30 @0x24
0xd0c…d58 at0025 = ╱eb╱;╱ // 0xd31 @0x25
0xd0c…d58 at0026 = ╱54╱T╱ // 0xd32 @0x26
0xd0c…d58 at0027 = ╱4f╱O╱ // 0xd33 @0x27
0xd0c…d58 at0028 = ╱54╱T╱ // 0xd34 @0x28
0xd0c…d58 at0029 = ╱41╱A╱ // 0xd35 @0x29
0xd0c…d58 at002a = ╱4c╱L╱ // 0xd36 @0x2a
0xd0c…d58 at002b = ╱31╱1╱ // 0xd37 @0x2b
0xd0c…d58 at002c = ╱ef╱$╱ // 0xd38 @0x2c
0xd0c…d58 at002d = ╱ed╱(╱ // 0xd39 @0x2d
0xd0c…d58 at002e = ╱56╱V╱ // 0xd3a @0x2e
0xd0c…d58 at002f = ╱ee╱)╱ // 0xd3b @0x2f
0xd0c…d58 at0030 = ╱eb╱;╱ // 0xd3c @0x30
0xd0c…d58 at0031 = ╱d2╱TAB╱ // 0xd3d @0x31
0xd0c…d58 at0032 = ╱ed╱(╱ // 0xd3e @0x32
0xd0c…d58 at0033 = ╱36╱6╱ // 0xd3f @0x33
0xd0c…d58 at0034 = ╱30╱0╱ // 0xd40 @0x34
0xd0c…d58 at0035 = ╱fe0000f006╱ // 0xd41 @0x35
0xd0c…d58 at003a = ╱ee╱)╱ // 0xd46 @0x3a
0xd0c…d58 at003b = ╱eb╱;╱ // 0xd47 @0x3b
0xd0c…d58 at003c = ╱54╱T╱ // 0xd48 @0x3c
0xd0c…d58 at003d = ╱4f╱O╱ // 0xd49 @0x3d
0xd0c…d58 at003e = ╱54╱T╱ // 0xd4a @0x3e
0xd0c…d58 at003f = ╱41╱A╱ // 0xd4b @0x3f
0xd0c…d58 at0040 = ╱4c╱L╱ // 0xd4c @0x40
0xd0c…d58 at0041 = ╱31╱1╱ // 0xd4d @0x41
0xd0c…d58 at0042 = ╱ef╱$╱ // 0xd4e @0x42
0xd0c…d58 at0043 = ╱ed╱(╱ // 0xd4f @0x43
0xd0c…d58 at0044 = ╱35╱5╱ // 0xd50 @0x44
0xd0c…d58 at0045 = ╱fe0000a003╱ // 0xd51 @0x45
0xd0c…d58 at004a = ╱ee╱)╱ // 0xd56 @0x4a
0xd0c…d58 at004b = EOL // 0xd57 @0x4b
0xd0c…d58 }
0xd58…d6f 9ac6 2141 LINIE=LINIE+4
0xd58…d6f LineComalBin {
0xd58…d6f ptr = 0x9ac6 // 0xd58 @0x0
0xd58…d6f lno = 0x085d // 0xd5a @0x2
0xd58…d6f at0004 = ╱4c╱L╱ // 0xd5c @0x4
0xd58…d6f at0005 = ╱49╱I╱ // 0xd5d @0x5
0xd58…d6f at0006 = ╱4e╱N╱ // 0xd5e @0x6
0xd58…d6f at0007 = ╱49╱I╱ // 0xd5f @0x7
0xd58…d6f at0008 = ╱45╱E╱ // 0xd60 @0x8
0xd58…d6f at0009 = ╱dc╱=╱ // 0xd61 @0x9
0xd58…d6f at000a = ╱4c╱L╱ // 0xd62 @0xa
0xd58…d6f at000b = ╱49╱I╱ // 0xd63 @0xb
0xd58…d6f at000c = ╱4e╱N╱ // 0xd64 @0xc
0xd58…d6f at000d = ╱49╱I╱ // 0xd65 @0xd
0xd58…d6f at000e = ╱45╱E╱ // 0xd66 @0xe
0xd58…d6f at000f = ╱e2╱+╱ // 0xd67 @0xf
0xd58…d6f at0010 = ╱34╱4╱ // 0xd68 @0x10
0xd58…d6f at0011 = ╱fe00008003╱ // 0xd69 @0x11
0xd58…d6f at0016 = EOL // 0xd6e @0x16
0xd58…d6f }
0xd6f…d81 9ad8 2142 WHILE LINIE<MAXLIN
0xd6f…d81 LineComalBin {
0xd6f…d81 ptr = 0x9ad8 // 0xd6f @0x0
0xd6f…d81 lno = 0x085e // 0xd71 @0x2
0xd6f…d81 at0004 = ╱93╱ WHILE ╱ // 0xd73 @0x4
0xd6f…d81 at0005 = ╱4c╱L╱ // 0xd74 @0x5
0xd6f…d81 at0006 = ╱49╱I╱ // 0xd75 @0x6
0xd6f…d81 at0007 = ╱4e╱N╱ // 0xd76 @0x7
0xd6f…d81 at0008 = ╱49╱I╱ // 0xd77 @0x8
0xd6f…d81 at0009 = ╱45╱E╱ // 0xd78 @0x9
0xd6f…d81 at000a = ╱dd╱<╱ // 0xd79 @0xa
0xd6f…d81 at000b = ╱4d╱M╱ // 0xd7a @0xb
0xd6f…d81 at000c = ╱41╱A╱ // 0xd7b @0xc
0xd6f…d81 at000d = ╱58╱X╱ // 0xd7c @0xd
0xd6f…d81 at000e = ╱4c╱L╱ // 0xd7d @0xe
0xd6f…d81 at000f = ╱49╱I╱ // 0xd7e @0xf
0xd6f…d81 at0010 = ╱4e╱N╱ // 0xd7f @0x10
0xd6f…d81 at0011 = EOL // 0xd80 @0x11
0xd6f…d81 }
0xd81…d87 9ade 2144 PRINT
0xd81…d87 LineComalBin {
0xd81…d87 ptr = 0x9ade // 0xd81 @0x0
0xd81…d87 lno = 0x0860 // 0xd83 @0x2
0xd81…d87 at0004 = ╱92╱ PRINT ╱ // 0xd85 @0x4
0xd81…d87 at0005 = EOL // 0xd86 @0x5
0xd81…d87 }
0xd87…d99 9af0 2146 LINIE=LINIE+E
0xd87…d99 LineComalBin {
0xd87…d99 ptr = 0x9af0 // 0xd87 @0x0
0xd87…d99 lno = 0x0862 // 0xd89 @0x2
0xd87…d99 at0004 = ╱4c╱L╱ // 0xd8b @0x4
0xd87…d99 at0005 = ╱49╱I╱ // 0xd8c @0x5
0xd87…d99 at0006 = ╱4e╱N╱ // 0xd8d @0x6
0xd87…d99 at0007 = ╱49╱I╱ // 0xd8e @0x7
0xd87…d99 at0008 = ╱45╱E╱ // 0xd8f @0x8
0xd87…d99 at0009 = ╱dc╱=╱ // 0xd90 @0x9
0xd87…d99 at000a = ╱4c╱L╱ // 0xd91 @0xa
0xd87…d99 at000b = ╱49╱I╱ // 0xd92 @0xb
0xd87…d99 at000c = ╱4e╱N╱ // 0xd93 @0xc
0xd87…d99 at000d = ╱49╱I╱ // 0xd94 @0xd
0xd87…d99 at000e = ╱45╱E╱ // 0xd95 @0xe
0xd87…d99 at000f = ╱e2╱+╱ // 0xd96 @0xf
0xd87…d99 at0010 = ╱45╱E╱ // 0xd97 @0x10
0xd87…d99 at0011 = EOL // 0xd98 @0x11
0xd87…d99 }
0xd99…d9f 9af6 2148 ENDWHILE
0xd99…d9f LineComalBin {
0xd99…d9f ptr = 0x9af6 // 0xd99 @0x0
0xd99…d9f lno = 0x0864 // 0xd9b @0x2
0xd99…d9f at0004 = ╱94╱ ENDWHILE ╱ // 0xd9d @0x4
0xd99…d9f at0005 = EOL // 0xd9e @0x5
0xd99…d9f }
0xd9f…da6 9afd 2149 OUTPUT T
0xd9f…da6 LineComalBin {
0xd9f…da6 ptr = 0x9afd // 0xd9f @0x0
0xd9f…da6 lno = 0x0865 // 0xda1 @0x2
0xd9f…da6 at0004 = ╱a5╱ OUTPUT ╱ // 0xda3 @0x4
0xd9f…da6 at0005 = ╱54╱T╱ // 0xda4 @0x5
0xd9f…da6 at0006 = EOL // 0xda5 @0x6
0xd9f…da6 }
0xda6…dac 9b03 2150 CLOSE
0xda6…dac LineComalBin {
0xda6…dac ptr = 0x9b03 // 0xda6 @0x0
0xda6…dac lno = 0x0866 // 0xda8 @0x2
0xda6…dac at0004 = ╱a8╱ CLOSE ╱ // 0xdaa @0x4
0xda6…dac at0005 = EOL // 0xdab @0x5
0xda6…dac }
0xdac…dc2 0000 2160 CHAIN "P641210:LBILAG"
0xdac…dc2 LineComalBin {
0xdac…dc2 ptr = 0x0000 // 0xdac @0x0
0xdac…dc2 lno = 0x0870 // 0xdae @0x2
0xdac…dc2 at0004 = ╱ac╱ CHAIN ╱ // 0xdb0 @0x4
0xdac…dc2 at0005 = ╱22╱"╱ // 0xdb1 @0x5
0xdac…dc2 at0006 = ╱50╱P╱ // 0xdb2 @0x6
0xdac…dc2 at0007 = ╱36╱6╱ // 0xdb3 @0x7
0xdac…dc2 at0008 = ╱34╱4╱ // 0xdb4 @0x8
0xdac…dc2 at0009 = ╱31╱1╱ // 0xdb5 @0x9
0xdac…dc2 at000a = ╱32╱2╱ // 0xdb6 @0xa
0xdac…dc2 at000b = ╱31╱1╱ // 0xdb7 @0xb
0xdac…dc2 at000c = ╱30╱0╱ // 0xdb8 @0xc
0xdac…dc2 at000d = ╱3a╱:╱ // 0xdb9 @0xd
0xdac…dc2 at000e = ╱4c╱L╱ // 0xdba @0xe
0xdac…dc2 at000f = ╱42╱B╱ // 0xdbb @0xf
0xdac…dc2 at0010 = ╱49╱I╱ // 0xdbc @0x10
0xdac…dc2 at0011 = ╱4c╱L╱ // 0xdbd @0x11
0xdac…dc2 at0012 = ╱41╱A╱ // 0xdbe @0x12
0xdac…dc2 at0013 = ╱47╱G╱ // 0xdbf @0x13
0xdac…dc2 at0014 = ╱22╱"╱ // 0xdc0 @0x14
0xdac…dc2 at0015 = EOL // 0xdc1 @0x15
0xdac…dc2 }
0xdc2…dd6 57 8d 64 00 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 00 80 ┆W d B 0 E 1 ┆
0xdd6…df3 (46,) 01 eb 47 dc 32 fe 00 00 80 02 eb 56 dc 33 fe 00 00 c0 02 eb 57 dc 30 fe 00 00 00 00 ff ┆ G 2 V 3 W 0 ┆
0xdf3…df9 (47,) 57 8d 19 9b 10 00 ┆W ┆