DATAHOLDER
FILE INFORMATION
FILENAME(S): DATAHOLDER
FILE TYPE(S): PRG
FILE SIZE: 15.4K
FIRST SEEN: 2025-11-30 20:09:32
APPEARS ON: 1 disk(s)
FILE HASH
28a4e029d0d5aa2c72d9ccd0279afa668156764887780d8f509e8d34e93b34ae
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64TAPECOMP | DATAHOLDER | PRG | Curtcool, Klaus & Jan | 16 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 01 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..&....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 00 4B 08 02 00 8F 2A 20 20 20 |******.K....* |
00000030: 53 4B 52 45 56 45 54 20 41 56 20 53 2E 4B 2E 20 |SKREVET AV S.K. |
00000040: 49 42 52 41 48 49 4D 20 20 20 2A 00 70 08 03 00 |IBRAHIM *.p...|
00000050: 8F 2A 20 20 20 45 4E 4B 45 4C 54 20 44 41 54 41 |.* ENKELT DATA|
00000060: 42 41 53 45 20 50 52 4F 47 20 20 20 20 20 20 2A |BASE PROG *|
00000070: 00 95 08 04 00 8F 2A 20 20 20 44 41 54 41 48 4F |......* DATAHO|
00000080: 4C 44 45 52 20 20 20 20 20 20 20 20 20 20 20 20 |LDER |
00000090: 20 20 20 20 2A 00 BA 08 05 00 8F 2A 20 20 20 28 | *......* (|
000000A0: 43 29 31 39 38 34 20 20 20 20 20 20 20 20 20 20 |C)1984 |
000000B0: 20 20 20 20 20 20 20 20 20 2A 00 DF 08 06 00 8F | *......|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000000E0: F7 08 07 00 8F 2A 42 45 47 59 4E 4E 45 4C 53 45 |.....*BEGYNNELSE|
000000F0: 53 46 41 53 45 4E 2A 00 1B 09 08 00 8F 2A 2A 2A |SFASEN*......***|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 44 09 09 00 |***********.D...|
00000120: 8F 2A 53 50 45 53 49 46 49 53 45 52 20 52 45 47 |.*SPESIFISER REG|
00000130: 49 53 54 45 52 20 53 54 52 2E 3A 53 45 54 54 20 |ISTER STR.:SETT |
00000140: 44 49 4D 2A 00 68 09 0A 00 8F 2A 2A 2A 2A 2A 2A |DIM*.h....******|
00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000160: 2A 2A 2A 2A 2A 2A 2A 2A 00 81 09 0B 00 86 20 46 |********...... F|
00000170: 49 24 28 38 2C 31 35 30 29 2C 53 45 28 31 35 30 |I$(8,150),SE(150|
00000180: 29 00 A8 09 0C 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |)......*********|
00000190: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001A0: 2A 2A 2A 2A 2A 2A 2A 2A 00 CF 09 0D 00 8F 2A 42 |********......*B|
000001B0: 45 53 54 45 4D 20 53 4B 4A 45 52 4D 20 4F 47 20 |ESTEM SKJERM OG |
000001C0: 42 41 4B 47 52 55 4E 4E 53 46 41 52 47 45 2A 00 |BAKGRUNNSFARGE*.|
000001D0: F6 09 0E 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....***********|
000001E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001F0: 2A 2A 2A 2A 2A 2A 00 10 0A 0F 00 97 20 35 33 32 |******...... 532|
00000200: 38 30 2C 31 31 3A 97 20 35 33 32 38 31 2C 31 31 |80,11:. 53281,11|
00000210: 00 30 0A 10 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.0....**********|
00000220: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000230: 00 50 0A 11 00 8F 2A 42 45 53 54 45 4D 20 54 52 |.P....*BESTEM TR|
00000240: 59 4B 4B 46 41 52 47 45 20 28 48 56 49 54 29 2A |YKKFARGE (HVIT)*|
00000250: 00 70 0A 12 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.p....**********|
00000260: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000270: 00 79 0A 13 00 99 22 05 22 00 A0 0A 14 00 8F 2A |.y...."."......*|
00000280: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002A0: 00 C7 0A 15 00 8F 2A 42 45 47 59 4E 4E 45 4C 53 |......*BEGYNNELS|
000002B0: 45 4E 2C 20 49 4E 47 45 4E 20 52 45 47 2E 20 49 |EN, INGEN REG. I|
000002C0: 20 4D 49 4E 4E 45 2A 00 EE 0A 16 00 8F 2A 2A 2A | MINNE*......***|
000002D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FB |**************..|
000002F0: 0A 17 00 46 49 4C 45 24 B2 22 22 00 12 0B 18 00 |...FILE$."".....|
00000300: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000310: 2A 2A 00 29 0B 19 00 8F 2A 44 41 54 41 48 4F 4C |**.)....*DATAHOL|
00000320: 44 45 52 20 4D 45 4E 59 2A 00 40 0B 1A 00 8F 2A |DER MENY*.@....*|
00000330: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000340: 00 61 0B 1B 00 99 22 93 12 1D 1D 1D 1D 20 20 20 |.a...."...... |
00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000360: 22 00 81 0B 1C 00 99 22 12 1D 1D 1D 1D 20 20 4D |"......"..... M|
00000370: 45 4E 59 3A 20 20 44 41 54 41 48 4F 4C 44 45 52 |ENY: DATAHOLDER|
00000380: 22 00 A1 0B 1D 00 99 22 12 1D 1D 1D 1D 20 20 20 |"......"..... |
00000390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003A0: 22 00 C1 0B 1E 00 99 22 11 1D 1D 1D 28 31 29 4F |"......"....(1)O|
000003B0: 50 50 52 45 54 54 20 52 45 47 49 53 54 45 52 22 |PPRETT REGISTER"|
000003C0: 3B 00 E5 0B 1F 00 99 22 1D 1D 1D 28 32 29 4C 45 |;......"...(2)LE|
000003D0: 47 47 20 54 49 4C 20 4E 59 20 20 20 20 20 20 20 |GG TIL NY |
000003E0: 46 49 4C 45 22 00 02 0C 20 00 99 22 11 1D 1D 1D |FILE"... .."....|
000003F0: 28 33 29 4B 41 4C 4C 20 4F 50 50 20 46 49 4C 45 |(3)KALL OPP FILE|
00000400: 22 3B 00 1E 0C 21 00 99 22 1D 28 34 29 54 41 50 |";...!..".(4)TAP|
00000410: 45 20 4F 50 45 52 41 53 4A 4F 4E 45 52 22 00 3D |E OPERASJONER".=|
00000420: 0C 22 00 99 22 11 1D 1D 1D 28 35 29 44 49 53 4B |.".."....(5)DISK|
00000430: 20 4F 50 45 52 41 53 4A 4F 4E 45 52 22 00 60 0C | OPERASJONER".`.|
00000440: 23 00 99 22 11 1D 1D 1D 28 36 29 50 52 49 4E 54 |#.."....(6)PRINT|
00000450: 20 46 49 4C 45 2F 4D 45 52 4B 45 4C 41 50 50 22 | FILE/MERKELAPP"|
00000460: 00 85 0C 24 00 99 22 11 1D 1D 1D 28 37 29 46 4F |...$.."....(7)FO|
00000470: 52 41 4E 44 52 45 20 46 49 4C 45 2F 52 45 47 49 |RANDRE FILE/REGI|
00000480: 53 54 45 52 22 00 B2 0C 25 00 99 22 11 1D 1D 1D |STER"...%.."....|
00000490: 28 38 29 4C 45 54 20 45 54 54 45 52 20 46 49 4C |(8)LET ETTER FIL|
000004A0: 45 2F 53 4F 52 54 45 52 20 52 45 47 49 53 54 45 |E/SORTER REGISTE|
000004B0: 52 22 00 CE 0C 26 00 99 22 11 1D 1D 1D 28 39 29 |R"...&.."....(9)|
000004C0: 53 4C 55 54 54 20 50 52 4F 47 52 41 4D 22 00 F2 |SLUTT PROGRAM"..|
000004D0: 0C 27 00 8B 20 41 44 46 49 4C 45 B1 30 20 A7 99 |.'.. ADFILE.0 ..|
000004E0: 22 11 1D 1D 1D 44 41 54 41 20 49 20 4D 49 4E 4E |"....DATA I MINN|
000004F0: 45 22 00 13 0D 28 00 99 22 11 1D 1D 1D 54 41 53 |E"...(.."....TAS|
00000500: 54 20 49 4E 4E 20 45 54 20 4E 52 2E 20 28 31 2D |T INN ET NR. (1-|
00000510: 39 29 22 00 2D 0D 29 00 8F 2A 2A 2A 2A 2A 2A 2A |9)".-.)..*******|
00000520: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 47 0D |*************.G.|
00000530: 2A 00 8F 2A 53 4A 45 4B 4B 20 42 52 55 4B 45 52 |*..*SJEKK BRUKER|
00000540: 20 42 45 48 4F 56 2A 00 61 0D 2B 00 8F 2A 2A 2A | BEHOV*.a.+..***|
00000550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000560: 2A 00 86 0D 2C 00 A1 20 4D 45 24 3A 4D 45 B2 C5 |*...,.. ME$:ME..|
00000570: 28 4D 45 24 29 3A 8B 20 4D 45 B3 31 B0 4D 45 B1 |(ME$):. ME.1.ME.|
00000580: 39 20 A7 20 34 34 00 97 0D 2D 00 8B 20 4D 45 B2 |9 . 44...-.. ME.|
00000590: 39 20 A7 20 36 31 34 00 AF 0D 2E 00 8F 2A 2A 2A |9 . 614......***|
000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000005B0: C7 0D 2F 00 8F 2A 4B 41 4C 4C 20 53 55 42 52 55 |../..*KALL SUBRU|
000005C0: 54 49 4E 45 52 20 2A 00 DF 0D 30 00 8F 2A 2A 2A |TINER *...0..***|
000005D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000005E0: 08 0E 31 00 91 20 4D 45 20 8D 20 35 31 2C 37 32 |..1.. ME . 51,72|
000005F0: 2C 31 30 30 2C 31 32 34 2C 31 34 30 2C 33 34 37 |,100,124,140,347|
00000600: 2C 34 32 35 2C 34 38 32 00 11 0E 32 00 89 20 32 |,425,482...2.. 2|
00000610: 37 00 29 0E 33 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |7.).3..*********|
00000620: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 41 0E 34 00 8F 2A |*********.A.4..*|
00000630: 4C 41 47 20 4E 59 45 20 52 45 47 49 53 54 52 45 |LAG NYE REGISTRE|
00000640: 2A 00 59 0E 35 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*.Y.5..*********|
00000650: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 76 0E 36 00 99 22 |*********.v.6.."|
00000660: 93 4F 50 50 52 45 54 54 20 4E 59 45 20 52 45 47 |.OPPRETT NYE REG|
00000670: 49 53 54 52 45 22 00 A6 0E 37 00 99 22 11 11 48 |ISTRE"...7.."..H|
00000680: 56 4F 52 20 4D 41 4E 47 45 20 4F 50 50 4C 59 53 |VOR MANGE OPPLYS|
00000690: 4E 49 4E 47 45 52 20 54 52 45 4E 47 53 3F 20 4D |NINGER TRENGS? M|
000006A0: 41 58 2E 20 38 22 00 C6 0E 38 00 99 22 11 53 50 |AX. 8"...8..".SP|
000006B0: 41 43 45 20 54 41 53 54 20 46 4F 52 20 46 4A 45 |ACE TAST FOR FJE|
000006C0: 52 4E 49 4E 47 22 00 DF 0E 39 00 A1 20 54 46 49 |RNING"...9.. TFI|
000006D0: 24 3A 8B 20 54 46 49 24 B2 22 22 A7 20 35 37 00 |$:. TFI$."". 57.|
000006E0: F2 0E 3A 00 8B 20 54 46 49 24 B2 22 20 22 20 A7 |..:.. TFI$." " .|
000006F0: 20 8E 00 02 0F 3B 00 54 46 49 B2 C5 28 54 46 49 | ....;.TFI..(TFI|
00000700: 24 29 00 1B 0F 3C 00 8B 20 54 46 49 B3 31 20 B0 |$)...<.. TFI.1 .|
00000710: 20 54 46 49 B1 38 20 A7 20 35 37 00 26 0F 3D 00 | TFI.8 . 57.&.=.|
00000720: 46 49 B2 54 46 49 00 3C 0F 3E 00 8F 2A 53 54 52 |FI.TFI.<.>..*STR|
00000730: 59 4B 20 4F 50 50 4C 59 53 4E 2C 2A 00 88 0F 3F |YK OPPLYSN,*...?|
00000740: 00 50 24 28 31 29 B2 22 22 3A 50 24 28 32 29 B2 |.P$(1)."":P$(2).|
00000750: 22 22 3A 50 24 28 33 29 B2 22 22 3A 50 24 28 34 |"":P$(3)."":P$(4|
00000760: 29 B2 22 22 3A 50 24 28 35 29 B2 22 22 3A 50 24 |)."":P$(5)."":P$|
00000770: 28 36 29 B2 22 22 3A 50 24 28 37 29 B2 22 22 3A |(6)."":P$(7)."":|
00000780: 50 24 28 38 29 B2 22 22 00 A0 0F 40 00 8F 2A 4E |P$(8).""...@..*N|
00000790: 59 45 20 4F 50 50 4C 59 53 4E 49 4E 47 45 52 2A |YE OPPLYSNINGER*|
000007A0: 00 CE 0F 41 00 99 22 93 54 41 53 54 20 49 4E 4E |...A..".TAST INN|
000007B0: 20 4F 50 50 4C 59 53 4E 49 4E 47 45 52 2C 20 4F | OPPLYSNINGER, O|
000007C0: 50 50 20 54 49 4C 20 39 20 54 45 47 4E 22 00 EA |PP TIL 9 TEGN"..|
000007D0: 0F 42 00 81 20 41 B2 31 20 A4 20 46 49 3A 99 22 |.B.. A.1 . FI:."|
000007E0: 4F 50 50 4C 2E 20 22 3B 41 3B 00 F4 0F 43 00 85 |OPPL. ";A;...C..|
000007F0: 20 54 50 24 00 0E 10 44 00 54 50 B2 C3 28 54 50 | TP$...D.TP..(TP|
00000800: 24 29 3A 8B 20 54 50 B1 39 20 A7 20 36 37 00 23 |$):. TP.9 . 67.#|
00000810: 10 45 00 50 24 28 41 29 B2 54 50 24 3A 54 50 24 |.E.P$(A).TP$:TP$|
00000820: B2 22 22 00 2B 10 46 00 82 20 41 00 31 10 47 00 |."".+.F.. A.1.G.|
00000830: 8E 00 49 10 48 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..I.H..*********|
00000840: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 61 10 49 00 8F 2A |*********.a.I..*|
00000850: 4C 45 47 47 20 54 49 4C 20 4E 59 20 46 49 4C 45 |LEGG TIL NY FILE|
00000860: 2A 00 79 10 4A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*.y.J..*********|
00000870: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 91 10 4B 00 8F 2A |*********...K..*|
00000880: 53 4A 45 4B 4B 20 4F 50 50 4C 59 53 4E 49 4E 47 |SJEKK OPPLYSNING|
00000890: 2A 00 A1 10 4C 00 8B 20 46 49 B1 30 20 A7 20 38 |*...L.. FI.0 . 8|
000008A0: 30 00 C4 10 4D 00 99 22 93 52 45 47 49 53 54 45 |0...M..".REGISTE|
000008B0: 52 20 45 52 20 49 4B 4B 45 20 4F 50 50 52 45 54 |R ER IKKE OPPRET|
000008C0: 54 45 54 22 00 D8 10 4E 00 81 20 41 B2 31 20 A4 |TET"...N.. A.1 .|
000008D0: 20 32 30 30 30 3A 82 41 00 DE 10 4F 00 8E 00 F2 | 2000:.A...O....|
000008E0: 10 50 00 41 44 46 49 4C 45 B2 41 44 46 49 4C 45 |.P.ADFILE.ADFILE|
000008F0: AA 31 00 20 11 51 00 8B 20 41 44 46 49 4C 45 B1 |.1. .Q.. ADFILE.|
00000900: 31 35 30 20 A7 20 99 22 11 1D 1D 1D 49 4B 4B 45 |150 . ."....IKKE|
00000910: 20 4D 45 52 20 50 4C 41 53 53 22 3A 89 20 39 34 | MER PLASS":. 94|
00000920: 00 43 11 52 00 99 22 93 11 11 1D 1D 1D 1D 1D 1D |.C.R..".........|
00000930: 1D 46 49 4C 45 20 4E 52 2E 3A 2D 22 3B 41 44 46 |.FILE NR.:-";ADF|
00000940: 49 4C 45 00 68 11 53 00 81 20 41 B2 31 A4 46 49 |ILE.h.S.. A.1.FI|
00000950: 3A 99 22 11 1D 1D 22 3B 50 24 28 41 29 A3 31 31 |:."...";P$(A).11|
00000960: 29 C7 28 35 38 29 3A 82 00 81 11 54 00 81 20 42 |).(58):....T.. B|
00000970: B2 31 20 A4 20 46 49 3A 99 22 91 91 91 22 3A 82 |.1 . FI:."...":.|
00000980: 42 00 9E 11 55 00 81 41 B2 31 A4 46 49 3A 46 49 |B...U..A.1.FI:FI|
00000990: 24 28 41 2C 41 44 46 49 4C 45 29 B2 22 22 00 C4 |$(A,ADFILE).""..|
000009A0: 11 56 00 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.V.."...........|
000009B0: 1D 1D 22 3B 3A 85 20 46 49 24 28 41 2C 41 44 46 |..";:. FI$(A,ADF|
000009C0: 49 4C 45 29 00 EE 11 57 00 8B 20 46 49 24 28 41 |ILE)...W.. FI$(A|
000009D0: 2C 41 44 46 49 4C 45 29 B2 22 22 A7 20 46 49 24 |,ADFILE)."". FI$|
000009E0: 28 41 2C 41 44 46 49 4C 45 29 B2 22 3C 22 00 13 |(A,ADFILE)."<"..|
000009F0: 12 58 00 8F 2A 53 55 4D 20 55 50 20 41 53 43 49 |.X..*SUM UP ASCI|
00000A00: 49 20 43 4F 44 45 53 20 2B 20 53 45 45 20 32 31 |I CODES + SEE 21|
00000A10: 33 30 2A 00 2E 12 59 00 41 53 B2 41 53 AA C6 28 |30*...Y.AS.AS..(|
00000A20: 46 49 24 28 41 2C 41 44 46 49 4C 45 29 29 00 36 |FI$(A,ADFILE)).6|
00000A30: 12 5A 00 82 20 41 00 5A 12 5B 00 8F 2A 45 52 20 |.Z.. A.Z.[..*ER |
00000A40: 41 4C 4C 45 20 4F 50 50 4C 2E 3D 22 3C 22 2C 53 |ALLE OPPL.="<",S|
00000A50: 54 52 59 4B 20 46 49 4C 45 2A 00 7B 12 5C 00 8B |TRYK FILE*.{.\..|
00000A60: 20 41 53 B2 46 49 AC 36 30 20 A7 20 41 44 46 49 | AS.FI.60 . ADFI|
00000A70: 4C 45 B2 41 44 46 49 4C 45 AB 31 00 84 12 5D 00 |LE.ADFILE.1...].|
00000A80: 41 53 B2 30 00 AE 12 5E 00 99 22 11 11 1D 1D 54 |AS.0...^.."....T|
00000A90: 52 59 4B 4B 20 45 4E 20 54 41 53 54 20 46 4F 52 |RYKK EN TAST FOR|
00000AA0: 20 46 4F 52 54 53 45 54 54 45 4C 53 45 22 00 D1 | FORTSETTELSE"..|
00000AB0: 12 5F 00 99 22 11 1D 1D 53 50 41 43 45 20 46 4F |._.."...SPACE FO|
00000AC0: 52 20 52 45 54 55 52 20 54 49 4C 20 4D 45 4E 59 |R RETUR TIL MENY|
00000AD0: 22 00 E8 12 60 00 A1 20 41 51 24 3A 8B 20 41 51 |"...`.. AQ$:. AQ|
00000AE0: 24 B2 22 22 A7 20 39 36 00 F9 12 61 00 8B 20 41 |$."". 96...a.. A|
00000AF0: 51 24 B2 22 20 22 A7 20 8E 00 02 13 62 00 89 20 |Q$." ". ....b.. |
00000B00: 38 30 00 08 13 63 00 8E 00 1D 13 64 00 8F 2A 2A |80...c.....d..**|
00000B10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 32 13 |*************.2.|
00000B20: 65 00 8F 2A 4B 41 4C 4C 20 4F 50 50 20 46 49 4C |e..*KALL OPP FIL|
00000B30: 45 2A 00 47 13 66 00 8F 2A 2A 2A 2A 2A 2A 2A 2A |E*.G.f..********|
00000B40: 2A 2A 2A 2A 2A 2A 2A 00 5D 13 67 00 8F 2A 42 45 |*******.].g..*BE|
00000B50: 20 4F 4D 20 46 49 4C 45 20 4E 52 2E 2A 00 7A 13 | OM FILE NR.*.z.|
00000B60: 68 00 85 22 93 48 56 49 4C 4B 45 54 20 46 49 4C |h..".HVILKET FIL|
00000B70: 45 20 4E 52 2E 22 3B 57 52 24 00 95 13 69 00 57 |E NR.";WR$...i.W|
00000B80: 52 B2 C5 28 57 52 24 29 3A 8B 20 57 52 B3 31 20 |R..(WR$):. WR.1 |
00000B90: A7 20 31 30 34 00 B2 13 6A 00 8B 20 57 52 B2 30 |. 104...j.. WR.0|
00000BA0: 20 B0 20 57 52 B1 41 44 46 49 4C 45 20 A7 20 31 | . WR.ADFILE . 1|
00000BB0: 31 32 00 CD 13 6B 00 8F 2A 50 52 49 4E 54 20 46 |12...k..*PRINT F|
00000BC0: 49 4C 45 20 44 45 54 41 4C 4A 45 52 2A 00 E9 13 |ILE DETALJER*...|
00000BD0: 6C 00 99 22 93 1D 1D 1D 1D 1D 1D 46 49 4C 45 20 |l..".......FILE |
00000BE0: 4E 52 2E 3A 2D 22 3B 57 52 00 09 14 6D 00 81 20 |NR.:-";WR...m.. |
00000BF0: 41 B2 31 20 A4 20 46 49 3A 41 54 45 4D 50 24 B2 |A.1 . FI:ATEMP$.|
00000C00: 46 49 24 28 41 2C 57 52 29 00 26 14 6E 00 8B 20 |FI$(A,WR).&.n.. |
00000C10: 41 54 45 4D 50 24 B2 22 3C 22 20 A7 20 41 54 45 |ATEMP$."<" . ATE|
00000C20: 4D 50 24 B2 22 22 00 5B 14 6F 00 99 22 11 1D 1D |MP$."".[.o.."...|
00000C30: 22 3B 50 24 28 41 29 A3 31 31 29 C7 28 35 38 29 |";P$(A).11).(58)|
00000C40: 3A 99 22 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |:.".............|
00000C50: 1D 22 3B 41 54 45 4D 50 24 3A 82 00 84 14 70 00 |.";ATEMP$:....p.|
00000C60: 99 22 11 1D 1D 1D 1D 54 52 59 4B 4B 20 53 50 41 |.".....TRYKK SPA|
00000C70: 43 45 20 46 4F 52 20 46 4F 52 54 53 45 54 54 45 |CE FOR FORTSETTE|
00000C80: 4C 53 45 22 00 CC 14 71 00 99 22 1D 1D 1D 1D 2B |LSE"...q.."....+|
00000C90: 20 53 43 52 4F 4C 4C 20 46 4F 52 4F 56 45 52 20 | SCROLL FOROVER |
00000CA0: 20 20 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D | ..............|
00000CB0: 1D 1D 1D 1D 1D 1D 1D 2D 20 53 43 52 4F 4C 4C 20 |.......- SCROLL |
00000CC0: 42 41 4B 4F 56 45 52 20 20 20 20 22 00 03 15 72 |BAKOVER "...r|
00000CD0: 00 99 22 1D 1D 1D 1D 45 4C 4C 45 52 20 54 52 59 |.."....ELLER TRY|
00000CE0: 4B 4B 20 45 4E 20 54 41 53 54 20 46 4F 52 20 56 |KK EN TAST FOR V|
00000CF0: 49 44 45 52 45 20 4C 45 54 2D 20 1D 1D 1D 1D 49 |IDERE LET- ....I|
00000D00: 4E 47 22 00 1B 15 73 00 A1 20 41 51 24 3A 8B 20 |NG"...s.. AQ$:. |
00000D10: 41 51 24 B2 22 22 A7 20 31 31 35 00 2C 15 74 00 |AQ$."". 115.,.t.|
00000D20: 8B 20 41 51 24 B2 22 20 22 A7 20 8E 00 4C 15 75 |. AQ$." ". ..L.u|
00000D30: 00 8B 20 41 51 24 B3 B1 22 2B 22 20 AF 20 41 51 |.. AQ$.."+" . AQ|
00000D40: 24 B3 B1 22 2D 22 20 A7 20 31 30 34 00 70 15 76 |$.."-" . 104.p.v|
00000D50: 00 8B 20 41 51 24 B2 22 2B 22 AF 20 57 52 B3 28 |.. AQ$."+". WR.(|
00000D60: 41 44 46 49 4C 45 29 A7 20 57 52 B2 57 52 AA 31 |ADFILE). WR.WR.1|
00000D70: 00 8E 15 77 00 8B 20 41 51 24 B2 22 2D 22 AF 20 |...w.. AQ$."-". |
00000D80: 57 52 B1 31 20 A7 20 57 52 B2 57 52 AB 31 00 AA |WR.1 . WR.WR.1..|
00000D90: 15 78 00 8B 20 57 52 B1 41 44 46 49 4C 45 20 A7 |.x.. WR.ADFILE .|
00000DA0: 20 57 52 B2 41 44 46 49 4C 45 00 BF 15 79 00 8B | WR.ADFILE...y..|
00000DB0: 20 41 44 46 49 4C 45 B2 30 20 A7 20 31 31 35 00 | ADFILE.0 . 115.|
00000DC0: C9 15 7A 00 89 20 31 30 38 00 CF 15 7B 00 8E 00 |..z.. 108...{...|
00000DD0: E7 15 7C 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..|..***********|
00000DE0: 2A 2A 2A 2A 2A 2A 2A 00 FF 15 7D 00 8F 2A 54 41 |*******...}..*TA|
00000DF0: 50 45 20 4F 50 45 52 41 53 4A 4F 4E 45 52 2A 00 |PE OPERASJONER*.|
00000E00: 17 16 7E 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..~..***********|
00000E10: 2A 2A 2A 2A 2A 2A 2A 00 23 16 7F 00 8F 2A 4D 45 |*******.#....*ME|
00000E20: 4E 59 2A 00 40 16 80 00 99 22 93 1D 1D 1D 1D 54 |NY*.@....".....T|
00000E30: 41 50 45 20 4F 50 45 52 41 53 4A 4F 4E 45 52 22 |APE OPERASJONER"|
00000E40: 00 64 16 81 00 99 22 11 1D 1D 1D 28 31 29 53 41 |.d...."....(1)SA|
00000E50: 56 45 2F 45 52 53 54 41 54 54 20 52 45 47 49 53 |VE/ERSTATT REGIS|
00000E60: 54 45 52 22 00 80 16 82 00 99 22 11 1D 1D 1D 28 |TER"......"....(|
00000E70: 32 29 4C 4F 41 44 20 52 45 47 49 53 54 45 52 22 |2)LOAD REGISTER"|
00000E80: 00 A5 16 83 00 99 22 11 1D 1D 1D 28 33 29 54 49 |......"....(3)TI|
00000E90: 4C 42 41 4B 45 20 54 49 4C 20 48 4F 56 45 44 20 |LBAKE TIL HOVED |
00000EA0: 4D 45 4E 59 22 00 C9 16 84 00 8B 20 41 44 46 49 |MENY"...... ADFI|
00000EB0: 4C 45 B1 30 20 A7 99 22 11 1D 1D 1D 44 41 54 41 |LE.0 .."....DATA|
00000EC0: 20 49 20 4D 49 4E 4E 45 22 00 EA 16 85 00 99 22 | I MINNE"......"|
00000ED0: 11 1D 1D 1D 54 41 53 54 20 49 4E 4E 20 45 54 20 |....TAST INN ET |
00000EE0: 4E 52 2E 20 28 31 2D 33 29 22 00 17 17 86 00 A1 |NR. (1-3)"......|
00000EF0: 20 4D 45 54 24 3A 4D 45 54 B2 C5 28 4D 45 54 24 | MET$:MET..(MET$|
00000F00: 29 3A 8B 20 4D 45 54 B3 31 20 B0 20 4D 45 54 B1 |):. MET.1 . MET.|
00000F10: 33 20 A7 20 31 33 34 00 27 17 87 00 8B 20 4D 45 |3 . 134.'.... ME|
00000F20: 54 B2 33 20 A7 20 8E 00 3C 17 88 00 8F 2A 52 45 |T.3 . ..<....*RE|
00000F30: 47 49 53 54 45 52 20 4E 41 56 4E 2A 00 46 17 89 |GISTER NAVN*.F..|
00000F40: 00 8D 20 36 30 35 00 5A 17 8A 00 91 20 4D 45 54 |.. 605.Z.... MET|
00000F50: 20 8D 20 31 36 33 2C 32 30 33 00 64 17 8B 00 89 | . 163,203.d....|
00000F60: 20 31 32 38 00 7C 17 8C 00 8F 2A 2A 2A 2A 2A 2A | 128.|....******|
00000F70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 94 17 8D |************....|
00000F80: 00 8F 2A 44 49 53 4B 20 4F 50 45 52 41 53 4A 4F |..*DISK OPERASJO|
00000F90: 4E 45 52 2A 00 AC 17 8E 00 8F 2A 2A 2A 2A 2A 2A |NER*......******|
00000FA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B8 17 8F |************....|
00000FB0: 00 8F 2A 4D 45 4E 59 2A 00 D5 17 90 00 99 22 93 |..*MENY*......".|
00000FC0: 1D 1D 1D 1D 44 49 53 4B 20 4F 50 45 52 41 53 4A |....DISK OPERASJ|
00000FD0: 4F 4E 45 52 22 00 FA 17 91 00 99 22 11 1D 1D 1D |ONER"......"....|
00000FE0: 28 31 29 53 41 56 45 2F 45 52 53 54 41 54 54 20 |(1)SAVE/ERSTATT |
00000FF0: 52 45 47 49 53 54 45 52 22 3B 00 13 18 92 00 99 |REGISTER";......|
00001000: 22 1D 28 32 29 4C 4F 41 44 20 52 45 47 49 53 54 |".(2)LOAD REGIST|
00001010: 45 52 22 00 34 18 93 00 99 22 11 1D 1D 1D 28 33 |ER".4...."....(3|
00001020: 29 4C 45 53 20 44 49 53 4B 20 49 4E 4E 48 4F 4C |)LES DISK INNHOL|
00001030: 44 45 54 22 00 5F 18 94 00 99 22 11 1D 1D 1D 28 |DET"._...."....(|
00001040: 34 29 53 4B 49 46 54 20 4E 41 56 4E 20 50 41 41 |4)SKIFT NAVN PAA|
00001050: 20 44 49 53 4B 20 52 45 47 49 53 54 45 52 22 00 | DISK REGISTER".|
00001060: 7B 18 95 00 99 22 11 1D 1D 1D 28 35 29 42 45 4B |{...."....(5)BEK|
00001070: 52 45 46 54 20 44 49 53 4B 20 22 00 9D 18 96 00 |REFT DISK ".....|
00001080: 99 22 11 1D 1D 1D 28 36 29 53 54 52 59 4B 20 46 |."....(6)STRYK F|
00001090: 49 4C 45 20 50 41 41 20 44 49 53 4B 22 00 CA 18 |ILE PAA DISK"...|
000010A0: 97 00 99 22 11 1D 1D 1D 28 37 29 46 4F 52 4D 41 |..."....(7)FORMA|
000010B0: 54 49 53 45 52 2F 53 4B 49 46 54 20 4E 41 56 4E |TISER/SKIFT NAVN|
000010C0: 20 50 41 41 20 44 49 53 4B 22 00 EF 18 98 00 99 | PAA DISK"......|
000010D0: 22 11 1D 1D 1D 28 38 29 54 49 4C 42 41 4B 45 20 |"....(8)TILBAKE |
000010E0: 54 49 4C 20 48 4F 56 45 44 20 4D 45 4E 59 22 00 |TIL HOVED MENY".|
000010F0: 13 19 99 00 8B 20 41 44 46 49 4C 45 B1 30 20 A7 |..... ADFILE.0 .|
00001100: 99 22 11 1D 1D 1D 44 41 54 41 20 49 20 4D 49 4E |."....DATA I MIN|
00001110: 4E 45 22 00 34 19 9A 00 99 22 11 1D 1D 1D 54 41 |NE".4...."....TA|
00001120: 53 54 20 49 4E 4E 20 45 54 20 4E 52 2E 20 28 31 |ST INN ET NR. (1|
00001130: 2D 38 29 22 00 61 19 9B 00 A1 20 4D 45 44 24 3A |-8)".a.... MED$:|
00001140: 4D 45 44 B2 C5 28 4D 45 44 24 29 3A 8B 20 4D 45 |MED..(MED$):. ME|
00001150: 44 B3 31 20 B0 20 4D 45 44 B1 38 20 A7 20 31 35 |D.1 . MED.8 . 15|
00001160: 35 00 71 19 9C 00 8B 20 4D 45 44 B2 38 20 A7 20 |5.q.... MED.8 . |
00001170: 8E 00 85 19 9D 00 8B 20 4D 45 44 B3 33 20 A7 20 |....... MED.3 . |
00001180: 8D 20 36 30 35 00 AD 19 9E 00 91 20 4D 45 44 20 |. 605...... MED |
00001190: 8D 20 31 37 32 2C 32 31 32 2C 32 31 34 2C 33 30 |. 172,212,214,30|
000011A0: 36 2C 33 31 35 2C 33 32 31 2C 33 32 38 00 B7 19 |6,315,321,328...|
000011B0: 9F 00 89 20 31 34 34 00 D2 19 A0 00 8F 2A 2A 2A |... 144......***|
000011C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000011D0: 2A 2A 00 ED 19 A1 00 8F 2A 53 4B 52 49 56 20 54 |**......*SKRIV T|
000011E0: 49 4C 20 44 49 53 4B 2F 54 41 50 45 2A 00 08 1A |IL DISK/TAPE*...|
000011F0: A2 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00001200: 2A 2A 2A 2A 2A 2A 2A 2A 00 1E 1A A3 00 8F 2A 2A |********......**|
00001210: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 34 |**************.4|
00001220: 1A A4 00 8F 2A 53 4B 52 49 56 20 54 49 4C 20 54 |....*SKRIV TIL T|
00001230: 41 50 45 2A 00 4A 1A A5 00 8F 2A 2A 2A 2A 2A 2A |APE*.J....******|
00001240: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 80 1A A6 00 99 |**********......|
00001250: 22 93 53 45 54 54 20 49 4E 4E 20 54 41 50 45 4E |".SETT INN TAPEN|
00001260: 20 20 11 22 3A 99 22 44 45 52 45 54 54 45 52 2C | .":."DERETTER,|
00001270: 20 54 52 59 4B 4B 20 45 4E 20 54 41 53 54 11 22 | TRYKK EN TAST."|
00001280: 00 A1 1A A7 00 99 22 53 50 41 43 45 2D 54 41 53 |......"SPACE-TAS|
00001290: 54 20 46 4F 52 20 46 4A 45 52 4E 49 4E 47 11 11 |T FOR FJERNING..|
000012A0: 22 00 B8 1A A8 00 A1 20 41 51 24 3A 8B 41 51 24 |"...... AQ$:.AQ$|
000012B0: B2 22 22 A7 20 31 36 38 00 CA 1A A9 00 8B 20 41 |."". 168...... A|
000012C0: 51 24 B2 22 20 22 20 A7 20 8E 00 DC 1A AA 00 9F |Q$." " . .......|
000012D0: 20 31 2C 31 2C 31 2C 46 49 4C 45 24 00 E8 1A AB | 1,1,1,FILE$....|
000012E0: 00 89 20 36 35 35 33 35 00 FE 1A AC 00 8F 2A 2A |.. 65535......**|
000012F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 14 |**************..|
00001300: 1B AD 00 8F 2A 53 4B 52 49 56 20 54 49 4C 20 44 |....*SKRIV TIL D|
00001310: 49 53 4B 2A 00 2A 1B AE 00 8F 2A 2A 2A 2A 2A 2A |ISK*.*....******|
00001320: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 50 1B AF 00 99 |**********.P....|
00001330: 22 93 53 45 54 54 20 44 49 53 4B 20 49 4E 4E 20 |".SETT DISK INN |
00001340: 49 20 44 49 53 4B 53 54 41 53 4A 4F 4E 45 4E 22 |I DISKSTASJONEN"|
00001350: 00 66 1B B0 00 99 22 11 54 52 59 4B 4B 20 45 4E |.f....".TRYKK EN|
00001360: 20 54 41 53 54 22 00 86 1B B1 00 99 22 11 53 50 | TAST"......".SP|
00001370: 41 43 45 2D 54 41 53 54 20 46 4F 52 20 46 4A 45 |ACE-TAST FOR FJE|
00001380: 52 4E 49 4E 47 22 00 9E 1B B2 00 A1 20 41 51 24 |RNING"...... AQ$|
00001390: 3A 8B 20 41 51 24 B2 22 22 A7 20 31 37 38 00 AF |:. AQ$."". 178..|
000013A0: 1B B3 00 8B 20 41 51 24 B2 22 20 22 A7 20 8E 00 |.... AQ$." ". ..|
000013B0: CE 1B B4 00 9F 20 31 2C 38 2C 32 2C 22 40 30 3A |..... 1,8,2,"@0:|
000013C0: 22 AA 46 49 4C 45 24 AA 22 2C 53 2C 57 22 00 EA |".FILE$.",S,W"..|
000013D0: 1B B5 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....************|
000013E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 06 1C B6 00 8F |**********......|
000013F0: 2A 53 4B 52 49 56 20 46 45 4C 4C 45 53 20 54 49 |*SKRIV FELLES TI|
00001400: 4C 20 44 26 54 2A 00 22 1C B7 00 8F 2A 2A 2A 2A |L D&T*."....****|
00001410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001420: 2A 2A 00 46 1C B8 00 8F 2A 53 4B 52 49 56 20 41 |**.F....*SKRIV A|
00001430: 4E 54 41 4C 4C 20 4F 50 50 4C 59 53 4E 49 4E 47 |NTALL OPPLYSNING|
00001440: 45 52 2C 46 49 2A 00 57 1C B9 00 98 31 2C 46 49 |ER,FI*.W....1,FI|
00001450: 3B C7 28 31 33 29 3B 00 71 1C BA 00 8F 2A 53 4B |;.(13);.q....*SK|
00001460: 52 49 56 20 4F 50 50 4C 59 53 4E 49 4E 47 45 52 |RIV OPPLYSNINGER|
00001470: 2A 00 8D 1C BB 00 81 20 41 B2 31 20 A4 20 46 49 |*...... A.1 . FI|
00001480: 3A 41 54 45 4D 50 24 B2 50 24 28 41 29 00 AA 1C |:ATEMP$.P$(A)...|
00001490: BC 00 8B 20 41 54 45 4D 50 24 B2 22 22 20 A7 20 |... ATEMP$."" . |
000014A0: 41 54 45 4D 50 24 B2 22 3C 22 00 BF 1C BD 00 98 |ATEMP$."<"......|
000014B0: 31 2C 41 54 45 4D 50 24 3B C7 28 31 33 29 3B 00 |1,ATEMP$;.(13);.|
000014C0: C7 1C BE 00 82 20 41 00 EC 1C BF 00 8F 2A 53 4B |..... A......*SK|
000014D0: 52 49 56 20 41 4E 54 41 4C 4C 20 46 49 4C 45 52 |RIV ANTALL FILER|
000014E0: 20 49 20 52 45 47 49 53 54 45 52 2A 00 01 1D C0 | I REGISTER*....|
000014F0: 00 98 31 2C 41 44 46 49 4C 45 3B C7 28 31 33 29 |..1,ADFILE;.(13)|
00001500: 3B 00 13 1D C1 00 8F 2A 53 4B 52 49 56 20 44 41 |;......*SKRIV DA|
00001510: 54 41 2A 00 26 1D C2 00 81 20 42 B2 31 20 A4 20 |TA*.&.... B.1 . |
00001520: 41 44 46 49 4C 45 00 35 1D C3 00 81 20 41 B2 31 |ADFILE.5.... A.1|
00001530: 20 A4 20 46 49 00 4C 1D C4 00 98 31 2C 46 49 24 | . FI.L....1,FI$|
00001540: 28 41 2C 42 29 3B C7 28 31 33 29 3B 00 55 1D C5 |(A,B);.(13);.U..|
00001550: 00 82 41 2C 42 00 5E 1D C6 00 A0 31 3A 8E 00 77 |..A,B.^....1:..w|
00001560: 1D C7 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....************|
00001570: 2A 2A 2A 2A 2A 2A 2A 00 90 1D C8 00 8F 2A 4C 45 |*******......*LE|
00001580: 53 20 46 52 41 20 44 49 53 4B 2F 54 41 50 45 2A |S FRA DISK/TAPE*|
00001590: 00 A9 1D C9 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |......**********|
000015A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 BD 1D CA 00 8F 2A |*********......*|
000015B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D1 1D |*************...|
000015C0: CB 00 8F 2A 4C 45 53 20 46 52 41 20 54 41 50 45 |...*LES FRA TAPE|
000015D0: 2A 00 E5 1D CC 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*......*********|
000015E0: 2A 2A 2A 2A 2A 00 1A 1E CD 00 99 22 93 53 45 54 |*****......".SET|
000015F0: 54 20 49 4E 4E 20 54 41 50 45 4E 20 11 22 3A 99 |T INN TAPEN .":.|
00001600: 22 44 45 52 45 54 54 45 52 2C 20 54 52 59 4B 4B |"DERETTER, TRYKK|
00001610: 20 45 4E 20 54 41 53 54 11 22 00 3B 1E CE 00 99 | EN TAST.".;....|
00001620: 22 53 50 41 43 45 20 54 41 53 54 20 46 4F 52 20 |"SPACE TAST FOR |
00001630: 46 4A 45 52 4E 49 4E 47 11 11 22 00 52 1E CF 00 |FJERNING..".R...|
00001640: A1 20 41 51 24 3A 8B 41 51 24 B2 22 22 A7 20 32 |. AQ$:.AQ$."". 2|
00001650: 30 37 00 64 1E D0 00 8B 20 41 51 24 B2 22 20 22 |07.d.... AQ$." "|
00001660: 20 A7 20 8E 00 76 1E D1 00 9F 20 31 2C 31 2C 30 | . ..v.... 1,1,0|
00001670: 2C 46 49 4C 45 24 00 80 1E D2 00 89 20 32 32 36 |,FILE$...... 226|
00001680: 00 94 1E D3 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |......**********|
00001690: 2A 2A 2A 2A 00 A8 1E D4 00 8F 2A 4C 45 53 20 46 |****......*LES F|
000016A0: 52 41 20 44 49 53 4B 2A 00 BC 1E D5 00 8F 2A 2A |RA DISK*......**|
000016B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DE 1E D6 |************....|
000016C0: 00 99 22 93 53 45 54 54 20 44 49 53 4B 20 49 4E |..".SETT DISK IN|
000016D0: 4E 20 49 20 53 54 41 53 4A 4F 4E 45 4E 22 00 FE |N I STASJONEN"..|
000016E0: 1E D7 00 99 22 11 44 45 52 45 54 54 45 52 2C 20 |....".DERETTER, |
000016F0: 54 52 59 4B 4B 20 45 4E 20 54 41 53 54 22 00 1E |TRYKK EN TAST"..|
00001700: 1F D8 00 99 22 11 53 50 41 43 45 2D 54 41 53 54 |....".SPACE-TAST|
00001710: 20 46 4F 52 20 46 4A 45 52 4E 49 4E 47 22 00 36 | FOR FJERNING".6|
00001720: 1F D9 00 A1 20 41 51 24 3A 8B 20 41 51 24 B2 22 |.... AQ$:. AQ$."|
00001730: 22 A7 20 32 31 37 00 47 1F DA 00 8B 20 41 51 24 |". 217.G.... AQ$|
00001740: B2 22 20 22 A7 20 8E 00 59 1F DB 00 8B 20 4D 45 |." ". ..Y.... ME|
00001750: 44 B2 33 20 A7 20 32 35 31 00 6B 1F DC 00 8B 20 |D.3 . 251.k.... |
00001760: 4D 45 44 B2 34 20 A7 20 33 31 32 00 7D 1F DD 00 |MED.4 . 312.}...|
00001770: 8B 20 4D 45 44 B2 35 20 A7 20 33 31 37 00 8F 1F |. MED.5 . 317...|
00001780: DE 00 8B 20 4D 45 44 B2 36 20 A7 20 33 32 35 00 |... MED.6 . 325.|
00001790: A1 1F DF 00 8B 20 4D 45 44 B2 37 20 A7 20 33 34 |..... MED.7 . 34|
000017A0: 31 00 BF 1F E0 00 9F 20 31 2C 38 2C 32 2C 22 30 |1...... 1,8,2,"0|
000017B0: 3A 22 AA 46 49 4C 45 24 AA 22 2C 53 2C 52 22 00 |:".FILE$.",S,R".|
000017C0: D9 1F E1 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....***********|
000017D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F3 1F E2 00 8F 2A |*********......*|
000017E0: 4C 45 53 20 46 45 4C 4C 45 53 20 54 49 4C 20 44 |LES FELLES TIL D|
000017F0: 26 54 2A 00 0D 20 E3 00 8F 2A 2A 2A 2A 2A 2A 2A |&T*.. ...*******|
00001800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1A 20 |*************.. |
00001810: E4 00 41 B2 30 3A 46 49 B2 30 00 34 20 E5 00 8F |..A.0:FI.0.4 ...|
00001820: 2A 4C 45 53 20 41 4E 54 41 4C 4C 20 4F 50 50 4C |*LES ANTALL OPPL|
00001830: 59 53 2E 2A 00 3E 20 E6 00 84 31 2C 46 49 00 55 |YS.*.> ...1,FI.U|
00001840: 20 E7 00 8F 2A 4C 45 53 20 49 4E 4E 20 4F 50 50 | ...*LES INN OPP|
00001850: 4C 59 53 2E 2A 00 5F 20 E8 00 41 B2 41 AA 31 00 |LYS.*._ ..A.A.1.|
00001860: 83 20 E9 00 84 31 2C 50 24 28 41 29 3A 8B 20 50 |. ...1,P$(A):. P|
00001870: 24 28 41 29 B2 22 3C 22 20 A7 20 50 24 28 41 29 |$(A)."<" . P$(A)|
00001880: B2 22 22 00 97 20 EA 00 8B 20 53 54 B3 B1 30 20 |."".. ... ST..0 |
00001890: A7 20 A0 20 31 3A 8E 00 A8 20 EB 00 8B 20 41 B3 |. . 1:... ... A.|
000018A0: 46 49 20 A7 20 32 33 32 00 C4 20 EC 00 8F 2A 4C |FI . 232.. ...*L|
000018B0: 45 53 20 49 4E 4E 20 41 4E 54 41 4C 4C 20 46 49 |ES INN ANTALL FI|
000018C0: 4C 45 52 2A 00 D2 20 ED 00 84 31 2C 41 44 46 49 |LER*.. ...1,ADFI|
000018D0: 4C 45 00 E6 20 EE 00 8F 2A 4C 45 53 20 49 4E 4E |LE.. ...*LES INN|
000018E0: 20 44 41 54 41 2A 00 EE 20 EF 00 42 B2 30 00 F8 | DATA*.. ..B.0..|
000018F0: 20 F0 00 42 B2 42 AA 31 00 00 21 F1 00 41 B2 30 | ..B.B.1..!..A.0|
00001900: 00 0A 21 F2 00 41 B2 41 AA 31 00 1A 21 F3 00 84 |..!..A.A.1..!...|
00001910: 31 2C 46 49 24 28 41 2C 42 29 00 2D 21 F4 00 8B |1,FI$(A,B).-!...|
00001920: 20 53 54 B3 B1 30 20 A7 20 A0 31 3A 8E 00 3E 21 | ST..0 . .1:..>!|
00001930: F5 00 8B 20 41 B3 46 49 20 A7 20 32 34 32 00 53 |... A.FI . 242.S|
00001940: 21 F6 00 8B 20 42 B3 41 44 46 49 4C 45 20 A7 20 |!... B.ADFILE . |
00001950: 32 34 30 00 5C 21 F7 00 A0 31 3A 8E 00 73 21 F8 |240.\!...1:..s!.|
00001960: 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00001970: 2A 2A 2A 00 8A 21 F9 00 8F 2A 44 49 53 4B 20 44 |***..!...*DISK D|
00001980: 49 52 20 4C 45 53 45 52 20 2A 00 A1 21 FA 00 8F |IR LESER *..!...|
00001990: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000019A0: 2A 00 B5 21 FB 00 9F 20 31 2C 38 2C 32 2C 22 24 |*..!... 1,8,2,"$|
000019B0: 2C 53 2C 52 22 00 C4 21 FC 00 81 20 4C B2 31 20 |,S,R"..!... L.1 |
000019C0: A4 20 37 31 00 D2 21 FD 00 A1 23 31 2C 41 24 2C |. 71..!...#1,A$,|
000019D0: 41 24 00 F7 21 FE 00 8B 20 53 54 B3 B1 30 20 A7 |A$..!... ST..0 .|
000019E0: 20 A0 31 3A 99 22 44 49 53 4B 20 45 52 52 4F 52 | .1:."DISK ERROR|
000019F0: 22 3A 89 20 32 39 32 00 FF 21 FF 00 82 20 4C 00 |":. 292..!... L.|
00001A00: 33 22 00 01 54 24 28 31 29 B2 22 53 45 51 22 3A |3"..T$(1)."SEQ":|
00001A10: 54 24 28 32 29 B2 22 50 52 47 22 3A 54 24 28 33 |T$(2)."PRG":T$(3|
00001A20: 29 B2 22 55 53 52 22 3A 54 24 28 34 29 B2 22 52 |)."USR":T$(4)."R|
00001A30: 45 4C 22 00 48 22 01 01 8F 2A 46 41 41 20 44 49 |EL".H"...*FAA DI|
00001A40: 53 4B 20 4E 41 56 4E 2A 00 57 22 02 01 49 B2 31 |SK NAVN*.W"..I.1|
00001A50: 37 3A 8D 20 32 39 38 00 68 22 03 01 44 4E 41 4D |7:. 298.h"..DNAM|
00001A60: 45 24 B2 54 45 4D 50 24 00 7B 22 04 01 8F 2A 46 |E$.TEMP$.{"...*F|
00001A70: 41 41 20 44 49 53 4B 20 49 44 2A 00 89 22 05 01 |AA DISK ID*.."..|
00001A80: 49 B2 32 3A 8D 20 32 39 38 00 98 22 06 01 44 49 |I.2:. 298.."..DI|
00001A90: 44 24 B2 54 45 4D 50 24 00 AD 22 07 01 8F 2A 46 |D$.TEMP$.."...*F|
00001AA0: 41 41 20 4F 50 20 53 59 53 54 45 4D 2A 00 BB 22 |AA OP SYSTEM*.."|
00001AB0: 08 01 49 B2 32 3A 8D 20 32 39 38 00 C9 22 09 01 |..I.2:. 298.."..|
00001AC0: 4F 53 24 B2 54 45 4D 50 24 00 EE 22 0A 01 8F 2A |OS$.TEMP$.."...*|
00001AD0: 46 41 41 20 52 45 53 54 20 41 56 20 42 4C 4F 4B |FAA REST AV BLOK|
00001AE0: 4B 2C 20 49 4B 4B 45 20 42 52 55 4B 54 2A 00 0A |K, IKKE BRUKT*..|
00001AF0: 23 0B 01 81 20 4C B2 31 20 A4 20 34 34 3A A1 23 |#... L.1 . 44:.#|
00001B00: 31 2C 41 24 2C 41 24 3A 82 4C 00 36 23 0C 01 99 |1,A$,A$:.L.6#...|
00001B10: 22 93 44 49 53 4B 20 4E 41 56 45 3A 22 44 4E 41 |".DISK NAVE:"DNA|
00001B20: 4D 45 24 2C 22 49 44 3A 22 44 49 44 24 2C 22 4F |ME$,"ID:"DID$,"O|
00001B30: 53 3A 22 4F 53 24 00 3F 23 0D 01 4C 54 B2 30 00 |S:"OS$.?#..LT.0.|
00001B40: 5D 23 0E 01 8F 2A 46 41 41 20 52 45 47 49 53 54 |]#...*FAA REGIST|
00001B50: 45 52 20 44 45 54 41 4C 4A 45 4E 45 2A 00 7B 23 |ER DETALJENE*.{#|
00001B60: 0F 01 8F 2A 46 41 41 20 52 45 47 49 53 54 45 52 |...*FAA REGISTER|
00001B70: 20 54 59 50 45 20 2C 54 59 24 2A 00 97 23 10 01 | TYPE ,TY$*..#..|
00001B80: 81 20 41 B2 31 20 A4 20 38 3A A1 23 31 2C 54 59 |. A.1 . 8:.#1,TY|
00001B90: 24 2C 41 24 2C 41 24 00 AF 23 11 01 8B 20 53 54 |$,A$,A$..#... ST|
00001BA0: B3 B1 30 20 A7 20 A0 20 31 3A 89 20 32 39 31 00 |..0 . . 1:. 291.|
00001BB0: C2 23 12 01 8B 20 54 59 24 B3 B1 22 22 A7 20 32 |.#... TY$.."". 2|
00001BC0: 37 37 00 DC 23 13 01 81 20 4C B2 31 20 A4 20 32 |77..#... L.1 . 2|
00001BD0: 37 3A A1 23 31 2C 41 24 3A 82 20 4C 00 E6 23 14 |7:.#1,A$:. L..#.|
00001BE0: 01 89 20 32 38 37 00 FF 23 15 01 8F 2A 46 41 41 |.. 287..#...*FAA|
00001BF0: 20 52 45 47 49 53 54 45 52 20 4E 41 56 4E 2A 00 | REGISTER NAVN*.|
00001C00: 0E 24 16 01 49 B2 31 35 3A 8D 20 32 39 38 00 1B |.$..I.15:. 298..|
00001C10: 24 17 01 4E 24 B2 54 45 4D 50 24 00 39 24 18 01 |$..N$.TEMP$.9$..|
00001C20: 8F 2A 46 41 41 20 52 45 47 49 53 54 45 52 45 54 |.*FAA REGISTERET|
00001C30: 53 20 4C 45 4E 47 44 45 2A 00 50 24 19 01 81 20 |S LENGDE*.P$... |
00001C40: 4C B2 31 20 A4 20 39 3A A1 23 31 2C 41 24 3A 82 |L.1 . 9:.#1,A$:.|
00001C50: 00 5E 24 1A 01 A1 23 31 2C 4C 24 2C 48 24 00 8A |.^$...#1,L$,H$..|
00001C60: 24 1B 01 4C B2 C6 28 4C 24 AA C7 28 30 29 29 AA |$..L..(L$..(0)).|
00001C70: 32 35 36 AC C6 28 48 24 AA C7 28 30 29 29 3A 8B |256..(H$..(0)):.|
00001C80: 20 4C B2 30 20 A7 20 32 38 37 00 96 24 1C 01 4C | L.0 . 287..$..L|
00001C90: 54 B2 4C 54 AA 4C 00 AC 24 1D 01 8F 2A 50 52 49 |T.LT.L..$...*PRI|
00001CA0: 4E 54 20 44 45 54 41 4C 4A 45 52 2A 00 C9 24 1E |NT DETALJER*..$.|
00001CB0: 01 99 20 4E 24 A3 32 30 29 54 24 28 C6 28 54 59 |.. N$.20)T$(.(TY|
00001CC0: 24 29 AB 31 32 38 29 2C 4C 00 DF 24 1F 01 8B 20 |$).128),L..$... |
00001CD0: 41 B3 38 20 A7 20 A1 23 31 2C 41 24 2C 41 24 00 |A.8 . .#1,A$,A$.|
00001CE0: E7 24 20 01 82 20 41 00 FF 24 21 01 8F 2A 46 4F |.$ .. A..$!..*FO|
00001CF0: 52 54 53 45 54 54 20 4D 45 44 20 44 49 52 2A 00 |RTSETT MED DIR*.|
00001D00: 09 25 22 01 89 20 32 37 30 00 2C 25 23 01 99 22 |.%".. 270.,%#.."|
00001D10: 11 41 4E 54 2E 20 42 4C 4F 4B 4B 45 52 20 4C 45 |.ANT. BLOKKER LE|
00001D20: 44 49 47 3A 22 3B 36 36 34 AB 4C 54 00 5A 25 24 |DIG:";664.LT.Z%$|
00001D30: 01 99 22 11 11 52 45 50 45 54 49 53 4A 4F 4E 20 |.."..REPETISJON |
00001D40: 41 56 20 44 49 53 4B 20 44 49 52 20 54 52 59 4B |AV DISK DIR TRYK|
00001D50: 4B 20 45 4E 20 54 41 53 54 22 00 80 25 25 01 99 |K EN TAST"..%%..|
00001D60: 22 11 53 50 41 43 45 2D 54 41 53 54 20 46 4F 52 |".SPACE-TAST FOR|
00001D70: 20 52 45 54 55 52 20 54 49 4C 20 4D 45 4E 59 22 | RETUR TIL MENY"|
00001D80: 00 99 25 26 01 A1 20 41 51 24 3A 8B 20 41 51 24 |..%&.. AQ$:. AQ$|
00001D90: B2 22 22 20 A7 20 32 39 34 00 AB 25 27 01 8B 20 |."" . 294..%'.. |
00001DA0: 41 51 24 B2 22 20 22 20 A7 20 8E 00 B5 25 28 01 |AQ$." " . ...%(.|
00001DB0: 89 20 32 35 31 00 D0 25 29 01 8F 2A 53 54 52 49 |. 251..%)..*STRI|
00001DC0: 4E 47 20 4B 4F 4E 53 54 52 55 4B 54 4F 45 52 2A |NG KONSTRUKTOER*|
00001DD0: 00 DD 25 2A 01 54 45 4D 50 24 B2 22 22 00 EB 25 |..%*.TEMP$.""..%|
00001DE0: 2B 01 81 20 42 B2 30 20 A4 20 49 00 13 26 2C 01 |+.. B.0 . I..&,.|
00001DF0: A1 23 31 2C 42 24 3A 8B 20 42 24 B3 B1 C7 28 31 |.#1,B$:. B$...(1|
00001E00: 36 30 29 A7 20 54 45 4D 50 24 B2 54 45 4D 50 24 |60). TEMP$.TEMP$|
00001E10: AA 42 24 00 1B 26 2D 01 82 20 42 00 21 26 2E 01 |.B$..&-.. B.!&..|
00001E20: 8E 00 31 26 2F 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..1&/..*********|
00001E30: 2A 00 41 26 30 01 8F 2A 44 49 53 4B 20 4B 4D 44 |*.A&0..*DISK KMD|
00001E40: 2A 00 51 26 31 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*.Q&1..*********|
00001E50: 2A 00 6C 26 32 01 8F 2A 53 4B 49 46 54 20 4E 41 |*.l&2..*SKIFT NA|
00001E60: 56 4E 20 50 41 41 20 44 49 53 4B 2A 00 95 26 33 |VN PAA DISK*..&3|
00001E70: 01 99 22 93 53 4B 49 46 54 20 4E 41 56 4E 20 50 |..".SKIFT NAVN P|
00001E80: 41 41 20 52 45 47 49 53 54 45 52 20 50 41 41 20 |AA REGISTER PAA |
00001E90: 44 49 53 4B 22 00 BA 26 34 01 85 22 11 54 41 53 |DISK"..&4..".TAS|
00001EA0: 54 20 49 4E 4E 20 47 41 4D 4D 45 4C 54 20 4E 41 |T INN GAMMELT NA|
00001EB0: 56 4E 22 3B 4F 4C 4E 41 4D 24 00 D3 26 35 01 85 |VN";OLNAM$..&5..|
00001EC0: 22 11 4E 59 54 54 20 4E 41 56 4E 22 3B 4E 45 4E |".NYTT NAVN";NEN|
00001ED0: 41 4D 24 00 07 27 36 01 41 B2 C3 28 4E 45 4E 41 |AM$..'6.A..(NENA|
00001EE0: 4D 24 29 3A 8B 20 41 B1 31 36 20 A7 20 99 22 11 |M$):. A.16 . .".|
00001EF0: 4E 41 56 4E 20 46 4F 52 20 4C 41 4E 47 54 21 21 |NAVN FOR LANGT!!|
00001F00: 22 3A 89 20 33 30 39 00 11 27 37 01 89 20 32 31 |":. 309..'7.. 21|
00001F10: 34 00 3B 27 38 01 9F 20 31 35 2C 38 2C 31 35 3A |4.;'8.. 15,8,15:|
00001F20: 98 31 35 2C 22 52 30 3A 22 AA 4E 45 4E 41 4D 24 |.15,"R0:".NENAM$|
00001F30: AA 22 3D 22 AA 4F 4C 4E 41 4D 24 00 44 27 39 01 |."=".OLNAM$.D'9.|
00001F40: A0 20 31 35 00 4A 27 3A 01 8E 00 5E 27 3B 01 8F |. 15.J':...^';..|
00001F50: 2A 42 45 4B 52 45 46 54 20 44 49 53 4B 2A 00 68 |*BEKREFT DISK*.h|
00001F60: 27 3C 01 89 20 32 31 34 00 7F 27 3D 01 99 22 93 |'<.. 214..'=..".|
00001F70: 42 45 4B 52 45 46 54 45 52 20 44 49 53 4B 22 00 |BEKREFTER DISK".|
00001F80: 95 27 3E 01 9F 20 31 35 2C 38 2C 31 35 3A 98 31 |.'>.. 15,8,15:.1|
00001F90: 35 2C 22 56 22 00 9E 27 3F 01 A0 20 31 35 00 A4 |5,"V"..'?.. 15..|
00001FA0: 27 40 01 8E 00 C3 27 41 01 8F 2A 53 54 52 59 4B |'@....'A..*STRYK|
00001FB0: 20 52 45 47 49 53 54 45 52 20 50 41 41 20 44 49 | REGISTER PAA DI|
00001FC0: 53 4B 2A 00 DD 27 42 01 99 22 93 53 54 52 59 4B |SK*..'B..".STRYK|
00001FD0: 20 45 54 20 52 45 47 49 53 54 45 52 22 00 FD 27 | ET REGISTER"..'|
00001FE0: 43 01 85 22 11 52 45 47 49 53 54 45 52 45 54 53 |C..".REGISTERETS|
00001FF0: 20 4E 41 56 4E 22 3B 44 46 49 4C 45 24 00 07 28 | NAVN";DFILE$..(|
00002000: 44 01 89 20 32 31 34 00 26 28 45 01 9F 20 31 35 |D.. 214.&(E.. 15|
00002010: 2C 38 2C 31 35 3A 98 31 35 2C 22 53 30 3A 22 AA |,8,15:.15,"S0:".|
00002020: 44 46 49 4C 45 24 00 2F 28 46 01 A0 20 31 35 00 |DFILE$./(F.. 15.|
00002030: 35 28 47 01 8E 00 5B 28 48 01 8F 2A 46 4F 52 4D |5(G...[(H..*FORM|
00002040: 41 54 49 53 45 52 2F 53 4B 49 46 54 20 4E 41 4E |ATISER/SKIFT NAN|
00002050: 56 20 50 41 41 20 44 49 53 4B 2A 00 8C 28 49 01 |V PAA DISK*..(I.|
00002060: 99 22 93 46 4F 52 4D 41 54 49 53 45 52 28 31 29 |.".FORMATISER(1)|
00002070: 20 45 4C 4C 45 52 20 53 4B 49 46 54 20 4E 41 56 | ELLER SKIFT NAV|
00002080: 4E 28 32 29 20 44 49 53 4B 20 3F 22 00 CD 28 4A |N(2) DISK ?"..(J|
00002090: 01 99 22 11 41 44 56 41 52 53 45 4C 2D 4B 4F 4D |..".ADVARSEL-KOM|
000020A0: 4D 41 4E 44 4F 45 4E 45 20 4F 56 45 4E 46 4F 52 |MANDOENE OVENFOR|
000020B0: 20 53 54 52 59 4B 45 52 20 52 45 47 49 53 54 52 | STRYKER REGISTR|
000020C0: 45 20 20 20 50 41 41 20 44 49 53 4B 22 00 E3 28 |E PAA DISK"..(|
000020D0: 4B 01 A1 20 51 24 3A 8B 20 51 24 B2 22 22 A7 20 |K.. Q$:. Q$."". |
000020E0: 33 33 31 00 01 29 4C 01 51 B2 C5 28 51 24 29 3A |331..)L.Q..(Q$):|
000020F0: 8B 20 51 B3 31 20 B0 20 51 B1 32 20 A7 20 33 33 |. Q.1 . Q.2 . 33|
00002100: 31 00 1C 29 4D 01 85 22 11 44 49 53 4B 45 4E 53 |1..)M..".DISKENS|
00002110: 20 4E 41 56 4E 22 3B 44 4E 41 4D 24 00 53 29 4E | NAVN";DNAM$.S)N|
00002120: 01 44 4E 4C B2 C3 28 44 4E 41 4D 24 29 3A 8B 20 |.DNL..(DNAM$):. |
00002130: 44 4E 4C B1 31 36 20 A7 20 99 22 11 4E 41 56 4E |DNL.16 . .".NAVN|
00002140: 20 46 4F 52 20 4C 41 4E 47 54 21 21 22 3A 89 20 | FOR LANGT!!":. |
00002150: 33 33 33 00 71 29 4F 01 8B 20 44 4E 4C B3 31 20 |333.q)O.. DNL.1 |
00002160: A7 20 99 22 11 4E 41 56 4E 3F 21 22 3A 89 33 33 |. .".NAVN?!":.33|
00002170: 33 00 81 29 50 01 8B 20 51 B2 32 20 A7 20 33 34 |3..)P.. Q.2 . 34|
00002180: 30 00 99 29 51 01 85 22 11 44 49 53 4B 45 4E 53 |0..)Q..".DISKENS|
00002190: 20 49 44 22 3B 44 49 44 24 00 CC 29 52 01 44 49 | ID";DID$..)R.DI|
000021A0: 44 4C B2 C3 28 44 49 44 24 29 3A 8B 20 44 49 44 |DL..(DID$):. DID|
000021B0: 4C B1 32 20 A7 20 99 22 11 49 44 20 46 4F 52 20 |L.2 . .".ID FOR |
000021C0: 4C 41 4E 47 21 21 22 3A 89 33 33 37 00 E9 29 53 |LANG!!":.337..)S|
000021D0: 01 8B 20 44 49 44 4C B3 31 20 A7 20 99 22 11 49 |.. DIDL.1 . .".I|
000021E0: 44 3F 21 22 3A 89 33 33 37 00 F3 29 54 01 89 20 |D?!":.337..)T.. |
000021F0: 32 31 34 00 01 2A 55 01 9F 20 31 35 2C 38 2C 31 |214..*U.. 15,8,1|
00002200: 35 00 11 2A 56 01 8B 20 51 B2 32 20 A7 20 33 34 |5..*V.. Q.2 . 34|
00002210: 35 00 2E 2A 57 01 98 31 35 2C 22 4E 30 3A 22 AA |5..*W..15,"N0:".|
00002220: 44 4E 41 4D 24 AA 22 2C 22 AA 44 49 44 24 00 39 |DNAM$.",".DID$.9|
00002230: 2A 58 01 A0 20 31 35 3A 8E 00 4D 2A 59 01 98 31 |*X.. 15:..M*Y..1|
00002240: 35 2C 22 4E 30 3A 22 AA 44 4E 41 4D 24 00 58 2A |5,"N0:".DNAM$.X*|
00002250: 5A 01 A0 20 31 35 3A 8E 00 74 2A 5B 01 8F 2A 2A |Z.. 15:..t*[..**|
00002260: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002270: 2A 2A 2A 2A 00 90 2A 5C 01 8F 2A 50 52 49 4E 54 |****..*\..*PRINT|
00002280: 20 46 49 4C 45 2F 4D 45 52 4B 45 4C 41 50 50 2A | FILE/MERKELAPP*|
00002290: 00 AC 2A 5D 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..*]..**********|
000022A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DF 2A 5E |************..*^|
000022B0: 01 8B 20 46 49 B2 30 20 A7 20 37 37 3A 8F 20 48 |.. FI.0 . 77:. H|
000022C0: 56 49 53 20 49 4E 47 45 4E 20 52 45 47 49 53 54 |VIS INGEN REGIST|
000022D0: 52 45 20 45 52 20 4F 50 50 52 45 54 54 45 54 00 |RE ER OPPRETTET.|
000022E0: EB 2A 5F 01 8F 2A 4D 45 4E 59 2A 00 06 2B 60 01 |.*_..*MENY*..+`.|
000022F0: 99 22 93 1D 1D 1D 1D 50 52 49 4E 54 45 52 20 4F |.".....PRINTER O|
00002300: 55 54 50 55 54 22 00 25 2B 61 01 99 22 11 1D 1D |UTPUT".%+a.."...|
00002310: 1D 28 31 29 50 52 49 4E 54 20 56 41 4C 47 54 20 |.(1)PRINT VALGT |
00002320: 46 49 4C 45 22 00 45 2B 62 01 99 22 11 1D 1D 1D |FILE".E+b.."....|
00002330: 28 32 29 50 52 49 4E 54 20 41 4C 4C 45 20 46 49 |(2)PRINT ALLE FI|
00002340: 4C 45 4E 45 22 00 69 2B 63 01 99 22 11 1D 1D 1D |LENE".i+c.."....|
00002350: 28 33 29 50 52 49 4E 54 20 56 41 4C 47 54 20 4D |(3)PRINT VALGT M|
00002360: 45 52 4B 45 4C 41 50 50 22 00 8F 2B 64 01 99 22 |ERKELAPP"..+d.."|
00002370: 11 1D 1D 1D 28 34 29 50 52 49 4E 54 20 41 4C 4C |....(4)PRINT ALL|
00002380: 45 20 4D 45 52 4B 45 4C 41 50 50 45 4E 45 22 00 |E MERKELAPPENE".|
00002390: B4 2B 65 01 99 22 11 1D 1D 1D 28 35 29 54 49 4C |.+e.."....(5)TIL|
000023A0: 42 41 4B 45 20 54 49 4C 20 48 4F 56 45 44 20 4D |BAKE TIL HOVED M|
000023B0: 45 4E 59 22 00 D4 2B 66 01 99 22 11 11 54 41 53 |ENY"..+f.."..TAS|
000023C0: 54 20 49 4E 4E 45 20 45 54 20 4E 52 2E 20 28 31 |T INNE ET NR. (1|
000023D0: 2D 35 29 22 00 F8 2B 67 01 99 22 11 2A 20 53 4A |-5)"..+g..".* SJ|
000023E0: 45 4B 4B 20 41 54 20 50 52 49 4E 54 45 52 45 4E |EKK AT PRINTEREN|
000023F0: 20 45 52 20 50 41 41 22 00 20 2C 68 01 99 22 1D | ER PAA". ,h..".|
00002400: 1D 4F 47 20 41 54 20 44 45 54 20 45 52 20 50 41 |.OG AT DET ER PA|
00002410: 50 49 52 20 49 20 50 52 49 4E 54 45 52 45 4E 22 |PIR I PRINTEREN"|
00002420: 00 4D 2C 69 01 A1 20 4D 45 50 24 3A 4D 45 50 B2 |.M,i.. MEP$:MEP.|
00002430: C5 28 4D 45 50 24 29 3A 8B 20 4D 45 50 B3 31 20 |.(MEP$):. MEP.1 |
00002440: B0 20 4D 45 50 B1 35 20 A7 20 33 36 31 00 5D 2C |. MEP.5 . 361.],|
00002450: 6A 01 8B 20 4D 45 50 B2 35 20 A7 20 8E 00 79 2C |j.. MEP.5 . ..y,|
00002460: 6B 01 91 20 4D 45 50 20 8D 20 33 36 36 2C 33 37 |k.. MEP . 366,37|
00002470: 36 2C 33 38 35 2C 33 39 34 00 83 2C 6C 01 89 20 |6,385,394..,l.. |
00002480: 33 35 32 00 9B 2C 6D 01 8F 2A 50 52 49 4E 54 20 |352..,m..*PRINT |
00002490: 56 41 4C 47 54 20 46 49 4C 45 2A 00 C4 2C 6E 01 |VALGT FILE*..,n.|
000024A0: 85 22 93 50 52 49 4E 54 20 46 49 4C 45 20 4E 52 |.".PRINT FILE NR|
000024B0: 2E 20 28 30 20 54 49 4C 20 53 54 4F 50 50 29 22 |. (0 TIL STOPP)"|
000024C0: 3B 57 52 24 00 E9 2C 6F 01 57 52 B2 C5 28 57 52 |;WR$..,o.WR..(WR|
000024D0: 24 29 3A 8B 20 57 52 B3 31 20 B0 20 57 52 B1 41 |$):. WR.1 . WR.A|
000024E0: 44 46 49 4C 45 20 A7 20 8E 00 F3 2C 70 01 8D 20 |DFILE . ...,p.. |
000024F0: 34 30 36 00 FD 2C 71 01 89 20 33 36 36 00 07 2D |406..,q.. 366..-|
00002500: 72 01 9F 20 34 2C 34 00 1E 2D 73 01 81 20 57 B2 |r.. 4,4..-s.. W.|
00002510: 31 20 A4 20 32 3A 98 34 2C 22 20 22 3A 82 00 45 |1 . 2:.4," ":..E|
00002520: 2D 74 01 98 34 2C C7 28 31 34 29 3B A6 36 29 22 |-t..4,.(14);.6)"|
00002530: 52 45 47 49 53 54 45 52 20 4E 41 56 4E 3A 22 3B |REGISTER NAVN:";|
00002540: 46 49 4C 45 24 00 5D 2D 75 01 98 34 2C A6 36 29 |FILE$.]-u..4,.6)|
00002550: 22 46 49 4C 45 20 4E 52 2E 22 3B 57 52 00 6A 2D |"FILE NR.";WR.j-|
00002560: 76 01 98 34 2C C7 28 31 35 29 00 82 2D 77 01 8F |v..4,.(15)..-w..|
00002570: 2A 50 52 49 4E 54 20 41 4C 4C 45 20 46 49 4C 45 |*PRINT ALLE FILE|
00002580: 52 2A 00 9E 2D 78 01 99 22 93 50 52 49 4E 54 45 |R*..-x..".PRINTE|
00002590: 52 20 41 4C 4C 45 20 46 49 4C 45 4E 45 22 00 B8 |R ALLE FILENE"..|
000025A0: 2D 79 01 99 22 11 54 52 59 4B 4B 20 53 20 46 4F |-y..".TRYKK S FO|
000025B0: 52 20 53 54 4F 50 50 22 00 CC 2D 7A 01 81 20 57 |R STOPP"..-z.. W|
000025C0: 52 B2 31 20 A4 20 41 44 46 49 4C 45 00 ED 2D 7B |R.1 . ADFILE..-{|
000025D0: 01 8D 20 34 30 36 3A 8F 20 47 41 41 20 54 49 4C |.. 406:. GAA TIL|
000025E0: 20 50 52 49 4E 54 20 52 55 54 49 4E 45 00 0B 2E | PRINT RUTINE...|
000025F0: 7C 01 A1 20 41 24 3A 8B 20 41 24 B2 22 53 22 20 ||.. A$:. A$."S" |
00002600: A7 20 57 52 B2 41 44 46 49 4C 45 00 14 2E 7D 01 |. WR.ADFILE...}.|
00002610: 82 20 57 52 00 2D 2E 7E 01 8E 3A 8F 20 54 49 4C |. WR.-.~..:. TIL|
00002620: 42 41 4B 45 20 54 49 4C 20 4D 45 4E 59 00 37 2E |BAKE TIL MENY.7.|
00002630: 7F 01 89 20 33 35 32 00 4E 2E 80 01 8F 2A 50 52 |... 352.N....*PR|
00002640: 49 4E 54 20 4D 45 52 4B 45 4C 41 50 50 2A 00 77 |INT MERKELAPP*.w|
00002650: 2E 81 01 85 22 93 50 52 49 4E 54 20 46 49 4C 45 |....".PRINT FILE|
00002660: 20 4E 52 2E 20 28 30 20 54 49 4C 20 53 54 4F 50 | NR. (0 TIL STOP|
00002670: 50 29 22 3B 57 52 24 00 9C 2E 82 01 57 52 B2 C5 |P)";WR$.....WR..|
00002680: 28 57 52 24 29 3A 8B 20 57 52 B3 31 20 B0 20 57 |(WR$):. WR.1 . W|
00002690: 52 B1 41 44 46 49 4C 45 20 A7 20 8E 00 D2 2E 83 |R.ADFILE . .....|
000026A0: 01 99 22 11 48 56 4F 52 20 4D 41 4E 47 45 20 4F |..".HVOR MANGE O|
000026B0: 50 50 4C 59 53 4E 49 4E 47 45 52 20 53 4B 41 4C |PPLYSNINGER SKAL|
000026C0: 20 50 52 49 4E 54 45 53 2C 31 2D 22 3B 46 49 22 | PRINTES,1-";FI"|
000026D0: 3F 22 00 E6 2E 84 01 99 22 11 30 20 54 49 4C 20 |?"......".0 TIL |
000026E0: 53 54 4F 50 50 22 00 FF 2E 85 01 A1 20 41 51 24 |STOPP"...... AQ$|
000026F0: 3A 8B 20 41 51 24 B2 22 22 20 A7 20 33 38 39 00 |:. AQ$."" . 389.|
00002700: 1C 2F 86 01 42 B2 C5 28 41 51 24 29 3A 8B 20 42 |./..B..(AQ$):. B|
00002710: B3 31 20 B0 42 B1 46 49 20 A7 20 8E 00 3D 2F 87 |.1 .B.FI . ..=/.|
00002720: 01 8D 20 34 31 39 3A 8F 20 47 41 41 20 54 49 4C |.. 419:. GAA TIL|
00002730: 20 50 52 49 4E 54 20 52 55 54 49 4E 45 00 47 2F | PRINT RUTINE.G/|
00002740: 88 01 89 20 33 38 35 00 65 2F 89 01 8F 2A 50 52 |... 385.e/...*PR|
00002750: 49 4E 54 20 41 4C 4C 45 20 4D 45 52 4B 45 4C 41 |INT ALLE MERKELA|
00002760: 50 50 45 52 2A 00 86 2F 8A 01 99 22 93 50 52 49 |PPER*../...".PRI|
00002770: 4E 54 45 52 20 41 4C 4C 45 20 4D 45 52 4B 45 4C |NTER ALLE MERKEL|
00002780: 41 50 50 45 52 22 00 BD 2F 8B 01 99 22 11 48 56 |APPER"../...".HV|
00002790: 4F 52 20 4D 41 4E 47 45 20 50 4F 4F 4C 59 53 4E |OR MANGE POOLYSN|
000027A0: 49 4E 47 45 52 20 53 4B 41 4C 20 50 52 49 4E 54 |INGER SKAL PRINT|
000027B0: 45 53 2C 31 2D 22 3B 46 49 3B 22 3F 22 00 D4 2F |ES,1-";FI;"?"../|
000027C0: 8C 01 99 22 11 30 20 53 4B 41 4C 20 46 4A 45 52 |...".0 SKAL FJER|
000027D0: 4E 45 53 22 00 ED 2F 8D 01 A1 20 41 51 24 3A 8B |NES"../... AQ$:.|
000027E0: 20 41 51 24 B2 22 22 20 A7 20 33 39 37 00 0B 30 | AQ$."" . 397..0|
000027F0: 8E 01 42 B2 C5 28 41 51 24 29 3A 8B 20 42 B3 31 |..B..(AQ$):. B.1|
00002800: 20 B0 20 42 B1 46 49 20 A7 20 8E 00 25 30 8F 01 | . B.FI . ..%0..|
00002810: 99 22 11 54 52 59 4B 4B 20 53 20 46 4F 52 20 53 |.".TRYKK S FOR S|
00002820: 54 4F 50 50 22 00 39 30 90 01 81 20 57 52 B2 31 |TOPP".90... WR.1|
00002830: 20 A4 20 41 44 46 49 4C 45 00 5A 30 91 01 8D 20 | . ADFILE.Z0... |
00002840: 34 31 39 3A 8F 20 47 41 41 20 54 49 4C 20 50 52 |419:. GAA TIL PR|
00002850: 49 4E 54 20 52 55 54 49 4E 45 00 77 30 92 01 A1 |INT RUTINE.w0...|
00002860: 20 41 24 3A 8B 20 41 24 B2 22 53 22 A7 20 57 52 | A$:. A$."S". WR|
00002870: B2 41 44 46 49 4C 45 00 80 30 93 01 82 20 57 52 |.ADFILE..0... WR|
00002880: 00 99 30 94 01 8E 3A 8F 20 54 49 4C 42 41 4B 45 |..0...:. TILBAKE|
00002890: 20 54 49 4C 20 4D 45 4E 59 00 AB 30 95 01 8F 2A | TIL MENY..0...*|
000028A0: 50 52 49 4E 54 20 46 49 4C 45 2A 00 B5 30 96 01 |PRINT FILE*..0..|
000028B0: 9F 20 34 2C 34 00 CC 30 97 01 81 20 57 B2 31 20 |. 4,4..0... W.1 |
000028C0: A4 20 32 3A 98 34 2C 22 20 22 3A 82 00 F2 30 98 |. 2:.4," ":...0.|
000028D0: 01 98 34 2C C7 28 31 34 29 3B A6 36 29 22 52 45 |..4,.(14);.6)"RE|
000028E0: 47 49 53 54 45 52 4E 41 56 4E 3A 22 3B 46 49 4C |GISTERNAVN:";FIL|
000028F0: 45 24 00 0A 31 99 01 98 34 2C A6 36 29 22 46 49 |E$..1...4,.6)"FI|
00002900: 4C 45 20 4E 52 2E 22 3B 57 52 00 17 31 9A 01 98 |LE NR.";WR..1...|
00002910: 34 2C C7 28 31 35 29 00 2E 31 9B 01 81 20 57 B2 |4,.(15)..1... W.|
00002920: 31 20 A4 20 32 3A 98 34 2C 22 20 22 3A 82 00 59 |1 . 2:.4," ":..Y|
00002930: 31 9C 01 81 20 41 B2 31 20 A4 20 46 49 3A 41 54 |1... A.1 . FI:AT|
00002940: 45 4D 50 24 B2 46 49 24 28 41 2C 57 52 29 3A 42 |EMP$.FI$(A,WR):B|
00002950: B2 C3 28 50 24 28 41 29 29 00 76 31 9D 01 8B 20 |..(P$(A)).v1... |
00002960: 41 54 45 4D 50 24 B2 22 3C 22 20 A7 20 41 54 45 |ATEMP$."<" . ATE|
00002970: 4D 50 24 B2 22 22 00 97 31 9E 01 98 34 2C A6 33 |MP$.""..1...4,.3|
00002980: 29 50 24 28 41 29 A6 31 35 AB 42 29 41 54 45 4D |)P$(A).15.B)ATEM|
00002990: 50 24 C7 28 31 30 29 00 9D 31 9F 01 82 00 B4 31 |P$.(10)..1.....1|
000029A0: A0 01 81 20 57 B2 31 20 A4 20 33 3A 98 34 2C 22 |... W.1 . 3:.4,"|
000029B0: 20 22 3A 82 00 C0 31 A1 01 98 34 3A A0 34 3A 8E | ":...1...4:.4:.|
000029C0: 00 DD 31 A2 01 8F 2A 50 52 49 4E 54 20 4D 45 52 |..1...*PRINT MER|
000029D0: 4B 45 4C 41 50 50 52 55 54 49 4E 45 2A 00 ED 31 |KELAPPRUTINE*..1|
000029E0: A3 01 9F 34 2C 34 3A 98 34 2C 22 20 22 00 24 32 |...4,4:.4," ".$2|
000029F0: A4 01 81 20 41 B2 31 20 A4 20 42 3A 41 54 45 4D |... A.1 . B:ATEM|
00002A00: 50 24 B2 46 49 24 28 41 2C 57 52 29 3A 8B 20 41 |P$.FI$(A,WR):. A|
00002A10: 54 45 4D 50 24 B2 22 3C 22 A7 20 41 54 45 4D 50 |TEMP$."<". ATEMP|
00002A20: 24 B2 22 22 00 35 32 A5 01 98 34 2C A6 32 29 41 |$."".52...4,.2)A|
00002A30: 54 45 4D 50 24 00 3D 32 A6 01 82 20 41 00 48 32 |TEMP$.=2... A.H2|
00002A40: A7 01 98 34 2C 22 20 22 00 54 32 A8 01 98 34 3A |...4," ".T2...4:|
00002A50: A0 34 3A 8E 00 70 32 A9 01 8F 2A 2A 2A 2A 2A 2A |.4:..p2...******|
00002A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002A70: 00 8C 32 AA 01 8F 2A 46 4F 52 41 4E 44 52 45 2F |..2...*FORANDRE/|
00002A80: 53 4C 45 54 54 45 20 46 49 4C 45 2A 00 A8 32 AB |SLETTE FILE*..2.|
00002A90: 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00002AA0: 2A 2A 2A 2A 2A 2A 2A 2A 00 B4 32 AC 01 8F 2A 4D |********..2...*M|
00002AB0: 45 4E 59 2A 00 D0 32 AD 01 99 22 93 1D 1D 1D 1D |ENY*..2...".....|
00002AC0: 46 4F 52 41 4E 44 52 45 2F 53 4C 45 54 54 45 22 |FORANDRE/SLETTE"|
00002AD0: 00 EC 32 AE 01 99 22 11 1D 1D 1D 28 31 29 46 4F |..2..."....(1)FO|
00002AE0: 52 41 4E 44 52 45 20 46 49 4C 45 22 00 08 33 AF |RANDRE FILE"..3.|
00002AF0: 01 99 22 11 1D 1D 1D 28 32 29 53 4C 45 54 54 20 |.."....(2)SLETT |
00002B00: 45 4E 20 46 49 4C 45 22 00 27 33 B0 01 99 22 11 |EN FILE".'3...".|
00002B10: 1D 1D 1D 28 33 29 53 4C 45 54 54 20 41 4C 4C 45 |...(3)SLETT ALLE|
00002B20: 20 46 49 4C 45 52 22 00 49 33 B1 01 99 22 11 1D | FILER".I3..."..|
00002B30: 1D 1D 28 34 29 53 4C 45 54 54 20 45 4E 20 4F 50 |..(4)SLETT EN OP|
00002B40: 50 4C 59 53 4E 49 4E 47 22 00 6E 33 B2 01 99 22 |PLYSNING".n3..."|
00002B50: 11 1D 1D 1D 28 35 29 54 49 4C 42 41 4B 45 20 54 |....(5)TILBAKE T|
00002B60: 49 4C 20 48 4F 56 45 44 20 4D 45 4E 59 22 00 8F |IL HOVED MENY"..|
00002B70: 33 B3 01 99 22 11 1D 1D 1D 54 41 53 54 20 49 4E |3..."....TAST IN|
00002B80: 4E 20 45 54 20 4E 52 2E 20 28 31 2D 35 29 22 00 |N ET NR. (1-5)".|
00002B90: BC 33 B4 01 A1 20 4D 45 4D 24 3A 4D 45 4D B2 C5 |.3... MEM$:MEM..|
00002BA0: 28 4D 45 4D 24 29 3A 8B 20 4D 45 4D B3 31 20 B0 |(MEM$):. MEM.1 .|
00002BB0: 20 4D 45 4D B1 35 20 A7 20 34 33 36 00 CC 33 B5 | MEM.5 . 436..3.|
00002BC0: 01 8B 20 4D 45 4D B2 35 20 A7 20 8E 00 E8 33 B6 |.. MEM.5 . ...3.|
00002BD0: 01 91 20 4D 45 4D 20 8D 20 34 34 31 2C 34 35 39 |.. MEM . 441,459|
00002BE0: 2C 34 37 30 2C 34 37 33 00 F2 33 B7 01 89 20 34 |,470,473..3... 4|
00002BF0: 32 39 00 07 34 B8 01 8F 2A 46 4F 52 41 4E 44 52 |29..4...*FORANDR|
00002C00: 45 20 46 49 4C 45 2A 00 1F 34 B9 01 99 22 93 42 |E FILE*..4...".B|
00002C10: 45 53 54 45 4D 20 46 49 4C 45 20 4E 52 2E 22 00 |ESTEM FILE NR.".|
00002C20: 42 34 BA 01 99 22 11 30 20 54 49 4C 42 41 4B 45 |B4...".0 TILBAKE|
00002C30: 20 54 49 4C 20 4D 45 4E 59 20 11 22 3A 85 20 57 | TIL MENY .":. W|
00002C40: 52 24 00 53 34 BB 01 8B 20 57 52 24 B2 22 30 22 |R$.S4... WR$."0"|
00002C50: A7 20 8E 00 7A 34 BC 01 57 52 B2 C5 28 57 52 24 |. ..z4..WR..(WR$|
00002C60: 29 3A 8B 20 57 52 B3 31 20 B0 20 57 52 B1 41 44 |):. WR.1 . WR.AD|
00002C70: 46 49 4C 45 20 A7 20 34 34 31 00 95 34 BD 01 99 |FILE . 441..4...|
00002C80: 22 93 1D 1D 1D 1D 1D 1D 46 49 4C 45 20 4E 52 2E |".......FILE NR.|
00002C90: 20 22 3B 57 52 00 B3 34 BE 01 81 20 41 B2 31 A4 | ";WR..4... A.1.|
00002CA0: 46 49 3A 41 54 45 4D 50 24 B2 46 49 24 28 41 2C |FI:ATEMP$.FI$(A,|
00002CB0: 57 52 29 00 CF 34 BF 01 8B 20 41 54 45 4D 50 24 |WR)..4... ATEMP$|
00002CC0: B2 22 3C 22 A7 20 41 54 45 4D 50 24 B2 22 22 00 |."<". ATEMP$."".|
00002CD0: F9 34 C0 01 99 22 11 1D 1D 22 3B 50 24 28 41 29 |.4..."...";P$(A)|
00002CE0: 3A 99 22 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |:.".............|
00002CF0: 1D 22 3B 41 54 45 4D 50 24 00 FF 34 C1 01 82 00 |.";ATEMP$..4....|
00002D00: 17 35 C2 01 81 20 41 B2 31 A4 46 49 3A 99 22 91 |.5... A.1.FI:.".|
00002D10: 91 91 22 3A 82 20 41 00 3E 35 C3 01 81 20 41 B2 |..":. A.>5... A.|
00002D20: 31 A4 46 49 3A 85 22 11 1D 1D 1D 1D 1D 1D 1D 1D |1.FI:.".........|
00002D30: 1D 1D 1D 22 3B 46 49 24 28 41 2C 57 52 29 00 44 |...";FI$(A,WR).D|
00002D40: 35 C4 01 82 00 6E 35 C5 01 99 22 11 11 1D 1D 54 |5....n5..."....T|
00002D50: 52 59 4B 4B 20 45 4E 20 54 41 53 54 20 46 4F 52 |RYKK EN TAST FOR|
00002D60: 20 46 4F 52 54 53 45 54 54 45 4C 53 45 22 00 96 | FORTSETTELSE"..|
00002D70: 35 C6 01 99 22 11 1D 1D 53 50 41 43 45 2D 54 41 |5..."...SPACE-TA|
00002D80: 53 54 20 46 4F 52 20 52 45 54 55 52 20 54 49 4C |ST FOR RETUR TIL|
00002D90: 20 4D 45 4E 59 22 00 AE 35 C7 01 A1 20 41 51 24 | MENY"..5... AQ$|
00002DA0: 3A 8B 20 41 51 24 B2 22 22 A7 20 34 35 35 00 BF |:. AQ$."". 455..|
00002DB0: 35 C8 01 8B 20 41 51 24 B2 22 20 22 A7 20 8E 00 |5... AQ$." ". ..|
00002DC0: C9 35 C9 01 89 20 34 34 31 00 DE 35 CA 01 8F 2A |.5... 441..5...*|
00002DD0: 53 4C 45 54 54 20 45 4E 20 46 49 4C 45 2A 00 0E |SLETT EN FILE*..|
00002DE0: 36 CB 01 85 22 93 53 4C 45 54 54 20 48 56 49 4C |6...".SLETT HVIL|
00002DF0: 4B 45 4E 20 46 49 4C 45 20 28 30 20 53 4B 41 4C |KEN FILE (0 SKAL|
00002E00: 20 46 4A 45 52 4E 45 53 29 22 3B 57 52 24 00 33 | FJERNES)";WR$.3|
00002E10: 36 CC 01 57 52 B2 C5 28 57 52 24 29 3A 8B 20 57 |6..WR..(WR$):. W|
00002E20: 52 B3 31 20 B0 20 57 52 B1 41 44 46 49 4C 45 20 |R.1 . WR.ADFILE |
00002E30: A7 20 8E 00 59 36 CD 01 8F 2A 46 4C 59 54 54 20 |. ..Y6...*FLYTT |
00002E40: 4F 50 50 20 41 4C 4C 45 20 46 49 4C 45 52 20 45 |OPP ALLE FILER E|
00002E50: 54 54 45 52 20 57 52 24 2A 00 6F 36 CE 01 8B 20 |TTER WR$*.o6... |
00002E60: 57 52 B2 41 44 46 49 4C 45 20 A7 20 34 36 37 00 |WR.ADFILE . 467.|
00002E70: 87 36 CF 01 81 20 42 B2 57 52 20 A4 20 28 41 44 |.6... B.WR . (AD|
00002E80: 46 49 4C 45 AB 31 29 00 96 36 D0 01 81 20 41 B2 |FILE.1)..6... A.|
00002E90: 31 20 A4 20 46 49 00 AE 36 D1 01 46 49 24 28 41 |1 . FI..6..FI$(A|
00002EA0: 2C 42 29 B2 46 49 24 28 41 2C 42 AA 31 29 00 B8 |,B).FI$(A,B.1)..|
00002EB0: 36 D2 01 82 20 41 2C 42 00 CC 36 D3 01 41 44 46 |6... A,B..6..ADF|
00002EC0: 49 4C 45 B2 41 44 46 49 4C 45 AB 31 00 D6 36 D4 |ILE.ADFILE.1..6.|
00002ED0: 01 89 20 34 35 39 00 EF 36 D5 01 8F 2A 53 4C 45 |.. 459..6...*SLE|
00002EE0: 54 54 20 41 4C 4C 45 20 46 49 4C 45 4E 45 2A 00 |TT ALLE FILENE*.|
00002EF0: 21 37 D6 01 85 22 93 53 4C 45 54 54 45 20 41 4C |!7...".SLETTE AL|
00002F00: 4C 45 20 46 49 4C 45 4E 45 3F 20 4A 2F 4E 22 3B |LE FILENE? J/N";|
00002F10: 41 51 24 3A 8B 20 41 51 24 B2 22 4E 22 20 A7 20 |AQ$:. AQ$."N" . |
00002F20: 8E 00 30 37 D7 01 41 44 46 49 4C 45 B2 30 3A 8E |..07..ADFILE.0:.|
00002F30: 00 48 37 D8 01 8F 2A 53 4C 45 54 54 20 4F 50 50 |.H7...*SLETT OPP|
00002F40: 4C 59 53 4E 49 4E 47 2A 00 74 37 D9 01 85 22 93 |LYSNING*.t7...".|
00002F50: 53 4C 45 54 54 45 52 20 4F 50 50 4C 59 53 4E 49 |SLETTER OPPLYSNI|
00002F60: 4E 47 3A 48 56 49 4C 4B 45 4E 20 46 49 4C 45 22 |NG:HVILKEN FILE"|
00002F70: 3B 57 52 24 00 99 37 DA 01 57 52 B2 C5 28 57 52 |;WR$..7..WR..(WR|
00002F80: 24 29 3A 8B 20 57 52 B3 31 20 B0 20 57 52 B1 41 |$):. WR.1 . WR.A|
00002F90: 44 46 49 4C 45 20 A7 20 8E 00 B9 37 DB 01 81 20 |DFILE . ...7... |
00002FA0: 41 B2 31 20 A4 20 46 49 3A 99 22 11 22 3B 41 3B |A.1 . FI:.".";A;|
00002FB0: 50 24 28 41 29 3A 82 20 41 00 D8 37 DC 01 99 22 |P$(A):. A..7..."|
00002FC0: 11 4F 50 50 4C 59 53 4E 49 4E 47 20 53 4F 4D 20 |.OPPLYSNING SOM |
00002FD0: 53 4C 45 54 54 45 53 22 00 EF 37 DD 01 99 22 11 |SLETTES"..7...".|
00002FE0: 30 20 53 4B 41 4C 20 46 4A 45 52 4E 45 53 22 00 |0 SKAL FJERNES".|
00002FF0: 07 38 DE 01 A1 20 41 51 24 3A 8B 20 41 51 24 B2 |.8... AQ$:. AQ$.|
00003000: 22 22 A7 20 34 37 38 00 28 38 DF 01 41 51 B2 C5 |"". 478.(8..AQ..|
00003010: 28 41 51 24 29 3A 8B 20 41 51 B3 31 20 B0 20 41 |(AQ$):. AQ.1 . A|
00003020: 51 B1 46 49 20 A7 20 8E 00 3B 38 E0 01 46 49 24 |Q.FI . ..;8..FI$|
00003030: 28 41 51 2C 57 52 29 B2 22 3C 22 00 45 38 E1 01 |(AQ,WR)."<".E8..|
00003040: 89 20 34 37 33 00 6A 38 E2 01 8F 2A 2A 2A 2A 2A |. 473.j8...*****|
00003050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8F 38 E3 01 8F |**********..8...|
00003070: 2A 4C 45 54 20 45 54 54 45 52 20 45 4E 20 46 49 |*LET ETTER EN FI|
00003080: 4C 45 2F 53 4F 52 54 45 52 20 52 45 47 2E 2A 00 |LE/SORTER REG.*.|
00003090: B4 38 E4 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.8...***********|
000030A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000030B0: 2A 2A 2A 2A 00 C4 38 E5 01 8B 20 46 49 B2 30 20 |****..8... FI.0 |
000030C0: A7 20 37 37 00 EE 38 E6 01 99 22 93 4C 45 54 49 |. 77..8...".LETI|
000030D0: 4E 47 28 31 29 20 45 4C 4C 45 52 20 53 4F 52 54 |NG(1) ELLER SORT|
000030E0: 45 52 49 4E 47 28 32 29 3F 20 31 2F 32 22 00 14 |ERING(2)? 1/2"..|
000030F0: 39 E7 01 99 22 11 53 50 41 43 45 2D 54 41 53 54 |9...".SPACE-TAST|
00003100: 20 46 4F 52 20 52 45 54 55 52 20 54 49 4C 20 4D | FOR RETUR TIL M|
00003110: 45 4E 59 22 00 2D 39 E8 01 A1 20 20 41 51 24 3A |ENY".-9... AQ$:|
00003120: 8B 20 41 51 24 B2 22 22 A7 20 34 38 38 00 3E 39 |. AQ$."". 488.>9|
00003130: E9 01 8B 20 41 51 24 B2 22 20 22 A7 20 8E 00 51 |... AQ$." ". ..Q|
00003140: 39 EA 01 8B 20 41 51 24 B2 22 32 22 A7 20 35 34 |9... AQ$."2". 54|
00003150: 38 00 65 39 EB 01 8B 20 41 51 24 B3 B1 22 31 22 |8.e9... AQ$.."1"|
00003160: A7 20 34 38 38 00 7E 39 EC 01 8F 2A 42 45 20 4F |. 488.~9...*BE O|
00003170: 4D 20 49 4E 46 4F 52 4D 41 53 4A 4F 4E 2A 00 8E |M INFORMASJON*..|
00003180: 39 ED 01 49 4E 24 B2 22 22 3A 99 22 93 22 00 AA |9..IN$."":."."..|
00003190: 39 EE 01 81 20 41 B2 31 A4 46 49 3A 99 22 11 22 |9... A.1.FI:."."|
000031A0: 3B 41 3B 50 24 28 41 29 3A 82 00 CA 39 EF 01 99 |;A;P$(A):...9...|
000031B0: 22 11 1D 1D 1D 48 56 49 4C 4B 45 4E 20 56 45 54 |"....HVILKEN VET|
000031C0: 20 44 55 A0 31 2D 22 3B 46 49 00 E2 39 F0 01 A1 | DU.1-";FI..9...|
000031D0: 20 41 51 24 3A 8B 20 41 51 24 B2 22 22 A7 20 34 | AQ$:. AQ$."". 4|
000031E0: 39 36 00 05 3A F1 01 41 51 B2 C5 28 41 51 24 29 |96..:..AQ..(AQ$)|
000031F0: 3A 8B 20 41 51 B3 31 20 B0 20 41 51 B1 46 49 20 |:. AQ.1 . AQ.FI |
00003200: A7 20 34 39 36 00 2D 3A F2 01 99 22 11 1D 1D 1D |. 496.-:..."....|
00003210: 48 56 41 20 45 52 20 44 49 4E 20 49 4E 46 4F 52 |HVA ER DIN INFOR|
00003220: 4D 41 53 4A 4F 4E 22 3A 85 20 49 4E 24 00 48 3A |MASJON":. IN$.H:|
00003230: F3 01 8F 2A 46 41 41 20 4C 45 4E 47 44 45 4E 20 |...*FAA LENGDEN |
00003240: 54 49 4C 20 49 4E 24 2A 00 5B 3A F4 01 49 4E 4C |TIL IN$*.[:..INL|
00003250: B2 C3 28 49 4E 24 29 3A 42 B2 30 00 93 3A F5 01 |..(IN$):B.0..:..|
00003260: 8B 41 44 46 49 4C 45 B2 30 A7 99 22 93 49 4E 47 |.ADFILE.0..".ING|
00003270: 45 4E 20 46 49 4C 45 52 20 49 20 4D 49 4E 4E 45 |EN FILER I MINNE|
00003280: 21 21 22 3A 81 41 B2 31 20 A4 20 31 30 30 30 3A |!!":.A.1 . 1000:|
00003290: 82 3A 8E 00 C2 3A F6 01 99 22 93 46 41 53 54 20 |.:...:...".FAST |
000032A0: 4C 45 54 49 4E 47 28 31 29 20 45 4C 4C 45 52 20 |LETING(1) ELLER |
000032B0: 46 4C 45 4B 53 49 2D 4C 45 54 49 4E 47 28 32 29 |FLEKSI-LETING(2)|
000032C0: 3F 22 00 D8 3A F7 01 A1 20 51 24 3A 8B 20 51 24 |?"..:... Q$:. Q$|
000032D0: B2 22 22 A7 20 35 30 33 00 F8 3A F8 01 51 B2 C5 |."". 503..:..Q..|
000032E0: 28 51 24 29 3A 8B 20 51 B3 B1 31 20 AF 20 51 B3 |(Q$):. Q..1 . Q.|
000032F0: B1 32 20 A7 20 35 30 33 00 25 3B F9 01 99 22 11 |.2 . 503.%;...".|
00003300: 11 11 4C 45 54 45 52 20 47 4A 45 4E 4E 4F 4D 20 |..LETER GJENNOM |
00003310: 52 45 47 49 53 54 45 52 22 3A 8B 20 51 B2 32 20 |REGISTER":. Q.2 |
00003320: A7 20 35 38 39 00 38 3B FA 01 8F 2A 46 41 53 54 |. 589.8;...*FAST|
00003330: 20 4C 45 54 49 4E 47 2A 00 5C 3B FB 01 81 20 53 | LETING*.\;... S|
00003340: B2 31 20 A4 20 41 44 46 49 4C 45 3A 41 24 B2 46 |.1 . ADFILE:A$.F|
00003350: 49 24 28 41 51 2C 53 29 3A 41 B2 31 00 70 3B FC |I$(AQ,S):A.1.p;.|
00003360: 01 58 24 28 31 29 B2 CA 28 41 24 2C 41 2C 31 29 |.X$(1)..(A$,A,1)|
00003370: 00 85 3B FD 01 58 24 28 32 29 B2 CA 28 49 4E 24 |..;..X$(2)..(IN$|
00003380: 2C 41 2C 31 29 00 9A 3B FE 01 58 31 B2 C6 28 58 |,A,1)..;..X1..(X|
00003390: 24 28 31 29 AA C7 28 30 29 29 00 AF 3B FF 01 58 |$(1)..(0))..;..X|
000033A0: 32 B2 C6 28 58 24 28 32 29 AA C7 28 30 29 29 00 |2..(X$(2)..(0)).|
000033B0: C2 3B 00 02 8B 20 58 31 B3 B1 58 32 20 A7 20 35 |.;... X1..X2 . 5|
000033C0: 32 30 00 D6 3B 01 02 8B 20 58 31 B2 58 32 20 A7 |20..;... X1.X2 .|
000033D0: 20 41 B2 41 AA 31 00 F6 3B 02 02 8F 2A 53 41 4D | A.A.1..;...*SAM|
000033E0: 4D 45 4E 4C 49 47 4E 49 4E 47 45 4E 20 45 52 20 |MENLIGNINGEN ER |
000033F0: 47 4A 4F 52 54 2A 00 16 3C 03 02 8F 2A 52 45 54 |GJORT*..<...*RET|
00003400: 55 52 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 |URN |
00003410: 20 20 20 20 20 2A 00 28 3C 04 02 8B 20 41 B1 49 | *.(<... A.I|
00003420: 4E 4C 20 A7 20 35 31 38 00 32 3C 05 02 89 20 35 |NL . 518.2<... 5|
00003430: 30 38 00 3C 3C 06 02 42 B2 42 AA 31 00 48 3C 07 |08.<<..B.B.1.H<.|
00003440: 02 53 45 28 42 29 B2 53 00 50 3C 08 02 82 20 53 |.SE(B).S.P<... S|
00003450: 00 79 3C 09 02 99 22 93 44 45 54 20 45 52 20 22 |.y<...".DET ER "|
00003460: 3B 42 3B 22 46 49 4C 45 52 20 53 4F 4D 20 49 4E |;B;"FILER SOM IN|
00003470: 4E 45 48 4F 4C 44 45 52 22 00 92 3C 0A 02 99 20 |NEHOLDER"..<... |
00003480: 49 4E 24 3A 99 22 11 22 3A 8B 42 B2 30 A7 20 35 |IN$:.".":.B.0. 5|
00003490: 32 39 00 A8 3C 0B 02 81 20 41 B2 31 20 A4 20 42 |29..<... A.1 . B|
000034A0: 20 A9 20 39 3A 44 B2 30 00 C6 3C 0C 02 81 20 43 | . 9:D.0..<... C|
000034B0: B2 41 20 A4 20 41 AA 38 3A 8B 20 43 B1 31 35 30 |.A . A.8:. C.150|
000034C0: 20 A7 20 35 32 37 00 D5 3C 0D 02 99 A3 44 29 53 | . 527..<....D)S|
000034D0: 45 28 43 29 3B 00 DF 3C 0E 02 44 B2 44 AA 34 00 |E(C);..<..D.D.4.|
000034E0: EF 3C 0F 02 82 20 43 3A 99 3A 82 20 41 3A 99 00 |.<... C:.:. A:..|
000034F0: 11 3D 10 02 99 22 11 48 56 49 4C 4B 45 4E 20 56 |.=...".HVILKEN V|
00003500: 49 4C 20 44 55 20 4B 41 4C 4C 45 20 4F 50 50 3F |IL DU KALLE OPP?|
00003510: 22 00 41 3D 11 02 99 22 30 20 20 46 4F 52 20 52 |".A=..."0 FOR R|
00003520: 45 54 55 52 20 54 49 4C 20 4D 45 4E 59 22 3A 99 |ETUR TIL MENY":.|
00003530: 22 53 20 46 4F 52 20 4E 59 20 4C 45 54 49 4E 47 |"S FOR NY LETING|
00003540: 22 00 5A 3D 12 02 99 22 50 20 46 4F 52 20 50 52 |".Z=..."P FOR PR|
00003550: 49 4E 54 20 4C 49 53 54 45 22 00 71 3D 13 02 85 |INT LISTE".q=...|
00003560: 20 57 52 24 3A 8B 20 57 52 24 B2 22 30 22 A7 20 | WR$:. WR$."0". |
00003570: 8E 00 84 3D 14 02 8B 20 57 52 24 B2 22 53 22 A7 |...=... WR$."S".|
00003580: 20 34 39 33 00 98 3D 15 02 8B 20 57 52 24 B2 22 | 493..=... WR$."|
00003590: 50 22 20 A7 20 35 33 38 00 A2 3D 16 02 8D 20 31 |P" . 538..=... 1|
000035A0: 30 35 00 AC 3D 17 02 89 20 35 32 31 00 B2 3D 18 |05..=... 521..=.|
000035B0: 02 8E 00 CA 3D 19 02 8F 2A 4C 49 53 54 20 4D 45 |....=...*LIST ME|
000035C0: 44 20 50 52 49 4E 54 45 52 2A 00 D4 3D 1A 02 9F |D PRINTER*..=...|
000035D0: 20 34 2C 34 00 E6 3D 1B 02 81 20 41 B2 31 20 A4 | 4,4..=... A.1 .|
000035E0: 20 42 20 A9 20 36 00 04 3E 1C 02 81 20 43 B2 41 | B . 6..>... C.A|
000035F0: 20 A4 20 41 AA 35 3A 8B 20 43 B1 31 35 30 20 A7 | . A.5:. C.150 .|
00003600: 20 35 34 32 00 12 3E 1D 02 98 34 2C 53 45 28 43 | 542..>...4,SE(C|
00003610: 29 2C 00 27 3E 1E 02 82 20 43 3A 98 34 2C C7 28 |),.'>... C:.4,.(|
00003620: 31 33 29 3A 82 20 41 00 2E 3E 1F 02 A0 34 00 38 |13):. A..>...4.8|
00003630: 3E 20 02 89 20 35 33 31 00 67 3E 21 02 8F 2A 2A |> .. 531.g>!..**|
00003640: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003650: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003660: 2A 2A 2A 2A 2A 2A 2A 00 95 3E 22 02 8F 2A 53 4F |*******..>"..*SO|
00003670: 52 54 45 52 20 52 45 47 49 53 54 45 52 20 49 20 |RTER REGISTER I |
00003680: 41 4C 46 41 2F 4E 55 4D 45 52 49 53 4B 20 52 45 |ALFA/NUMERISK RE|
00003690: 4B 4B 45 20 2A 00 C4 3E 23 02 8F 2A 2A 2A 2A 2A |KKE *..>#..*****|
000036A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000036B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000036C0: 2A 2A 2A 2A 00 F2 3E 24 02 99 22 93 48 56 49 4C |****..>$..".HVIL|
000036D0: 4B 45 4E 20 4F 50 50 4C 59 53 4E 49 4E 47 20 53 |KEN OPPLYSNING S|
000036E0: 4B 41 4C 20 42 52 55 4B 45 45 53 3F 31 2D 22 3B |KAL BRUKEES?1-";|
000036F0: 46 49 00 08 3F 25 02 A1 20 41 51 24 3A 8B 41 51 |FI..?%.. AQ$:.AQ|
00003700: 24 B2 22 22 A7 35 34 39 00 2B 3F 26 02 41 51 B2 |$."".549.+?&.AQ.|
00003710: C5 28 41 51 24 29 3A 8B 20 41 51 B3 31 20 B0 20 |.(AQ$):. AQ.1 . |
00003720: 41 51 B1 46 49 20 A7 20 35 34 39 00 3D 3F 27 02 |AQ.FI . 549.=?'.|
00003730: 81 20 43 B2 31 20 A4 20 32 3A 59 B2 31 00 46 3F |. C.1 . 2:Y.1.F?|
00003740: 28 02 42 B2 41 51 00 5F 3F 29 02 99 22 93 53 4F |(.B.AQ._?)..".SO|
00003750: 52 54 45 52 45 20 52 45 47 49 53 54 45 52 22 00 |RTERE REGISTER".|
00003760: 83 3F 2A 02 8F 2A 53 41 4D 4D 45 4E 4C 49 47 4E |.?*..*SAMMENLIGN|
00003770: 20 54 4F 20 46 49 4C 45 52 20 53 41 4D 54 49 44 | TO FILER SAMTID|
00003780: 49 47 2A 00 9A 3F 2B 02 81 20 53 B2 31 20 A4 20 |IG*..?+.. S.1 . |
00003790: 28 41 44 46 49 4C 45 AB 59 29 00 B3 3F 2C 02 41 |(ADFILE.Y)..?,.A|
000037A0: B2 31 3A 52 31 B2 53 3A 52 32 B2 53 AA 31 3A 45 |.1:R1.S:R2.S.1:E|
000037B0: 58 B2 30 00 DA 3F 2D 02 8F 2A 46 41 41 20 54 45 |X.0..?-..*FAA TE|
000037C0: 47 4E 20 46 52 41 20 42 45 53 54 45 4D 54 20 4F |GN FRA BESTEMT O|
000037D0: 50 50 4C 59 53 4E 49 4E 47 2A 00 EE 3F 2E 02 41 |PPLYSNING*..?..A|
000037E0: 24 28 31 29 B2 46 49 24 28 42 2C 52 31 29 00 02 |$(1).FI$(B,R1)..|
000037F0: 40 2F 02 41 24 28 32 29 B2 46 49 24 28 42 2C 52 |@/.A$(2).FI$(B,R|
00003800: 32 29 00 19 40 30 02 4E 24 28 31 29 B2 CA 28 41 |2)..@0.N$(1)..(A|
00003810: 24 28 31 29 2C 41 2C 31 29 00 30 40 31 02 4E 24 |$(1),A,1).0@1.N$|
00003820: 28 32 29 B2 CA 28 41 24 28 32 29 2C 41 2C 31 29 |(2)..(A$(2),A,1)|
00003830: 00 45 40 32 02 4E 31 B2 C6 28 4E 24 28 31 29 AA |.E@2.N1..(N$(1).|
00003840: C7 28 30 29 29 00 5A 40 33 02 4E 32 B2 C6 28 4E |.(0)).Z@3.N2..(N|
00003850: 24 28 32 29 AA C7 28 30 29 29 00 6C 40 34 02 8B |$(2)..(0)).l@4..|
00003860: 20 4E 31 B1 4E 32 20 A7 20 35 37 34 00 7E 40 35 | N1.N2 . 574.~@5|
00003870: 02 8B 20 4E 31 B3 4E 32 20 A7 20 35 38 31 00 9B |.. N1.N2 . 581..|
00003880: 40 36 02 8F 2A 48 56 49 53 20 54 45 47 4E 45 4E |@6..*HVIS TEGNEN|
00003890: 45 20 45 52 20 4C 49 4B 45 2C 2A 00 B8 40 37 02 |E ER LIKE,*..@7.|
000038A0: 8F 2A 46 41 41 20 44 45 20 4E 45 53 54 45 20 20 |.*FAA DE NESTE |
000038B0: 20 20 20 20 20 20 20 2A 00 C2 40 38 02 41 B2 41 | *..@8.A.A|
000038C0: AA 31 00 E5 40 39 02 8F 2A 48 56 49 53 20 41 3E |.1..@9..*HVIS A>|
000038D0: 4F 50 50 4C 2E 20 4C 45 4E 47 44 45 20 2C 4E 45 |OPPL. LENGDE ,NE|
000038E0: 53 54 45 20 2A 00 08 41 3A 02 8F 2A 53 45 54 54 |STE *..A:..*SETT|
000038F0: 20 4D 45 44 20 46 49 4C 45 52 20 20 20 20 20 20 | MED FILER |
00003900: 20 20 20 20 20 20 20 2A 00 19 41 3B 02 8B 20 41 | *..A;.. A|
00003910: B1 32 34 20 A7 20 35 38 31 00 23 41 3C 02 89 20 |.24 . 581.#A<.. |
00003920: 35 36 30 00 38 41 3D 02 8F 2A 42 59 54 54 20 4F |560.8A=..*BYTT O|
00003930: 4D 20 46 49 4C 45 52 2A 00 41 41 3E 02 45 58 B2 |M FILER*.AA>.EX.|
00003940: 31 00 50 41 3F 02 81 20 58 B2 31 20 A4 20 46 49 |1.PA?.. X.1 . FI|
00003950: 00 65 41 40 02 41 54 45 4D 50 24 B2 46 49 24 28 |.eA@.ATEMP$.FI$(|
00003960: 58 2C 52 31 29 00 7D 41 41 02 46 49 24 28 58 2C |X,R1).}AA.FI$(X,|
00003970: 52 31 29 B2 46 49 24 28 58 2C 52 32 29 00 92 41 |R1).FI$(X,R2)..A|
00003980: 42 02 46 49 24 28 58 2C 52 32 29 B2 41 54 45 4D |B.FI$(X,R2).ATEM|
00003990: 50 24 00 9A 41 43 02 82 20 58 00 B4 41 44 02 8F |P$..AC.. X..AD..|
000039A0: 2A 46 4F 52 54 53 45 54 54 20 53 4F 52 54 45 52 |*FORTSETT SORTER|
000039B0: 49 4E 47 2A 00 BC 41 45 02 82 20 53 00 DE 41 46 |ING*..AE.. S..AF|
000039C0: 02 59 B2 59 AA 31 3A 8B 20 59 B1 41 44 46 49 4C |.Y.Y.1:. Y.ADFIL|
000039D0: 45 20 AF 20 45 58 B2 31 20 A7 20 59 B2 31 00 F1 |E . EX.1 . Y.1..|
000039E0: 41 47 02 8B 20 59 B1 41 44 46 49 4C 45 20 A7 20 |AG.. Y.ADFILE . |
000039F0: 8E 00 0F 42 48 02 8F 2A 53 4F 52 54 45 52 20 52 |...BH..*SORTER R|
00003A00: 55 4E 20 4B 55 4E 20 49 47 4A 45 4E 20 20 2A 00 |UN KUN IGJEN *.|
00003A10: 2F 42 49 02 8F 2A 48 56 49 53 20 45 58 3D 31 20 |/BI..*HVIS EX=1 |
00003A20: 53 45 45 20 31 34 37 31 30 20 20 20 20 20 2A 00 |SEE 14710 *.|
00003A30: 40 42 4A 02 8B 20 45 58 B2 31 20 A7 20 35 35 35 |@BJ.. EX.1 . 555|
00003A40: 00 48 42 4B 02 82 20 43 00 4E 42 4C 02 8E 00 63 |.HBK.. C.NBL...c|
00003A50: 42 4D 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |BM..************|
00003A60: 2A 2A 2A 00 78 42 4E 02 8F 2A 46 4C 45 4B 53 49 |***.xBN..*FLEKSI|
00003A70: 2D 4C 45 54 49 4E 47 2A 00 8D 42 4F 02 8F 2A 2A |-LETING*..BO..**|
00003A80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 95 42 |*************..B|
00003A90: 50 02 43 B2 30 00 C2 42 51 02 81 20 53 B2 31 20 |P.C.0..BQ.. S.1 |
00003AA0: A4 20 41 44 46 49 4C 45 3A 41 24 B2 46 49 24 28 |. ADFILE:A$.FI$(|
00003AB0: 41 51 2C 53 29 3A 41 B2 31 3A 46 4C B2 C3 28 41 |AQ,S):A.1:FL..(A|
00003AC0: 24 29 00 D7 42 52 02 42 B2 31 3A 8B 20 41 B1 46 |$)..BR.B.1:. A.F|
00003AD0: 4C 20 A7 20 36 30 33 00 FC 42 53 02 58 24 28 31 |L . 603..BS.X$(1|
00003AE0: 29 B2 CA 28 41 24 2C 41 2C 31 29 3A 58 24 28 32 |)..(A$,A,1):X$(2|
00003AF0: 29 B2 CA 28 49 4E 24 2C 42 2C 31 29 00 22 43 54 |)..(IN$,B,1)."CT|
00003B00: 02 58 31 B2 C6 28 58 24 28 31 29 AA C7 28 30 29 |.X1..(X$(1)..(0)|
00003B10: 29 3A 58 32 B2 C6 28 58 24 28 32 29 AA C7 28 30 |):X2..(X$(2)..(0|
00003B20: 29 29 00 3D 43 55 02 8B 20 58 31 B3 B1 58 32 20 |)).=CU.. X1..X2 |
00003B30: A7 20 41 B2 41 AA 31 3A 89 20 35 39 34 00 4D 43 |. A.A.1:. 594.MC|
00003B40: 56 02 41 B2 41 AA 31 3A 42 B2 42 AA 31 00 5F 43 |V.A.A.1:B.B.1._C|
00003B50: 57 02 8B 20 42 B1 49 4E 4C 20 A7 20 36 30 32 00 |W.. B.INL . 602.|
00003B60: 70 43 58 02 8B 20 41 B1 46 4C 20 A7 20 36 30 33 |pCX.. A.FL . 603|
00003B70: 00 7A 43 59 02 89 20 35 39 35 00 8C 43 5A 02 43 |.zCY.. 595..CZ.C|
00003B80: B2 43 AA 31 3A 53 45 28 43 29 B2 53 00 94 43 5B |.C.1:SE(C).S..C[|
00003B90: 02 82 20 53 00 A2 43 5C 02 42 B2 43 3A 89 20 35 |.. S..C\.B.C:. 5|
00003BA0: 32 31 00 C6 43 5D 02 8F 2A 2A 2A 2A 2A 2A 2A 2A |21..C]..********|
00003BB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003BC0: 2A 2A 2A 2A 2A 2A 00 EA 43 5E 02 8F 2A 20 52 45 |******..C^..* RE|
00003BD0: 47 49 53 54 45 52 20 4E 41 56 4E 20 46 4F 52 20 |GISTER NAVN FOR |
00003BE0: 4C 45 53 2F 53 4B 52 49 56 2A 00 0E 44 5F 02 8F |LES/SKRIV*..D_..|
00003BF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003C00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4C |**************.L|
00003C10: 44 60 02 99 22 93 54 41 53 54 20 49 4E 4E 20 52 |D`..".TAST INN R|
00003C20: 45 47 49 53 54 45 52 45 54 53 20 4E 41 56 4E 20 |EGISTERETS NAVN |
00003C30: 22 3A 99 22 11 28 4F 50 50 20 54 49 4C 20 31 36 |":.".(OPP TIL 16|
00003C40: 20 54 45 47 4E 20 4C 41 4E 47 29 22 00 59 44 61 | TEGN LANG)".YDa|
00003C50: 02 85 20 22 11 22 3B 41 24 00 76 44 62 02 8B 20 |.. ".";A$.vDb.. |
00003C60: 41 24 B2 22 22 20 B0 20 C3 28 41 24 29 B1 31 36 |A$."" . .(A$).16|
00003C70: 20 A7 20 36 30 38 00 85 44 63 02 46 49 4C 45 24 | . 608..Dc.FILE$|
00003C80: B2 41 24 3A 8E 00 8B 44 64 02 8E 00 9D 44 65 02 |.A$:...Dd....De.|
00003C90: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 AF 44 |.************..D|
00003CA0: 66 02 8F 2A 53 4C 55 54 54 20 50 52 4F 47 2A 00 |f..*SLUTT PROG*.|
00003CB0: C1 44 67 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.Dg..***********|
00003CC0: 2A 00 07 45 68 02 99 22 93 1D 1D 1D 1D 1D 1D 45 |*..Eh..".......E|
00003CD0: 52 20 44 55 20 53 49 4B 4B 45 52 3F 4A 2F 4E 22 |R DU SIKKER?J/N"|
00003CE0: 3A 99 22 11 1D 1D 1D 1D 1D 1D 48 41 52 20 44 55 |:.".......HAR DU|
00003CF0: 20 53 41 56 45 44 2F 45 52 53 54 41 54 54 45 54 | SAVED/ERSTATTET|
00003D00: 20 44 41 54 41 3F 22 00 1F 45 69 02 A1 20 41 51 | DATA?"..Ei.. AQ|
00003D10: 24 3A 8B 20 41 51 24 B2 22 4E 22 20 A7 32 37 00 |$:. AQ$."N" .27.|
00003D20: 33 45 6A 02 8B 20 41 51 24 B3 B1 22 59 22 A7 20 |3Ej.. AQ$.."Y". |
00003D30: 36 31 36 00 7A 45 6B 02 97 35 33 32 37 32 2C 32 |616.zEk..53272,2|
00003D40: 31 3A 99 22 93 53 4C 55 54 54 20 53 49 44 45 20 |1:.".SLUTT SIDE |
00003D50: 31 2E 20 20 53 4E 55 20 54 41 50 45 4E 20 52 55 |1. SNU TAPEN RU|
00003D60: 4E 44 54 2C 20 53 50 4F 4C 2C 20 20 20 53 4B 52 |NDT, SPOL, SKR|
00003D70: 55 20 41 56 20 4F 47 20 22 3B 00 A9 45 6C 02 99 |U AV OG ";..El..|
00003D80: 22 50 41 41 20 4F 47 20 54 52 59 4B 4B 20 12 53 |"PAA OG TRYKK .S|
00003D90: 48 49 46 54 2F 52 55 4E 92 20 46 4F 52 20 20 53 |HIFT/RUN. FOR S|
00003DA0: 49 44 45 20 54 4F 22 3A 80 00 00 00 |IDE TO":.... |
..&....*******************************.K
....* SKREVET AV S.K. IBRAHIM *.P...
.* ENKELT DATABASE PROG *......*
DATAHOLDER *......* (
C)1984 *......********
***********************......*BEGYNNELSE
SFASEN*......***************************
***.D....*SPESIFISER REGISTER STR.:SETT
DIM*.H....******************************
...... FI$(8,150),SE(150)......*********
************************.O....*BESTEM SK
JERM OG BAKGRUNNSFARGE*......***********
**********************...... 53280,11:.
53281,11.0....**************************
.P....*BESTEM TRYKKFARGE (HVIT)*.P....**
************************.Y....".". ....*
********************************.G....*B
EGYNNELSEN, INGEN REG. I MINNE*......***
******************************.....FILE$
.""......*****************.)....*DATAHOL
DER MENY*.@....*****************.A....".
..... "......"..... M
ENY: DATAHOLDER"......".....
".A...."....(1)OPPRETT REGISTER"
;......"...(2)LEGG TIL NY FILE"...
.."....(3)KALL OPP FILE";...!..".(4)TAP
E OPERASJONER".=.".."....(5)DISK OPERASJ
ONER".`.#.."....(6)PRINT FILE/MERKELAPP"
...$.."....(7)FORANDRE FILE/REGISTER"...
%.."....(8)LET ETTER FILE/SORTER REGISTE
R".N.&.."....(9)SLUTT PROGRAM"...'.. ADF
ILE.0 .."....DATA I MINNE"...(.."....TAS
T INN ET NR. (1-9)".-.)..***************
*****.G.*..*SJEKK BRUKER BEHOV*.A.+..***
*****************...,.. ME$:ME.E(ME$):.
ME.1.ME.9 . 44...-.. ME.9 . 614......***
***************.G./..*KALL SUBRUTINER *.
..0..******************...1.. ME . 51,72
,100,124,140,347,425,482...2.. 27.).3..*
*****************.A.4..*LAG NYE REGISTRE
*.Y.5..******************.V.6..".OPPRETT
NYE REGISTRE"...7.."..HVOR MANGE OPPLYS
NINGER TRENGS? MAX. 8".F.8..".SPACE TAST
FOR FJERNING"...9.. TFI$:. TFI$."". 57.
..:.. TFI$." " . ....;.TFI.E(TFI$)...<..
TFI.1 . TFI.8 . 57.&.=.FI.TFI.<.>..*STR
YK OPPLYSN,*...?.P$(1)."":P$(2)."":P$(3)
."":P$(4)."":P$(5)."":P$(6)."":P$(7)."":
P$(8)."". .@..*NYE OPPLYSNINGER*.N.A..".
TAST INN OPPLYSNINGER, OPP TIL 9 TEGN"..
.B.. A.1 . FI:."OPPL. ";A;...C.. TP$...D
.TP.C(TP$):. TP.9 . 67.#.E.P$(A).TP$:TP$
."".+.F.. A.1.G...I.H..*****************
*.A.I..*LEGG TIL NY FILE*.Y.J..*********
*********...K..*SJEKK OPPLYSNING*...L..
FI.0 . 80.D.M..".REGISTER ER IKKE OPPRET
TET".X.N.. A.1 . 2000:.A...O.....P.ADFIL
E.ADFILE.1. .Q.. ADFILE.150 . ."....IKKE
MER PLASS":. 94.C.R.."..........FILE NR
.:-";ADFILE.H.S.. A.1.FI:."...";P$(A).11
)G(58):....T.. B.1 . FI:."...":.B...U..A
.1.FI:FI$(A,ADFILE)."".D.V.."...........
..";:. FI$(A,ADFILE)...W.. FI$(A,ADFILE)
."". FI$(A,ADFILE)."<"...X..*SUM UP ASCI
I CODES + SEE 2130*...Y.AS.AS.F(FI$(A,AD
FILE)).6.Z.. A.Z.[..*ER ALLE OPPL.="<",S
TRYK FILE*.{.\.. AS.FI.60 . ADFILE.ADFIL
E.1...].AS.0...^.."....TRYKK EN TAST FOR
FORTSETTELSE".Q._.."...SPACE FOR RETUR
TIL MENY"...`.. AQ$:. AQ$."". 96...A.. A
Q$." ". ....B.. 80...C.....D..**********
*****.2.E..*KALL OPP FILE*.G.F..********
*******.].G..*BE OM FILE NR.*.Z.H..".HVI
LKET FILE NR.";WR$...I.WR.E(WR$):. WR.1
. 104...J.. WR.0 . WR.ADFILE . 112.M.K..
*PRINT FILE DETALJER*...L..".......FILE
NR.:-";WR...M.. A.1 . FI:ATEMP$.FI$(A,WR
).&.N.. ATEMP$."<" . ATEMP$."".[.O.."...
";P$(A).11)G(58):."..............";ATEMP
$:....P..".....TRYKK SPACE FOR FORTSETTE
LSE".L.Q.."....+ SCROLL FOROVER ......
...............- SCROLL BAKOVER "...R
.."....ELLER TRYKK EN TAST FOR VIDERE LE
T- ....ING"...S.. AQ$:. AQ$."". 115.,.T.
. AQ$." ". ..L.U.. AQ$.."+" . AQ$.."-" .
104.P.V.. AQ$."+". WR.(ADFILE). WR.WR.1
...W.. AQ$."-". WR.1 . WR.WR.1...X.. WR.
ADFILE . WR.ADFILE...Y.. ADFILE.0 . 115.
I.Z.. 108.O.{.....|..******************.
..}..*TAPE OPERASJONER*...~..***********
*******.#...*MENY*.@....".....TAPE OPER
ASJONER".D...."....(1)SAVE/ERSTATT REGIS
TER"......"....(2)LOAD REGISTER"......".
...(3)TILBAKE TIL HOVED MENY".I.... ADFI
LE.0 .."....DATA I MINNE"......"....TAST
INN ET NR. (1-3)"...... MET$:MET.E(MET$
):. MET.1 . MET.3 . 134.'.... MET.3 . ..
<....*REGISTER NAVN*.F.... 605.Z.... MET
. 163,203.D.... 128.|....**************
****......*DISK OPERASJONER*......******
************......*MENY*.U....".....DISK
OPERASJONER"......"....(1)SAVE/ERSTATT
REGISTER";......".(2)LOAD REGISTER".4...
."....(3)LES DISK INNHOLDET"._...."....(
4)SKIFT NAVN PAA DISK REGISTER".{...."..
..(5)BEKREFT DISK "......"....(6)STRYK F
ILE PAA DISK".J...."....(7)FORMATISER/SK
IFT NAVN PAA DISK"......"....(8)TILBAKE
TIL HOVED MENY"...... ADFILE.0 .."....DA
TA I MINNE".4...."....TAST INN ET NR. (1
-8)".A.... MED$:MED.E(MED$):. MED.1 . ME
D.8 . 155.Q.... MED.8 . ....... MED.3 .
. 605...... MED . 172,212,214,306,315,32
1,328...... 144.R. ..*******************
**......*SKRIV TIL DISK/TAPE*......*****
****************......****************.4
....*SKRIV TIL TAPE*.J....**************
**......".SETT INN TAPEN .":."DERETTER,
TRYKK EN TAST."......"SPACE-TAST FOR FJ
ERNING.."...... AQ$:.AQ$."". 168.J.... A
Q$." " . ....... 1,1,1,FILE$...... 65535
......****************......*SKRIV TIL D
ISK*.*....****************.P....".SETT D
ISK INN I DISKSTASJONEN".F....".TRYKK EN
TAST"......".SPACE-TAST FOR FJERNING"..
.... AQ$:. AQ$."". 178...... AQ$." ". ..
N.... 1,8,2,"@0:".FILE$.",S,W"......****
******************......*SKRIV FELLES TI
L D&T*."....**********************.F....
*SKRIV ANTALL OPPLYSNINGER,FI*.W....1,FI
;G(13);.Q....*SKRIV OPPLYSNINGER*......
A.1 . FI:ATEMP$.P$(A)...... ATEMP$."" .
ATEMP$."<"......1,ATEMP$;G(13);.G.... A.
.....*SKRIV ANTALL FILER I REGISTER*....
..1,ADFILE;G(13);...A..*SKRIV DATA*.&.B.
. B.1 . ADFILE.5.C.. A.1 . FI.L.D..1,FI$
(A,B);G(13);.U.E..A,B.^.F. 1:..W.G..****
***************...H..*LES FRA DISK/TAPE*
...I..*******************...J..*********
*****.Q.K..*LES FRA TAPE*...L..*********
*****...M..".SETT INN TAPEN .":."DERETTE
R, TRYKK EN TAST.".;.N.."SPACE TAST FOR
FJERNING..".R.O.. AQ$:.AQ$."". 207.D.P..
AQ$." " . ..V.Q.. 1,1,0,FILE$...R.. 226
...S..**************...T..*LES FRA DISK*
...U..**************...V..".SETT DISK IN
N I STASJONEN"...W..".DERETTER, TRYKK EN
TAST"...X..".SPACE-TAST FOR FJERNING".6
.Y.. AQ$:. AQ$."". 217.G.Z.. AQ$." ". ..
Y.... MED.3 . 251.K.... MED.4 . 312.}...
. MED.5 . 317...... MED.6 . 325...... ME
D.7 . 341...... 1,8,2,"0:".FILE$.",S,R".
Y....********************......*LES FELL
ES TIL D&T*.. ...********************..
..A.0:FI.0.4 ...*LES ANTALL OPPLYS.*.> .
..1,FI.U ...*LES INN OPPLYS.*._ ..A.A.1.
. ...1,P$(A):. P$(A)."<" . P$(A)."".. ..
. ST..0 . 1:... ... A.FI . 232.D ...*L
ES INN ANTALL FILER*.R ...1,ADFILE.. ...
*LES INN DATA*.. ..B.0.. ..B.B.1..!..A.0
..!..A.A.1..!...1,FI$(A,B).-!... ST..0 .
1:..>!... A.FI . 242.S!... B.ADFILE .
240.\!.. 1:..S!...*****************..!..
.*DISK DIR LESER *..!...****************
*..!... 1,8,2,"$,S,R".D!... L.1 . 71.R!.
..#1,A$,A$..!... ST..0 . 1:."DISK ERROR
":. 292..!... L.3"..T$(1)."SEQ":T$(2)."P
RG":T$(3)."USR":T$(4)."REL".H"...*FAA DI
SK NAVN*.W"..I.17:. 298.H"..DNAME$.TEMP$
.{"...*FAA DISK ID*.."..I.2:. 298.."..DI
D$.TEMP$.."...*FAA OP SYSTEM*.."..I.2:.
298.I"..OS$.TEMP$.."...*FAA REST AV BLOK
K, IKKE BRUKT*..#... L.1 . 44:.#1,A$,A$:
.L.6#...".DISK NAVE:"DNAME$,"ID:"DID$,"O
S:"OS$.?#..LT.0.]#...*FAA REGISTER DETAL
JENE*.{#...*FAA REGISTER TYPE ,TY$*..#..
. A.1 . 8:.#1,TY$,A$,A$..#... ST..0 .
1:. 291.B#... TY$.."". 277..#... L.1 . 2
7:.#1,A$:. L..#... 287..#...*FAA REGISTE
R NAVN*..$..I.15:. 298..$..N$.TEMP$.9$..
.*FAA REGISTERETS LENGDE*.P$... L.1 . 9:
.#1,A$:..^$...#1,L$,H$..$..L.F(L$.G(0)).
256.F(H$.G(0)):. L.0 . 287..$..LT.LT.L..
$...*PRINT DETALJER*.I$... N$.20)T$(F(TY
$).128),L..$... A.8 . .#1,A$,A$..$ .. A.
.$!..*FORTSETT MED DIR*..%".. 270.,%#.."
.ANT. BLOKKER LEDIG:";664.LT.Z%$.."..REP
ETISJON AV DISK DIR TRYKK EN TAST"..%%..
".SPACE-TAST FOR RETUR TIL MENY"..%&.. A
Q$:. AQ$."" . 294..%'.. AQ$." " . ...%(.
. 251.P%)..*STRING KONSTRUKTOER*..%*.TEM
P$.""..%+.. B.0 . I..&,..#1,B$:. B$..G(1
60). TEMP$.TEMP$.B$..&-.. B.!&....1&/..*
*********.A&0..*DISK KMD*.Q&1..*********
*.L&2..*SKIFT NAVN PAA DISK*..&3..".SKIF
T NAVN PAA REGISTER PAA DISK"..&4..".TAS
T INN GAMMELT NAVN";OLNAM$.S&5..".NYTT N
AVN";NENAM$..'6.A.C(NENAM$):. A.16 . .".
NAVN FOR LANGT!!":. 309..'7.. 214.;'8..
15,8,15:.15,"R0:".NENAM$."=".OLNAM$.D'9.
15.J':...^';..*BEKREFT DISK*.H'<.. 214
.'=..".BEKREFTER DISK"..'>.. 15,8,15:.1
5,"V"..'?. 15..'@...C'A..*STRYK REGISTE
R PAA DISK*..'B..".STRYK ET REGISTER"..'
C..".REGISTERETS NAVN";DFILE$..(D.. 214.
&(E.. 15,8,15:.15,"S0:".DFILE$./(F. 15.
5(G...[(H..*FORMATISER/SKIFT NANV PAA DI
SK*..(I..".FORMATISER(1) ELLER SKIFT NAV
N(2) DISK ?".M(J..".ADVARSEL-KOMMANDOENE
OVENFOR STRYKER REGISTRE PAA DISK"..(
K.. Q$:. Q$."". 331..)L.Q.E(Q$):. Q.1 .
Q.2 . 331..)M..".DISKENS NAVN";DNAM$.S)N
.DNL.C(DNAM$):. DNL.16 . .".NAVN FOR LAN
GT!!":. 333.Q)O.. DNL.1 . .".NAVN?!":.33
3..)P.. Q.2 . 340..)Q..".DISKENS ID";DID
$.L)R.DIDL.C(DID$):. DIDL.2 . .".ID FOR
LANG!!":.337..)S.. DIDL.1 . .".ID?!":.33
7..)T.. 214..*U.. 15,8,15..*V.. Q.2 . 34
5..*W..15,"N0:".DNAM$.",".DID$.9*X. 15:
..M*Y..15,"N0:".DNAM$.X*Z. 15:..T*[..**
********************..*\..*PRINT FILE/ME
RKELAPP*..*]..**********************..*^
.. FI.0 . 77:. HVIS INGEN REGISTRE ER OP
PRETTET..*_..*MENY*..+`..".....PRINTER O
UTPUT".%+A.."....(1)PRINT VALGT FILE".E+
B.."....(2)PRINT ALLE FILENE".I+C.."....
(3)PRINT VALGT MERKELAPP"..+D.."....(4)P
RINT ALLE MERKELAPPENE"..+E.."....(5)TIL
BAKE TIL HOVED MENY".T+F.."..TAST INNE E
T NR. (1-5)"..+G..".* SJEKK AT PRINTEREN
ER PAA". ,H.."..OG AT DET ER PAPIR I PR
INTEREN".M,I.. MEP$:MEP.E(MEP$):. MEP.1
. MEP.5 . 361.],J.. MEP.5 . ..Y,K.. MEP
. 366,376,385,394..,L.. 352..,M..*PRINT
VALGT FILE*.D,N..".PRINT FILE NR. (0 TIL
STOPP)";WR$..,O.WR.E(WR$):. WR.1 . WR.A
DFILE . ...,P.. 406..,Q.. 366..-R.. 4,4.
.-S.. W.1 . 2:.4," ":..E-T..4,G(14);.6)"
REGISTER NAVN:";FILE$.]-U..4,.6)"FILE NR
.";WR.J-V..4,G(15)..-W..*PRINT ALLE FILE
R*..-X..".PRINTER ALLE FILENE"..-Y..".TR
YKK S FOR STOPP".L-Z.. WR.1 . ADFILE..-{
.. 406:. GAA TIL PRINT RUTINE...|.. A$:.
A$."S" . WR.ADFILE...}.. WR.-.~..:. TIL
BAKE TIL MENY.7... 352.N....*PRINT MERK
ELAPP*.W....".PRINT FILE NR. (0 TIL STOP
P)";WR$.....WR.E(WR$):. WR.1 . WR.ADFILE
. ..R....".HVOR MANGE OPPLYSNINGER SKAL
PRINTES,1-";FI"?"......".0 TIL STOPP"..
.... AQ$:. AQ$."" . 389../..B.E(AQ$):. B
.1 .B.FI . ..=/... 419:. GAA TIL PRINT R
UTINE.G/... 385.E/...*PRINT ALLE MERKELA
PPER*../...".PRINTER ALLE MERKELAPPER"..
/...".HVOR MANGE POOLYSNINGER SKAL PRINT
ES,1-";FI;"?".T/...".0 SKAL FJERNES"../.
.. AQ$:. AQ$."" . 397..0..B.E(AQ$):. B.1
. B.FI . ..%0...".TRYKK S FOR STOPP".90
... WR.1 . ADFILE.Z0... 419:. GAA TIL PR
INT RUTINE.W0... A$:. A$."S". WR.ADFILE.
.0... WR..0...:. TILBAKE TIL MENY..0...*
PRINT FILE*..0... 4,4.L0... W.1 . 2:.4,"
":...0...4,G(14);.6)"REGISTERNAVN:";FIL
E$..1...4,.6)"FILE NR.";WR..1...4,G(15).
.1... W.1 . 2:.4," ":..Y1... A.1 . FI:AT
EMP$.FI$(A,WR):B.C(P$(A)).V1... ATEMP$."
<" . ATEMP$.""..1...4,.3)P$(A).15.B)ATEM
P$G(10)..1.....1 .. W.1 . 3:.4," ":...1.
..4: 4:...1...*PRINT MERKELAPPRUTINE*..1
...4,4:.4," ".$2... A.1 . B:ATEMP$.FI$(A
,WR):. ATEMP$."<". ATEMP$."".52...4,.2)A
TEMP$.=2... A.H2...4," ".T2...4: 4:..P2.
..**********************..2...*FORANDRE/
SLETTE FILE*..2...**********************
..2...*MENY*.P2...".....FORANDRE/SLETTE"
..2..."....(1)FORANDRE FILE"..3..."....(
2)SLETT EN FILE".'3..."....(3)SLETT ALLE
FILER".I3..."....(4)SLETT EN OPPLYSNING
".N3..."....(5)TILBAKE TIL HOVED MENY"..
3..."....TAST INN ET NR. (1-5)"..3... ME
M$:MEM.E(MEM$):. MEM.1 . MEM.5 . 436.L3.
.. MEM.5 . ...3... MEM . 441,459,470,473
..3... 429..4...*FORANDRE FILE*..4...".B
ESTEM FILE NR.".B4...".0 TILBAKE TIL MEN
Y .":. WR$.S4... WR$."0". ..Z4..WR.E(WR$
):. WR.1 . WR.ADFILE . 441..4...".......
FILE NR. ";WR..4... A.1.FI:ATEMP$.FI$(A,
WR).O4... ATEMP$."<". ATEMP$.""..4..."..
.";P$(A):."..............";ATEMP$..4A...
.5B.. A.1.FI:."...":. A.>5C.. A.1.FI:.".
...........";FI$(A,WR).D5D...N5E.."....T
RYKK EN TAST FOR FORTSETTELSE"..5F.."...
SPACE-TAST FOR RETUR TIL MENY"..5G.. AQ$
:. AQ$."". 455..5H.. AQ$." ". ..I5I.. 44
1..5J..*SLETT EN FILE*..6K..".SLETT HVIL
KEN FILE (0 SKAL FJERNES)";WR$.36L.WR.E(
WR$):. WR.1 . WR.ADFILE . ..Y6M..*FLYTT
OPP ALLE FILER ETTER WR$*.O6N.. WR.ADFIL
E . 467..6O.. B.WR . (ADFILE.1)..6P.. A.
1 . FI..6Q.FI$(A,B).FI$(A,B.1)..6R.. A,B
.L6S.ADFILE.ADFILE.1.V6T.. 459..6U..*SLE
TT ALLE FILENE*.!7V..".SLETTE ALLE FILEN
E? J/N";AQ$:. AQ$."N" . ..07W.ADFILE.0:.
.H7X..*SLETT OPPLYSNING*.T7Y..".SLETTER
OPPLYSNING:HVILKEN FILE";WR$..7Z.WR.E(WR
$):. WR.1 . WR.ADFILE . ...7... A.1 . FI
:.".";A;P$(A):. A.X7...".OPPLYSNING SOM
SLETTES"..7...".0 SKAL FJERNES"..8... AQ
$:. AQ$."". 478.(8..AQ.E(AQ$):. AQ.1 . A
Q.FI . ..;8..FI$(AQ,WR)."<".E8... 473.J8
...*******************************..8...
*LET ETTER EN FILE/SORTER REG.*..8...***
****************************.D8... FI.0
. 77..8...".LETING(1) ELLER SORTERING(2)
? 1/2"..9...".SPACE-TAST FOR RETUR TIL M
ENY".-9... AQ$:. AQ$."". 488.>9... AQ$.
" ". ..Q9... AQ$."2". 548.E9... AQ$.."1"
. 488.~9...*BE OM INFORMASJON*..9..IN$."
":."."..9... A.1.FI:.".";A;P$(A):..J9...
"....HVILKEN VET DU 1-";FI..9... AQ$:. A
Q$."". 496..:..AQ.E(AQ$):. AQ.1 . AQ.FI
. 496.-:..."....HVA ER DIN INFORMASJON":
. IN$.H:...*FAA LENGDEN TIL IN$*.[:..INL
.C(IN$):B.0..:...ADFILE.0..".INGEN FILER
I MINNE!!":.A.1 . 1000:.:..B:...".FAST
LETING(1) ELLER FLEKSI-LETING(2)?".X:...
Q$:. Q$."". 503..:..Q.E(Q$):. Q..1 . Q.
.2 . 503.%;..."...LETER GJENNOM REGISTER
":. Q.2 . 589.8;...*FAST LETING*.\;... S
.1 . ADFILE:A$.FI$(AQ,S):A.1.P;..X$(1).J
(A$,A,1)..;..X$(2).J(IN$,A,1)..;..X1.F(X
$(1).G(0))..;..X2.F(X$(2).G(0)).B;... X1
..X2 . 520.V;... X1.X2 . A.A.1..;...*SAM
MENLIGNINGEN ER GJORT*..<...*RETURN
*.(<... A.INL . 518.2<... 5
08.<<..B.B.1.H<..SE(B).S.P<... S.Y<...".
DET ER ";B;"FILER SOM INNEHOLDER"..<...
IN$:.".":.B.0. 529..<... A.1 . B . 9:D.0
.F<... C.A . A.8:. C.150 . 527.U<....D)S
E(C);..<..D.D.4..<... C:.:. A:...=...".H
VILKEN VIL DU KALLE OPP?".A=..."0 FOR R
ETUR TIL MENY":."S FOR NY LETING".Z=..."
P FOR PRINT LISTE".Q=... WR$:. WR$."0".
...=... WR$."S". 493..=... WR$."P" . 538
..=... 105..=... 521..=....J=...*LIST ME
D PRINTER*.T=... 4,4..=... A.1 . B . 6..
>... C.A . A.5:. C.150 . 542..>...4,SE(C
),.'>... C:.4,G(13):. A..>.. 4.8> .. 531
.G>!..**********************************
*******..>"..*SORTER REGISTER I ALFA/NUM
ERISK REKKE *.D>#..*********************
********************..>$..".HVILKEN OPPL
YSNING SKAL BRUKEES?1-";FI..?%.. AQ$:.AQ
$."".549.+?&.AQ.E(AQ$):. AQ.1 . AQ.FI .
549.=?'.. C.1 . 2:Y.1.F?(.B.AQ._?)..".SO
RTERE REGISTER"..?*..*SAMMENLIGN TO FILE
R SAMTIDIG*..?+.. S.1 . (ADFILE.Y)..?,.A
.1:R1.S:R2.S.1:EX.0.Z?-..*FAA TEGN FRA B
ESTEMT OPPLYSNING*..?..A$(1).FI$(B,R1)..
@/.A$(2).FI$(B,R2)..@0.N$(1).J(A$(1),A,1
).0@1.N$(2).J(A$(2),A,1).E@2.N1.F(N$(1).
G(0)).Z@3.N2.F(N$(2).G(0)).L@4.. N1.N2 .
574.~@5.. N1.N2 . 581..@6..*HVIS TEGNEN
E ER LIKE,*..@7..*FAA DE NESTE *
.B@8.A.A.1..@9..*HVIS A>OPPL. LENGDE ,NE
STE *..A:..*SETT MED FILER *
..A;.. A.24 . 581.#A<.. 560.8A=..*BYTT O
M FILER*.AA>.EX.1.PA?.. X.1 . FI.EA@.ATE
MP$.FI$(X,R1).}AA.FI$(X,R1).FI$(X,R2)..A
B.FI$(X,R2).ATEMP$..AC.. X..AD..*FORTSET
T SORTERING*..AE.. S..AF.Y.Y.1:. Y.ADFIL
E . EX.1 . Y.1..AG.. Y.ADFILE . ...BH..*
SORTER RUN KUN IGJEN *./BI..*HVIS EX=1
SEE 14710 *.@BJ.. EX.1 . 555.HBK.. C
.NBL...CBM..***************.XBN..*FLEKSI
-LETING*..BO..***************..BP.C.0.BB
Q.. S.1 . ADFILE:A$.FI$(AQ,S):A.1:FL.C(A
$).WBR.B.1:. A.FL . 603..BS.X$(1).J(A$,A
,1):X$(2).J(IN$,B,1)."CT.X1.F(X$(1).G(0)
):X2.F(X$(2).G(0)).=CU.. X1..X2 . A.A.1:
. 594.MCV.A.A.1:B.B.1._CW.. B.INL . 602.
PCX.. A.FL . 603.ZCY.. 595..CZ.C.C.1:SE(
C).S..C[.. S..C\.B.C:. 521.FC]..********
**********************..C^..* REGISTER N
AVN FOR LES/SKRIV*..D_..****************
**************.LD`..".TAST INN REGISTERE
TS NAVN ":.".(OPP TIL 16 TEGN LANG)".YDA
.. ".";A$.VDB.. A$."" . C(A$).16 . 608..
DC.FILE$.A$:...DD....DE..************..D
F..*SLUTT PROG*.ADG..************..EH.."
.......ER DU SIKKER?J/N":.".......HAR DU
SAVED/ERSTATTET DATA?"..EI.. AQ$:. AQ$.
"N" .27.3EJ.. AQ$.."Y". 616.ZEK..53272,2
1:.".SLUTT SIDE 1. SNU TAPEN RUNDT, SPO
L, SKRU AV OG ";..EL.."PAA OG TRYKK .S
HIFT/RUN. FOR SIDE TO":....
> CLICK IMAGE PREVIEW FOR FULL MODAL