|
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: 3720 (0xe88)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »LBILAG.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »LBILAG.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »LBILAG.B«
0100 PROC CONV(NR2,OK22,CIF) 0110 OK2=OK22 0120 NR2$="" 0130 REPEAT 0140 NR2$=CHR((OK2 MOD 10)+48)+NR2$ 0150 CIF=CIF-E 0160 OK2=OK2 DIV 10 0170 IF CIF<B AND OK2=B THEN CIF=B 0180 UNTIL CIF=B 0190 ENDPROC 0200 PROC INDVIRK 0210 OPEN FIL$,R 0220 EXEC FEJL(B,B,FIL$) 0230 GET FIL$,E:POST3$ 0240 GET FIL$,G:POST4$,SLJNR,MLMNR,ATPLM 0245 GET FIL$,V:DAD$ 0250 ENDPROC 0260 PROC CONVDATE(NR1,OK1) 0270 OK11=OK1;NR1$="" 0280 FOR I=8 TO E STEP -E 0290 IF I MOD V=B THEN 0300 NR1$(I)="-" 0310 ELSE 0320 NR1$(I)=CHR(OK11 MOD 10+48) 0330 OK11=OK11 DIV 10 0340 ENDIF 0350 NEXT I 0360 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),DAD$(6) 1010 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12) 1020 DIM TOTAL$(100,12),FIL1$(16),POST1$(71),POST2$(27) 1030 DIM RESUL$(12),RESUL1$(12),POST3$(55),POST4$(34),FIL$(16),AB(100) 1050 DIM MF5$(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 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 1670 CLOSE FIL$ 1675 FIL1$="P641220:LØNMODRG" 1680 OPEN FIL1$,R 1710 MF5$="P641210:LØNBILAG" 1720 OPEN MF5$,R 1750 GET MF5$:DD 1755 EXEC CONVDATE(STARTPER$,DD) 1760 OUTPUT P 1765 LINIE=B 1770 FOR I=E TO 100 1780 TOTAL$(I)=TAH$ 1785 AB(I)=B 1790 NEXT I 1810 GET MF5$:LMNR,RESUL$ 1820 WHILE STATUS(MF5$)=B 1825 EXEC INLØNMOD(LMNR) 1830 LPI=RPI DIV 10000+E 1832 AB(LPI)=AB(LPI)+E 1834 EXEC CALC(B,RESUL$,TOTAL$(LPI),TOTAL$(LPI)) 1836 PRINT 1838 PRINT 1840 PRINT TAB(37);"L Ø N O V E R F Ø R S E L Dato ";DAD$ 1842 PRINT 1844 PRINT TAB(5);"LØNKONTOFØRENDE PI"; 1846 PRINT USING "###":LPI-E; 1848 PRINT TAB(45);"AFTALENUMMER ";POST4$(19,22);"/";POST4$(23,24) 1850 PRINT TAB(5);"DISPOSITIONSDAG ";STARTPER$;TAB(45);"ARBEJDSGIVER "; 1852 PRINT POST4$(25,34) 1854 PRINT TAB(5);"LØNMODTAGER" 1856 PRINT TAB(5);POST1$(E,25);TAB(45);POST3$(8,32) 1858 PRINT TAB(5);POST1$(26,48);TAB(45);POST3$(33,55) 1860 PRINT TAB(5);POST1$(49,71);TAB(45);POST4$(E,4);" ";POST4$(5,18) 1862 PRINT TAB(5);POST2$(E,4);" ";POST2$(5,18) 1864 PRINT 1866 PRINT 1868 PRINT TAB(22);"REG NR TK KONTO NR";TAB(65);"KRONER" 1870 PRINT 1872 FOR I=E TO 10 1874 IF RESUL$(I)=" " THEN RESUL$(I)="*" 1876 NEXT I 1878 PRINT TAB(8);"ANV/UDLIGNET";TAB(23); 1880 PRINT USING "##### 49 ":RPI MOD 10000; 1882 EXEC CONV(OP1$,K1,5) 1884 EXEC CONV(OP2$,K2,5) 1886 OP1$=OP1$+OP2$ 1888 PRINT OP1$;TAB(61);RESUL$(E,10) 1890 FOR I=E TO 7 1892 PRINT 1894 NEXT I 2000 LINIE=LINIE+24 2075 PRINT "============================================================"; 2076 PRINT "==================="; 2080 GET MF5$:LMNR,RESUL$ 2090 ENDWHILE 2095 IF STATUS(MF5$)<>19 THEN EXEC FEJL(LMNR,B,MF5$) 2130 FOR I=E TO 100 2140 IF AB(I)>B THEN 2150 PRINT 2160 PRINT 2170 PRINT TAB(5);"UDSKRIFTSDATO ";DAD$ 2180 PRINT 2200 PRINT TAB(5);"LØNKONTOFØRENDE PI"; 2210 PRINT USING "###":I-E; 2220 PRINT TAB(45);"AFTALENUMMER ";POST4$(19,22);"/";POST4$(23,24) 2230 PRINT TAB(5);"DISPOSITIONSDAG ";STARTPER$;TAB(45);"ARBEJDSGIVER "; 2240 PRINT POST4$(25,34) 2250 PRINT 2260 PRINT 2270 PRINT TAB(5);"**T O T A L B I L A G**" 2280 PRINT 2290 PRINT 2300 PRINT 2310 PRINT 2320 PRINT TAB(65);"KRONER" 2330 PRINT 2340 FOR J=E TO 11 2350 IF TOTAL$(I,J)=" " THEN TOTAL$(I,J)="*" 2360 NEXT J 2370 PRINT TAB(8);"ANTAL BILAG";TAB(24); 2380 PRINT USING "####":AB(I); 2390 PRINT TAB(60);TOTAL$(I,E,11) 2400 FOR J=E TO 7 2410 PRINT 2420 NEXT J 2500 PRINT "============================================================"; 2510 PRINT "==================="; 2511 LINIE=LINIE+24 2512 ENDIF 2515 NEXT I 2519 LINIE=LINIE MOD 72 2520 CLOSE 2521 WHILE LINIE<72 2522 PRINT 2523 LINIE=LINIE+E 2524 ENDWHILE 2525 OUTPUT T 2530 CHAIN "P641210:STARTB"
0x000…018 (0,) 8d6f 0100 PROC CONV(NR2,OK22,CIF)
0x000…018 LineComalBin {
0x000…018 ptr = 0x8d6f // 0x0 @0x0
0x000…018 lno = 0x0064 // 0x2 @0x2
0x000…018 at0004 = ╱9e╱ PROC ╱ // 0x4 @0x4
0x000…018 at0005 = ╱43╱C╱ // 0x5 @0x5
0x000…018 at0006 = ╱4f╱O╱ // 0x6 @0x6
0x000…018 at0007 = ╱4e╱N╱ // 0x7 @0x7
0x000…018 at0008 = ╱56╱V╱ // 0x8 @0x8
0x000…018 at0009 = ╱ed╱(╱ // 0x9 @0x9
0x000…018 at000a = ╱4e╱N╱ // 0xa @0xa
0x000…018 at000b = ╱52╱R╱ // 0xb @0xb
0x000…018 at000c = ╱32╱2╱ // 0xc @0xc
0x000…018 at000d = ╱ec╱,╱ // 0xd @0xd
0x000…018 at000e = ╱4f╱O╱ // 0xe @0xe
0x000…018 at000f = ╱4b╱K╱ // 0xf @0xf
0x000…018 at0010 = ╱32╱2╱ // 0x10 @0x10
0x000…018 at0011 = ╱32╱2╱ // 0x11 @0x11
0x000…018 at0012 = ╱ec╱,╱ // 0x12 @0x12
0x000…018 at0013 = ╱43╱C╱ // 0x13 @0x13
0x000…018 at0014 = ╱49╱I╱ // 0x14 @0x14
0x000…018 at0015 = ╱46╱F╱ // 0x15 @0x15
0x000…018 at0016 = ╱ee╱)╱ // 0x16 @0x16
0x000…018 at0017 = EOL // 0x17 @0x17
0x000…018 }
0x018…025 8d7c 0110 OK2=OK22
0x018…025 LineComalBin {
0x018…025 ptr = 0x8d7c // 0x18 @0x0
0x018…025 lno = 0x006e // 0x1a @0x2
0x018…025 at0004 = ╱4f╱O╱ // 0x1c @0x4
0x018…025 at0005 = ╱4b╱K╱ // 0x1d @0x5
0x018…025 at0006 = ╱32╱2╱ // 0x1e @0x6
0x018…025 at0007 = ╱dc╱=╱ // 0x1f @0x7
0x018…025 at0008 = ╱4f╱O╱ // 0x20 @0x8
0x018…025 at0009 = ╱4b╱K╱ // 0x21 @0x9
0x018…025 at000a = ╱32╱2╱ // 0x22 @0xa
0x018…025 at000b = ╱32╱2╱ // 0x23 @0xb
0x018…025 at000c = EOL // 0x24 @0xc
0x018…025 }
0x025…031 8d88 0120 NR2$=""
0x025…031 LineComalBin {
0x025…031 ptr = 0x8d88 // 0x25 @0x0
0x025…031 lno = 0x0078 // 0x27 @0x2
0x025…031 at0004 = ╱4e╱N╱ // 0x29 @0x4
0x025…031 at0005 = ╱52╱R╱ // 0x2a @0x5
0x025…031 at0006 = ╱32╱2╱ // 0x2b @0x6
0x025…031 at0007 = ╱ef╱$╱ // 0x2c @0x7
0x025…031 at0008 = ╱dc╱=╱ // 0x2d @0x8
0x025…031 at0009 = ╱22╱"╱ // 0x2e @0x9
0x025…031 at000a = ╱22╱"╱ // 0x2f @0xa
0x025…031 at000b = EOL // 0x30 @0xb
0x025…031 }
0x031…037 8d8e 0130 REPEAT
0x031…037 LineComalBin {
0x031…037 ptr = 0x8d8e // 0x31 @0x0
0x031…037 lno = 0x0082 // 0x33 @0x2
0x031…037 at0004 = ╱97╱ REPEAT ╱ // 0x35 @0x4
0x031…037 at0005 = EOL // 0x36 @0x5
0x031…037 }
0x037…05e 8db5 0140 NR2$=CHR((OK2 MOD 10)+48)+NR2$
0x037…05e LineComalBin {
0x037…05e ptr = 0x8db5 // 0x37 @0x0
0x037…05e lno = 0x008c // 0x39 @0x2
0x037…05e at0004 = ╱4e╱N╱ // 0x3b @0x4
0x037…05e at0005 = ╱52╱R╱ // 0x3c @0x5
0x037…05e at0006 = ╱32╱2╱ // 0x3d @0x6
0x037…05e at0007 = ╱ef╱$╱ // 0x3e @0x7
0x037…05e at0008 = ╱dc╱=╱ // 0x3f @0x8
0x037…05e at0009 = ╱cf╱CHR╱ // 0x40 @0x9
0x037…05e at000a = ╱ed╱(╱ // 0x41 @0xa
0x037…05e at000b = ╱ed╱(╱ // 0x42 @0xb
0x037…05e at000c = ╱4f╱O╱ // 0x43 @0xc
0x037…05e at000d = ╱4b╱K╱ // 0x44 @0xd
0x037…05e at000e = ╱32╱2╱ // 0x45 @0xe
0x037…05e at000f = ╱e8╱ MOD ╱ // 0x46 @0xf
0x037…05e at0010 = ╱31╱1╱ // 0x47 @0x10
0x037…05e at0011 = ╱30╱0╱ // 0x48 @0x11
0x037…05e at0012 = ╱fe0000a004╱ // 0x49 @0x12
0x037…05e at0017 = ╱ee╱)╱ // 0x4e @0x17
0x037…05e at0018 = ╱e2╱+╱ // 0x4f @0x18
0x037…05e at0019 = ╱34╱4╱ // 0x50 @0x19
0x037…05e at001a = ╱38╱8╱ // 0x51 @0x1a
0x037…05e at001b = ╱fe0000c006╱ // 0x52 @0x1b
0x037…05e at0020 = ╱ee╱)╱ // 0x57 @0x20
0x037…05e at0021 = ╱f1╱+╱ // 0x58 @0x21
0x037…05e at0022 = ╱4e╱N╱ // 0x59 @0x22
0x037…05e at0023 = ╱52╱R╱ // 0x5a @0x23
0x037…05e at0024 = ╱32╱2╱ // 0x5b @0x24
0x037…05e at0025 = ╱ef╱$╱ // 0x5c @0x25
0x037…05e at0026 = EOL // 0x5d @0x26
0x037…05e }
0x05e…06c 8dc3 0150 CIF=CIF-E
0x05e…06c LineComalBin {
0x05e…06c ptr = 0x8dc3 // 0x5e @0x0
0x05e…06c lno = 0x0096 // 0x60 @0x2
0x05e…06c at0004 = ╱43╱C╱ // 0x62 @0x4
0x05e…06c at0005 = ╱49╱I╱ // 0x63 @0x5
0x05e…06c at0006 = ╱46╱F╱ // 0x64 @0x6
0x05e…06c at0007 = ╱dc╱=╱ // 0x65 @0x7
0x05e…06c at0008 = ╱43╱C╱ // 0x66 @0x8
0x05e…06c at0009 = ╱49╱I╱ // 0x67 @0x9
0x05e…06c at000a = ╱46╱F╱ // 0x68 @0xa
0x05e…06c at000b = ╱e3╱-╱ // 0x69 @0xb
0x05e…06c at000c = ╱45╱E╱ // 0x6a @0xc
0x05e…06c at000d = EOL // 0x6b @0xd
0x05e…06c }
0x06c…080 8dd7 0160 OK2=OK2 DIV 10
0x06c…080 LineComalBin {
0x06c…080 ptr = 0x8dd7 // 0x6c @0x0
0x06c…080 lno = 0x00a0 // 0x6e @0x2
0x06c…080 at0004 = ╱4f╱O╱ // 0x70 @0x4
0x06c…080 at0005 = ╱4b╱K╱ // 0x71 @0x5
0x06c…080 at0006 = ╱32╱2╱ // 0x72 @0x6
0x06c…080 at0007 = ╱dc╱=╱ // 0x73 @0x7
0x06c…080 at0008 = ╱4f╱O╱ // 0x74 @0x8
0x06c…080 at0009 = ╱4b╱K╱ // 0x75 @0x9
0x06c…080 at000a = ╱32╱2╱ // 0x76 @0xa
0x06c…080 at000b = ╱e7╱ DIV ╱ // 0x77 @0xb
0x06c…080 at000c = ╱31╱1╱ // 0x78 @0xc
0x06c…080 at000d = ╱30╱0╱ // 0x79 @0xd
0x06c…080 at000e = ╱fe0000a004╱ // 0x7a @0xe
0x06c…080 at0013 = EOL // 0x7f @0x13
0x06c…080 }
0x080…097 8dee 0170 IF CIF<B AND OK2=B THEN CIF=B
0x080…097 LineComalBin {
0x080…097 ptr = 0x8dee // 0x80 @0x0
0x080…097 lno = 0x00aa // 0x82 @0x2
0x080…097 at0004 = ╱82╱ IF ╱ // 0x84 @0x4
0x080…097 at0005 = ╱43╱C╱ // 0x85 @0x5
0x080…097 at0006 = ╱49╱I╱ // 0x86 @0x6
0x080…097 at0007 = ╱46╱F╱ // 0x87 @0x7
0x080…097 at0008 = ╱dd╱<╱ // 0x88 @0x8
0x080…097 at0009 = ╱42╱B╱ // 0x89 @0x9
0x080…097 at000a = ╱da╱ AND ╱ // 0x8a @0xa
0x080…097 at000b = ╱4f╱O╱ // 0x8b @0xb
0x080…097 at000c = ╱4b╱K╱ // 0x8c @0xc
0x080…097 at000d = ╱32╱2╱ // 0x8d @0xd
0x080…097 at000e = ╱dc╱=╱ // 0x8e @0xe
0x080…097 at000f = ╱42╱B╱ // 0x8f @0xf
0x080…097 at0010 = ╱b6╱ THEN ╱ // 0x90 @0x10
0x080…097 at0011 = ╱43╱C╱ // 0x91 @0x11
0x080…097 at0012 = ╱49╱I╱ // 0x92 @0x12
0x080…097 at0013 = ╱46╱F╱ // 0x93 @0x13
0x080…097 at0014 = ╱dc╱=╱ // 0x94 @0x14
0x080…097 at0015 = ╱42╱B╱ // 0x95 @0x15
0x080…097 at0016 = EOL // 0x96 @0x16
0x080…097 }
0x097…0a2 8df9 0180 UNTIL CIF=B
0x097…0a2 LineComalBin {
0x097…0a2 ptr = 0x8df9 // 0x97 @0x0
0x097…0a2 lno = 0x00b4 // 0x99 @0x2
0x097…0a2 at0004 = ╱98╱ UNTIL ╱ // 0x9b @0x4
0x097…0a2 at0005 = ╱43╱C╱ // 0x9c @0x5
0x097…0a2 at0006 = ╱49╱I╱ // 0x9d @0x6
0x097…0a2 at0007 = ╱46╱F╱ // 0x9e @0x7
0x097…0a2 at0008 = ╱dc╱=╱ // 0x9f @0x8
0x097…0a2 at0009 = ╱42╱B╱ // 0xa0 @0x9
0x097…0a2 at000a = EOL // 0xa1 @0xa
0x097…0a2 }
0x0a2…0a8 8dff 0190 ENDPROC
0x0a2…0a8 LineComalBin {
0x0a2…0a8 ptr = 0x8dff // 0xa2 @0x0
0x0a2…0a8 lno = 0x00be // 0xa4 @0x2
0x0a2…0a8 at0004 = ╱9f╱ ENDPROC ╱ // 0xa6 @0x4
0x0a2…0a8 at0005 = EOL // 0xa7 @0x5
0x0a2…0a8 }
0x0a8…0b5 8e0c 0200 PROC INDVIRK
0x0a8…0b5 LineComalBin {
0x0a8…0b5 ptr = 0x8e0c // 0xa8 @0x0
0x0a8…0b5 lno = 0x00c8 // 0xaa @0x2
0x0a8…0b5 at0004 = ╱9e╱ PROC ╱ // 0xac @0x4
0x0a8…0b5 at0005 = ╱49╱I╱ // 0xad @0x5
0x0a8…0b5 at0006 = ╱4e╱N╱ // 0xae @0x6
0x0a8…0b5 at0007 = ╱44╱D╱ // 0xaf @0x7
0x0a8…0b5 at0008 = ╱56╱V╱ // 0xb0 @0x8
0x0a8…0b5 at0009 = ╱49╱I╱ // 0xb1 @0x9
0x0a8…0b5 at000a = ╱52╱R╱ // 0xb2 @0xa
0x0a8…0b5 at000b = ╱4b╱K╱ // 0xb3 @0xb
0x0a8…0b5 at000c = EOL // 0xb4 @0xc
0x0a8…0b5 }
0x0b5…0c1 8e18 0210 OPEN FIL$,R
0x0b5…0c1 LineComalBin {
0x0b5…0c1 ptr = 0x8e18 // 0xb5 @0x0
0x0b5…0c1 lno = 0x00d2 // 0xb7 @0x2
0x0b5…0c1 at0004 = ╱a7╱ OPEN ╱ // 0xb9 @0x4
0x0b5…0c1 at0005 = ╱46╱F╱ // 0xba @0x5
0x0b5…0c1 at0006 = ╱49╱I╱ // 0xbb @0x6
0x0b5…0c1 at0007 = ╱4c╱L╱ // 0xbc @0x7
0x0b5…0c1 at0008 = ╱ef╱$╱ // 0xbd @0x8
0x0b5…0c1 at0009 = ╱ec╱,╱ // 0xbe @0x9
0x0b5…0c1 at000a = ╱52╱R╱ // 0xbf @0xa
0x0b5…0c1 at000b = EOL // 0xc0 @0xb
0x0b5…0c1 }
0x0c1…0d5 8e2c 0220 EXEC FEJL(B,B,FIL$)
0x0c1…0d5 LineComalBin {
0x0c1…0d5 ptr = 0x8e2c // 0xc1 @0x0
0x0c1…0d5 lno = 0x00dc // 0xc3 @0x2
0x0c1…0d5 at0004 = ╱9d╱ EXEC ╱ // 0xc5 @0x4
0x0c1…0d5 at0005 = ╱46╱F╱ // 0xc6 @0x5
0x0c1…0d5 at0006 = ╱45╱E╱ // 0xc7 @0x6
0x0c1…0d5 at0007 = ╱4a╱J╱ // 0xc8 @0x7
0x0c1…0d5 at0008 = ╱4c╱L╱ // 0xc9 @0x8
0x0c1…0d5 at0009 = ╱ed╱(╱ // 0xca @0x9
0x0c1…0d5 at000a = ╱42╱B╱ // 0xcb @0xa
0x0c1…0d5 at000b = ╱ec╱,╱ // 0xcc @0xb
0x0c1…0d5 at000c = ╱42╱B╱ // 0xcd @0xc
0x0c1…0d5 at000d = ╱ec╱,╱ // 0xce @0xd
0x0c1…0d5 at000e = ╱46╱F╱ // 0xcf @0xe
0x0c1…0d5 at000f = ╱49╱I╱ // 0xd0 @0xf
0x0c1…0d5 at0010 = ╱4c╱L╱ // 0xd1 @0x10
0x0c1…0d5 at0011 = ╱ef╱$╱ // 0xd2 @0x11
0x0c1…0d5 at0012 = ╱ee╱)╱ // 0xd3 @0x12
0x0c1…0d5 at0013 = EOL // 0xd4 @0x13
0x0c1…0d5 }
0x0d5…0e8 8e3f 0230 GET FIL$,E:POST3$
0x0d5…0e8 LineComalBin {
0x0d5…0e8 ptr = 0x8e3f // 0xd5 @0x0
0x0d5…0e8 lno = 0x00e6 // 0xd7 @0x2
0x0d5…0e8 at0004 = ╱a9╱ GET ╱ // 0xd9 @0x4
0x0d5…0e8 at0005 = ╱46╱F╱ // 0xda @0x5
0x0d5…0e8 at0006 = ╱49╱I╱ // 0xdb @0x6
0x0d5…0e8 at0007 = ╱4c╱L╱ // 0xdc @0x7
0x0d5…0e8 at0008 = ╱ef╱$╱ // 0xdd @0x8
0x0d5…0e8 at0009 = ╱ec╱,╱ // 0xde @0x9
0x0d5…0e8 at000a = ╱45╱E╱ // 0xdf @0xa
0x0d5…0e8 at000b = ╱f0╱:╱ // 0xe0 @0xb
0x0d5…0e8 at000c = ╱50╱P╱ // 0xe1 @0xc
0x0d5…0e8 at000d = ╱4f╱O╱ // 0xe2 @0xd
0x0d5…0e8 at000e = ╱53╱S╱ // 0xe3 @0xe
0x0d5…0e8 at000f = ╱54╱T╱ // 0xe4 @0xf
0x0d5…0e8 at0010 = ╱33╱3╱ // 0xe5 @0x10
0x0d5…0e8 at0011 = ╱ef╱$╱ // 0xe6 @0x11
0x0d5…0e8 at0012 = EOL // 0xe7 @0x12
0x0d5…0e8 }
0x0e8…10d 8e64 0240 GET FIL$,G:POST4$,SLJNR,MLMNR,ATPLM
0x0e8…10d LineComalBin {
0x0e8…10d ptr = 0x8e64 // 0xe8 @0x0
0x0e8…10d lno = 0x00f0 // 0xea @0x2
0x0e8…10d at0004 = ╱a9╱ GET ╱ // 0xec @0x4
0x0e8…10d at0005 = ╱46╱F╱ // 0xed @0x5
0x0e8…10d at0006 = ╱49╱I╱ // 0xee @0x6
0x0e8…10d at0007 = ╱4c╱L╱ // 0xef @0x7
0x0e8…10d at0008 = ╱ef╱$╱ // 0xf0 @0x8
0x0e8…10d at0009 = ╱ec╱,╱ // 0xf1 @0x9
0x0e8…10d at000a = ╱47╱G╱ // 0xf2 @0xa
0x0e8…10d at000b = ╱f0╱:╱ // 0xf3 @0xb
0x0e8…10d at000c = ╱50╱P╱ // 0xf4 @0xc
0x0e8…10d at000d = ╱4f╱O╱ // 0xf5 @0xd
0x0e8…10d at000e = ╱53╱S╱ // 0xf6 @0xe
0x0e8…10d at000f = ╱54╱T╱ // 0xf7 @0xf
0x0e8…10d at0010 = ╱34╱4╱ // 0xf8 @0x10
0x0e8…10d at0011 = ╱ef╱$╱ // 0xf9 @0x11
0x0e8…10d at0012 = ╱ec╱,╱ // 0xfa @0x12
0x0e8…10d at0013 = ╱53╱S╱ // 0xfb @0x13
0x0e8…10d at0014 = ╱4c╱L╱ // 0xfc @0x14
0x0e8…10d at0015 = ╱4a╱J╱ // 0xfd @0x15
0x0e8…10d at0016 = ╱4e╱N╱ // 0xfe @0x16
0x0e8…10d at0017 = ╱52╱R╱ // 0xff @0x17
0x0e8…10d at0018 = ╱ec╱,╱ // 0x100 @0x18
0x0e8…10d at0019 = ╱4d╱M╱ // 0x101 @0x19
0x0e8…10d at001a = ╱4c╱L╱ // 0x102 @0x1a
0x0e8…10d at001b = ╱4d╱M╱ // 0x103 @0x1b
0x0e8…10d at001c = ╱4e╱N╱ // 0x104 @0x1c
0x0e8…10d at001d = ╱52╱R╱ // 0x105 @0x1d
0x0e8…10d at001e = ╱ec╱,╱ // 0x106 @0x1e
0x0e8…10d at001f = ╱41╱A╱ // 0x107 @0x1f
0x0e8…10d at0020 = ╱54╱T╱ // 0x108 @0x20
0x0e8…10d at0021 = ╱50╱P╱ // 0x109 @0x21
0x0e8…10d at0022 = ╱4c╱L╱ // 0x10a @0x22
0x0e8…10d at0023 = ╱4d╱M╱ // 0x10b @0x23
0x0e8…10d at0024 = EOL // 0x10c @0x24
0x0e8…10d }
0x10d…11e 8e75 0245 GET FIL$,V:DAD$
0x10d…11e LineComalBin {
0x10d…11e ptr = 0x8e75 // 0x10d @0x0
0x10d…11e lno = 0x00f5 // 0x10f @0x2
0x10d…11e at0004 = ╱a9╱ GET ╱ // 0x111 @0x4
0x10d…11e at0005 = ╱46╱F╱ // 0x112 @0x5
0x10d…11e at0006 = ╱49╱I╱ // 0x113 @0x6
0x10d…11e at0007 = ╱4c╱L╱ // 0x114 @0x7
0x10d…11e at0008 = ╱ef╱$╱ // 0x115 @0x8
0x10d…11e at0009 = ╱ec╱,╱ // 0x116 @0x9
0x10d…11e at000a = ╱56╱V╱ // 0x117 @0xa
0x10d…11e at000b = ╱f0╱:╱ // 0x118 @0xb
0x10d…11e at000c = ╱44╱D╱ // 0x119 @0xc
0x10d…11e at000d = ╱41╱A╱ // 0x11a @0xd
0x10d…11e at000e = ╱44╱D╱ // 0x11b @0xe
0x10d…11e at000f = ╱ef╱$╱ // 0x11c @0xf
0x10d…11e at0010 = EOL // 0x11d @0x10
0x10d…11e }
0x11e…124 8e7b 0250 ENDPROC
0x11e…124 LineComalBin {
0x11e…124 ptr = 0x8e7b // 0x11e @0x0
0x11e…124 lno = 0x00fa // 0x120 @0x2
0x11e…124 at0004 = ╱9f╱ ENDPROC ╱ // 0x122 @0x4
0x11e…124 at0005 = EOL // 0x123 @0x5
0x11e…124 }
0x124…13b 8e92 0260 PROC CONVDATE(NR1,OK1)
0x124…13b LineComalBin {
0x124…13b ptr = 0x8e92 // 0x124 @0x0
0x124…13b lno = 0x0104 // 0x126 @0x2
0x124…13b at0004 = ╱9e╱ PROC ╱ // 0x128 @0x4
0x124…13b at0005 = ╱43╱C╱ // 0x129 @0x5
0x124…13b at0006 = ╱4f╱O╱ // 0x12a @0x6
0x124…13b at0007 = ╱4e╱N╱ // 0x12b @0x7
0x124…13b at0008 = ╱56╱V╱ // 0x12c @0x8
0x124…13b at0009 = ╱44╱D╱ // 0x12d @0x9
0x124…13b at000a = ╱41╱A╱ // 0x12e @0xa
0x124…13b at000b = ╱54╱T╱ // 0x12f @0xb
0x124…13b at000c = ╱45╱E╱ // 0x130 @0xc
0x124…13b at000d = ╱ed╱(╱ // 0x131 @0xd
0x124…13b at000e = ╱4e╱N╱ // 0x132 @0xe
0x124…13b at000f = ╱52╱R╱ // 0x133 @0xf
0x124…13b at0010 = ╱31╱1╱ // 0x134 @0x10
0x124…13b at0011 = ╱ec╱,╱ // 0x135 @0x11
0x124…13b at0012 = ╱4f╱O╱ // 0x136 @0x12
0x124…13b at0013 = ╱4b╱K╱ // 0x137 @0x13
0x124…13b at0014 = ╱31╱1╱ // 0x138 @0x14
0x124…13b at0015 = ╱ee╱)╱ // 0x139 @0x15
0x124…13b at0016 = EOL // 0x13a @0x16
0x124…13b }
0x13b…150 8ea7 0270 OK11=OK1;NR1$=""
0x13b…150 LineComalBin {
0x13b…150 ptr = 0x8ea7 // 0x13b @0x0
0x13b…150 lno = 0x010e // 0x13d @0x2
0x13b…150 at0004 = ╱4f╱O╱ // 0x13f @0x4
0x13b…150 at0005 = ╱4b╱K╱ // 0x140 @0x5
0x13b…150 at0006 = ╱31╱1╱ // 0x141 @0x6
0x13b…150 at0007 = ╱31╱1╱ // 0x142 @0x7
0x13b…150 at0008 = ╱dc╱=╱ // 0x143 @0x8
0x13b…150 at0009 = ╱4f╱O╱ // 0x144 @0x9
0x13b…150 at000a = ╱4b╱K╱ // 0x145 @0xa
0x13b…150 at000b = ╱31╱1╱ // 0x146 @0xb
0x13b…150 at000c = ╱eb╱;╱ // 0x147 @0xc
0x13b…150 at000d = ╱4e╱N╱ // 0x148 @0xd
0x13b…150 at000e = ╱52╱R╱ // 0x149 @0xe
0x13b…150 at000f = ╱31╱1╱ // 0x14a @0xf
0x13b…150 at0010 = ╱ef╱$╱ // 0x14b @0x10
0x13b…150 at0011 = ╱dc╱=╱ // 0x14c @0x11
0x13b…150 at0012 = ╱22╱"╱ // 0x14d @0x12
0x13b…150 at0013 = ╱22╱"╱ // 0x14e @0x13
0x13b…150 at0014 = EOL // 0x14f @0x14
0x13b…150 }
0x150…163 8eba 0280 FOR I=8 TO E STEP -E
0x150…163 LineComalBin {
0x150…163 ptr = 0x8eba // 0x150 @0x0
0x150…163 lno = 0x0118 // 0x152 @0x2
0x150…163 at0004 = ╱83╱ FOR ╱ // 0x154 @0x4
0x150…163 at0005 = ╱49╱I╱ // 0x155 @0x5
0x150…163 at0006 = ╱dc╱=╱ // 0x156 @0x6
0x150…163 at0007 = ╱38╱8╱ // 0x157 @0x7
0x150…163 at0008 = ╱fe00008004╱ // 0x158 @0x8
0x150…163 at000d = ╱b7╱ TO ╱ // 0x15d @0xd
0x150…163 at000e = ╱45╱E╱ // 0x15e @0xe
0x150…163 at000f = ╱b8╱ STEP ╱ // 0x15f @0xf
0x150…163 at0010 = ╱e9╱-╱ // 0x160 @0x10
0x150…163 at0011 = ╱45╱E╱ // 0x161 @0x11
0x150…163 at0012 = EOL // 0x162 @0x12
0x150…163 }
0x163…16f 8ec6 0290 IF I MOD V=B THEN
0x163…16f LineComalBin {
0x163…16f ptr = 0x8ec6 // 0x163 @0x0
0x163…16f lno = 0x0122 // 0x165 @0x2
0x163…16f at0004 = ╱9c╱ IF ╱ // 0x167 @0x4
0x163…16f at0005 = ╱49╱I╱ // 0x168 @0x5
0x163…16f at0006 = ╱e8╱ MOD ╱ // 0x169 @0x6
0x163…16f at0007 = ╱56╱V╱ // 0x16a @0x7
0x163…16f at0008 = ╱dc╱=╱ // 0x16b @0x8
0x163…16f at0009 = ╱42╱B╱ // 0x16c @0x9
0x163…16f at000a = ╱b6╱ THEN ╱ // 0x16d @0xa
0x163…16f at000b = EOL // 0x16e @0xb
0x163…16f }
0x16f…17f 8ed6 0300 NR1$(I)="-"
0x16f…17f LineComalBin {
0x16f…17f ptr = 0x8ed6 // 0x16f @0x0
0x16f…17f lno = 0x012c // 0x171 @0x2
0x16f…17f at0004 = ╱4e╱N╱ // 0x173 @0x4
0x16f…17f at0005 = ╱52╱R╱ // 0x174 @0x5
0x16f…17f at0006 = ╱31╱1╱ // 0x175 @0x6
0x16f…17f at0007 = ╱ef╱$╱ // 0x176 @0x7
0x16f…17f at0008 = ╱ed╱(╱ // 0x177 @0x8
0x16f…17f at0009 = ╱49╱I╱ // 0x178 @0x9
0x16f…17f at000a = ╱ee╱)╱ // 0x179 @0xa
0x16f…17f at000b = ╱dc╱=╱ // 0x17a @0xb
0x16f…17f at000c = ╱22╱"╱ // 0x17b @0xc
0x16f…17f at000d = ╱2d╱-╱ // 0x17c @0xd
0x16f…17f at000e = ╱22╱"╱ // 0x17d @0xe
0x16f…17f at000f = EOL // 0x17e @0xf
0x16f…17f }
0x17f…185 8edc 0310 ELSE
0x17f…185 LineComalBin {
0x17f…185 ptr = 0x8edc // 0x17f @0x0
0x17f…185 lno = 0x0136 // 0x181 @0x2
0x17f…185 at0004 = ╱9a╱ ELSE ╱ // 0x183 @0x4
0x17f…185 at0005 = EOL // 0x184 @0x5
0x17f…185 }
0x185…1a9 8f00 0320 NR1$(I)=CHR(OK11 MOD 10+48)
0x185…1a9 LineComalBin {
0x185…1a9 ptr = 0x8f00 // 0x185 @0x0
0x185…1a9 lno = 0x0140 // 0x187 @0x2
0x185…1a9 at0004 = ╱4e╱N╱ // 0x189 @0x4
0x185…1a9 at0005 = ╱52╱R╱ // 0x18a @0x5
0x185…1a9 at0006 = ╱31╱1╱ // 0x18b @0x6
0x185…1a9 at0007 = ╱ef╱$╱ // 0x18c @0x7
0x185…1a9 at0008 = ╱ed╱(╱ // 0x18d @0x8
0x185…1a9 at0009 = ╱49╱I╱ // 0x18e @0x9
0x185…1a9 at000a = ╱ee╱)╱ // 0x18f @0xa
0x185…1a9 at000b = ╱dc╱=╱ // 0x190 @0xb
0x185…1a9 at000c = ╱cf╱CHR╱ // 0x191 @0xc
0x185…1a9 at000d = ╱ed╱(╱ // 0x192 @0xd
0x185…1a9 at000e = ╱4f╱O╱ // 0x193 @0xe
0x185…1a9 at000f = ╱4b╱K╱ // 0x194 @0xf
0x185…1a9 at0010 = ╱31╱1╱ // 0x195 @0x10
0x185…1a9 at0011 = ╱31╱1╱ // 0x196 @0x11
0x185…1a9 at0012 = ╱e8╱ MOD ╱ // 0x197 @0x12
0x185…1a9 at0013 = ╱31╱1╱ // 0x198 @0x13
0x185…1a9 at0014 = ╱30╱0╱ // 0x199 @0x14
0x185…1a9 at0015 = ╱fe0000a004╱ // 0x19a @0x15
0x185…1a9 at001a = ╱e2╱+╱ // 0x19f @0x1a
0x185…1a9 at001b = ╱34╱4╱ // 0x1a0 @0x1b
0x185…1a9 at001c = ╱38╱8╱ // 0x1a1 @0x1c
0x185…1a9 at001d = ╱fe0000c006╱ // 0x1a2 @0x1d
0x185…1a9 at0022 = ╱ee╱)╱ // 0x1a7 @0x22
0x185…1a9 at0023 = EOL // 0x1a8 @0x23
0x185…1a9 }
0x1a9…1bf 8f16 0330 OK11=OK11 DIV 10
0x1a9…1bf LineComalBin {
0x1a9…1bf ptr = 0x8f16 // 0x1a9 @0x0
0x1a9…1bf lno = 0x014a // 0x1ab @0x2
0x1a9…1bf at0004 = ╱4f╱O╱ // 0x1ad @0x4
0x1a9…1bf at0005 = ╱4b╱K╱ // 0x1ae @0x5
0x1a9…1bf at0006 = ╱31╱1╱ // 0x1af @0x6
0x1a9…1bf at0007 = ╱31╱1╱ // 0x1b0 @0x7
0x1a9…1bf at0008 = ╱dc╱=╱ // 0x1b1 @0x8
0x1a9…1bf at0009 = ╱4f╱O╱ // 0x1b2 @0x9
0x1a9…1bf at000a = ╱4b╱K╱ // 0x1b3 @0xa
0x1a9…1bf at000b = ╱31╱1╱ // 0x1b4 @0xb
0x1a9…1bf at000c = ╱31╱1╱ // 0x1b5 @0xc
0x1a9…1bf at000d = ╱e7╱ DIV ╱ // 0x1b6 @0xd
0x1a9…1bf at000e = ╱31╱1╱ // 0x1b7 @0xe
0x1a9…1bf at000f = ╱30╱0╱ // 0x1b8 @0xf
0x1a9…1bf at0010 = ╱fe0000a004╱ // 0x1b9 @0x10
0x1a9…1bf at0015 = EOL // 0x1be @0x15
0x1a9…1bf }
0x1bf…1c5 8f1c 0340 ENDIF
0x1bf…1c5 LineComalBin {
0x1bf…1c5 ptr = 0x8f1c // 0x1bf @0x0
0x1bf…1c5 lno = 0x0154 // 0x1c1 @0x2
0x1bf…1c5 at0004 = ╱9b╱ ENDIF ╱ // 0x1c3 @0x4
0x1bf…1c5 at0005 = EOL // 0x1c4 @0x5
0x1bf…1c5 }
0x1c5…1cc 8f23 0350 NEXT I
0x1c5…1cc LineComalBin {
0x1c5…1cc ptr = 0x8f23 // 0x1c5 @0x0
0x1c5…1cc lno = 0x015e // 0x1c7 @0x2
0x1c5…1cc at0004 = ╱84╱ NEXT ╱ // 0x1c9 @0x4
0x1c5…1cc at0005 = ╱49╱I╱ // 0x1ca @0x5
0x1c5…1cc at0006 = EOL // 0x1cb @0x6
0x1c5…1cc }
0x1cc…1d2 8f29 0360 ENDPROC
0x1cc…1d2 LineComalBin {
0x1cc…1d2 ptr = 0x8f29 // 0x1cc @0x0
0x1cc…1d2 lno = 0x0168 // 0x1ce @0x2
0x1cc…1d2 at0004 = ╱9f╱ ENDPROC ╱ // 0x1d0 @0x4
0x1cc…1d2 at0005 = EOL // 0x1d1 @0x5
0x1cc…1d2 }
0x1d2…1e3 8f3a 0900 PROC INLØNMOD(N)
0x1d2…1e3 LineComalBin {
0x1d2…1e3 ptr = 0x8f3a // 0x1d2 @0x0
0x1d2…1e3 lno = 0x0384 // 0x1d4 @0x2
0x1d2…1e3 at0004 = ╱9e╱ PROC ╱ // 0x1d6 @0x4
0x1d2…1e3 at0005 = ╱49╱I╱ // 0x1d7 @0x5
0x1d2…1e3 at0006 = ╱4e╱N╱ // 0x1d8 @0x6
0x1d2…1e3 at0007 = ╱4c╱L╱ // 0x1d9 @0x7
0x1d2…1e3 at0008 = ╱5c╱Ø╱ // 0x1da @0x8
0x1d2…1e3 at0009 = ╱4e╱N╱ // 0x1db @0x9
0x1d2…1e3 at000a = ╱4d╱M╱ // 0x1dc @0xa
0x1d2…1e3 at000b = ╱4f╱O╱ // 0x1dd @0xb
0x1d2…1e3 at000c = ╱44╱D╱ // 0x1de @0xc
0x1d2…1e3 at000d = ╱ed╱(╱ // 0x1df @0xd
0x1d2…1e3 at000e = ╱4e╱N╱ // 0x1e0 @0xe
0x1d2…1e3 at000f = ╱ee╱)╱ // 0x1e1 @0xf
0x1d2…1e3 at0010 = EOL // 0x1e2 @0x10
0x1d2…1e3 }
0x1e3…1fb 8f52 0902 GET FIL1$,G*N-E:POST1$
0x1e3…1fb LineComalBin {
0x1e3…1fb ptr = 0x8f52 // 0x1e3 @0x0
0x1e3…1fb lno = 0x0386 // 0x1e5 @0x2
0x1e3…1fb at0004 = ╱a9╱ GET ╱ // 0x1e7 @0x4
0x1e3…1fb at0005 = ╱46╱F╱ // 0x1e8 @0x5
0x1e3…1fb at0006 = ╱49╱I╱ // 0x1e9 @0x6
0x1e3…1fb at0007 = ╱4c╱L╱ // 0x1ea @0x7
0x1e3…1fb at0008 = ╱31╱1╱ // 0x1eb @0x8
0x1e3…1fb at0009 = ╱ef╱$╱ // 0x1ec @0x9
0x1e3…1fb at000a = ╱ec╱,╱ // 0x1ed @0xa
0x1e3…1fb at000b = ╱47╱G╱ // 0x1ee @0xb
0x1e3…1fb at000c = ╱e4╱*╱ // 0x1ef @0xc
0x1e3…1fb at000d = ╱4e╱N╱ // 0x1f0 @0xd
0x1e3…1fb at000e = ╱e3╱-╱ // 0x1f1 @0xe
0x1e3…1fb at000f = ╱45╱E╱ // 0x1f2 @0xf
0x1e3…1fb at0010 = ╱f0╱:╱ // 0x1f3 @0x10
0x1e3…1fb at0011 = ╱50╱P╱ // 0x1f4 @0x11
0x1e3…1fb at0012 = ╱4f╱O╱ // 0x1f5 @0x12
0x1e3…1fb at0013 = ╱53╱S╱ // 0x1f6 @0x13
0x1e3…1fb at0014 = ╱54╱T╱ // 0x1f7 @0x14
0x1e3…1fb at0015 = ╱31╱1╱ // 0x1f8 @0x15
0x1e3…1fb at0016 = ╱ef╱$╱ // 0x1f9 @0x16
0x1e3…1fb at0017 = EOL // 0x1fa @0x17
0x1e3…1fb }
0x1fb…233 8f8a 0904 GET FIL1$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD
0x1fb…233 LineComalBin {
0x1fb…233 ptr = 0x8f8a // 0x1fb @0x0
0x1fb…233 lno = 0x0388 // 0x1fd @0x2
0x1fb…233 at0004 = ╱a9╱ GET ╱ // 0x1ff @0x4
0x1fb…233 at0005 = ╱46╱F╱ // 0x200 @0x5
0x1fb…233 at0006 = ╱49╱I╱ // 0x201 @0x6
0x1fb…233 at0007 = ╱4c╱L╱ // 0x202 @0x7
0x1fb…233 at0008 = ╱31╱1╱ // 0x203 @0x8
0x1fb…233 at0009 = ╱ef╱$╱ // 0x204 @0x9
0x1fb…233 at000a = ╱ec╱,╱ // 0x205 @0xa
0x1fb…233 at000b = ╱47╱G╱ // 0x206 @0xb
0x1fb…233 at000c = ╱e4╱*╱ // 0x207 @0xc
0x1fb…233 at000d = ╱4e╱N╱ // 0x208 @0xd
0x1fb…233 at000e = ╱f0╱:╱ // 0x209 @0xe
0x1fb…233 at000f = ╱50╱P╱ // 0x20a @0xf
0x1fb…233 at0010 = ╱4f╱O╱ // 0x20b @0x10
0x1fb…233 at0011 = ╱53╱S╱ // 0x20c @0x11
0x1fb…233 at0012 = ╱54╱T╱ // 0x20d @0x12
0x1fb…233 at0013 = ╱32╱2╱ // 0x20e @0x13
0x1fb…233 at0014 = ╱ef╱$╱ // 0x20f @0x14
0x1fb…233 at0015 = ╱ec╱,╱ // 0x210 @0x15
0x1fb…233 at0016 = ╱43╱C╱ // 0x211 @0x16
0x1fb…233 at0017 = ╱31╱1╱ // 0x212 @0x17
0x1fb…233 at0018 = ╱ec╱,╱ // 0x213 @0x18
0x1fb…233 at0019 = ╱43╱C╱ // 0x214 @0x19
0x1fb…233 at001a = ╱32╱2╱ // 0x215 @0x1a
0x1fb…233 at001b = ╱ec╱,╱ // 0x216 @0x1b
0x1fb…233 at001c = ╱4c╱L╱ // 0x217 @0x1c
0x1fb…233 at001d = ╱54╱T╱ // 0x218 @0x1d
0x1fb…233 at001e = ╱ec╱,╱ // 0x219 @0x1e
0x1fb…233 at001f = ╱4c╱L╱ // 0x21a @0x1f
0x1fb…233 at0020 = ╱46╱F╱ // 0x21b @0x20
0x1fb…233 at0021 = ╱ec╱,╱ // 0x21c @0x21
0x1fb…233 at0022 = ╱4c╱L╱ // 0x21d @0x22
0x1fb…233 at0023 = ╱52╱R╱ // 0x21e @0x23
0x1fb…233 at0024 = ╱ec╱,╱ // 0x21f @0x24
0x1fb…233 at0025 = ╱4c╱L╱ // 0x220 @0x25
0x1fb…233 at0026 = ╱41╱A╱ // 0x221 @0x26
0x1fb…233 at0027 = ╱ec╱,╱ // 0x222 @0x27
0x1fb…233 at0028 = ╱52╱R╱ // 0x223 @0x28
0x1fb…233 at0029 = ╱50╱P╱ // 0x224 @0x29
0x1fb…233 at002a = ╱49╱I╱ // 0x225 @0x2a
0x1fb…233 at002b = ╱ec╱,╱ // 0x226 @0x2b
0x1fb…233 at002c = ╱4b╱K╱ // 0x227 @0x2c
0x1fb…233 at002d = ╱31╱1╱ // 0x228 @0x2d
0x1fb…233 at002e = ╱ec╱,╱ // 0x229 @0x2e
0x1fb…233 at002f = ╱4b╱K╱ // 0x22a @0x2f
0x1fb…233 at0030 = ╱32╱2╱ // 0x22b @0x30
0x1fb…233 at0031 = ╱ec╱,╱ // 0x22c @0x31
0x1fb…233 at0032 = ╱46╱F╱ // 0x22d @0x32
0x1fb…233 at0033 = ╱47╱G╱ // 0x22e @0x33
0x1fb…233 at0034 = ╱ec╱,╱ // 0x22f @0x34
0x1fb…233 at0035 = ╱46╱F╱ // 0x230 @0x35
0x1fb…233 at0036 = ╱44╱D╱ // 0x231 @0x36
0x1fb…233 at0037 = EOL // 0x232 @0x37
0x1fb…233 }
0x233…248 8f9f 0906 EXEC FEJL(E,N,FIL1$)
0x233…248 LineComalBin {
0x233…248 ptr = 0x8f9f // 0x233 @0x0
0x233…248 lno = 0x038a // 0x235 @0x2
0x233…248 at0004 = ╱9d╱ EXEC ╱ // 0x237 @0x4
0x233…248 at0005 = ╱46╱F╱ // 0x238 @0x5
0x233…248 at0006 = ╱45╱E╱ // 0x239 @0x6
0x233…248 at0007 = ╱4a╱J╱ // 0x23a @0x7
0x233…248 at0008 = ╱4c╱L╱ // 0x23b @0x8
0x233…248 at0009 = ╱ed╱(╱ // 0x23c @0x9
0x233…248 at000a = ╱45╱E╱ // 0x23d @0xa
0x233…248 at000b = ╱ec╱,╱ // 0x23e @0xb
0x233…248 at000c = ╱4e╱N╱ // 0x23f @0xc
0x233…248 at000d = ╱ec╱,╱ // 0x240 @0xd
0x233…248 at000e = ╱46╱F╱ // 0x241 @0xe
0x233…248 at000f = ╱49╱I╱ // 0x242 @0xf
0x233…248 at0010 = ╱4c╱L╱ // 0x243 @0x10
0x233…248 at0011 = ╱31╱1╱ // 0x244 @0x11
0x233…248 at0012 = ╱ef╱$╱ // 0x245 @0x12
0x233…248 at0013 = ╱ee╱)╱ // 0x246 @0x13
0x233…248 at0014 = EOL // 0x247 @0x14
0x233…248 }
0x248…24e 8fa5 0908 ENDPROC
0x248…24e LineComalBin {
0x248…24e ptr = 0x8fa5 // 0x248 @0x0
0x248…24e lno = 0x038c // 0x24a @0x2
0x248…24e at0004 = ╱9f╱ ENDPROC ╱ // 0x24c @0x4
0x248…24e at0005 = EOL // 0x24d @0x5
0x248…24e }
0x24e…272 8fc9 1000 DIM STARTPER$(8),DAD$(6)
0x24e…272 LineComalBin {
0x24e…272 ptr = 0x8fc9 // 0x24e @0x0
0x24e…272 lno = 0x03e8 // 0x250 @0x2
0x24e…272 at0004 = ╱87╱ DIM ╱ // 0x252 @0x4
0x24e…272 at0005 = ╱53╱S╱ // 0x253 @0x5
0x24e…272 at0006 = ╱54╱T╱ // 0x254 @0x6
0x24e…272 at0007 = ╱41╱A╱ // 0x255 @0x7
0x24e…272 at0008 = ╱52╱R╱ // 0x256 @0x8
0x24e…272 at0009 = ╱54╱T╱ // 0x257 @0x9
0x24e…272 at000a = ╱50╱P╱ // 0x258 @0xa
0x24e…272 at000b = ╱45╱E╱ // 0x259 @0xb
0x24e…272 at000c = ╱52╱R╱ // 0x25a @0xc
0x24e…272 at000d = ╱ef╱$╱ // 0x25b @0xd
0x24e…272 at000e = ╱ed╱(╱ // 0x25c @0xe
0x24e…272 at000f = ╱38╱8╱ // 0x25d @0xf
0x24e…272 at0010 = ╱fe00008004╱ // 0x25e @0x10
0x24e…272 at0015 = ╱ee╱)╱ // 0x263 @0x15
0x24e…272 at0016 = ╱ec╱,╱ // 0x264 @0x16
0x24e…272 at0017 = ╱44╱D╱ // 0x265 @0x17
0x24e…272 at0018 = ╱41╱A╱ // 0x266 @0x18
0x24e…272 at0019 = ╱44╱D╱ // 0x267 @0x19
0x24e…272 at001a = ╱ef╱$╱ // 0x268 @0x1a
0x24e…272 at001b = ╱ed╱(╱ // 0x269 @0x1b
0x24e…272 at001c = ╱36╱6╱ // 0x26a @0x1c
0x24e…272 at001d = ╱fe0000c003╱ // 0x26b @0x1d
0x24e…272 at0022 = ╱ee╱)╱ // 0x270 @0x22
0x24e…272 at0023 = EOL // 0x271 @0x23
0x24e…272 }
0x272…2af 9006 1010 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12)
0x272…2af LineComalBin {
0x272…2af ptr = 0x9006 // 0x272 @0x0
0x272…2af lno = 0x03f2 // 0x274 @0x2
0x272…2af at0004 = ╱87╱ DIM ╱ // 0x276 @0x4
0x272…2af at0005 = ╱52╱R╱ // 0x277 @0x5
0x272…2af at0006 = ╱45╱E╱ // 0x278 @0x6
0x272…2af at0007 = ╱53╱S╱ // 0x279 @0x7
0x272…2af at0008 = ╱ef╱$╱ // 0x27a @0x8
0x272…2af at0009 = ╱ed╱(╱ // 0x27b @0x9
0x272…2af at000a = ╱31╱1╱ // 0x27c @0xa
0x272…2af at000b = ╱35╱5╱ // 0x27d @0xb
0x272…2af at000c = ╱fe0000f004╱ // 0x27e @0xc
0x272…2af at0011 = ╱ee╱)╱ // 0x283 @0x11
0x272…2af at0012 = ╱ec╱,╱ // 0x284 @0x12
0x272…2af at0013 = ╱4f╱O╱ // 0x285 @0x13
0x272…2af at0014 = ╱50╱P╱ // 0x286 @0x14
0x272…2af at0015 = ╱31╱1╱ // 0x287 @0x15
0x272…2af at0016 = ╱ef╱$╱ // 0x288 @0x16
0x272…2af at0017 = ╱ed╱(╱ // 0x289 @0x17
0x272…2af at0018 = ╱31╱1╱ // 0x28a @0x18
0x272…2af at0019 = ╱32╱2╱ // 0x28b @0x19
0x272…2af at001a = ╱fe0000c004╱ // 0x28c @0x1a
0x272…2af at001f = ╱ee╱)╱ // 0x291 @0x1f
0x272…2af at0020 = ╱ec╱,╱ // 0x292 @0x20
0x272…2af at0021 = ╱4f╱O╱ // 0x293 @0x21
0x272…2af at0022 = ╱50╱P╱ // 0x294 @0x22
0x272…2af at0023 = ╱32╱2╱ // 0x295 @0x23
0x272…2af at0024 = ╱ef╱$╱ // 0x296 @0x24
0x272…2af at0025 = ╱ed╱(╱ // 0x297 @0x25
0x272…2af at0026 = ╱31╱1╱ // 0x298 @0x26
0x272…2af at0027 = ╱32╱2╱ // 0x299 @0x27
0x272…2af at0028 = ╱fe0000c004╱ // 0x29a @0x28
0x272…2af at002d = ╱ee╱)╱ // 0x29f @0x2d
0x272…2af at002e = ╱ec╱,╱ // 0x2a0 @0x2e
0x272…2af at002f = ╱54╱T╱ // 0x2a1 @0x2f
0x272…2af at0030 = ╱41╱A╱ // 0x2a2 @0x30
0x272…2af at0031 = ╱48╱H╱ // 0x2a3 @0x31
0x272…2af at0032 = ╱ef╱$╱ // 0x2a4 @0x32
0x272…2af at0033 = ╱ed╱(╱ // 0x2a5 @0x33
0x272…2af at0034 = ╱31╱1╱ // 0x2a6 @0x34
0x272…2af at0035 = ╱32╱2╱ // 0x2a7 @0x35
0x272…2af at0036 = ╱fe0000c004╱ // 0x2a8 @0x36
0x272…2af at003b = ╱ee╱)╱ // 0x2ad @0x3b
0x272…2af at003c = EOL // 0x2ae @0x3c
0x272…2af }
0x2af…2fc 9053 1020 DIM TOTAL$(100,12),FIL1$(16),POST1$(71),POST2$(27)
0x2af…2fc LineComalBin {
0x2af…2fc ptr = 0x9053 // 0x2af @0x0
0x2af…2fc lno = 0x03fc // 0x2b1 @0x2
0x2af…2fc at0004 = ╱87╱ DIM ╱ // 0x2b3 @0x4
0x2af…2fc at0005 = ╱54╱T╱ // 0x2b4 @0x5
0x2af…2fc at0006 = ╱4f╱O╱ // 0x2b5 @0x6
0x2af…2fc at0007 = ╱54╱T╱ // 0x2b6 @0x7
0x2af…2fc at0008 = ╱41╱A╱ // 0x2b7 @0x8
0x2af…2fc at0009 = ╱4c╱L╱ // 0x2b8 @0x9
0x2af…2fc at000a = ╱ef╱$╱ // 0x2b9 @0xa
0x2af…2fc at000b = ╱ed╱(╱ // 0x2ba @0xb
0x2af…2fc at000c = ╱31╱1╱ // 0x2bb @0xc
0x2af…2fc at000d = ╱30╱0╱ // 0x2bc @0xd
0x2af…2fc at000e = ╱30╱0╱ // 0x2bd @0xe
0x2af…2fc at000f = ╱fe0000c807╱ // 0x2be @0xf
0x2af…2fc at0014 = ╱ec╱,╱ // 0x2c3 @0x14
0x2af…2fc at0015 = ╱31╱1╱ // 0x2c4 @0x15
0x2af…2fc at0016 = ╱32╱2╱ // 0x2c5 @0x16
0x2af…2fc at0017 = ╱fe0000c004╱ // 0x2c6 @0x17
0x2af…2fc at001c = ╱ee╱)╱ // 0x2cb @0x1c
0x2af…2fc at001d = ╱ec╱,╱ // 0x2cc @0x1d
0x2af…2fc at001e = ╱46╱F╱ // 0x2cd @0x1e
0x2af…2fc at001f = ╱49╱I╱ // 0x2ce @0x1f
0x2af…2fc at0020 = ╱4c╱L╱ // 0x2cf @0x20
0x2af…2fc at0021 = ╱31╱1╱ // 0x2d0 @0x21
0x2af…2fc at0022 = ╱ef╱$╱ // 0x2d1 @0x22
0x2af…2fc at0023 = ╱ed╱(╱ // 0x2d2 @0x23
0x2af…2fc at0024 = ╱31╱1╱ // 0x2d3 @0x24
0x2af…2fc at0025 = ╱36╱6╱ // 0x2d4 @0x25
0x2af…2fc at0026 = ╱fe00008005╱ // 0x2d5 @0x26
0x2af…2fc at002b = ╱ee╱)╱ // 0x2da @0x2b
0x2af…2fc at002c = ╱ec╱,╱ // 0x2db @0x2c
0x2af…2fc at002d = ╱50╱P╱ // 0x2dc @0x2d
0x2af…2fc at002e = ╱4f╱O╱ // 0x2dd @0x2e
0x2af…2fc at002f = ╱53╱S╱ // 0x2de @0x2f
0x2af…2fc at0030 = ╱54╱T╱ // 0x2df @0x30
0x2af…2fc at0031 = ╱31╱1╱ // 0x2e0 @0x31
0x2af…2fc at0032 = ╱ef╱$╱ // 0x2e1 @0x32
0x2af…2fc at0033 = ╱ed╱(╱ // 0x2e2 @0x33
0x2af…2fc at0034 = ╱37╱7╱ // 0x2e3 @0x34
0x2af…2fc at0035 = ╱31╱1╱ // 0x2e4 @0x35
0x2af…2fc at0036 = ╱fe00008e07╱ // 0x2e5 @0x36
0x2af…2fc at003b = ╱ee╱)╱ // 0x2ea @0x3b
0x2af…2fc at003c = ╱ec╱,╱ // 0x2eb @0x3c
0x2af…2fc at003d = ╱50╱P╱ // 0x2ec @0x3d
0x2af…2fc at003e = ╱4f╱O╱ // 0x2ed @0x3e
0x2af…2fc at003f = ╱53╱S╱ // 0x2ee @0x3f
0x2af…2fc at0040 = ╱54╱T╱ // 0x2ef @0x40
0x2af…2fc at0041 = ╱32╱2╱ // 0x2f0 @0x41
0x2af…2fc at0042 = ╱ef╱$╱ // 0x2f1 @0x42
0x2af…2fc at0043 = ╱ed╱(╱ // 0x2f2 @0x43
0x2af…2fc at0044 = ╱32╱2╱ // 0x2f3 @0x44
0x2af…2fc at0045 = ╱37╱7╱ // 0x2f4 @0x45
0x2af…2fc at0046 = ╱fe0000d805╱ // 0x2f5 @0x46
0x2af…2fc at004b = ╱ee╱)╱ // 0x2fa @0x4b
0x2af…2fc at004c = EOL // 0x2fb @0x4c
0x2af…2fc }
0x2fc…35d 90b4 1030 DIM RESUL$(12),RESUL1$(12),POST3$(55),POST4$(34),FIL$(16),AB(100)
0x2fc…35d LineComalBin {
0x2fc…35d ptr = 0x90b4 // 0x2fc @0x0
0x2fc…35d lno = 0x0406 // 0x2fe @0x2
0x2fc…35d at0004 = ╱87╱ DIM ╱ // 0x300 @0x4
0x2fc…35d at0005 = ╱52╱R╱ // 0x301 @0x5
0x2fc…35d at0006 = ╱45╱E╱ // 0x302 @0x6
0x2fc…35d at0007 = ╱53╱S╱ // 0x303 @0x7
0x2fc…35d at0008 = ╱55╱U╱ // 0x304 @0x8
0x2fc…35d at0009 = ╱4c╱L╱ // 0x305 @0x9
0x2fc…35d at000a = ╱ef╱$╱ // 0x306 @0xa
0x2fc…35d at000b = ╱ed╱(╱ // 0x307 @0xb
0x2fc…35d at000c = ╱31╱1╱ // 0x308 @0xc
0x2fc…35d at000d = ╱32╱2╱ // 0x309 @0xd
0x2fc…35d at000e = ╱fe0000c004╱ // 0x30a @0xe
0x2fc…35d at0013 = ╱ee╱)╱ // 0x30f @0x13
0x2fc…35d at0014 = ╱ec╱,╱ // 0x310 @0x14
0x2fc…35d at0015 = ╱52╱R╱ // 0x311 @0x15
0x2fc…35d at0016 = ╱45╱E╱ // 0x312 @0x16
0x2fc…35d at0017 = ╱53╱S╱ // 0x313 @0x17
0x2fc…35d at0018 = ╱55╱U╱ // 0x314 @0x18
0x2fc…35d at0019 = ╱4c╱L╱ // 0x315 @0x19
0x2fc…35d at001a = ╱31╱1╱ // 0x316 @0x1a
0x2fc…35d at001b = ╱ef╱$╱ // 0x317 @0x1b
0x2fc…35d at001c = ╱ed╱(╱ // 0x318 @0x1c
0x2fc…35d at001d = ╱31╱1╱ // 0x319 @0x1d
0x2fc…35d at001e = ╱32╱2╱ // 0x31a @0x1e
0x2fc…35d at001f = ╱fe0000c004╱ // 0x31b @0x1f
0x2fc…35d at0024 = ╱ee╱)╱ // 0x320 @0x24
0x2fc…35d at0025 = ╱ec╱,╱ // 0x321 @0x25
0x2fc…35d at0026 = ╱50╱P╱ // 0x322 @0x26
0x2fc…35d at0027 = ╱4f╱O╱ // 0x323 @0x27
0x2fc…35d at0028 = ╱53╱S╱ // 0x324 @0x28
0x2fc…35d at0029 = ╱54╱T╱ // 0x325 @0x29
0x2fc…35d at002a = ╱33╱3╱ // 0x326 @0x2a
0x2fc…35d at002b = ╱ef╱$╱ // 0x327 @0x2b
0x2fc…35d at002c = ╱ed╱(╱ // 0x328 @0x2c
0x2fc…35d at002d = ╱35╱5╱ // 0x329 @0x2d
0x2fc…35d at002e = ╱35╱5╱ // 0x32a @0x2e
0x2fc…35d at002f = ╱fe0000dc06╱ // 0x32b @0x2f
0x2fc…35d at0034 = ╱ee╱)╱ // 0x330 @0x34
0x2fc…35d at0035 = ╱ec╱,╱ // 0x331 @0x35
0x2fc…35d at0036 = ╱50╱P╱ // 0x332 @0x36
0x2fc…35d at0037 = ╱4f╱O╱ // 0x333 @0x37
0x2fc…35d at0038 = ╱53╱S╱ // 0x334 @0x38
0x2fc…35d at0039 = ╱54╱T╱ // 0x335 @0x39
0x2fc…35d at003a = ╱34╱4╱ // 0x336 @0x3a
0x2fc…35d at003b = ╱ef╱$╱ // 0x337 @0x3b
0x2fc…35d at003c = ╱ed╱(╱ // 0x338 @0x3c
0x2fc…35d at003d = ╱33╱3╱ // 0x339 @0x3d
0x2fc…35d at003e = ╱34╱4╱ // 0x33a @0x3e
0x2fc…35d at003f = ╱fe00008806╱ // 0x33b @0x3f
0x2fc…35d at0044 = ╱ee╱)╱ // 0x340 @0x44
0x2fc…35d at0045 = ╱ec╱,╱ // 0x341 @0x45
0x2fc…35d at0046 = ╱46╱F╱ // 0x342 @0x46
0x2fc…35d at0047 = ╱49╱I╱ // 0x343 @0x47
0x2fc…35d at0048 = ╱4c╱L╱ // 0x344 @0x48
0x2fc…35d at0049 = ╱ef╱$╱ // 0x345 @0x49
0x2fc…35d at004a = ╱ed╱(╱ // 0x346 @0x4a
0x2fc…35d at004b = ╱31╱1╱ // 0x347 @0x4b
0x2fc…35d at004c = ╱36╱6╱ // 0x348 @0x4c
0x2fc…35d at004d = ╱fe00008005╱ // 0x349 @0x4d
0x2fc…35d at0052 = ╱ee╱)╱ // 0x34e @0x52
0x2fc…35d at0053 = ╱ec╱,╱ // 0x34f @0x53
0x2fc…35d at0054 = ╱41╱A╱ // 0x350 @0x54
0x2fc…35d at0055 = ╱42╱B╱ // 0x351 @0x55
0x2fc…35d at0056 = ╱ed╱(╱ // 0x352 @0x56
0x2fc…35d at0057 = ╱31╱1╱ // 0x353 @0x57
0x2fc…35d at0058 = ╱30╱0╱ // 0x354 @0x58
0x2fc…35d at0059 = ╱30╱0╱ // 0x355 @0x59
0x2fc…35d at005a = ╱fe0000c807╱ // 0x356 @0x5a
0x2fc…35d at005f = ╱ee╱)╱ // 0x35b @0x5f
0x2fc…35d at0060 = EOL // 0x35c @0x60
0x2fc…35d }
0x35d…370 90c7 1050 DIM MF5$(16)
0x35d…370 LineComalBin {
0x35d…370 ptr = 0x90c7 // 0x35d @0x0
0x35d…370 lno = 0x041a // 0x35f @0x2
0x35d…370 at0004 = ╱87╱ DIM ╱ // 0x361 @0x4
0x35d…370 at0005 = ╱4d╱M╱ // 0x362 @0x5
0x35d…370 at0006 = ╱46╱F╱ // 0x363 @0x6
0x35d…370 at0007 = ╱35╱5╱ // 0x364 @0x7
0x35d…370 at0008 = ╱ef╱$╱ // 0x365 @0x8
0x35d…370 at0009 = ╱ed╱(╱ // 0x366 @0x9
0x35d…370 at000a = ╱31╱1╱ // 0x367 @0xa
0x35d…370 at000b = ╱36╱6╱ // 0x368 @0xb
0x35d…370 at000c = ╱fe00008005╱ // 0x369 @0xc
0x35d…370 at0011 = ╱ee╱)╱ // 0x36e @0x11
0x35d…370 at0012 = EOL // 0x36f @0x12
0x35d…370 }
0x370…388 90df 1060 TAH$=" 0+"
0x370…388 LineComalBin {
0x370…388 ptr = 0x90df // 0x370 @0x0
0x370…388 lno = 0x0424 // 0x372 @0x2
0x370…388 at0004 = ╱54╱T╱ // 0x374 @0x4
0x370…388 at0005 = ╱41╱A╱ // 0x375 @0x5
0x370…388 at0006 = ╱48╱H╱ // 0x376 @0x6
0x370…388 at0007 = ╱ef╱$╱ // 0x377 @0x7
0x370…388 at0008 = ╱dc╱=╱ // 0x378 @0x8
0x370…388 at0009 = ╱22╱"╱ // 0x379 @0x9
0x370…388 at000a = ╱20╱…╱ // 0x37a @0xa
0x370…388 at000b = ╱20╱…╱ // 0x37b @0xb
0x370…388 at000c = ╱20╱…╱ // 0x37c @0xc
0x370…388 at000d = ╱20╱…╱ // 0x37d @0xd
0x370…388 at000e = ╱20╱…╱ // 0x37e @0xe
0x370…388 at000f = ╱20╱…╱ // 0x37f @0xf
0x370…388 at0010 = ╱20╱…╱ // 0x380 @0x10
0x370…388 at0011 = ╱20╱…╱ // 0x381 @0x11
0x370…388 at0012 = ╱20╱…╱ // 0x382 @0x12
0x370…388 at0013 = ╱20╱…╱ // 0x383 @0x13
0x370…388 at0014 = ╱30╱0╱ // 0x384 @0x14
0x370…388 at0015 = ╱2b╱+╱ // 0x385 @0x15
0x370…388 at0016 = ╱22╱"╱ // 0x386 @0x16
0x370…388 at0017 = EOL // 0x387 @0x17
0x370…388 }
0x388…39a 90f1 1070 DIM BL$(79)
0x388…39a LineComalBin {
0x388…39a ptr = 0x90f1 // 0x388 @0x0
0x388…39a lno = 0x042e // 0x38a @0x2
0x388…39a at0004 = ╱87╱ DIM ╱ // 0x38c @0x4
0x388…39a at0005 = ╱42╱B╱ // 0x38d @0x5
0x388…39a at0006 = ╱4c╱L╱ // 0x38e @0x6
0x388…39a at0007 = ╱ef╱$╱ // 0x38f @0x7
0x388…39a at0008 = ╱ed╱(╱ // 0x390 @0x8
0x388…39a at0009 = ╱37╱7╱ // 0x391 @0x9
0x388…39a at000a = ╱39╱9╱ // 0x392 @0xa
0x388…39a at000b = ╱fe00009e07╱ // 0x393 @0xb
0x388…39a at0010 = ╱ee╱)╱ // 0x398 @0x10
0x388…39a at0011 = EOL // 0x399 @0x11
0x388…39a }
0x39a…3ab 9102 1080 FOR I=E TO 79
0x39a…3ab LineComalBin {
0x39a…3ab ptr = 0x9102 // 0x39a @0x0
0x39a…3ab lno = 0x0438 // 0x39c @0x2
0x39a…3ab at0004 = ╱83╱ FOR ╱ // 0x39e @0x4
0x39a…3ab at0005 = ╱49╱I╱ // 0x39f @0x5
0x39a…3ab at0006 = ╱dc╱=╱ // 0x3a0 @0x6
0x39a…3ab at0007 = ╱45╱E╱ // 0x3a1 @0x7
0x39a…3ab at0008 = ╱b7╱ TO ╱ // 0x3a2 @0x8
0x39a…3ab at0009 = ╱37╱7╱ // 0x3a3 @0x9
0x39a…3ab at000a = ╱39╱9╱ // 0x3a4 @0xa
0x39a…3ab at000b = ╱fe00009e07╱ // 0x3a5 @0xb
0x39a…3ab at0010 = EOL // 0x3aa @0x10
0x39a…3ab }
0x3ab…3bb 9112 1090 BL$=BL$+" "
0x3ab…3bb LineComalBin {
0x3ab…3bb ptr = 0x9112 // 0x3ab @0x0
0x3ab…3bb lno = 0x0442 // 0x3ad @0x2
0x3ab…3bb at0004 = ╱42╱B╱ // 0x3af @0x4
0x3ab…3bb at0005 = ╱4c╱L╱ // 0x3b0 @0x5
0x3ab…3bb at0006 = ╱ef╱$╱ // 0x3b1 @0x6
0x3ab…3bb at0007 = ╱dc╱=╱ // 0x3b2 @0x7
0x3ab…3bb at0008 = ╱42╱B╱ // 0x3b3 @0x8
0x3ab…3bb at0009 = ╱4c╱L╱ // 0x3b4 @0x9
0x3ab…3bb at000a = ╱ef╱$╱ // 0x3b5 @0xa
0x3ab…3bb at000b = ╱f1╱+╱ // 0x3b6 @0xb
0x3ab…3bb at000c = ╱22╱"╱ // 0x3b7 @0xc
0x3ab…3bb at000d = ╱20╱…╱ // 0x3b8 @0xd
0x3ab…3bb at000e = ╱22╱"╱ // 0x3b9 @0xe
0x3ab…3bb at000f = EOL // 0x3ba @0xf
0x3ab…3bb }
0x3bb…3c2 9119 1100 NEXT I
0x3bb…3c2 LineComalBin {
0x3bb…3c2 ptr = 0x9119 // 0x3bb @0x0
0x3bb…3c2 lno = 0x044c // 0x3bd @0x2
0x3bb…3c2 at0004 = ╱84╱ NEXT ╱ // 0x3bf @0x4
0x3bb…3c2 at0005 = ╱49╱I╱ // 0x3c0 @0x5
0x3bb…3c2 at0006 = EOL // 0x3c1 @0x6
0x3bb…3c2 }
0x3c2…3da 9131 1110 PROC CALC(AR3,B1,B2,ES)
0x3c2…3da LineComalBin {
0x3c2…3da ptr = 0x9131 // 0x3c2 @0x0
0x3c2…3da lno = 0x0456 // 0x3c4 @0x2
0x3c2…3da at0004 = ╱9e╱ PROC ╱ // 0x3c6 @0x4
0x3c2…3da at0005 = ╱43╱C╱ // 0x3c7 @0x5
0x3c2…3da at0006 = ╱41╱A╱ // 0x3c8 @0x6
0x3c2…3da at0007 = ╱4c╱L╱ // 0x3c9 @0x7
0x3c2…3da at0008 = ╱43╱C╱ // 0x3ca @0x8
0x3c2…3da at0009 = ╱ed╱(╱ // 0x3cb @0x9
0x3c2…3da at000a = ╱41╱A╱ // 0x3cc @0xa
0x3c2…3da at000b = ╱52╱R╱ // 0x3cd @0xb
0x3c2…3da at000c = ╱33╱3╱ // 0x3ce @0xc
0x3c2…3da at000d = ╱ec╱,╱ // 0x3cf @0xd
0x3c2…3da at000e = ╱42╱B╱ // 0x3d0 @0xe
0x3c2…3da at000f = ╱31╱1╱ // 0x3d1 @0xf
0x3c2…3da at0010 = ╱ec╱,╱ // 0x3d2 @0x10
0x3c2…3da at0011 = ╱42╱B╱ // 0x3d3 @0x11
0x3c2…3da at0012 = ╱32╱2╱ // 0x3d4 @0x12
0x3c2…3da at0013 = ╱ec╱,╱ // 0x3d5 @0x13
0x3c2…3da at0014 = ╱45╱E╱ // 0x3d6 @0x14
0x3c2…3da at0015 = ╱53╱S╱ // 0x3d7 @0x15
0x3c2…3da at0016 = ╱ee╱)╱ // 0x3d8 @0x16
0x3c2…3da at0017 = EOL // 0x3d9 @0x17
0x3c2…3da }
0x3da…421 9178 1120 RES$=ES$;OP1$=B1$;OP2$=B2$;SI=B;FLAG=B;ART=AR3-6*(AR3>5)
0x3da…421 LineComalBin {
0x3da…421 ptr = 0x9178 // 0x3da @0x0
0x3da…421 lno = 0x0460 // 0x3dc @0x2
0x3da…421 at0004 = ╱52╱R╱ // 0x3de @0x4
0x3da…421 at0005 = ╱45╱E╱ // 0x3df @0x5
0x3da…421 at0006 = ╱53╱S╱ // 0x3e0 @0x6
0x3da…421 at0007 = ╱ef╱$╱ // 0x3e1 @0x7
0x3da…421 at0008 = ╱dc╱=╱ // 0x3e2 @0x8
0x3da…421 at0009 = ╱45╱E╱ // 0x3e3 @0x9
0x3da…421 at000a = ╱53╱S╱ // 0x3e4 @0xa
0x3da…421 at000b = ╱ef╱$╱ // 0x3e5 @0xb
0x3da…421 at000c = ╱eb╱;╱ // 0x3e6 @0xc
0x3da…421 at000d = ╱4f╱O╱ // 0x3e7 @0xd
0x3da…421 at000e = ╱50╱P╱ // 0x3e8 @0xe
0x3da…421 at000f = ╱31╱1╱ // 0x3e9 @0xf
0x3da…421 at0010 = ╱ef╱$╱ // 0x3ea @0x10
0x3da…421 at0011 = ╱dc╱=╱ // 0x3eb @0x11
0x3da…421 at0012 = ╱42╱B╱ // 0x3ec @0x12
0x3da…421 at0013 = ╱31╱1╱ // 0x3ed @0x13
0x3da…421 at0014 = ╱ef╱$╱ // 0x3ee @0x14
0x3da…421 at0015 = ╱eb╱;╱ // 0x3ef @0x15
0x3da…421 at0016 = ╱4f╱O╱ // 0x3f0 @0x16
0x3da…421 at0017 = ╱50╱P╱ // 0x3f1 @0x17
0x3da…421 at0018 = ╱32╱2╱ // 0x3f2 @0x18
0x3da…421 at0019 = ╱ef╱$╱ // 0x3f3 @0x19
0x3da…421 at001a = ╱dc╱=╱ // 0x3f4 @0x1a
0x3da…421 at001b = ╱42╱B╱ // 0x3f5 @0x1b
0x3da…421 at001c = ╱32╱2╱ // 0x3f6 @0x1c
0x3da…421 at001d = ╱ef╱$╱ // 0x3f7 @0x1d
0x3da…421 at001e = ╱eb╱;╱ // 0x3f8 @0x1e
0x3da…421 at001f = ╱53╱S╱ // 0x3f9 @0x1f
0x3da…421 at0020 = ╱49╱I╱ // 0x3fa @0x20
0x3da…421 at0021 = ╱dc╱=╱ // 0x3fb @0x21
0x3da…421 at0022 = ╱42╱B╱ // 0x3fc @0x22
0x3da…421 at0023 = ╱eb╱;╱ // 0x3fd @0x23
0x3da…421 at0024 = ╱46╱F╱ // 0x3fe @0x24
0x3da…421 at0025 = ╱4c╱L╱ // 0x3ff @0x25
0x3da…421 at0026 = ╱41╱A╱ // 0x400 @0x26
0x3da…421 at0027 = ╱47╱G╱ // 0x401 @0x27
0x3da…421 at0028 = ╱dc╱=╱ // 0x402 @0x28
0x3da…421 at0029 = ╱42╱B╱ // 0x403 @0x29
0x3da…421 at002a = ╱eb╱;╱ // 0x404 @0x2a
0x3da…421 at002b = ╱41╱A╱ // 0x405 @0x2b
0x3da…421 at002c = ╱52╱R╱ // 0x406 @0x2c
0x3da…421 at002d = ╱54╱T╱ // 0x407 @0x2d
0x3da…421 at002e = ╱dc╱=╱ // 0x408 @0x2e
0x3da…421 at002f = ╱41╱A╱ // 0x409 @0x2f
0x3da…421 at0030 = ╱52╱R╱ // 0x40a @0x30
0x3da…421 at0031 = ╱33╱3╱ // 0x40b @0x31
0x3da…421 at0032 = ╱e3╱-╱ // 0x40c @0x32
0x3da…421 at0033 = ╱36╱6╱ // 0x40d @0x33
0x3da…421 at0034 = ╱fe0000c003╱ // 0x40e @0x34
0x3da…421 at0039 = ╱e4╱*╱ // 0x413 @0x39
0x3da…421 at003a = ╱ed╱(╱ // 0x414 @0x3a
0x3da…421 at003b = ╱41╱A╱ // 0x415 @0x3b
0x3da…421 at003c = ╱52╱R╱ // 0x416 @0x3c
0x3da…421 at003d = ╱33╱3╱ // 0x417 @0x3d
0x3da…421 at003e = ╱de╱>╱ // 0x418 @0x3e
0x3da…421 at003f = ╱35╱5╱ // 0x419 @0x3f
0x3da…421 at0040 = ╱fe0000a003╱ // 0x41a @0x40
0x3da…421 at0045 = ╱ee╱)╱ // 0x41f @0x45
0x3da…421 at0046 = EOL // 0x420 @0x46
0x3da…421 }
0x421…437 918e 1130 CALL "P641210:REGN"
0x421…437 LineComalBin {
0x421…437 ptr = 0x918e // 0x421 @0x0
0x421…437 lno = 0x046a // 0x423 @0x2
0x421…437 at0004 = ╱adeeff╱ CALL ╱ // 0x425 @0x4
0x421…437 at0007 = ╱22╱"╱ // 0x428 @0x7
0x421…437 at0008 = ╱50╱P╱ // 0x429 @0x8
0x421…437 at0009 = ╱36╱6╱ // 0x42a @0x9
0x421…437 at000a = ╱34╱4╱ // 0x42b @0xa
0x421…437 at000b = ╱31╱1╱ // 0x42c @0xb
0x421…437 at000c = ╱32╱2╱ // 0x42d @0xc
0x421…437 at000d = ╱31╱1╱ // 0x42e @0xd
0x421…437 at000e = ╱30╱0╱ // 0x42f @0xe
0x421…437 at000f = ╱3a╱:╱ // 0x430 @0xf
0x421…437 at0010 = ╱52╱R╱ // 0x431 @0x10
0x421…437 at0011 = ╱45╱E╱ // 0x432 @0x11
0x421…437 at0012 = ╱47╱G╱ // 0x433 @0x12
0x421…437 at0013 = ╱4e╱N╱ // 0x434 @0x13
0x421…437 at0014 = ╱22╱"╱ // 0x435 @0x14
0x421…437 at0015 = EOL // 0x436 @0x15
0x421…437 }
0x437…448 919f 1140 IF AR3<6 THEN
0x437…448 LineComalBin {
0x437…448 ptr = 0x919f // 0x437 @0x0
0x437…448 lno = 0x0474 // 0x439 @0x2
0x437…448 at0004 = ╱9c╱ IF ╱ // 0x43b @0x4
0x437…448 at0005 = ╱41╱A╱ // 0x43c @0x5
0x437…448 at0006 = ╱52╱R╱ // 0x43d @0x6
0x437…448 at0007 = ╱33╱3╱ // 0x43e @0x7
0x437…448 at0008 = ╱dd╱<╱ // 0x43f @0x8
0x437…448 at0009 = ╱36╱6╱ // 0x440 @0x9
0x437…448 at000a = ╱fe0000c003╱ // 0x441 @0xa
0x437…448 at000f = ╱b6╱ THEN ╱ // 0x446 @0xf
0x437…448 at0010 = EOL // 0x447 @0x10
0x437…448 }
0x448…454 91ab 1150 IF FLAG THEN STOP
0x448…454 LineComalBin {
0x448…454 ptr = 0x91ab // 0x448 @0x0
0x448…454 lno = 0x047e // 0x44a @0x2
0x448…454 at0004 = ╱82╱ IF ╱ // 0x44c @0x4
0x448…454 at0005 = ╱46╱F╱ // 0x44d @0x5
0x448…454 at0006 = ╱4c╱L╱ // 0x44e @0x6
0x448…454 at0007 = ╱41╱A╱ // 0x44f @0x7
0x448…454 at0008 = ╱47╱G╱ // 0x450 @0x8
0x448…454 at0009 = ╱b6╱ THEN ╱ // 0x451 @0x9
0x448…454 at000a = ╱8d╱ STOP ╱ // 0x452 @0xa
0x448…454 at000b = EOL // 0x453 @0xb
0x448…454 }
0x454…45a 91b1 1160 ENDIF
0x454…45a LineComalBin {
0x454…45a ptr = 0x91b1 // 0x454 @0x0
0x454…45a lno = 0x0488 // 0x456 @0x2
0x454…45a at0004 = ╱9b╱ ENDIF ╱ // 0x458 @0x4
0x454…45a at0005 = EOL // 0x459 @0x5
0x454…45a }
0x45a…467 91be 1170 ES$=RES$
0x45a…467 LineComalBin {
0x45a…467 ptr = 0x91be // 0x45a @0x0
0x45a…467 lno = 0x0492 // 0x45c @0x2
0x45a…467 at0004 = ╱45╱E╱ // 0x45e @0x4
0x45a…467 at0005 = ╱53╱S╱ // 0x45f @0x5
0x45a…467 at0006 = ╱ef╱$╱ // 0x460 @0x6
0x45a…467 at0007 = ╱dc╱=╱ // 0x461 @0x7
0x45a…467 at0008 = ╱52╱R╱ // 0x462 @0x8
0x45a…467 at0009 = ╱45╱E╱ // 0x463 @0x9
0x45a…467 at000a = ╱53╱S╱ // 0x464 @0xa
0x45a…467 at000b = ╱ef╱$╱ // 0x465 @0xb
0x45a…467 at000c = EOL // 0x466 @0xc
0x45a…467 }
0x467…46d 91c4 1180 ENDPROC
0x467…46d LineComalBin {
0x467…46d ptr = 0x91c4 // 0x467 @0x0
0x467…46d lno = 0x049c // 0x469 @0x2
0x467…46d at0004 = ╱9f╱ ENDPROC ╱ // 0x46b @0x4
0x467…46d at0005 = EOL // 0x46c @0x5
0x467…46d }
0x46d…481 91d8 1580 PROC FEJL(P1,P2,P3)
0x46d…481 LineComalBin {
0x46d…481 ptr = 0x91d8 // 0x46d @0x0
0x46d…481 lno = 0x062c // 0x46f @0x2
0x46d…481 at0004 = ╱9e╱ PROC ╱ // 0x471 @0x4
0x46d…481 at0005 = ╱46╱F╱ // 0x472 @0x5
0x46d…481 at0006 = ╱45╱E╱ // 0x473 @0x6
0x46d…481 at0007 = ╱4a╱J╱ // 0x474 @0x7
0x46d…481 at0008 = ╱4c╱L╱ // 0x475 @0x8
0x46d…481 at0009 = ╱ed╱(╱ // 0x476 @0x9
0x46d…481 at000a = ╱50╱P╱ // 0x477 @0xa
0x46d…481 at000b = ╱31╱1╱ // 0x478 @0xb
0x46d…481 at000c = ╱ec╱,╱ // 0x479 @0xc
0x46d…481 at000d = ╱50╱P╱ // 0x47a @0xd
0x46d…481 at000e = ╱32╱2╱ // 0x47b @0xe
0x46d…481 at000f = ╱ec╱,╱ // 0x47c @0xf
0x46d…481 at0010 = ╱50╱P╱ // 0x47d @0x10
0x46d…481 at0011 = ╱33╱3╱ // 0x47e @0x11
0x46d…481 at0012 = ╱ee╱)╱ // 0x47f @0x12
0x46d…481 at0013 = EOL // 0x480 @0x13
0x46d…481 }
0x481…490 91e7 1590 IF STATUS(P3$)<>B THEN
0x481…490 LineComalBin {
0x481…490 ptr = 0x91e7 // 0x481 @0x0
0x481…490 lno = 0x0636 // 0x483 @0x2
0x481…490 at0004 = ╱9c╱ IF ╱ // 0x485 @0x4
0x481…490 at0005 = ╱ce╱STATUS╱ // 0x486 @0x5
0x481…490 at0006 = ╱ed╱(╱ // 0x487 @0x6
0x481…490 at0007 = ╱50╱P╱ // 0x488 @0x7
0x481…490 at0008 = ╱33╱3╱ // 0x489 @0x8
0x481…490 at0009 = ╱ef╱$╱ // 0x48a @0x9
0x481…490 at000a = ╱ee╱)╱ // 0x48b @0xa
0x481…490 at000b = ╱e1╱<>╱ // 0x48c @0xb
0x481…490 at000c = ╱42╱B╱ // 0x48d @0xc
0x481…490 at000d = ╱b6╱ THEN ╱ // 0x48e @0xd
0x481…490 at000e = EOL // 0x48f @0xe
0x481…490 }
0x490…497 91ee 1600 OUTPUT T
0x490…497 LineComalBin {
0x490…497 ptr = 0x91ee // 0x490 @0x0
0x490…497 lno = 0x0640 // 0x492 @0x2
0x490…497 at0004 = ╱a5╱ OUTPUT ╱ // 0x494 @0x4
0x490…497 at0005 = ╱54╱T╱ // 0x495 @0x5
0x490…497 at0006 = EOL // 0x496 @0x6
0x490…497 }
0x497…4b9 9210 1610 PRINT "FIL-FEJL ";P3$;STATUS(P3$),P1;P2
0x497…4b9 LineComalBin {
0x497…4b9 ptr = 0x9210 // 0x497 @0x0
0x497…4b9 lno = 0x064a // 0x499 @0x2
0x497…4b9 at0004 = ╱92╱ PRINT ╱ // 0x49b @0x4
0x497…4b9 at0005 = ╱22╱"╱ // 0x49c @0x5
0x497…4b9 at0006 = ╱46╱F╱ // 0x49d @0x6
0x497…4b9 at0007 = ╱49╱I╱ // 0x49e @0x7
0x497…4b9 at0008 = ╱4c╱L╱ // 0x49f @0x8
0x497…4b9 at0009 = ╱2d╱-╱ // 0x4a0 @0x9
0x497…4b9 at000a = ╱46╱F╱ // 0x4a1 @0xa
0x497…4b9 at000b = ╱45╱E╱ // 0x4a2 @0xb
0x497…4b9 at000c = ╱4a╱J╱ // 0x4a3 @0xc
0x497…4b9 at000d = ╱4c╱L╱ // 0x4a4 @0xd
0x497…4b9 at000e = ╱20╱…╱ // 0x4a5 @0xe
0x497…4b9 at000f = ╱22╱"╱ // 0x4a6 @0xf
0x497…4b9 at0010 = ╱eb╱;╱ // 0x4a7 @0x10
0x497…4b9 at0011 = ╱50╱P╱ // 0x4a8 @0x11
0x497…4b9 at0012 = ╱33╱3╱ // 0x4a9 @0x12
0x497…4b9 at0013 = ╱ef╱$╱ // 0x4aa @0x13
0x497…4b9 at0014 = ╱eb╱;╱ // 0x4ab @0x14
0x497…4b9 at0015 = ╱ce╱STATUS╱ // 0x4ac @0x15
0x497…4b9 at0016 = ╱ed╱(╱ // 0x4ad @0x16
0x497…4b9 at0017 = ╱50╱P╱ // 0x4ae @0x17
0x497…4b9 at0018 = ╱33╱3╱ // 0x4af @0x18
0x497…4b9 at0019 = ╱ef╱$╱ // 0x4b0 @0x19
0x497…4b9 at001a = ╱ee╱)╱ // 0x4b1 @0x1a
0x497…4b9 at001b = ╱ec╱,╱ // 0x4b2 @0x1b
0x497…4b9 at001c = ╱50╱P╱ // 0x4b3 @0x1c
0x497…4b9 at001d = ╱31╱1╱ // 0x4b4 @0x1d
0x497…4b9 at001e = ╱eb╱;╱ // 0x4b5 @0x1e
0x497…4b9 at001f = ╱50╱P╱ // 0x4b6 @0x1f
0x497…4b9 at0020 = ╱32╱2╱ // 0x4b7 @0x20
0x497…4b9 at0021 = EOL // 0x4b8 @0x21
0x497…4b9 }
0x4b9…4bf 9216 1620 STOP
0x4b9…4bf LineComalBin {
0x4b9…4bf ptr = 0x9216 // 0x4b9 @0x0
0x4b9…4bf lno = 0x0654 // 0x4bb @0x2
0x4b9…4bf at0004 = ╱8d╱ STOP ╱ // 0x4bd @0x4
0x4b9…4bf at0005 = EOL // 0x4be @0x5
0x4b9…4bf }
0x4bf…4c5 921c 1630 ENDIF
0x4bf…4c5 LineComalBin {
0x4bf…4c5 ptr = 0x921c // 0x4bf @0x0
0x4bf…4c5 lno = 0x065e // 0x4c1 @0x2
0x4bf…4c5 at0004 = ╱9b╱ ENDIF ╱ // 0x4c3 @0x4
0x4bf…4c5 at0005 = EOL // 0x4c4 @0x5
0x4bf…4c5 }
0x4c5…4cb 9222 1640 ENDPROC
0x4c5…4cb LineComalBin {
0x4c5…4cb ptr = 0x9222 // 0x4c5 @0x0
0x4c5…4cb lno = 0x0668 // 0x4c7 @0x2
0x4c5…4cb at0004 = ╱9f╱ ENDPROC ╱ // 0x4c9 @0x4
0x4c5…4cb at0005 = EOL // 0x4ca @0x5
0x4c5…4cb }
0x4cb…4e7 923e 1650 FIL$="P641220:VIRKKART"
0x4cb…4e7 LineComalBin {
0x4cb…4e7 ptr = 0x923e // 0x4cb @0x0
0x4cb…4e7 lno = 0x0672 // 0x4cd @0x2
0x4cb…4e7 at0004 = ╱46╱F╱ // 0x4cf @0x4
0x4cb…4e7 at0005 = ╱49╱I╱ // 0x4d0 @0x5
0x4cb…4e7 at0006 = ╱4c╱L╱ // 0x4d1 @0x6
0x4cb…4e7 at0007 = ╱ef╱$╱ // 0x4d2 @0x7
0x4cb…4e7 at0008 = ╱dc╱=╱ // 0x4d3 @0x8
0x4cb…4e7 at0009 = ╱22╱"╱ // 0x4d4 @0x9
0x4cb…4e7 at000a = ╱50╱P╱ // 0x4d5 @0xa
0x4cb…4e7 at000b = ╱36╱6╱ // 0x4d6 @0xb
0x4cb…4e7 at000c = ╱34╱4╱ // 0x4d7 @0xc
0x4cb…4e7 at000d = ╱31╱1╱ // 0x4d8 @0xd
0x4cb…4e7 at000e = ╱32╱2╱ // 0x4d9 @0xe
0x4cb…4e7 at000f = ╱32╱2╱ // 0x4da @0xf
0x4cb…4e7 at0010 = ╱30╱0╱ // 0x4db @0x10
0x4cb…4e7 at0011 = ╱3a╱:╱ // 0x4dc @0x11
0x4cb…4e7 at0012 = ╱56╱V╱ // 0x4dd @0x12
0x4cb…4e7 at0013 = ╱49╱I╱ // 0x4de @0x13
0x4cb…4e7 at0014 = ╱52╱R╱ // 0x4df @0x14
0x4cb…4e7 at0015 = ╱4b╱K╱ // 0x4e0 @0x15
0x4cb…4e7 at0016 = ╱4b╱K╱ // 0x4e1 @0x16
0x4cb…4e7 at0017 = ╱41╱A╱ // 0x4e2 @0x17
0x4cb…4e7 at0018 = ╱52╱R╱ // 0x4e3 @0x18
0x4cb…4e7 at0019 = ╱54╱T╱ // 0x4e4 @0x19
0x4cb…4e7 at001a = ╱22╱"╱ // 0x4e5 @0x1a
0x4cb…4e7 at001b = EOL // 0x4e6 @0x1b
0x4cb…4e7 }
0x4e7…4f4 924b 1660 EXEC INDVIRK
0x4e7…4f4 LineComalBin {
0x4e7…4f4 ptr = 0x924b // 0x4e7 @0x0
0x4e7…4f4 lno = 0x067c // 0x4e9 @0x2
0x4e7…4f4 at0004 = ╱9d╱ EXEC ╱ // 0x4eb @0x4
0x4e7…4f4 at0005 = ╱49╱I╱ // 0x4ec @0x5
0x4e7…4f4 at0006 = ╱4e╱N╱ // 0x4ed @0x6
0x4e7…4f4 at0007 = ╱44╱D╱ // 0x4ee @0x7
0x4e7…4f4 at0008 = ╱56╱V╱ // 0x4ef @0x8
0x4e7…4f4 at0009 = ╱49╱I╱ // 0x4f0 @0x9
0x4e7…4f4 at000a = ╱52╱R╱ // 0x4f1 @0xa
0x4e7…4f4 at000b = ╱4b╱K╱ // 0x4f2 @0xb
0x4e7…4f4 at000c = EOL // 0x4f3 @0xc
0x4e7…4f4 }
0x4f4…4fe 9255 1670 CLOSE FIL$
0x4f4…4fe LineComalBin {
0x4f4…4fe ptr = 0x9255 // 0x4f4 @0x0
0x4f4…4fe lno = 0x0686 // 0x4f6 @0x2
0x4f4…4fe at0004 = ╱a8╱ CLOSE ╱ // 0x4f8 @0x4
0x4f4…4fe at0005 = ╱46╱F╱ // 0x4f9 @0x5
0x4f4…4fe at0006 = ╱49╱I╱ // 0x4fa @0x6
0x4f4…4fe at0007 = ╱4c╱L╱ // 0x4fb @0x7
0x4f4…4fe at0008 = ╱ef╱$╱ // 0x4fc @0x8
0x4f4…4fe at0009 = EOL // 0x4fd @0x9
0x4f4…4fe }
0x4fe…51b 9272 1675 FIL1$="P641220:LØNMODRG"
0x4fe…51b LineComalBin {
0x4fe…51b ptr = 0x9272 // 0x4fe @0x0
0x4fe…51b lno = 0x068b // 0x500 @0x2
0x4fe…51b at0004 = ╱46╱F╱ // 0x502 @0x4
0x4fe…51b at0005 = ╱49╱I╱ // 0x503 @0x5
0x4fe…51b at0006 = ╱4c╱L╱ // 0x504 @0x6
0x4fe…51b at0007 = ╱31╱1╱ // 0x505 @0x7
0x4fe…51b at0008 = ╱ef╱$╱ // 0x506 @0x8
0x4fe…51b at0009 = ╱dc╱=╱ // 0x507 @0x9
0x4fe…51b at000a = ╱22╱"╱ // 0x508 @0xa
0x4fe…51b at000b = ╱50╱P╱ // 0x509 @0xb
0x4fe…51b at000c = ╱36╱6╱ // 0x50a @0xc
0x4fe…51b at000d = ╱34╱4╱ // 0x50b @0xd
0x4fe…51b at000e = ╱31╱1╱ // 0x50c @0xe
0x4fe…51b at000f = ╱32╱2╱ // 0x50d @0xf
0x4fe…51b at0010 = ╱32╱2╱ // 0x50e @0x10
0x4fe…51b at0011 = ╱30╱0╱ // 0x50f @0x11
0x4fe…51b at0012 = ╱3a╱:╱ // 0x510 @0x12
0x4fe…51b at0013 = ╱4c╱L╱ // 0x511 @0x13
0x4fe…51b at0014 = ╱5c╱Ø╱ // 0x512 @0x14
0x4fe…51b at0015 = ╱4e╱N╱ // 0x513 @0x15
0x4fe…51b at0016 = ╱4d╱M╱ // 0x514 @0x16
0x4fe…51b at0017 = ╱4f╱O╱ // 0x515 @0x17
0x4fe…51b at0018 = ╱44╱D╱ // 0x516 @0x18
0x4fe…51b at0019 = ╱52╱R╱ // 0x517 @0x19
0x4fe…51b at001a = ╱47╱G╱ // 0x518 @0x1a
0x4fe…51b at001b = ╱22╱"╱ // 0x519 @0x1b
0x4fe…51b at001c = EOL // 0x51a @0x1c
0x4fe…51b }
0x51b…528 927f 1680 OPEN FIL1$,R
0x51b…528 LineComalBin {
0x51b…528 ptr = 0x927f // 0x51b @0x0
0x51b…528 lno = 0x0690 // 0x51d @0x2
0x51b…528 at0004 = ╱a7╱ OPEN ╱ // 0x51f @0x4
0x51b…528 at0005 = ╱46╱F╱ // 0x520 @0x5
0x51b…528 at0006 = ╱49╱I╱ // 0x521 @0x6
0x51b…528 at0007 = ╱4c╱L╱ // 0x522 @0x7
0x51b…528 at0008 = ╱31╱1╱ // 0x523 @0x8
0x51b…528 at0009 = ╱ef╱$╱ // 0x524 @0x9
0x51b…528 at000a = ╱ec╱,╱ // 0x525 @0xa
0x51b…528 at000b = ╱52╱R╱ // 0x526 @0xb
0x51b…528 at000c = EOL // 0x527 @0xc
0x51b…528 }
0x528…544 929b 1710 MF5$="P641210:LØNBILAG"
0x528…544 LineComalBin {
0x528…544 ptr = 0x929b // 0x528 @0x0
0x528…544 lno = 0x06ae // 0x52a @0x2
0x528…544 at0004 = ╱4d╱M╱ // 0x52c @0x4
0x528…544 at0005 = ╱46╱F╱ // 0x52d @0x5
0x528…544 at0006 = ╱35╱5╱ // 0x52e @0x6
0x528…544 at0007 = ╱ef╱$╱ // 0x52f @0x7
0x528…544 at0008 = ╱dc╱=╱ // 0x530 @0x8
0x528…544 at0009 = ╱22╱"╱ // 0x531 @0x9
0x528…544 at000a = ╱50╱P╱ // 0x532 @0xa
0x528…544 at000b = ╱36╱6╱ // 0x533 @0xb
0x528…544 at000c = ╱34╱4╱ // 0x534 @0xc
0x528…544 at000d = ╱31╱1╱ // 0x535 @0xd
0x528…544 at000e = ╱32╱2╱ // 0x536 @0xe
0x528…544 at000f = ╱31╱1╱ // 0x537 @0xf
0x528…544 at0010 = ╱30╱0╱ // 0x538 @0x10
0x528…544 at0011 = ╱3a╱:╱ // 0x539 @0x11
0x528…544 at0012 = ╱4c╱L╱ // 0x53a @0x12
0x528…544 at0013 = ╱5c╱Ø╱ // 0x53b @0x13
0x528…544 at0014 = ╱4e╱N╱ // 0x53c @0x14
0x528…544 at0015 = ╱42╱B╱ // 0x53d @0x15
0x528…544 at0016 = ╱49╱I╱ // 0x53e @0x16
0x528…544 at0017 = ╱4c╱L╱ // 0x53f @0x17
0x528…544 at0018 = ╱41╱A╱ // 0x540 @0x18
0x528…544 at0019 = ╱47╱G╱ // 0x541 @0x19
0x528…544 at001a = ╱22╱"╱ // 0x542 @0x1a
0x528…544 at001b = EOL // 0x543 @0x1b
0x528…544 }
0x544…550 92a7 1720 OPEN MF5$,R
0x544…550 LineComalBin {
0x544…550 ptr = 0x92a7 // 0x544 @0x0
0x544…550 lno = 0x06b8 // 0x546 @0x2
0x544…550 at0004 = ╱a7╱ OPEN ╱ // 0x548 @0x4
0x544…550 at0005 = ╱4d╱M╱ // 0x549 @0x5
0x544…550 at0006 = ╱46╱F╱ // 0x54a @0x6
0x544…550 at0007 = ╱35╱5╱ // 0x54b @0x7
0x544…550 at0008 = ╱ef╱$╱ // 0x54c @0x8
0x544…550 at0009 = ╱ec╱,╱ // 0x54d @0x9
0x544…550 at000a = ╱52╱R╱ // 0x54e @0xa
0x544…550 at000b = EOL // 0x54f @0xb
0x544…550 }
0x550…55d 92b4 1750 GET MF5$:DD
0x550…55d LineComalBin {
0x550…55d ptr = 0x92b4 // 0x550 @0x0
0x550…55d lno = 0x06d6 // 0x552 @0x2
0x550…55d at0004 = ╱a9╱ GET ╱ // 0x554 @0x4
0x550…55d at0005 = ╱4d╱M╱ // 0x555 @0x5
0x550…55d at0006 = ╱46╱F╱ // 0x556 @0x6
0x550…55d at0007 = ╱35╱5╱ // 0x557 @0x7
0x550…55d at0008 = ╱ef╱$╱ // 0x558 @0x8
0x550…55d at0009 = ╱f0╱:╱ // 0x559 @0x9
0x550…55d at000a = ╱44╱D╱ // 0x55a @0xa
0x550…55d at000b = ╱44╱D╱ // 0x55b @0xb
0x550…55d at000c = EOL // 0x55c @0xc
0x550…55d }
0x55d…579 92d0 1755 EXEC CONVDATE(STARTPER$,DD)
0x55d…579 LineComalBin {
0x55d…579 ptr = 0x92d0 // 0x55d @0x0
0x55d…579 lno = 0x06db // 0x55f @0x2
0x55d…579 at0004 = ╱9d╱ EXEC ╱ // 0x561 @0x4
0x55d…579 at0005 = ╱43╱C╱ // 0x562 @0x5
0x55d…579 at0006 = ╱4f╱O╱ // 0x563 @0x6
0x55d…579 at0007 = ╱4e╱N╱ // 0x564 @0x7
0x55d…579 at0008 = ╱56╱V╱ // 0x565 @0x8
0x55d…579 at0009 = ╱44╱D╱ // 0x566 @0x9
0x55d…579 at000a = ╱41╱A╱ // 0x567 @0xa
0x55d…579 at000b = ╱54╱T╱ // 0x568 @0xb
0x55d…579 at000c = ╱45╱E╱ // 0x569 @0xc
0x55d…579 at000d = ╱ed╱(╱ // 0x56a @0xd
0x55d…579 at000e = ╱53╱S╱ // 0x56b @0xe
0x55d…579 at000f = ╱54╱T╱ // 0x56c @0xf
0x55d…579 at0010 = ╱41╱A╱ // 0x56d @0x10
0x55d…579 at0011 = ╱52╱R╱ // 0x56e @0x11
0x55d…579 at0012 = ╱54╱T╱ // 0x56f @0x12
0x55d…579 at0013 = ╱50╱P╱ // 0x570 @0x13
0x55d…579 at0014 = ╱45╱E╱ // 0x571 @0x14
0x55d…579 at0015 = ╱52╱R╱ // 0x572 @0x15
0x55d…579 at0016 = ╱ef╱$╱ // 0x573 @0x16
0x55d…579 at0017 = ╱ec╱,╱ // 0x574 @0x17
0x55d…579 at0018 = ╱44╱D╱ // 0x575 @0x18
0x55d…579 at0019 = ╱44╱D╱ // 0x576 @0x19
0x55d…579 at001a = ╱ee╱)╱ // 0x577 @0x1a
0x55d…579 at001b = EOL // 0x578 @0x1b
0x55d…579 }
0x579…580 92d7 1760 OUTPUT P
0x579…580 LineComalBin {
0x579…580 ptr = 0x92d7 // 0x579 @0x0
0x579…580 lno = 0x06e0 // 0x57b @0x2
0x579…580 at0004 = ╱a5╱ OUTPUT ╱ // 0x57d @0x4
0x579…580 at0005 = ╱50╱P╱ // 0x57e @0x5
0x579…580 at0006 = EOL // 0x57f @0x6
0x579…580 }
0x580…58c 92e3 1765 LINIE=B
0x580…58c LineComalBin {
0x580…58c ptr = 0x92e3 // 0x580 @0x0
0x580…58c lno = 0x06e5 // 0x582 @0x2
0x580…58c at0004 = ╱4c╱L╱ // 0x584 @0x4
0x580…58c at0005 = ╱49╱I╱ // 0x585 @0x5
0x580…58c at0006 = ╱4e╱N╱ // 0x586 @0x6
0x580…58c at0007 = ╱49╱I╱ // 0x587 @0x7
0x580…58c at0008 = ╱45╱E╱ // 0x588 @0x8
0x580…58c at0009 = ╱dc╱=╱ // 0x589 @0x9
0x580…58c at000a = ╱42╱B╱ // 0x58a @0xa
0x580…58c at000b = EOL // 0x58b @0xb
0x580…58c }
0x58c…59e 92f5 1770 FOR I=E TO 100
0x58c…59e LineComalBin {
0x58c…59e ptr = 0x92f5 // 0x58c @0x0
0x58c…59e lno = 0x06ea // 0x58e @0x2
0x58c…59e at0004 = ╱83╱ FOR ╱ // 0x590 @0x4
0x58c…59e at0005 = ╱49╱I╱ // 0x591 @0x5
0x58c…59e at0006 = ╱dc╱=╱ // 0x592 @0x6
0x58c…59e at0007 = ╱45╱E╱ // 0x593 @0x7
0x58c…59e at0008 = ╱b7╱ TO ╱ // 0x594 @0x8
0x58c…59e at0009 = ╱31╱1╱ // 0x595 @0x9
0x58c…59e at000a = ╱30╱0╱ // 0x596 @0xa
0x58c…59e at000b = ╱30╱0╱ // 0x597 @0xb
0x58c…59e at000c = ╱fe0000c807╱ // 0x598 @0xc
0x58c…59e at0011 = EOL // 0x59d @0x11
0x58c…59e }
0x59e…5b1 9308 1780 TOTAL$(I)=TAH$
0x59e…5b1 LineComalBin {
0x59e…5b1 ptr = 0x9308 // 0x59e @0x0
0x59e…5b1 lno = 0x06f4 // 0x5a0 @0x2
0x59e…5b1 at0004 = ╱54╱T╱ // 0x5a2 @0x4
0x59e…5b1 at0005 = ╱4f╱O╱ // 0x5a3 @0x5
0x59e…5b1 at0006 = ╱54╱T╱ // 0x5a4 @0x6
0x59e…5b1 at0007 = ╱41╱A╱ // 0x5a5 @0x7
0x59e…5b1 at0008 = ╱4c╱L╱ // 0x5a6 @0x8
0x59e…5b1 at0009 = ╱ef╱$╱ // 0x5a7 @0x9
0x59e…5b1 at000a = ╱ed╱(╱ // 0x5a8 @0xa
0x59e…5b1 at000b = ╱49╱I╱ // 0x5a9 @0xb
0x59e…5b1 at000c = ╱ee╱)╱ // 0x5aa @0xc
0x59e…5b1 at000d = ╱dc╱=╱ // 0x5ab @0xd
0x59e…5b1 at000e = ╱54╱T╱ // 0x5ac @0xe
0x59e…5b1 at000f = ╱41╱A╱ // 0x5ad @0xf
0x59e…5b1 at0010 = ╱48╱H╱ // 0x5ae @0x10
0x59e…5b1 at0011 = ╱ef╱$╱ // 0x5af @0x11
0x59e…5b1 at0012 = EOL // 0x5b0 @0x12
0x59e…5b1 }
0x5b1…5bd 9314 1785 AB(I)=B
0x5b1…5bd LineComalBin {
0x5b1…5bd ptr = 0x9314 // 0x5b1 @0x0
0x5b1…5bd lno = 0x06f9 // 0x5b3 @0x2
0x5b1…5bd at0004 = ╱41╱A╱ // 0x5b5 @0x4
0x5b1…5bd at0005 = ╱42╱B╱ // 0x5b6 @0x5
0x5b1…5bd at0006 = ╱ed╱(╱ // 0x5b7 @0x6
0x5b1…5bd at0007 = ╱49╱I╱ // 0x5b8 @0x7
0x5b1…5bd at0008 = ╱ee╱)╱ // 0x5b9 @0x8
0x5b1…5bd at0009 = ╱dc╱=╱ // 0x5ba @0x9
0x5b1…5bd at000a = ╱42╱B╱ // 0x5bb @0xa
0x5b1…5bd at000b = EOL // 0x5bc @0xb
0x5b1…5bd }
0x5bd…5c4 931b 1790 NEXT I
0x5bd…5c4 LineComalBin {
0x5bd…5c4 ptr = 0x931b // 0x5bd @0x0
0x5bd…5c4 lno = 0x06fe // 0x5bf @0x2
0x5bd…5c4 at0004 = ╱84╱ NEXT ╱ // 0x5c1 @0x4
0x5bd…5c4 at0005 = ╱49╱I╱ // 0x5c2 @0x5
0x5bd…5c4 at0006 = EOL // 0x5c3 @0x6
0x5bd…5c4 }
0x5c4…5da 9331 1810 GET MF5$:LMNR,RESUL$
0x5c4…5da LineComalBin {
0x5c4…5da ptr = 0x9331 // 0x5c4 @0x0
0x5c4…5da lno = 0x0712 // 0x5c6 @0x2
0x5c4…5da at0004 = ╱a9╱ GET ╱ // 0x5c8 @0x4
0x5c4…5da at0005 = ╱4d╱M╱ // 0x5c9 @0x5
0x5c4…5da at0006 = ╱46╱F╱ // 0x5ca @0x6
0x5c4…5da at0007 = ╱35╱5╱ // 0x5cb @0x7
0x5c4…5da at0008 = ╱ef╱$╱ // 0x5cc @0x8
0x5c4…5da at0009 = ╱f0╱:╱ // 0x5cd @0x9
0x5c4…5da at000a = ╱4c╱L╱ // 0x5ce @0xa
0x5c4…5da at000b = ╱4d╱M╱ // 0x5cf @0xb
0x5c4…5da at000c = ╱4e╱N╱ // 0x5d0 @0xc
0x5c4…5da at000d = ╱52╱R╱ // 0x5d1 @0xd
0x5c4…5da at000e = ╱ec╱,╱ // 0x5d2 @0xe
0x5c4…5da at000f = ╱52╱R╱ // 0x5d3 @0xf
0x5c4…5da at0010 = ╱45╱E╱ // 0x5d4 @0x10
0x5c4…5da at0011 = ╱53╱S╱ // 0x5d5 @0x11
0x5c4…5da at0012 = ╱55╱U╱ // 0x5d6 @0x12
0x5c4…5da at0013 = ╱4c╱L╱ // 0x5d7 @0x13
0x5c4…5da at0014 = ╱ef╱$╱ // 0x5d8 @0x14
0x5c4…5da at0015 = EOL // 0x5d9 @0x15
0x5c4…5da }
0x5da…5e9 9340 1820 WHILE STATUS(MF5$)=B
0x5da…5e9 LineComalBin {
0x5da…5e9 ptr = 0x9340 // 0x5da @0x0
0x5da…5e9 lno = 0x071c // 0x5dc @0x2
0x5da…5e9 at0004 = ╱93╱ WHILE ╱ // 0x5de @0x4
0x5da…5e9 at0005 = ╱ce╱STATUS╱ // 0x5df @0x5
0x5da…5e9 at0006 = ╱ed╱(╱ // 0x5e0 @0x6
0x5da…5e9 at0007 = ╱4d╱M╱ // 0x5e1 @0x7
0x5da…5e9 at0008 = ╱46╱F╱ // 0x5e2 @0x8
0x5da…5e9 at0009 = ╱35╱5╱ // 0x5e3 @0x9
0x5da…5e9 at000a = ╱ef╱$╱ // 0x5e4 @0xa
0x5da…5e9 at000b = ╱ee╱)╱ // 0x5e5 @0xb
0x5da…5e9 at000c = ╱dc╱=╱ // 0x5e6 @0xc
0x5da…5e9 at000d = ╱42╱B╱ // 0x5e7 @0xd
0x5da…5e9 at000e = EOL // 0x5e8 @0xe
0x5da…5e9 }
0x5e9…5fd 9354 1825 EXEC INLØNMOD(LMNR)
0x5e9…5fd LineComalBin {
0x5e9…5fd ptr = 0x9354 // 0x5e9 @0x0
0x5e9…5fd lno = 0x0721 // 0x5eb @0x2
0x5e9…5fd at0004 = ╱9d╱ EXEC ╱ // 0x5ed @0x4
0x5e9…5fd at0005 = ╱49╱I╱ // 0x5ee @0x5
0x5e9…5fd at0006 = ╱4e╱N╱ // 0x5ef @0x6
0x5e9…5fd at0007 = ╱4c╱L╱ // 0x5f0 @0x7
0x5e9…5fd at0008 = ╱5c╱Ø╱ // 0x5f1 @0x8
0x5e9…5fd at0009 = ╱4e╱N╱ // 0x5f2 @0x9
0x5e9…5fd at000a = ╱4d╱M╱ // 0x5f3 @0xa
0x5e9…5fd at000b = ╱4f╱O╱ // 0x5f4 @0xb
0x5e9…5fd at000c = ╱44╱D╱ // 0x5f5 @0xc
0x5e9…5fd at000d = ╱ed╱(╱ // 0x5f6 @0xd
0x5e9…5fd at000e = ╱4c╱L╱ // 0x5f7 @0xe
0x5e9…5fd at000f = ╱4d╱M╱ // 0x5f8 @0xf
0x5e9…5fd at0010 = ╱4e╱N╱ // 0x5f9 @0x10
0x5e9…5fd at0011 = ╱52╱R╱ // 0x5fa @0x11
0x5e9…5fd at0012 = ╱ee╱)╱ // 0x5fb @0x12
0x5e9…5fd at0013 = EOL // 0x5fc @0x13
0x5e9…5fd }
0x5fd…616 936d 1830 LPI=RPI DIV 10000+E
0x5fd…616 LineComalBin {
0x5fd…616 ptr = 0x936d // 0x5fd @0x0
0x5fd…616 lno = 0x0726 // 0x5ff @0x2
0x5fd…616 at0004 = ╱4c╱L╱ // 0x601 @0x4
0x5fd…616 at0005 = ╱50╱P╱ // 0x602 @0x5
0x5fd…616 at0006 = ╱49╱I╱ // 0x603 @0x6
0x5fd…616 at0007 = ╱dc╱=╱ // 0x604 @0x7
0x5fd…616 at0008 = ╱52╱R╱ // 0x605 @0x8
0x5fd…616 at0009 = ╱50╱P╱ // 0x606 @0x9
0x5fd…616 at000a = ╱49╱I╱ // 0x607 @0xa
0x5fd…616 at000b = ╱e7╱ DIV ╱ // 0x608 @0xb
0x5fd…616 at000c = ╱31╱1╱ // 0x609 @0xc
0x5fd…616 at000d = ╱30╱0╱ // 0x60a @0xd
0x5fd…616 at000e = ╱30╱0╱ // 0x60b @0xe
0x5fd…616 at000f = ╱30╱0╱ // 0x60c @0xf
0x5fd…616 at0010 = ╱30╱0╱ // 0x60d @0x10
0x5fd…616 at0011 = ╱fe00409c0e╱ // 0x60e @0x11
0x5fd…616 at0016 = ╱e2╱+╱ // 0x613 @0x16
0x5fd…616 at0017 = ╱45╱E╱ // 0x614 @0x17
0x5fd…616 at0018 = EOL // 0x615 @0x18
0x5fd…616 }
0x616…62c 9383 1832 AB(LPI)=AB(LPI)+E
0x616…62c LineComalBin {
0x616…62c ptr = 0x9383 // 0x616 @0x0
0x616…62c lno = 0x0728 // 0x618 @0x2
0x616…62c at0004 = ╱41╱A╱ // 0x61a @0x4
0x616…62c at0005 = ╱42╱B╱ // 0x61b @0x5
0x616…62c at0006 = ╱ed╱(╱ // 0x61c @0x6
0x616…62c at0007 = ╱4c╱L╱ // 0x61d @0x7
0x616…62c at0008 = ╱50╱P╱ // 0x61e @0x8
0x616…62c at0009 = ╱49╱I╱ // 0x61f @0x9
0x616…62c at000a = ╱ee╱)╱ // 0x620 @0xa
0x616…62c at000b = ╱dc╱=╱ // 0x621 @0xb
0x616…62c at000c = ╱41╱A╱ // 0x622 @0xc
0x616…62c at000d = ╱42╱B╱ // 0x623 @0xd
0x616…62c at000e = ╱ed╱(╱ // 0x624 @0xe
0x616…62c at000f = ╱4c╱L╱ // 0x625 @0xf
0x616…62c at0010 = ╱50╱P╱ // 0x626 @0x10
0x616…62c at0011 = ╱49╱I╱ // 0x627 @0x11
0x616…62c at0012 = ╱ee╱)╱ // 0x628 @0x12
0x616…62c at0013 = ╱e2╱+╱ // 0x629 @0x13
0x616…62c at0014 = ╱45╱E╱ // 0x62a @0x14
0x616…62c at0015 = EOL // 0x62b @0x15
0x616…62c }
0x62c…658 93af 1834 EXEC CALC(B,RESUL$,TOTAL$(LPI),TOTAL$(LPI))
0x62c…658 LineComalBin {
0x62c…658 ptr = 0x93af // 0x62c @0x0
0x62c…658 lno = 0x072a // 0x62e @0x2
0x62c…658 at0004 = ╱9d╱ EXEC ╱ // 0x630 @0x4
0x62c…658 at0005 = ╱43╱C╱ // 0x631 @0x5
0x62c…658 at0006 = ╱41╱A╱ // 0x632 @0x6
0x62c…658 at0007 = ╱4c╱L╱ // 0x633 @0x7
0x62c…658 at0008 = ╱43╱C╱ // 0x634 @0x8
0x62c…658 at0009 = ╱ed╱(╱ // 0x635 @0x9
0x62c…658 at000a = ╱42╱B╱ // 0x636 @0xa
0x62c…658 at000b = ╱ec╱,╱ // 0x637 @0xb
0x62c…658 at000c = ╱52╱R╱ // 0x638 @0xc
0x62c…658 at000d = ╱45╱E╱ // 0x639 @0xd
0x62c…658 at000e = ╱53╱S╱ // 0x63a @0xe
0x62c…658 at000f = ╱55╱U╱ // 0x63b @0xf
0x62c…658 at0010 = ╱4c╱L╱ // 0x63c @0x10
0x62c…658 at0011 = ╱ef╱$╱ // 0x63d @0x11
0x62c…658 at0012 = ╱ec╱,╱ // 0x63e @0x12
0x62c…658 at0013 = ╱54╱T╱ // 0x63f @0x13
0x62c…658 at0014 = ╱4f╱O╱ // 0x640 @0x14
0x62c…658 at0015 = ╱54╱T╱ // 0x641 @0x15
0x62c…658 at0016 = ╱41╱A╱ // 0x642 @0x16
0x62c…658 at0017 = ╱4c╱L╱ // 0x643 @0x17
0x62c…658 at0018 = ╱ef╱$╱ // 0x644 @0x18
0x62c…658 at0019 = ╱ed╱(╱ // 0x645 @0x19
0x62c…658 at001a = ╱4c╱L╱ // 0x646 @0x1a
0x62c…658 at001b = ╱50╱P╱ // 0x647 @0x1b
0x62c…658 at001c = ╱49╱I╱ // 0x648 @0x1c
0x62c…658 at001d = ╱ee╱)╱ // 0x649 @0x1d
0x62c…658 at001e = ╱ec╱,╱ // 0x64a @0x1e
0x62c…658 at001f = ╱54╱T╱ // 0x64b @0x1f
0x62c…658 at0020 = ╱4f╱O╱ // 0x64c @0x20
0x62c…658 at0021 = ╱54╱T╱ // 0x64d @0x21
0x62c…658 at0022 = ╱41╱A╱ // 0x64e @0x22
0x62c…658 at0023 = ╱4c╱L╱ // 0x64f @0x23
0x62c…658 at0024 = ╱ef╱$╱ // 0x650 @0x24
0x62c…658 at0025 = ╱ed╱(╱ // 0x651 @0x25
0x62c…658 at0026 = ╱4c╱L╱ // 0x652 @0x26
0x62c…658 at0027 = ╱50╱P╱ // 0x653 @0x27
0x62c…658 at0028 = ╱49╱I╱ // 0x654 @0x28
0x62c…658 at0029 = ╱ee╱)╱ // 0x655 @0x29
0x62c…658 at002a = ╱ee╱)╱ // 0x656 @0x2a
0x62c…658 at002b = EOL // 0x657 @0x2b
0x62c…658 }
0x658…65e 93b5 1836 PRINT
0x658…65e LineComalBin {
0x658…65e ptr = 0x93b5 // 0x658 @0x0
0x658…65e lno = 0x072c // 0x65a @0x2
0x658…65e at0004 = ╱92╱ PRINT ╱ // 0x65c @0x4
0x658…65e at0005 = EOL // 0x65d @0x5
0x658…65e }
0x65e…664 93bb 1838 PRINT
0x65e…664 LineComalBin {
0x65e…664 ptr = 0x93bb // 0x65e @0x0
0x65e…664 lno = 0x072e // 0x660 @0x2
0x65e…664 at0004 = ╱92╱ PRINT ╱ // 0x662 @0x4
0x65e…664 at0005 = EOL // 0x663 @0x5
0x65e…664 }
0x664…69e 93f5 1840 PRINT TAB(37);"L Ø N O V E R F Ø R S E L Dato ";DAD$
0x664…69e LineComalBin {
0x664…69e ptr = 0x93f5 // 0x664 @0x0
0x664…69e lno = 0x0730 // 0x666 @0x2
0x664…69e at0004 = ╱92╱ PRINT ╱ // 0x668 @0x4
0x664…69e at0005 = ╱d2╱TAB╱ // 0x669 @0x5
0x664…69e at0006 = ╱ed╱(╱ // 0x66a @0x6
0x664…69e at0007 = ╱33╱3╱ // 0x66b @0x7
0x664…69e at0008 = ╱37╱7╱ // 0x66c @0x8
0x664…69e at0009 = ╱fe00009406╱ // 0x66d @0x9
0x664…69e at000e = ╱ee╱)╱ // 0x672 @0xe
0x664…69e at000f = ╱eb╱;╱ // 0x673 @0xf
0x664…69e at0010 = ╱22╱"╱ // 0x674 @0x10
0x664…69e at0011 = ╱4c╱L╱ // 0x675 @0x11
0x664…69e at0012 = ╱20╱…╱ // 0x676 @0x12
0x664…69e at0013 = ╱5c╱Ø╱ // 0x677 @0x13
0x664…69e at0014 = ╱20╱…╱ // 0x678 @0x14
0x664…69e at0015 = ╱4e╱N╱ // 0x679 @0x15
0x664…69e at0016 = ╱20╱…╱ // 0x67a @0x16
0x664…69e at0017 = ╱4f╱O╱ // 0x67b @0x17
0x664…69e at0018 = ╱20╱…╱ // 0x67c @0x18
0x664…69e at0019 = ╱56╱V╱ // 0x67d @0x19
0x664…69e at001a = ╱20╱…╱ // 0x67e @0x1a
0x664…69e at001b = ╱45╱E╱ // 0x67f @0x1b
0x664…69e at001c = ╱20╱…╱ // 0x680 @0x1c
0x664…69e at001d = ╱52╱R╱ // 0x681 @0x1d
0x664…69e at001e = ╱20╱…╱ // 0x682 @0x1e
0x664…69e at001f = ╱46╱F╱ // 0x683 @0x1f
0x664…69e at0020 = ╱20╱…╱ // 0x684 @0x20
0x664…69e at0021 = ╱5c╱Ø╱ // 0x685 @0x21
0x664…69e at0022 = ╱20╱…╱ // 0x686 @0x22
0x664…69e at0023 = ╱52╱R╱ // 0x687 @0x23
0x664…69e at0024 = ╱20╱…╱ // 0x688 @0x24
0x664…69e at0025 = ╱53╱S╱ // 0x689 @0x25
0x664…69e at0026 = ╱20╱…╱ // 0x68a @0x26
0x664…69e at0027 = ╱45╱E╱ // 0x68b @0x27
0x664…69e at0028 = ╱20╱…╱ // 0x68c @0x28
0x664…69e at0029 = ╱4c╱L╱ // 0x68d @0x29
0x664…69e at002a = ╱20╱…╱ // 0x68e @0x2a
0x664…69e at002b = ╱20╱…╱ // 0x68f @0x2b
0x664…69e at002c = ╱20╱…╱ // 0x690 @0x2c
0x664…69e at002d = ╱20╱…╱ // 0x691 @0x2d
0x664…69e at002e = ╱44╱D╱ // 0x692 @0x2e
0x664…69e at002f = ╱61╱a╱ // 0x693 @0x2f
0x664…69e at0030 = ╱74╱t╱ // 0x694 @0x30
0x664…69e at0031 = ╱6f╱o╱ // 0x695 @0x31
0x664…69e at0032 = ╱20╱…╱ // 0x696 @0x32
0x664…69e at0033 = ╱22╱"╱ // 0x697 @0x33
0x664…69e at0034 = ╱eb╱;╱ // 0x698 @0x34
0x664…69e at0035 = ╱44╱D╱ // 0x699 @0x35
0x664…69e at0036 = ╱41╱A╱ // 0x69a @0x36
0x664…69e at0037 = ╱44╱D╱ // 0x69b @0x37
0x664…69e at0038 = ╱ef╱$╱ // 0x69c @0x38
0x664…69e at0039 = EOL // 0x69d @0x39
0x664…69e }
0x69e…6a4 (22,) 93fb 1842 PRINT
0x69e…6a4 LineComalBin {
0x69e…6a4 ptr = 0x93fb // 0x69e @0x0
0x69e…6a4 lno = 0x0732 // 0x6a0 @0x2
0x69e…6a4 at0004 = ╱92╱ PRINT ╱ // 0x6a2 @0x4
0x69e…6a4 at0005 = EOL // 0x6a3 @0x5
0x69e…6a4 }
0x6a4…6c9 9420 1844 PRINT TAB(5);"LØNKONTOFØRENDE PI";
0x6a4…6c9 LineComalBin {
0x6a4…6c9 ptr = 0x9420 // 0x6a4 @0x0
0x6a4…6c9 lno = 0x0734 // 0x6a6 @0x2
0x6a4…6c9 at0004 = ╱92╱ PRINT ╱ // 0x6a8 @0x4
0x6a4…6c9 at0005 = ╱d2╱TAB╱ // 0x6a9 @0x5
0x6a4…6c9 at0006 = ╱ed╱(╱ // 0x6aa @0x6
0x6a4…6c9 at0007 = ╱35╱5╱ // 0x6ab @0x7
0x6a4…6c9 at0008 = ╱fe0000a003╱ // 0x6ac @0x8
0x6a4…6c9 at000d = ╱ee╱)╱ // 0x6b1 @0xd
0x6a4…6c9 at000e = ╱eb╱;╱ // 0x6b2 @0xe
0x6a4…6c9 at000f = ╱22╱"╱ // 0x6b3 @0xf
0x6a4…6c9 at0010 = ╱4c╱L╱ // 0x6b4 @0x10
0x6a4…6c9 at0011 = ╱5c╱Ø╱ // 0x6b5 @0x11
0x6a4…6c9 at0012 = ╱4e╱N╱ // 0x6b6 @0x12
0x6a4…6c9 at0013 = ╱4b╱K╱ // 0x6b7 @0x13
0x6a4…6c9 at0014 = ╱4f╱O╱ // 0x6b8 @0x14
0x6a4…6c9 at0015 = ╱4e╱N╱ // 0x6b9 @0x15
0x6a4…6c9 at0016 = ╱54╱T╱ // 0x6ba @0x16
0x6a4…6c9 at0017 = ╱4f╱O╱ // 0x6bb @0x17
0x6a4…6c9 at0018 = ╱46╱F╱ // 0x6bc @0x18
0x6a4…6c9 at0019 = ╱5c╱Ø╱ // 0x6bd @0x19
0x6a4…6c9 at001a = ╱52╱R╱ // 0x6be @0x1a
0x6a4…6c9 at001b = ╱45╱E╱ // 0x6bf @0x1b
0x6a4…6c9 at001c = ╱4e╱N╱ // 0x6c0 @0x1c
0x6a4…6c9 at001d = ╱44╱D╱ // 0x6c1 @0x1d
0x6a4…6c9 at001e = ╱45╱E╱ // 0x6c2 @0x1e
0x6a4…6c9 at001f = ╱20╱…╱ // 0x6c3 @0x1f
0x6a4…6c9 at0020 = ╱50╱P╱ // 0x6c4 @0x20
0x6a4…6c9 at0021 = ╱49╱I╱ // 0x6c5 @0x21
0x6a4…6c9 at0022 = ╱22╱"╱ // 0x6c6 @0x22
0x6a4…6c9 at0023 = ╱eb╱;╱ // 0x6c7 @0x23
0x6a4…6c9 at0024 = EOL // 0x6c8 @0x24
0x6a4…6c9 }
0x6c9…6dc 9433 1846 PRINT USING "###":LPI-E;
0x6c9…6dc LineComalBin {
0x6c9…6dc ptr = 0x9433 // 0x6c9 @0x0
0x6c9…6dc lno = 0x0736 // 0x6cb @0x2
0x6c9…6dc at0004 = ╱92╱ PRINT ╱ // 0x6cd @0x4
0x6c9…6dc at0005 = ╱b9╱ USING ╱ // 0x6ce @0x5
0x6c9…6dc at0006 = ╱22╱"╱ // 0x6cf @0x6
0x6c9…6dc at0007 = ╱23╱#╱ // 0x6d0 @0x7
0x6c9…6dc at0008 = ╱23╱#╱ // 0x6d1 @0x8
0x6c9…6dc at0009 = ╱23╱#╱ // 0x6d2 @0x9
0x6c9…6dc at000a = ╱22╱"╱ // 0x6d3 @0xa
0x6c9…6dc at000b = ╱f0╱:╱ // 0x6d4 @0xb
0x6c9…6dc at000c = ╱4c╱L╱ // 0x6d5 @0xc
0x6c9…6dc at000d = ╱50╱P╱ // 0x6d6 @0xd
0x6c9…6dc at000e = ╱49╱I╱ // 0x6d7 @0xe
0x6c9…6dc at000f = ╱e3╱-╱ // 0x6d8 @0xf
0x6c9…6dc at0010 = ╱45╱E╱ // 0x6d9 @0x10
0x6c9…6dc at0011 = ╱eb╱;╱ // 0x6da @0x11
0x6c9…6dc at0012 = EOL // 0x6db @0x12
0x6c9…6dc }
0x6dc…730 9487 1848 PRINT TAB(45);"AFTALENUMMER ";POST4$(19,22);"/";POST4$(23,24)
0x6dc…730 LineComalBin {
0x6dc…730 ptr = 0x9487 // 0x6dc @0x0
0x6dc…730 lno = 0x0738 // 0x6de @0x2
0x6dc…730 at0004 = ╱92╱ PRINT ╱ // 0x6e0 @0x4
0x6dc…730 at0005 = ╱d2╱TAB╱ // 0x6e1 @0x5
0x6dc…730 at0006 = ╱ed╱(╱ // 0x6e2 @0x6
0x6dc…730 at0007 = ╱34╱4╱ // 0x6e3 @0x7
0x6dc…730 at0008 = ╱35╱5╱ // 0x6e4 @0x8
0x6dc…730 at0009 = ╱fe0000b406╱ // 0x6e5 @0x9
0x6dc…730 at000e = ╱ee╱)╱ // 0x6ea @0xe
0x6dc…730 at000f = ╱eb╱;╱ // 0x6eb @0xf
0x6dc…730 at0010 = ╱22╱"╱ // 0x6ec @0x10
0x6dc…730 at0011 = ╱41╱A╱ // 0x6ed @0x11
0x6dc…730 at0012 = ╱46╱F╱ // 0x6ee @0x12
0x6dc…730 at0013 = ╱54╱T╱ // 0x6ef @0x13
0x6dc…730 at0014 = ╱41╱A╱ // 0x6f0 @0x14
0x6dc…730 at0015 = ╱4c╱L╱ // 0x6f1 @0x15
0x6dc…730 at0016 = ╱45╱E╱ // 0x6f2 @0x16
0x6dc…730 at0017 = ╱4e╱N╱ // 0x6f3 @0x17
0x6dc…730 at0018 = ╱55╱U╱ // 0x6f4 @0x18
0x6dc…730 at0019 = ╱4d╱M╱ // 0x6f5 @0x19
0x6dc…730 at001a = ╱4d╱M╱ // 0x6f6 @0x1a
0x6dc…730 at001b = ╱45╱E╱ // 0x6f7 @0x1b
0x6dc…730 at001c = ╱52╱R╱ // 0x6f8 @0x1c
0x6dc…730 at001d = ╱20╱…╱ // 0x6f9 @0x1d
0x6dc…730 at001e = ╱22╱"╱ // 0x6fa @0x1e
0x6dc…730 at001f = ╱eb╱;╱ // 0x6fb @0x1f
0x6dc…730 at0020 = ╱50╱P╱ // 0x6fc @0x20
0x6dc…730 at0021 = ╱4f╱O╱ // 0x6fd @0x21
0x6dc…730 at0022 = ╱53╱S╱ // 0x6fe @0x22
0x6dc…730 at0023 = ╱54╱T╱ // 0x6ff @0x23
0x6dc…730 at0024 = ╱34╱4╱ // 0x700 @0x24
0x6dc…730 at0025 = ╱ef╱$╱ // 0x701 @0x25
0x6dc…730 at0026 = ╱ed╱(╱ // 0x702 @0x26
0x6dc…730 at0027 = ╱31╱1╱ // 0x703 @0x27
0x6dc…730 at0028 = ╱39╱9╱ // 0x704 @0x28
0x6dc…730 at0029 = ╱fe00009805╱ // 0x705 @0x29
0x6dc…730 at002e = ╱ec╱,╱ // 0x70a @0x2e
0x6dc…730 at002f = ╱32╱2╱ // 0x70b @0x2f
0x6dc…730 at0030 = ╱32╱2╱ // 0x70c @0x30
0x6dc…730 at0031 = ╱fe0000b005╱ // 0x70d @0x31
0x6dc…730 at0036 = ╱ee╱)╱ // 0x712 @0x36
0x6dc…730 at0037 = ╱eb╱;╱ // 0x713 @0x37
0x6dc…730 at0038 = ╱22╱"╱ // 0x714 @0x38
0x6dc…730 at0039 = ╱2f╱/╱ // 0x715 @0x39
0x6dc…730 at003a = ╱22╱"╱ // 0x716 @0x3a
0x6dc…730 at003b = ╱eb╱;╱ // 0x717 @0x3b
0x6dc…730 at003c = ╱50╱P╱ // 0x718 @0x3c
0x6dc…730 at003d = ╱4f╱O╱ // 0x719 @0x3d
0x6dc…730 at003e = ╱53╱S╱ // 0x71a @0x3e
0x6dc…730 at003f = ╱54╱T╱ // 0x71b @0x3f
0x6dc…730 at0040 = ╱34╱4╱ // 0x71c @0x40
0x6dc…730 at0041 = ╱ef╱$╱ // 0x71d @0x41
0x6dc…730 at0042 = ╱ed╱(╱ // 0x71e @0x42
0x6dc…730 at0043 = ╱32╱2╱ // 0x71f @0x43
0x6dc…730 at0044 = ╱33╱3╱ // 0x720 @0x44
0x6dc…730 at0045 = ╱fe0000b805╱ // 0x721 @0x45
0x6dc…730 at004a = ╱ec╱,╱ // 0x726 @0x4a
0x6dc…730 at004b = ╱32╱2╱ // 0x727 @0x4b
0x6dc…730 at004c = ╱34╱4╱ // 0x728 @0x4c
0x6dc…730 at004d = ╱fe0000c005╱ // 0x729 @0x4d
0x6dc…730 at0052 = ╱ee╱)╱ // 0x72e @0x52
0x6dc…730 at0053 = EOL // 0x72f @0x53
0x6dc…730 }
0x730…778 94cf 1850 PRINT TAB(5);"DISPOSITIONSDAG ";STARTPER$;TAB(45);"ARBEJDSGIVER ";
0x730…778 LineComalBin {
0x730…778 ptr = 0x94cf // 0x730 @0x0
0x730…778 lno = 0x073a // 0x732 @0x2
0x730…778 at0004 = ╱92╱ PRINT ╱ // 0x734 @0x4
0x730…778 at0005 = ╱d2╱TAB╱ // 0x735 @0x5
0x730…778 at0006 = ╱ed╱(╱ // 0x736 @0x6
0x730…778 at0007 = ╱35╱5╱ // 0x737 @0x7
0x730…778 at0008 = ╱fe0000a003╱ // 0x738 @0x8
0x730…778 at000d = ╱ee╱)╱ // 0x73d @0xd
0x730…778 at000e = ╱eb╱;╱ // 0x73e @0xe
0x730…778 at000f = ╱22╱"╱ // 0x73f @0xf
0x730…778 at0010 = ╱44╱D╱ // 0x740 @0x10
0x730…778 at0011 = ╱49╱I╱ // 0x741 @0x11
0x730…778 at0012 = ╱53╱S╱ // 0x742 @0x12
0x730…778 at0013 = ╱50╱P╱ // 0x743 @0x13
0x730…778 at0014 = ╱4f╱O╱ // 0x744 @0x14
0x730…778 at0015 = ╱53╱S╱ // 0x745 @0x15
0x730…778 at0016 = ╱49╱I╱ // 0x746 @0x16
0x730…778 at0017 = ╱54╱T╱ // 0x747 @0x17
0x730…778 at0018 = ╱49╱I╱ // 0x748 @0x18
0x730…778 at0019 = ╱4f╱O╱ // 0x749 @0x19
0x730…778 at001a = ╱4e╱N╱ // 0x74a @0x1a
0x730…778 at001b = ╱53╱S╱ // 0x74b @0x1b
0x730…778 at001c = ╱44╱D╱ // 0x74c @0x1c
0x730…778 at001d = ╱41╱A╱ // 0x74d @0x1d
0x730…778 at001e = ╱47╱G╱ // 0x74e @0x1e
0x730…778 at001f = ╱20╱…╱ // 0x74f @0x1f
0x730…778 at0020 = ╱22╱"╱ // 0x750 @0x20
0x730…778 at0021 = ╱eb╱;╱ // 0x751 @0x21
0x730…778 at0022 = ╱53╱S╱ // 0x752 @0x22
0x730…778 at0023 = ╱54╱T╱ // 0x753 @0x23
0x730…778 at0024 = ╱41╱A╱ // 0x754 @0x24
0x730…778 at0025 = ╱52╱R╱ // 0x755 @0x25
0x730…778 at0026 = ╱54╱T╱ // 0x756 @0x26
0x730…778 at0027 = ╱50╱P╱ // 0x757 @0x27
0x730…778 at0028 = ╱45╱E╱ // 0x758 @0x28
0x730…778 at0029 = ╱52╱R╱ // 0x759 @0x29
0x730…778 at002a = ╱ef╱$╱ // 0x75a @0x2a
0x730…778 at002b = ╱eb╱;╱ // 0x75b @0x2b
0x730…778 at002c = ╱d2╱TAB╱ // 0x75c @0x2c
0x730…778 at002d = ╱ed╱(╱ // 0x75d @0x2d
0x730…778 at002e = ╱34╱4╱ // 0x75e @0x2e
0x730…778 at002f = ╱35╱5╱ // 0x75f @0x2f
0x730…778 at0030 = ╱fe0000b406╱ // 0x760 @0x30
0x730…778 at0035 = ╱ee╱)╱ // 0x765 @0x35
0x730…778 at0036 = ╱eb╱;╱ // 0x766 @0x36
0x730…778 at0037 = ╱22╱"╱ // 0x767 @0x37
0x730…778 at0038 = ╱41╱A╱ // 0x768 @0x38
0x730…778 at0039 = ╱52╱R╱ // 0x769 @0x39
0x730…778 at003a = ╱42╱B╱ // 0x76a @0x3a
0x730…778 at003b = ╱45╱E╱ // 0x76b @0x3b
0x730…778 at003c = ╱4a╱J╱ // 0x76c @0x3c
0x730…778 at003d = ╱44╱D╱ // 0x76d @0x3d
0x730…778 at003e = ╱53╱S╱ // 0x76e @0x3e
0x730…778 at003f = ╱47╱G╱ // 0x76f @0x3f
0x730…778 at0040 = ╱49╱I╱ // 0x770 @0x40
0x730…778 at0041 = ╱56╱V╱ // 0x771 @0x41
0x730…778 at0042 = ╱45╱E╱ // 0x772 @0x42
0x730…778 at0043 = ╱52╱R╱ // 0x773 @0x43
0x730…778 at0044 = ╱20╱…╱ // 0x774 @0x44
0x730…778 at0045 = ╱22╱"╱ // 0x775 @0x45
0x730…778 at0046 = ╱eb╱;╱ // 0x776 @0x46
0x730…778 at0047 = EOL // 0x777 @0x47
0x730…778 }
0x778…795 94ec 1852 PRINT POST4$(25,34)
0x778…795 LineComalBin {
0x778…795 ptr = 0x94ec // 0x778 @0x0
0x778…795 lno = 0x073c // 0x77a @0x2
0x778…795 at0004 = ╱92╱ PRINT ╱ // 0x77c @0x4
0x778…795 at0005 = ╱50╱P╱ // 0x77d @0x5
0x778…795 at0006 = ╱4f╱O╱ // 0x77e @0x6
0x778…795 at0007 = ╱53╱S╱ // 0x77f @0x7
0x778…795 at0008 = ╱54╱T╱ // 0x780 @0x8
0x778…795 at0009 = ╱34╱4╱ // 0x781 @0x9
0x778…795 at000a = ╱ef╱$╱ // 0x782 @0xa
0x778…795 at000b = ╱ed╱(╱ // 0x783 @0xb
0x778…795 at000c = ╱32╱2╱ // 0x784 @0xc
0x778…795 at000d = ╱35╱5╱ // 0x785 @0xd
0x778…795 at000e = ╱fe0000c805╱ // 0x786 @0xe
0x778…795 at0013 = ╱ec╱,╱ // 0x78b @0x13
0x778…795 at0014 = ╱33╱3╱ // 0x78c @0x14
0x778…795 at0015 = ╱34╱4╱ // 0x78d @0x15
0x778…795 at0016 = ╱fe00008806╱ // 0x78e @0x16
0x778…795 at001b = ╱ee╱)╱ // 0x793 @0x1b
0x778…795 at001c = EOL // 0x794 @0x1c
0x778…795 }
0x795…7b2 9509 1854 PRINT TAB(5);"LØNMODTAGER"
0x795…7b2 LineComalBin {
0x795…7b2 ptr = 0x9509 // 0x795 @0x0
0x795…7b2 lno = 0x073e // 0x797 @0x2
0x795…7b2 at0004 = ╱92╱ PRINT ╱ // 0x799 @0x4
0x795…7b2 at0005 = ╱d2╱TAB╱ // 0x79a @0x5
0x795…7b2 at0006 = ╱ed╱(╱ // 0x79b @0x6
0x795…7b2 at0007 = ╱35╱5╱ // 0x79c @0x7
0x795…7b2 at0008 = ╱fe0000a003╱ // 0x79d @0x8
0x795…7b2 at000d = ╱ee╱)╱ // 0x7a2 @0xd
0x795…7b2 at000e = ╱eb╱;╱ // 0x7a3 @0xe
0x795…7b2 at000f = ╱22╱"╱ // 0x7a4 @0xf
0x795…7b2 at0010 = ╱4c╱L╱ // 0x7a5 @0x10
0x795…7b2 at0011 = ╱5c╱Ø╱ // 0x7a6 @0x11
0x795…7b2 at0012 = ╱4e╱N╱ // 0x7a7 @0x12
0x795…7b2 at0013 = ╱4d╱M╱ // 0x7a8 @0x13
0x795…7b2 at0014 = ╱4f╱O╱ // 0x7a9 @0x14
0x795…7b2 at0015 = ╱44╱D╱ // 0x7aa @0x15
0x795…7b2 at0016 = ╱54╱T╱ // 0x7ab @0x16
0x795…7b2 at0017 = ╱41╱A╱ // 0x7ac @0x17
0x795…7b2 at0018 = ╱47╱G╱ // 0x7ad @0x18
0x795…7b2 at0019 = ╱45╱E╱ // 0x7ae @0x19
0x795…7b2 at001a = ╱52╱R╱ // 0x7af @0x1a
0x795…7b2 at001b = ╱22╱"╱ // 0x7b0 @0x1b
0x795…7b2 at001c = EOL // 0x7b1 @0x1c
0x795…7b2 }
0x7b2…7f5 954c 1856 PRINT TAB(5);POST1$(E,25);TAB(45);POST3$(8,32)
0x7b2…7f5 LineComalBin {
0x7b2…7f5 ptr = 0x954c // 0x7b2 @0x0
0x7b2…7f5 lno = 0x0740 // 0x7b4 @0x2
0x7b2…7f5 at0004 = ╱92╱ PRINT ╱ // 0x7b6 @0x4
0x7b2…7f5 at0005 = ╱d2╱TAB╱ // 0x7b7 @0x5
0x7b2…7f5 at0006 = ╱ed╱(╱ // 0x7b8 @0x6
0x7b2…7f5 at0007 = ╱35╱5╱ // 0x7b9 @0x7
0x7b2…7f5 at0008 = ╱fe0000a003╱ // 0x7ba @0x8
0x7b2…7f5 at000d = ╱ee╱)╱ // 0x7bf @0xd
0x7b2…7f5 at000e = ╱eb╱;╱ // 0x7c0 @0xe
0x7b2…7f5 at000f = ╱50╱P╱ // 0x7c1 @0xf
0x7b2…7f5 at0010 = ╱4f╱O╱ // 0x7c2 @0x10
0x7b2…7f5 at0011 = ╱53╱S╱ // 0x7c3 @0x11
0x7b2…7f5 at0012 = ╱54╱T╱ // 0x7c4 @0x12
0x7b2…7f5 at0013 = ╱31╱1╱ // 0x7c5 @0x13
0x7b2…7f5 at0014 = ╱ef╱$╱ // 0x7c6 @0x14
0x7b2…7f5 at0015 = ╱ed╱(╱ // 0x7c7 @0x15
0x7b2…7f5 at0016 = ╱45╱E╱ // 0x7c8 @0x16
0x7b2…7f5 at0017 = ╱ec╱,╱ // 0x7c9 @0x17
0x7b2…7f5 at0018 = ╱32╱2╱ // 0x7ca @0x18
0x7b2…7f5 at0019 = ╱35╱5╱ // 0x7cb @0x19
0x7b2…7f5 at001a = ╱fe0000c805╱ // 0x7cc @0x1a
0x7b2…7f5 at001f = ╱ee╱)╱ // 0x7d1 @0x1f
0x7b2…7f5 at0020 = ╱eb╱;╱ // 0x7d2 @0x20
0x7b2…7f5 at0021 = ╱d2╱TAB╱ // 0x7d3 @0x21
0x7b2…7f5 at0022 = ╱ed╱(╱ // 0x7d4 @0x22
0x7b2…7f5 at0023 = ╱34╱4╱ // 0x7d5 @0x23
0x7b2…7f5 at0024 = ╱35╱5╱ // 0x7d6 @0x24
0x7b2…7f5 at0025 = ╱fe0000b406╱ // 0x7d7 @0x25
0x7b2…7f5 at002a = ╱ee╱)╱ // 0x7dc @0x2a
0x7b2…7f5 at002b = ╱eb╱;╱ // 0x7dd @0x2b
0x7b2…7f5 at002c = ╱50╱P╱ // 0x7de @0x2c
0x7b2…7f5 at002d = ╱4f╱O╱ // 0x7df @0x2d
0x7b2…7f5 at002e = ╱53╱S╱ // 0x7e0 @0x2e
0x7b2…7f5 at002f = ╱54╱T╱ // 0x7e1 @0x2f
0x7b2…7f5 at0030 = ╱33╱3╱ // 0x7e2 @0x30
0x7b2…7f5 at0031 = ╱ef╱$╱ // 0x7e3 @0x31
0x7b2…7f5 at0032 = ╱ed╱(╱ // 0x7e4 @0x32
0x7b2…7f5 at0033 = ╱38╱8╱ // 0x7e5 @0x33
0x7b2…7f5 at0034 = ╱fe00008004╱ // 0x7e6 @0x34
0x7b2…7f5 at0039 = ╱ec╱,╱ // 0x7eb @0x39
0x7b2…7f5 at003a = ╱33╱3╱ // 0x7ec @0x3a
0x7b2…7f5 at003b = ╱32╱2╱ // 0x7ed @0x3b
0x7b2…7f5 at003c = ╱fe00008006╱ // 0x7ee @0x3c
0x7b2…7f5 at0041 = ╱ee╱)╱ // 0x7f3 @0x41
0x7b2…7f5 at0042 = EOL // 0x7f4 @0x42
0x7b2…7f5 }
0x7f5…83f 9596 1858 PRINT TAB(5);POST1$(26,48);TAB(45);POST3$(33,55)
0x7f5…83f LineComalBin {
0x7f5…83f ptr = 0x9596 // 0x7f5 @0x0
0x7f5…83f lno = 0x0742 // 0x7f7 @0x2
0x7f5…83f at0004 = ╱92╱ PRINT ╱ // 0x7f9 @0x4
0x7f5…83f at0005 = ╱d2╱TAB╱ // 0x7fa @0x5
0x7f5…83f at0006 = ╱ed╱(╱ // 0x7fb @0x6
0x7f5…83f at0007 = ╱35╱5╱ // 0x7fc @0x7
0x7f5…83f at0008 = ╱fe0000a003╱ // 0x7fd @0x8
0x7f5…83f at000d = ╱ee╱)╱ // 0x802 @0xd
0x7f5…83f at000e = ╱eb╱;╱ // 0x803 @0xe
0x7f5…83f at000f = ╱50╱P╱ // 0x804 @0xf
0x7f5…83f at0010 = ╱4f╱O╱ // 0x805 @0x10
0x7f5…83f at0011 = ╱53╱S╱ // 0x806 @0x11
0x7f5…83f at0012 = ╱54╱T╱ // 0x807 @0x12
0x7f5…83f at0013 = ╱31╱1╱ // 0x808 @0x13
0x7f5…83f at0014 = ╱ef╱$╱ // 0x809 @0x14
0x7f5…83f at0015 = ╱ed╱(╱ // 0x80a @0x15
0x7f5…83f at0016 = ╱32╱2╱ // 0x80b @0x16
0x7f5…83f at0017 = ╱36╱6╱ // 0x80c @0x17
0x7f5…83f at0018 = ╱fe0000d005╱ // 0x80d @0x18
0x7f5…83f at001d = ╱ec╱,╱ // 0x812 @0x1d
0x7f5…83f at001e = ╱34╱4╱ // 0x813 @0x1e
0x7f5…83f at001f = ╱38╱8╱ // 0x814 @0x1f
0x7f5…83f at0020 = ╱fe0000c006╱ // 0x815 @0x20
0x7f5…83f at0025 = ╱ee╱)╱ // 0x81a @0x25
0x7f5…83f at0026 = ╱eb╱;╱ // 0x81b @0x26
0x7f5…83f at0027 = ╱d2╱TAB╱ // 0x81c @0x27
0x7f5…83f at0028 = ╱ed╱(╱ // 0x81d @0x28
0x7f5…83f at0029 = ╱34╱4╱ // 0x81e @0x29
0x7f5…83f at002a = ╱35╱5╱ // 0x81f @0x2a
0x7f5…83f at002b = ╱fe0000b406╱ // 0x820 @0x2b
0x7f5…83f at0030 = ╱ee╱)╱ // 0x825 @0x30
0x7f5…83f at0031 = ╱eb╱;╱ // 0x826 @0x31
0x7f5…83f at0032 = ╱50╱P╱ // 0x827 @0x32
0x7f5…83f at0033 = ╱4f╱O╱ // 0x828 @0x33
0x7f5…83f at0034 = ╱53╱S╱ // 0x829 @0x34
0x7f5…83f at0035 = ╱54╱T╱ // 0x82a @0x35
0x7f5…83f at0036 = ╱33╱3╱ // 0x82b @0x36
0x7f5…83f at0037 = ╱ef╱$╱ // 0x82c @0x37
0x7f5…83f at0038 = ╱ed╱(╱ // 0x82d @0x38
0x7f5…83f at0039 = ╱33╱3╱ // 0x82e @0x39
0x7f5…83f at003a = ╱33╱3╱ // 0x82f @0x3a
0x7f5…83f at003b = ╱fe00008406╱ // 0x830 @0x3b
0x7f5…83f at0040 = ╱ec╱,╱ // 0x835 @0x40
0x7f5…83f at0041 = ╱35╱5╱ // 0x836 @0x41
0x7f5…83f at0042 = ╱35╱5╱ // 0x837 @0x42
0x7f5…83f at0043 = ╱fe0000dc06╱ // 0x838 @0x43
0x7f5…83f at0048 = ╱ee╱)╱ // 0x83d @0x48
0x7f5…83f at0049 = EOL // 0x83e @0x49
0x7f5…83f }
0x83f…89d 95f4 1860 PRINT TAB(5);POST1$(49,71);TAB(45);POST4$(E,4);" ";POST4$(5,18)
0x83f…89d LineComalBin {
0x83f…89d ptr = 0x95f4 // 0x83f @0x0
0x83f…89d lno = 0x0744 // 0x841 @0x2
0x83f…89d at0004 = ╱92╱ PRINT ╱ // 0x843 @0x4
0x83f…89d at0005 = ╱d2╱TAB╱ // 0x844 @0x5
0x83f…89d at0006 = ╱ed╱(╱ // 0x845 @0x6
0x83f…89d at0007 = ╱35╱5╱ // 0x846 @0x7
0x83f…89d at0008 = ╱fe0000a003╱ // 0x847 @0x8
0x83f…89d at000d = ╱ee╱)╱ // 0x84c @0xd
0x83f…89d at000e = ╱eb╱;╱ // 0x84d @0xe
0x83f…89d at000f = ╱50╱P╱ // 0x84e @0xf
0x83f…89d at0010 = ╱4f╱O╱ // 0x84f @0x10
0x83f…89d at0011 = ╱53╱S╱ // 0x850 @0x11
0x83f…89d at0012 = ╱54╱T╱ // 0x851 @0x12
0x83f…89d at0013 = ╱31╱1╱ // 0x852 @0x13
0x83f…89d at0014 = ╱ef╱$╱ // 0x853 @0x14
0x83f…89d at0015 = ╱ed╱(╱ // 0x854 @0x15
0x83f…89d at0016 = ╱34╱4╱ // 0x855 @0x16
0x83f…89d at0017 = ╱39╱9╱ // 0x856 @0x17
0x83f…89d at0018 = ╱fe0000c406╱ // 0x857 @0x18
0x83f…89d at001d = ╱ec╱,╱ // 0x85c @0x1d
0x83f…89d at001e = ╱37╱7╱ // 0x85d @0x1e
0x83f…89d at001f = ╱31╱1╱ // 0x85e @0x1f
0x83f…89d at0020 = ╱fe00008e07╱ // 0x85f @0x20
0x83f…89d at0025 = ╱ee╱)╱ // 0x864 @0x25
0x83f…89d at0026 = ╱eb╱;╱ // 0x865 @0x26
0x83f…89d at0027 = ╱d2╱TAB╱ // 0x866 @0x27
0x83f…89d at0028 = ╱ed╱(╱ // 0x867 @0x28
0x83f…89d at0029 = ╱34╱4╱ // 0x868 @0x29
0x83f…89d at002a = ╱35╱5╱ // 0x869 @0x2a
0x83f…89d at002b = ╱fe0000b406╱ // 0x86a @0x2b
0x83f…89d at0030 = ╱ee╱)╱ // 0x86f @0x30
0x83f…89d at0031 = ╱eb╱;╱ // 0x870 @0x31
0x83f…89d at0032 = ╱50╱P╱ // 0x871 @0x32
0x83f…89d at0033 = ╱4f╱O╱ // 0x872 @0x33
0x83f…89d at0034 = ╱53╱S╱ // 0x873 @0x34
0x83f…89d at0035 = ╱54╱T╱ // 0x874 @0x35
0x83f…89d at0036 = ╱34╱4╱ // 0x875 @0x36
0x83f…89d at0037 = ╱ef╱$╱ // 0x876 @0x37
0x83f…89d at0038 = ╱ed╱(╱ // 0x877 @0x38
0x83f…89d at0039 = ╱45╱E╱ // 0x878 @0x39
0x83f…89d at003a = ╱ec╱,╱ // 0x879 @0x3a
0x83f…89d at003b = ╱34╱4╱ // 0x87a @0x3b
0x83f…89d at003c = ╱fe00008003╱ // 0x87b @0x3c
0x83f…89d at0041 = ╱ee╱)╱ // 0x880 @0x41
0x83f…89d at0042 = ╱eb╱;╱ // 0x881 @0x42
0x83f…89d at0043 = ╱22╱"╱ // 0x882 @0x43
0x83f…89d at0044 = ╱20╱…╱ // 0x883 @0x44
0x83f…89d at0045 = ╱22╱"╱ // 0x884 @0x45
0x83f…89d at0046 = ╱eb╱;╱ // 0x885 @0x46
0x83f…89d at0047 = ╱50╱P╱ // 0x886 @0x47
0x83f…89d at0048 = ╱4f╱O╱ // 0x887 @0x48
0x83f…89d at0049 = ╱53╱S╱ // 0x888 @0x49
0x83f…89d at004a = ╱54╱T╱ // 0x889 @0x4a
0x83f…89d at004b = ╱34╱4╱ // 0x88a @0x4b
0x83f…89d at004c = ╱ef╱$╱ // 0x88b @0x4c
0x83f…89d at004d = ╱ed╱(╱ // 0x88c @0x4d
0x83f…89d at004e = ╱35╱5╱ // 0x88d @0x4e
0x83f…89d at004f = ╱fe0000a003╱ // 0x88e @0x4f
0x83f…89d at0054 = ╱ec╱,╱ // 0x893 @0x54
0x83f…89d at0055 = ╱31╱1╱ // 0x894 @0x55
0x83f…89d at0056 = ╱38╱8╱ // 0x895 @0x56
0x83f…89d at0057 = ╱fe00009005╱ // 0x896 @0x57
0x83f…89d at005c = ╱ee╱)╱ // 0x89b @0x5c
0x83f…89d at005d = EOL // 0x89c @0x5d
0x83f…89d }
0x89d…8d8 962f 1862 PRINT TAB(5);POST2$(E,4);" ";POST2$(5,18)
0x89d…8d8 LineComalBin {
0x89d…8d8 ptr = 0x962f // 0x89d @0x0
0x89d…8d8 lno = 0x0746 // 0x89f @0x2
0x89d…8d8 at0004 = ╱92╱ PRINT ╱ // 0x8a1 @0x4
0x89d…8d8 at0005 = ╱d2╱TAB╱ // 0x8a2 @0x5
0x89d…8d8 at0006 = ╱ed╱(╱ // 0x8a3 @0x6
0x89d…8d8 at0007 = ╱35╱5╱ // 0x8a4 @0x7
0x89d…8d8 at0008 = ╱fe0000a003╱ // 0x8a5 @0x8
0x89d…8d8 at000d = ╱ee╱)╱ // 0x8aa @0xd
0x89d…8d8 at000e = ╱eb╱;╱ // 0x8ab @0xe
0x89d…8d8 at000f = ╱50╱P╱ // 0x8ac @0xf
0x89d…8d8 at0010 = ╱4f╱O╱ // 0x8ad @0x10
0x89d…8d8 at0011 = ╱53╱S╱ // 0x8ae @0x11
0x89d…8d8 at0012 = ╱54╱T╱ // 0x8af @0x12
0x89d…8d8 at0013 = ╱32╱2╱ // 0x8b0 @0x13
0x89d…8d8 at0014 = ╱ef╱$╱ // 0x8b1 @0x14
0x89d…8d8 at0015 = ╱ed╱(╱ // 0x8b2 @0x15
0x89d…8d8 at0016 = ╱45╱E╱ // 0x8b3 @0x16
0x89d…8d8 at0017 = ╱ec╱,╱ // 0x8b4 @0x17
0x89d…8d8 at0018 = ╱34╱4╱ // 0x8b5 @0x18
0x89d…8d8 at0019 = ╱fe00008003╱ // 0x8b6 @0x19
0x89d…8d8 at001e = ╱ee╱)╱ // 0x8bb @0x1e
0x89d…8d8 at001f = ╱eb╱;╱ // 0x8bc @0x1f
0x89d…8d8 at0020 = ╱22╱"╱ // 0x8bd @0x20
0x89d…8d8 at0021 = ╱20╱…╱ // 0x8be @0x21
0x89d…8d8 at0022 = ╱22╱"╱ // 0x8bf @0x22
0x89d…8d8 at0023 = ╱eb╱;╱ // 0x8c0 @0x23
0x89d…8d8 at0024 = ╱50╱P╱ // 0x8c1 @0x24
0x89d…8d8 at0025 = ╱4f╱O╱ // 0x8c2 @0x25
0x89d…8d8 at0026 = ╱53╱S╱ // 0x8c3 @0x26
0x89d…8d8 at0027 = ╱54╱T╱ // 0x8c4 @0x27
0x89d…8d8 at0028 = ╱32╱2╱ // 0x8c5 @0x28
0x89d…8d8 at0029 = ╱ef╱$╱ // 0x8c6 @0x29
0x89d…8d8 at002a = ╱ed╱(╱ // 0x8c7 @0x2a
0x89d…8d8 at002b = ╱35╱5╱ // 0x8c8 @0x2b
0x89d…8d8 at002c = ╱fe0000a003╱ // 0x8c9 @0x2c
0x89d…8d8 at0031 = ╱ec╱,╱ // 0x8ce @0x31
0x89d…8d8 at0032 = ╱31╱1╱ // 0x8cf @0x32
0x89d…8d8 at0033 = ╱38╱8╱ // 0x8d0 @0x33
0x89d…8d8 at0034 = ╱fe00009005╱ // 0x8d1 @0x34
0x89d…8d8 at0039 = ╱ee╱)╱ // 0x8d6 @0x39
0x89d…8d8 at003a = EOL // 0x8d7 @0x3a
0x89d…8d8 }
0x8d8…8de 9635 1864 PRINT
0x8d8…8de LineComalBin {
0x8d8…8de ptr = 0x9635 // 0x8d8 @0x0
0x8d8…8de lno = 0x0748 // 0x8da @0x2
0x8d8…8de at0004 = ╱92╱ PRINT ╱ // 0x8dc @0x4
0x8d8…8de at0005 = EOL // 0x8dd @0x5
0x8d8…8de }
0x8de…8e4 963b 1866 PRINT
0x8de…8e4 LineComalBin {
0x8de…8e4 ptr = 0x963b // 0x8de @0x0
0x8de…8e4 lno = 0x074a // 0x8e0 @0x2
0x8de…8e4 at0004 = ╱92╱ PRINT ╱ // 0x8e2 @0x4
0x8de…8e4 at0005 = EOL // 0x8e3 @0x5
0x8de…8e4 }
0x8e4…91e 9675 1868 PRINT TAB(22);"REG NR TK KONTO NR";TAB(65);"KRONER"
0x8e4…91e LineComalBin {
0x8e4…91e ptr = 0x9675 // 0x8e4 @0x0
0x8e4…91e lno = 0x074c // 0x8e6 @0x2
0x8e4…91e at0004 = ╱92╱ PRINT ╱ // 0x8e8 @0x4
0x8e4…91e at0005 = ╱d2╱TAB╱ // 0x8e9 @0x5
0x8e4…91e at0006 = ╱ed╱(╱ // 0x8ea @0x6
0x8e4…91e at0007 = ╱32╱2╱ // 0x8eb @0x7
0x8e4…91e at0008 = ╱32╱2╱ // 0x8ec @0x8
0x8e4…91e at0009 = ╱fe0000b005╱ // 0x8ed @0x9
0x8e4…91e at000e = ╱ee╱)╱ // 0x8f2 @0xe
0x8e4…91e at000f = ╱eb╱;╱ // 0x8f3 @0xf
0x8e4…91e at0010 = ╱22╱"╱ // 0x8f4 @0x10
0x8e4…91e at0011 = ╱52╱R╱ // 0x8f5 @0x11
0x8e4…91e at0012 = ╱45╱E╱ // 0x8f6 @0x12
0x8e4…91e at0013 = ╱47╱G╱ // 0x8f7 @0x13
0x8e4…91e at0014 = ╱20╱…╱ // 0x8f8 @0x14
0x8e4…91e at0015 = ╱4e╱N╱ // 0x8f9 @0x15
0x8e4…91e at0016 = ╱52╱R╱ // 0x8fa @0x16
0x8e4…91e at0017 = ╱20╱…╱ // 0x8fb @0x17
0x8e4…91e at0018 = ╱20╱…╱ // 0x8fc @0x18
0x8e4…91e at0019 = ╱54╱T╱ // 0x8fd @0x19
0x8e4…91e at001a = ╱4b╱K╱ // 0x8fe @0x1a
0x8e4…91e at001b = ╱20╱…╱ // 0x8ff @0x1b
0x8e4…91e at001c = ╱4b╱K╱ // 0x900 @0x1c
0x8e4…91e at001d = ╱4f╱O╱ // 0x901 @0x1d
0x8e4…91e at001e = ╱4e╱N╱ // 0x902 @0x1e
0x8e4…91e at001f = ╱54╱T╱ // 0x903 @0x1f
0x8e4…91e at0020 = ╱4f╱O╱ // 0x904 @0x20
0x8e4…91e at0021 = ╱20╱…╱ // 0x905 @0x21
0x8e4…91e at0022 = ╱4e╱N╱ // 0x906 @0x22
0x8e4…91e at0023 = ╱52╱R╱ // 0x907 @0x23
0x8e4…91e at0024 = ╱22╱"╱ // 0x908 @0x24
0x8e4…91e at0025 = ╱eb╱;╱ // 0x909 @0x25
0x8e4…91e at0026 = ╱d2╱TAB╱ // 0x90a @0x26
0x8e4…91e at0027 = ╱ed╱(╱ // 0x90b @0x27
0x8e4…91e at0028 = ╱36╱6╱ // 0x90c @0x28
0x8e4…91e at0029 = ╱35╱5╱ // 0x90d @0x29
0x8e4…91e at002a = ╱fe00008207╱ // 0x90e @0x2a
0x8e4…91e at002f = ╱ee╱)╱ // 0x913 @0x2f
0x8e4…91e at0030 = ╱eb╱;╱ // 0x914 @0x30
0x8e4…91e at0031 = ╱22╱"╱ // 0x915 @0x31
0x8e4…91e at0032 = ╱4b╱K╱ // 0x916 @0x32
0x8e4…91e at0033 = ╱52╱R╱ // 0x917 @0x33
0x8e4…91e at0034 = ╱4f╱O╱ // 0x918 @0x34
0x8e4…91e at0035 = ╱4e╱N╱ // 0x919 @0x35
0x8e4…91e at0036 = ╱45╱E╱ // 0x91a @0x36
0x8e4…91e at0037 = ╱52╱R╱ // 0x91b @0x37
0x8e4…91e at0038 = ╱22╱"╱ // 0x91c @0x38
0x8e4…91e at0039 = EOL // 0x91d @0x39
0x8e4…91e }
0x91e…924 967b 1870 PRINT
0x91e…924 LineComalBin {
0x91e…924 ptr = 0x967b // 0x91e @0x0
0x91e…924 lno = 0x074e // 0x920 @0x2
0x91e…924 at0004 = ╱92╱ PRINT ╱ // 0x922 @0x4
0x91e…924 at0005 = EOL // 0x923 @0x5
0x91e…924 }
0x924…935 968c 1872 FOR I=E TO 10
0x924…935 LineComalBin {
0x924…935 ptr = 0x968c // 0x924 @0x0
0x924…935 lno = 0x0750 // 0x926 @0x2
0x924…935 at0004 = ╱83╱ FOR ╱ // 0x928 @0x4
0x924…935 at0005 = ╱49╱I╱ // 0x929 @0x5
0x924…935 at0006 = ╱dc╱=╱ // 0x92a @0x6
0x924…935 at0007 = ╱45╱E╱ // 0x92b @0x7
0x924…935 at0008 = ╱b7╱ TO ╱ // 0x92c @0x8
0x924…935 at0009 = ╱31╱1╱ // 0x92d @0x9
0x924…935 at000a = ╱30╱0╱ // 0x92e @0xa
0x924…935 at000b = ╱fe0000a004╱ // 0x92f @0xb
0x924…935 at0010 = EOL // 0x934 @0x10
0x924…935 }
0x935…956 96ad 1874 IF RESUL$(I)=" " THEN RESUL$(I)="*"
0x935…956 LineComalBin {
0x935…956 ptr = 0x96ad // 0x935 @0x0
0x935…956 lno = 0x0752 // 0x937 @0x2
0x935…956 at0004 = ╱82╱ IF ╱ // 0x939 @0x4
0x935…956 at0005 = ╱52╱R╱ // 0x93a @0x5
0x935…956 at0006 = ╱45╱E╱ // 0x93b @0x6
0x935…956 at0007 = ╱53╱S╱ // 0x93c @0x7
0x935…956 at0008 = ╱55╱U╱ // 0x93d @0x8
0x935…956 at0009 = ╱4c╱L╱ // 0x93e @0x9
0x935…956 at000a = ╱ef╱$╱ // 0x93f @0xa
0x935…956 at000b = ╱ed╱(╱ // 0x940 @0xb
0x935…956 at000c = ╱49╱I╱ // 0x941 @0xc
0x935…956 at000d = ╱ee╱)╱ // 0x942 @0xd
0x935…956 at000e = ╱dc╱=╱ // 0x943 @0xe
0x935…956 at000f = ╱22╱"╱ // 0x944 @0xf
0x935…956 at0010 = ╱20╱…╱ // 0x945 @0x10
0x935…956 at0011 = ╱22╱"╱ // 0x946 @0x11
0x935…956 at0012 = ╱b6╱ THEN ╱ // 0x947 @0x12
0x935…956 at0013 = ╱52╱R╱ // 0x948 @0x13
0x935…956 at0014 = ╱45╱E╱ // 0x949 @0x14
0x935…956 at0015 = ╱53╱S╱ // 0x94a @0x15
0x935…956 at0016 = ╱55╱U╱ // 0x94b @0x16
0x935…956 at0017 = ╱4c╱L╱ // 0x94c @0x17
0x935…956 at0018 = ╱ef╱$╱ // 0x94d @0x18
0x935…956 at0019 = ╱ed╱(╱ // 0x94e @0x19
0x935…956 at001a = ╱49╱I╱ // 0x94f @0x1a
0x935…956 at001b = ╱ee╱)╱ // 0x950 @0x1b
0x935…956 at001c = ╱dc╱=╱ // 0x951 @0x1c
0x935…956 at001d = ╱22╱"╱ // 0x952 @0x1d
0x935…956 at001e = ╱2a╱*╱ // 0x953 @0x1e
0x935…956 at001f = ╱22╱"╱ // 0x954 @0x1f
0x935…956 at0020 = EOL // 0x955 @0x20
0x935…956 }
0x956…95d 96b4 1876 NEXT I
0x956…95d LineComalBin {
0x956…95d ptr = 0x96b4 // 0x956 @0x0
0x956…95d lno = 0x0754 // 0x958 @0x2
0x956…95d at0004 = ╱84╱ NEXT ╱ // 0x95a @0x4
0x956…95d at0005 = ╱49╱I╱ // 0x95b @0x5
0x956…95d at0006 = EOL // 0x95c @0x6
0x956…95d }
0x95d…987 96de 1878 PRINT TAB(8);"ANV/UDLIGNET";TAB(23);
0x95d…987 LineComalBin {
0x95d…987 ptr = 0x96de // 0x95d @0x0
0x95d…987 lno = 0x0756 // 0x95f @0x2
0x95d…987 at0004 = ╱92╱ PRINT ╱ // 0x961 @0x4
0x95d…987 at0005 = ╱d2╱TAB╱ // 0x962 @0x5
0x95d…987 at0006 = ╱ed╱(╱ // 0x963 @0x6
0x95d…987 at0007 = ╱38╱8╱ // 0x964 @0x7
0x95d…987 at0008 = ╱fe00008004╱ // 0x965 @0x8
0x95d…987 at000d = ╱ee╱)╱ // 0x96a @0xd
0x95d…987 at000e = ╱eb╱;╱ // 0x96b @0xe
0x95d…987 at000f = ╱22╱"╱ // 0x96c @0xf
0x95d…987 at0010 = ╱41╱A╱ // 0x96d @0x10
0x95d…987 at0011 = ╱4e╱N╱ // 0x96e @0x11
0x95d…987 at0012 = ╱56╱V╱ // 0x96f @0x12
0x95d…987 at0013 = ╱2f╱/╱ // 0x970 @0x13
0x95d…987 at0014 = ╱55╱U╱ // 0x971 @0x14
0x95d…987 at0015 = ╱44╱D╱ // 0x972 @0x15
0x95d…987 at0016 = ╱4c╱L╱ // 0x973 @0x16
0x95d…987 at0017 = ╱49╱I╱ // 0x974 @0x17
0x95d…987 at0018 = ╱47╱G╱ // 0x975 @0x18
0x95d…987 at0019 = ╱4e╱N╱ // 0x976 @0x19
0x95d…987 at001a = ╱45╱E╱ // 0x977 @0x1a
0x95d…987 at001b = ╱54╱T╱ // 0x978 @0x1b
0x95d…987 at001c = ╱22╱"╱ // 0x979 @0x1c
0x95d…987 at001d = ╱eb╱;╱ // 0x97a @0x1d
0x95d…987 at001e = ╱d2╱TAB╱ // 0x97b @0x1e
0x95d…987 at001f = ╱ed╱(╱ // 0x97c @0x1f
0x95d…987 at0020 = ╱32╱2╱ // 0x97d @0x20
0x95d…987 at0021 = ╱33╱3╱ // 0x97e @0x21
0x95d…987 at0022 = ╱fe0000b805╱ // 0x97f @0x22
0x95d…987 at0027 = ╱ee╱)╱ // 0x984 @0x27
0x95d…987 at0028 = ╱eb╱;╱ // 0x985 @0x28
0x95d…987 at0029 = EOL // 0x986 @0x29
0x95d…987 }
0x987…9aa 9701 1880 PRINT USING "##### 49 ":RPI MOD 10000;
0x987…9aa LineComalBin {
0x987…9aa ptr = 0x9701 // 0x987 @0x0
0x987…9aa lno = 0x0758 // 0x989 @0x2
0x987…9aa at0004 = ╱92╱ PRINT ╱ // 0x98b @0x4
0x987…9aa at0005 = ╱b9╱ USING ╱ // 0x98c @0x5
0x987…9aa at0006 = ╱22╱"╱ // 0x98d @0x6
0x987…9aa at0007 = ╱23╱#╱ // 0x98e @0x7
0x987…9aa at0008 = ╱23╱#╱ // 0x98f @0x8
0x987…9aa at0009 = ╱23╱#╱ // 0x990 @0x9
0x987…9aa at000a = ╱23╱#╱ // 0x991 @0xa
0x987…9aa at000b = ╱23╱#╱ // 0x992 @0xb
0x987…9aa at000c = ╱20╱…╱ // 0x993 @0xc
0x987…9aa at000d = ╱20╱…╱ // 0x994 @0xd
0x987…9aa at000e = ╱34╱4╱ // 0x995 @0xe
0x987…9aa at000f = ╱39╱9╱ // 0x996 @0xf
0x987…9aa at0010 = ╱20╱…╱ // 0x997 @0x10
0x987…9aa at0011 = ╱22╱"╱ // 0x998 @0x11
0x987…9aa at0012 = ╱f0╱:╱ // 0x999 @0x12
0x987…9aa at0013 = ╱52╱R╱ // 0x99a @0x13
0x987…9aa at0014 = ╱50╱P╱ // 0x99b @0x14
0x987…9aa at0015 = ╱49╱I╱ // 0x99c @0x15
0x987…9aa at0016 = ╱e8╱ MOD ╱ // 0x99d @0x16
0x987…9aa at0017 = ╱31╱1╱ // 0x99e @0x17
0x987…9aa at0018 = ╱30╱0╱ // 0x99f @0x18
0x987…9aa at0019 = ╱30╱0╱ // 0x9a0 @0x19
0x987…9aa at001a = ╱30╱0╱ // 0x9a1 @0x1a
0x987…9aa at001b = ╱30╱0╱ // 0x9a2 @0x1b
0x987…9aa at001c = ╱fe00409c0e╱ // 0x9a3 @0x1c
0x987…9aa at0021 = ╱eb╱;╱ // 0x9a8 @0x21
0x987…9aa at0022 = EOL // 0x9a9 @0x22
0x987…9aa }
0x9aa…9c4 971b 1882 EXEC CONV(OP1$,K1,5)
0x9aa…9c4 LineComalBin {
0x9aa…9c4 ptr = 0x971b // 0x9aa @0x0
0x9aa…9c4 lno = 0x075a // 0x9ac @0x2
0x9aa…9c4 at0004 = ╱9d╱ EXEC ╱ // 0x9ae @0x4
0x9aa…9c4 at0005 = ╱43╱C╱ // 0x9af @0x5
0x9aa…9c4 at0006 = ╱4f╱O╱ // 0x9b0 @0x6
0x9aa…9c4 at0007 = ╱4e╱N╱ // 0x9b1 @0x7
0x9aa…9c4 at0008 = ╱56╱V╱ // 0x9b2 @0x8
0x9aa…9c4 at0009 = ╱ed╱(╱ // 0x9b3 @0x9
0x9aa…9c4 at000a = ╱4f╱O╱ // 0x9b4 @0xa
0x9aa…9c4 at000b = ╱50╱P╱ // 0x9b5 @0xb
0x9aa…9c4 at000c = ╱31╱1╱ // 0x9b6 @0xc
0x9aa…9c4 at000d = ╱ef╱$╱ // 0x9b7 @0xd
0x9aa…9c4 at000e = ╱ec╱,╱ // 0x9b8 @0xe
0x9aa…9c4 at000f = ╱4b╱K╱ // 0x9b9 @0xf
0x9aa…9c4 at0010 = ╱31╱1╱ // 0x9ba @0x10
0x9aa…9c4 at0011 = ╱ec╱,╱ // 0x9bb @0x11
0x9aa…9c4 at0012 = ╱35╱5╱ // 0x9bc @0x12
0x9aa…9c4 at0013 = ╱fe0000a003╱ // 0x9bd @0x13
0x9aa…9c4 at0018 = ╱ee╱)╱ // 0x9c2 @0x18
0x9aa…9c4 at0019 = EOL // 0x9c3 @0x19
0x9aa…9c4 }
0x9c4…9de 9735 1884 EXEC CONV(OP2$,K2,5)
0x9c4…9de LineComalBin {
0x9c4…9de ptr = 0x9735 // 0x9c4 @0x0
0x9c4…9de lno = 0x075c // 0x9c6 @0x2
0x9c4…9de at0004 = ╱9d╱ EXEC ╱ // 0x9c8 @0x4
0x9c4…9de at0005 = ╱43╱C╱ // 0x9c9 @0x5
0x9c4…9de at0006 = ╱4f╱O╱ // 0x9ca @0x6
0x9c4…9de at0007 = ╱4e╱N╱ // 0x9cb @0x7
0x9c4…9de at0008 = ╱56╱V╱ // 0x9cc @0x8
0x9c4…9de at0009 = ╱ed╱(╱ // 0x9cd @0x9
0x9c4…9de at000a = ╱4f╱O╱ // 0x9ce @0xa
0x9c4…9de at000b = ╱50╱P╱ // 0x9cf @0xb
0x9c4…9de at000c = ╱32╱2╱ // 0x9d0 @0xc
0x9c4…9de at000d = ╱ef╱$╱ // 0x9d1 @0xd
0x9c4…9de at000e = ╱ec╱,╱ // 0x9d2 @0xe
0x9c4…9de at000f = ╱4b╱K╱ // 0x9d3 @0xf
0x9c4…9de at0010 = ╱32╱2╱ // 0x9d4 @0x10
0x9c4…9de at0011 = ╱ec╱,╱ // 0x9d5 @0x11
0x9c4…9de at0012 = ╱35╱5╱ // 0x9d6 @0x12
0x9c4…9de at0013 = ╱fe0000a003╱ // 0x9d7 @0x13
0x9c4…9de at0018 = ╱ee╱)╱ // 0x9dc @0x18
0x9c4…9de at0019 = EOL // 0x9dd @0x19
0x9c4…9de }
0x9de…9f1 9748 1886 OP1$=OP1$+OP2$
0x9de…9f1 LineComalBin {
0x9de…9f1 ptr = 0x9748 // 0x9de @0x0
0x9de…9f1 lno = 0x075e // 0x9e0 @0x2
0x9de…9f1 at0004 = ╱4f╱O╱ // 0x9e2 @0x4
0x9de…9f1 at0005 = ╱50╱P╱ // 0x9e3 @0x5
0x9de…9f1 at0006 = ╱31╱1╱ // 0x9e4 @0x6
0x9de…9f1 at0007 = ╱ef╱$╱ // 0x9e5 @0x7
0x9de…9f1 at0008 = ╱dc╱=╱ // 0x9e6 @0x8
0x9de…9f1 at0009 = ╱4f╱O╱ // 0x9e7 @0x9
0x9de…9f1 at000a = ╱50╱P╱ // 0x9e8 @0xa
0x9de…9f1 at000b = ╱31╱1╱ // 0x9e9 @0xb
0x9de…9f1 at000c = ╱ef╱$╱ // 0x9ea @0xc
0x9de…9f1 at000d = ╱f1╱+╱ // 0x9eb @0xd
0x9de…9f1 at000e = ╱4f╱O╱ // 0x9ec @0xe
0x9de…9f1 at000f = ╱50╱P╱ // 0x9ed @0xf
0x9de…9f1 at0010 = ╱32╱2╱ // 0x9ee @0x10
0x9de…9f1 at0011 = ╱ef╱$╱ // 0x9ef @0x11
0x9de…9f1 at0012 = EOL // 0x9f0 @0x12
0x9de…9f1 }
0x9f1…a18 976f 1888 PRINT OP1$;TAB(61);RESUL$(E,10)
0x9f1…a18 LineComalBin {
0x9f1…a18 ptr = 0x976f // 0x9f1 @0x0
0x9f1…a18 lno = 0x0760 // 0x9f3 @0x2
0x9f1…a18 at0004 = ╱92╱ PRINT ╱ // 0x9f5 @0x4
0x9f1…a18 at0005 = ╱4f╱O╱ // 0x9f6 @0x5
0x9f1…a18 at0006 = ╱50╱P╱ // 0x9f7 @0x6
0x9f1…a18 at0007 = ╱31╱1╱ // 0x9f8 @0x7
0x9f1…a18 at0008 = ╱ef╱$╱ // 0x9f9 @0x8
0x9f1…a18 at0009 = ╱eb╱;╱ // 0x9fa @0x9
0x9f1…a18 at000a = ╱d2╱TAB╱ // 0x9fb @0xa
0x9f1…a18 at000b = ╱ed╱(╱ // 0x9fc @0xb
0x9f1…a18 at000c = ╱36╱6╱ // 0x9fd @0xc
0x9f1…a18 at000d = ╱31╱1╱ // 0x9fe @0xd
0x9f1…a18 at000e = ╱fe0000f406╱ // 0x9ff @0xe
0x9f1…a18 at0013 = ╱ee╱)╱ // 0xa04 @0x13
0x9f1…a18 at0014 = ╱eb╱;╱ // 0xa05 @0x14
0x9f1…a18 at0015 = ╱52╱R╱ // 0xa06 @0x15
0x9f1…a18 at0016 = ╱45╱E╱ // 0xa07 @0x16
0x9f1…a18 at0017 = ╱53╱S╱ // 0xa08 @0x17
0x9f1…a18 at0018 = ╱55╱U╱ // 0xa09 @0x18
0x9f1…a18 at0019 = ╱4c╱L╱ // 0xa0a @0x19
0x9f1…a18 at001a = ╱ef╱$╱ // 0xa0b @0x1a
0x9f1…a18 at001b = ╱ed╱(╱ // 0xa0c @0x1b
0x9f1…a18 at001c = ╱45╱E╱ // 0xa0d @0x1c
0x9f1…a18 at001d = ╱ec╱,╱ // 0xa0e @0x1d
0x9f1…a18 at001e = ╱31╱1╱ // 0xa0f @0x1e
0x9f1…a18 at001f = ╱30╱0╱ // 0xa10 @0x1f
0x9f1…a18 at0020 = ╱fe0000a004╱ // 0xa11 @0x20
0x9f1…a18 at0025 = ╱ee╱)╱ // 0xa16 @0x25
0x9f1…a18 at0026 = EOL // 0xa17 @0x26
0x9f1…a18 }
0xa18…a28 977f 1890 FOR I=E TO 7
0xa18…a28 LineComalBin {
0xa18…a28 ptr = 0x977f // 0xa18 @0x0
0xa18…a28 lno = 0x0762 // 0xa1a @0x2
0xa18…a28 at0004 = ╱83╱ FOR ╱ // 0xa1c @0x4
0xa18…a28 at0005 = ╱49╱I╱ // 0xa1d @0x5
0xa18…a28 at0006 = ╱dc╱=╱ // 0xa1e @0x6
0xa18…a28 at0007 = ╱45╱E╱ // 0xa1f @0x7
0xa18…a28 at0008 = ╱b7╱ TO ╱ // 0xa20 @0x8
0xa18…a28 at0009 = ╱37╱7╱ // 0xa21 @0x9
0xa18…a28 at000a = ╱fe0000e003╱ // 0xa22 @0xa
0xa18…a28 at000f = EOL // 0xa27 @0xf
0xa18…a28 }
0xa28…a2e 9785 1892 PRINT
0xa28…a2e LineComalBin {
0xa28…a2e ptr = 0x9785 // 0xa28 @0x0
0xa28…a2e lno = 0x0764 // 0xa2a @0x2
0xa28…a2e at0004 = ╱92╱ PRINT ╱ // 0xa2c @0x4
0xa28…a2e at0005 = EOL // 0xa2d @0x5
0xa28…a2e }
0xa2e…a35 978c 1894 NEXT I
0xa2e…a35 LineComalBin {
0xa2e…a35 ptr = 0x978c // 0xa2e @0x0
0xa2e…a35 lno = 0x0766 // 0xa30 @0x2
0xa2e…a35 at0004 = ╱84╱ NEXT ╱ // 0xa32 @0x4
0xa2e…a35 at0005 = ╱49╱I╱ // 0xa33 @0x5
0xa2e…a35 at0006 = EOL // 0xa34 @0x6
0xa2e…a35 }
0xa35…a4d 97a4 2000 LINIE=LINIE+24
0xa35…a4d LineComalBin {
0xa35…a4d ptr = 0x97a4 // 0xa35 @0x0
0xa35…a4d lno = 0x07d0 // 0xa37 @0x2
0xa35…a4d at0004 = ╱4c╱L╱ // 0xa39 @0x4
0xa35…a4d at0005 = ╱49╱I╱ // 0xa3a @0x5
0xa35…a4d at0006 = ╱4e╱N╱ // 0xa3b @0x6
0xa35…a4d at0007 = ╱49╱I╱ // 0xa3c @0x7
0xa35…a4d at0008 = ╱45╱E╱ // 0xa3d @0x8
0xa35…a4d at0009 = ╱dc╱=╱ // 0xa3e @0x9
0xa35…a4d at000a = ╱4c╱L╱ // 0xa3f @0xa
0xa35…a4d at000b = ╱49╱I╱ // 0xa40 @0xb
0xa35…a4d at000c = ╱4e╱N╱ // 0xa41 @0xc
0xa35…a4d at000d = ╱49╱I╱ // 0xa42 @0xd
0xa35…a4d at000e = ╱45╱E╱ // 0xa43 @0xe
0xa35…a4d at000f = ╱e2╱+╱ // 0xa44 @0xf
0xa35…a4d at0010 = ╱32╱2╱ // 0xa45 @0x10
0xa35…a4d at0011 = ╱34╱4╱ // 0xa46 @0x11
0xa35…a4d at0012 = ╱fe0000c005╱ // 0xa47 @0x12
0xa35…a4d at0017 = EOL // 0xa4c @0x17
0xa35…a4d }
0xa4d…a92 97e9 2075 PRINT "============================================================";
0xa4d…a92 LineComalBin {
0xa4d…a92 ptr = 0x97e9 // 0xa4d @0x0
0xa4d…a92 lno = 0x081b // 0xa4f @0x2
0xa4d…a92 at0004 = ╱92╱ PRINT ╱ // 0xa51 @0x4
0xa4d…a92 at0005 = ╱22╱"╱ // 0xa52 @0x5
0xa4d…a92 at0006 = ╱3d╱=╱ // 0xa53 @0x6
0xa4d…a92 at0007 = ╱3d╱=╱ // 0xa54 @0x7
0xa4d…a92 at0008 = ╱3d╱=╱ // 0xa55 @0x8
0xa4d…a92 at0009 = ╱3d╱=╱ // 0xa56 @0x9
0xa4d…a92 at000a = ╱3d╱=╱ // 0xa57 @0xa
0xa4d…a92 at000b = ╱3d╱=╱ // 0xa58 @0xb
0xa4d…a92 at000c = ╱3d╱=╱ // 0xa59 @0xc
0xa4d…a92 at000d = ╱3d╱=╱ // 0xa5a @0xd
0xa4d…a92 at000e = ╱3d╱=╱ // 0xa5b @0xe
0xa4d…a92 at000f = ╱3d╱=╱ // 0xa5c @0xf
0xa4d…a92 at0010 = ╱3d╱=╱ // 0xa5d @0x10
0xa4d…a92 at0011 = ╱3d╱=╱ // 0xa5e @0x11
0xa4d…a92 at0012 = ╱3d╱=╱ // 0xa5f @0x12
0xa4d…a92 at0013 = ╱3d╱=╱ // 0xa60 @0x13
0xa4d…a92 at0014 = ╱3d╱=╱ // 0xa61 @0x14
0xa4d…a92 at0015 = ╱3d╱=╱ // 0xa62 @0x15
0xa4d…a92 at0016 = ╱3d╱=╱ // 0xa63 @0x16
0xa4d…a92 at0017 = ╱3d╱=╱ // 0xa64 @0x17
0xa4d…a92 at0018 = ╱3d╱=╱ // 0xa65 @0x18
0xa4d…a92 at0019 = ╱3d╱=╱ // 0xa66 @0x19
0xa4d…a92 at001a = ╱3d╱=╱ // 0xa67 @0x1a
0xa4d…a92 at001b = ╱3d╱=╱ // 0xa68 @0x1b
0xa4d…a92 at001c = ╱3d╱=╱ // 0xa69 @0x1c
0xa4d…a92 at001d = ╱3d╱=╱ // 0xa6a @0x1d
0xa4d…a92 at001e = ╱3d╱=╱ // 0xa6b @0x1e
0xa4d…a92 at001f = ╱3d╱=╱ // 0xa6c @0x1f
0xa4d…a92 at0020 = ╱3d╱=╱ // 0xa6d @0x20
0xa4d…a92 at0021 = ╱3d╱=╱ // 0xa6e @0x21
0xa4d…a92 at0022 = ╱3d╱=╱ // 0xa6f @0x22
0xa4d…a92 at0023 = ╱3d╱=╱ // 0xa70 @0x23
0xa4d…a92 at0024 = ╱3d╱=╱ // 0xa71 @0x24
0xa4d…a92 at0025 = ╱3d╱=╱ // 0xa72 @0x25
0xa4d…a92 at0026 = ╱3d╱=╱ // 0xa73 @0x26
0xa4d…a92 at0027 = ╱3d╱=╱ // 0xa74 @0x27
0xa4d…a92 at0028 = ╱3d╱=╱ // 0xa75 @0x28
0xa4d…a92 at0029 = ╱3d╱=╱ // 0xa76 @0x29
0xa4d…a92 at002a = ╱3d╱=╱ // 0xa77 @0x2a
0xa4d…a92 at002b = ╱3d╱=╱ // 0xa78 @0x2b
0xa4d…a92 at002c = ╱3d╱=╱ // 0xa79 @0x2c
0xa4d…a92 at002d = ╱3d╱=╱ // 0xa7a @0x2d
0xa4d…a92 at002e = ╱3d╱=╱ // 0xa7b @0x2e
0xa4d…a92 at002f = ╱3d╱=╱ // 0xa7c @0x2f
0xa4d…a92 at0030 = ╱3d╱=╱ // 0xa7d @0x30
0xa4d…a92 at0031 = ╱3d╱=╱ // 0xa7e @0x31
0xa4d…a92 at0032 = ╱3d╱=╱ // 0xa7f @0x32
0xa4d…a92 at0033 = ╱3d╱=╱ // 0xa80 @0x33
0xa4d…a92 at0034 = ╱3d╱=╱ // 0xa81 @0x34
0xa4d…a92 at0035 = ╱3d╱=╱ // 0xa82 @0x35
0xa4d…a92 at0036 = ╱3d╱=╱ // 0xa83 @0x36
0xa4d…a92 at0037 = ╱3d╱=╱ // 0xa84 @0x37
0xa4d…a92 at0038 = ╱3d╱=╱ // 0xa85 @0x38
0xa4d…a92 at0039 = ╱3d╱=╱ // 0xa86 @0x39
0xa4d…a92 at003a = ╱3d╱=╱ // 0xa87 @0x3a
0xa4d…a92 at003b = ╱3d╱=╱ // 0xa88 @0x3b
0xa4d…a92 at003c = ╱3d╱=╱ // 0xa89 @0x3c
0xa4d…a92 at003d = ╱3d╱=╱ // 0xa8a @0x3d
0xa4d…a92 at003e = ╱3d╱=╱ // 0xa8b @0x3e
0xa4d…a92 at003f = ╱3d╱=╱ // 0xa8c @0x3f
0xa4d…a92 at0040 = ╱3d╱=╱ // 0xa8d @0x40
0xa4d…a92 at0041 = ╱3d╱=╱ // 0xa8e @0x41
0xa4d…a92 at0042 = ╱22╱"╱ // 0xa8f @0x42
0xa4d…a92 at0043 = ╱eb╱;╱ // 0xa90 @0x43
0xa4d…a92 at0044 = EOL // 0xa91 @0x44
0xa4d…a92 }
0xa92…aae 9805 2076 PRINT "===================";
0xa92…aae LineComalBin {
0xa92…aae ptr = 0x9805 // 0xa92 @0x0
0xa92…aae lno = 0x081c // 0xa94 @0x2
0xa92…aae at0004 = ╱92╱ PRINT ╱ // 0xa96 @0x4
0xa92…aae at0005 = ╱22╱"╱ // 0xa97 @0x5
0xa92…aae at0006 = ╱3d╱=╱ // 0xa98 @0x6
0xa92…aae at0007 = ╱3d╱=╱ // 0xa99 @0x7
0xa92…aae at0008 = ╱3d╱=╱ // 0xa9a @0x8
0xa92…aae at0009 = ╱3d╱=╱ // 0xa9b @0x9
0xa92…aae at000a = ╱3d╱=╱ // 0xa9c @0xa
0xa92…aae at000b = ╱3d╱=╱ // 0xa9d @0xb
0xa92…aae at000c = ╱3d╱=╱ // 0xa9e @0xc
0xa92…aae at000d = ╱3d╱=╱ // 0xa9f @0xd
0xa92…aae at000e = ╱3d╱=╱ // 0xaa0 @0xe
0xa92…aae at000f = ╱3d╱=╱ // 0xaa1 @0xf
0xa92…aae at0010 = ╱3d╱=╱ // 0xaa2 @0x10
0xa92…aae at0011 = ╱3d╱=╱ // 0xaa3 @0x11
0xa92…aae at0012 = ╱3d╱=╱ // 0xaa4 @0x12
0xa92…aae at0013 = ╱3d╱=╱ // 0xaa5 @0x13
0xa92…aae at0014 = ╱3d╱=╱ // 0xaa6 @0x14
0xa92…aae at0015 = ╱3d╱=╱ // 0xaa7 @0x15
0xa92…aae at0016 = ╱3d╱=╱ // 0xaa8 @0x16
0xa92…aae at0017 = ╱3d╱=╱ // 0xaa9 @0x17
0xa92…aae at0018 = ╱3d╱=╱ // 0xaaa @0x18
0xa92…aae at0019 = ╱22╱"╱ // 0xaab @0x19
0xa92…aae at001a = ╱eb╱;╱ // 0xaac @0x1a
0xa92…aae at001b = EOL // 0xaad @0x1b
0xa92…aae }
0xaae…ac4 981b 2080 GET MF5$:LMNR,RESUL$
0xaae…ac4 LineComalBin {
0xaae…ac4 ptr = 0x981b // 0xaae @0x0
0xaae…ac4 lno = 0x0820 // 0xab0 @0x2
0xaae…ac4 at0004 = ╱a9╱ GET ╱ // 0xab2 @0x4
0xaae…ac4 at0005 = ╱4d╱M╱ // 0xab3 @0x5
0xaae…ac4 at0006 = ╱46╱F╱ // 0xab4 @0x6
0xaae…ac4 at0007 = ╱35╱5╱ // 0xab5 @0x7
0xaae…ac4 at0008 = ╱ef╱$╱ // 0xab6 @0x8
0xaae…ac4 at0009 = ╱f0╱:╱ // 0xab7 @0x9
0xaae…ac4 at000a = ╱4c╱L╱ // 0xab8 @0xa
0xaae…ac4 at000b = ╱4d╱M╱ // 0xab9 @0xb
0xaae…ac4 at000c = ╱4e╱N╱ // 0xaba @0xc
0xaae…ac4 at000d = ╱52╱R╱ // 0xabb @0xd
0xaae…ac4 at000e = ╱ec╱,╱ // 0xabc @0xe
0xaae…ac4 at000f = ╱52╱R╱ // 0xabd @0xf
0xaae…ac4 at0010 = ╱45╱E╱ // 0xabe @0x10
0xaae…ac4 at0011 = ╱53╱S╱ // 0xabf @0x11
0xaae…ac4 at0012 = ╱55╱U╱ // 0xac0 @0x12
0xaae…ac4 at0013 = ╱4c╱L╱ // 0xac1 @0x13
0xaae…ac4 at0014 = ╱ef╱$╱ // 0xac2 @0x14
0xaae…ac4 at0015 = EOL // 0xac3 @0x15
0xaae…ac4 }
0xac4…aca 9821 2090 ENDWHILE
0xac4…aca LineComalBin {
0xac4…aca ptr = 0x9821 // 0xac4 @0x0
0xac4…aca lno = 0x082a // 0xac6 @0x2
0xac4…aca at0004 = ╱94╱ ENDWHILE ╱ // 0xac8 @0x4
0xac4…aca at0005 = EOL // 0xac9 @0x5
0xac4…aca }
0xaca…af2 9849 2095 IF STATUS(MF5$)<>19 THEN EXEC FEJL(LMNR,B,MF5$)
0xaca…af2 LineComalBin {
0xaca…af2 ptr = 0x9849 // 0xaca @0x0
0xaca…af2 lno = 0x082f // 0xacc @0x2
0xaca…af2 at0004 = ╱82╱ IF ╱ // 0xace @0x4
0xaca…af2 at0005 = ╱ce╱STATUS╱ // 0xacf @0x5
0xaca…af2 at0006 = ╱ed╱(╱ // 0xad0 @0x6
0xaca…af2 at0007 = ╱4d╱M╱ // 0xad1 @0x7
0xaca…af2 at0008 = ╱46╱F╱ // 0xad2 @0x8
0xaca…af2 at0009 = ╱35╱5╱ // 0xad3 @0x9
0xaca…af2 at000a = ╱ef╱$╱ // 0xad4 @0xa
0xaca…af2 at000b = ╱ee╱)╱ // 0xad5 @0xb
0xaca…af2 at000c = ╱e1╱<>╱ // 0xad6 @0xc
0xaca…af2 at000d = ╱31╱1╱ // 0xad7 @0xd
0xaca…af2 at000e = ╱39╱9╱ // 0xad8 @0xe
0xaca…af2 at000f = ╱fe00009805╱ // 0xad9 @0xf
0xaca…af2 at0014 = ╱b6╱ THEN ╱ // 0xade @0x14
0xaca…af2 at0015 = ╱9d╱ EXEC ╱ // 0xadf @0x15
0xaca…af2 at0016 = ╱46╱F╱ // 0xae0 @0x16
0xaca…af2 at0017 = ╱45╱E╱ // 0xae1 @0x17
0xaca…af2 at0018 = ╱4a╱J╱ // 0xae2 @0x18
0xaca…af2 at0019 = ╱4c╱L╱ // 0xae3 @0x19
0xaca…af2 at001a = ╱ed╱(╱ // 0xae4 @0x1a
0xaca…af2 at001b = ╱4c╱L╱ // 0xae5 @0x1b
0xaca…af2 at001c = ╱4d╱M╱ // 0xae6 @0x1c
0xaca…af2 at001d = ╱4e╱N╱ // 0xae7 @0x1d
0xaca…af2 at001e = ╱52╱R╱ // 0xae8 @0x1e
0xaca…af2 at001f = ╱ec╱,╱ // 0xae9 @0x1f
0xaca…af2 at0020 = ╱42╱B╱ // 0xaea @0x20
0xaca…af2 at0021 = ╱ec╱,╱ // 0xaeb @0x21
0xaca…af2 at0022 = ╱4d╱M╱ // 0xaec @0x22
0xaca…af2 at0023 = ╱46╱F╱ // 0xaed @0x23
0xaca…af2 at0024 = ╱35╱5╱ // 0xaee @0x24
0xaca…af2 at0025 = ╱ef╱$╱ // 0xaef @0x25
0xaca…af2 at0026 = ╱ee╱)╱ // 0xaf0 @0x26
0xaca…af2 at0027 = EOL // 0xaf1 @0x27
0xaca…af2 }
0xaf2…b04 985b 2130 FOR I=E TO 100
0xaf2…b04 LineComalBin {
0xaf2…b04 ptr = 0x985b // 0xaf2 @0x0
0xaf2…b04 lno = 0x0852 // 0xaf4 @0x2
0xaf2…b04 at0004 = ╱83╱ FOR ╱ // 0xaf6 @0x4
0xaf2…b04 at0005 = ╱49╱I╱ // 0xaf7 @0x5
0xaf2…b04 at0006 = ╱dc╱=╱ // 0xaf8 @0x6
0xaf2…b04 at0007 = ╱45╱E╱ // 0xaf9 @0x7
0xaf2…b04 at0008 = ╱b7╱ TO ╱ // 0xafa @0x8
0xaf2…b04 at0009 = ╱31╱1╱ // 0xafb @0x9
0xaf2…b04 at000a = ╱30╱0╱ // 0xafc @0xa
0xaf2…b04 at000b = ╱30╱0╱ // 0xafd @0xb
0xaf2…b04 at000c = ╱fe0000c807╱ // 0xafe @0xc
0xaf2…b04 at0011 = EOL // 0xb03 @0x11
0xaf2…b04 }
0xb04…b12 9869 2140 IF AB(I)>B THEN
0xb04…b12 LineComalBin {
0xb04…b12 ptr = 0x9869 // 0xb04 @0x0
0xb04…b12 lno = 0x085c // 0xb06 @0x2
0xb04…b12 at0004 = ╱9c╱ IF ╱ // 0xb08 @0x4
0xb04…b12 at0005 = ╱41╱A╱ // 0xb09 @0x5
0xb04…b12 at0006 = ╱42╱B╱ // 0xb0a @0x6
0xb04…b12 at0007 = ╱ed╱(╱ // 0xb0b @0x7
0xb04…b12 at0008 = ╱49╱I╱ // 0xb0c @0x8
0xb04…b12 at0009 = ╱ee╱)╱ // 0xb0d @0x9
0xb04…b12 at000a = ╱de╱>╱ // 0xb0e @0xa
0xb04…b12 at000b = ╱42╱B╱ // 0xb0f @0xb
0xb04…b12 at000c = ╱b6╱ THEN ╱ // 0xb10 @0xc
0xb04…b12 at000d = EOL // 0xb11 @0xd
0xb04…b12 }
0xb12…b18 986f 2150 PRINT
0xb12…b18 LineComalBin {
0xb12…b18 ptr = 0x986f // 0xb12 @0x0
0xb12…b18 lno = 0x0866 // 0xb14 @0x2
0xb12…b18 at0004 = ╱92╱ PRINT ╱ // 0xb16 @0x4
0xb12…b18 at0005 = EOL // 0xb17 @0x5
0xb12…b18 }
0xb18…b1e 9875 2160 PRINT
0xb18…b1e LineComalBin {
0xb18…b1e ptr = 0x9875 // 0xb18 @0x0
0xb18…b1e lno = 0x0870 // 0xb1a @0x2
0xb18…b1e at0004 = ╱92╱ PRINT ╱ // 0xb1c @0x4
0xb18…b1e at0005 = EOL // 0xb1d @0x5
0xb18…b1e }
0xb1e…b43 989a 2170 PRINT TAB(5);"UDSKRIFTSDATO ";DAD$
0xb1e…b43 LineComalBin {
0xb1e…b43 ptr = 0x989a // 0xb1e @0x0
0xb1e…b43 lno = 0x087a // 0xb20 @0x2
0xb1e…b43 at0004 = ╱92╱ PRINT ╱ // 0xb22 @0x4
0xb1e…b43 at0005 = ╱d2╱TAB╱ // 0xb23 @0x5
0xb1e…b43 at0006 = ╱ed╱(╱ // 0xb24 @0x6
0xb1e…b43 at0007 = ╱35╱5╱ // 0xb25 @0x7
0xb1e…b43 at0008 = ╱fe0000a003╱ // 0xb26 @0x8
0xb1e…b43 at000d = ╱ee╱)╱ // 0xb2b @0xd
0xb1e…b43 at000e = ╱eb╱;╱ // 0xb2c @0xe
0xb1e…b43 at000f = ╱22╱"╱ // 0xb2d @0xf
0xb1e…b43 at0010 = ╱55╱U╱ // 0xb2e @0x10
0xb1e…b43 at0011 = ╱44╱D╱ // 0xb2f @0x11
0xb1e…b43 at0012 = ╱53╱S╱ // 0xb30 @0x12
0xb1e…b43 at0013 = ╱4b╱K╱ // 0xb31 @0x13
0xb1e…b43 at0014 = ╱52╱R╱ // 0xb32 @0x14
0xb1e…b43 at0015 = ╱49╱I╱ // 0xb33 @0x15
0xb1e…b43 at0016 = ╱46╱F╱ // 0xb34 @0x16
0xb1e…b43 at0017 = ╱54╱T╱ // 0xb35 @0x17
0xb1e…b43 at0018 = ╱53╱S╱ // 0xb36 @0x18
0xb1e…b43 at0019 = ╱44╱D╱ // 0xb37 @0x19
0xb1e…b43 at001a = ╱41╱A╱ // 0xb38 @0x1a
0xb1e…b43 at001b = ╱54╱T╱ // 0xb39 @0x1b
0xb1e…b43 at001c = ╱4f╱O╱ // 0xb3a @0x1c
0xb1e…b43 at001d = ╱20╱…╱ // 0xb3b @0x1d
0xb1e…b43 at001e = ╱22╱"╱ // 0xb3c @0x1e
0xb1e…b43 at001f = ╱eb╱;╱ // 0xb3d @0x1f
0xb1e…b43 at0020 = ╱44╱D╱ // 0xb3e @0x20
0xb1e…b43 at0021 = ╱41╱A╱ // 0xb3f @0x21
0xb1e…b43 at0022 = ╱44╱D╱ // 0xb40 @0x22
0xb1e…b43 at0023 = ╱ef╱$╱ // 0xb41 @0x23
0xb1e…b43 at0024 = EOL // 0xb42 @0x24
0xb1e…b43 }
0xb43…b49 98a0 2180 PRINT
0xb43…b49 LineComalBin {
0xb43…b49 ptr = 0x98a0 // 0xb43 @0x0
0xb43…b49 lno = 0x0884 // 0xb45 @0x2
0xb43…b49 at0004 = ╱92╱ PRINT ╱ // 0xb47 @0x4
0xb43…b49 at0005 = EOL // 0xb48 @0x5
0xb43…b49 }
0xb49…b6e 98c5 2200 PRINT TAB(5);"LØNKONTOFØRENDE PI";
0xb49…b6e LineComalBin {
0xb49…b6e ptr = 0x98c5 // 0xb49 @0x0
0xb49…b6e lno = 0x0898 // 0xb4b @0x2
0xb49…b6e at0004 = ╱92╱ PRINT ╱ // 0xb4d @0x4
0xb49…b6e at0005 = ╱d2╱TAB╱ // 0xb4e @0x5
0xb49…b6e at0006 = ╱ed╱(╱ // 0xb4f @0x6
0xb49…b6e at0007 = ╱35╱5╱ // 0xb50 @0x7
0xb49…b6e at0008 = ╱fe0000a003╱ // 0xb51 @0x8
0xb49…b6e at000d = ╱ee╱)╱ // 0xb56 @0xd
0xb49…b6e at000e = ╱eb╱;╱ // 0xb57 @0xe
0xb49…b6e at000f = ╱22╱"╱ // 0xb58 @0xf
0xb49…b6e at0010 = ╱4c╱L╱ // 0xb59 @0x10
0xb49…b6e at0011 = ╱5c╱Ø╱ // 0xb5a @0x11
0xb49…b6e at0012 = ╱4e╱N╱ // 0xb5b @0x12
0xb49…b6e at0013 = ╱4b╱K╱ // 0xb5c @0x13
0xb49…b6e at0014 = ╱4f╱O╱ // 0xb5d @0x14
0xb49…b6e at0015 = ╱4e╱N╱ // 0xb5e @0x15
0xb49…b6e at0016 = ╱54╱T╱ // 0xb5f @0x16
0xb49…b6e at0017 = ╱4f╱O╱ // 0xb60 @0x17
0xb49…b6e at0018 = ╱46╱F╱ // 0xb61 @0x18
0xb49…b6e at0019 = ╱5c╱Ø╱ // 0xb62 @0x19
0xb49…b6e at001a = ╱52╱R╱ // 0xb63 @0x1a
0xb49…b6e at001b = ╱45╱E╱ // 0xb64 @0x1b
0xb49…b6e at001c = ╱4e╱N╱ // 0xb65 @0x1c
0xb49…b6e at001d = ╱44╱D╱ // 0xb66 @0x1d
0xb49…b6e at001e = ╱45╱E╱ // 0xb67 @0x1e
0xb49…b6e at001f = ╱20╱…╱ // 0xb68 @0x1f
0xb49…b6e at0020 = ╱50╱P╱ // 0xb69 @0x20
0xb49…b6e at0021 = ╱49╱I╱ // 0xb6a @0x21
0xb49…b6e at0022 = ╱22╱"╱ // 0xb6b @0x22
0xb49…b6e at0023 = ╱eb╱;╱ // 0xb6c @0x23
0xb49…b6e at0024 = EOL // 0xb6d @0x24
0xb49…b6e }
0xb6e…b7f (38,) 98d6 2210 PRINT USING "###":I-E;
0xb6e…b7f LineComalBin {
0xb6e…b7f ptr = 0x98d6 // 0xb6e @0x0
0xb6e…b7f lno = 0x08a2 // 0xb70 @0x2
0xb6e…b7f at0004 = ╱92╱ PRINT ╱ // 0xb72 @0x4
0xb6e…b7f at0005 = ╱b9╱ USING ╱ // 0xb73 @0x5
0xb6e…b7f at0006 = ╱22╱"╱ // 0xb74 @0x6
0xb6e…b7f at0007 = ╱23╱#╱ // 0xb75 @0x7
0xb6e…b7f at0008 = ╱23╱#╱ // 0xb76 @0x8
0xb6e…b7f at0009 = ╱23╱#╱ // 0xb77 @0x9
0xb6e…b7f at000a = ╱22╱"╱ // 0xb78 @0xa
0xb6e…b7f at000b = ╱f0╱:╱ // 0xb79 @0xb
0xb6e…b7f at000c = ╱49╱I╱ // 0xb7a @0xc
0xb6e…b7f at000d = ╱e3╱-╱ // 0xb7b @0xd
0xb6e…b7f at000e = ╱45╱E╱ // 0xb7c @0xe
0xb6e…b7f at000f = ╱eb╱;╱ // 0xb7d @0xf
0xb6e…b7f at0010 = EOL // 0xb7e @0x10
0xb6e…b7f }
0xb7f…bd3 992a 2220 PRINT TAB(45);"AFTALENUMMER ";POST4$(19,22);"/";POST4$(23,24)
0xb7f…bd3 LineComalBin {
0xb7f…bd3 ptr = 0x992a // 0xb7f @0x0
0xb7f…bd3 lno = 0x08ac // 0xb81 @0x2
0xb7f…bd3 at0004 = ╱92╱ PRINT ╱ // 0xb83 @0x4
0xb7f…bd3 at0005 = ╱d2╱TAB╱ // 0xb84 @0x5
0xb7f…bd3 at0006 = ╱ed╱(╱ // 0xb85 @0x6
0xb7f…bd3 at0007 = ╱34╱4╱ // 0xb86 @0x7
0xb7f…bd3 at0008 = ╱35╱5╱ // 0xb87 @0x8
0xb7f…bd3 at0009 = ╱fe0000b406╱ // 0xb88 @0x9
0xb7f…bd3 at000e = ╱ee╱)╱ // 0xb8d @0xe
0xb7f…bd3 at000f = ╱eb╱;╱ // 0xb8e @0xf
0xb7f…bd3 at0010 = ╱22╱"╱ // 0xb8f @0x10
0xb7f…bd3 at0011 = ╱41╱A╱ // 0xb90 @0x11
0xb7f…bd3 at0012 = ╱46╱F╱ // 0xb91 @0x12
0xb7f…bd3 at0013 = ╱54╱T╱ // 0xb92 @0x13
0xb7f…bd3 at0014 = ╱41╱A╱ // 0xb93 @0x14
0xb7f…bd3 at0015 = ╱4c╱L╱ // 0xb94 @0x15
0xb7f…bd3 at0016 = ╱45╱E╱ // 0xb95 @0x16
0xb7f…bd3 at0017 = ╱4e╱N╱ // 0xb96 @0x17
0xb7f…bd3 at0018 = ╱55╱U╱ // 0xb97 @0x18
0xb7f…bd3 at0019 = ╱4d╱M╱ // 0xb98 @0x19
0xb7f…bd3 at001a = ╱4d╱M╱ // 0xb99 @0x1a
0xb7f…bd3 at001b = ╱45╱E╱ // 0xb9a @0x1b
0xb7f…bd3 at001c = ╱52╱R╱ // 0xb9b @0x1c
0xb7f…bd3 at001d = ╱20╱…╱ // 0xb9c @0x1d
0xb7f…bd3 at001e = ╱22╱"╱ // 0xb9d @0x1e
0xb7f…bd3 at001f = ╱eb╱;╱ // 0xb9e @0x1f
0xb7f…bd3 at0020 = ╱50╱P╱ // 0xb9f @0x20
0xb7f…bd3 at0021 = ╱4f╱O╱ // 0xba0 @0x21
0xb7f…bd3 at0022 = ╱53╱S╱ // 0xba1 @0x22
0xb7f…bd3 at0023 = ╱54╱T╱ // 0xba2 @0x23
0xb7f…bd3 at0024 = ╱34╱4╱ // 0xba3 @0x24
0xb7f…bd3 at0025 = ╱ef╱$╱ // 0xba4 @0x25
0xb7f…bd3 at0026 = ╱ed╱(╱ // 0xba5 @0x26
0xb7f…bd3 at0027 = ╱31╱1╱ // 0xba6 @0x27
0xb7f…bd3 at0028 = ╱39╱9╱ // 0xba7 @0x28
0xb7f…bd3 at0029 = ╱fe00009805╱ // 0xba8 @0x29
0xb7f…bd3 at002e = ╱ec╱,╱ // 0xbad @0x2e
0xb7f…bd3 at002f = ╱32╱2╱ // 0xbae @0x2f
0xb7f…bd3 at0030 = ╱32╱2╱ // 0xbaf @0x30
0xb7f…bd3 at0031 = ╱fe0000b005╱ // 0xbb0 @0x31
0xb7f…bd3 at0036 = ╱ee╱)╱ // 0xbb5 @0x36
0xb7f…bd3 at0037 = ╱eb╱;╱ // 0xbb6 @0x37
0xb7f…bd3 at0038 = ╱22╱"╱ // 0xbb7 @0x38
0xb7f…bd3 at0039 = ╱2f╱/╱ // 0xbb8 @0x39
0xb7f…bd3 at003a = ╱22╱"╱ // 0xbb9 @0x3a
0xb7f…bd3 at003b = ╱eb╱;╱ // 0xbba @0x3b
0xb7f…bd3 at003c = ╱50╱P╱ // 0xbbb @0x3c
0xb7f…bd3 at003d = ╱4f╱O╱ // 0xbbc @0x3d
0xb7f…bd3 at003e = ╱53╱S╱ // 0xbbd @0x3e
0xb7f…bd3 at003f = ╱54╱T╱ // 0xbbe @0x3f
0xb7f…bd3 at0040 = ╱34╱4╱ // 0xbbf @0x40
0xb7f…bd3 at0041 = ╱ef╱$╱ // 0xbc0 @0x41
0xb7f…bd3 at0042 = ╱ed╱(╱ // 0xbc1 @0x42
0xb7f…bd3 at0043 = ╱32╱2╱ // 0xbc2 @0x43
0xb7f…bd3 at0044 = ╱33╱3╱ // 0xbc3 @0x44
0xb7f…bd3 at0045 = ╱fe0000b805╱ // 0xbc4 @0x45
0xb7f…bd3 at004a = ╱ec╱,╱ // 0xbc9 @0x4a
0xb7f…bd3 at004b = ╱32╱2╱ // 0xbca @0x4b
0xb7f…bd3 at004c = ╱34╱4╱ // 0xbcb @0x4c
0xb7f…bd3 at004d = ╱fe0000c005╱ // 0xbcc @0x4d
0xb7f…bd3 at0052 = ╱ee╱)╱ // 0xbd1 @0x52
0xb7f…bd3 at0053 = EOL // 0xbd2 @0x53
0xb7f…bd3 }
0xbd3…c1b 9972 2230 PRINT TAB(5);"DISPOSITIONSDAG ";STARTPER$;TAB(45);"ARBEJDSGIVER ";
0xbd3…c1b LineComalBin {
0xbd3…c1b ptr = 0x9972 // 0xbd3 @0x0
0xbd3…c1b lno = 0x08b6 // 0xbd5 @0x2
0xbd3…c1b at0004 = ╱92╱ PRINT ╱ // 0xbd7 @0x4
0xbd3…c1b at0005 = ╱d2╱TAB╱ // 0xbd8 @0x5
0xbd3…c1b at0006 = ╱ed╱(╱ // 0xbd9 @0x6
0xbd3…c1b at0007 = ╱35╱5╱ // 0xbda @0x7
0xbd3…c1b at0008 = ╱fe0000a003╱ // 0xbdb @0x8
0xbd3…c1b at000d = ╱ee╱)╱ // 0xbe0 @0xd
0xbd3…c1b at000e = ╱eb╱;╱ // 0xbe1 @0xe
0xbd3…c1b at000f = ╱22╱"╱ // 0xbe2 @0xf
0xbd3…c1b at0010 = ╱44╱D╱ // 0xbe3 @0x10
0xbd3…c1b at0011 = ╱49╱I╱ // 0xbe4 @0x11
0xbd3…c1b at0012 = ╱53╱S╱ // 0xbe5 @0x12
0xbd3…c1b at0013 = ╱50╱P╱ // 0xbe6 @0x13
0xbd3…c1b at0014 = ╱4f╱O╱ // 0xbe7 @0x14
0xbd3…c1b at0015 = ╱53╱S╱ // 0xbe8 @0x15
0xbd3…c1b at0016 = ╱49╱I╱ // 0xbe9 @0x16
0xbd3…c1b at0017 = ╱54╱T╱ // 0xbea @0x17
0xbd3…c1b at0018 = ╱49╱I╱ // 0xbeb @0x18
0xbd3…c1b at0019 = ╱4f╱O╱ // 0xbec @0x19
0xbd3…c1b at001a = ╱4e╱N╱ // 0xbed @0x1a
0xbd3…c1b at001b = ╱53╱S╱ // 0xbee @0x1b
0xbd3…c1b at001c = ╱44╱D╱ // 0xbef @0x1c
0xbd3…c1b at001d = ╱41╱A╱ // 0xbf0 @0x1d
0xbd3…c1b at001e = ╱47╱G╱ // 0xbf1 @0x1e
0xbd3…c1b at001f = ╱20╱…╱ // 0xbf2 @0x1f
0xbd3…c1b at0020 = ╱22╱"╱ // 0xbf3 @0x20
0xbd3…c1b at0021 = ╱eb╱;╱ // 0xbf4 @0x21
0xbd3…c1b at0022 = ╱53╱S╱ // 0xbf5 @0x22
0xbd3…c1b at0023 = ╱54╱T╱ // 0xbf6 @0x23
0xbd3…c1b at0024 = ╱41╱A╱ // 0xbf7 @0x24
0xbd3…c1b at0025 = ╱52╱R╱ // 0xbf8 @0x25
0xbd3…c1b at0026 = ╱54╱T╱ // 0xbf9 @0x26
0xbd3…c1b at0027 = ╱50╱P╱ // 0xbfa @0x27
0xbd3…c1b at0028 = ╱45╱E╱ // 0xbfb @0x28
0xbd3…c1b at0029 = ╱52╱R╱ // 0xbfc @0x29
0xbd3…c1b at002a = ╱ef╱$╱ // 0xbfd @0x2a
0xbd3…c1b at002b = ╱eb╱;╱ // 0xbfe @0x2b
0xbd3…c1b at002c = ╱d2╱TAB╱ // 0xbff @0x2c
0xbd3…c1b at002d = ╱ed╱(╱ // 0xc00 @0x2d
0xbd3…c1b at002e = ╱34╱4╱ // 0xc01 @0x2e
0xbd3…c1b at002f = ╱35╱5╱ // 0xc02 @0x2f
0xbd3…c1b at0030 = ╱fe0000b406╱ // 0xc03 @0x30
0xbd3…c1b at0035 = ╱ee╱)╱ // 0xc08 @0x35
0xbd3…c1b at0036 = ╱eb╱;╱ // 0xc09 @0x36
0xbd3…c1b at0037 = ╱22╱"╱ // 0xc0a @0x37
0xbd3…c1b at0038 = ╱41╱A╱ // 0xc0b @0x38
0xbd3…c1b at0039 = ╱52╱R╱ // 0xc0c @0x39
0xbd3…c1b at003a = ╱42╱B╱ // 0xc0d @0x3a
0xbd3…c1b at003b = ╱45╱E╱ // 0xc0e @0x3b
0xbd3…c1b at003c = ╱4a╱J╱ // 0xc0f @0x3c
0xbd3…c1b at003d = ╱44╱D╱ // 0xc10 @0x3d
0xbd3…c1b at003e = ╱53╱S╱ // 0xc11 @0x3e
0xbd3…c1b at003f = ╱47╱G╱ // 0xc12 @0x3f
0xbd3…c1b at0040 = ╱49╱I╱ // 0xc13 @0x40
0xbd3…c1b at0041 = ╱56╱V╱ // 0xc14 @0x41
0xbd3…c1b at0042 = ╱45╱E╱ // 0xc15 @0x42
0xbd3…c1b at0043 = ╱52╱R╱ // 0xc16 @0x43
0xbd3…c1b at0044 = ╱20╱…╱ // 0xc17 @0x44
0xbd3…c1b at0045 = ╱22╱"╱ // 0xc18 @0x45
0xbd3…c1b at0046 = ╱eb╱;╱ // 0xc19 @0x46
0xbd3…c1b at0047 = EOL // 0xc1a @0x47
0xbd3…c1b }
0xc1b…c38 998f 2240 PRINT POST4$(25,34)
0xc1b…c38 LineComalBin {
0xc1b…c38 ptr = 0x998f // 0xc1b @0x0
0xc1b…c38 lno = 0x08c0 // 0xc1d @0x2
0xc1b…c38 at0004 = ╱92╱ PRINT ╱ // 0xc1f @0x4
0xc1b…c38 at0005 = ╱50╱P╱ // 0xc20 @0x5
0xc1b…c38 at0006 = ╱4f╱O╱ // 0xc21 @0x6
0xc1b…c38 at0007 = ╱53╱S╱ // 0xc22 @0x7
0xc1b…c38 at0008 = ╱54╱T╱ // 0xc23 @0x8
0xc1b…c38 at0009 = ╱34╱4╱ // 0xc24 @0x9
0xc1b…c38 at000a = ╱ef╱$╱ // 0xc25 @0xa
0xc1b…c38 at000b = ╱ed╱(╱ // 0xc26 @0xb
0xc1b…c38 at000c = ╱32╱2╱ // 0xc27 @0xc
0xc1b…c38 at000d = ╱35╱5╱ // 0xc28 @0xd
0xc1b…c38 at000e = ╱fe0000c805╱ // 0xc29 @0xe
0xc1b…c38 at0013 = ╱ec╱,╱ // 0xc2e @0x13
0xc1b…c38 at0014 = ╱33╱3╱ // 0xc2f @0x14
0xc1b…c38 at0015 = ╱34╱4╱ // 0xc30 @0x15
0xc1b…c38 at0016 = ╱fe00008806╱ // 0xc31 @0x16
0xc1b…c38 at001b = ╱ee╱)╱ // 0xc36 @0x1b
0xc1b…c38 at001c = EOL // 0xc37 @0x1c
0xc1b…c38 }
0xc38…c3e 9995 2250 PRINT
0xc38…c3e LineComalBin {
0xc38…c3e ptr = 0x9995 // 0xc38 @0x0
0xc38…c3e lno = 0x08ca // 0xc3a @0x2
0xc38…c3e at0004 = ╱92╱ PRINT ╱ // 0xc3c @0x4
0xc38…c3e at0005 = EOL // 0xc3d @0x5
0xc38…c3e }
0xc3e…c44 999b 2260 PRINT
0xc3e…c44 LineComalBin {
0xc3e…c44 ptr = 0x999b // 0xc3e @0x0
0xc3e…c44 lno = 0x08d4 // 0xc40 @0x2
0xc3e…c44 at0004 = ╱92╱ PRINT ╱ // 0xc42 @0x4
0xc3e…c44 at0005 = EOL // 0xc43 @0x5
0xc3e…c44 }
0xc44…c6d 99c4 2270 PRINT TAB(5);"**T O T A L B I L A G**"
0xc44…c6d LineComalBin {
0xc44…c6d ptr = 0x99c4 // 0xc44 @0x0
0xc44…c6d lno = 0x08de // 0xc46 @0x2
0xc44…c6d at0004 = ╱92╱ PRINT ╱ // 0xc48 @0x4
0xc44…c6d at0005 = ╱d2╱TAB╱ // 0xc49 @0x5
0xc44…c6d at0006 = ╱ed╱(╱ // 0xc4a @0x6
0xc44…c6d at0007 = ╱35╱5╱ // 0xc4b @0x7
0xc44…c6d at0008 = ╱fe0000a003╱ // 0xc4c @0x8
0xc44…c6d at000d = ╱ee╱)╱ // 0xc51 @0xd
0xc44…c6d at000e = ╱eb╱;╱ // 0xc52 @0xe
0xc44…c6d at000f = ╱22╱"╱ // 0xc53 @0xf
0xc44…c6d at0010 = ╱2a╱*╱ // 0xc54 @0x10
0xc44…c6d at0011 = ╱2a╱*╱ // 0xc55 @0x11
0xc44…c6d at0012 = ╱54╱T╱ // 0xc56 @0x12
0xc44…c6d at0013 = ╱20╱…╱ // 0xc57 @0x13
0xc44…c6d at0014 = ╱4f╱O╱ // 0xc58 @0x14
0xc44…c6d at0015 = ╱20╱…╱ // 0xc59 @0x15
0xc44…c6d at0016 = ╱54╱T╱ // 0xc5a @0x16
0xc44…c6d at0017 = ╱20╱…╱ // 0xc5b @0x17
0xc44…c6d at0018 = ╱41╱A╱ // 0xc5c @0x18
0xc44…c6d at0019 = ╱20╱…╱ // 0xc5d @0x19
0xc44…c6d at001a = ╱4c╱L╱ // 0xc5e @0x1a
0xc44…c6d at001b = ╱20╱…╱ // 0xc5f @0x1b
0xc44…c6d at001c = ╱42╱B╱ // 0xc60 @0x1c
0xc44…c6d at001d = ╱20╱…╱ // 0xc61 @0x1d
0xc44…c6d at001e = ╱49╱I╱ // 0xc62 @0x1e
0xc44…c6d at001f = ╱20╱…╱ // 0xc63 @0x1f
0xc44…c6d at0020 = ╱4c╱L╱ // 0xc64 @0x20
0xc44…c6d at0021 = ╱20╱…╱ // 0xc65 @0x21
0xc44…c6d at0022 = ╱41╱A╱ // 0xc66 @0x22
0xc44…c6d at0023 = ╱20╱…╱ // 0xc67 @0x23
0xc44…c6d at0024 = ╱47╱G╱ // 0xc68 @0x24
0xc44…c6d at0025 = ╱2a╱*╱ // 0xc69 @0x25
0xc44…c6d at0026 = ╱2a╱*╱ // 0xc6a @0x26
0xc44…c6d at0027 = ╱22╱"╱ // 0xc6b @0x27
0xc44…c6d at0028 = EOL // 0xc6c @0x28
0xc44…c6d }
0xc6d…c73 99ca 2280 PRINT
0xc6d…c73 LineComalBin {
0xc6d…c73 ptr = 0x99ca // 0xc6d @0x0
0xc6d…c73 lno = 0x08e8 // 0xc6f @0x2
0xc6d…c73 at0004 = ╱92╱ PRINT ╱ // 0xc71 @0x4
0xc6d…c73 at0005 = EOL // 0xc72 @0x5
0xc6d…c73 }
0xc73…c79 99d0 2290 PRINT
0xc73…c79 LineComalBin {
0xc73…c79 ptr = 0x99d0 // 0xc73 @0x0
0xc73…c79 lno = 0x08f2 // 0xc75 @0x2
0xc73…c79 at0004 = ╱92╱ PRINT ╱ // 0xc77 @0x4
0xc73…c79 at0005 = EOL // 0xc78 @0x5
0xc73…c79 }
0xc79…c7f 99d6 2300 PRINT
0xc79…c7f LineComalBin {
0xc79…c7f ptr = 0x99d6 // 0xc79 @0x0
0xc79…c7f lno = 0x08fc // 0xc7b @0x2
0xc79…c7f at0004 = ╱92╱ PRINT ╱ // 0xc7d @0x4
0xc79…c7f at0005 = EOL // 0xc7e @0x5
0xc79…c7f }
0xc7f…c85 99dc 2310 PRINT
0xc7f…c85 LineComalBin {
0xc7f…c85 ptr = 0x99dc // 0xc7f @0x0
0xc7f…c85 lno = 0x0906 // 0xc81 @0x2
0xc7f…c85 at0004 = ╱92╱ PRINT ╱ // 0xc83 @0x4
0xc7f…c85 at0005 = EOL // 0xc84 @0x5
0xc7f…c85 }
0xc85…c9e 99f5 2320 PRINT TAB(65);"KRONER"
0xc85…c9e LineComalBin {
0xc85…c9e ptr = 0x99f5 // 0xc85 @0x0
0xc85…c9e lno = 0x0910 // 0xc87 @0x2
0xc85…c9e at0004 = ╱92╱ PRINT ╱ // 0xc89 @0x4
0xc85…c9e at0005 = ╱d2╱TAB╱ // 0xc8a @0x5
0xc85…c9e at0006 = ╱ed╱(╱ // 0xc8b @0x6
0xc85…c9e at0007 = ╱36╱6╱ // 0xc8c @0x7
0xc85…c9e at0008 = ╱35╱5╱ // 0xc8d @0x8
0xc85…c9e at0009 = ╱fe00008207╱ // 0xc8e @0x9
0xc85…c9e at000e = ╱ee╱)╱ // 0xc93 @0xe
0xc85…c9e at000f = ╱eb╱;╱ // 0xc94 @0xf
0xc85…c9e at0010 = ╱22╱"╱ // 0xc95 @0x10
0xc85…c9e at0011 = ╱4b╱K╱ // 0xc96 @0x11
0xc85…c9e at0012 = ╱52╱R╱ // 0xc97 @0x12
0xc85…c9e at0013 = ╱4f╱O╱ // 0xc98 @0x13
0xc85…c9e at0014 = ╱4e╱N╱ // 0xc99 @0x14
0xc85…c9e at0015 = ╱45╱E╱ // 0xc9a @0x15
0xc85…c9e at0016 = ╱52╱R╱ // 0xc9b @0x16
0xc85…c9e at0017 = ╱22╱"╱ // 0xc9c @0x17
0xc85…c9e at0018 = EOL // 0xc9d @0x18
0xc85…c9e }
0xc9e…ca4 99fb 2330 PRINT
0xc9e…ca4 LineComalBin {
0xc9e…ca4 ptr = 0x99fb // 0xc9e @0x0
0xc9e…ca4 lno = 0x091a // 0xca0 @0x2
0xc9e…ca4 at0004 = ╱92╱ PRINT ╱ // 0xca2 @0x4
0xc9e…ca4 at0005 = EOL // 0xca3 @0x5
0xc9e…ca4 }
0xca4…cb5 9a0c 2340 FOR J=E TO 11
0xca4…cb5 LineComalBin {
0xca4…cb5 ptr = 0x9a0c // 0xca4 @0x0
0xca4…cb5 lno = 0x0924 // 0xca6 @0x2
0xca4…cb5 at0004 = ╱83╱ FOR ╱ // 0xca8 @0x4
0xca4…cb5 at0005 = ╱4a╱J╱ // 0xca9 @0x5
0xca4…cb5 at0006 = ╱dc╱=╱ // 0xcaa @0x6
0xca4…cb5 at0007 = ╱45╱E╱ // 0xcab @0x7
0xca4…cb5 at0008 = ╱b7╱ TO ╱ // 0xcac @0x8
0xca4…cb5 at0009 = ╱31╱1╱ // 0xcad @0x9
0xca4…cb5 at000a = ╱31╱1╱ // 0xcae @0xa
0xca4…cb5 at000b = ╱fe0000b004╱ // 0xcaf @0xb
0xca4…cb5 at0010 = EOL // 0xcb4 @0x10
0xca4…cb5 }
0xcb5…cda 9a31 2350 IF TOTAL$(I,J)=" " THEN TOTAL$(I,J)="*"
0xcb5…cda LineComalBin {
0xcb5…cda ptr = 0x9a31 // 0xcb5 @0x0
0xcb5…cda lno = 0x092e // 0xcb7 @0x2
0xcb5…cda at0004 = ╱82╱ IF ╱ // 0xcb9 @0x4
0xcb5…cda at0005 = ╱54╱T╱ // 0xcba @0x5
0xcb5…cda at0006 = ╱4f╱O╱ // 0xcbb @0x6
0xcb5…cda at0007 = ╱54╱T╱ // 0xcbc @0x7
0xcb5…cda at0008 = ╱41╱A╱ // 0xcbd @0x8
0xcb5…cda at0009 = ╱4c╱L╱ // 0xcbe @0x9
0xcb5…cda at000a = ╱ef╱$╱ // 0xcbf @0xa
0xcb5…cda at000b = ╱ed╱(╱ // 0xcc0 @0xb
0xcb5…cda at000c = ╱49╱I╱ // 0xcc1 @0xc
0xcb5…cda at000d = ╱ec╱,╱ // 0xcc2 @0xd
0xcb5…cda at000e = ╱4a╱J╱ // 0xcc3 @0xe
0xcb5…cda at000f = ╱ee╱)╱ // 0xcc4 @0xf
0xcb5…cda at0010 = ╱dc╱=╱ // 0xcc5 @0x10
0xcb5…cda at0011 = ╱22╱"╱ // 0xcc6 @0x11
0xcb5…cda at0012 = ╱20╱…╱ // 0xcc7 @0x12
0xcb5…cda at0013 = ╱22╱"╱ // 0xcc8 @0x13
0xcb5…cda at0014 = ╱b6╱ THEN ╱ // 0xcc9 @0x14
0xcb5…cda at0015 = ╱54╱T╱ // 0xcca @0x15
0xcb5…cda at0016 = ╱4f╱O╱ // 0xccb @0x16
0xcb5…cda at0017 = ╱54╱T╱ // 0xccc @0x17
0xcb5…cda at0018 = ╱41╱A╱ // 0xccd @0x18
0xcb5…cda at0019 = ╱4c╱L╱ // 0xcce @0x19
0xcb5…cda at001a = ╱ef╱$╱ // 0xccf @0x1a
0xcb5…cda at001b = ╱ed╱(╱ // 0xcd0 @0x1b
0xcb5…cda at001c = ╱49╱I╱ // 0xcd1 @0x1c
0xcb5…cda at001d = ╱ec╱,╱ // 0xcd2 @0x1d
0xcb5…cda at001e = ╱4a╱J╱ // 0xcd3 @0x1e
0xcb5…cda at001f = ╱ee╱)╱ // 0xcd4 @0x1f
0xcb5…cda at0020 = ╱dc╱=╱ // 0xcd5 @0x20
0xcb5…cda at0021 = ╱22╱"╱ // 0xcd6 @0x21
0xcb5…cda at0022 = ╱2a╱*╱ // 0xcd7 @0x22
0xcb5…cda at0023 = ╱22╱"╱ // 0xcd8 @0x23
0xcb5…cda at0024 = EOL // 0xcd9 @0x24
0xcb5…cda }
0xcda…ce1 9a38 2360 NEXT J
0xcda…ce1 LineComalBin {
0xcda…ce1 ptr = 0x9a38 // 0xcda @0x0
0xcda…ce1 lno = 0x0938 // 0xcdc @0x2
0xcda…ce1 at0004 = ╱84╱ NEXT ╱ // 0xcde @0x4
0xcda…ce1 at0005 = ╱4a╱J╱ // 0xcdf @0x5
0xcda…ce1 at0006 = EOL // 0xce0 @0x6
0xcda…ce1 }
0xce1…d0a 9a61 2370 PRINT TAB(8);"ANTAL BILAG";TAB(24);
0xce1…d0a LineComalBin {
0xce1…d0a ptr = 0x9a61 // 0xce1 @0x0
0xce1…d0a lno = 0x0942 // 0xce3 @0x2
0xce1…d0a at0004 = ╱92╱ PRINT ╱ // 0xce5 @0x4
0xce1…d0a at0005 = ╱d2╱TAB╱ // 0xce6 @0x5
0xce1…d0a at0006 = ╱ed╱(╱ // 0xce7 @0x6
0xce1…d0a at0007 = ╱38╱8╱ // 0xce8 @0x7
0xce1…d0a at0008 = ╱fe00008004╱ // 0xce9 @0x8
0xce1…d0a at000d = ╱ee╱)╱ // 0xcee @0xd
0xce1…d0a at000e = ╱eb╱;╱ // 0xcef @0xe
0xce1…d0a at000f = ╱22╱"╱ // 0xcf0 @0xf
0xce1…d0a at0010 = ╱41╱A╱ // 0xcf1 @0x10
0xce1…d0a at0011 = ╱4e╱N╱ // 0xcf2 @0x11
0xce1…d0a at0012 = ╱54╱T╱ // 0xcf3 @0x12
0xce1…d0a at0013 = ╱41╱A╱ // 0xcf4 @0x13
0xce1…d0a at0014 = ╱4c╱L╱ // 0xcf5 @0x14
0xce1…d0a at0015 = ╱20╱…╱ // 0xcf6 @0x15
0xce1…d0a at0016 = ╱42╱B╱ // 0xcf7 @0x16
0xce1…d0a at0017 = ╱49╱I╱ // 0xcf8 @0x17
0xce1…d0a at0018 = ╱4c╱L╱ // 0xcf9 @0x18
0xce1…d0a at0019 = ╱41╱A╱ // 0xcfa @0x19
0xce1…d0a at001a = ╱47╱G╱ // 0xcfb @0x1a
0xce1…d0a at001b = ╱22╱"╱ // 0xcfc @0x1b
0xce1…d0a at001c = ╱eb╱;╱ // 0xcfd @0x1c
0xce1…d0a at001d = ╱d2╱TAB╱ // 0xcfe @0x1d
0xce1…d0a at001e = ╱ed╱(╱ // 0xcff @0x1e
0xce1…d0a at001f = ╱32╱2╱ // 0xd00 @0x1f
0xce1…d0a at0020 = ╱34╱4╱ // 0xd01 @0x20
0xce1…d0a at0021 = ╱fe0000c005╱ // 0xd02 @0x21
0xce1…d0a at0026 = ╱ee╱)╱ // 0xd07 @0x26
0xce1…d0a at0027 = ╱eb╱;╱ // 0xd08 @0x27
0xce1…d0a at0028 = EOL // 0xd09 @0x28
0xce1…d0a }
0xd0a…d1e 9a75 2380 PRINT USING "####":AB(I);
0xd0a…d1e LineComalBin {
0xd0a…d1e ptr = 0x9a75 // 0xd0a @0x0
0xd0a…d1e lno = 0x094c // 0xd0c @0x2
0xd0a…d1e at0004 = ╱92╱ PRINT ╱ // 0xd0e @0x4
0xd0a…d1e at0005 = ╱b9╱ USING ╱ // 0xd0f @0x5
0xd0a…d1e at0006 = ╱22╱"╱ // 0xd10 @0x6
0xd0a…d1e at0007 = ╱23╱#╱ // 0xd11 @0x7
0xd0a…d1e at0008 = ╱23╱#╱ // 0xd12 @0x8
0xd0a…d1e at0009 = ╱23╱#╱ // 0xd13 @0x9
0xd0a…d1e at000a = ╱23╱#╱ // 0xd14 @0xa
0xd0a…d1e at000b = ╱22╱"╱ // 0xd15 @0xb
0xd0a…d1e at000c = ╱f0╱:╱ // 0xd16 @0xc
0xd0a…d1e at000d = ╱41╱A╱ // 0xd17 @0xd
0xd0a…d1e at000e = ╱42╱B╱ // 0xd18 @0xe
0xd0a…d1e at000f = ╱ed╱(╱ // 0xd19 @0xf
0xd0a…d1e at0010 = ╱49╱I╱ // 0xd1a @0x10
0xd0a…d1e at0011 = ╱ee╱)╱ // 0xd1b @0x11
0xd0a…d1e at0012 = ╱eb╱;╱ // 0xd1c @0x12
0xd0a…d1e at0013 = EOL // 0xd1d @0x13
0xd0a…d1e }
0xd1e…d42 9a99 2390 PRINT TAB(60);TOTAL$(I,E,11)
0xd1e…d42 LineComalBin {
0xd1e…d42 ptr = 0x9a99 // 0xd1e @0x0
0xd1e…d42 lno = 0x0956 // 0xd20 @0x2
0xd1e…d42 at0004 = ╱92╱ PRINT ╱ // 0xd22 @0x4
0xd1e…d42 at0005 = ╱d2╱TAB╱ // 0xd23 @0x5
0xd1e…d42 at0006 = ╱ed╱(╱ // 0xd24 @0x6
0xd1e…d42 at0007 = ╱36╱6╱ // 0xd25 @0x7
0xd1e…d42 at0008 = ╱30╱0╱ // 0xd26 @0x8
0xd1e…d42 at0009 = ╱fe0000f006╱ // 0xd27 @0x9
0xd1e…d42 at000e = ╱ee╱)╱ // 0xd2c @0xe
0xd1e…d42 at000f = ╱eb╱;╱ // 0xd2d @0xf
0xd1e…d42 at0010 = ╱54╱T╱ // 0xd2e @0x10
0xd1e…d42 at0011 = ╱4f╱O╱ // 0xd2f @0x11
0xd1e…d42 at0012 = ╱54╱T╱ // 0xd30 @0x12
0xd1e…d42 at0013 = ╱41╱A╱ // 0xd31 @0x13
0xd1e…d42 at0014 = ╱4c╱L╱ // 0xd32 @0x14
0xd1e…d42 at0015 = ╱ef╱$╱ // 0xd33 @0x15
0xd1e…d42 at0016 = ╱ed╱(╱ // 0xd34 @0x16
0xd1e…d42 at0017 = ╱49╱I╱ // 0xd35 @0x17
0xd1e…d42 at0018 = ╱ec╱,╱ // 0xd36 @0x18
0xd1e…d42 at0019 = ╱45╱E╱ // 0xd37 @0x19
0xd1e…d42 at001a = ╱ec╱,╱ // 0xd38 @0x1a
0xd1e…d42 at001b = ╱31╱1╱ // 0xd39 @0x1b
0xd1e…d42 at001c = ╱31╱1╱ // 0xd3a @0x1c
0xd1e…d42 at001d = ╱fe0000b004╱ // 0xd3b @0x1d
0xd1e…d42 at0022 = ╱ee╱)╱ // 0xd40 @0x22
0xd1e…d42 at0023 = EOL // 0xd41 @0x23
0xd1e…d42 }
0xd42…d52 9aa9 2400 FOR J=E TO 7
0xd42…d52 LineComalBin {
0xd42…d52 ptr = 0x9aa9 // 0xd42 @0x0
0xd42…d52 lno = 0x0960 // 0xd44 @0x2
0xd42…d52 at0004 = ╱83╱ FOR ╱ // 0xd46 @0x4
0xd42…d52 at0005 = ╱4a╱J╱ // 0xd47 @0x5
0xd42…d52 at0006 = ╱dc╱=╱ // 0xd48 @0x6
0xd42…d52 at0007 = ╱45╱E╱ // 0xd49 @0x7
0xd42…d52 at0008 = ╱b7╱ TO ╱ // 0xd4a @0x8
0xd42…d52 at0009 = ╱37╱7╱ // 0xd4b @0x9
0xd42…d52 at000a = ╱fe0000e003╱ // 0xd4c @0xa
0xd42…d52 at000f = EOL // 0xd51 @0xf
0xd42…d52 }
0xd52…d58 9aaf 2410 PRINT
0xd52…d58 LineComalBin {
0xd52…d58 ptr = 0x9aaf // 0xd52 @0x0
0xd52…d58 lno = 0x096a // 0xd54 @0x2
0xd52…d58 at0004 = ╱92╱ PRINT ╱ // 0xd56 @0x4
0xd52…d58 at0005 = EOL // 0xd57 @0x5
0xd52…d58 }
0xd58…d5f 9ab6 2420 NEXT J
0xd58…d5f LineComalBin {
0xd58…d5f ptr = 0x9ab6 // 0xd58 @0x0
0xd58…d5f lno = 0x0974 // 0xd5a @0x2
0xd58…d5f at0004 = ╱84╱ NEXT ╱ // 0xd5c @0x4
0xd58…d5f at0005 = ╱4a╱J╱ // 0xd5d @0x5
0xd58…d5f at0006 = EOL // 0xd5e @0x6
0xd58…d5f }
0xd5f…da4 9afb 2500 PRINT "============================================================";
0xd5f…da4 LineComalBin {
0xd5f…da4 ptr = 0x9afb // 0xd5f @0x0
0xd5f…da4 lno = 0x09c4 // 0xd61 @0x2
0xd5f…da4 at0004 = ╱92╱ PRINT ╱ // 0xd63 @0x4
0xd5f…da4 at0005 = ╱22╱"╱ // 0xd64 @0x5
0xd5f…da4 at0006 = ╱3d╱=╱ // 0xd65 @0x6
0xd5f…da4 at0007 = ╱3d╱=╱ // 0xd66 @0x7
0xd5f…da4 at0008 = ╱3d╱=╱ // 0xd67 @0x8
0xd5f…da4 at0009 = ╱3d╱=╱ // 0xd68 @0x9
0xd5f…da4 at000a = ╱3d╱=╱ // 0xd69 @0xa
0xd5f…da4 at000b = ╱3d╱=╱ // 0xd6a @0xb
0xd5f…da4 at000c = ╱3d╱=╱ // 0xd6b @0xc
0xd5f…da4 at000d = ╱3d╱=╱ // 0xd6c @0xd
0xd5f…da4 at000e = ╱3d╱=╱ // 0xd6d @0xe
0xd5f…da4 at000f = ╱3d╱=╱ // 0xd6e @0xf
0xd5f…da4 at0010 = ╱3d╱=╱ // 0xd6f @0x10
0xd5f…da4 at0011 = ╱3d╱=╱ // 0xd70 @0x11
0xd5f…da4 at0012 = ╱3d╱=╱ // 0xd71 @0x12
0xd5f…da4 at0013 = ╱3d╱=╱ // 0xd72 @0x13
0xd5f…da4 at0014 = ╱3d╱=╱ // 0xd73 @0x14
0xd5f…da4 at0015 = ╱3d╱=╱ // 0xd74 @0x15
0xd5f…da4 at0016 = ╱3d╱=╱ // 0xd75 @0x16
0xd5f…da4 at0017 = ╱3d╱=╱ // 0xd76 @0x17
0xd5f…da4 at0018 = ╱3d╱=╱ // 0xd77 @0x18
0xd5f…da4 at0019 = ╱3d╱=╱ // 0xd78 @0x19
0xd5f…da4 at001a = ╱3d╱=╱ // 0xd79 @0x1a
0xd5f…da4 at001b = ╱3d╱=╱ // 0xd7a @0x1b
0xd5f…da4 at001c = ╱3d╱=╱ // 0xd7b @0x1c
0xd5f…da4 at001d = ╱3d╱=╱ // 0xd7c @0x1d
0xd5f…da4 at001e = ╱3d╱=╱ // 0xd7d @0x1e
0xd5f…da4 at001f = ╱3d╱=╱ // 0xd7e @0x1f
0xd5f…da4 at0020 = ╱3d╱=╱ // 0xd7f @0x20
0xd5f…da4 at0021 = ╱3d╱=╱ // 0xd80 @0x21
0xd5f…da4 at0022 = ╱3d╱=╱ // 0xd81 @0x22
0xd5f…da4 at0023 = ╱3d╱=╱ // 0xd82 @0x23
0xd5f…da4 at0024 = ╱3d╱=╱ // 0xd83 @0x24
0xd5f…da4 at0025 = ╱3d╱=╱ // 0xd84 @0x25
0xd5f…da4 at0026 = ╱3d╱=╱ // 0xd85 @0x26
0xd5f…da4 at0027 = ╱3d╱=╱ // 0xd86 @0x27
0xd5f…da4 at0028 = ╱3d╱=╱ // 0xd87 @0x28
0xd5f…da4 at0029 = ╱3d╱=╱ // 0xd88 @0x29
0xd5f…da4 at002a = ╱3d╱=╱ // 0xd89 @0x2a
0xd5f…da4 at002b = ╱3d╱=╱ // 0xd8a @0x2b
0xd5f…da4 at002c = ╱3d╱=╱ // 0xd8b @0x2c
0xd5f…da4 at002d = ╱3d╱=╱ // 0xd8c @0x2d
0xd5f…da4 at002e = ╱3d╱=╱ // 0xd8d @0x2e
0xd5f…da4 at002f = ╱3d╱=╱ // 0xd8e @0x2f
0xd5f…da4 at0030 = ╱3d╱=╱ // 0xd8f @0x30
0xd5f…da4 at0031 = ╱3d╱=╱ // 0xd90 @0x31
0xd5f…da4 at0032 = ╱3d╱=╱ // 0xd91 @0x32
0xd5f…da4 at0033 = ╱3d╱=╱ // 0xd92 @0x33
0xd5f…da4 at0034 = ╱3d╱=╱ // 0xd93 @0x34
0xd5f…da4 at0035 = ╱3d╱=╱ // 0xd94 @0x35
0xd5f…da4 at0036 = ╱3d╱=╱ // 0xd95 @0x36
0xd5f…da4 at0037 = ╱3d╱=╱ // 0xd96 @0x37
0xd5f…da4 at0038 = ╱3d╱=╱ // 0xd97 @0x38
0xd5f…da4 at0039 = ╱3d╱=╱ // 0xd98 @0x39
0xd5f…da4 at003a = ╱3d╱=╱ // 0xd99 @0x3a
0xd5f…da4 at003b = ╱3d╱=╱ // 0xd9a @0x3b
0xd5f…da4 at003c = ╱3d╱=╱ // 0xd9b @0x3c
0xd5f…da4 at003d = ╱3d╱=╱ // 0xd9c @0x3d
0xd5f…da4 at003e = ╱3d╱=╱ // 0xd9d @0x3e
0xd5f…da4 at003f = ╱3d╱=╱ // 0xd9e @0x3f
0xd5f…da4 at0040 = ╱3d╱=╱ // 0xd9f @0x40
0xd5f…da4 at0041 = ╱3d╱=╱ // 0xda0 @0x41
0xd5f…da4 at0042 = ╱22╱"╱ // 0xda1 @0x42
0xd5f…da4 at0043 = ╱eb╱;╱ // 0xda2 @0x43
0xd5f…da4 at0044 = EOL // 0xda3 @0x44
0xd5f…da4 }
0xda4…dc0 9b17 2510 PRINT "===================";
0xda4…dc0 LineComalBin {
0xda4…dc0 ptr = 0x9b17 // 0xda4 @0x0
0xda4…dc0 lno = 0x09ce // 0xda6 @0x2
0xda4…dc0 at0004 = ╱92╱ PRINT ╱ // 0xda8 @0x4
0xda4…dc0 at0005 = ╱22╱"╱ // 0xda9 @0x5
0xda4…dc0 at0006 = ╱3d╱=╱ // 0xdaa @0x6
0xda4…dc0 at0007 = ╱3d╱=╱ // 0xdab @0x7
0xda4…dc0 at0008 = ╱3d╱=╱ // 0xdac @0x8
0xda4…dc0 at0009 = ╱3d╱=╱ // 0xdad @0x9
0xda4…dc0 at000a = ╱3d╱=╱ // 0xdae @0xa
0xda4…dc0 at000b = ╱3d╱=╱ // 0xdaf @0xb
0xda4…dc0 at000c = ╱3d╱=╱ // 0xdb0 @0xc
0xda4…dc0 at000d = ╱3d╱=╱ // 0xdb1 @0xd
0xda4…dc0 at000e = ╱3d╱=╱ // 0xdb2 @0xe
0xda4…dc0 at000f = ╱3d╱=╱ // 0xdb3 @0xf
0xda4…dc0 at0010 = ╱3d╱=╱ // 0xdb4 @0x10
0xda4…dc0 at0011 = ╱3d╱=╱ // 0xdb5 @0x11
0xda4…dc0 at0012 = ╱3d╱=╱ // 0xdb6 @0x12
0xda4…dc0 at0013 = ╱3d╱=╱ // 0xdb7 @0x13
0xda4…dc0 at0014 = ╱3d╱=╱ // 0xdb8 @0x14
0xda4…dc0 at0015 = ╱3d╱=╱ // 0xdb9 @0x15
0xda4…dc0 at0016 = ╱3d╱=╱ // 0xdba @0x16
0xda4…dc0 at0017 = ╱3d╱=╱ // 0xdbb @0x17
0xda4…dc0 at0018 = ╱3d╱=╱ // 0xdbc @0x18
0xda4…dc0 at0019 = ╱22╱"╱ // 0xdbd @0x19
0xda4…dc0 at001a = ╱eb╱;╱ // 0xdbe @0x1a
0xda4…dc0 at001b = EOL // 0xdbf @0x1b
0xda4…dc0 }
0xdc0…dd8 9b2f 2511 LINIE=LINIE+24
0xdc0…dd8 LineComalBin {
0xdc0…dd8 ptr = 0x9b2f // 0xdc0 @0x0
0xdc0…dd8 lno = 0x09cf // 0xdc2 @0x2
0xdc0…dd8 at0004 = ╱4c╱L╱ // 0xdc4 @0x4
0xdc0…dd8 at0005 = ╱49╱I╱ // 0xdc5 @0x5
0xdc0…dd8 at0006 = ╱4e╱N╱ // 0xdc6 @0x6
0xdc0…dd8 at0007 = ╱49╱I╱ // 0xdc7 @0x7
0xdc0…dd8 at0008 = ╱45╱E╱ // 0xdc8 @0x8
0xdc0…dd8 at0009 = ╱dc╱=╱ // 0xdc9 @0x9
0xdc0…dd8 at000a = ╱4c╱L╱ // 0xdca @0xa
0xdc0…dd8 at000b = ╱49╱I╱ // 0xdcb @0xb
0xdc0…dd8 at000c = ╱4e╱N╱ // 0xdcc @0xc
0xdc0…dd8 at000d = ╱49╱I╱ // 0xdcd @0xd
0xdc0…dd8 at000e = ╱45╱E╱ // 0xdce @0xe
0xdc0…dd8 at000f = ╱e2╱+╱ // 0xdcf @0xf
0xdc0…dd8 at0010 = ╱32╱2╱ // 0xdd0 @0x10
0xdc0…dd8 at0011 = ╱34╱4╱ // 0xdd1 @0x11
0xdc0…dd8 at0012 = ╱fe0000c005╱ // 0xdd2 @0x12
0xdc0…dd8 at0017 = EOL // 0xdd7 @0x17
0xdc0…dd8 }
0xdd8…dde 9b35 2512 ENDIF
0xdd8…dde LineComalBin {
0xdd8…dde ptr = 0x9b35 // 0xdd8 @0x0
0xdd8…dde lno = 0x09d0 // 0xdda @0x2
0xdd8…dde at0004 = ╱9b╱ ENDIF ╱ // 0xddc @0x4
0xdd8…dde at0005 = EOL // 0xddd @0x5
0xdd8…dde }
0xdde…de5 9b3c 2515 NEXT I
0xdde…de5 LineComalBin {
0xdde…de5 ptr = 0x9b3c // 0xdde @0x0
0xdde…de5 lno = 0x09d3 // 0xde0 @0x2
0xdde…de5 at0004 = ╱84╱ NEXT ╱ // 0xde2 @0x4
0xdde…de5 at0005 = ╱49╱I╱ // 0xde3 @0x5
0xdde…de5 at0006 = EOL // 0xde4 @0x6
0xdde…de5 }
0xde5…dfd 9b54 2519 LINIE=LINIE MOD 72
0xde5…dfd LineComalBin {
0xde5…dfd ptr = 0x9b54 // 0xde5 @0x0
0xde5…dfd lno = 0x09d7 // 0xde7 @0x2
0xde5…dfd at0004 = ╱4c╱L╱ // 0xde9 @0x4
0xde5…dfd at0005 = ╱49╱I╱ // 0xdea @0x5
0xde5…dfd at0006 = ╱4e╱N╱ // 0xdeb @0x6
0xde5…dfd at0007 = ╱49╱I╱ // 0xdec @0x7
0xde5…dfd at0008 = ╱45╱E╱ // 0xded @0x8
0xde5…dfd at0009 = ╱dc╱=╱ // 0xdee @0x9
0xde5…dfd at000a = ╱4c╱L╱ // 0xdef @0xa
0xde5…dfd at000b = ╱49╱I╱ // 0xdf0 @0xb
0xde5…dfd at000c = ╱4e╱N╱ // 0xdf1 @0xc
0xde5…dfd at000d = ╱49╱I╱ // 0xdf2 @0xd
0xde5…dfd at000e = ╱45╱E╱ // 0xdf3 @0xe
0xde5…dfd at000f = ╱e8╱ MOD ╱ // 0xdf4 @0xf
0xde5…dfd at0010 = ╱37╱7╱ // 0xdf5 @0x10
0xde5…dfd at0011 = ╱32╱2╱ // 0xdf6 @0x11
0xde5…dfd at0012 = ╱fe00009007╱ // 0xdf7 @0x12
0xde5…dfd at0017 = EOL // 0xdfc @0x17
0xde5…dfd }
0xdfd…e03 9b5a 2520 CLOSE
0xdfd…e03 LineComalBin {
0xdfd…e03 ptr = 0x9b5a // 0xdfd @0x0
0xdfd…e03 lno = 0x09d8 // 0xdff @0x2
0xdfd…e03 at0004 = ╱a8╱ CLOSE ╱ // 0xe01 @0x4
0xdfd…e03 at0005 = EOL // 0xe02 @0x5
0xdfd…e03 }
0xe03…e16 9b6d 2521 WHILE LINIE<72
0xe03…e16 LineComalBin {
0xe03…e16 ptr = 0x9b6d // 0xe03 @0x0
0xe03…e16 lno = 0x09d9 // 0xe05 @0x2
0xe03…e16 at0004 = ╱93╱ WHILE ╱ // 0xe07 @0x4
0xe03…e16 at0005 = ╱4c╱L╱ // 0xe08 @0x5
0xe03…e16 at0006 = ╱49╱I╱ // 0xe09 @0x6
0xe03…e16 at0007 = ╱4e╱N╱ // 0xe0a @0x7
0xe03…e16 at0008 = ╱49╱I╱ // 0xe0b @0x8
0xe03…e16 at0009 = ╱45╱E╱ // 0xe0c @0x9
0xe03…e16 at000a = ╱dd╱<╱ // 0xe0d @0xa
0xe03…e16 at000b = ╱37╱7╱ // 0xe0e @0xb
0xe03…e16 at000c = ╱32╱2╱ // 0xe0f @0xc
0xe03…e16 at000d = ╱fe00009007╱ // 0xe10 @0xd
0xe03…e16 at0012 = EOL // 0xe15 @0x12
0xe03…e16 }
0xe16…e1c 9b73 2522 PRINT
0xe16…e1c LineComalBin {
0xe16…e1c ptr = 0x9b73 // 0xe16 @0x0
0xe16…e1c lno = 0x09da // 0xe18 @0x2
0xe16…e1c at0004 = ╱92╱ PRINT ╱ // 0xe1a @0x4
0xe16…e1c at0005 = EOL // 0xe1b @0x5
0xe16…e1c }
0xe1c…e2e 9b85 2523 LINIE=LINIE+E
0xe1c…e2e LineComalBin {
0xe1c…e2e ptr = 0x9b85 // 0xe1c @0x0
0xe1c…e2e lno = 0x09db // 0xe1e @0x2
0xe1c…e2e at0004 = ╱4c╱L╱ // 0xe20 @0x4
0xe1c…e2e at0005 = ╱49╱I╱ // 0xe21 @0x5
0xe1c…e2e at0006 = ╱4e╱N╱ // 0xe22 @0x6
0xe1c…e2e at0007 = ╱49╱I╱ // 0xe23 @0x7
0xe1c…e2e at0008 = ╱45╱E╱ // 0xe24 @0x8
0xe1c…e2e at0009 = ╱dc╱=╱ // 0xe25 @0x9
0xe1c…e2e at000a = ╱4c╱L╱ // 0xe26 @0xa
0xe1c…e2e at000b = ╱49╱I╱ // 0xe27 @0xb
0xe1c…e2e at000c = ╱4e╱N╱ // 0xe28 @0xc
0xe1c…e2e at000d = ╱49╱I╱ // 0xe29 @0xd
0xe1c…e2e at000e = ╱45╱E╱ // 0xe2a @0xe
0xe1c…e2e at000f = ╱e2╱+╱ // 0xe2b @0xf
0xe1c…e2e at0010 = ╱45╱E╱ // 0xe2c @0x10
0xe1c…e2e at0011 = EOL // 0xe2d @0x11
0xe1c…e2e }
0xe2e…e34 9b8b 2524 ENDWHILE
0xe2e…e34 LineComalBin {
0xe2e…e34 ptr = 0x9b8b // 0xe2e @0x0
0xe2e…e34 lno = 0x09dc // 0xe30 @0x2
0xe2e…e34 at0004 = ╱94╱ ENDWHILE ╱ // 0xe32 @0x4
0xe2e…e34 at0005 = EOL // 0xe33 @0x5
0xe2e…e34 }
0xe34…e3b 9b92 2525 OUTPUT T
0xe34…e3b LineComalBin {
0xe34…e3b ptr = 0x9b92 // 0xe34 @0x0
0xe34…e3b lno = 0x09dd // 0xe36 @0x2
0xe34…e3b at0004 = ╱a5╱ OUTPUT ╱ // 0xe38 @0x4
0xe34…e3b at0005 = ╱54╱T╱ // 0xe39 @0x5
0xe34…e3b at0006 = EOL // 0xe3a @0x6
0xe34…e3b }
0xe3b…e51 0000 2530 CHAIN "P641210:STARTB"
0xe3b…e51 LineComalBin {
0xe3b…e51 ptr = 0x0000 // 0xe3b @0x0
0xe3b…e51 lno = 0x09e2 // 0xe3d @0x2
0xe3b…e51 at0004 = ╱ac╱ CHAIN ╱ // 0xe3f @0x4
0xe3b…e51 at0005 = ╱22╱"╱ // 0xe40 @0x5
0xe3b…e51 at0006 = ╱50╱P╱ // 0xe41 @0x6
0xe3b…e51 at0007 = ╱36╱6╱ // 0xe42 @0x7
0xe3b…e51 at0008 = ╱34╱4╱ // 0xe43 @0x8
0xe3b…e51 at0009 = ╱31╱1╱ // 0xe44 @0x9
0xe3b…e51 at000a = ╱32╱2╱ // 0xe45 @0xa
0xe3b…e51 at000b = ╱31╱1╱ // 0xe46 @0xb
0xe3b…e51 at000c = ╱30╱0╱ // 0xe47 @0xc
0xe3b…e51 at000d = ╱3a╱:╱ // 0xe48 @0xd
0xe3b…e51 at000e = ╱53╱S╱ // 0xe49 @0xe
0xe3b…e51 at000f = ╱54╱T╱ // 0xe4a @0xf
0xe3b…e51 at0010 = ╱41╱A╱ // 0xe4b @0x10
0xe3b…e51 at0011 = ╱52╱R╱ // 0xe4c @0x11
0xe3b…e51 at0012 = ╱54╱T╱ // 0xe4d @0x12
0xe3b…e51 at0013 = ╱42╱B╱ // 0xe4e @0x13
0xe3b…e51 at0014 = ╱22╱"╱ // 0xe4f @0x14
0xe3b…e51 at0015 = EOL // 0xe50 @0x15
0xe3b…e51 }
0xe51…e60 57 8d 5a 00 42 dc 30 fe 00 00 00 00 eb 45 dc ┆W Z B 0 E ┆
0xe60…e70 31 fe 00 00 80 01 eb 47 dc 32 fe 00 00 80 02 eb ┆1 G 2 ┆
0xe70…e82 (48,) 56 dc 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 04 ff ┆V 3 W 9 ┆
0xe82…e88 (49,) 57 8d a8 9b 10 00 ┆W ┆