|
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: 3691 (0xe6b)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »LFRADRAG.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »LFRADRAG.B«
0100 B=0;E=1;G=2;V=3;W=5 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 2091 IF LINIE>MAXLIN-W THEN 2092 WHILE LINIE<MAXLIN 2093 PRINT 2094 LINIE=LINIE+E 2095 ENDWHILE 2096 EXEC SKRIVHOVED 2097 ENDIF 2098 LINIE=LINIE+5 2099 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…031 (0,) 8d88 0100 B=0;E=1;G=2;V=3;W=5
0x000…031 LineComalBin {
0x000…031 ptr = 0x8d88 // 0x0 @0x0
0x000…031 lno = 0x0064 // 0x2 @0x2
0x000…031 at0004 = ╱42╱B╱ // 0x4 @0x4
0x000…031 at0005 = ╱dc╱=╱ // 0x5 @0x5
0x000…031 at0006 = ╱30╱0╱ // 0x6 @0x6
0x000…031 at0007 = ╱fe00000000╱ // 0x7 @0x7
0x000…031 at000c = ╱eb╱;╱ // 0xc @0xc
0x000…031 at000d = ╱45╱E╱ // 0xd @0xd
0x000…031 at000e = ╱dc╱=╱ // 0xe @0xe
0x000…031 at000f = ╱31╱1╱ // 0xf @0xf
0x000…031 at0010 = ╱fe00008001╱ // 0x10 @0x10
0x000…031 at0015 = ╱eb╱;╱ // 0x15 @0x15
0x000…031 at0016 = ╱47╱G╱ // 0x16 @0x16
0x000…031 at0017 = ╱dc╱=╱ // 0x17 @0x17
0x000…031 at0018 = ╱32╱2╱ // 0x18 @0x18
0x000…031 at0019 = ╱fe00008002╱ // 0x19 @0x19
0x000…031 at001e = ╱eb╱;╱ // 0x1e @0x1e
0x000…031 at001f = ╱56╱V╱ // 0x1f @0x1f
0x000…031 at0020 = ╱dc╱=╱ // 0x20 @0x20
0x000…031 at0021 = ╱33╱3╱ // 0x21 @0x21
0x000…031 at0022 = ╱fe0000c002╱ // 0x22 @0x22
0x000…031 at0027 = ╱eb╱;╱ // 0x27 @0x27
0x000…031 at0028 = ╱57╱W╱ // 0x28 @0x28
0x000…031 at0029 = ╱dc╱=╱ // 0x29 @0x29
0x000…031 at002a = ╱35╱5╱ // 0x2a @0x2a
0x000…031 at002b = ╱fe0000a003╱ // 0x2b @0x2b
0x000…031 at0030 = EOL // 0x30 @0x30
0x000…031 }
0x031…03e 8d95 0200 PROC INDVIRK
0x031…03e LineComalBin {
0x031…03e ptr = 0x8d95 // 0x31 @0x0
0x031…03e lno = 0x00c8 // 0x33 @0x2
0x031…03e at0004 = ╱9e╱ PROC ╱ // 0x35 @0x4
0x031…03e at0005 = ╱49╱I╱ // 0x36 @0x5
0x031…03e at0006 = ╱4e╱N╱ // 0x37 @0x6
0x031…03e at0007 = ╱44╱D╱ // 0x38 @0x7
0x031…03e at0008 = ╱56╱V╱ // 0x39 @0x8
0x031…03e at0009 = ╱49╱I╱ // 0x3a @0x9
0x031…03e at000a = ╱52╱R╱ // 0x3b @0xa
0x031…03e at000b = ╱4b╱K╱ // 0x3c @0xb
0x031…03e at000c = EOL // 0x3d @0xc
0x031…03e }
0x03e…04a 8da1 0210 OPEN FIL$,R
0x03e…04a LineComalBin {
0x03e…04a ptr = 0x8da1 // 0x3e @0x0
0x03e…04a lno = 0x00d2 // 0x40 @0x2
0x03e…04a at0004 = ╱a7╱ OPEN ╱ // 0x42 @0x4
0x03e…04a at0005 = ╱46╱F╱ // 0x43 @0x5
0x03e…04a at0006 = ╱49╱I╱ // 0x44 @0x6
0x03e…04a at0007 = ╱4c╱L╱ // 0x45 @0x7
0x03e…04a at0008 = ╱ef╱$╱ // 0x46 @0x8
0x03e…04a at0009 = ╱ec╱,╱ // 0x47 @0x9
0x03e…04a at000a = ╱52╱R╱ // 0x48 @0xa
0x03e…04a at000b = EOL // 0x49 @0xb
0x03e…04a }
0x04a…05e 8db5 0220 EXEC FEJL(B,B,FIL$)
0x04a…05e LineComalBin {
0x04a…05e ptr = 0x8db5 // 0x4a @0x0
0x04a…05e lno = 0x00dc // 0x4c @0x2
0x04a…05e at0004 = ╱9d╱ EXEC ╱ // 0x4e @0x4
0x04a…05e at0005 = ╱46╱F╱ // 0x4f @0x5
0x04a…05e at0006 = ╱45╱E╱ // 0x50 @0x6
0x04a…05e at0007 = ╱4a╱J╱ // 0x51 @0x7
0x04a…05e at0008 = ╱4c╱L╱ // 0x52 @0x8
0x04a…05e at0009 = ╱ed╱(╱ // 0x53 @0x9
0x04a…05e at000a = ╱42╱B╱ // 0x54 @0xa
0x04a…05e at000b = ╱ec╱,╱ // 0x55 @0xb
0x04a…05e at000c = ╱42╱B╱ // 0x56 @0xc
0x04a…05e at000d = ╱ec╱,╱ // 0x57 @0xd
0x04a…05e at000e = ╱46╱F╱ // 0x58 @0xe
0x04a…05e at000f = ╱49╱I╱ // 0x59 @0xf
0x04a…05e at0010 = ╱4c╱L╱ // 0x5a @0x10
0x04a…05e at0011 = ╱ef╱$╱ // 0x5b @0x11
0x04a…05e at0012 = ╱ee╱)╱ // 0x5c @0x12
0x04a…05e at0013 = EOL // 0x5d @0x13
0x04a…05e }
0x05e…06f 8dc6 0230 GET FIL$,V:DAD$
0x05e…06f LineComalBin {
0x05e…06f ptr = 0x8dc6 // 0x5e @0x0
0x05e…06f lno = 0x00e6 // 0x60 @0x2
0x05e…06f at0004 = ╱a9╱ GET ╱ // 0x62 @0x4
0x05e…06f at0005 = ╱46╱F╱ // 0x63 @0x5
0x05e…06f at0006 = ╱49╱I╱ // 0x64 @0x6
0x05e…06f at0007 = ╱4c╱L╱ // 0x65 @0x7
0x05e…06f at0008 = ╱ef╱$╱ // 0x66 @0x8
0x05e…06f at0009 = ╱ec╱,╱ // 0x67 @0x9
0x05e…06f at000a = ╱56╱V╱ // 0x68 @0xa
0x05e…06f at000b = ╱f0╱:╱ // 0x69 @0xb
0x05e…06f at000c = ╱44╱D╱ // 0x6a @0xc
0x05e…06f at000d = ╱41╱A╱ // 0x6b @0xd
0x05e…06f at000e = ╱44╱D╱ // 0x6c @0xe
0x05e…06f at000f = ╱ef╱$╱ // 0x6d @0xf
0x05e…06f at0010 = EOL // 0x6e @0x10
0x05e…06f }
0x06f…079 8dd0 0240 CLOSE FIL$
0x06f…079 LineComalBin {
0x06f…079 ptr = 0x8dd0 // 0x6f @0x0
0x06f…079 lno = 0x00f0 // 0x71 @0x2
0x06f…079 at0004 = ╱a8╱ CLOSE ╱ // 0x73 @0x4
0x06f…079 at0005 = ╱46╱F╱ // 0x74 @0x5
0x06f…079 at0006 = ╱49╱I╱ // 0x75 @0x6
0x06f…079 at0007 = ╱4c╱L╱ // 0x76 @0x7
0x06f…079 at0008 = ╱ef╱$╱ // 0x77 @0x8
0x06f…079 at0009 = EOL // 0x78 @0x9
0x06f…079 }
0x079…07f 8dd6 0250 ENDPROC
0x079…07f LineComalBin {
0x079…07f ptr = 0x8dd6 // 0x79 @0x0
0x079…07f lno = 0x00fa // 0x7b @0x2
0x079…07f at0004 = ╱9f╱ ENDPROC ╱ // 0x7d @0x4
0x079…07f at0005 = EOL // 0x7e @0x5
0x079…07f }
0x07f…090 8de7 0900 PROC INLØNMOD(N)
0x07f…090 LineComalBin {
0x07f…090 ptr = 0x8de7 // 0x7f @0x0
0x07f…090 lno = 0x0384 // 0x81 @0x2
0x07f…090 at0004 = ╱9e╱ PROC ╱ // 0x83 @0x4
0x07f…090 at0005 = ╱49╱I╱ // 0x84 @0x5
0x07f…090 at0006 = ╱4e╱N╱ // 0x85 @0x6
0x07f…090 at0007 = ╱4c╱L╱ // 0x86 @0x7
0x07f…090 at0008 = ╱5c╱Ø╱ // 0x87 @0x8
0x07f…090 at0009 = ╱4e╱N╱ // 0x88 @0x9
0x07f…090 at000a = ╱4d╱M╱ // 0x89 @0xa
0x07f…090 at000b = ╱4f╱O╱ // 0x8a @0xb
0x07f…090 at000c = ╱44╱D╱ // 0x8b @0xc
0x07f…090 at000d = ╱ed╱(╱ // 0x8c @0xd
0x07f…090 at000e = ╱4e╱N╱ // 0x8d @0xe
0x07f…090 at000f = ╱ee╱)╱ // 0x8e @0xf
0x07f…090 at0010 = EOL // 0x8f @0x10
0x07f…090 }
0x090…0a8 8dff 0902 GET FIL1$,G*N-E:POST1$
0x090…0a8 LineComalBin {
0x090…0a8 ptr = 0x8dff // 0x90 @0x0
0x090…0a8 lno = 0x0386 // 0x92 @0x2
0x090…0a8 at0004 = ╱a9╱ GET ╱ // 0x94 @0x4
0x090…0a8 at0005 = ╱46╱F╱ // 0x95 @0x5
0x090…0a8 at0006 = ╱49╱I╱ // 0x96 @0x6
0x090…0a8 at0007 = ╱4c╱L╱ // 0x97 @0x7
0x090…0a8 at0008 = ╱31╱1╱ // 0x98 @0x8
0x090…0a8 at0009 = ╱ef╱$╱ // 0x99 @0x9
0x090…0a8 at000a = ╱ec╱,╱ // 0x9a @0xa
0x090…0a8 at000b = ╱47╱G╱ // 0x9b @0xb
0x090…0a8 at000c = ╱e4╱*╱ // 0x9c @0xc
0x090…0a8 at000d = ╱4e╱N╱ // 0x9d @0xd
0x090…0a8 at000e = ╱e3╱-╱ // 0x9e @0xe
0x090…0a8 at000f = ╱45╱E╱ // 0x9f @0xf
0x090…0a8 at0010 = ╱f0╱:╱ // 0xa0 @0x10
0x090…0a8 at0011 = ╱50╱P╱ // 0xa1 @0x11
0x090…0a8 at0012 = ╱4f╱O╱ // 0xa2 @0x12
0x090…0a8 at0013 = ╱53╱S╱ // 0xa3 @0x13
0x090…0a8 at0014 = ╱54╱T╱ // 0xa4 @0x14
0x090…0a8 at0015 = ╱31╱1╱ // 0xa5 @0x15
0x090…0a8 at0016 = ╱ef╱$╱ // 0xa6 @0x16
0x090…0a8 at0017 = EOL // 0xa7 @0x17
0x090…0a8 }
0x0a8…0e0 8e37 0904 GET FIL1$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD
0x0a8…0e0 LineComalBin {
0x0a8…0e0 ptr = 0x8e37 // 0xa8 @0x0
0x0a8…0e0 lno = 0x0388 // 0xaa @0x2
0x0a8…0e0 at0004 = ╱a9╱ GET ╱ // 0xac @0x4
0x0a8…0e0 at0005 = ╱46╱F╱ // 0xad @0x5
0x0a8…0e0 at0006 = ╱49╱I╱ // 0xae @0x6
0x0a8…0e0 at0007 = ╱4c╱L╱ // 0xaf @0x7
0x0a8…0e0 at0008 = ╱31╱1╱ // 0xb0 @0x8
0x0a8…0e0 at0009 = ╱ef╱$╱ // 0xb1 @0x9
0x0a8…0e0 at000a = ╱ec╱,╱ // 0xb2 @0xa
0x0a8…0e0 at000b = ╱47╱G╱ // 0xb3 @0xb
0x0a8…0e0 at000c = ╱e4╱*╱ // 0xb4 @0xc
0x0a8…0e0 at000d = ╱4e╱N╱ // 0xb5 @0xd
0x0a8…0e0 at000e = ╱f0╱:╱ // 0xb6 @0xe
0x0a8…0e0 at000f = ╱50╱P╱ // 0xb7 @0xf
0x0a8…0e0 at0010 = ╱4f╱O╱ // 0xb8 @0x10
0x0a8…0e0 at0011 = ╱53╱S╱ // 0xb9 @0x11
0x0a8…0e0 at0012 = ╱54╱T╱ // 0xba @0x12
0x0a8…0e0 at0013 = ╱32╱2╱ // 0xbb @0x13
0x0a8…0e0 at0014 = ╱ef╱$╱ // 0xbc @0x14
0x0a8…0e0 at0015 = ╱ec╱,╱ // 0xbd @0x15
0x0a8…0e0 at0016 = ╱43╱C╱ // 0xbe @0x16
0x0a8…0e0 at0017 = ╱31╱1╱ // 0xbf @0x17
0x0a8…0e0 at0018 = ╱ec╱,╱ // 0xc0 @0x18
0x0a8…0e0 at0019 = ╱43╱C╱ // 0xc1 @0x19
0x0a8…0e0 at001a = ╱32╱2╱ // 0xc2 @0x1a
0x0a8…0e0 at001b = ╱ec╱,╱ // 0xc3 @0x1b
0x0a8…0e0 at001c = ╱4c╱L╱ // 0xc4 @0x1c
0x0a8…0e0 at001d = ╱54╱T╱ // 0xc5 @0x1d
0x0a8…0e0 at001e = ╱ec╱,╱ // 0xc6 @0x1e
0x0a8…0e0 at001f = ╱4c╱L╱ // 0xc7 @0x1f
0x0a8…0e0 at0020 = ╱46╱F╱ // 0xc8 @0x20
0x0a8…0e0 at0021 = ╱ec╱,╱ // 0xc9 @0x21
0x0a8…0e0 at0022 = ╱4c╱L╱ // 0xca @0x22
0x0a8…0e0 at0023 = ╱52╱R╱ // 0xcb @0x23
0x0a8…0e0 at0024 = ╱ec╱,╱ // 0xcc @0x24
0x0a8…0e0 at0025 = ╱4c╱L╱ // 0xcd @0x25
0x0a8…0e0 at0026 = ╱41╱A╱ // 0xce @0x26
0x0a8…0e0 at0027 = ╱ec╱,╱ // 0xcf @0x27
0x0a8…0e0 at0028 = ╱52╱R╱ // 0xd0 @0x28
0x0a8…0e0 at0029 = ╱50╱P╱ // 0xd1 @0x29
0x0a8…0e0 at002a = ╱49╱I╱ // 0xd2 @0x2a
0x0a8…0e0 at002b = ╱ec╱,╱ // 0xd3 @0x2b
0x0a8…0e0 at002c = ╱4b╱K╱ // 0xd4 @0x2c
0x0a8…0e0 at002d = ╱31╱1╱ // 0xd5 @0x2d
0x0a8…0e0 at002e = ╱ec╱,╱ // 0xd6 @0x2e
0x0a8…0e0 at002f = ╱4b╱K╱ // 0xd7 @0x2f
0x0a8…0e0 at0030 = ╱32╱2╱ // 0xd8 @0x30
0x0a8…0e0 at0031 = ╱ec╱,╱ // 0xd9 @0x31
0x0a8…0e0 at0032 = ╱46╱F╱ // 0xda @0x32
0x0a8…0e0 at0033 = ╱47╱G╱ // 0xdb @0x33
0x0a8…0e0 at0034 = ╱ec╱,╱ // 0xdc @0x34
0x0a8…0e0 at0035 = ╱46╱F╱ // 0xdd @0x35
0x0a8…0e0 at0036 = ╱44╱D╱ // 0xde @0x36
0x0a8…0e0 at0037 = EOL // 0xdf @0x37
0x0a8…0e0 }
0x0e0…0f5 8e4c 0906 EXEC FEJL(E,N,FIL1$)
0x0e0…0f5 LineComalBin {
0x0e0…0f5 ptr = 0x8e4c // 0xe0 @0x0
0x0e0…0f5 lno = 0x038a // 0xe2 @0x2
0x0e0…0f5 at0004 = ╱9d╱ EXEC ╱ // 0xe4 @0x4
0x0e0…0f5 at0005 = ╱46╱F╱ // 0xe5 @0x5
0x0e0…0f5 at0006 = ╱45╱E╱ // 0xe6 @0x6
0x0e0…0f5 at0007 = ╱4a╱J╱ // 0xe7 @0x7
0x0e0…0f5 at0008 = ╱4c╱L╱ // 0xe8 @0x8
0x0e0…0f5 at0009 = ╱ed╱(╱ // 0xe9 @0x9
0x0e0…0f5 at000a = ╱45╱E╱ // 0xea @0xa
0x0e0…0f5 at000b = ╱ec╱,╱ // 0xeb @0xb
0x0e0…0f5 at000c = ╱4e╱N╱ // 0xec @0xc
0x0e0…0f5 at000d = ╱ec╱,╱ // 0xed @0xd
0x0e0…0f5 at000e = ╱46╱F╱ // 0xee @0xe
0x0e0…0f5 at000f = ╱49╱I╱ // 0xef @0xf
0x0e0…0f5 at0010 = ╱4c╱L╱ // 0xf0 @0x10
0x0e0…0f5 at0011 = ╱31╱1╱ // 0xf1 @0x11
0x0e0…0f5 at0012 = ╱ef╱$╱ // 0xf2 @0x12
0x0e0…0f5 at0013 = ╱ee╱)╱ // 0xf3 @0x13
0x0e0…0f5 at0014 = EOL // 0xf4 @0x14
0x0e0…0f5 }
0x0f5…0fb 8e52 0908 ENDPROC
0x0f5…0fb LineComalBin {
0x0f5…0fb ptr = 0x8e52 // 0xf5 @0x0
0x0f5…0fb lno = 0x038c // 0xf7 @0x2
0x0f5…0fb at0004 = ╱9f╱ ENDPROC ╱ // 0xf9 @0x4
0x0f5…0fb at0005 = EOL // 0xfa @0x5
0x0f5…0fb }
0x0fb…13e 8e95 1000 DIM STARTPER$(8),SLUTPER$(8),DAD$(6),FIL$(20)
0x0fb…13e LineComalBin {
0x0fb…13e ptr = 0x8e95 // 0xfb @0x0
0x0fb…13e lno = 0x03e8 // 0xfd @0x2
0x0fb…13e at0004 = ╱87╱ DIM ╱ // 0xff @0x4
0x0fb…13e at0005 = ╱53╱S╱ // 0x100 @0x5
0x0fb…13e at0006 = ╱54╱T╱ // 0x101 @0x6
0x0fb…13e at0007 = ╱41╱A╱ // 0x102 @0x7
0x0fb…13e at0008 = ╱52╱R╱ // 0x103 @0x8
0x0fb…13e at0009 = ╱54╱T╱ // 0x104 @0x9
0x0fb…13e at000a = ╱50╱P╱ // 0x105 @0xa
0x0fb…13e at000b = ╱45╱E╱ // 0x106 @0xb
0x0fb…13e at000c = ╱52╱R╱ // 0x107 @0xc
0x0fb…13e at000d = ╱ef╱$╱ // 0x108 @0xd
0x0fb…13e at000e = ╱ed╱(╱ // 0x109 @0xe
0x0fb…13e at000f = ╱38╱8╱ // 0x10a @0xf
0x0fb…13e at0010 = ╱fe00008004╱ // 0x10b @0x10
0x0fb…13e at0015 = ╱ee╱)╱ // 0x110 @0x15
0x0fb…13e at0016 = ╱ec╱,╱ // 0x111 @0x16
0x0fb…13e at0017 = ╱53╱S╱ // 0x112 @0x17
0x0fb…13e at0018 = ╱4c╱L╱ // 0x113 @0x18
0x0fb…13e at0019 = ╱55╱U╱ // 0x114 @0x19
0x0fb…13e at001a = ╱54╱T╱ // 0x115 @0x1a
0x0fb…13e at001b = ╱50╱P╱ // 0x116 @0x1b
0x0fb…13e at001c = ╱45╱E╱ // 0x117 @0x1c
0x0fb…13e at001d = ╱52╱R╱ // 0x118 @0x1d
0x0fb…13e at001e = ╱ef╱$╱ // 0x119 @0x1e
0x0fb…13e at001f = ╱ed╱(╱ // 0x11a @0x1f
0x0fb…13e at0020 = ╱38╱8╱ // 0x11b @0x20
0x0fb…13e at0021 = ╱fe00008004╱ // 0x11c @0x21
0x0fb…13e at0026 = ╱ee╱)╱ // 0x121 @0x26
0x0fb…13e at0027 = ╱ec╱,╱ // 0x122 @0x27
0x0fb…13e at0028 = ╱44╱D╱ // 0x123 @0x28
0x0fb…13e at0029 = ╱41╱A╱ // 0x124 @0x29
0x0fb…13e at002a = ╱44╱D╱ // 0x125 @0x2a
0x0fb…13e at002b = ╱ef╱$╱ // 0x126 @0x2b
0x0fb…13e at002c = ╱ed╱(╱ // 0x127 @0x2c
0x0fb…13e at002d = ╱36╱6╱ // 0x128 @0x2d
0x0fb…13e at002e = ╱fe0000c003╱ // 0x129 @0x2e
0x0fb…13e at0033 = ╱ee╱)╱ // 0x12e @0x33
0x0fb…13e at0034 = ╱ec╱,╱ // 0x12f @0x34
0x0fb…13e at0035 = ╱46╱F╱ // 0x130 @0x35
0x0fb…13e at0036 = ╱49╱I╱ // 0x131 @0x36
0x0fb…13e at0037 = ╱4c╱L╱ // 0x132 @0x37
0x0fb…13e at0038 = ╱ef╱$╱ // 0x133 @0x38
0x0fb…13e at0039 = ╱ed╱(╱ // 0x134 @0x39
0x0fb…13e at003a = ╱32╱2╱ // 0x135 @0x3a
0x0fb…13e at003b = ╱30╱0╱ // 0x136 @0x3b
0x0fb…13e at003c = ╱fe0000a005╱ // 0x137 @0x3c
0x0fb…13e at0041 = ╱ee╱)╱ // 0x13c @0x41
0x0fb…13e at0042 = EOL // 0x13d @0x42
0x0fb…13e }
0x13e…17b 8ed2 1010 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12)
0x13e…17b LineComalBin {
0x13e…17b ptr = 0x8ed2 // 0x13e @0x0
0x13e…17b lno = 0x03f2 // 0x140 @0x2
0x13e…17b at0004 = ╱87╱ DIM ╱ // 0x142 @0x4
0x13e…17b at0005 = ╱52╱R╱ // 0x143 @0x5
0x13e…17b at0006 = ╱45╱E╱ // 0x144 @0x6
0x13e…17b at0007 = ╱53╱S╱ // 0x145 @0x7
0x13e…17b at0008 = ╱ef╱$╱ // 0x146 @0x8
0x13e…17b at0009 = ╱ed╱(╱ // 0x147 @0x9
0x13e…17b at000a = ╱31╱1╱ // 0x148 @0xa
0x13e…17b at000b = ╱35╱5╱ // 0x149 @0xb
0x13e…17b at000c = ╱fe0000f004╱ // 0x14a @0xc
0x13e…17b at0011 = ╱ee╱)╱ // 0x14f @0x11
0x13e…17b at0012 = ╱ec╱,╱ // 0x150 @0x12
0x13e…17b at0013 = ╱4f╱O╱ // 0x151 @0x13
0x13e…17b at0014 = ╱50╱P╱ // 0x152 @0x14
0x13e…17b at0015 = ╱31╱1╱ // 0x153 @0x15
0x13e…17b at0016 = ╱ef╱$╱ // 0x154 @0x16
0x13e…17b at0017 = ╱ed╱(╱ // 0x155 @0x17
0x13e…17b at0018 = ╱31╱1╱ // 0x156 @0x18
0x13e…17b at0019 = ╱32╱2╱ // 0x157 @0x19
0x13e…17b at001a = ╱fe0000c004╱ // 0x158 @0x1a
0x13e…17b at001f = ╱ee╱)╱ // 0x15d @0x1f
0x13e…17b at0020 = ╱ec╱,╱ // 0x15e @0x20
0x13e…17b at0021 = ╱4f╱O╱ // 0x15f @0x21
0x13e…17b at0022 = ╱50╱P╱ // 0x160 @0x22
0x13e…17b at0023 = ╱32╱2╱ // 0x161 @0x23
0x13e…17b at0024 = ╱ef╱$╱ // 0x162 @0x24
0x13e…17b at0025 = ╱ed╱(╱ // 0x163 @0x25
0x13e…17b at0026 = ╱31╱1╱ // 0x164 @0x26
0x13e…17b at0027 = ╱32╱2╱ // 0x165 @0x27
0x13e…17b at0028 = ╱fe0000c004╱ // 0x166 @0x28
0x13e…17b at002d = ╱ee╱)╱ // 0x16b @0x2d
0x13e…17b at002e = ╱ec╱,╱ // 0x16c @0x2e
0x13e…17b at002f = ╱54╱T╱ // 0x16d @0x2f
0x13e…17b at0030 = ╱41╱A╱ // 0x16e @0x30
0x13e…17b at0031 = ╱48╱H╱ // 0x16f @0x31
0x13e…17b at0032 = ╱ef╱$╱ // 0x170 @0x32
0x13e…17b at0033 = ╱ed╱(╱ // 0x171 @0x33
0x13e…17b at0034 = ╱31╱1╱ // 0x172 @0x34
0x13e…17b at0035 = ╱32╱2╱ // 0x173 @0x35
0x13e…17b at0036 = ╱fe0000c004╱ // 0x174 @0x36
0x13e…17b at003b = ╱ee╱)╱ // 0x179 @0x3b
0x13e…17b at003c = EOL // 0x17a @0x3c
0x13e…17b }
0x17b…1c6 8f1d 1020 DIM TOTAL$(7,12),FIL1$(16),POST1$(71),POST2$(27)
0x17b…1c6 LineComalBin {
0x17b…1c6 ptr = 0x8f1d // 0x17b @0x0
0x17b…1c6 lno = 0x03fc // 0x17d @0x2
0x17b…1c6 at0004 = ╱87╱ DIM ╱ // 0x17f @0x4
0x17b…1c6 at0005 = ╱54╱T╱ // 0x180 @0x5
0x17b…1c6 at0006 = ╱4f╱O╱ // 0x181 @0x6
0x17b…1c6 at0007 = ╱54╱T╱ // 0x182 @0x7
0x17b…1c6 at0008 = ╱41╱A╱ // 0x183 @0x8
0x17b…1c6 at0009 = ╱4c╱L╱ // 0x184 @0x9
0x17b…1c6 at000a = ╱ef╱$╱ // 0x185 @0xa
0x17b…1c6 at000b = ╱ed╱(╱ // 0x186 @0xb
0x17b…1c6 at000c = ╱37╱7╱ // 0x187 @0xc
0x17b…1c6 at000d = ╱fe0000e003╱ // 0x188 @0xd
0x17b…1c6 at0012 = ╱ec╱,╱ // 0x18d @0x12
0x17b…1c6 at0013 = ╱31╱1╱ // 0x18e @0x13
0x17b…1c6 at0014 = ╱32╱2╱ // 0x18f @0x14
0x17b…1c6 at0015 = ╱fe0000c004╱ // 0x190 @0x15
0x17b…1c6 at001a = ╱ee╱)╱ // 0x195 @0x1a
0x17b…1c6 at001b = ╱ec╱,╱ // 0x196 @0x1b
0x17b…1c6 at001c = ╱46╱F╱ // 0x197 @0x1c
0x17b…1c6 at001d = ╱49╱I╱ // 0x198 @0x1d
0x17b…1c6 at001e = ╱4c╱L╱ // 0x199 @0x1e
0x17b…1c6 at001f = ╱31╱1╱ // 0x19a @0x1f
0x17b…1c6 at0020 = ╱ef╱$╱ // 0x19b @0x20
0x17b…1c6 at0021 = ╱ed╱(╱ // 0x19c @0x21
0x17b…1c6 at0022 = ╱31╱1╱ // 0x19d @0x22
0x17b…1c6 at0023 = ╱36╱6╱ // 0x19e @0x23
0x17b…1c6 at0024 = ╱fe00008005╱ // 0x19f @0x24
0x17b…1c6 at0029 = ╱ee╱)╱ // 0x1a4 @0x29
0x17b…1c6 at002a = ╱ec╱,╱ // 0x1a5 @0x2a
0x17b…1c6 at002b = ╱50╱P╱ // 0x1a6 @0x2b
0x17b…1c6 at002c = ╱4f╱O╱ // 0x1a7 @0x2c
0x17b…1c6 at002d = ╱53╱S╱ // 0x1a8 @0x2d
0x17b…1c6 at002e = ╱54╱T╱ // 0x1a9 @0x2e
0x17b…1c6 at002f = ╱31╱1╱ // 0x1aa @0x2f
0x17b…1c6 at0030 = ╱ef╱$╱ // 0x1ab @0x30
0x17b…1c6 at0031 = ╱ed╱(╱ // 0x1ac @0x31
0x17b…1c6 at0032 = ╱37╱7╱ // 0x1ad @0x32
0x17b…1c6 at0033 = ╱31╱1╱ // 0x1ae @0x33
0x17b…1c6 at0034 = ╱fe00008e07╱ // 0x1af @0x34
0x17b…1c6 at0039 = ╱ee╱)╱ // 0x1b4 @0x39
0x17b…1c6 at003a = ╱ec╱,╱ // 0x1b5 @0x3a
0x17b…1c6 at003b = ╱50╱P╱ // 0x1b6 @0x3b
0x17b…1c6 at003c = ╱4f╱O╱ // 0x1b7 @0x3c
0x17b…1c6 at003d = ╱53╱S╱ // 0x1b8 @0x3d
0x17b…1c6 at003e = ╱54╱T╱ // 0x1b9 @0x3e
0x17b…1c6 at003f = ╱32╱2╱ // 0x1ba @0x3f
0x17b…1c6 at0040 = ╱ef╱$╱ // 0x1bb @0x40
0x17b…1c6 at0041 = ╱ed╱(╱ // 0x1bc @0x41
0x17b…1c6 at0042 = ╱32╱2╱ // 0x1bd @0x42
0x17b…1c6 at0043 = ╱37╱7╱ // 0x1be @0x43
0x17b…1c6 at0044 = ╱fe0000d805╱ // 0x1bf @0x44
0x17b…1c6 at0049 = ╱ee╱)╱ // 0x1c4 @0x49
0x17b…1c6 at004a = EOL // 0x1c5 @0x4a
0x17b…1c6 }
0x1c6…222 8f79 1030 DIM RESUL$(12),RESUL1$(12),MF41$(50),MF42$(50),TOTAL1$(5,12)
0x1c6…222 LineComalBin {
0x1c6…222 ptr = 0x8f79 // 0x1c6 @0x0
0x1c6…222 lno = 0x0406 // 0x1c8 @0x2
0x1c6…222 at0004 = ╱87╱ DIM ╱ // 0x1ca @0x4
0x1c6…222 at0005 = ╱52╱R╱ // 0x1cb @0x5
0x1c6…222 at0006 = ╱45╱E╱ // 0x1cc @0x6
0x1c6…222 at0007 = ╱53╱S╱ // 0x1cd @0x7
0x1c6…222 at0008 = ╱55╱U╱ // 0x1ce @0x8
0x1c6…222 at0009 = ╱4c╱L╱ // 0x1cf @0x9
0x1c6…222 at000a = ╱ef╱$╱ // 0x1d0 @0xa
0x1c6…222 at000b = ╱ed╱(╱ // 0x1d1 @0xb
0x1c6…222 at000c = ╱31╱1╱ // 0x1d2 @0xc
0x1c6…222 at000d = ╱32╱2╱ // 0x1d3 @0xd
0x1c6…222 at000e = ╱fe0000c004╱ // 0x1d4 @0xe
0x1c6…222 at0013 = ╱ee╱)╱ // 0x1d9 @0x13
0x1c6…222 at0014 = ╱ec╱,╱ // 0x1da @0x14
0x1c6…222 at0015 = ╱52╱R╱ // 0x1db @0x15
0x1c6…222 at0016 = ╱45╱E╱ // 0x1dc @0x16
0x1c6…222 at0017 = ╱53╱S╱ // 0x1dd @0x17
0x1c6…222 at0018 = ╱55╱U╱ // 0x1de @0x18
0x1c6…222 at0019 = ╱4c╱L╱ // 0x1df @0x19
0x1c6…222 at001a = ╱31╱1╱ // 0x1e0 @0x1a
0x1c6…222 at001b = ╱ef╱$╱ // 0x1e1 @0x1b
0x1c6…222 at001c = ╱ed╱(╱ // 0x1e2 @0x1c
0x1c6…222 at001d = ╱31╱1╱ // 0x1e3 @0x1d
0x1c6…222 at001e = ╱32╱2╱ // 0x1e4 @0x1e
0x1c6…222 at001f = ╱fe0000c004╱ // 0x1e5 @0x1f
0x1c6…222 at0024 = ╱ee╱)╱ // 0x1ea @0x24
0x1c6…222 at0025 = ╱ec╱,╱ // 0x1eb @0x25
0x1c6…222 at0026 = ╱4d╱M╱ // 0x1ec @0x26
0x1c6…222 at0027 = ╱46╱F╱ // 0x1ed @0x27
0x1c6…222 at0028 = ╱34╱4╱ // 0x1ee @0x28
0x1c6…222 at0029 = ╱31╱1╱ // 0x1ef @0x29
0x1c6…222 at002a = ╱ef╱$╱ // 0x1f0 @0x2a
0x1c6…222 at002b = ╱ed╱(╱ // 0x1f1 @0x2b
0x1c6…222 at002c = ╱35╱5╱ // 0x1f2 @0x2c
0x1c6…222 at002d = ╱30╱0╱ // 0x1f3 @0x2d
0x1c6…222 at002e = ╱fe0000c806╱ // 0x1f4 @0x2e
0x1c6…222 at0033 = ╱ee╱)╱ // 0x1f9 @0x33
0x1c6…222 at0034 = ╱ec╱,╱ // 0x1fa @0x34
0x1c6…222 at0035 = ╱4d╱M╱ // 0x1fb @0x35
0x1c6…222 at0036 = ╱46╱F╱ // 0x1fc @0x36
0x1c6…222 at0037 = ╱34╱4╱ // 0x1fd @0x37
0x1c6…222 at0038 = ╱32╱2╱ // 0x1fe @0x38
0x1c6…222 at0039 = ╱ef╱$╱ // 0x1ff @0x39
0x1c6…222 at003a = ╱ed╱(╱ // 0x200 @0x3a
0x1c6…222 at003b = ╱35╱5╱ // 0x201 @0x3b
0x1c6…222 at003c = ╱30╱0╱ // 0x202 @0x3c
0x1c6…222 at003d = ╱fe0000c806╱ // 0x203 @0x3d
0x1c6…222 at0042 = ╱ee╱)╱ // 0x208 @0x42
0x1c6…222 at0043 = ╱ec╱,╱ // 0x209 @0x43
0x1c6…222 at0044 = ╱54╱T╱ // 0x20a @0x44
0x1c6…222 at0045 = ╱4f╱O╱ // 0x20b @0x45
0x1c6…222 at0046 = ╱54╱T╱ // 0x20c @0x46
0x1c6…222 at0047 = ╱41╱A╱ // 0x20d @0x47
0x1c6…222 at0048 = ╱4c╱L╱ // 0x20e @0x48
0x1c6…222 at0049 = ╱31╱1╱ // 0x20f @0x49
0x1c6…222 at004a = ╱ef╱$╱ // 0x210 @0x4a
0x1c6…222 at004b = ╱ed╱(╱ // 0x211 @0x4b
0x1c6…222 at004c = ╱35╱5╱ // 0x212 @0x4c
0x1c6…222 at004d = ╱fe0000a003╱ // 0x213 @0x4d
0x1c6…222 at0052 = ╱ec╱,╱ // 0x218 @0x52
0x1c6…222 at0053 = ╱31╱1╱ // 0x219 @0x53
0x1c6…222 at0054 = ╱32╱2╱ // 0x21a @0x54
0x1c6…222 at0055 = ╱fe0000c004╱ // 0x21b @0x55
0x1c6…222 at005a = ╱ee╱)╱ // 0x220 @0x5a
0x1c6…222 at005b = EOL // 0x221 @0x5b
0x1c6…222 }
0x222…235 8f8c 1050 DIM MF4$(16)
0x222…235 LineComalBin {
0x222…235 ptr = 0x8f8c // 0x222 @0x0
0x222…235 lno = 0x041a // 0x224 @0x2
0x222…235 at0004 = ╱87╱ DIM ╱ // 0x226 @0x4
0x222…235 at0005 = ╱4d╱M╱ // 0x227 @0x5
0x222…235 at0006 = ╱46╱F╱ // 0x228 @0x6
0x222…235 at0007 = ╱34╱4╱ // 0x229 @0x7
0x222…235 at0008 = ╱ef╱$╱ // 0x22a @0x8
0x222…235 at0009 = ╱ed╱(╱ // 0x22b @0x9
0x222…235 at000a = ╱31╱1╱ // 0x22c @0xa
0x222…235 at000b = ╱36╱6╱ // 0x22d @0xb
0x222…235 at000c = ╱fe00008005╱ // 0x22e @0xc
0x222…235 at0011 = ╱ee╱)╱ // 0x233 @0x11
0x222…235 at0012 = EOL // 0x234 @0x12
0x222…235 }
0x235…24d 8fa4 1060 TAH$=" 0+"
0x235…24d LineComalBin {
0x235…24d ptr = 0x8fa4 // 0x235 @0x0
0x235…24d lno = 0x0424 // 0x237 @0x2
0x235…24d at0004 = ╱54╱T╱ // 0x239 @0x4
0x235…24d at0005 = ╱41╱A╱ // 0x23a @0x5
0x235…24d at0006 = ╱48╱H╱ // 0x23b @0x6
0x235…24d at0007 = ╱ef╱$╱ // 0x23c @0x7
0x235…24d at0008 = ╱dc╱=╱ // 0x23d @0x8
0x235…24d at0009 = ╱22╱"╱ // 0x23e @0x9
0x235…24d at000a = ╱20╱…╱ // 0x23f @0xa
0x235…24d at000b = ╱20╱…╱ // 0x240 @0xb
0x235…24d at000c = ╱20╱…╱ // 0x241 @0xc
0x235…24d at000d = ╱20╱…╱ // 0x242 @0xd
0x235…24d at000e = ╱20╱…╱ // 0x243 @0xe
0x235…24d at000f = ╱20╱…╱ // 0x244 @0xf
0x235…24d at0010 = ╱20╱…╱ // 0x245 @0x10
0x235…24d at0011 = ╱20╱…╱ // 0x246 @0x11
0x235…24d at0012 = ╱20╱…╱ // 0x247 @0x12
0x235…24d at0013 = ╱20╱…╱ // 0x248 @0x13
0x235…24d at0014 = ╱30╱0╱ // 0x249 @0x14
0x235…24d at0015 = ╱2b╱+╱ // 0x24a @0x15
0x235…24d at0016 = ╱22╱"╱ // 0x24b @0x16
0x235…24d at0017 = EOL // 0x24c @0x17
0x235…24d }
0x24d…25f 8fb6 1070 DIM BL$(79)
0x24d…25f LineComalBin {
0x24d…25f ptr = 0x8fb6 // 0x24d @0x0
0x24d…25f lno = 0x042e // 0x24f @0x2
0x24d…25f at0004 = ╱87╱ DIM ╱ // 0x251 @0x4
0x24d…25f at0005 = ╱42╱B╱ // 0x252 @0x5
0x24d…25f at0006 = ╱4c╱L╱ // 0x253 @0x6
0x24d…25f at0007 = ╱ef╱$╱ // 0x254 @0x7
0x24d…25f at0008 = ╱ed╱(╱ // 0x255 @0x8
0x24d…25f at0009 = ╱37╱7╱ // 0x256 @0x9
0x24d…25f at000a = ╱39╱9╱ // 0x257 @0xa
0x24d…25f at000b = ╱fe00009e07╱ // 0x258 @0xb
0x24d…25f at0010 = ╱ee╱)╱ // 0x25d @0x10
0x24d…25f at0011 = EOL // 0x25e @0x11
0x24d…25f }
0x25f…270 8fc7 1080 FOR I=E TO 79
0x25f…270 LineComalBin {
0x25f…270 ptr = 0x8fc7 // 0x25f @0x0
0x25f…270 lno = 0x0438 // 0x261 @0x2
0x25f…270 at0004 = ╱83╱ FOR ╱ // 0x263 @0x4
0x25f…270 at0005 = ╱49╱I╱ // 0x264 @0x5
0x25f…270 at0006 = ╱dc╱=╱ // 0x265 @0x6
0x25f…270 at0007 = ╱45╱E╱ // 0x266 @0x7
0x25f…270 at0008 = ╱b7╱ TO ╱ // 0x267 @0x8
0x25f…270 at0009 = ╱37╱7╱ // 0x268 @0x9
0x25f…270 at000a = ╱39╱9╱ // 0x269 @0xa
0x25f…270 at000b = ╱fe00009e07╱ // 0x26a @0xb
0x25f…270 at0010 = EOL // 0x26f @0x10
0x25f…270 }
0x270…280 8fd7 1090 BL$=BL$+" "
0x270…280 LineComalBin {
0x270…280 ptr = 0x8fd7 // 0x270 @0x0
0x270…280 lno = 0x0442 // 0x272 @0x2
0x270…280 at0004 = ╱42╱B╱ // 0x274 @0x4
0x270…280 at0005 = ╱4c╱L╱ // 0x275 @0x5
0x270…280 at0006 = ╱ef╱$╱ // 0x276 @0x6
0x270…280 at0007 = ╱dc╱=╱ // 0x277 @0x7
0x270…280 at0008 = ╱42╱B╱ // 0x278 @0x8
0x270…280 at0009 = ╱4c╱L╱ // 0x279 @0x9
0x270…280 at000a = ╱ef╱$╱ // 0x27a @0xa
0x270…280 at000b = ╱f1╱+╱ // 0x27b @0xb
0x270…280 at000c = ╱22╱"╱ // 0x27c @0xc
0x270…280 at000d = ╱20╱…╱ // 0x27d @0xd
0x270…280 at000e = ╱22╱"╱ // 0x27e @0xe
0x270…280 at000f = EOL // 0x27f @0xf
0x270…280 }
0x280…287 8fde 1100 NEXT I
0x280…287 LineComalBin {
0x280…287 ptr = 0x8fde // 0x280 @0x0
0x280…287 lno = 0x044c // 0x282 @0x2
0x280…287 at0004 = ╱84╱ NEXT ╱ // 0x284 @0x4
0x280…287 at0005 = ╱49╱I╱ // 0x285 @0x5
0x280…287 at0006 = EOL // 0x286 @0x6
0x280…287 }
0x287…29f 8ff6 1110 PROC CALC(AR3,B1,B2,ES)
0x287…29f LineComalBin {
0x287…29f ptr = 0x8ff6 // 0x287 @0x0
0x287…29f lno = 0x0456 // 0x289 @0x2
0x287…29f at0004 = ╱9e╱ PROC ╱ // 0x28b @0x4
0x287…29f at0005 = ╱43╱C╱ // 0x28c @0x5
0x287…29f at0006 = ╱41╱A╱ // 0x28d @0x6
0x287…29f at0007 = ╱4c╱L╱ // 0x28e @0x7
0x287…29f at0008 = ╱43╱C╱ // 0x28f @0x8
0x287…29f at0009 = ╱ed╱(╱ // 0x290 @0x9
0x287…29f at000a = ╱41╱A╱ // 0x291 @0xa
0x287…29f at000b = ╱52╱R╱ // 0x292 @0xb
0x287…29f at000c = ╱33╱3╱ // 0x293 @0xc
0x287…29f at000d = ╱ec╱,╱ // 0x294 @0xd
0x287…29f at000e = ╱42╱B╱ // 0x295 @0xe
0x287…29f at000f = ╱31╱1╱ // 0x296 @0xf
0x287…29f at0010 = ╱ec╱,╱ // 0x297 @0x10
0x287…29f at0011 = ╱42╱B╱ // 0x298 @0x11
0x287…29f at0012 = ╱32╱2╱ // 0x299 @0x12
0x287…29f at0013 = ╱ec╱,╱ // 0x29a @0x13
0x287…29f at0014 = ╱45╱E╱ // 0x29b @0x14
0x287…29f at0015 = ╱53╱S╱ // 0x29c @0x15
0x287…29f at0016 = ╱ee╱)╱ // 0x29d @0x16
0x287…29f at0017 = EOL // 0x29e @0x17
0x287…29f }
0x29f…2e6 903d 1120 RES$=ES$;OP1$=B1$;OP2$=B2$;SI=B;FLAG=B;ART=AR3-6*(AR3>5)
0x29f…2e6 LineComalBin {
0x29f…2e6 ptr = 0x903d // 0x29f @0x0
0x29f…2e6 lno = 0x0460 // 0x2a1 @0x2
0x29f…2e6 at0004 = ╱52╱R╱ // 0x2a3 @0x4
0x29f…2e6 at0005 = ╱45╱E╱ // 0x2a4 @0x5
0x29f…2e6 at0006 = ╱53╱S╱ // 0x2a5 @0x6
0x29f…2e6 at0007 = ╱ef╱$╱ // 0x2a6 @0x7
0x29f…2e6 at0008 = ╱dc╱=╱ // 0x2a7 @0x8
0x29f…2e6 at0009 = ╱45╱E╱ // 0x2a8 @0x9
0x29f…2e6 at000a = ╱53╱S╱ // 0x2a9 @0xa
0x29f…2e6 at000b = ╱ef╱$╱ // 0x2aa @0xb
0x29f…2e6 at000c = ╱eb╱;╱ // 0x2ab @0xc
0x29f…2e6 at000d = ╱4f╱O╱ // 0x2ac @0xd
0x29f…2e6 at000e = ╱50╱P╱ // 0x2ad @0xe
0x29f…2e6 at000f = ╱31╱1╱ // 0x2ae @0xf
0x29f…2e6 at0010 = ╱ef╱$╱ // 0x2af @0x10
0x29f…2e6 at0011 = ╱dc╱=╱ // 0x2b0 @0x11
0x29f…2e6 at0012 = ╱42╱B╱ // 0x2b1 @0x12
0x29f…2e6 at0013 = ╱31╱1╱ // 0x2b2 @0x13
0x29f…2e6 at0014 = ╱ef╱$╱ // 0x2b3 @0x14
0x29f…2e6 at0015 = ╱eb╱;╱ // 0x2b4 @0x15
0x29f…2e6 at0016 = ╱4f╱O╱ // 0x2b5 @0x16
0x29f…2e6 at0017 = ╱50╱P╱ // 0x2b6 @0x17
0x29f…2e6 at0018 = ╱32╱2╱ // 0x2b7 @0x18
0x29f…2e6 at0019 = ╱ef╱$╱ // 0x2b8 @0x19
0x29f…2e6 at001a = ╱dc╱=╱ // 0x2b9 @0x1a
0x29f…2e6 at001b = ╱42╱B╱ // 0x2ba @0x1b
0x29f…2e6 at001c = ╱32╱2╱ // 0x2bb @0x1c
0x29f…2e6 at001d = ╱ef╱$╱ // 0x2bc @0x1d
0x29f…2e6 at001e = ╱eb╱;╱ // 0x2bd @0x1e
0x29f…2e6 at001f = ╱53╱S╱ // 0x2be @0x1f
0x29f…2e6 at0020 = ╱49╱I╱ // 0x2bf @0x20
0x29f…2e6 at0021 = ╱dc╱=╱ // 0x2c0 @0x21
0x29f…2e6 at0022 = ╱42╱B╱ // 0x2c1 @0x22
0x29f…2e6 at0023 = ╱eb╱;╱ // 0x2c2 @0x23
0x29f…2e6 at0024 = ╱46╱F╱ // 0x2c3 @0x24
0x29f…2e6 at0025 = ╱4c╱L╱ // 0x2c4 @0x25
0x29f…2e6 at0026 = ╱41╱A╱ // 0x2c5 @0x26
0x29f…2e6 at0027 = ╱47╱G╱ // 0x2c6 @0x27
0x29f…2e6 at0028 = ╱dc╱=╱ // 0x2c7 @0x28
0x29f…2e6 at0029 = ╱42╱B╱ // 0x2c8 @0x29
0x29f…2e6 at002a = ╱eb╱;╱ // 0x2c9 @0x2a
0x29f…2e6 at002b = ╱41╱A╱ // 0x2ca @0x2b
0x29f…2e6 at002c = ╱52╱R╱ // 0x2cb @0x2c
0x29f…2e6 at002d = ╱54╱T╱ // 0x2cc @0x2d
0x29f…2e6 at002e = ╱dc╱=╱ // 0x2cd @0x2e
0x29f…2e6 at002f = ╱41╱A╱ // 0x2ce @0x2f
0x29f…2e6 at0030 = ╱52╱R╱ // 0x2cf @0x30
0x29f…2e6 at0031 = ╱33╱3╱ // 0x2d0 @0x31
0x29f…2e6 at0032 = ╱e3╱-╱ // 0x2d1 @0x32
0x29f…2e6 at0033 = ╱36╱6╱ // 0x2d2 @0x33
0x29f…2e6 at0034 = ╱fe0000c003╱ // 0x2d3 @0x34
0x29f…2e6 at0039 = ╱e4╱*╱ // 0x2d8 @0x39
0x29f…2e6 at003a = ╱ed╱(╱ // 0x2d9 @0x3a
0x29f…2e6 at003b = ╱41╱A╱ // 0x2da @0x3b
0x29f…2e6 at003c = ╱52╱R╱ // 0x2db @0x3c
0x29f…2e6 at003d = ╱33╱3╱ // 0x2dc @0x3d
0x29f…2e6 at003e = ╱de╱>╱ // 0x2dd @0x3e
0x29f…2e6 at003f = ╱35╱5╱ // 0x2de @0x3f
0x29f…2e6 at0040 = ╱fe0000a003╱ // 0x2df @0x40
0x29f…2e6 at0045 = ╱ee╱)╱ // 0x2e4 @0x45
0x29f…2e6 at0046 = EOL // 0x2e5 @0x46
0x29f…2e6 }
0x2e6…2fc 9053 1130 CALL "P641210:REGN"
0x2e6…2fc LineComalBin {
0x2e6…2fc ptr = 0x9053 // 0x2e6 @0x0
0x2e6…2fc lno = 0x046a // 0x2e8 @0x2
0x2e6…2fc at0004 = ╱ad049b╱ CALL ╱ // 0x2ea @0x4
0x2e6…2fc at0007 = ╱22╱"╱ // 0x2ed @0x7
0x2e6…2fc at0008 = ╱50╱P╱ // 0x2ee @0x8
0x2e6…2fc at0009 = ╱36╱6╱ // 0x2ef @0x9
0x2e6…2fc at000a = ╱34╱4╱ // 0x2f0 @0xa
0x2e6…2fc at000b = ╱31╱1╱ // 0x2f1 @0xb
0x2e6…2fc at000c = ╱32╱2╱ // 0x2f2 @0xc
0x2e6…2fc at000d = ╱31╱1╱ // 0x2f3 @0xd
0x2e6…2fc at000e = ╱30╱0╱ // 0x2f4 @0xe
0x2e6…2fc at000f = ╱3a╱:╱ // 0x2f5 @0xf
0x2e6…2fc at0010 = ╱52╱R╱ // 0x2f6 @0x10
0x2e6…2fc at0011 = ╱45╱E╱ // 0x2f7 @0x11
0x2e6…2fc at0012 = ╱47╱G╱ // 0x2f8 @0x12
0x2e6…2fc at0013 = ╱4e╱N╱ // 0x2f9 @0x13
0x2e6…2fc at0014 = ╱22╱"╱ // 0x2fa @0x14
0x2e6…2fc at0015 = EOL // 0x2fb @0x15
0x2e6…2fc }
0x2fc…30d 9064 1140 IF AR3<6 THEN
0x2fc…30d LineComalBin {
0x2fc…30d ptr = 0x9064 // 0x2fc @0x0
0x2fc…30d lno = 0x0474 // 0x2fe @0x2
0x2fc…30d at0004 = ╱9c╱ IF ╱ // 0x300 @0x4
0x2fc…30d at0005 = ╱41╱A╱ // 0x301 @0x5
0x2fc…30d at0006 = ╱52╱R╱ // 0x302 @0x6
0x2fc…30d at0007 = ╱33╱3╱ // 0x303 @0x7
0x2fc…30d at0008 = ╱dd╱<╱ // 0x304 @0x8
0x2fc…30d at0009 = ╱36╱6╱ // 0x305 @0x9
0x2fc…30d at000a = ╱fe0000c003╱ // 0x306 @0xa
0x2fc…30d at000f = ╱b6╱ THEN ╱ // 0x30b @0xf
0x2fc…30d at0010 = EOL // 0x30c @0x10
0x2fc…30d }
0x30d…319 9070 1150 IF FLAG THEN STOP
0x30d…319 LineComalBin {
0x30d…319 ptr = 0x9070 // 0x30d @0x0
0x30d…319 lno = 0x047e // 0x30f @0x2
0x30d…319 at0004 = ╱82╱ IF ╱ // 0x311 @0x4
0x30d…319 at0005 = ╱46╱F╱ // 0x312 @0x5
0x30d…319 at0006 = ╱4c╱L╱ // 0x313 @0x6
0x30d…319 at0007 = ╱41╱A╱ // 0x314 @0x7
0x30d…319 at0008 = ╱47╱G╱ // 0x315 @0x8
0x30d…319 at0009 = ╱b6╱ THEN ╱ // 0x316 @0x9
0x30d…319 at000a = ╱8d╱ STOP ╱ // 0x317 @0xa
0x30d…319 at000b = EOL // 0x318 @0xb
0x30d…319 }
0x319…31f 9076 1160 ENDIF
0x319…31f LineComalBin {
0x319…31f ptr = 0x9076 // 0x319 @0x0
0x319…31f lno = 0x0488 // 0x31b @0x2
0x319…31f at0004 = ╱9b╱ ENDIF ╱ // 0x31d @0x4
0x319…31f at0005 = EOL // 0x31e @0x5
0x319…31f }
0x31f…32c 9083 1170 ES$=RES$
0x31f…32c LineComalBin {
0x31f…32c ptr = 0x9083 // 0x31f @0x0
0x31f…32c lno = 0x0492 // 0x321 @0x2
0x31f…32c at0004 = ╱45╱E╱ // 0x323 @0x4
0x31f…32c at0005 = ╱53╱S╱ // 0x324 @0x5
0x31f…32c at0006 = ╱ef╱$╱ // 0x325 @0x6
0x31f…32c at0007 = ╱dc╱=╱ // 0x326 @0x7
0x31f…32c at0008 = ╱52╱R╱ // 0x327 @0x8
0x31f…32c at0009 = ╱45╱E╱ // 0x328 @0x9
0x31f…32c at000a = ╱53╱S╱ // 0x329 @0xa
0x31f…32c at000b = ╱ef╱$╱ // 0x32a @0xb
0x31f…32c at000c = EOL // 0x32b @0xc
0x31f…32c }
0x32c…332 9089 1180 ENDPROC
0x32c…332 LineComalBin {
0x32c…332 ptr = 0x9089 // 0x32c @0x0
0x32c…332 lno = 0x049c // 0x32e @0x2
0x32c…332 at0004 = ╱9f╱ ENDPROC ╱ // 0x330 @0x4
0x32c…332 at0005 = EOL // 0x331 @0x5
0x32c…332 }
0x332…342 9099 1390 PROC SKRIVHOVED
0x332…342 LineComalBin {
0x332…342 ptr = 0x9099 // 0x332 @0x0
0x332…342 lno = 0x056e // 0x334 @0x2
0x332…342 at0004 = ╱9e╱ PROC ╱ // 0x336 @0x4
0x332…342 at0005 = ╱53╱S╱ // 0x337 @0x5
0x332…342 at0006 = ╱4b╱K╱ // 0x338 @0x6
0x332…342 at0007 = ╱52╱R╱ // 0x339 @0x7
0x332…342 at0008 = ╱49╱I╱ // 0x33a @0x8
0x332…342 at0009 = ╱56╱V╱ // 0x33b @0x9
0x332…342 at000a = ╱48╱H╱ // 0x33c @0xa
0x332…342 at000b = ╱4f╱O╱ // 0x33d @0xb
0x332…342 at000c = ╱56╱V╱ // 0x33e @0xc
0x332…342 at000d = ╱45╱E╱ // 0x33f @0xd
0x332…342 at000e = ╱44╱D╱ // 0x340 @0xe
0x332…342 at000f = EOL // 0x341 @0xf
0x332…342 }
0x342…348 909f 1400 PRINT
0x342…348 LineComalBin {
0x342…348 ptr = 0x909f // 0x342 @0x0
0x342…348 lno = 0x0578 // 0x344 @0x2
0x342…348 at0004 = ╱92╱ PRINT ╱ // 0x346 @0x4
0x342…348 at0005 = EOL // 0x347 @0x5
0x342…348 }
0x348…358 90af 1410 SIDE=SIDE+E
0x348…358 LineComalBin {
0x348…358 ptr = 0x90af // 0x348 @0x0
0x348…358 lno = 0x0582 // 0x34a @0x2
0x348…358 at0004 = ╱53╱S╱ // 0x34c @0x4
0x348…358 at0005 = ╱49╱I╱ // 0x34d @0x5
0x348…358 at0006 = ╱44╱D╱ // 0x34e @0x6
0x348…358 at0007 = ╱45╱E╱ // 0x34f @0x7
0x348…358 at0008 = ╱dc╱=╱ // 0x350 @0x8
0x348…358 at0009 = ╱53╱S╱ // 0x351 @0x9
0x348…358 at000a = ╱49╱I╱ // 0x352 @0xa
0x348…358 at000b = ╱44╱D╱ // 0x353 @0xb
0x348…358 at000c = ╱45╱E╱ // 0x354 @0xc
0x348…358 at000d = ╱e2╱+╱ // 0x355 @0xd
0x348…358 at000e = ╱45╱E╱ // 0x356 @0xe
0x348…358 at000f = EOL // 0x357 @0xf
0x348…358 }
0x358…370 90c7 1420 PRINT USING " SIDE ###":SIDE;
0x358…370 LineComalBin {
0x358…370 ptr = 0x90c7 // 0x358 @0x0
0x358…370 lno = 0x058c // 0x35a @0x2
0x358…370 at0004 = ╱92╱ PRINT ╱ // 0x35c @0x4
0x358…370 at0005 = ╱b9╱ USING ╱ // 0x35d @0x5
0x358…370 at0006 = ╱22╱"╱ // 0x35e @0x6
0x358…370 at0007 = ╱20╱…╱ // 0x35f @0x7
0x358…370 at0008 = ╱53╱S╱ // 0x360 @0x8
0x358…370 at0009 = ╱49╱I╱ // 0x361 @0x9
0x358…370 at000a = ╱44╱D╱ // 0x362 @0xa
0x358…370 at000b = ╱45╱E╱ // 0x363 @0xb
0x358…370 at000c = ╱20╱…╱ // 0x364 @0xc
0x358…370 at000d = ╱23╱#╱ // 0x365 @0xd
0x358…370 at000e = ╱23╱#╱ // 0x366 @0xe
0x358…370 at000f = ╱23╱#╱ // 0x367 @0xf
0x358…370 at0010 = ╱22╱"╱ // 0x368 @0x10
0x358…370 at0011 = ╱f0╱:╱ // 0x369 @0x11
0x358…370 at0012 = ╱53╱S╱ // 0x36a @0x12
0x358…370 at0013 = ╱49╱I╱ // 0x36b @0x13
0x358…370 at0014 = ╱44╱D╱ // 0x36c @0x14
0x358…370 at0015 = ╱45╱E╱ // 0x36d @0x15
0x358…370 at0016 = ╱eb╱;╱ // 0x36e @0x16
0x358…370 at0017 = EOL // 0x36f @0x17
0x358…370 }
0x370…391 90e8 1425 PRINT " UDSKRIFTSDATO ";DAD$;
0x370…391 LineComalBin {
0x370…391 ptr = 0x90e8 // 0x370 @0x0
0x370…391 lno = 0x0591 // 0x372 @0x2
0x370…391 at0004 = ╱92╱ PRINT ╱ // 0x374 @0x4
0x370…391 at0005 = ╱22╱"╱ // 0x375 @0x5
0x370…391 at0006 = ╱20╱…╱ // 0x376 @0x6
0x370…391 at0007 = ╱20╱…╱ // 0x377 @0x7
0x370…391 at0008 = ╱20╱…╱ // 0x378 @0x8
0x370…391 at0009 = ╱20╱…╱ // 0x379 @0x9
0x370…391 at000a = ╱20╱…╱ // 0x37a @0xa
0x370…391 at000b = ╱55╱U╱ // 0x37b @0xb
0x370…391 at000c = ╱44╱D╱ // 0x37c @0xc
0x370…391 at000d = ╱53╱S╱ // 0x37d @0xd
0x370…391 at000e = ╱4b╱K╱ // 0x37e @0xe
0x370…391 at000f = ╱52╱R╱ // 0x37f @0xf
0x370…391 at0010 = ╱49╱I╱ // 0x380 @0x10
0x370…391 at0011 = ╱46╱F╱ // 0x381 @0x11
0x370…391 at0012 = ╱54╱T╱ // 0x382 @0x12
0x370…391 at0013 = ╱53╱S╱ // 0x383 @0x13
0x370…391 at0014 = ╱44╱D╱ // 0x384 @0x14
0x370…391 at0015 = ╱41╱A╱ // 0x385 @0x15
0x370…391 at0016 = ╱54╱T╱ // 0x386 @0x16
0x370…391 at0017 = ╱4f╱O╱ // 0x387 @0x17
0x370…391 at0018 = ╱20╱…╱ // 0x388 @0x18
0x370…391 at0019 = ╱22╱"╱ // 0x389 @0x19
0x370…391 at001a = ╱eb╱;╱ // 0x38a @0x1a
0x370…391 at001b = ╱44╱D╱ // 0x38b @0x1b
0x370…391 at001c = ╱41╱A╱ // 0x38c @0x1c
0x370…391 at001d = ╱44╱D╱ // 0x38d @0x1d
0x370…391 at001e = ╱ef╱$╱ // 0x38e @0x1e
0x370…391 at001f = ╱eb╱;╱ // 0x38f @0x1f
0x370…391 at0020 = EOL // 0x390 @0x20
0x370…391 }
0x391…3ca 9121 1430 PRINT TAB(49);"LØNPERIODEN ";STARTPER$;" / ";SLUTPER$;
0x391…3ca LineComalBin {
0x391…3ca ptr = 0x9121 // 0x391 @0x0
0x391…3ca lno = 0x0596 // 0x393 @0x2
0x391…3ca at0004 = ╱92╱ PRINT ╱ // 0x395 @0x4
0x391…3ca at0005 = ╱d2╱TAB╱ // 0x396 @0x5
0x391…3ca at0006 = ╱ed╱(╱ // 0x397 @0x6
0x391…3ca at0007 = ╱34╱4╱ // 0x398 @0x7
0x391…3ca at0008 = ╱39╱9╱ // 0x399 @0x8
0x391…3ca at0009 = ╱fe0000c406╱ // 0x39a @0x9
0x391…3ca at000e = ╱ee╱)╱ // 0x39f @0xe
0x391…3ca at000f = ╱eb╱;╱ // 0x3a0 @0xf
0x391…3ca at0010 = ╱22╱"╱ // 0x3a1 @0x10
0x391…3ca at0011 = ╱4c╱L╱ // 0x3a2 @0x11
0x391…3ca at0012 = ╱5c╱Ø╱ // 0x3a3 @0x12
0x391…3ca at0013 = ╱4e╱N╱ // 0x3a4 @0x13
0x391…3ca at0014 = ╱50╱P╱ // 0x3a5 @0x14
0x391…3ca at0015 = ╱45╱E╱ // 0x3a6 @0x15
0x391…3ca at0016 = ╱52╱R╱ // 0x3a7 @0x16
0x391…3ca at0017 = ╱49╱I╱ // 0x3a8 @0x17
0x391…3ca at0018 = ╱4f╱O╱ // 0x3a9 @0x18
0x391…3ca at0019 = ╱44╱D╱ // 0x3aa @0x19
0x391…3ca at001a = ╱45╱E╱ // 0x3ab @0x1a
0x391…3ca at001b = ╱4e╱N╱ // 0x3ac @0x1b
0x391…3ca at001c = ╱20╱…╱ // 0x3ad @0x1c
0x391…3ca at001d = ╱22╱"╱ // 0x3ae @0x1d
0x391…3ca at001e = ╱eb╱;╱ // 0x3af @0x1e
0x391…3ca at001f = ╱53╱S╱ // 0x3b0 @0x1f
0x391…3ca at0020 = ╱54╱T╱ // 0x3b1 @0x20
0x391…3ca at0021 = ╱41╱A╱ // 0x3b2 @0x21
0x391…3ca at0022 = ╱52╱R╱ // 0x3b3 @0x22
0x391…3ca at0023 = ╱54╱T╱ // 0x3b4 @0x23
0x391…3ca at0024 = ╱50╱P╱ // 0x3b5 @0x24
0x391…3ca at0025 = ╱45╱E╱ // 0x3b6 @0x25
0x391…3ca at0026 = ╱52╱R╱ // 0x3b7 @0x26
0x391…3ca at0027 = ╱ef╱$╱ // 0x3b8 @0x27
0x391…3ca at0028 = ╱eb╱;╱ // 0x3b9 @0x28
0x391…3ca at0029 = ╱22╱"╱ // 0x3ba @0x29
0x391…3ca at002a = ╱20╱…╱ // 0x3bb @0x2a
0x391…3ca at002b = ╱2f╱/╱ // 0x3bc @0x2b
0x391…3ca at002c = ╱20╱…╱ // 0x3bd @0x2c
0x391…3ca at002d = ╱22╱"╱ // 0x3be @0x2d
0x391…3ca at002e = ╱eb╱;╱ // 0x3bf @0x2e
0x391…3ca at002f = ╱53╱S╱ // 0x3c0 @0x2f
0x391…3ca at0030 = ╱4c╱L╱ // 0x3c1 @0x30
0x391…3ca at0031 = ╱55╱U╱ // 0x3c2 @0x31
0x391…3ca at0032 = ╱54╱T╱ // 0x3c3 @0x32
0x391…3ca at0033 = ╱50╱P╱ // 0x3c4 @0x33
0x391…3ca at0034 = ╱45╱E╱ // 0x3c5 @0x34
0x391…3ca at0035 = ╱52╱R╱ // 0x3c6 @0x35
0x391…3ca at0036 = ╱ef╱$╱ // 0x3c7 @0x36
0x391…3ca at0037 = ╱eb╱;╱ // 0x3c8 @0x37
0x391…3ca at0038 = EOL // 0x3c9 @0x38
0x391…3ca }
0x3ca…3db 9132 1440 LINIE=7
0x3ca…3db LineComalBin {
0x3ca…3db ptr = 0x9132 // 0x3ca @0x0
0x3ca…3db lno = 0x05a0 // 0x3cc @0x2
0x3ca…3db at0004 = ╱4c╱L╱ // 0x3ce @0x4
0x3ca…3db at0005 = ╱49╱I╱ // 0x3cf @0x5
0x3ca…3db at0006 = ╱4e╱N╱ // 0x3d0 @0x6
0x3ca…3db at0007 = ╱49╱I╱ // 0x3d1 @0x7
0x3ca…3db at0008 = ╱45╱E╱ // 0x3d2 @0x8
0x3ca…3db at0009 = ╱dc╱=╱ // 0x3d3 @0x9
0x3ca…3db at000a = ╱37╱7╱ // 0x3d4 @0xa
0x3ca…3db at000b = ╱fe0000e003╱ // 0x3d5 @0xb
0x3ca…3db at0010 = EOL // 0x3da @0x10
0x3ca…3db }
0x3db…3fb 9152 1450 PRINT TAB(34);"FRADRAGSLISTE"
0x3db…3fb LineComalBin {
0x3db…3fb ptr = 0x9152 // 0x3db @0x0
0x3db…3fb lno = 0x05aa // 0x3dd @0x2
0x3db…3fb at0004 = ╱92╱ PRINT ╱ // 0x3df @0x4
0x3db…3fb at0005 = ╱d2╱TAB╱ // 0x3e0 @0x5
0x3db…3fb at0006 = ╱ed╱(╱ // 0x3e1 @0x6
0x3db…3fb at0007 = ╱33╱3╱ // 0x3e2 @0x7
0x3db…3fb at0008 = ╱34╱4╱ // 0x3e3 @0x8
0x3db…3fb at0009 = ╱fe00008806╱ // 0x3e4 @0x9
0x3db…3fb at000e = ╱ee╱)╱ // 0x3e9 @0xe
0x3db…3fb at000f = ╱eb╱;╱ // 0x3ea @0xf
0x3db…3fb at0010 = ╱22╱"╱ // 0x3eb @0x10
0x3db…3fb at0011 = ╱46╱F╱ // 0x3ec @0x11
0x3db…3fb at0012 = ╱52╱R╱ // 0x3ed @0x12
0x3db…3fb at0013 = ╱41╱A╱ // 0x3ee @0x13
0x3db…3fb at0014 = ╱44╱D╱ // 0x3ef @0x14
0x3db…3fb at0015 = ╱52╱R╱ // 0x3f0 @0x15
0x3db…3fb at0016 = ╱41╱A╱ // 0x3f1 @0x16
0x3db…3fb at0017 = ╱47╱G╱ // 0x3f2 @0x17
0x3db…3fb at0018 = ╱53╱S╱ // 0x3f3 @0x18
0x3db…3fb at0019 = ╱4c╱L╱ // 0x3f4 @0x19
0x3db…3fb at001a = ╱49╱I╱ // 0x3f5 @0x1a
0x3db…3fb at001b = ╱53╱S╱ // 0x3f6 @0x1b
0x3db…3fb at001c = ╱54╱T╱ // 0x3f7 @0x1c
0x3db…3fb at001d = ╱45╱E╱ // 0x3f8 @0x1d
0x3db…3fb at001e = ╱22╱"╱ // 0x3f9 @0x1e
0x3db…3fb at001f = EOL // 0x3fa @0x1f
0x3db…3fb }
0x3fb…41b 9172 1460 PRINT TAB(34);"*************"
0x3fb…41b LineComalBin {
0x3fb…41b ptr = 0x9172 // 0x3fb @0x0
0x3fb…41b lno = 0x05b4 // 0x3fd @0x2
0x3fb…41b at0004 = ╱92╱ PRINT ╱ // 0x3ff @0x4
0x3fb…41b at0005 = ╱d2╱TAB╱ // 0x400 @0x5
0x3fb…41b at0006 = ╱ed╱(╱ // 0x401 @0x6
0x3fb…41b at0007 = ╱33╱3╱ // 0x402 @0x7
0x3fb…41b at0008 = ╱34╱4╱ // 0x403 @0x8
0x3fb…41b at0009 = ╱fe00008806╱ // 0x404 @0x9
0x3fb…41b at000e = ╱ee╱)╱ // 0x409 @0xe
0x3fb…41b at000f = ╱eb╱;╱ // 0x40a @0xf
0x3fb…41b at0010 = ╱22╱"╱ // 0x40b @0x10
0x3fb…41b at0011 = ╱2a╱*╱ // 0x40c @0x11
0x3fb…41b at0012 = ╱2a╱*╱ // 0x40d @0x12
0x3fb…41b at0013 = ╱2a╱*╱ // 0x40e @0x13
0x3fb…41b at0014 = ╱2a╱*╱ // 0x40f @0x14
0x3fb…41b at0015 = ╱2a╱*╱ // 0x410 @0x15
0x3fb…41b at0016 = ╱2a╱*╱ // 0x411 @0x16
0x3fb…41b at0017 = ╱2a╱*╱ // 0x412 @0x17
0x3fb…41b at0018 = ╱2a╱*╱ // 0x413 @0x18
0x3fb…41b at0019 = ╱2a╱*╱ // 0x414 @0x19
0x3fb…41b at001a = ╱2a╱*╱ // 0x415 @0x1a
0x3fb…41b at001b = ╱2a╱*╱ // 0x416 @0x1b
0x3fb…41b at001c = ╱2a╱*╱ // 0x417 @0x1c
0x3fb…41b at001d = ╱2a╱*╱ // 0x418 @0x1d
0x3fb…41b at001e = ╱22╱"╱ // 0x419 @0x1e
0x3fb…41b at001f = EOL // 0x41a @0x1f
0x3fb…41b }
0x41b…46e 91c5 1470 PRINT " LØN NAVN";TAB(37);"LA";TAB(45);"LA";TAB(53);"LA";TAB(61);"LA";
0x41b…46e LineComalBin {
0x41b…46e ptr = 0x91c5 // 0x41b @0x0
0x41b…46e lno = 0x05be // 0x41d @0x2
0x41b…46e at0004 = ╱92╱ PRINT ╱ // 0x41f @0x4
0x41b…46e at0005 = ╱22╱"╱ // 0x420 @0x5
0x41b…46e at0006 = ╱20╱…╱ // 0x421 @0x6
0x41b…46e at0007 = ╱4c╱L╱ // 0x422 @0x7
0x41b…46e at0008 = ╱5c╱Ø╱ // 0x423 @0x8
0x41b…46e at0009 = ╱4e╱N╱ // 0x424 @0x9
0x41b…46e at000a = ╱20╱…╱ // 0x425 @0xa
0x41b…46e at000b = ╱20╱…╱ // 0x426 @0xb
0x41b…46e at000c = ╱4e╱N╱ // 0x427 @0xc
0x41b…46e at000d = ╱41╱A╱ // 0x428 @0xd
0x41b…46e at000e = ╱56╱V╱ // 0x429 @0xe
0x41b…46e at000f = ╱4e╱N╱ // 0x42a @0xf
0x41b…46e at0010 = ╱22╱"╱ // 0x42b @0x10
0x41b…46e at0011 = ╱eb╱;╱ // 0x42c @0x11
0x41b…46e at0012 = ╱d2╱TAB╱ // 0x42d @0x12
0x41b…46e at0013 = ╱ed╱(╱ // 0x42e @0x13
0x41b…46e at0014 = ╱33╱3╱ // 0x42f @0x14
0x41b…46e at0015 = ╱37╱7╱ // 0x430 @0x15
0x41b…46e at0016 = ╱fe00009406╱ // 0x431 @0x16
0x41b…46e at001b = ╱ee╱)╱ // 0x436 @0x1b
0x41b…46e at001c = ╱eb╱;╱ // 0x437 @0x1c
0x41b…46e at001d = ╱22╱"╱ // 0x438 @0x1d
0x41b…46e at001e = ╱4c╱L╱ // 0x439 @0x1e
0x41b…46e at001f = ╱41╱A╱ // 0x43a @0x1f
0x41b…46e at0020 = ╱22╱"╱ // 0x43b @0x20
0x41b…46e at0021 = ╱eb╱;╱ // 0x43c @0x21
0x41b…46e at0022 = ╱d2╱TAB╱ // 0x43d @0x22
0x41b…46e at0023 = ╱ed╱(╱ // 0x43e @0x23
0x41b…46e at0024 = ╱34╱4╱ // 0x43f @0x24
0x41b…46e at0025 = ╱35╱5╱ // 0x440 @0x25
0x41b…46e at0026 = ╱fe0000b406╱ // 0x441 @0x26
0x41b…46e at002b = ╱ee╱)╱ // 0x446 @0x2b
0x41b…46e at002c = ╱eb╱;╱ // 0x447 @0x2c
0x41b…46e at002d = ╱22╱"╱ // 0x448 @0x2d
0x41b…46e at002e = ╱4c╱L╱ // 0x449 @0x2e
0x41b…46e at002f = ╱41╱A╱ // 0x44a @0x2f
0x41b…46e at0030 = ╱22╱"╱ // 0x44b @0x30
0x41b…46e at0031 = ╱eb╱;╱ // 0x44c @0x31
0x41b…46e at0032 = ╱d2╱TAB╱ // 0x44d @0x32
0x41b…46e at0033 = ╱ed╱(╱ // 0x44e @0x33
0x41b…46e at0034 = ╱35╱5╱ // 0x44f @0x34
0x41b…46e at0035 = ╱33╱3╱ // 0x450 @0x35
0x41b…46e at0036 = ╱fe0000d406╱ // 0x451 @0x36
0x41b…46e at003b = ╱ee╱)╱ // 0x456 @0x3b
0x41b…46e at003c = ╱eb╱;╱ // 0x457 @0x3c
0x41b…46e at003d = ╱22╱"╱ // 0x458 @0x3d
0x41b…46e at003e = ╱4c╱L╱ // 0x459 @0x3e
0x41b…46e at003f = ╱41╱A╱ // 0x45a @0x3f
0x41b…46e at0040 = ╱22╱"╱ // 0x45b @0x40
0x41b…46e at0041 = ╱eb╱;╱ // 0x45c @0x41
0x41b…46e at0042 = ╱d2╱TAB╱ // 0x45d @0x42
0x41b…46e at0043 = ╱ed╱(╱ // 0x45e @0x43
0x41b…46e at0044 = ╱36╱6╱ // 0x45f @0x44
0x41b…46e at0045 = ╱31╱1╱ // 0x460 @0x45
0x41b…46e at0046 = ╱fe0000f406╱ // 0x461 @0x46
0x41b…46e at004b = ╱ee╱)╱ // 0x466 @0x4b
0x41b…46e at004c = ╱eb╱;╱ // 0x467 @0x4c
0x41b…46e at004d = ╱22╱"╱ // 0x468 @0x4d
0x41b…46e at004e = ╱4c╱L╱ // 0x469 @0x4e
0x41b…46e at004f = ╱41╱A╱ // 0x46a @0x4f
0x41b…46e at0050 = ╱22╱"╱ // 0x46b @0x50
0x41b…46e at0051 = ╱eb╱;╱ // 0x46c @0x51
0x41b…46e at0052 = EOL // 0x46d @0x52
0x41b…46e }
0x46e…495 91ec 1480 PRINT TAB(69);"LA";TAB(75);"IALT"
0x46e…495 LineComalBin {
0x46e…495 ptr = 0x91ec // 0x46e @0x0
0x46e…495 lno = 0x05c8 // 0x470 @0x2
0x46e…495 at0004 = ╱92╱ PRINT ╱ // 0x472 @0x4
0x46e…495 at0005 = ╱d2╱TAB╱ // 0x473 @0x5
0x46e…495 at0006 = ╱ed╱(╱ // 0x474 @0x6
0x46e…495 at0007 = ╱36╱6╱ // 0x475 @0x7
0x46e…495 at0008 = ╱39╱9╱ // 0x476 @0x8
0x46e…495 at0009 = ╱fe00008a07╱ // 0x477 @0x9
0x46e…495 at000e = ╱ee╱)╱ // 0x47c @0xe
0x46e…495 at000f = ╱eb╱;╱ // 0x47d @0xf
0x46e…495 at0010 = ╱22╱"╱ // 0x47e @0x10
0x46e…495 at0011 = ╱4c╱L╱ // 0x47f @0x11
0x46e…495 at0012 = ╱41╱A╱ // 0x480 @0x12
0x46e…495 at0013 = ╱22╱"╱ // 0x481 @0x13
0x46e…495 at0014 = ╱eb╱;╱ // 0x482 @0x14
0x46e…495 at0015 = ╱d2╱TAB╱ // 0x483 @0x15
0x46e…495 at0016 = ╱ed╱(╱ // 0x484 @0x16
0x46e…495 at0017 = ╱37╱7╱ // 0x485 @0x17
0x46e…495 at0018 = ╱35╱5╱ // 0x486 @0x18
0x46e…495 at0019 = ╱fe00009607╱ // 0x487 @0x19
0x46e…495 at001e = ╱ee╱)╱ // 0x48c @0x1e
0x46e…495 at001f = ╱eb╱;╱ // 0x48d @0x1f
0x46e…495 at0020 = ╱22╱"╱ // 0x48e @0x20
0x46e…495 at0021 = ╱49╱I╱ // 0x48f @0x21
0x46e…495 at0022 = ╱41╱A╱ // 0x490 @0x22
0x46e…495 at0023 = ╱4c╱L╱ // 0x491 @0x23
0x46e…495 at0024 = ╱54╱T╱ // 0x492 @0x24
0x46e…495 at0025 = ╱22╱"╱ // 0x493 @0x25
0x46e…495 at0026 = EOL // 0x494 @0x26
0x46e…495 }
0x495…4ec 9243 1490 PRINT " NR";TAB(37);"60";TAB(45);"61";TAB(53);"62";TAB(61);"63";TAB(69);
0x495…4ec LineComalBin {
0x495…4ec ptr = 0x9243 // 0x495 @0x0
0x495…4ec lno = 0x05d2 // 0x497 @0x2
0x495…4ec at0004 = ╱92╱ PRINT ╱ // 0x499 @0x4
0x495…4ec at0005 = ╱22╱"╱ // 0x49a @0x5
0x495…4ec at0006 = ╱20╱…╱ // 0x49b @0x6
0x495…4ec at0007 = ╱4e╱N╱ // 0x49c @0x7
0x495…4ec at0008 = ╱52╱R╱ // 0x49d @0x8
0x495…4ec at0009 = ╱22╱"╱ // 0x49e @0x9
0x495…4ec at000a = ╱eb╱;╱ // 0x49f @0xa
0x495…4ec at000b = ╱d2╱TAB╱ // 0x4a0 @0xb
0x495…4ec at000c = ╱ed╱(╱ // 0x4a1 @0xc
0x495…4ec at000d = ╱33╱3╱ // 0x4a2 @0xd
0x495…4ec at000e = ╱37╱7╱ // 0x4a3 @0xe
0x495…4ec at000f = ╱fe00009406╱ // 0x4a4 @0xf
0x495…4ec at0014 = ╱ee╱)╱ // 0x4a9 @0x14
0x495…4ec at0015 = ╱eb╱;╱ // 0x4aa @0x15
0x495…4ec at0016 = ╱22╱"╱ // 0x4ab @0x16
0x495…4ec at0017 = ╱36╱6╱ // 0x4ac @0x17
0x495…4ec at0018 = ╱30╱0╱ // 0x4ad @0x18
0x495…4ec at0019 = ╱22╱"╱ // 0x4ae @0x19
0x495…4ec at001a = ╱eb╱;╱ // 0x4af @0x1a
0x495…4ec at001b = ╱d2╱TAB╱ // 0x4b0 @0x1b
0x495…4ec at001c = ╱ed╱(╱ // 0x4b1 @0x1c
0x495…4ec at001d = ╱34╱4╱ // 0x4b2 @0x1d
0x495…4ec at001e = ╱35╱5╱ // 0x4b3 @0x1e
0x495…4ec at001f = ╱fe0000b406╱ // 0x4b4 @0x1f
0x495…4ec at0024 = ╱ee╱)╱ // 0x4b9 @0x24
0x495…4ec at0025 = ╱eb╱;╱ // 0x4ba @0x25
0x495…4ec at0026 = ╱22╱"╱ // 0x4bb @0x26
0x495…4ec at0027 = ╱36╱6╱ // 0x4bc @0x27
0x495…4ec at0028 = ╱31╱1╱ // 0x4bd @0x28
0x495…4ec at0029 = ╱22╱"╱ // 0x4be @0x29
0x495…4ec at002a = ╱eb╱;╱ // 0x4bf @0x2a
0x495…4ec at002b = ╱d2╱TAB╱ // 0x4c0 @0x2b
0x495…4ec at002c = ╱ed╱(╱ // 0x4c1 @0x2c
0x495…4ec at002d = ╱35╱5╱ // 0x4c2 @0x2d
0x495…4ec at002e = ╱33╱3╱ // 0x4c3 @0x2e
0x495…4ec at002f = ╱fe0000d406╱ // 0x4c4 @0x2f
0x495…4ec at0034 = ╱ee╱)╱ // 0x4c9 @0x34
0x495…4ec at0035 = ╱eb╱;╱ // 0x4ca @0x35
0x495…4ec at0036 = ╱22╱"╱ // 0x4cb @0x36
0x495…4ec at0037 = ╱36╱6╱ // 0x4cc @0x37
0x495…4ec at0038 = ╱32╱2╱ // 0x4cd @0x38
0x495…4ec at0039 = ╱22╱"╱ // 0x4ce @0x39
0x495…4ec at003a = ╱eb╱;╱ // 0x4cf @0x3a
0x495…4ec at003b = ╱d2╱TAB╱ // 0x4d0 @0x3b
0x495…4ec at003c = ╱ed╱(╱ // 0x4d1 @0x3c
0x495…4ec at003d = ╱36╱6╱ // 0x4d2 @0x3d
0x495…4ec at003e = ╱31╱1╱ // 0x4d3 @0x3e
0x495…4ec at003f = ╱fe0000f406╱ // 0x4d4 @0x3f
0x495…4ec at0044 = ╱ee╱)╱ // 0x4d9 @0x44
0x495…4ec at0045 = ╱eb╱;╱ // 0x4da @0x45
0x495…4ec at0046 = ╱22╱"╱ // 0x4db @0x46
0x495…4ec at0047 = ╱36╱6╱ // 0x4dc @0x47
0x495…4ec at0048 = ╱33╱3╱ // 0x4dd @0x48
0x495…4ec at0049 = ╱22╱"╱ // 0x4de @0x49
0x495…4ec at004a = ╱eb╱;╱ // 0x4df @0x4a
0x495…4ec at004b = ╱d2╱TAB╱ // 0x4e0 @0x4b
0x495…4ec at004c = ╱ed╱(╱ // 0x4e1 @0x4c
0x495…4ec at004d = ╱36╱6╱ // 0x4e2 @0x4d
0x495…4ec at004e = ╱39╱9╱ // 0x4e3 @0x4e
0x495…4ec at004f = ╱fe00008a07╱ // 0x4e4 @0x4f
0x495…4ec at0054 = ╱ee╱)╱ // 0x4e9 @0x54
0x495…4ec at0055 = ╱eb╱;╱ // 0x4ea @0x55
0x495…4ec at0056 = EOL // 0x4eb @0x56
0x495…4ec }
0x4ec…4f6 924d 1500 PRINT "64"
0x4ec…4f6 LineComalBin {
0x4ec…4f6 ptr = 0x924d // 0x4ec @0x0
0x4ec…4f6 lno = 0x05dc // 0x4ee @0x2
0x4ec…4f6 at0004 = ╱92╱ PRINT ╱ // 0x4f0 @0x4
0x4ec…4f6 at0005 = ╱22╱"╱ // 0x4f1 @0x5
0x4ec…4f6 at0006 = ╱36╱6╱ // 0x4f2 @0x6
0x4ec…4f6 at0007 = ╱34╱4╱ // 0x4f3 @0x7
0x4ec…4f6 at0008 = ╱22╱"╱ // 0x4f4 @0x8
0x4ec…4f6 at0009 = EOL // 0x4f5 @0x9
0x4ec…4f6 }
0x4f6…547 929e 1501 PRINT TAB(37);"65";TAB(45);"66";TAB(53);"67";TAB(61);"68";TAB(69);
0x4f6…547 LineComalBin {
0x4f6…547 ptr = 0x929e // 0x4f6 @0x0
0x4f6…547 lno = 0x05dd // 0x4f8 @0x2
0x4f6…547 at0004 = ╱92╱ PRINT ╱ // 0x4fa @0x4
0x4f6…547 at0005 = ╱d2╱TAB╱ // 0x4fb @0x5
0x4f6…547 at0006 = ╱ed╱(╱ // 0x4fc @0x6
0x4f6…547 at0007 = ╱33╱3╱ // 0x4fd @0x7
0x4f6…547 at0008 = ╱37╱7╱ // 0x4fe @0x8
0x4f6…547 at0009 = ╱fe00009406╱ // 0x4ff @0x9
0x4f6…547 at000e = ╱ee╱)╱ // 0x504 @0xe
0x4f6…547 at000f = ╱eb╱;╱ // 0x505 @0xf
0x4f6…547 at0010 = ╱22╱"╱ // 0x506 @0x10
0x4f6…547 at0011 = ╱36╱6╱ // 0x507 @0x11
0x4f6…547 at0012 = ╱35╱5╱ // 0x508 @0x12
0x4f6…547 at0013 = ╱22╱"╱ // 0x509 @0x13
0x4f6…547 at0014 = ╱eb╱;╱ // 0x50a @0x14
0x4f6…547 at0015 = ╱d2╱TAB╱ // 0x50b @0x15
0x4f6…547 at0016 = ╱ed╱(╱ // 0x50c @0x16
0x4f6…547 at0017 = ╱34╱4╱ // 0x50d @0x17
0x4f6…547 at0018 = ╱35╱5╱ // 0x50e @0x18
0x4f6…547 at0019 = ╱fe0000b406╱ // 0x50f @0x19
0x4f6…547 at001e = ╱ee╱)╱ // 0x514 @0x1e
0x4f6…547 at001f = ╱eb╱;╱ // 0x515 @0x1f
0x4f6…547 at0020 = ╱22╱"╱ // 0x516 @0x20
0x4f6…547 at0021 = ╱36╱6╱ // 0x517 @0x21
0x4f6…547 at0022 = ╱36╱6╱ // 0x518 @0x22
0x4f6…547 at0023 = ╱22╱"╱ // 0x519 @0x23
0x4f6…547 at0024 = ╱eb╱;╱ // 0x51a @0x24
0x4f6…547 at0025 = ╱d2╱TAB╱ // 0x51b @0x25
0x4f6…547 at0026 = ╱ed╱(╱ // 0x51c @0x26
0x4f6…547 at0027 = ╱35╱5╱ // 0x51d @0x27
0x4f6…547 at0028 = ╱33╱3╱ // 0x51e @0x28
0x4f6…547 at0029 = ╱fe0000d406╱ // 0x51f @0x29
0x4f6…547 at002e = ╱ee╱)╱ // 0x524 @0x2e
0x4f6…547 at002f = ╱eb╱;╱ // 0x525 @0x2f
0x4f6…547 at0030 = ╱22╱"╱ // 0x526 @0x30
0x4f6…547 at0031 = ╱36╱6╱ // 0x527 @0x31
0x4f6…547 at0032 = ╱37╱7╱ // 0x528 @0x32
0x4f6…547 at0033 = ╱22╱"╱ // 0x529 @0x33
0x4f6…547 at0034 = ╱eb╱;╱ // 0x52a @0x34
0x4f6…547 at0035 = ╱d2╱TAB╱ // 0x52b @0x35
0x4f6…547 at0036 = ╱ed╱(╱ // 0x52c @0x36
0x4f6…547 at0037 = ╱36╱6╱ // 0x52d @0x37
0x4f6…547 at0038 = ╱31╱1╱ // 0x52e @0x38
0x4f6…547 at0039 = ╱fe0000f406╱ // 0x52f @0x39
0x4f6…547 at003e = ╱ee╱)╱ // 0x534 @0x3e
0x4f6…547 at003f = ╱eb╱;╱ // 0x535 @0x3f
0x4f6…547 at0040 = ╱22╱"╱ // 0x536 @0x40
0x4f6…547 at0041 = ╱36╱6╱ // 0x537 @0x41
0x4f6…547 at0042 = ╱38╱8╱ // 0x538 @0x42
0x4f6…547 at0043 = ╱22╱"╱ // 0x539 @0x43
0x4f6…547 at0044 = ╱eb╱;╱ // 0x53a @0x44
0x4f6…547 at0045 = ╱d2╱TAB╱ // 0x53b @0x45
0x4f6…547 at0046 = ╱ed╱(╱ // 0x53c @0x46
0x4f6…547 at0047 = ╱36╱6╱ // 0x53d @0x47
0x4f6…547 at0048 = ╱39╱9╱ // 0x53e @0x48
0x4f6…547 at0049 = ╱fe00008a07╱ // 0x53f @0x49
0x4f6…547 at004e = ╱ee╱)╱ // 0x544 @0x4e
0x4f6…547 at004f = ╱eb╱;╱ // 0x545 @0x4f
0x4f6…547 at0050 = EOL // 0x546 @0x50
0x4f6…547 }
0x547…551 92a8 1502 PRINT "69"
0x547…551 LineComalBin {
0x547…551 ptr = 0x92a8 // 0x547 @0x0
0x547…551 lno = 0x05de // 0x549 @0x2
0x547…551 at0004 = ╱92╱ PRINT ╱ // 0x54b @0x4
0x547…551 at0005 = ╱22╱"╱ // 0x54c @0x5
0x547…551 at0006 = ╱36╱6╱ // 0x54d @0x6
0x547…551 at0007 = ╱39╱9╱ // 0x54e @0x7
0x547…551 at0008 = ╱22╱"╱ // 0x54f @0x8
0x547…551 at0009 = EOL // 0x550 @0x9
0x547…551 }
0x551…557 92ae 1510 ENDPROC
0x551…557 LineComalBin {
0x551…557 ptr = 0x92ae // 0x551 @0x0
0x551…557 lno = 0x05e6 // 0x553 @0x2
0x551…557 at0004 = ╱9f╱ ENDPROC ╱ // 0x555 @0x4
0x551…557 at0005 = EOL // 0x556 @0x5
0x551…557 }
0x557…56b 92c2 1580 PROC FEJL(P1,P2,P3)
0x557…56b LineComalBin {
0x557…56b ptr = 0x92c2 // 0x557 @0x0
0x557…56b lno = 0x062c // 0x559 @0x2
0x557…56b at0004 = ╱9e╱ PROC ╱ // 0x55b @0x4
0x557…56b at0005 = ╱46╱F╱ // 0x55c @0x5
0x557…56b at0006 = ╱45╱E╱ // 0x55d @0x6
0x557…56b at0007 = ╱4a╱J╱ // 0x55e @0x7
0x557…56b at0008 = ╱4c╱L╱ // 0x55f @0x8
0x557…56b at0009 = ╱ed╱(╱ // 0x560 @0x9
0x557…56b at000a = ╱50╱P╱ // 0x561 @0xa
0x557…56b at000b = ╱31╱1╱ // 0x562 @0xb
0x557…56b at000c = ╱ec╱,╱ // 0x563 @0xc
0x557…56b at000d = ╱50╱P╱ // 0x564 @0xd
0x557…56b at000e = ╱32╱2╱ // 0x565 @0xe
0x557…56b at000f = ╱ec╱,╱ // 0x566 @0xf
0x557…56b at0010 = ╱50╱P╱ // 0x567 @0x10
0x557…56b at0011 = ╱33╱3╱ // 0x568 @0x11
0x557…56b at0012 = ╱ee╱)╱ // 0x569 @0x12
0x557…56b at0013 = EOL // 0x56a @0x13
0x557…56b }
0x56b…57a 92d1 1590 IF STATUS(P3$)<>B THEN
0x56b…57a LineComalBin {
0x56b…57a ptr = 0x92d1 // 0x56b @0x0
0x56b…57a lno = 0x0636 // 0x56d @0x2
0x56b…57a at0004 = ╱9c╱ IF ╱ // 0x56f @0x4
0x56b…57a at0005 = ╱ce╱STATUS╱ // 0x570 @0x5
0x56b…57a at0006 = ╱ed╱(╱ // 0x571 @0x6
0x56b…57a at0007 = ╱50╱P╱ // 0x572 @0x7
0x56b…57a at0008 = ╱33╱3╱ // 0x573 @0x8
0x56b…57a at0009 = ╱ef╱$╱ // 0x574 @0x9
0x56b…57a at000a = ╱ee╱)╱ // 0x575 @0xa
0x56b…57a at000b = ╱e1╱<>╱ // 0x576 @0xb
0x56b…57a at000c = ╱42╱B╱ // 0x577 @0xc
0x56b…57a at000d = ╱b6╱ THEN ╱ // 0x578 @0xd
0x56b…57a at000e = EOL // 0x579 @0xe
0x56b…57a }
0x57a…581 92d8 1600 OUTPUT T
0x57a…581 LineComalBin {
0x57a…581 ptr = 0x92d8 // 0x57a @0x0
0x57a…581 lno = 0x0640 // 0x57c @0x2
0x57a…581 at0004 = ╱a5╱ OUTPUT ╱ // 0x57e @0x4
0x57a…581 at0005 = ╱54╱T╱ // 0x57f @0x5
0x57a…581 at0006 = EOL // 0x580 @0x6
0x57a…581 }
0x581…5a3 92fa 1610 PRINT "FIL-FEJL ";P3$;STATUS(P3$),P1;P2
0x581…5a3 LineComalBin {
0x581…5a3 ptr = 0x92fa // 0x581 @0x0
0x581…5a3 lno = 0x064a // 0x583 @0x2
0x581…5a3 at0004 = ╱92╱ PRINT ╱ // 0x585 @0x4
0x581…5a3 at0005 = ╱22╱"╱ // 0x586 @0x5
0x581…5a3 at0006 = ╱46╱F╱ // 0x587 @0x6
0x581…5a3 at0007 = ╱49╱I╱ // 0x588 @0x7
0x581…5a3 at0008 = ╱4c╱L╱ // 0x589 @0x8
0x581…5a3 at0009 = ╱2d╱-╱ // 0x58a @0x9
0x581…5a3 at000a = ╱46╱F╱ // 0x58b @0xa
0x581…5a3 at000b = ╱45╱E╱ // 0x58c @0xb
0x581…5a3 at000c = ╱4a╱J╱ // 0x58d @0xc
0x581…5a3 at000d = ╱4c╱L╱ // 0x58e @0xd
0x581…5a3 at000e = ╱20╱…╱ // 0x58f @0xe
0x581…5a3 at000f = ╱22╱"╱ // 0x590 @0xf
0x581…5a3 at0010 = ╱eb╱;╱ // 0x591 @0x10
0x581…5a3 at0011 = ╱50╱P╱ // 0x592 @0x11
0x581…5a3 at0012 = ╱33╱3╱ // 0x593 @0x12
0x581…5a3 at0013 = ╱ef╱$╱ // 0x594 @0x13
0x581…5a3 at0014 = ╱eb╱;╱ // 0x595 @0x14
0x581…5a3 at0015 = ╱ce╱STATUS╱ // 0x596 @0x15
0x581…5a3 at0016 = ╱ed╱(╱ // 0x597 @0x16
0x581…5a3 at0017 = ╱50╱P╱ // 0x598 @0x17
0x581…5a3 at0018 = ╱33╱3╱ // 0x599 @0x18
0x581…5a3 at0019 = ╱ef╱$╱ // 0x59a @0x19
0x581…5a3 at001a = ╱ee╱)╱ // 0x59b @0x1a
0x581…5a3 at001b = ╱ec╱,╱ // 0x59c @0x1b
0x581…5a3 at001c = ╱50╱P╱ // 0x59d @0x1c
0x581…5a3 at001d = ╱31╱1╱ // 0x59e @0x1d
0x581…5a3 at001e = ╱eb╱;╱ // 0x59f @0x1e
0x581…5a3 at001f = ╱50╱P╱ // 0x5a0 @0x1f
0x581…5a3 at0020 = ╱32╱2╱ // 0x5a1 @0x20
0x581…5a3 at0021 = EOL // 0x5a2 @0x21
0x581…5a3 }
0x5a3…5a9 9300 1620 STOP
0x5a3…5a9 LineComalBin {
0x5a3…5a9 ptr = 0x9300 // 0x5a3 @0x0
0x5a3…5a9 lno = 0x0654 // 0x5a5 @0x2
0x5a3…5a9 at0004 = ╱8d╱ STOP ╱ // 0x5a7 @0x4
0x5a3…5a9 at0005 = EOL // 0x5a8 @0x5
0x5a3…5a9 }
0x5a9…5af 9306 1630 ENDIF
0x5a9…5af LineComalBin {
0x5a9…5af ptr = 0x9306 // 0x5a9 @0x0
0x5a9…5af lno = 0x065e // 0x5ab @0x2
0x5a9…5af at0004 = ╱9b╱ ENDIF ╱ // 0x5ad @0x4
0x5a9…5af at0005 = EOL // 0x5ae @0x5
0x5a9…5af }
0x5af…5b5 930c 1640 ENDPROC
0x5af…5b5 LineComalBin {
0x5af…5b5 ptr = 0x930c // 0x5af @0x0
0x5af…5b5 lno = 0x0668 // 0x5b1 @0x2
0x5af…5b5 at0004 = ╱9f╱ ENDPROC ╱ // 0x5b3 @0x4
0x5af…5b5 at0005 = EOL // 0x5b4 @0x5
0x5af…5b5 }
0x5b5…5d1 9328 1650 FIL$="P641220:VIRKKART"
0x5b5…5d1 LineComalBin {
0x5b5…5d1 ptr = 0x9328 // 0x5b5 @0x0
0x5b5…5d1 lno = 0x0672 // 0x5b7 @0x2
0x5b5…5d1 at0004 = ╱46╱F╱ // 0x5b9 @0x4
0x5b5…5d1 at0005 = ╱49╱I╱ // 0x5ba @0x5
0x5b5…5d1 at0006 = ╱4c╱L╱ // 0x5bb @0x6
0x5b5…5d1 at0007 = ╱ef╱$╱ // 0x5bc @0x7
0x5b5…5d1 at0008 = ╱dc╱=╱ // 0x5bd @0x8
0x5b5…5d1 at0009 = ╱22╱"╱ // 0x5be @0x9
0x5b5…5d1 at000a = ╱50╱P╱ // 0x5bf @0xa
0x5b5…5d1 at000b = ╱36╱6╱ // 0x5c0 @0xb
0x5b5…5d1 at000c = ╱34╱4╱ // 0x5c1 @0xc
0x5b5…5d1 at000d = ╱31╱1╱ // 0x5c2 @0xd
0x5b5…5d1 at000e = ╱32╱2╱ // 0x5c3 @0xe
0x5b5…5d1 at000f = ╱32╱2╱ // 0x5c4 @0xf
0x5b5…5d1 at0010 = ╱30╱0╱ // 0x5c5 @0x10
0x5b5…5d1 at0011 = ╱3a╱:╱ // 0x5c6 @0x11
0x5b5…5d1 at0012 = ╱56╱V╱ // 0x5c7 @0x12
0x5b5…5d1 at0013 = ╱49╱I╱ // 0x5c8 @0x13
0x5b5…5d1 at0014 = ╱52╱R╱ // 0x5c9 @0x14
0x5b5…5d1 at0015 = ╱4b╱K╱ // 0x5ca @0x15
0x5b5…5d1 at0016 = ╱4b╱K╱ // 0x5cb @0x16
0x5b5…5d1 at0017 = ╱41╱A╱ // 0x5cc @0x17
0x5b5…5d1 at0018 = ╱52╱R╱ // 0x5cd @0x18
0x5b5…5d1 at0019 = ╱54╱T╱ // 0x5ce @0x19
0x5b5…5d1 at001a = ╱22╱"╱ // 0x5cf @0x1a
0x5b5…5d1 at001b = EOL // 0x5d0 @0x1b
0x5b5…5d1 }
0x5d1…5de 9335 1660 EXEC INDVIRK
0x5d1…5de LineComalBin {
0x5d1…5de ptr = 0x9335 // 0x5d1 @0x0
0x5d1…5de lno = 0x067c // 0x5d3 @0x2
0x5d1…5de at0004 = ╱9d╱ EXEC ╱ // 0x5d5 @0x4
0x5d1…5de at0005 = ╱49╱I╱ // 0x5d6 @0x5
0x5d1…5de at0006 = ╱4e╱N╱ // 0x5d7 @0x6
0x5d1…5de at0007 = ╱44╱D╱ // 0x5d8 @0x7
0x5d1…5de at0008 = ╱56╱V╱ // 0x5d9 @0x8
0x5d1…5de at0009 = ╱49╱I╱ // 0x5da @0x9
0x5d1…5de at000a = ╱52╱R╱ // 0x5db @0xa
0x5d1…5de at000b = ╱4b╱K╱ // 0x5dc @0xb
0x5d1…5de at000c = EOL // 0x5dd @0xc
0x5d1…5de }
0x5de…5fb 9352 1675 FIL1$="P641220:LØNMODRG"
0x5de…5fb LineComalBin {
0x5de…5fb ptr = 0x9352 // 0x5de @0x0
0x5de…5fb lno = 0x068b // 0x5e0 @0x2
0x5de…5fb at0004 = ╱46╱F╱ // 0x5e2 @0x4
0x5de…5fb at0005 = ╱49╱I╱ // 0x5e3 @0x5
0x5de…5fb at0006 = ╱4c╱L╱ // 0x5e4 @0x6
0x5de…5fb at0007 = ╱31╱1╱ // 0x5e5 @0x7
0x5de…5fb at0008 = ╱ef╱$╱ // 0x5e6 @0x8
0x5de…5fb at0009 = ╱dc╱=╱ // 0x5e7 @0x9
0x5de…5fb at000a = ╱22╱"╱ // 0x5e8 @0xa
0x5de…5fb at000b = ╱50╱P╱ // 0x5e9 @0xb
0x5de…5fb at000c = ╱36╱6╱ // 0x5ea @0xc
0x5de…5fb at000d = ╱34╱4╱ // 0x5eb @0xd
0x5de…5fb at000e = ╱31╱1╱ // 0x5ec @0xe
0x5de…5fb at000f = ╱32╱2╱ // 0x5ed @0xf
0x5de…5fb at0010 = ╱32╱2╱ // 0x5ee @0x10
0x5de…5fb at0011 = ╱30╱0╱ // 0x5ef @0x11
0x5de…5fb at0012 = ╱3a╱:╱ // 0x5f0 @0x12
0x5de…5fb at0013 = ╱4c╱L╱ // 0x5f1 @0x13
0x5de…5fb at0014 = ╱5c╱Ø╱ // 0x5f2 @0x14
0x5de…5fb at0015 = ╱4e╱N╱ // 0x5f3 @0x15
0x5de…5fb at0016 = ╱4d╱M╱ // 0x5f4 @0x16
0x5de…5fb at0017 = ╱4f╱O╱ // 0x5f5 @0x17
0x5de…5fb at0018 = ╱44╱D╱ // 0x5f6 @0x18
0x5de…5fb at0019 = ╱52╱R╱ // 0x5f7 @0x19
0x5de…5fb at001a = ╱47╱G╱ // 0x5f8 @0x1a
0x5de…5fb at001b = ╱22╱"╱ // 0x5f9 @0x1b
0x5de…5fb at001c = EOL // 0x5fa @0x1c
0x5de…5fb }
0x5fb…608 935f 1680 OPEN FIL1$,R
0x5fb…608 LineComalBin {
0x5fb…608 ptr = 0x935f // 0x5fb @0x0
0x5fb…608 lno = 0x0690 // 0x5fd @0x2
0x5fb…608 at0004 = ╱a7╱ OPEN ╱ // 0x5ff @0x4
0x5fb…608 at0005 = ╱46╱F╱ // 0x600 @0x5
0x5fb…608 at0006 = ╱49╱I╱ // 0x601 @0x6
0x5fb…608 at0007 = ╱4c╱L╱ // 0x602 @0x7
0x5fb…608 at0008 = ╱31╱1╱ // 0x603 @0x8
0x5fb…608 at0009 = ╱ef╱$╱ // 0x604 @0x9
0x5fb…608 at000a = ╱ec╱,╱ // 0x605 @0xa
0x5fb…608 at000b = ╱52╱R╱ // 0x606 @0xb
0x5fb…608 at000c = EOL // 0x607 @0xc
0x5fb…608 }
0x608…623 937a 1710 MF4$="P641210:FRADRAG"
0x608…623 LineComalBin {
0x608…623 ptr = 0x937a // 0x608 @0x0
0x608…623 lno = 0x06ae // 0x60a @0x2
0x608…623 at0004 = ╱4d╱M╱ // 0x60c @0x4
0x608…623 at0005 = ╱46╱F╱ // 0x60d @0x5
0x608…623 at0006 = ╱34╱4╱ // 0x60e @0x6
0x608…623 at0007 = ╱ef╱$╱ // 0x60f @0x7
0x608…623 at0008 = ╱dc╱=╱ // 0x610 @0x8
0x608…623 at0009 = ╱22╱"╱ // 0x611 @0x9
0x608…623 at000a = ╱50╱P╱ // 0x612 @0xa
0x608…623 at000b = ╱36╱6╱ // 0x613 @0xb
0x608…623 at000c = ╱34╱4╱ // 0x614 @0xc
0x608…623 at000d = ╱31╱1╱ // 0x615 @0xd
0x608…623 at000e = ╱32╱2╱ // 0x616 @0xe
0x608…623 at000f = ╱31╱1╱ // 0x617 @0xf
0x608…623 at0010 = ╱30╱0╱ // 0x618 @0x10
0x608…623 at0011 = ╱3a╱:╱ // 0x619 @0x11
0x608…623 at0012 = ╱46╱F╱ // 0x61a @0x12
0x608…623 at0013 = ╱52╱R╱ // 0x61b @0x13
0x608…623 at0014 = ╱41╱A╱ // 0x61c @0x14
0x608…623 at0015 = ╱44╱D╱ // 0x61d @0x15
0x608…623 at0016 = ╱52╱R╱ // 0x61e @0x16
0x608…623 at0017 = ╱41╱A╱ // 0x61f @0x17
0x608…623 at0018 = ╱47╱G╱ // 0x620 @0x18
0x608…623 at0019 = ╱22╱"╱ // 0x621 @0x19
0x608…623 at001a = EOL // 0x622 @0x1a
0x608…623 }
0x623…62f 9386 1720 OPEN MF4$,R
0x623…62f LineComalBin {
0x623…62f ptr = 0x9386 // 0x623 @0x0
0x623…62f lno = 0x06b8 // 0x625 @0x2
0x623…62f at0004 = ╱a7╱ OPEN ╱ // 0x627 @0x4
0x623…62f at0005 = ╱4d╱M╱ // 0x628 @0x5
0x623…62f at0006 = ╱46╱F╱ // 0x629 @0x6
0x623…62f at0007 = ╱34╱4╱ // 0x62a @0x7
0x623…62f at0008 = ╱ef╱$╱ // 0x62b @0x8
0x623…62f at0009 = ╱ec╱,╱ // 0x62c @0x9
0x623…62f at000a = ╱52╱R╱ // 0x62d @0xa
0x623…62f at000b = EOL // 0x62e @0xb
0x623…62f }
0x62f…642 9399 1730 MAXLIN=72
0x62f…642 LineComalBin {
0x62f…642 ptr = 0x9399 // 0x62f @0x0
0x62f…642 lno = 0x06c2 // 0x631 @0x2
0x62f…642 at0004 = ╱4d╱M╱ // 0x633 @0x4
0x62f…642 at0005 = ╱41╱A╱ // 0x634 @0x5
0x62f…642 at0006 = ╱58╱X╱ // 0x635 @0x6
0x62f…642 at0007 = ╱4c╱L╱ // 0x636 @0x7
0x62f…642 at0008 = ╱49╱I╱ // 0x637 @0x8
0x62f…642 at0009 = ╱4e╱N╱ // 0x638 @0x9
0x62f…642 at000a = ╱dc╱=╱ // 0x639 @0xa
0x62f…642 at000b = ╱37╱7╱ // 0x63a @0xb
0x62f…642 at000c = ╱32╱2╱ // 0x63b @0xc
0x62f…642 at000d = ╱fe00009007╱ // 0x63c @0xd
0x62f…642 at0012 = EOL // 0x641 @0x12
0x62f…642 }
0x642…64d 93a4 1740 SIDE=B
0x642…64d LineComalBin {
0x642…64d ptr = 0x93a4 // 0x642 @0x0
0x642…64d lno = 0x06cc // 0x644 @0x2
0x642…64d at0004 = ╱53╱S╱ // 0x646 @0x4
0x642…64d at0005 = ╱49╱I╱ // 0x647 @0x5
0x642…64d at0006 = ╱44╱D╱ // 0x648 @0x6
0x642…64d at0007 = ╱45╱E╱ // 0x649 @0x7
0x642…64d at0008 = ╱dc╱=╱ // 0x64a @0x8
0x642…64d at0009 = ╱42╱B╱ // 0x64b @0x9
0x642…64d at000a = EOL // 0x64c @0xa
0x642…64d }
0x64d…66a 93c1 1750 GET MF4$:STARTPER$,SLUTPER$
0x64d…66a LineComalBin {
0x64d…66a ptr = 0x93c1 // 0x64d @0x0
0x64d…66a lno = 0x06d6 // 0x64f @0x2
0x64d…66a at0004 = ╱a9╱ GET ╱ // 0x651 @0x4
0x64d…66a at0005 = ╱4d╱M╱ // 0x652 @0x5
0x64d…66a at0006 = ╱46╱F╱ // 0x653 @0x6
0x64d…66a at0007 = ╱34╱4╱ // 0x654 @0x7
0x64d…66a at0008 = ╱ef╱$╱ // 0x655 @0x8
0x64d…66a at0009 = ╱f0╱:╱ // 0x656 @0x9
0x64d…66a at000a = ╱53╱S╱ // 0x657 @0xa
0x64d…66a at000b = ╱54╱T╱ // 0x658 @0xb
0x64d…66a at000c = ╱41╱A╱ // 0x659 @0xc
0x64d…66a at000d = ╱52╱R╱ // 0x65a @0xd
0x64d…66a at000e = ╱54╱T╱ // 0x65b @0xe
0x64d…66a at000f = ╱50╱P╱ // 0x65c @0xf
0x64d…66a at0010 = ╱45╱E╱ // 0x65d @0x10
0x64d…66a at0011 = ╱52╱R╱ // 0x65e @0x11
0x64d…66a at0012 = ╱ef╱$╱ // 0x65f @0x12
0x64d…66a at0013 = ╱ec╱,╱ // 0x660 @0x13
0x64d…66a at0014 = ╱53╱S╱ // 0x661 @0x14
0x64d…66a at0015 = ╱4c╱L╱ // 0x662 @0x15
0x64d…66a at0016 = ╱55╱U╱ // 0x663 @0x16
0x64d…66a at0017 = ╱54╱T╱ // 0x664 @0x17
0x64d…66a at0018 = ╱50╱P╱ // 0x665 @0x18
0x64d…66a at0019 = ╱45╱E╱ // 0x666 @0x19
0x64d…66a at001a = ╱52╱R╱ // 0x667 @0x1a
0x64d…66a at001b = ╱ef╱$╱ // 0x668 @0x1b
0x64d…66a at001c = EOL // 0x669 @0x1c
0x64d…66a }
0x66a…671 93c8 1760 OUTPUT P
0x66a…671 LineComalBin {
0x66a…671 ptr = 0x93c8 // 0x66a @0x0
0x66a…671 lno = 0x06e0 // 0x66c @0x2
0x66a…671 at0004 = ╱a5╱ OUTPUT ╱ // 0x66e @0x4
0x66a…671 at0005 = ╱50╱P╱ // 0x66f @0x5
0x66a…671 at0006 = EOL // 0x670 @0x6
0x66a…671 }
0x671…681 93d8 1770 FOR I=E TO 7
0x671…681 LineComalBin {
0x671…681 ptr = 0x93d8 // 0x671 @0x0
0x671…681 lno = 0x06ea // 0x673 @0x2
0x671…681 at0004 = ╱83╱ FOR ╱ // 0x675 @0x4
0x671…681 at0005 = ╱49╱I╱ // 0x676 @0x5
0x671…681 at0006 = ╱dc╱=╱ // 0x677 @0x6
0x671…681 at0007 = ╱45╱E╱ // 0x678 @0x7
0x671…681 at0008 = ╱b7╱ TO ╱ // 0x679 @0x8
0x671…681 at0009 = ╱37╱7╱ // 0x67a @0x9
0x671…681 at000a = ╱fe0000e003╱ // 0x67b @0xa
0x671…681 at000f = EOL // 0x680 @0xf
0x671…681 }
0x681…694 93eb 1780 TOTAL$(I)=TAH$
0x681…694 LineComalBin {
0x681…694 ptr = 0x93eb // 0x681 @0x0
0x681…694 lno = 0x06f4 // 0x683 @0x2
0x681…694 at0004 = ╱54╱T╱ // 0x685 @0x4
0x681…694 at0005 = ╱4f╱O╱ // 0x686 @0x5
0x681…694 at0006 = ╱54╱T╱ // 0x687 @0x6
0x681…694 at0007 = ╱41╱A╱ // 0x688 @0x7
0x681…694 at0008 = ╱4c╱L╱ // 0x689 @0x8
0x681…694 at0009 = ╱ef╱$╱ // 0x68a @0x9
0x681…694 at000a = ╱ed╱(╱ // 0x68b @0xa
0x681…694 at000b = ╱49╱I╱ // 0x68c @0xb
0x681…694 at000c = ╱ee╱)╱ // 0x68d @0xc
0x681…694 at000d = ╱dc╱=╱ // 0x68e @0xd
0x681…694 at000e = ╱54╱T╱ // 0x68f @0xe
0x681…694 at000f = ╱41╱A╱ // 0x690 @0xf
0x681…694 at0010 = ╱48╱H╱ // 0x691 @0x10
0x681…694 at0011 = ╱ef╱$╱ // 0x692 @0x11
0x681…694 at0012 = EOL // 0x693 @0x12
0x681…694 }
0x694…69b 93f2 1790 NEXT I
0x694…69b LineComalBin {
0x694…69b ptr = 0x93f2 // 0x694 @0x0
0x694…69b lno = 0x06fe // 0x696 @0x2
0x694…69b at0004 = ╱84╱ NEXT ╱ // 0x698 @0x4
0x694…69b at0005 = ╱49╱I╱ // 0x699 @0x5
0x694…69b at0006 = EOL // 0x69a @0x6
0x694…69b }
0x69b…6ab 9402 1800 EXEC SKRIVHOVED
0x69b…6ab LineComalBin {
0x69b…6ab ptr = 0x9402 // 0x69b @0x0
0x69b…6ab lno = 0x0708 // 0x69d @0x2
0x69b…6ab at0004 = ╱9d╱ EXEC ╱ // 0x69f @0x4
0x69b…6ab at0005 = ╱53╱S╱ // 0x6a0 @0x5
0x69b…6ab at0006 = ╱4b╱K╱ // 0x6a1 @0x6
0x69b…6ab at0007 = ╱52╱R╱ // 0x6a2 @0x7
0x69b…6ab at0008 = ╱49╱I╱ // 0x6a3 @0x8
0x69b…6ab at0009 = ╱56╱V╱ // 0x6a4 @0x9
0x69b…6ab at000a = ╱48╱H╱ // 0x6a5 @0xa
0x69b…6ab at000b = ╱4f╱O╱ // 0x6a6 @0xb
0x69b…6ab at000c = ╱56╱V╱ // 0x6a7 @0xc
0x69b…6ab at000d = ╱45╱E╱ // 0x6a8 @0xd
0x69b…6ab at000e = ╱44╱D╱ // 0x6a9 @0xe
0x69b…6ab at000f = EOL // 0x6aa @0xf
0x69b…6ab }
0x6ab…6c0 9417 1810 GET MF4$:LMNR,MF41$
0x6ab…6c0 LineComalBin {
0x6ab…6c0 ptr = 0x9417 // 0x6ab @0x0
0x6ab…6c0 lno = 0x0712 // 0x6ad @0x2
0x6ab…6c0 at0004 = ╱a9╱ GET ╱ // 0x6af @0x4
0x6ab…6c0 at0005 = ╱4d╱M╱ // 0x6b0 @0x5
0x6ab…6c0 at0006 = ╱46╱F╱ // 0x6b1 @0x6
0x6ab…6c0 at0007 = ╱34╱4╱ // 0x6b2 @0x7
0x6ab…6c0 at0008 = ╱ef╱$╱ // 0x6b3 @0x8
0x6ab…6c0 at0009 = ╱f0╱:╱ // 0x6b4 @0x9
0x6ab…6c0 at000a = ╱4c╱L╱ // 0x6b5 @0xa
0x6ab…6c0 at000b = ╱4d╱M╱ // 0x6b6 @0xb
0x6ab…6c0 at000c = ╱4e╱N╱ // 0x6b7 @0xc
0x6ab…6c0 at000d = ╱52╱R╱ // 0x6b8 @0xd
0x6ab…6c0 at000e = ╱ec╱,╱ // 0x6b9 @0xe
0x6ab…6c0 at000f = ╱4d╱M╱ // 0x6ba @0xf
0x6ab…6c0 at0010 = ╱46╱F╱ // 0x6bb @0x10
0x6ab…6c0 at0011 = ╱34╱4╱ // 0x6bc @0x11
0x6ab…6c0 at0012 = ╱31╱1╱ // 0x6bd @0x12
0x6ab…6c0 at0013 = ╱ef╱$╱ // 0x6be @0x13
0x6ab…6c0 at0014 = EOL // 0x6bf @0x14
0x6ab…6c0 }
0x6c0…6cf 9426 1820 WHILE STATUS(MF4$)=B
0x6c0…6cf LineComalBin {
0x6c0…6cf ptr = 0x9426 // 0x6c0 @0x0
0x6c0…6cf lno = 0x071c // 0x6c2 @0x2
0x6c0…6cf at0004 = ╱93╱ WHILE ╱ // 0x6c4 @0x4
0x6c0…6cf at0005 = ╱ce╱STATUS╱ // 0x6c5 @0x5
0x6c0…6cf at0006 = ╱ed╱(╱ // 0x6c6 @0x6
0x6c0…6cf at0007 = ╱4d╱M╱ // 0x6c7 @0x7
0x6c0…6cf at0008 = ╱46╱F╱ // 0x6c8 @0x8
0x6c0…6cf at0009 = ╱34╱4╱ // 0x6c9 @0x9
0x6c0…6cf at000a = ╱ef╱$╱ // 0x6ca @0xa
0x6c0…6cf at000b = ╱ee╱)╱ // 0x6cb @0xb
0x6c0…6cf at000c = ╱dc╱=╱ // 0x6cc @0xc
0x6c0…6cf at000d = ╱42╱B╱ // 0x6cd @0xd
0x6c0…6cf at000e = EOL // 0x6ce @0xe
0x6c0…6cf }
0x6cf…6e4 943b 1822 GET MF4$:LMNR,MF42$
0x6cf…6e4 LineComalBin {
0x6cf…6e4 ptr = 0x943b // 0x6cf @0x0
0x6cf…6e4 lno = 0x071e // 0x6d1 @0x2
0x6cf…6e4 at0004 = ╱a9╱ GET ╱ // 0x6d3 @0x4
0x6cf…6e4 at0005 = ╱4d╱M╱ // 0x6d4 @0x5
0x6cf…6e4 at0006 = ╱46╱F╱ // 0x6d5 @0x6
0x6cf…6e4 at0007 = ╱34╱4╱ // 0x6d6 @0x7
0x6cf…6e4 at0008 = ╱ef╱$╱ // 0x6d7 @0x8
0x6cf…6e4 at0009 = ╱f0╱:╱ // 0x6d8 @0x9
0x6cf…6e4 at000a = ╱4c╱L╱ // 0x6d9 @0xa
0x6cf…6e4 at000b = ╱4d╱M╱ // 0x6da @0xb
0x6cf…6e4 at000c = ╱4e╱N╱ // 0x6db @0xc
0x6cf…6e4 at000d = ╱52╱R╱ // 0x6dc @0xd
0x6cf…6e4 at000e = ╱ec╱,╱ // 0x6dd @0xe
0x6cf…6e4 at000f = ╱4d╱M╱ // 0x6de @0xf
0x6cf…6e4 at0010 = ╱46╱F╱ // 0x6df @0x10
0x6cf…6e4 at0011 = ╱34╱4╱ // 0x6e0 @0x11
0x6cf…6e4 at0012 = ╱32╱2╱ // 0x6e1 @0x12
0x6cf…6e4 at0013 = ╱ef╱$╱ // 0x6e2 @0x13
0x6cf…6e4 at0014 = EOL // 0x6e3 @0x14
0x6cf…6e4 }
0x6e4…6f8 944f 1825 EXEC INLØNMOD(LMNR)
0x6e4…6f8 LineComalBin {
0x6e4…6f8 ptr = 0x944f // 0x6e4 @0x0
0x6e4…6f8 lno = 0x0721 // 0x6e6 @0x2
0x6e4…6f8 at0004 = ╱9d╱ EXEC ╱ // 0x6e8 @0x4
0x6e4…6f8 at0005 = ╱49╱I╱ // 0x6e9 @0x5
0x6e4…6f8 at0006 = ╱4e╱N╱ // 0x6ea @0x6
0x6e4…6f8 at0007 = ╱4c╱L╱ // 0x6eb @0x7
0x6e4…6f8 at0008 = ╱5c╱Ø╱ // 0x6ec @0x8
0x6e4…6f8 at0009 = ╱4e╱N╱ // 0x6ed @0x9
0x6e4…6f8 at000a = ╱4d╱M╱ // 0x6ee @0xa
0x6e4…6f8 at000b = ╱4f╱O╱ // 0x6ef @0xb
0x6e4…6f8 at000c = ╱44╱D╱ // 0x6f0 @0xc
0x6e4…6f8 at000d = ╱ed╱(╱ // 0x6f1 @0xd
0x6e4…6f8 at000e = ╱4c╱L╱ // 0x6f2 @0xe
0x6e4…6f8 at000f = ╱4d╱M╱ // 0x6f3 @0xf
0x6e4…6f8 at0010 = ╱4e╱N╱ // 0x6f4 @0x10
0x6e4…6f8 at0011 = ╱52╱R╱ // 0x6f5 @0x11
0x6e4…6f8 at0012 = ╱ee╱)╱ // 0x6f6 @0x12
0x6e4…6f8 at0013 = EOL // 0x6f7 @0x13
0x6e4…6f8 }
0x6f8…70d 9464 1840 IF LINIE>MAXLIN-W THEN
0x6f8…70d LineComalBin {
0x6f8…70d ptr = 0x9464 // 0x6f8 @0x0
0x6f8…70d lno = 0x0730 // 0x6fa @0x2
0x6f8…70d at0004 = ╱9c╱ IF ╱ // 0x6fc @0x4
0x6f8…70d at0005 = ╱4c╱L╱ // 0x6fd @0x5
0x6f8…70d at0006 = ╱49╱I╱ // 0x6fe @0x6
0x6f8…70d at0007 = ╱4e╱N╱ // 0x6ff @0x7
0x6f8…70d at0008 = ╱49╱I╱ // 0x700 @0x8
0x6f8…70d at0009 = ╱45╱E╱ // 0x701 @0x9
0x6f8…70d at000a = ╱de╱>╱ // 0x702 @0xa
0x6f8…70d at000b = ╱4d╱M╱ // 0x703 @0xb
0x6f8…70d at000c = ╱41╱A╱ // 0x704 @0xc
0x6f8…70d at000d = ╱58╱X╱ // 0x705 @0xd
0x6f8…70d at000e = ╱4c╱L╱ // 0x706 @0xe
0x6f8…70d at000f = ╱49╱I╱ // 0x707 @0xf
0x6f8…70d at0010 = ╱4e╱N╱ // 0x708 @0x10
0x6f8…70d at0011 = ╱e3╱-╱ // 0x709 @0x11
0x6f8…70d at0012 = ╱57╱W╱ // 0x70a @0x12
0x6f8…70d at0013 = ╱b6╱ THEN ╱ // 0x70b @0x13
0x6f8…70d at0014 = EOL // 0x70c @0x14
0x6f8…70d }
0x70d…71f 9476 1850 WHILE LINIE<MAXLIN
0x70d…71f LineComalBin {
0x70d…71f ptr = 0x9476 // 0x70d @0x0
0x70d…71f lno = 0x073a // 0x70f @0x2
0x70d…71f at0004 = ╱93╱ WHILE ╱ // 0x711 @0x4
0x70d…71f at0005 = ╱4c╱L╱ // 0x712 @0x5
0x70d…71f at0006 = ╱49╱I╱ // 0x713 @0x6
0x70d…71f at0007 = ╱4e╱N╱ // 0x714 @0x7
0x70d…71f at0008 = ╱49╱I╱ // 0x715 @0x8
0x70d…71f at0009 = ╱45╱E╱ // 0x716 @0x9
0x70d…71f at000a = ╱dd╱<╱ // 0x717 @0xa
0x70d…71f at000b = ╱4d╱M╱ // 0x718 @0xb
0x70d…71f at000c = ╱41╱A╱ // 0x719 @0xc
0x70d…71f at000d = ╱58╱X╱ // 0x71a @0xd
0x70d…71f at000e = ╱4c╱L╱ // 0x71b @0xe
0x70d…71f at000f = ╱49╱I╱ // 0x71c @0xf
0x70d…71f at0010 = ╱4e╱N╱ // 0x71d @0x10
0x70d…71f at0011 = EOL // 0x71e @0x11
0x70d…71f }
0x71f…725 947c 1860 PRINT
0x71f…725 LineComalBin {
0x71f…725 ptr = 0x947c // 0x71f @0x0
0x71f…725 lno = 0x0744 // 0x721 @0x2
0x71f…725 at0004 = ╱92╱ PRINT ╱ // 0x723 @0x4
0x71f…725 at0005 = EOL // 0x724 @0x5
0x71f…725 }
0x725…737 948e 1870 LINIE=LINIE+E
0x725…737 LineComalBin {
0x725…737 ptr = 0x948e // 0x725 @0x0
0x725…737 lno = 0x074e // 0x727 @0x2
0x725…737 at0004 = ╱4c╱L╱ // 0x729 @0x4
0x725…737 at0005 = ╱49╱I╱ // 0x72a @0x5
0x725…737 at0006 = ╱4e╱N╱ // 0x72b @0x6
0x725…737 at0007 = ╱49╱I╱ // 0x72c @0x7
0x725…737 at0008 = ╱45╱E╱ // 0x72d @0x8
0x725…737 at0009 = ╱dc╱=╱ // 0x72e @0x9
0x725…737 at000a = ╱4c╱L╱ // 0x72f @0xa
0x725…737 at000b = ╱49╱I╱ // 0x730 @0xb
0x725…737 at000c = ╱4e╱N╱ // 0x731 @0xc
0x725…737 at000d = ╱49╱I╱ // 0x732 @0xd
0x725…737 at000e = ╱45╱E╱ // 0x733 @0xe
0x725…737 at000f = ╱e2╱+╱ // 0x734 @0xf
0x725…737 at0010 = ╱45╱E╱ // 0x735 @0x10
0x725…737 at0011 = EOL // 0x736 @0x11
0x725…737 }
0x737…73d 9494 1880 ENDWHILE
0x737…73d LineComalBin {
0x737…73d ptr = 0x9494 // 0x737 @0x0
0x737…73d lno = 0x0758 // 0x739 @0x2
0x737…73d at0004 = ╱94╱ ENDWHILE ╱ // 0x73b @0x4
0x737…73d at0005 = EOL // 0x73c @0x5
0x737…73d }
0x73d…74d 94a4 1890 EXEC SKRIVHOVED
0x73d…74d LineComalBin {
0x73d…74d ptr = 0x94a4 // 0x73d @0x0
0x73d…74d lno = 0x0762 // 0x73f @0x2
0x73d…74d at0004 = ╱9d╱ EXEC ╱ // 0x741 @0x4
0x73d…74d at0005 = ╱53╱S╱ // 0x742 @0x5
0x73d…74d at0006 = ╱4b╱K╱ // 0x743 @0x6
0x73d…74d at0007 = ╱52╱R╱ // 0x744 @0x7
0x73d…74d at0008 = ╱49╱I╱ // 0x745 @0x8
0x73d…74d at0009 = ╱56╱V╱ // 0x746 @0x9
0x73d…74d at000a = ╱48╱H╱ // 0x747 @0xa
0x73d…74d at000b = ╱4f╱O╱ // 0x748 @0xb
0x73d…74d at000c = ╱56╱V╱ // 0x749 @0xc
0x73d…74d at000d = ╱45╱E╱ // 0x74a @0xd
0x73d…74d at000e = ╱44╱D╱ // 0x74b @0xe
0x73d…74d at000f = EOL // 0x74c @0xf
0x73d…74d }
0x74d…753 94aa 1910 ENDIF
0x74d…753 LineComalBin {
0x74d…753 ptr = 0x94aa // 0x74d @0x0
0x74d…753 lno = 0x0776 // 0x74f @0x2
0x74d…753 at0004 = ╱9b╱ ENDIF ╱ // 0x751 @0x4
0x74d…753 at0005 = EOL // 0x752 @0x5
0x74d…753 }
0x753…76a 94c1 1915 LINIE=LINIE+5
0x753…76a LineComalBin {
0x753…76a ptr = 0x94c1 // 0x753 @0x0
0x753…76a lno = 0x077b // 0x755 @0x2
0x753…76a at0004 = ╱4c╱L╱ // 0x757 @0x4
0x753…76a at0005 = ╱49╱I╱ // 0x758 @0x5
0x753…76a at0006 = ╱4e╱N╱ // 0x759 @0x6
0x753…76a at0007 = ╱49╱I╱ // 0x75a @0x7
0x753…76a at0008 = ╱45╱E╱ // 0x75b @0x8
0x753…76a at0009 = ╱dc╱=╱ // 0x75c @0x9
0x753…76a at000a = ╱4c╱L╱ // 0x75d @0xa
0x753…76a at000b = ╱49╱I╱ // 0x75e @0xb
0x753…76a at000c = ╱4e╱N╱ // 0x75f @0xc
0x753…76a at000d = ╱49╱I╱ // 0x760 @0xd
0x753…76a at000e = ╱45╱E╱ // 0x761 @0xe
0x753…76a at000f = ╱e2╱+╱ // 0x762 @0xf
0x753…76a at0010 = ╱35╱5╱ // 0x763 @0x10
0x753…76a at0011 = ╱fe0000a003╱ // 0x764 @0x11
0x753…76a at0016 = EOL // 0x769 @0x16
0x753…76a }
0x76a…782 94d9 1920 TOTAL$(7)=TAH$
0x76a…782 LineComalBin {
0x76a…782 ptr = 0x94d9 // 0x76a @0x0
0x76a…782 lno = 0x0780 // 0x76c @0x2
0x76a…782 at0004 = ╱54╱T╱ // 0x76e @0x4
0x76a…782 at0005 = ╱4f╱O╱ // 0x76f @0x5
0x76a…782 at0006 = ╱54╱T╱ // 0x770 @0x6
0x76a…782 at0007 = ╱41╱A╱ // 0x771 @0x7
0x76a…782 at0008 = ╱4c╱L╱ // 0x772 @0x8
0x76a…782 at0009 = ╱ef╱$╱ // 0x773 @0x9
0x76a…782 at000a = ╱ed╱(╱ // 0x774 @0xa
0x76a…782 at000b = ╱37╱7╱ // 0x775 @0xb
0x76a…782 at000c = ╱fe0000e003╱ // 0x776 @0xc
0x76a…782 at0011 = ╱ee╱)╱ // 0x77b @0x11
0x76a…782 at0012 = ╱dc╱=╱ // 0x77c @0x12
0x76a…782 at0013 = ╱54╱T╱ // 0x77d @0x13
0x76a…782 at0014 = ╱41╱A╱ // 0x77e @0x14
0x76a…782 at0015 = ╱48╱H╱ // 0x77f @0x15
0x76a…782 at0016 = ╱ef╱$╱ // 0x780 @0x16
0x76a…782 at0017 = EOL // 0x781 @0x17
0x76a…782 }
0x782…792 94e9 1930 FOR I=E TO 5
0x782…792 LineComalBin {
0x782…792 ptr = 0x94e9 // 0x782 @0x0
0x782…792 lno = 0x078a // 0x784 @0x2
0x782…792 at0004 = ╱83╱ FOR ╱ // 0x786 @0x4
0x782…792 at0005 = ╱49╱I╱ // 0x787 @0x5
0x782…792 at0006 = ╱dc╱=╱ // 0x788 @0x6
0x782…792 at0007 = ╱45╱E╱ // 0x789 @0x7
0x782…792 at0008 = ╱b7╱ TO ╱ // 0x78a @0x8
0x782…792 at0009 = ╱35╱5╱ // 0x78b @0x9
0x782…792 at000a = ╱fe0000a003╱ // 0x78c @0xa
0x782…792 at000f = EOL // 0x791 @0xf
0x782…792 }
0x792…7bc 9513 1940 RESUL$=MF41$(E+(I-E)*10:10)
0x792…7bc LineComalBin {
0x792…7bc ptr = 0x9513 // 0x792 @0x0
0x792…7bc lno = 0x0794 // 0x794 @0x2
0x792…7bc at0004 = ╱52╱R╱ // 0x796 @0x4
0x792…7bc at0005 = ╱45╱E╱ // 0x797 @0x5
0x792…7bc at0006 = ╱53╱S╱ // 0x798 @0x6
0x792…7bc at0007 = ╱55╱U╱ // 0x799 @0x7
0x792…7bc at0008 = ╱4c╱L╱ // 0x79a @0x8
0x792…7bc at0009 = ╱ef╱$╱ // 0x79b @0x9
0x792…7bc at000a = ╱dc╱=╱ // 0x79c @0xa
0x792…7bc at000b = ╱4d╱M╱ // 0x79d @0xb
0x792…7bc at000c = ╱46╱F╱ // 0x79e @0xc
0x792…7bc at000d = ╱34╱4╱ // 0x79f @0xd
0x792…7bc at000e = ╱31╱1╱ // 0x7a0 @0xe
0x792…7bc at000f = ╱ef╱$╱ // 0x7a1 @0xf
0x792…7bc at0010 = ╱ed╱(╱ // 0x7a2 @0x10
0x792…7bc at0011 = ╱45╱E╱ // 0x7a3 @0x11
0x792…7bc at0012 = ╱e2╱+╱ // 0x7a4 @0x12
0x792…7bc at0013 = ╱ed╱(╱ // 0x7a5 @0x13
0x792…7bc at0014 = ╱49╱I╱ // 0x7a6 @0x14
0x792…7bc at0015 = ╱e3╱-╱ // 0x7a7 @0x15
0x792…7bc at0016 = ╱45╱E╱ // 0x7a8 @0x16
0x792…7bc at0017 = ╱ee╱)╱ // 0x7a9 @0x17
0x792…7bc at0018 = ╱e4╱*╱ // 0x7aa @0x18
0x792…7bc at0019 = ╱31╱1╱ // 0x7ab @0x19
0x792…7bc at001a = ╱30╱0╱ // 0x7ac @0x1a
0x792…7bc at001b = ╱fe0000a004╱ // 0x7ad @0x1b
0x792…7bc at0020 = ╱f0╱:╱ // 0x7b2 @0x20
0x792…7bc at0021 = ╱31╱1╱ // 0x7b3 @0x21
0x792…7bc at0022 = ╱30╱0╱ // 0x7b4 @0x22
0x792…7bc at0023 = ╱fe0000a004╱ // 0x7b5 @0x23
0x792…7bc at0028 = ╱ee╱)╱ // 0x7ba @0x28
0x792…7bc at0029 = EOL // 0x7bb @0x29
0x792…7bc }
0x7bc…7ee 9545 1945 EXEC CALC(B,RESUL$,TOTAL$(7),TOTAL$(7))
0x7bc…7ee LineComalBin {
0x7bc…7ee ptr = 0x9545 // 0x7bc @0x0
0x7bc…7ee lno = 0x0799 // 0x7be @0x2
0x7bc…7ee at0004 = ╱9d╱ EXEC ╱ // 0x7c0 @0x4
0x7bc…7ee at0005 = ╱43╱C╱ // 0x7c1 @0x5
0x7bc…7ee at0006 = ╱41╱A╱ // 0x7c2 @0x6
0x7bc…7ee at0007 = ╱4c╱L╱ // 0x7c3 @0x7
0x7bc…7ee at0008 = ╱43╱C╱ // 0x7c4 @0x8
0x7bc…7ee at0009 = ╱ed╱(╱ // 0x7c5 @0x9
0x7bc…7ee at000a = ╱42╱B╱ // 0x7c6 @0xa
0x7bc…7ee at000b = ╱ec╱,╱ // 0x7c7 @0xb
0x7bc…7ee at000c = ╱52╱R╱ // 0x7c8 @0xc
0x7bc…7ee at000d = ╱45╱E╱ // 0x7c9 @0xd
0x7bc…7ee at000e = ╱53╱S╱ // 0x7ca @0xe
0x7bc…7ee at000f = ╱55╱U╱ // 0x7cb @0xf
0x7bc…7ee at0010 = ╱4c╱L╱ // 0x7cc @0x10
0x7bc…7ee at0011 = ╱ef╱$╱ // 0x7cd @0x11
0x7bc…7ee at0012 = ╱ec╱,╱ // 0x7ce @0x12
0x7bc…7ee at0013 = ╱54╱T╱ // 0x7cf @0x13
0x7bc…7ee at0014 = ╱4f╱O╱ // 0x7d0 @0x14
0x7bc…7ee at0015 = ╱54╱T╱ // 0x7d1 @0x15
0x7bc…7ee at0016 = ╱41╱A╱ // 0x7d2 @0x16
0x7bc…7ee at0017 = ╱4c╱L╱ // 0x7d3 @0x17
0x7bc…7ee at0018 = ╱ef╱$╱ // 0x7d4 @0x18
0x7bc…7ee at0019 = ╱ed╱(╱ // 0x7d5 @0x19
0x7bc…7ee at001a = ╱37╱7╱ // 0x7d6 @0x1a
0x7bc…7ee at001b = ╱fe0000e003╱ // 0x7d7 @0x1b
0x7bc…7ee at0020 = ╱ee╱)╱ // 0x7dc @0x20
0x7bc…7ee at0021 = ╱ec╱,╱ // 0x7dd @0x21
0x7bc…7ee at0022 = ╱54╱T╱ // 0x7de @0x22
0x7bc…7ee at0023 = ╱4f╱O╱ // 0x7df @0x23
0x7bc…7ee at0024 = ╱54╱T╱ // 0x7e0 @0x24
0x7bc…7ee at0025 = ╱41╱A╱ // 0x7e1 @0x25
0x7bc…7ee at0026 = ╱4c╱L╱ // 0x7e2 @0x26
0x7bc…7ee at0027 = ╱ef╱$╱ // 0x7e3 @0x27
0x7bc…7ee at0028 = ╱ed╱(╱ // 0x7e4 @0x28
0x7bc…7ee at0029 = ╱37╱7╱ // 0x7e5 @0x29
0x7bc…7ee at002a = ╱fe0000e003╱ // 0x7e6 @0x2a
0x7bc…7ee at002f = ╱ee╱)╱ // 0x7eb @0x2f
0x7bc…7ee at0030 = ╱ee╱)╱ // 0x7ec @0x30
0x7bc…7ee at0031 = EOL // 0x7ed @0x31
0x7bc…7ee }
0x7ee…816 956d 1950 EXEC CALC(B,RESUL$,TOTAL$(I),TOTAL$(I))
0x7ee…816 LineComalBin {
0x7ee…816 ptr = 0x956d // 0x7ee @0x0
0x7ee…816 lno = 0x079e // 0x7f0 @0x2
0x7ee…816 at0004 = ╱9d╱ EXEC ╱ // 0x7f2 @0x4
0x7ee…816 at0005 = ╱43╱C╱ // 0x7f3 @0x5
0x7ee…816 at0006 = ╱41╱A╱ // 0x7f4 @0x6
0x7ee…816 at0007 = ╱4c╱L╱ // 0x7f5 @0x7
0x7ee…816 at0008 = ╱43╱C╱ // 0x7f6 @0x8
0x7ee…816 at0009 = ╱ed╱(╱ // 0x7f7 @0x9
0x7ee…816 at000a = ╱42╱B╱ // 0x7f8 @0xa
0x7ee…816 at000b = ╱ec╱,╱ // 0x7f9 @0xb
0x7ee…816 at000c = ╱52╱R╱ // 0x7fa @0xc
0x7ee…816 at000d = ╱45╱E╱ // 0x7fb @0xd
0x7ee…816 at000e = ╱53╱S╱ // 0x7fc @0xe
0x7ee…816 at000f = ╱55╱U╱ // 0x7fd @0xf
0x7ee…816 at0010 = ╱4c╱L╱ // 0x7fe @0x10
0x7ee…816 at0011 = ╱ef╱$╱ // 0x7ff @0x11
0x7ee…816 at0012 = ╱ec╱,╱ // 0x800 @0x12
0x7ee…816 at0013 = ╱54╱T╱ // 0x801 @0x13
0x7ee…816 at0014 = ╱4f╱O╱ // 0x802 @0x14
0x7ee…816 at0015 = ╱54╱T╱ // 0x803 @0x15
0x7ee…816 at0016 = ╱41╱A╱ // 0x804 @0x16
0x7ee…816 at0017 = ╱4c╱L╱ // 0x805 @0x17
0x7ee…816 at0018 = ╱ef╱$╱ // 0x806 @0x18
0x7ee…816 at0019 = ╱ed╱(╱ // 0x807 @0x19
0x7ee…816 at001a = ╱49╱I╱ // 0x808 @0x1a
0x7ee…816 at001b = ╱ee╱)╱ // 0x809 @0x1b
0x7ee…816 at001c = ╱ec╱,╱ // 0x80a @0x1c
0x7ee…816 at001d = ╱54╱T╱ // 0x80b @0x1d
0x7ee…816 at001e = ╱4f╱O╱ // 0x80c @0x1e
0x7ee…816 at001f = ╱54╱T╱ // 0x80d @0x1f
0x7ee…816 at0020 = ╱41╱A╱ // 0x80e @0x20
0x7ee…816 at0021 = ╱4c╱L╱ // 0x80f @0x21
0x7ee…816 at0022 = ╱ef╱$╱ // 0x810 @0x22
0x7ee…816 at0023 = ╱ed╱(╱ // 0x811 @0x23
0x7ee…816 at0024 = ╱49╱I╱ // 0x812 @0x24
0x7ee…816 at0025 = ╱ee╱)╱ // 0x813 @0x25
0x7ee…816 at0026 = ╱ee╱)╱ // 0x814 @0x26
0x7ee…816 at0027 = EOL // 0x815 @0x27
0x7ee…816 }
0x816…845 959c 1960 IF MF41$(I*10)="+" THEN MF41$(I*10)=" "
0x816…845 LineComalBin {
0x816…845 ptr = 0x959c // 0x816 @0x0
0x816…845 lno = 0x07a8 // 0x818 @0x2
0x816…845 at0004 = ╱82╱ IF ╱ // 0x81a @0x4
0x816…845 at0005 = ╱4d╱M╱ // 0x81b @0x5
0x816…845 at0006 = ╱46╱F╱ // 0x81c @0x6
0x816…845 at0007 = ╱34╱4╱ // 0x81d @0x7
0x816…845 at0008 = ╱31╱1╱ // 0x81e @0x8
0x816…845 at0009 = ╱ef╱$╱ // 0x81f @0x9
0x816…845 at000a = ╱ed╱(╱ // 0x820 @0xa
0x816…845 at000b = ╱49╱I╱ // 0x821 @0xb
0x816…845 at000c = ╱e4╱*╱ // 0x822 @0xc
0x816…845 at000d = ╱31╱1╱ // 0x823 @0xd
0x816…845 at000e = ╱30╱0╱ // 0x824 @0xe
0x816…845 at000f = ╱fe0000a004╱ // 0x825 @0xf
0x816…845 at0014 = ╱ee╱)╱ // 0x82a @0x14
0x816…845 at0015 = ╱dc╱=╱ // 0x82b @0x15
0x816…845 at0016 = ╱22╱"╱ // 0x82c @0x16
0x816…845 at0017 = ╱2b╱+╱ // 0x82d @0x17
0x816…845 at0018 = ╱22╱"╱ // 0x82e @0x18
0x816…845 at0019 = ╱b6╱ THEN ╱ // 0x82f @0x19
0x816…845 at001a = ╱4d╱M╱ // 0x830 @0x1a
0x816…845 at001b = ╱46╱F╱ // 0x831 @0x1b
0x816…845 at001c = ╱34╱4╱ // 0x832 @0x1c
0x816…845 at001d = ╱31╱1╱ // 0x833 @0x1d
0x816…845 at001e = ╱ef╱$╱ // 0x834 @0x1e
0x816…845 at001f = ╱ed╱(╱ // 0x835 @0x1f
0x816…845 at0020 = ╱49╱I╱ // 0x836 @0x20
0x816…845 at0021 = ╱e4╱*╱ // 0x837 @0x21
0x816…845 at0022 = ╱31╱1╱ // 0x838 @0x22
0x816…845 at0023 = ╱30╱0╱ // 0x839 @0x23
0x816…845 at0024 = ╱fe0000a004╱ // 0x83a @0x24
0x816…845 at0029 = ╱ee╱)╱ // 0x83f @0x29
0x816…845 at002a = ╱dc╱=╱ // 0x840 @0x2a
0x816…845 at002b = ╱22╱"╱ // 0x841 @0x2b
0x816…845 at002c = ╱20╱…╱ // 0x842 @0x2c
0x816…845 at002d = ╱22╱"╱ // 0x843 @0x2d
0x816…845 at002e = EOL // 0x844 @0x2e
0x816…845 }
0x845…86f 95c6 1962 RESUL$=MF42$(E+(I-E)*10:10)
0x845…86f LineComalBin {
0x845…86f ptr = 0x95c6 // 0x845 @0x0
0x845…86f lno = 0x07aa // 0x847 @0x2
0x845…86f at0004 = ╱52╱R╱ // 0x849 @0x4
0x845…86f at0005 = ╱45╱E╱ // 0x84a @0x5
0x845…86f at0006 = ╱53╱S╱ // 0x84b @0x6
0x845…86f at0007 = ╱55╱U╱ // 0x84c @0x7
0x845…86f at0008 = ╱4c╱L╱ // 0x84d @0x8
0x845…86f at0009 = ╱ef╱$╱ // 0x84e @0x9
0x845…86f at000a = ╱dc╱=╱ // 0x84f @0xa
0x845…86f at000b = ╱4d╱M╱ // 0x850 @0xb
0x845…86f at000c = ╱46╱F╱ // 0x851 @0xc
0x845…86f at000d = ╱34╱4╱ // 0x852 @0xd
0x845…86f at000e = ╱32╱2╱ // 0x853 @0xe
0x845…86f at000f = ╱ef╱$╱ // 0x854 @0xf
0x845…86f at0010 = ╱ed╱(╱ // 0x855 @0x10
0x845…86f at0011 = ╱45╱E╱ // 0x856 @0x11
0x845…86f at0012 = ╱e2╱+╱ // 0x857 @0x12
0x845…86f at0013 = ╱ed╱(╱ // 0x858 @0x13
0x845…86f at0014 = ╱49╱I╱ // 0x859 @0x14
0x845…86f at0015 = ╱e3╱-╱ // 0x85a @0x15
0x845…86f at0016 = ╱45╱E╱ // 0x85b @0x16
0x845…86f at0017 = ╱ee╱)╱ // 0x85c @0x17
0x845…86f at0018 = ╱e4╱*╱ // 0x85d @0x18
0x845…86f at0019 = ╱31╱1╱ // 0x85e @0x19
0x845…86f at001a = ╱30╱0╱ // 0x85f @0x1a
0x845…86f at001b = ╱fe0000a004╱ // 0x860 @0x1b
0x845…86f at0020 = ╱f0╱:╱ // 0x865 @0x20
0x845…86f at0021 = ╱31╱1╱ // 0x866 @0x21
0x845…86f at0022 = ╱30╱0╱ // 0x867 @0x22
0x845…86f at0023 = ╱fe0000a004╱ // 0x868 @0x23
0x845…86f at0028 = ╱ee╱)╱ // 0x86d @0x28
0x845…86f at0029 = EOL // 0x86e @0x29
0x845…86f }
0x86f…899 95f0 1964 EXEC CALC(B,RESUL$,TOTAL1$(I),TOTAL1$(I))
0x86f…899 LineComalBin {
0x86f…899 ptr = 0x95f0 // 0x86f @0x0
0x86f…899 lno = 0x07ac // 0x871 @0x2
0x86f…899 at0004 = ╱9d╱ EXEC ╱ // 0x873 @0x4
0x86f…899 at0005 = ╱43╱C╱ // 0x874 @0x5
0x86f…899 at0006 = ╱41╱A╱ // 0x875 @0x6
0x86f…899 at0007 = ╱4c╱L╱ // 0x876 @0x7
0x86f…899 at0008 = ╱43╱C╱ // 0x877 @0x8
0x86f…899 at0009 = ╱ed╱(╱ // 0x878 @0x9
0x86f…899 at000a = ╱42╱B╱ // 0x879 @0xa
0x86f…899 at000b = ╱ec╱,╱ // 0x87a @0xb
0x86f…899 at000c = ╱52╱R╱ // 0x87b @0xc
0x86f…899 at000d = ╱45╱E╱ // 0x87c @0xd
0x86f…899 at000e = ╱53╱S╱ // 0x87d @0xe
0x86f…899 at000f = ╱55╱U╱ // 0x87e @0xf
0x86f…899 at0010 = ╱4c╱L╱ // 0x87f @0x10
0x86f…899 at0011 = ╱ef╱$╱ // 0x880 @0x11
0x86f…899 at0012 = ╱ec╱,╱ // 0x881 @0x12
0x86f…899 at0013 = ╱54╱T╱ // 0x882 @0x13
0x86f…899 at0014 = ╱4f╱O╱ // 0x883 @0x14
0x86f…899 at0015 = ╱54╱T╱ // 0x884 @0x15
0x86f…899 at0016 = ╱41╱A╱ // 0x885 @0x16
0x86f…899 at0017 = ╱4c╱L╱ // 0x886 @0x17
0x86f…899 at0018 = ╱31╱1╱ // 0x887 @0x18
0x86f…899 at0019 = ╱ef╱$╱ // 0x888 @0x19
0x86f…899 at001a = ╱ed╱(╱ // 0x889 @0x1a
0x86f…899 at001b = ╱49╱I╱ // 0x88a @0x1b
0x86f…899 at001c = ╱ee╱)╱ // 0x88b @0x1c
0x86f…899 at001d = ╱ec╱,╱ // 0x88c @0x1d
0x86f…899 at001e = ╱54╱T╱ // 0x88d @0x1e
0x86f…899 at001f = ╱4f╱O╱ // 0x88e @0x1f
0x86f…899 at0020 = ╱54╱T╱ // 0x88f @0x20
0x86f…899 at0021 = ╱41╱A╱ // 0x890 @0x21
0x86f…899 at0022 = ╱4c╱L╱ // 0x891 @0x22
0x86f…899 at0023 = ╱31╱1╱ // 0x892 @0x23
0x86f…899 at0024 = ╱ef╱$╱ // 0x893 @0x24
0x86f…899 at0025 = ╱ed╱(╱ // 0x894 @0x25
0x86f…899 at0026 = ╱49╱I╱ // 0x895 @0x26
0x86f…899 at0027 = ╱ee╱)╱ // 0x896 @0x27
0x86f…899 at0028 = ╱ee╱)╱ // 0x897 @0x28
0x86f…899 at0029 = EOL // 0x898 @0x29
0x86f…899 }
0x899…8cb 9622 1966 EXEC CALC(B,RESUL$,TOTAL$(7),TOTAL$(7))
0x899…8cb LineComalBin {
0x899…8cb ptr = 0x9622 // 0x899 @0x0
0x899…8cb lno = 0x07ae // 0x89b @0x2
0x899…8cb at0004 = ╱9d╱ EXEC ╱ // 0x89d @0x4
0x899…8cb at0005 = ╱43╱C╱ // 0x89e @0x5
0x899…8cb at0006 = ╱41╱A╱ // 0x89f @0x6
0x899…8cb at0007 = ╱4c╱L╱ // 0x8a0 @0x7
0x899…8cb at0008 = ╱43╱C╱ // 0x8a1 @0x8
0x899…8cb at0009 = ╱ed╱(╱ // 0x8a2 @0x9
0x899…8cb at000a = ╱42╱B╱ // 0x8a3 @0xa
0x899…8cb at000b = ╱ec╱,╱ // 0x8a4 @0xb
0x899…8cb at000c = ╱52╱R╱ // 0x8a5 @0xc
0x899…8cb at000d = ╱45╱E╱ // 0x8a6 @0xd
0x899…8cb at000e = ╱53╱S╱ // 0x8a7 @0xe
0x899…8cb at000f = ╱55╱U╱ // 0x8a8 @0xf
0x899…8cb at0010 = ╱4c╱L╱ // 0x8a9 @0x10
0x899…8cb at0011 = ╱ef╱$╱ // 0x8aa @0x11
0x899…8cb at0012 = ╱ec╱,╱ // 0x8ab @0x12
0x899…8cb at0013 = ╱54╱T╱ // 0x8ac @0x13
0x899…8cb at0014 = ╱4f╱O╱ // 0x8ad @0x14
0x899…8cb at0015 = ╱54╱T╱ // 0x8ae @0x15
0x899…8cb at0016 = ╱41╱A╱ // 0x8af @0x16
0x899…8cb at0017 = ╱4c╱L╱ // 0x8b0 @0x17
0x899…8cb at0018 = ╱ef╱$╱ // 0x8b1 @0x18
0x899…8cb at0019 = ╱ed╱(╱ // 0x8b2 @0x19
0x899…8cb at001a = ╱37╱7╱ // 0x8b3 @0x1a
0x899…8cb at001b = ╱fe0000e003╱ // 0x8b4 @0x1b
0x899…8cb at0020 = ╱ee╱)╱ // 0x8b9 @0x20
0x899…8cb at0021 = ╱ec╱,╱ // 0x8ba @0x21
0x899…8cb at0022 = ╱54╱T╱ // 0x8bb @0x22
0x899…8cb at0023 = ╱4f╱O╱ // 0x8bc @0x23
0x899…8cb at0024 = ╱54╱T╱ // 0x8bd @0x24
0x899…8cb at0025 = ╱41╱A╱ // 0x8be @0x25
0x899…8cb at0026 = ╱4c╱L╱ // 0x8bf @0x26
0x899…8cb at0027 = ╱ef╱$╱ // 0x8c0 @0x27
0x899…8cb at0028 = ╱ed╱(╱ // 0x8c1 @0x28
0x899…8cb at0029 = ╱37╱7╱ // 0x8c2 @0x29
0x899…8cb at002a = ╱fe0000e003╱ // 0x8c3 @0x2a
0x899…8cb at002f = ╱ee╱)╱ // 0x8c8 @0x2f
0x899…8cb at0030 = ╱ee╱)╱ // 0x8c9 @0x30
0x899…8cb at0031 = EOL // 0x8ca @0x31
0x899…8cb }
0x8cb…8fa 9651 1968 IF MF42$(I*10)="+" THEN MF42$(I*10)=" "
0x8cb…8fa LineComalBin {
0x8cb…8fa ptr = 0x9651 // 0x8cb @0x0
0x8cb…8fa lno = 0x07b0 // 0x8cd @0x2
0x8cb…8fa at0004 = ╱82╱ IF ╱ // 0x8cf @0x4
0x8cb…8fa at0005 = ╱4d╱M╱ // 0x8d0 @0x5
0x8cb…8fa at0006 = ╱46╱F╱ // 0x8d1 @0x6
0x8cb…8fa at0007 = ╱34╱4╱ // 0x8d2 @0x7
0x8cb…8fa at0008 = ╱32╱2╱ // 0x8d3 @0x8
0x8cb…8fa at0009 = ╱ef╱$╱ // 0x8d4 @0x9
0x8cb…8fa at000a = ╱ed╱(╱ // 0x8d5 @0xa
0x8cb…8fa at000b = ╱49╱I╱ // 0x8d6 @0xb
0x8cb…8fa at000c = ╱e4╱*╱ // 0x8d7 @0xc
0x8cb…8fa at000d = ╱31╱1╱ // 0x8d8 @0xd
0x8cb…8fa at000e = ╱30╱0╱ // 0x8d9 @0xe
0x8cb…8fa at000f = ╱fe0000a004╱ // 0x8da @0xf
0x8cb…8fa at0014 = ╱ee╱)╱ // 0x8df @0x14
0x8cb…8fa at0015 = ╱dc╱=╱ // 0x8e0 @0x15
0x8cb…8fa at0016 = ╱22╱"╱ // 0x8e1 @0x16
0x8cb…8fa at0017 = ╱2b╱+╱ // 0x8e2 @0x17
0x8cb…8fa at0018 = ╱22╱"╱ // 0x8e3 @0x18
0x8cb…8fa at0019 = ╱b6╱ THEN ╱ // 0x8e4 @0x19
0x8cb…8fa at001a = ╱4d╱M╱ // 0x8e5 @0x1a
0x8cb…8fa at001b = ╱46╱F╱ // 0x8e6 @0x1b
0x8cb…8fa at001c = ╱34╱4╱ // 0x8e7 @0x1c
0x8cb…8fa at001d = ╱32╱2╱ // 0x8e8 @0x1d
0x8cb…8fa at001e = ╱ef╱$╱ // 0x8e9 @0x1e
0x8cb…8fa at001f = ╱ed╱(╱ // 0x8ea @0x1f
0x8cb…8fa at0020 = ╱49╱I╱ // 0x8eb @0x20
0x8cb…8fa at0021 = ╱e4╱*╱ // 0x8ec @0x21
0x8cb…8fa at0022 = ╱31╱1╱ // 0x8ed @0x22
0x8cb…8fa at0023 = ╱30╱0╱ // 0x8ee @0x23
0x8cb…8fa at0024 = ╱fe0000a004╱ // 0x8ef @0x24
0x8cb…8fa at0029 = ╱ee╱)╱ // 0x8f4 @0x29
0x8cb…8fa at002a = ╱dc╱=╱ // 0x8f5 @0x2a
0x8cb…8fa at002b = ╱22╱"╱ // 0x8f6 @0x2b
0x8cb…8fa at002c = ╱20╱…╱ // 0x8f7 @0x2c
0x8cb…8fa at002d = ╱22╱"╱ // 0x8f8 @0x2d
0x8cb…8fa at002e = EOL // 0x8f9 @0x2e
0x8cb…8fa }
0x8fa…901 9658 1970 NEXT I
0x8fa…901 LineComalBin {
0x8fa…901 ptr = 0x9658 // 0x8fa @0x0
0x8fa…901 lno = 0x07b2 // 0x8fc @0x2
0x8fa…901 at0004 = ╱84╱ NEXT ╱ // 0x8fe @0x4
0x8fa…901 at0005 = ╱49╱I╱ // 0x8ff @0x5
0x8fa…901 at0006 = EOL // 0x900 @0x6
0x8fa…901 }
0x901…93b 9692 1980 EXEC CALC(B,TOTAL$(7),TOTAL$(6),TOTAL$(6))
0x901…93b LineComalBin {
0x901…93b ptr = 0x9692 // 0x901 @0x0
0x901…93b lno = 0x07bc // 0x903 @0x2
0x901…93b at0004 = ╱9d╱ EXEC ╱ // 0x905 @0x4
0x901…93b at0005 = ╱43╱C╱ // 0x906 @0x5
0x901…93b at0006 = ╱41╱A╱ // 0x907 @0x6
0x901…93b at0007 = ╱4c╱L╱ // 0x908 @0x7
0x901…93b at0008 = ╱43╱C╱ // 0x909 @0x8
0x901…93b at0009 = ╱ed╱(╱ // 0x90a @0x9
0x901…93b at000a = ╱42╱B╱ // 0x90b @0xa
0x901…93b at000b = ╱ec╱,╱ // 0x90c @0xb
0x901…93b at000c = ╱54╱T╱ // 0x90d @0xc
0x901…93b at000d = ╱4f╱O╱ // 0x90e @0xd
0x901…93b at000e = ╱54╱T╱ // 0x90f @0xe
0x901…93b at000f = ╱41╱A╱ // 0x910 @0xf
0x901…93b at0010 = ╱4c╱L╱ // 0x911 @0x10
0x901…93b at0011 = ╱ef╱$╱ // 0x912 @0x11
0x901…93b at0012 = ╱ed╱(╱ // 0x913 @0x12
0x901…93b at0013 = ╱37╱7╱ // 0x914 @0x13
0x901…93b at0014 = ╱fe0000e003╱ // 0x915 @0x14
0x901…93b at0019 = ╱ee╱)╱ // 0x91a @0x19
0x901…93b at001a = ╱ec╱,╱ // 0x91b @0x1a
0x901…93b at001b = ╱54╱T╱ // 0x91c @0x1b
0x901…93b at001c = ╱4f╱O╱ // 0x91d @0x1c
0x901…93b at001d = ╱54╱T╱ // 0x91e @0x1d
0x901…93b at001e = ╱41╱A╱ // 0x91f @0x1e
0x901…93b at001f = ╱4c╱L╱ // 0x920 @0x1f
0x901…93b at0020 = ╱ef╱$╱ // 0x921 @0x20
0x901…93b at0021 = ╱ed╱(╱ // 0x922 @0x21
0x901…93b at0022 = ╱36╱6╱ // 0x923 @0x22
0x901…93b at0023 = ╱fe0000c003╱ // 0x924 @0x23
0x901…93b at0028 = ╱ee╱)╱ // 0x929 @0x28
0x901…93b at0029 = ╱ec╱,╱ // 0x92a @0x29
0x901…93b at002a = ╱54╱T╱ // 0x92b @0x2a
0x901…93b at002b = ╱4f╱O╱ // 0x92c @0x2b
0x901…93b at002c = ╱54╱T╱ // 0x92d @0x2c
0x901…93b at002d = ╱41╱A╱ // 0x92e @0x2d
0x901…93b at002e = ╱4c╱L╱ // 0x92f @0x2e
0x901…93b at002f = ╱ef╱$╱ // 0x930 @0x2f
0x901…93b at0030 = ╱ed╱(╱ // 0x931 @0x30
0x901…93b at0031 = ╱36╱6╱ // 0x932 @0x31
0x901…93b at0032 = ╱fe0000c003╱ // 0x933 @0x32
0x901…93b at0037 = ╱ee╱)╱ // 0x938 @0x37
0x901…93b at0038 = ╱ee╱)╱ // 0x939 @0x38
0x901…93b at0039 = EOL // 0x93a @0x39
0x901…93b }
0x93b…960 96b7 1990 RESUL1$=TOTAL$(7,V:10)
0x93b…960 LineComalBin {
0x93b…960 ptr = 0x96b7 // 0x93b @0x0
0x93b…960 lno = 0x07c6 // 0x93d @0x2
0x93b…960 at0004 = ╱52╱R╱ // 0x93f @0x4
0x93b…960 at0005 = ╱45╱E╱ // 0x940 @0x5
0x93b…960 at0006 = ╱53╱S╱ // 0x941 @0x6
0x93b…960 at0007 = ╱55╱U╱ // 0x942 @0x7
0x93b…960 at0008 = ╱4c╱L╱ // 0x943 @0x8
0x93b…960 at0009 = ╱31╱1╱ // 0x944 @0x9
0x93b…960 at000a = ╱ef╱$╱ // 0x945 @0xa
0x93b…960 at000b = ╱dc╱=╱ // 0x946 @0xb
0x93b…960 at000c = ╱54╱T╱ // 0x947 @0xc
0x93b…960 at000d = ╱4f╱O╱ // 0x948 @0xd
0x93b…960 at000e = ╱54╱T╱ // 0x949 @0xe
0x93b…960 at000f = ╱41╱A╱ // 0x94a @0xf
0x93b…960 at0010 = ╱4c╱L╱ // 0x94b @0x10
0x93b…960 at0011 = ╱ef╱$╱ // 0x94c @0x11
0x93b…960 at0012 = ╱ed╱(╱ // 0x94d @0x12
0x93b…960 at0013 = ╱37╱7╱ // 0x94e @0x13
0x93b…960 at0014 = ╱fe0000e003╱ // 0x94f @0x14
0x93b…960 at0019 = ╱ec╱,╱ // 0x954 @0x19
0x93b…960 at001a = ╱56╱V╱ // 0x955 @0x1a
0x93b…960 at001b = ╱f0╱:╱ // 0x956 @0x1b
0x93b…960 at001c = ╱31╱1╱ // 0x957 @0x1c
0x93b…960 at001d = ╱30╱0╱ // 0x958 @0x1d
0x93b…960 at001e = ╱fe0000a004╱ // 0x959 @0x1e
0x93b…960 at0023 = ╱ee╱)╱ // 0x95e @0x23
0x93b…960 at0024 = EOL // 0x95f @0x24
0x93b…960 }
0x960…98f 96e6 2000 IF RESUL1$(10)="+" THEN RESUL1$(10)=" "
0x960…98f LineComalBin {
0x960…98f ptr = 0x96e6 // 0x960 @0x0
0x960…98f lno = 0x07d0 // 0x962 @0x2
0x960…98f at0004 = ╱82╱ IF ╱ // 0x964 @0x4
0x960…98f at0005 = ╱52╱R╱ // 0x965 @0x5
0x960…98f at0006 = ╱45╱E╱ // 0x966 @0x6
0x960…98f at0007 = ╱53╱S╱ // 0x967 @0x7
0x960…98f at0008 = ╱55╱U╱ // 0x968 @0x8
0x960…98f at0009 = ╱4c╱L╱ // 0x969 @0x9
0x960…98f at000a = ╱31╱1╱ // 0x96a @0xa
0x960…98f at000b = ╱ef╱$╱ // 0x96b @0xb
0x960…98f at000c = ╱ed╱(╱ // 0x96c @0xc
0x960…98f at000d = ╱31╱1╱ // 0x96d @0xd
0x960…98f at000e = ╱30╱0╱ // 0x96e @0xe
0x960…98f at000f = ╱fe0000a004╱ // 0x96f @0xf
0x960…98f at0014 = ╱ee╱)╱ // 0x974 @0x14
0x960…98f at0015 = ╱dc╱=╱ // 0x975 @0x15
0x960…98f at0016 = ╱22╱"╱ // 0x976 @0x16
0x960…98f at0017 = ╱2b╱+╱ // 0x977 @0x17
0x960…98f at0018 = ╱22╱"╱ // 0x978 @0x18
0x960…98f at0019 = ╱b6╱ THEN ╱ // 0x979 @0x19
0x960…98f at001a = ╱52╱R╱ // 0x97a @0x1a
0x960…98f at001b = ╱45╱E╱ // 0x97b @0x1b
0x960…98f at001c = ╱53╱S╱ // 0x97c @0x1c
0x960…98f at001d = ╱55╱U╱ // 0x97d @0x1d
0x960…98f at001e = ╱4c╱L╱ // 0x97e @0x1e
0x960…98f at001f = ╱31╱1╱ // 0x97f @0x1f
0x960…98f at0020 = ╱ef╱$╱ // 0x980 @0x20
0x960…98f at0021 = ╱ed╱(╱ // 0x981 @0x21
0x960…98f at0022 = ╱31╱1╱ // 0x982 @0x22
0x960…98f at0023 = ╱30╱0╱ // 0x983 @0x23
0x960…98f at0024 = ╱fe0000a004╱ // 0x984 @0x24
0x960…98f at0029 = ╱ee╱)╱ // 0x989 @0x29
0x960…98f at002a = ╱dc╱=╱ // 0x98a @0x2a
0x960…98f at002b = ╱22╱"╱ // 0x98b @0x2b
0x960…98f at002c = ╱20╱…╱ // 0x98c @0x2c
0x960…98f at002d = ╱22╱"╱ // 0x98d @0x2d
0x960…98f at002e = EOL // 0x98e @0x2e
0x960…98f }
0x98f…9a2 96f9 2030 PRINT USING "####":LMNR;
0x98f…9a2 LineComalBin {
0x98f…9a2 ptr = 0x96f9 // 0x98f @0x0
0x98f…9a2 lno = 0x07ee // 0x991 @0x2
0x98f…9a2 at0004 = ╱92╱ PRINT ╱ // 0x993 @0x4
0x98f…9a2 at0005 = ╱b9╱ USING ╱ // 0x994 @0x5
0x98f…9a2 at0006 = ╱22╱"╱ // 0x995 @0x6
0x98f…9a2 at0007 = ╱23╱#╱ // 0x996 @0x7
0x98f…9a2 at0008 = ╱23╱#╱ // 0x997 @0x8
0x98f…9a2 at0009 = ╱23╱#╱ // 0x998 @0x9
0x98f…9a2 at000a = ╱23╱#╱ // 0x999 @0xa
0x98f…9a2 at000b = ╱22╱"╱ // 0x99a @0xb
0x98f…9a2 at000c = ╱f0╱:╱ // 0x99b @0xc
0x98f…9a2 at000d = ╱4c╱L╱ // 0x99c @0xd
0x98f…9a2 at000e = ╱4d╱M╱ // 0x99d @0xe
0x98f…9a2 at000f = ╱4e╱N╱ // 0x99e @0xf
0x98f…9a2 at0010 = ╱52╱R╱ // 0x99f @0x10
0x98f…9a2 at0011 = ╱eb╱;╱ // 0x9a0 @0x11
0x98f…9a2 at0012 = EOL // 0x9a1 @0x12
0x98f…9a2 }
0x9a2…9c4 971b 2035 PRINT TAB(7);POST1$(E,25);
0x9a2…9c4 LineComalBin {
0x9a2…9c4 ptr = 0x971b // 0x9a2 @0x0
0x9a2…9c4 lno = 0x07f3 // 0x9a4 @0x2
0x9a2…9c4 at0004 = ╱92╱ PRINT ╱ // 0x9a6 @0x4
0x9a2…9c4 at0005 = ╱d2╱TAB╱ // 0x9a7 @0x5
0x9a2…9c4 at0006 = ╱ed╱(╱ // 0x9a8 @0x6
0x9a2…9c4 at0007 = ╱37╱7╱ // 0x9a9 @0x7
0x9a2…9c4 at0008 = ╱fe0000e003╱ // 0x9aa @0x8
0x9a2…9c4 at000d = ╱ee╱)╱ // 0x9af @0xd
0x9a2…9c4 at000e = ╱eb╱;╱ // 0x9b0 @0xe
0x9a2…9c4 at000f = ╱50╱P╱ // 0x9b1 @0xf
0x9a2…9c4 at0010 = ╱4f╱O╱ // 0x9b2 @0x10
0x9a2…9c4 at0011 = ╱53╱S╱ // 0x9b3 @0x11
0x9a2…9c4 at0012 = ╱54╱T╱ // 0x9b4 @0x12
0x9a2…9c4 at0013 = ╱31╱1╱ // 0x9b5 @0x13
0x9a2…9c4 at0014 = ╱ef╱$╱ // 0x9b6 @0x14
0x9a2…9c4 at0015 = ╱ed╱(╱ // 0x9b7 @0x15
0x9a2…9c4 at0016 = ╱45╱E╱ // 0x9b8 @0x16
0x9a2…9c4 at0017 = ╱ec╱,╱ // 0x9b9 @0x17
0x9a2…9c4 at0018 = ╱32╱2╱ // 0x9ba @0x18
0x9a2…9c4 at0019 = ╱35╱5╱ // 0x9bb @0x19
0x9a2…9c4 at001a = ╱fe0000c805╱ // 0x9bc @0x1a
0x9a2…9c4 at001f = ╱ee╱)╱ // 0x9c1 @0x1f
0x9a2…9c4 at0020 = ╱eb╱;╱ // 0x9c2 @0x20
0x9a2…9c4 at0021 = EOL // 0x9c3 @0x21
0x9a2…9c4 }
0x9c4…a1b 9772 2040 PRINT TAB(38);MF41$(E,10);TAB(54);MF41$(11,20);TAB(70);RESUL1$;
0x9c4…a1b LineComalBin {
0x9c4…a1b ptr = 0x9772 // 0x9c4 @0x0
0x9c4…a1b lno = 0x07f8 // 0x9c6 @0x2
0x9c4…a1b at0004 = ╱92╱ PRINT ╱ // 0x9c8 @0x4
0x9c4…a1b at0005 = ╱d2╱TAB╱ // 0x9c9 @0x5
0x9c4…a1b at0006 = ╱ed╱(╱ // 0x9ca @0x6
0x9c4…a1b at0007 = ╱33╱3╱ // 0x9cb @0x7
0x9c4…a1b at0008 = ╱38╱8╱ // 0x9cc @0x8
0x9c4…a1b at0009 = ╱fe00009806╱ // 0x9cd @0x9
0x9c4…a1b at000e = ╱ee╱)╱ // 0x9d2 @0xe
0x9c4…a1b at000f = ╱eb╱;╱ // 0x9d3 @0xf
0x9c4…a1b at0010 = ╱4d╱M╱ // 0x9d4 @0x10
0x9c4…a1b at0011 = ╱46╱F╱ // 0x9d5 @0x11
0x9c4…a1b at0012 = ╱34╱4╱ // 0x9d6 @0x12
0x9c4…a1b at0013 = ╱31╱1╱ // 0x9d7 @0x13
0x9c4…a1b at0014 = ╱ef╱$╱ // 0x9d8 @0x14
0x9c4…a1b at0015 = ╱ed╱(╱ // 0x9d9 @0x15
0x9c4…a1b at0016 = ╱45╱E╱ // 0x9da @0x16
0x9c4…a1b at0017 = ╱ec╱,╱ // 0x9db @0x17
0x9c4…a1b at0018 = ╱31╱1╱ // 0x9dc @0x18
0x9c4…a1b at0019 = ╱30╱0╱ // 0x9dd @0x19
0x9c4…a1b at001a = ╱fe0000a004╱ // 0x9de @0x1a
0x9c4…a1b at001f = ╱ee╱)╱ // 0x9e3 @0x1f
0x9c4…a1b at0020 = ╱eb╱;╱ // 0x9e4 @0x20
0x9c4…a1b at0021 = ╱d2╱TAB╱ // 0x9e5 @0x21
0x9c4…a1b at0022 = ╱ed╱(╱ // 0x9e6 @0x22
0x9c4…a1b at0023 = ╱35╱5╱ // 0x9e7 @0x23
0x9c4…a1b at0024 = ╱34╱4╱ // 0x9e8 @0x24
0x9c4…a1b at0025 = ╱fe0000d806╱ // 0x9e9 @0x25
0x9c4…a1b at002a = ╱ee╱)╱ // 0x9ee @0x2a
0x9c4…a1b at002b = ╱eb╱;╱ // 0x9ef @0x2b
0x9c4…a1b at002c = ╱4d╱M╱ // 0x9f0 @0x2c
0x9c4…a1b at002d = ╱46╱F╱ // 0x9f1 @0x2d
0x9c4…a1b at002e = ╱34╱4╱ // 0x9f2 @0x2e
0x9c4…a1b at002f = ╱31╱1╱ // 0x9f3 @0x2f
0x9c4…a1b at0030 = ╱ef╱$╱ // 0x9f4 @0x30
0x9c4…a1b at0031 = ╱ed╱(╱ // 0x9f5 @0x31
0x9c4…a1b at0032 = ╱31╱1╱ // 0x9f6 @0x32
0x9c4…a1b at0033 = ╱31╱1╱ // 0x9f7 @0x33
0x9c4…a1b at0034 = ╱fe0000b004╱ // 0x9f8 @0x34
0x9c4…a1b at0039 = ╱ec╱,╱ // 0x9fd @0x39
0x9c4…a1b at003a = ╱32╱2╱ // 0x9fe @0x3a
0x9c4…a1b at003b = ╱30╱0╱ // 0x9ff @0x3b
0x9c4…a1b at003c = ╱fe0000a005╱ // 0xa00 @0x3c
0x9c4…a1b at0041 = ╱ee╱)╱ // 0xa05 @0x41
0x9c4…a1b at0042 = ╱eb╱;╱ // 0xa06 @0x42
0x9c4…a1b at0043 = ╱d2╱TAB╱ // 0xa07 @0x43
0x9c4…a1b at0044 = ╱ed╱(╱ // 0xa08 @0x44
0x9c4…a1b at0045 = ╱37╱7╱ // 0xa09 @0x45
0x9c4…a1b at0046 = ╱30╱0╱ // 0xa0a @0x46
0x9c4…a1b at0047 = ╱fe00008c07╱ // 0xa0b @0x47
0x9c4…a1b at004c = ╱ee╱)╱ // 0xa10 @0x4c
0x9c4…a1b at004d = ╱eb╱;╱ // 0xa11 @0x4d
0x9c4…a1b at004e = ╱52╱R╱ // 0xa12 @0x4e
0x9c4…a1b at004f = ╱45╱E╱ // 0xa13 @0x4f
0x9c4…a1b at0050 = ╱53╱S╱ // 0xa14 @0x50
0x9c4…a1b at0051 = ╱55╱U╱ // 0xa15 @0x51
0x9c4…a1b at0052 = ╱4c╱L╱ // 0xa16 @0x52
0x9c4…a1b at0053 = ╱31╱1╱ // 0xa17 @0x53
0x9c4…a1b at0054 = ╱ef╱$╱ // 0xa18 @0x54
0x9c4…a1b at0055 = ╱eb╱;╱ // 0xa19 @0x55
0x9c4…a1b at0056 = EOL // 0xa1a @0x56
0x9c4…a1b }
0xa1b…a86 97dd 2050 PRINT TAB(30);MF41$(21,30);TAB(46);MF41$(31,40);TAB(62);MF41$(41,50)
0xa1b…a86 LineComalBin {
0xa1b…a86 ptr = 0x97dd // 0xa1b @0x0
0xa1b…a86 lno = 0x0802 // 0xa1d @0x2
0xa1b…a86 at0004 = ╱92╱ PRINT ╱ // 0xa1f @0x4
0xa1b…a86 at0005 = ╱d2╱TAB╱ // 0xa20 @0x5
0xa1b…a86 at0006 = ╱ed╱(╱ // 0xa21 @0x6
0xa1b…a86 at0007 = ╱33╱3╱ // 0xa22 @0x7
0xa1b…a86 at0008 = ╱30╱0╱ // 0xa23 @0x8
0xa1b…a86 at0009 = ╱fe0000f005╱ // 0xa24 @0x9
0xa1b…a86 at000e = ╱ee╱)╱ // 0xa29 @0xe
0xa1b…a86 at000f = ╱eb╱;╱ // 0xa2a @0xf
0xa1b…a86 at0010 = ╱4d╱M╱ // 0xa2b @0x10
0xa1b…a86 at0011 = ╱46╱F╱ // 0xa2c @0x11
0xa1b…a86 at0012 = ╱34╱4╱ // 0xa2d @0x12
0xa1b…a86 at0013 = ╱31╱1╱ // 0xa2e @0x13
0xa1b…a86 at0014 = ╱ef╱$╱ // 0xa2f @0x14
0xa1b…a86 at0015 = ╱ed╱(╱ // 0xa30 @0x15
0xa1b…a86 at0016 = ╱32╱2╱ // 0xa31 @0x16
0xa1b…a86 at0017 = ╱31╱1╱ // 0xa32 @0x17
0xa1b…a86 at0018 = ╱fe0000a805╱ // 0xa33 @0x18
0xa1b…a86 at001d = ╱ec╱,╱ // 0xa38 @0x1d
0xa1b…a86 at001e = ╱33╱3╱ // 0xa39 @0x1e
0xa1b…a86 at001f = ╱30╱0╱ // 0xa3a @0x1f
0xa1b…a86 at0020 = ╱fe0000f005╱ // 0xa3b @0x20
0xa1b…a86 at0025 = ╱ee╱)╱ // 0xa40 @0x25
0xa1b…a86 at0026 = ╱eb╱;╱ // 0xa41 @0x26
0xa1b…a86 at0027 = ╱d2╱TAB╱ // 0xa42 @0x27
0xa1b…a86 at0028 = ╱ed╱(╱ // 0xa43 @0x28
0xa1b…a86 at0029 = ╱34╱4╱ // 0xa44 @0x29
0xa1b…a86 at002a = ╱36╱6╱ // 0xa45 @0x2a
0xa1b…a86 at002b = ╱fe0000b806╱ // 0xa46 @0x2b
0xa1b…a86 at0030 = ╱ee╱)╱ // 0xa4b @0x30
0xa1b…a86 at0031 = ╱eb╱;╱ // 0xa4c @0x31
0xa1b…a86 at0032 = ╱4d╱M╱ // 0xa4d @0x32
0xa1b…a86 at0033 = ╱46╱F╱ // 0xa4e @0x33
0xa1b…a86 at0034 = ╱34╱4╱ // 0xa4f @0x34
0xa1b…a86 at0035 = ╱31╱1╱ // 0xa50 @0x35
0xa1b…a86 at0036 = ╱ef╱$╱ // 0xa51 @0x36
0xa1b…a86 at0037 = ╱ed╱(╱ // 0xa52 @0x37
0xa1b…a86 at0038 = ╱33╱3╱ // 0xa53 @0x38
0xa1b…a86 at0039 = ╱31╱1╱ // 0xa54 @0x39
0xa1b…a86 at003a = ╱fe0000f805╱ // 0xa55 @0x3a
0xa1b…a86 at003f = ╱ec╱,╱ // 0xa5a @0x3f
0xa1b…a86 at0040 = ╱34╱4╱ // 0xa5b @0x40
0xa1b…a86 at0041 = ╱30╱0╱ // 0xa5c @0x41
0xa1b…a86 at0042 = ╱fe0000a006╱ // 0xa5d @0x42
0xa1b…a86 at0047 = ╱ee╱)╱ // 0xa62 @0x47
0xa1b…a86 at0048 = ╱eb╱;╱ // 0xa63 @0x48
0xa1b…a86 at0049 = ╱d2╱TAB╱ // 0xa64 @0x49
0xa1b…a86 at004a = ╱ed╱(╱ // 0xa65 @0x4a
0xa1b…a86 at004b = ╱36╱6╱ // 0xa66 @0x4b
0xa1b…a86 at004c = ╱32╱2╱ // 0xa67 @0x4c
0xa1b…a86 at004d = ╱fe0000f806╱ // 0xa68 @0x4d
0xa1b…a86 at0052 = ╱ee╱)╱ // 0xa6d @0x52
0xa1b…a86 at0053 = ╱eb╱;╱ // 0xa6e @0x53
0xa1b…a86 at0054 = ╱4d╱M╱ // 0xa6f @0x54
0xa1b…a86 at0055 = ╱46╱F╱ // 0xa70 @0x55
0xa1b…a86 at0056 = ╱34╱4╱ // 0xa71 @0x56
0xa1b…a86 at0057 = ╱31╱1╱ // 0xa72 @0x57
0xa1b…a86 at0058 = ╱ef╱$╱ // 0xa73 @0x58
0xa1b…a86 at0059 = ╱ed╱(╱ // 0xa74 @0x59
0xa1b…a86 at005a = ╱34╱4╱ // 0xa75 @0x5a
0xa1b…a86 at005b = ╱31╱1╱ // 0xa76 @0x5b
0xa1b…a86 at005c = ╱fe0000a406╱ // 0xa77 @0x5c
0xa1b…a86 at0061 = ╱ec╱,╱ // 0xa7c @0x61
0xa1b…a86 at0062 = ╱35╱5╱ // 0xa7d @0x62
0xa1b…a86 at0063 = ╱30╱0╱ // 0xa7e @0x63
0xa1b…a86 at0064 = ╱fe0000c806╱ // 0xa7f @0x64
0xa1b…a86 at0069 = ╱ee╱)╱ // 0xa84 @0x69
0xa1b…a86 at006a = EOL // 0xa85 @0x6a
0xa1b…a86 }
0xa86…acf 9826 2055 PRINT TAB(38);MF42$(11,20);TAB(54);MF42$(31,40)
0xa86…acf LineComalBin {
0xa86…acf ptr = 0x9826 // 0xa86 @0x0
0xa86…acf lno = 0x0807 // 0xa88 @0x2
0xa86…acf at0004 = ╱92╱ PRINT ╱ // 0xa8a @0x4
0xa86…acf at0005 = ╱d2╱TAB╱ // 0xa8b @0x5
0xa86…acf at0006 = ╱ed╱(╱ // 0xa8c @0x6
0xa86…acf at0007 = ╱33╱3╱ // 0xa8d @0x7
0xa86…acf at0008 = ╱38╱8╱ // 0xa8e @0x8
0xa86…acf at0009 = ╱fe00009806╱ // 0xa8f @0x9
0xa86…acf at000e = ╱ee╱)╱ // 0xa94 @0xe
0xa86…acf at000f = ╱eb╱;╱ // 0xa95 @0xf
0xa86…acf at0010 = ╱4d╱M╱ // 0xa96 @0x10
0xa86…acf at0011 = ╱46╱F╱ // 0xa97 @0x11
0xa86…acf at0012 = ╱34╱4╱ // 0xa98 @0x12
0xa86…acf at0013 = ╱32╱2╱ // 0xa99 @0x13
0xa86…acf at0014 = ╱ef╱$╱ // 0xa9a @0x14
0xa86…acf at0015 = ╱ed╱(╱ // 0xa9b @0x15
0xa86…acf at0016 = ╱31╱1╱ // 0xa9c @0x16
0xa86…acf at0017 = ╱31╱1╱ // 0xa9d @0x17
0xa86…acf at0018 = ╱fe0000b004╱ // 0xa9e @0x18
0xa86…acf at001d = ╱ec╱,╱ // 0xaa3 @0x1d
0xa86…acf at001e = ╱32╱2╱ // 0xaa4 @0x1e
0xa86…acf at001f = ╱30╱0╱ // 0xaa5 @0x1f
0xa86…acf at0020 = ╱fe0000a005╱ // 0xaa6 @0x20
0xa86…acf at0025 = ╱ee╱)╱ // 0xaab @0x25
0xa86…acf at0026 = ╱eb╱;╱ // 0xaac @0x26
0xa86…acf at0027 = ╱d2╱TAB╱ // 0xaad @0x27
0xa86…acf at0028 = ╱ed╱(╱ // 0xaae @0x28
0xa86…acf at0029 = ╱35╱5╱ // 0xaaf @0x29
0xa86…acf at002a = ╱34╱4╱ // 0xab0 @0x2a
0xa86…acf at002b = ╱fe0000d806╱ // 0xab1 @0x2b
0xa86…acf at0030 = ╱ee╱)╱ // 0xab6 @0x30
0xa86…acf at0031 = ╱eb╱;╱ // 0xab7 @0x31
0xa86…acf at0032 = ╱4d╱M╱ // 0xab8 @0x32
0xa86…acf at0033 = ╱46╱F╱ // 0xab9 @0x33
0xa86…acf at0034 = ╱34╱4╱ // 0xaba @0x34
0xa86…acf at0035 = ╱32╱2╱ // 0xabb @0x35
0xa86…acf at0036 = ╱ef╱$╱ // 0xabc @0x36
0xa86…acf at0037 = ╱ed╱(╱ // 0xabd @0x37
0xa86…acf at0038 = ╱33╱3╱ // 0xabe @0x38
0xa86…acf at0039 = ╱31╱1╱ // 0xabf @0x39
0xa86…acf at003a = ╱fe0000f805╱ // 0xac0 @0x3a
0xa86…acf at003f = ╱ec╱,╱ // 0xac5 @0x3f
0xa86…acf at0040 = ╱34╱4╱ // 0xac6 @0x40
0xa86…acf at0041 = ╱30╱0╱ // 0xac7 @0x41
0xa86…acf at0042 = ╱fe0000a006╱ // 0xac8 @0x42
0xa86…acf at0047 = ╱ee╱)╱ // 0xacd @0x47
0xa86…acf at0048 = EOL // 0xace @0x48
0xa86…acf }
0xacf…b34 988b 2060 PRINT TAB(30);MF42$(E,10);TAB(46);MF42$(21,30);TAB(62);MF42$(41,50)
0xacf…b34 LineComalBin {
0xacf…b34 ptr = 0x988b // 0xacf @0x0
0xacf…b34 lno = 0x080c // 0xad1 @0x2
0xacf…b34 at0004 = ╱92╱ PRINT ╱ // 0xad3 @0x4
0xacf…b34 at0005 = ╱d2╱TAB╱ // 0xad4 @0x5
0xacf…b34 at0006 = ╱ed╱(╱ // 0xad5 @0x6
0xacf…b34 at0007 = ╱33╱3╱ // 0xad6 @0x7
0xacf…b34 at0008 = ╱30╱0╱ // 0xad7 @0x8
0xacf…b34 at0009 = ╱fe0000f005╱ // 0xad8 @0x9
0xacf…b34 at000e = ╱ee╱)╱ // 0xadd @0xe
0xacf…b34 at000f = ╱eb╱;╱ // 0xade @0xf
0xacf…b34 at0010 = ╱4d╱M╱ // 0xadf @0x10
0xacf…b34 at0011 = ╱46╱F╱ // 0xae0 @0x11
0xacf…b34 at0012 = ╱34╱4╱ // 0xae1 @0x12
0xacf…b34 at0013 = ╱32╱2╱ // 0xae2 @0x13
0xacf…b34 at0014 = ╱ef╱$╱ // 0xae3 @0x14
0xacf…b34 at0015 = ╱ed╱(╱ // 0xae4 @0x15
0xacf…b34 at0016 = ╱45╱E╱ // 0xae5 @0x16
0xacf…b34 at0017 = ╱ec╱,╱ // 0xae6 @0x17
0xacf…b34 at0018 = ╱31╱1╱ // 0xae7 @0x18
0xacf…b34 at0019 = ╱30╱0╱ // 0xae8 @0x19
0xacf…b34 at001a = ╱fe0000a004╱ // 0xae9 @0x1a
0xacf…b34 at001f = ╱ee╱)╱ // 0xaee @0x1f
0xacf…b34 at0020 = ╱eb╱;╱ // 0xaef @0x20
0xacf…b34 at0021 = ╱d2╱TAB╱ // 0xaf0 @0x21
0xacf…b34 at0022 = ╱ed╱(╱ // 0xaf1 @0x22
0xacf…b34 at0023 = ╱34╱4╱ // 0xaf2 @0x23
0xacf…b34 at0024 = ╱36╱6╱ // 0xaf3 @0x24
0xacf…b34 at0025 = ╱fe0000b806╱ // 0xaf4 @0x25
0xacf…b34 at002a = ╱ee╱)╱ // 0xaf9 @0x2a
0xacf…b34 at002b = ╱eb╱;╱ // 0xafa @0x2b
0xacf…b34 at002c = ╱4d╱M╱ // 0xafb @0x2c
0xacf…b34 at002d = ╱46╱F╱ // 0xafc @0x2d
0xacf…b34 at002e = ╱34╱4╱ // 0xafd @0x2e
0xacf…b34 at002f = ╱32╱2╱ // 0xafe @0x2f
0xacf…b34 at0030 = ╱ef╱$╱ // 0xaff @0x30
0xacf…b34 at0031 = ╱ed╱(╱ // 0xb00 @0x31
0xacf…b34 at0032 = ╱32╱2╱ // 0xb01 @0x32
0xacf…b34 at0033 = ╱31╱1╱ // 0xb02 @0x33
0xacf…b34 at0034 = ╱fe0000a805╱ // 0xb03 @0x34
0xacf…b34 at0039 = ╱ec╱,╱ // 0xb08 @0x39
0xacf…b34 at003a = ╱33╱3╱ // 0xb09 @0x3a
0xacf…b34 at003b = ╱30╱0╱ // 0xb0a @0x3b
0xacf…b34 at003c = ╱fe0000f005╱ // 0xb0b @0x3c
0xacf…b34 at0041 = ╱ee╱)╱ // 0xb10 @0x41
0xacf…b34 at0042 = ╱eb╱;╱ // 0xb11 @0x42
0xacf…b34 at0043 = ╱d2╱TAB╱ // 0xb12 @0x43
0xacf…b34 at0044 = ╱ed╱(╱ // 0xb13 @0x44
0xacf…b34 at0045 = ╱36╱6╱ // 0xb14 @0x45
0xacf…b34 at0046 = ╱32╱2╱ // 0xb15 @0x46
0xacf…b34 at0047 = ╱fe0000f806╱ // 0xb16 @0x47
0xacf…b34 at004c = ╱ee╱)╱ // 0xb1b @0x4c
0xacf…b34 at004d = ╱eb╱;╱ // 0xb1c @0x4d
0xacf…b34 at004e = ╱4d╱M╱ // 0xb1d @0x4e
0xacf…b34 at004f = ╱46╱F╱ // 0xb1e @0x4f
0xacf…b34 at0050 = ╱34╱4╱ // 0xb1f @0x50
0xacf…b34 at0051 = ╱32╱2╱ // 0xb20 @0x51
0xacf…b34 at0052 = ╱ef╱$╱ // 0xb21 @0x52
0xacf…b34 at0053 = ╱ed╱(╱ // 0xb22 @0x53
0xacf…b34 at0054 = ╱34╱4╱ // 0xb23 @0x54
0xacf…b34 at0055 = ╱31╱1╱ // 0xb24 @0x55
0xacf…b34 at0056 = ╱fe0000a406╱ // 0xb25 @0x56
0xacf…b34 at005b = ╱ec╱,╱ // 0xb2a @0x5b
0xacf…b34 at005c = ╱35╱5╱ // 0xb2b @0x5c
0xacf…b34 at005d = ╱30╱0╱ // 0xb2c @0x5d
0xacf…b34 at005e = ╱fe0000c806╱ // 0xb2d @0x5e
0xacf…b34 at0063 = ╱ee╱)╱ // 0xb32 @0x63
0xacf…b34 at0064 = EOL // 0xb33 @0x64
0xacf…b34 }
0xb34…b79 98d0 2075 PRINT "************************************************************";
0xb34…b79 LineComalBin {
0xb34…b79 ptr = 0x98d0 // 0xb34 @0x0
0xb34…b79 lno = 0x081b // 0xb36 @0x2
0xb34…b79 at0004 = ╱92╱ PRINT ╱ // 0xb38 @0x4
0xb34…b79 at0005 = ╱22╱"╱ // 0xb39 @0x5
0xb34…b79 at0006 = ╱2a╱*╱ // 0xb3a @0x6
0xb34…b79 at0007 = ╱2a╱*╱ // 0xb3b @0x7
0xb34…b79 at0008 = ╱2a╱*╱ // 0xb3c @0x8
0xb34…b79 at0009 = ╱2a╱*╱ // 0xb3d @0x9
0xb34…b79 at000a = ╱2a╱*╱ // 0xb3e @0xa
0xb34…b79 at000b = ╱2a╱*╱ // 0xb3f @0xb
0xb34…b79 at000c = ╱2a╱*╱ // 0xb40 @0xc
0xb34…b79 at000d = ╱2a╱*╱ // 0xb41 @0xd
0xb34…b79 at000e = ╱2a╱*╱ // 0xb42 @0xe
0xb34…b79 at000f = ╱2a╱*╱ // 0xb43 @0xf
0xb34…b79 at0010 = ╱2a╱*╱ // 0xb44 @0x10
0xb34…b79 at0011 = ╱2a╱*╱ // 0xb45 @0x11
0xb34…b79 at0012 = ╱2a╱*╱ // 0xb46 @0x12
0xb34…b79 at0013 = ╱2a╱*╱ // 0xb47 @0x13
0xb34…b79 at0014 = ╱2a╱*╱ // 0xb48 @0x14
0xb34…b79 at0015 = ╱2a╱*╱ // 0xb49 @0x15
0xb34…b79 at0016 = ╱2a╱*╱ // 0xb4a @0x16
0xb34…b79 at0017 = ╱2a╱*╱ // 0xb4b @0x17
0xb34…b79 at0018 = ╱2a╱*╱ // 0xb4c @0x18
0xb34…b79 at0019 = ╱2a╱*╱ // 0xb4d @0x19
0xb34…b79 at001a = ╱2a╱*╱ // 0xb4e @0x1a
0xb34…b79 at001b = ╱2a╱*╱ // 0xb4f @0x1b
0xb34…b79 at001c = ╱2a╱*╱ // 0xb50 @0x1c
0xb34…b79 at001d = ╱2a╱*╱ // 0xb51 @0x1d
0xb34…b79 at001e = ╱2a╱*╱ // 0xb52 @0x1e
0xb34…b79 at001f = ╱2a╱*╱ // 0xb53 @0x1f
0xb34…b79 at0020 = ╱2a╱*╱ // 0xb54 @0x20
0xb34…b79 at0021 = ╱2a╱*╱ // 0xb55 @0x21
0xb34…b79 at0022 = ╱2a╱*╱ // 0xb56 @0x22
0xb34…b79 at0023 = ╱2a╱*╱ // 0xb57 @0x23
0xb34…b79 at0024 = ╱2a╱*╱ // 0xb58 @0x24
0xb34…b79 at0025 = ╱2a╱*╱ // 0xb59 @0x25
0xb34…b79 at0026 = ╱2a╱*╱ // 0xb5a @0x26
0xb34…b79 at0027 = ╱2a╱*╱ // 0xb5b @0x27
0xb34…b79 at0028 = ╱2a╱*╱ // 0xb5c @0x28
0xb34…b79 at0029 = ╱2a╱*╱ // 0xb5d @0x29
0xb34…b79 at002a = ╱2a╱*╱ // 0xb5e @0x2a
0xb34…b79 at002b = ╱2a╱*╱ // 0xb5f @0x2b
0xb34…b79 at002c = ╱2a╱*╱ // 0xb60 @0x2c
0xb34…b79 at002d = ╱2a╱*╱ // 0xb61 @0x2d
0xb34…b79 at002e = ╱2a╱*╱ // 0xb62 @0x2e
0xb34…b79 at002f = ╱2a╱*╱ // 0xb63 @0x2f
0xb34…b79 at0030 = ╱2a╱*╱ // 0xb64 @0x30
0xb34…b79 at0031 = ╱2a╱*╱ // 0xb65 @0x31
0xb34…b79 at0032 = ╱2a╱*╱ // 0xb66 @0x32
0xb34…b79 at0033 = ╱2a╱*╱ // 0xb67 @0x33
0xb34…b79 at0034 = ╱2a╱*╱ // 0xb68 @0x34
0xb34…b79 at0035 = ╱2a╱*╱ // 0xb69 @0x35
0xb34…b79 at0036 = ╱2a╱*╱ // 0xb6a @0x36
0xb34…b79 at0037 = ╱2a╱*╱ // 0xb6b @0x37
0xb34…b79 at0038 = ╱2a╱*╱ // 0xb6c @0x38
0xb34…b79 at0039 = ╱2a╱*╱ // 0xb6d @0x39
0xb34…b79 at003a = ╱2a╱*╱ // 0xb6e @0x3a
0xb34…b79 at003b = ╱2a╱*╱ // 0xb6f @0x3b
0xb34…b79 at003c = ╱2a╱*╱ // 0xb70 @0x3c
0xb34…b79 at003d = ╱2a╱*╱ // 0xb71 @0x3d
0xb34…b79 at003e = ╱2a╱*╱ // 0xb72 @0x3e
0xb34…b79 at003f = ╱2a╱*╱ // 0xb73 @0x3f
0xb34…b79 at0040 = ╱2a╱*╱ // 0xb74 @0x40
0xb34…b79 at0041 = ╱2a╱*╱ // 0xb75 @0x41
0xb34…b79 at0042 = ╱22╱"╱ // 0xb76 @0x42
0xb34…b79 at0043 = ╱eb╱;╱ // 0xb77 @0x43
0xb34…b79 at0044 = EOL // 0xb78 @0x44
0xb34…b79 }
0xb79…b95 98ec 2076 PRINT "*******************";
0xb79…b95 LineComalBin {
0xb79…b95 ptr = 0x98ec // 0xb79 @0x0
0xb79…b95 lno = 0x081c // 0xb7b @0x2
0xb79…b95 at0004 = ╱92╱ PRINT ╱ // 0xb7d @0x4
0xb79…b95 at0005 = ╱22╱"╱ // 0xb7e @0x5
0xb79…b95 at0006 = ╱2a╱*╱ // 0xb7f @0x6
0xb79…b95 at0007 = ╱2a╱*╱ // 0xb80 @0x7
0xb79…b95 at0008 = ╱2a╱*╱ // 0xb81 @0x8
0xb79…b95 at0009 = ╱2a╱*╱ // 0xb82 @0x9
0xb79…b95 at000a = ╱2a╱*╱ // 0xb83 @0xa
0xb79…b95 at000b = ╱2a╱*╱ // 0xb84 @0xb
0xb79…b95 at000c = ╱2a╱*╱ // 0xb85 @0xc
0xb79…b95 at000d = ╱2a╱*╱ // 0xb86 @0xd
0xb79…b95 at000e = ╱2a╱*╱ // 0xb87 @0xe
0xb79…b95 at000f = ╱2a╱*╱ // 0xb88 @0xf
0xb79…b95 at0010 = ╱2a╱*╱ // 0xb89 @0x10
0xb79…b95 at0011 = ╱2a╱*╱ // 0xb8a @0x11
0xb79…b95 at0012 = ╱2a╱*╱ // 0xb8b @0x12
0xb79…b95 at0013 = ╱2a╱*╱ // 0xb8c @0x13
0xb79…b95 at0014 = ╱2a╱*╱ // 0xb8d @0x14
0xb79…b95 at0015 = ╱2a╱*╱ // 0xb8e @0x15
0xb79…b95 at0016 = ╱2a╱*╱ // 0xb8f @0x16
0xb79…b95 at0017 = ╱2a╱*╱ // 0xb90 @0x17
0xb79…b95 at0018 = ╱2a╱*╱ // 0xb91 @0x18
0xb79…b95 at0019 = ╱22╱"╱ // 0xb92 @0x19
0xb79…b95 at001a = ╱eb╱;╱ // 0xb93 @0x1a
0xb79…b95 at001b = EOL // 0xb94 @0x1b
0xb79…b95 }
0xb95…baa 9901 2080 GET MF4$:LMNR,MF41$
0xb95…baa LineComalBin {
0xb95…baa ptr = 0x9901 // 0xb95 @0x0
0xb95…baa lno = 0x0820 // 0xb97 @0x2
0xb95…baa at0004 = ╱a9╱ GET ╱ // 0xb99 @0x4
0xb95…baa at0005 = ╱4d╱M╱ // 0xb9a @0x5
0xb95…baa at0006 = ╱46╱F╱ // 0xb9b @0x6
0xb95…baa at0007 = ╱34╱4╱ // 0xb9c @0x7
0xb95…baa at0008 = ╱ef╱$╱ // 0xb9d @0x8
0xb95…baa at0009 = ╱f0╱:╱ // 0xb9e @0x9
0xb95…baa at000a = ╱4c╱L╱ // 0xb9f @0xa
0xb95…baa at000b = ╱4d╱M╱ // 0xba0 @0xb
0xb95…baa at000c = ╱4e╱N╱ // 0xba1 @0xc
0xb95…baa at000d = ╱52╱R╱ // 0xba2 @0xd
0xb95…baa at000e = ╱ec╱,╱ // 0xba3 @0xe
0xb95…baa at000f = ╱4d╱M╱ // 0xba4 @0xf
0xb95…baa at0010 = ╱46╱F╱ // 0xba5 @0x10
0xb95…baa at0011 = ╱34╱4╱ // 0xba6 @0x11
0xb95…baa at0012 = ╱31╱1╱ // 0xba7 @0x12
0xb95…baa at0013 = ╱ef╱$╱ // 0xba8 @0x13
0xb95…baa at0014 = EOL // 0xba9 @0x14
0xb95…baa }
0xbaa…bb0 9907 2090 ENDWHILE
0xbaa…bb0 LineComalBin {
0xbaa…bb0 ptr = 0x9907 // 0xbaa @0x0
0xbaa…bb0 lno = 0x082a // 0xbac @0x2
0xbaa…bb0 at0004 = ╱94╱ ENDWHILE ╱ // 0xbae @0x4
0xbaa…bb0 at0005 = EOL // 0xbaf @0x5
0xbaa…bb0 }
0xbb0…bc5 991c 2091 IF LINIE>MAXLIN-W THEN
0xbb0…bc5 LineComalBin {
0xbb0…bc5 ptr = 0x991c // 0xbb0 @0x0
0xbb0…bc5 lno = 0x082b // 0xbb2 @0x2
0xbb0…bc5 at0004 = ╱9c╱ IF ╱ // 0xbb4 @0x4
0xbb0…bc5 at0005 = ╱4c╱L╱ // 0xbb5 @0x5
0xbb0…bc5 at0006 = ╱49╱I╱ // 0xbb6 @0x6
0xbb0…bc5 at0007 = ╱4e╱N╱ // 0xbb7 @0x7
0xbb0…bc5 at0008 = ╱49╱I╱ // 0xbb8 @0x8
0xbb0…bc5 at0009 = ╱45╱E╱ // 0xbb9 @0x9
0xbb0…bc5 at000a = ╱de╱>╱ // 0xbba @0xa
0xbb0…bc5 at000b = ╱4d╱M╱ // 0xbbb @0xb
0xbb0…bc5 at000c = ╱41╱A╱ // 0xbbc @0xc
0xbb0…bc5 at000d = ╱58╱X╱ // 0xbbd @0xd
0xbb0…bc5 at000e = ╱4c╱L╱ // 0xbbe @0xe
0xbb0…bc5 at000f = ╱49╱I╱ // 0xbbf @0xf
0xbb0…bc5 at0010 = ╱4e╱N╱ // 0xbc0 @0x10
0xbb0…bc5 at0011 = ╱e3╱-╱ // 0xbc1 @0x11
0xbb0…bc5 at0012 = ╱57╱W╱ // 0xbc2 @0x12
0xbb0…bc5 at0013 = ╱b6╱ THEN ╱ // 0xbc3 @0x13
0xbb0…bc5 at0014 = EOL // 0xbc4 @0x14
0xbb0…bc5 }
0xbc5…bd7 992e 2092 WHILE LINIE<MAXLIN
0xbc5…bd7 LineComalBin {
0xbc5…bd7 ptr = 0x992e // 0xbc5 @0x0
0xbc5…bd7 lno = 0x082c // 0xbc7 @0x2
0xbc5…bd7 at0004 = ╱93╱ WHILE ╱ // 0xbc9 @0x4
0xbc5…bd7 at0005 = ╱4c╱L╱ // 0xbca @0x5
0xbc5…bd7 at0006 = ╱49╱I╱ // 0xbcb @0x6
0xbc5…bd7 at0007 = ╱4e╱N╱ // 0xbcc @0x7
0xbc5…bd7 at0008 = ╱49╱I╱ // 0xbcd @0x8
0xbc5…bd7 at0009 = ╱45╱E╱ // 0xbce @0x9
0xbc5…bd7 at000a = ╱dd╱<╱ // 0xbcf @0xa
0xbc5…bd7 at000b = ╱4d╱M╱ // 0xbd0 @0xb
0xbc5…bd7 at000c = ╱41╱A╱ // 0xbd1 @0xc
0xbc5…bd7 at000d = ╱58╱X╱ // 0xbd2 @0xd
0xbc5…bd7 at000e = ╱4c╱L╱ // 0xbd3 @0xe
0xbc5…bd7 at000f = ╱49╱I╱ // 0xbd4 @0xf
0xbc5…bd7 at0010 = ╱4e╱N╱ // 0xbd5 @0x10
0xbc5…bd7 at0011 = EOL // 0xbd6 @0x11
0xbc5…bd7 }
0xbd7…bdd 9934 2093 PRINT
0xbd7…bdd LineComalBin {
0xbd7…bdd ptr = 0x9934 // 0xbd7 @0x0
0xbd7…bdd lno = 0x082d // 0xbd9 @0x2
0xbd7…bdd at0004 = ╱92╱ PRINT ╱ // 0xbdb @0x4
0xbd7…bdd at0005 = EOL // 0xbdc @0x5
0xbd7…bdd }
0xbdd…bef 9946 2094 LINIE=LINIE+E
0xbdd…bef LineComalBin {
0xbdd…bef ptr = 0x9946 // 0xbdd @0x0
0xbdd…bef lno = 0x082e // 0xbdf @0x2
0xbdd…bef at0004 = ╱4c╱L╱ // 0xbe1 @0x4
0xbdd…bef at0005 = ╱49╱I╱ // 0xbe2 @0x5
0xbdd…bef at0006 = ╱4e╱N╱ // 0xbe3 @0x6
0xbdd…bef at0007 = ╱49╱I╱ // 0xbe4 @0x7
0xbdd…bef at0008 = ╱45╱E╱ // 0xbe5 @0x8
0xbdd…bef at0009 = ╱dc╱=╱ // 0xbe6 @0x9
0xbdd…bef at000a = ╱4c╱L╱ // 0xbe7 @0xa
0xbdd…bef at000b = ╱49╱I╱ // 0xbe8 @0xb
0xbdd…bef at000c = ╱4e╱N╱ // 0xbe9 @0xc
0xbdd…bef at000d = ╱49╱I╱ // 0xbea @0xd
0xbdd…bef at000e = ╱45╱E╱ // 0xbeb @0xe
0xbdd…bef at000f = ╱e2╱+╱ // 0xbec @0xf
0xbdd…bef at0010 = ╱45╱E╱ // 0xbed @0x10
0xbdd…bef at0011 = EOL // 0xbee @0x11
0xbdd…bef }
0xbef…bf5 994c 2095 ENDWHILE
0xbef…bf5 LineComalBin {
0xbef…bf5 ptr = 0x994c // 0xbef @0x0
0xbef…bf5 lno = 0x082f // 0xbf1 @0x2
0xbef…bf5 at0004 = ╱94╱ ENDWHILE ╱ // 0xbf3 @0x4
0xbef…bf5 at0005 = EOL // 0xbf4 @0x5
0xbef…bf5 }
0xbf5…c05 995c 2096 EXEC SKRIVHOVED
0xbf5…c05 LineComalBin {
0xbf5…c05 ptr = 0x995c // 0xbf5 @0x0
0xbf5…c05 lno = 0x0830 // 0xbf7 @0x2
0xbf5…c05 at0004 = ╱9d╱ EXEC ╱ // 0xbf9 @0x4
0xbf5…c05 at0005 = ╱53╱S╱ // 0xbfa @0x5
0xbf5…c05 at0006 = ╱4b╱K╱ // 0xbfb @0x6
0xbf5…c05 at0007 = ╱52╱R╱ // 0xbfc @0x7
0xbf5…c05 at0008 = ╱49╱I╱ // 0xbfd @0x8
0xbf5…c05 at0009 = ╱56╱V╱ // 0xbfe @0x9
0xbf5…c05 at000a = ╱48╱H╱ // 0xbff @0xa
0xbf5…c05 at000b = ╱4f╱O╱ // 0xc00 @0xb
0xbf5…c05 at000c = ╱56╱V╱ // 0xc01 @0xc
0xbf5…c05 at000d = ╱45╱E╱ // 0xc02 @0xd
0xbf5…c05 at000e = ╱44╱D╱ // 0xc03 @0xe
0xbf5…c05 at000f = EOL // 0xc04 @0xf
0xbf5…c05 }
0xc05…c0b 9962 2097 ENDIF
0xc05…c0b LineComalBin {
0xc05…c0b ptr = 0x9962 // 0xc05 @0x0
0xc05…c0b lno = 0x0831 // 0xc07 @0x2
0xc05…c0b at0004 = ╱9b╱ ENDIF ╱ // 0xc09 @0x4
0xc05…c0b at0005 = EOL // 0xc0a @0x5
0xc05…c0b }
0xc0b…c22 9979 2098 LINIE=LINIE+5
0xc0b…c22 LineComalBin {
0xc0b…c22 ptr = 0x9979 // 0xc0b @0x0
0xc0b…c22 lno = 0x0832 // 0xc0d @0x2
0xc0b…c22 at0004 = ╱4c╱L╱ // 0xc0f @0x4
0xc0b…c22 at0005 = ╱49╱I╱ // 0xc10 @0x5
0xc0b…c22 at0006 = ╱4e╱N╱ // 0xc11 @0x6
0xc0b…c22 at0007 = ╱49╱I╱ // 0xc12 @0x7
0xc0b…c22 at0008 = ╱45╱E╱ // 0xc13 @0x8
0xc0b…c22 at0009 = ╱dc╱=╱ // 0xc14 @0x9
0xc0b…c22 at000a = ╱4c╱L╱ // 0xc15 @0xa
0xc0b…c22 at000b = ╱49╱I╱ // 0xc16 @0xb
0xc0b…c22 at000c = ╱4e╱N╱ // 0xc17 @0xc
0xc0b…c22 at000d = ╱49╱I╱ // 0xc18 @0xd
0xc0b…c22 at000e = ╱45╱E╱ // 0xc19 @0xe
0xc0b…c22 at000f = ╱e2╱+╱ // 0xc1a @0xf
0xc0b…c22 at0010 = ╱35╱5╱ // 0xc1b @0x10
0xc0b…c22 at0011 = ╱fe0000a003╱ // 0xc1c @0x11
0xc0b…c22 at0016 = EOL // 0xc21 @0x16
0xc0b…c22 }
0xc22…c4a 99a1 2099 IF STATUS(MF4$)<>19 THEN EXEC FEJL(LMNR,B,MF4$)
0xc22…c4a LineComalBin {
0xc22…c4a ptr = 0x99a1 // 0xc22 @0x0
0xc22…c4a lno = 0x0833 // 0xc24 @0x2
0xc22…c4a at0004 = ╱82╱ IF ╱ // 0xc26 @0x4
0xc22…c4a at0005 = ╱ce╱STATUS╱ // 0xc27 @0x5
0xc22…c4a at0006 = ╱ed╱(╱ // 0xc28 @0x6
0xc22…c4a at0007 = ╱4d╱M╱ // 0xc29 @0x7
0xc22…c4a at0008 = ╱46╱F╱ // 0xc2a @0x8
0xc22…c4a at0009 = ╱34╱4╱ // 0xc2b @0x9
0xc22…c4a at000a = ╱ef╱$╱ // 0xc2c @0xa
0xc22…c4a at000b = ╱ee╱)╱ // 0xc2d @0xb
0xc22…c4a at000c = ╱e1╱<>╱ // 0xc2e @0xc
0xc22…c4a at000d = ╱31╱1╱ // 0xc2f @0xd
0xc22…c4a at000e = ╱39╱9╱ // 0xc30 @0xe
0xc22…c4a at000f = ╱fe00009805╱ // 0xc31 @0xf
0xc22…c4a at0014 = ╱b6╱ THEN ╱ // 0xc36 @0x14
0xc22…c4a at0015 = ╱9d╱ EXEC ╱ // 0xc37 @0x15
0xc22…c4a at0016 = ╱46╱F╱ // 0xc38 @0x16
0xc22…c4a at0017 = ╱45╱E╱ // 0xc39 @0x17
0xc22…c4a at0018 = ╱4a╱J╱ // 0xc3a @0x18
0xc22…c4a at0019 = ╱4c╱L╱ // 0xc3b @0x19
0xc22…c4a at001a = ╱ed╱(╱ // 0xc3c @0x1a
0xc22…c4a at001b = ╱4c╱L╱ // 0xc3d @0x1b
0xc22…c4a at001c = ╱4d╱M╱ // 0xc3e @0x1c
0xc22…c4a at001d = ╱4e╱N╱ // 0xc3f @0x1d
0xc22…c4a at001e = ╱52╱R╱ // 0xc40 @0x1e
0xc22…c4a at001f = ╱ec╱,╱ // 0xc41 @0x1f
0xc22…c4a at0020 = ╱42╱B╱ // 0xc42 @0x20
0xc22…c4a at0021 = ╱ec╱,╱ // 0xc43 @0x21
0xc22…c4a at0022 = ╱4d╱M╱ // 0xc44 @0x22
0xc22…c4a at0023 = ╱46╱F╱ // 0xc45 @0x23
0xc22…c4a at0024 = ╱34╱4╱ // 0xc46 @0x24
0xc22…c4a at0025 = ╱ef╱$╱ // 0xc47 @0x25
0xc22…c4a at0026 = ╱ee╱)╱ // 0xc48 @0x26
0xc22…c4a at0027 = EOL // 0xc49 @0x27
0xc22…c4a }
0xc4a…c5a 99b1 2100 FOR I=E TO 6
0xc4a…c5a LineComalBin {
0xc4a…c5a ptr = 0x99b1 // 0xc4a @0x0
0xc4a…c5a lno = 0x0834 // 0xc4c @0x2
0xc4a…c5a at0004 = ╱83╱ FOR ╱ // 0xc4e @0x4
0xc4a…c5a at0005 = ╱49╱I╱ // 0xc4f @0x5
0xc4a…c5a at0006 = ╱dc╱=╱ // 0xc50 @0x6
0xc4a…c5a at0007 = ╱45╱E╱ // 0xc51 @0x7
0xc4a…c5a at0008 = ╱b7╱ TO ╱ // 0xc52 @0x8
0xc4a…c5a at0009 = ╱36╱6╱ // 0xc53 @0x9
0xc4a…c5a at000a = ╱fe0000c003╱ // 0xc54 @0xa
0xc4a…c5a at000f = EOL // 0xc59 @0xf
0xc4a…c5a }
0xc5a…c8b 99e2 2110 IF TOTAL$(I,12)="+" THEN TOTAL$(I,12)=" "
0xc5a…c8b LineComalBin {
0xc5a…c8b ptr = 0x99e2 // 0xc5a @0x0
0xc5a…c8b lno = 0x083e // 0xc5c @0x2
0xc5a…c8b at0004 = ╱82╱ IF ╱ // 0xc5e @0x4
0xc5a…c8b at0005 = ╱54╱T╱ // 0xc5f @0x5
0xc5a…c8b at0006 = ╱4f╱O╱ // 0xc60 @0x6
0xc5a…c8b at0007 = ╱54╱T╱ // 0xc61 @0x7
0xc5a…c8b at0008 = ╱41╱A╱ // 0xc62 @0x8
0xc5a…c8b at0009 = ╱4c╱L╱ // 0xc63 @0x9
0xc5a…c8b at000a = ╱ef╱$╱ // 0xc64 @0xa
0xc5a…c8b at000b = ╱ed╱(╱ // 0xc65 @0xb
0xc5a…c8b at000c = ╱49╱I╱ // 0xc66 @0xc
0xc5a…c8b at000d = ╱ec╱,╱ // 0xc67 @0xd
0xc5a…c8b at000e = ╱31╱1╱ // 0xc68 @0xe
0xc5a…c8b at000f = ╱32╱2╱ // 0xc69 @0xf
0xc5a…c8b at0010 = ╱fe0000c004╱ // 0xc6a @0x10
0xc5a…c8b at0015 = ╱ee╱)╱ // 0xc6f @0x15
0xc5a…c8b at0016 = ╱dc╱=╱ // 0xc70 @0x16
0xc5a…c8b at0017 = ╱22╱"╱ // 0xc71 @0x17
0xc5a…c8b at0018 = ╱2b╱+╱ // 0xc72 @0x18
0xc5a…c8b at0019 = ╱22╱"╱ // 0xc73 @0x19
0xc5a…c8b at001a = ╱b6╱ THEN ╱ // 0xc74 @0x1a
0xc5a…c8b at001b = ╱54╱T╱ // 0xc75 @0x1b
0xc5a…c8b at001c = ╱4f╱O╱ // 0xc76 @0x1c
0xc5a…c8b at001d = ╱54╱T╱ // 0xc77 @0x1d
0xc5a…c8b at001e = ╱41╱A╱ // 0xc78 @0x1e
0xc5a…c8b at001f = ╱4c╱L╱ // 0xc79 @0x1f
0xc5a…c8b at0020 = ╱ef╱$╱ // 0xc7a @0x20
0xc5a…c8b at0021 = ╱ed╱(╱ // 0xc7b @0x21
0xc5a…c8b at0022 = ╱49╱I╱ // 0xc7c @0x22
0xc5a…c8b at0023 = ╱ec╱,╱ // 0xc7d @0x23
0xc5a…c8b at0024 = ╱31╱1╱ // 0xc7e @0x24
0xc5a…c8b at0025 = ╱32╱2╱ // 0xc7f @0x25
0xc5a…c8b at0026 = ╱fe0000c004╱ // 0xc80 @0x26
0xc5a…c8b at002b = ╱ee╱)╱ // 0xc85 @0x2b
0xc5a…c8b at002c = ╱dc╱=╱ // 0xc86 @0x2c
0xc5a…c8b at002d = ╱22╱"╱ // 0xc87 @0x2d
0xc5a…c8b at002e = ╱20╱…╱ // 0xc88 @0x2e
0xc5a…c8b at002f = ╱22╱"╱ // 0xc89 @0x2f
0xc5a…c8b at0030 = EOL // 0xc8a @0x30
0xc5a…c8b }
0xc8b…c9a 99f1 2112 IF I<6 THEN
0xc8b…c9a LineComalBin {
0xc8b…c9a ptr = 0x99f1 // 0xc8b @0x0
0xc8b…c9a lno = 0x0840 // 0xc8d @0x2
0xc8b…c9a at0004 = ╱9c╱ IF ╱ // 0xc8f @0x4
0xc8b…c9a at0005 = ╱49╱I╱ // 0xc90 @0x5
0xc8b…c9a at0006 = ╱dd╱<╱ // 0xc91 @0x6
0xc8b…c9a at0007 = ╱36╱6╱ // 0xc92 @0x7
0xc8b…c9a at0008 = ╱fe0000c003╱ // 0xc93 @0x8
0xc8b…c9a at000d = ╱b6╱ THEN ╱ // 0xc98 @0xd
0xc8b…c9a at000e = EOL // 0xc99 @0xe
0xc8b…c9a }
0xc9a…ccd 9a24 2114 IF TOTAL1$(I,12)="+" THEN TOTAL1$(I,12)=" "
0xc9a…ccd LineComalBin {
0xc9a…ccd ptr = 0x9a24 // 0xc9a @0x0
0xc9a…ccd lno = 0x0842 // 0xc9c @0x2
0xc9a…ccd at0004 = ╱82╱ IF ╱ // 0xc9e @0x4
0xc9a…ccd at0005 = ╱54╱T╱ // 0xc9f @0x5
0xc9a…ccd at0006 = ╱4f╱O╱ // 0xca0 @0x6
0xc9a…ccd at0007 = ╱54╱T╱ // 0xca1 @0x7
0xc9a…ccd at0008 = ╱41╱A╱ // 0xca2 @0x8
0xc9a…ccd at0009 = ╱4c╱L╱ // 0xca3 @0x9
0xc9a…ccd at000a = ╱31╱1╱ // 0xca4 @0xa
0xc9a…ccd at000b = ╱ef╱$╱ // 0xca5 @0xb
0xc9a…ccd at000c = ╱ed╱(╱ // 0xca6 @0xc
0xc9a…ccd at000d = ╱49╱I╱ // 0xca7 @0xd
0xc9a…ccd at000e = ╱ec╱,╱ // 0xca8 @0xe
0xc9a…ccd at000f = ╱31╱1╱ // 0xca9 @0xf
0xc9a…ccd at0010 = ╱32╱2╱ // 0xcaa @0x10
0xc9a…ccd at0011 = ╱fe0000c004╱ // 0xcab @0x11
0xc9a…ccd at0016 = ╱ee╱)╱ // 0xcb0 @0x16
0xc9a…ccd at0017 = ╱dc╱=╱ // 0xcb1 @0x17
0xc9a…ccd at0018 = ╱22╱"╱ // 0xcb2 @0x18
0xc9a…ccd at0019 = ╱2b╱+╱ // 0xcb3 @0x19
0xc9a…ccd at001a = ╱22╱"╱ // 0xcb4 @0x1a
0xc9a…ccd at001b = ╱b6╱ THEN ╱ // 0xcb5 @0x1b
0xc9a…ccd at001c = ╱54╱T╱ // 0xcb6 @0x1c
0xc9a…ccd at001d = ╱4f╱O╱ // 0xcb7 @0x1d
0xc9a…ccd at001e = ╱54╱T╱ // 0xcb8 @0x1e
0xc9a…ccd at001f = ╱41╱A╱ // 0xcb9 @0x1f
0xc9a…ccd at0020 = ╱4c╱L╱ // 0xcba @0x20
0xc9a…ccd at0021 = ╱31╱1╱ // 0xcbb @0x21
0xc9a…ccd at0022 = ╱ef╱$╱ // 0xcbc @0x22
0xc9a…ccd at0023 = ╱ed╱(╱ // 0xcbd @0x23
0xc9a…ccd at0024 = ╱49╱I╱ // 0xcbe @0x24
0xc9a…ccd at0025 = ╱ec╱,╱ // 0xcbf @0x25
0xc9a…ccd at0026 = ╱31╱1╱ // 0xcc0 @0x26
0xc9a…ccd at0027 = ╱32╱2╱ // 0xcc1 @0x27
0xc9a…ccd at0028 = ╱fe0000c004╱ // 0xcc2 @0x28
0xc9a…ccd at002d = ╱ee╱)╱ // 0xcc7 @0x2d
0xc9a…ccd at002e = ╱dc╱=╱ // 0xcc8 @0x2e
0xc9a…ccd at002f = ╱22╱"╱ // 0xcc9 @0x2f
0xc9a…ccd at0030 = ╱20╱…╱ // 0xcca @0x30
0xc9a…ccd at0031 = ╱22╱"╱ // 0xccb @0x31
0xc9a…ccd at0032 = EOL // 0xccc @0x32
0xc9a…ccd }
0xccd…cd3 9a2a 2115 ENDIF
0xccd…cd3 LineComalBin {
0xccd…cd3 ptr = 0x9a2a // 0xccd @0x0
0xccd…cd3 lno = 0x0843 // 0xccf @0x2
0xccd…cd3 at0004 = ╱9b╱ ENDIF ╱ // 0xcd1 @0x4
0xccd…cd3 at0005 = EOL // 0xcd2 @0x5
0xccd…cd3 }
0xcd3…cda 9a31 2120 NEXT I
0xcd3…cda LineComalBin {
0xcd3…cda ptr = 0x9a31 // 0xcd3 @0x0
0xcd3…cda lno = 0x0848 // 0xcd5 @0x2
0xcd3…cda at0004 = ╱84╱ NEXT ╱ // 0xcd7 @0x4
0xcd3…cda at0005 = ╱49╱I╱ // 0xcd8 @0x5
0xcd3…cda at0006 = EOL // 0xcd9 @0x6
0xcd3…cda }
0xcda…d2b 9a82 2130 PRINT " ***";TAB(36);TOTAL$(E);TAB(52);TOTAL$(G);TAB(68);TOTAL$(6);
0xcda…d2b LineComalBin {
0xcda…d2b ptr = 0x9a82 // 0xcda @0x0
0xcda…d2b lno = 0x0852 // 0xcdc @0x2
0xcda…d2b at0004 = ╱92╱ PRINT ╱ // 0xcde @0x4
0xcda…d2b at0005 = ╱22╱"╱ // 0xcdf @0x5
0xcda…d2b at0006 = ╱20╱…╱ // 0xce0 @0x6
0xcda…d2b at0007 = ╱2a╱*╱ // 0xce1 @0x7
0xcda…d2b at0008 = ╱2a╱*╱ // 0xce2 @0x8
0xcda…d2b at0009 = ╱2a╱*╱ // 0xce3 @0x9
0xcda…d2b at000a = ╱22╱"╱ // 0xce4 @0xa
0xcda…d2b at000b = ╱eb╱;╱ // 0xce5 @0xb
0xcda…d2b at000c = ╱d2╱TAB╱ // 0xce6 @0xc
0xcda…d2b at000d = ╱ed╱(╱ // 0xce7 @0xd
0xcda…d2b at000e = ╱33╱3╱ // 0xce8 @0xe
0xcda…d2b at000f = ╱36╱6╱ // 0xce9 @0xf
0xcda…d2b at0010 = ╱fe00009006╱ // 0xcea @0x10
0xcda…d2b at0015 = ╱ee╱)╱ // 0xcef @0x15
0xcda…d2b at0016 = ╱eb╱;╱ // 0xcf0 @0x16
0xcda…d2b at0017 = ╱54╱T╱ // 0xcf1 @0x17
0xcda…d2b at0018 = ╱4f╱O╱ // 0xcf2 @0x18
0xcda…d2b at0019 = ╱54╱T╱ // 0xcf3 @0x19
0xcda…d2b at001a = ╱41╱A╱ // 0xcf4 @0x1a
0xcda…d2b at001b = ╱4c╱L╱ // 0xcf5 @0x1b
0xcda…d2b at001c = ╱ef╱$╱ // 0xcf6 @0x1c
0xcda…d2b at001d = ╱ed╱(╱ // 0xcf7 @0x1d
0xcda…d2b at001e = ╱45╱E╱ // 0xcf8 @0x1e
0xcda…d2b at001f = ╱ee╱)╱ // 0xcf9 @0x1f
0xcda…d2b at0020 = ╱eb╱;╱ // 0xcfa @0x20
0xcda…d2b at0021 = ╱d2╱TAB╱ // 0xcfb @0x21
0xcda…d2b at0022 = ╱ed╱(╱ // 0xcfc @0x22
0xcda…d2b at0023 = ╱35╱5╱ // 0xcfd @0x23
0xcda…d2b at0024 = ╱32╱2╱ // 0xcfe @0x24
0xcda…d2b at0025 = ╱fe0000d006╱ // 0xcff @0x25
0xcda…d2b at002a = ╱ee╱)╱ // 0xd04 @0x2a
0xcda…d2b at002b = ╱eb╱;╱ // 0xd05 @0x2b
0xcda…d2b at002c = ╱54╱T╱ // 0xd06 @0x2c
0xcda…d2b at002d = ╱4f╱O╱ // 0xd07 @0x2d
0xcda…d2b at002e = ╱54╱T╱ // 0xd08 @0x2e
0xcda…d2b at002f = ╱41╱A╱ // 0xd09 @0x2f
0xcda…d2b at0030 = ╱4c╱L╱ // 0xd0a @0x30
0xcda…d2b at0031 = ╱ef╱$╱ // 0xd0b @0x31
0xcda…d2b at0032 = ╱ed╱(╱ // 0xd0c @0x32
0xcda…d2b at0033 = ╱47╱G╱ // 0xd0d @0x33
0xcda…d2b at0034 = ╱ee╱)╱ // 0xd0e @0x34
0xcda…d2b at0035 = ╱eb╱;╱ // 0xd0f @0x35
0xcda…d2b at0036 = ╱d2╱TAB╱ // 0xd10 @0x36
0xcda…d2b at0037 = ╱ed╱(╱ // 0xd11 @0x37
0xcda…d2b at0038 = ╱36╱6╱ // 0xd12 @0x38
0xcda…d2b at0039 = ╱38╱8╱ // 0xd13 @0x39
0xcda…d2b at003a = ╱fe00008807╱ // 0xd14 @0x3a
0xcda…d2b at003f = ╱ee╱)╱ // 0xd19 @0x3f
0xcda…d2b at0040 = ╱eb╱;╱ // 0xd1a @0x40
0xcda…d2b at0041 = ╱54╱T╱ // 0xd1b @0x41
0xcda…d2b at0042 = ╱4f╱O╱ // 0xd1c @0x42
0xcda…d2b at0043 = ╱54╱T╱ // 0xd1d @0x43
0xcda…d2b at0044 = ╱41╱A╱ // 0xd1e @0x44
0xcda…d2b at0045 = ╱4c╱L╱ // 0xd1f @0x45
0xcda…d2b at0046 = ╱ef╱$╱ // 0xd20 @0x46
0xcda…d2b at0047 = ╱ed╱(╱ // 0xd21 @0x47
0xcda…d2b at0048 = ╱36╱6╱ // 0xd22 @0x48
0xcda…d2b at0049 = ╱fe0000c003╱ // 0xd23 @0x49
0xcda…d2b at004e = ╱ee╱)╱ // 0xd28 @0x4e
0xcda…d2b at004f = ╱eb╱;╱ // 0xd29 @0x4f
0xcda…d2b at0050 = EOL // 0xd2a @0x50
0xcda…d2b }
0xd2b…d79 9ad0 2132 PRINT TAB(28);TOTAL$(V);TAB(44);TOTAL$(4);TAB(60);TOTAL$(5)
0xd2b…d79 LineComalBin {
0xd2b…d79 ptr = 0x9ad0 // 0xd2b @0x0
0xd2b…d79 lno = 0x0854 // 0xd2d @0x2
0xd2b…d79 at0004 = ╱92╱ PRINT ╱ // 0xd2f @0x4
0xd2b…d79 at0005 = ╱d2╱TAB╱ // 0xd30 @0x5
0xd2b…d79 at0006 = ╱ed╱(╱ // 0xd31 @0x6
0xd2b…d79 at0007 = ╱32╱2╱ // 0xd32 @0x7
0xd2b…d79 at0008 = ╱38╱8╱ // 0xd33 @0x8
0xd2b…d79 at0009 = ╱fe0000e005╱ // 0xd34 @0x9
0xd2b…d79 at000e = ╱ee╱)╱ // 0xd39 @0xe
0xd2b…d79 at000f = ╱eb╱;╱ // 0xd3a @0xf
0xd2b…d79 at0010 = ╱54╱T╱ // 0xd3b @0x10
0xd2b…d79 at0011 = ╱4f╱O╱ // 0xd3c @0x11
0xd2b…d79 at0012 = ╱54╱T╱ // 0xd3d @0x12
0xd2b…d79 at0013 = ╱41╱A╱ // 0xd3e @0x13
0xd2b…d79 at0014 = ╱4c╱L╱ // 0xd3f @0x14
0xd2b…d79 at0015 = ╱ef╱$╱ // 0xd40 @0x15
0xd2b…d79 at0016 = ╱ed╱(╱ // 0xd41 @0x16
0xd2b…d79 at0017 = ╱56╱V╱ // 0xd42 @0x17
0xd2b…d79 at0018 = ╱ee╱)╱ // 0xd43 @0x18
0xd2b…d79 at0019 = ╱eb╱;╱ // 0xd44 @0x19
0xd2b…d79 at001a = ╱d2╱TAB╱ // 0xd45 @0x1a
0xd2b…d79 at001b = ╱ed╱(╱ // 0xd46 @0x1b
0xd2b…d79 at001c = ╱34╱4╱ // 0xd47 @0x1c
0xd2b…d79 at001d = ╱34╱4╱ // 0xd48 @0x1d
0xd2b…d79 at001e = ╱fe0000b006╱ // 0xd49 @0x1e
0xd2b…d79 at0023 = ╱ee╱)╱ // 0xd4e @0x23
0xd2b…d79 at0024 = ╱eb╱;╱ // 0xd4f @0x24
0xd2b…d79 at0025 = ╱54╱T╱ // 0xd50 @0x25
0xd2b…d79 at0026 = ╱4f╱O╱ // 0xd51 @0x26
0xd2b…d79 at0027 = ╱54╱T╱ // 0xd52 @0x27
0xd2b…d79 at0028 = ╱41╱A╱ // 0xd53 @0x28
0xd2b…d79 at0029 = ╱4c╱L╱ // 0xd54 @0x29
0xd2b…d79 at002a = ╱ef╱$╱ // 0xd55 @0x2a
0xd2b…d79 at002b = ╱ed╱(╱ // 0xd56 @0x2b
0xd2b…d79 at002c = ╱34╱4╱ // 0xd57 @0x2c
0xd2b…d79 at002d = ╱fe00008003╱ // 0xd58 @0x2d
0xd2b…d79 at0032 = ╱ee╱)╱ // 0xd5d @0x32
0xd2b…d79 at0033 = ╱eb╱;╱ // 0xd5e @0x33
0xd2b…d79 at0034 = ╱d2╱TAB╱ // 0xd5f @0x34
0xd2b…d79 at0035 = ╱ed╱(╱ // 0xd60 @0x35
0xd2b…d79 at0036 = ╱36╱6╱ // 0xd61 @0x36
0xd2b…d79 at0037 = ╱30╱0╱ // 0xd62 @0x37
0xd2b…d79 at0038 = ╱fe0000f006╱ // 0xd63 @0x38
0xd2b…d79 at003d = ╱ee╱)╱ // 0xd68 @0x3d
0xd2b…d79 at003e = ╱eb╱;╱ // 0xd69 @0x3e
0xd2b…d79 at003f = ╱54╱T╱ // 0xd6a @0x3f
0xd2b…d79 at0040 = ╱4f╱O╱ // 0xd6b @0x40
0xd2b…d79 at0041 = ╱54╱T╱ // 0xd6c @0x41
0xd2b…d79 at0042 = ╱41╱A╱ // 0xd6d @0x42
0xd2b…d79 at0043 = ╱4c╱L╱ // 0xd6e @0x43
0xd2b…d79 at0044 = ╱ef╱$╱ // 0xd6f @0x44
0xd2b…d79 at0045 = ╱ed╱(╱ // 0xd70 @0x45
0xd2b…d79 at0046 = ╱35╱5╱ // 0xd71 @0x46
0xd2b…d79 at0047 = ╱fe0000a003╱ // 0xd72 @0x47
0xd2b…d79 at004c = ╱ee╱)╱ // 0xd77 @0x4c
0xd2b…d79 at004d = EOL // 0xd78 @0x4d
0xd2b…d79 }
0xd79…daf 9b06 2134 PRINT TAB(36);TOTAL1$(G);TAB(52);TOTAL1$(4)
0xd79…daf LineComalBin {
0xd79…daf ptr = 0x9b06 // 0xd79 @0x0
0xd79…daf lno = 0x0856 // 0xd7b @0x2
0xd79…daf at0004 = ╱92╱ PRINT ╱ // 0xd7d @0x4
0xd79…daf at0005 = ╱d2╱TAB╱ // 0xd7e @0x5
0xd79…daf at0006 = ╱ed╱(╱ // 0xd7f @0x6
0xd79…daf at0007 = ╱33╱3╱ // 0xd80 @0x7
0xd79…daf at0008 = ╱36╱6╱ // 0xd81 @0x8
0xd79…daf at0009 = ╱fe00009006╱ // 0xd82 @0x9
0xd79…daf at000e = ╱ee╱)╱ // 0xd87 @0xe
0xd79…daf at000f = ╱eb╱;╱ // 0xd88 @0xf
0xd79…daf at0010 = ╱54╱T╱ // 0xd89 @0x10
0xd79…daf at0011 = ╱4f╱O╱ // 0xd8a @0x11
0xd79…daf at0012 = ╱54╱T╱ // 0xd8b @0x12
0xd79…daf at0013 = ╱41╱A╱ // 0xd8c @0x13
0xd79…daf at0014 = ╱4c╱L╱ // 0xd8d @0x14
0xd79…daf at0015 = ╱31╱1╱ // 0xd8e @0x15
0xd79…daf at0016 = ╱ef╱$╱ // 0xd8f @0x16
0xd79…daf at0017 = ╱ed╱(╱ // 0xd90 @0x17
0xd79…daf at0018 = ╱47╱G╱ // 0xd91 @0x18
0xd79…daf at0019 = ╱ee╱)╱ // 0xd92 @0x19
0xd79…daf at001a = ╱eb╱;╱ // 0xd93 @0x1a
0xd79…daf at001b = ╱d2╱TAB╱ // 0xd94 @0x1b
0xd79…daf at001c = ╱ed╱(╱ // 0xd95 @0x1c
0xd79…daf at001d = ╱35╱5╱ // 0xd96 @0x1d
0xd79…daf at001e = ╱32╱2╱ // 0xd97 @0x1e
0xd79…daf at001f = ╱fe0000d006╱ // 0xd98 @0x1f
0xd79…daf at0024 = ╱ee╱)╱ // 0xd9d @0x24
0xd79…daf at0025 = ╱eb╱;╱ // 0xd9e @0x25
0xd79…daf at0026 = ╱54╱T╱ // 0xd9f @0x26
0xd79…daf at0027 = ╱4f╱O╱ // 0xda0 @0x27
0xd79…daf at0028 = ╱54╱T╱ // 0xda1 @0x28
0xd79…daf at0029 = ╱41╱A╱ // 0xda2 @0x29
0xd79…daf at002a = ╱4c╱L╱ // 0xda3 @0x2a
0xd79…daf at002b = ╱31╱1╱ // 0xda4 @0x2b
0xd79…daf at002c = ╱ef╱$╱ // 0xda5 @0x2c
0xd79…daf at002d = ╱ed╱(╱ // 0xda6 @0x2d
0xd79…daf at002e = ╱34╱4╱ // 0xda7 @0x2e
0xd79…daf at002f = ╱fe00008003╱ // 0xda8 @0x2f
0xd79…daf at0034 = ╱ee╱)╱ // 0xdad @0x34
0xd79…daf at0035 = EOL // 0xdae @0x35
0xd79…daf }
0xdaf…dfb 9b52 2136 PRINT TAB(28);TOTAL1$(E);TAB(44);TOTAL1$(V);TAB(60);TOTAL1$(5)
0xdaf…dfb LineComalBin {
0xdaf…dfb ptr = 0x9b52 // 0xdaf @0x0
0xdaf…dfb lno = 0x0858 // 0xdb1 @0x2
0xdaf…dfb at0004 = ╱92╱ PRINT ╱ // 0xdb3 @0x4
0xdaf…dfb at0005 = ╱d2╱TAB╱ // 0xdb4 @0x5
0xdaf…dfb at0006 = ╱ed╱(╱ // 0xdb5 @0x6
0xdaf…dfb at0007 = ╱32╱2╱ // 0xdb6 @0x7
0xdaf…dfb at0008 = ╱38╱8╱ // 0xdb7 @0x8
0xdaf…dfb at0009 = ╱fe0000e005╱ // 0xdb8 @0x9
0xdaf…dfb at000e = ╱ee╱)╱ // 0xdbd @0xe
0xdaf…dfb at000f = ╱eb╱;╱ // 0xdbe @0xf
0xdaf…dfb at0010 = ╱54╱T╱ // 0xdbf @0x10
0xdaf…dfb at0011 = ╱4f╱O╱ // 0xdc0 @0x11
0xdaf…dfb at0012 = ╱54╱T╱ // 0xdc1 @0x12
0xdaf…dfb at0013 = ╱41╱A╱ // 0xdc2 @0x13
0xdaf…dfb at0014 = ╱4c╱L╱ // 0xdc3 @0x14
0xdaf…dfb at0015 = ╱31╱1╱ // 0xdc4 @0x15
0xdaf…dfb at0016 = ╱ef╱$╱ // 0xdc5 @0x16
0xdaf…dfb at0017 = ╱ed╱(╱ // 0xdc6 @0x17
0xdaf…dfb at0018 = ╱45╱E╱ // 0xdc7 @0x18
0xdaf…dfb at0019 = ╱ee╱)╱ // 0xdc8 @0x19
0xdaf…dfb at001a = ╱eb╱;╱ // 0xdc9 @0x1a
0xdaf…dfb at001b = ╱d2╱TAB╱ // 0xdca @0x1b
0xdaf…dfb at001c = ╱ed╱(╱ // 0xdcb @0x1c
0xdaf…dfb at001d = ╱34╱4╱ // 0xdcc @0x1d
0xdaf…dfb at001e = ╱34╱4╱ // 0xdcd @0x1e
0xdaf…dfb at001f = ╱fe0000b006╱ // 0xdce @0x1f
0xdaf…dfb at0024 = ╱ee╱)╱ // 0xdd3 @0x24
0xdaf…dfb at0025 = ╱eb╱;╱ // 0xdd4 @0x25
0xdaf…dfb at0026 = ╱54╱T╱ // 0xdd5 @0x26
0xdaf…dfb at0027 = ╱4f╱O╱ // 0xdd6 @0x27
0xdaf…dfb at0028 = ╱54╱T╱ // 0xdd7 @0x28
0xdaf…dfb at0029 = ╱41╱A╱ // 0xdd8 @0x29
0xdaf…dfb at002a = ╱4c╱L╱ // 0xdd9 @0x2a
0xdaf…dfb at002b = ╱31╱1╱ // 0xdda @0x2b
0xdaf…dfb at002c = ╱ef╱$╱ // 0xddb @0x2c
0xdaf…dfb at002d = ╱ed╱(╱ // 0xddc @0x2d
0xdaf…dfb at002e = ╱56╱V╱ // 0xddd @0x2e
0xdaf…dfb at002f = ╱ee╱)╱ // 0xdde @0x2f
0xdaf…dfb at0030 = ╱eb╱;╱ // 0xddf @0x30
0xdaf…dfb at0031 = ╱d2╱TAB╱ // 0xde0 @0x31
0xdaf…dfb at0032 = ╱ed╱(╱ // 0xde1 @0x32
0xdaf…dfb at0033 = ╱36╱6╱ // 0xde2 @0x33
0xdaf…dfb at0034 = ╱30╱0╱ // 0xde3 @0x34
0xdaf…dfb at0035 = ╱fe0000f006╱ // 0xde4 @0x35
0xdaf…dfb at003a = ╱ee╱)╱ // 0xde9 @0x3a
0xdaf…dfb at003b = ╱eb╱;╱ // 0xdea @0x3b
0xdaf…dfb at003c = ╱54╱T╱ // 0xdeb @0x3c
0xdaf…dfb at003d = ╱4f╱O╱ // 0xdec @0x3d
0xdaf…dfb at003e = ╱54╱T╱ // 0xded @0x3e
0xdaf…dfb at003f = ╱41╱A╱ // 0xdee @0x3f
0xdaf…dfb at0040 = ╱4c╱L╱ // 0xdef @0x40
0xdaf…dfb at0041 = ╱31╱1╱ // 0xdf0 @0x41
0xdaf…dfb at0042 = ╱ef╱$╱ // 0xdf1 @0x42
0xdaf…dfb at0043 = ╱ed╱(╱ // 0xdf2 @0x43
0xdaf…dfb at0044 = ╱35╱5╱ // 0xdf3 @0x44
0xdaf…dfb at0045 = ╱fe0000a003╱ // 0xdf4 @0x45
0xdaf…dfb at004a = ╱ee╱)╱ // 0xdf9 @0x4a
0xdaf…dfb at004b = EOL // 0xdfa @0x4b
0xdaf…dfb }
0xdfb…e12 9b69 2141 LINIE=LINIE+4
0xdfb…e12 LineComalBin {
0xdfb…e12 ptr = 0x9b69 // 0xdfb @0x0
0xdfb…e12 lno = 0x085d // 0xdfd @0x2
0xdfb…e12 at0004 = ╱4c╱L╱ // 0xdff @0x4
0xdfb…e12 at0005 = ╱49╱I╱ // 0xe00 @0x5
0xdfb…e12 at0006 = ╱4e╱N╱ // 0xe01 @0x6
0xdfb…e12 at0007 = ╱49╱I╱ // 0xe02 @0x7
0xdfb…e12 at0008 = ╱45╱E╱ // 0xe03 @0x8
0xdfb…e12 at0009 = ╱dc╱=╱ // 0xe04 @0x9
0xdfb…e12 at000a = ╱4c╱L╱ // 0xe05 @0xa
0xdfb…e12 at000b = ╱49╱I╱ // 0xe06 @0xb
0xdfb…e12 at000c = ╱4e╱N╱ // 0xe07 @0xc
0xdfb…e12 at000d = ╱49╱I╱ // 0xe08 @0xd
0xdfb…e12 at000e = ╱45╱E╱ // 0xe09 @0xe
0xdfb…e12 at000f = ╱e2╱+╱ // 0xe0a @0xf
0xdfb…e12 at0010 = ╱34╱4╱ // 0xe0b @0x10
0xdfb…e12 at0011 = ╱fe00008003╱ // 0xe0c @0x11
0xdfb…e12 at0016 = EOL // 0xe11 @0x16
0xdfb…e12 }
0xe12…e24 9b7b 2142 WHILE LINIE<MAXLIN
0xe12…e24 LineComalBin {
0xe12…e24 ptr = 0x9b7b // 0xe12 @0x0
0xe12…e24 lno = 0x085e // 0xe14 @0x2
0xe12…e24 at0004 = ╱93╱ WHILE ╱ // 0xe16 @0x4
0xe12…e24 at0005 = ╱4c╱L╱ // 0xe17 @0x5
0xe12…e24 at0006 = ╱49╱I╱ // 0xe18 @0x6
0xe12…e24 at0007 = ╱4e╱N╱ // 0xe19 @0x7
0xe12…e24 at0008 = ╱49╱I╱ // 0xe1a @0x8
0xe12…e24 at0009 = ╱45╱E╱ // 0xe1b @0x9
0xe12…e24 at000a = ╱dd╱<╱ // 0xe1c @0xa
0xe12…e24 at000b = ╱4d╱M╱ // 0xe1d @0xb
0xe12…e24 at000c = ╱41╱A╱ // 0xe1e @0xc
0xe12…e24 at000d = ╱58╱X╱ // 0xe1f @0xd
0xe12…e24 at000e = ╱4c╱L╱ // 0xe20 @0xe
0xe12…e24 at000f = ╱49╱I╱ // 0xe21 @0xf
0xe12…e24 at0010 = ╱4e╱N╱ // 0xe22 @0x10
0xe12…e24 at0011 = EOL // 0xe23 @0x11
0xe12…e24 }
0xe24…e2a 9b81 2144 PRINT
0xe24…e2a LineComalBin {
0xe24…e2a ptr = 0x9b81 // 0xe24 @0x0
0xe24…e2a lno = 0x0860 // 0xe26 @0x2
0xe24…e2a at0004 = ╱92╱ PRINT ╱ // 0xe28 @0x4
0xe24…e2a at0005 = EOL // 0xe29 @0x5
0xe24…e2a }
0xe2a…e3c 9b93 2146 LINIE=LINIE+E
0xe2a…e3c LineComalBin {
0xe2a…e3c ptr = 0x9b93 // 0xe2a @0x0
0xe2a…e3c lno = 0x0862 // 0xe2c @0x2
0xe2a…e3c at0004 = ╱4c╱L╱ // 0xe2e @0x4
0xe2a…e3c at0005 = ╱49╱I╱ // 0xe2f @0x5
0xe2a…e3c at0006 = ╱4e╱N╱ // 0xe30 @0x6
0xe2a…e3c at0007 = ╱49╱I╱ // 0xe31 @0x7
0xe2a…e3c at0008 = ╱45╱E╱ // 0xe32 @0x8
0xe2a…e3c at0009 = ╱dc╱=╱ // 0xe33 @0x9
0xe2a…e3c at000a = ╱4c╱L╱ // 0xe34 @0xa
0xe2a…e3c at000b = ╱49╱I╱ // 0xe35 @0xb
0xe2a…e3c at000c = ╱4e╱N╱ // 0xe36 @0xc
0xe2a…e3c at000d = ╱49╱I╱ // 0xe37 @0xd
0xe2a…e3c at000e = ╱45╱E╱ // 0xe38 @0xe
0xe2a…e3c at000f = ╱e2╱+╱ // 0xe39 @0xf
0xe2a…e3c at0010 = ╱45╱E╱ // 0xe3a @0x10
0xe2a…e3c at0011 = EOL // 0xe3b @0x11
0xe2a…e3c }
0xe3c…e42 9b99 2148 ENDWHILE
0xe3c…e42 LineComalBin {
0xe3c…e42 ptr = 0x9b99 // 0xe3c @0x0
0xe3c…e42 lno = 0x0864 // 0xe3e @0x2
0xe3c…e42 at0004 = ╱94╱ ENDWHILE ╱ // 0xe40 @0x4
0xe3c…e42 at0005 = EOL // 0xe41 @0x5
0xe3c…e42 }
0xe42…e49 9ba0 2149 OUTPUT T
0xe42…e49 LineComalBin {
0xe42…e49 ptr = 0x9ba0 // 0xe42 @0x0
0xe42…e49 lno = 0x0865 // 0xe44 @0x2
0xe42…e49 at0004 = ╱a5╱ OUTPUT ╱ // 0xe46 @0x4
0xe42…e49 at0005 = ╱54╱T╱ // 0xe47 @0x5
0xe42…e49 at0006 = EOL // 0xe48 @0x6
0xe42…e49 }
0xe49…e4f 9ba6 2150 CLOSE
0xe49…e4f LineComalBin {
0xe49…e4f ptr = 0x9ba6 // 0xe49 @0x0
0xe49…e4f lno = 0x0866 // 0xe4b @0x2
0xe49…e4f at0004 = ╱a8╱ CLOSE ╱ // 0xe4d @0x4
0xe49…e4f at0005 = EOL // 0xe4e @0x5
0xe49…e4f }
0xe4f…e65 0000 2160 CHAIN "P641210:LBILAG"
0xe4f…e65 LineComalBin {
0xe4f…e65 ptr = 0x0000 // 0xe4f @0x0
0xe4f…e65 lno = 0x0870 // 0xe51 @0x2
0xe4f…e65 at0004 = ╱ac╱ CHAIN ╱ // 0xe53 @0x4
0xe4f…e65 at0005 = ╱22╱"╱ // 0xe54 @0x5
0xe4f…e65 at0006 = ╱50╱P╱ // 0xe55 @0x6
0xe4f…e65 at0007 = ╱36╱6╱ // 0xe56 @0x7
0xe4f…e65 at0008 = ╱34╱4╱ // 0xe57 @0x8
0xe4f…e65 at0009 = ╱31╱1╱ // 0xe58 @0x9
0xe4f…e65 at000a = ╱32╱2╱ // 0xe59 @0xa
0xe4f…e65 at000b = ╱31╱1╱ // 0xe5a @0xb
0xe4f…e65 at000c = ╱30╱0╱ // 0xe5b @0xc
0xe4f…e65 at000d = ╱3a╱:╱ // 0xe5c @0xd
0xe4f…e65 at000e = ╱4c╱L╱ // 0xe5d @0xe
0xe4f…e65 at000f = ╱42╱B╱ // 0xe5e @0xf
0xe4f…e65 at0010 = ╱49╱I╱ // 0xe5f @0x10
0xe4f…e65 at0011 = ╱4c╱L╱ // 0xe60 @0x11
0xe4f…e65 at0012 = ╱41╱A╱ // 0xe61 @0x12
0xe4f…e65 at0013 = ╱47╱G╱ // 0xe62 @0x13
0xe4f…e65 at0014 = ╱22╱"╱ // 0xe63 @0x14
0xe4f…e65 at0015 = EOL // 0xe64 @0x15
0xe4f…e65 }
0xe65…e6b (48,) 57 8d 57 8d 10 00 ┆W W ┆