PERSONREGISTER
FILE INFORMATION
FILENAME(S): PERSONREGISTER
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-12-01 00:56:44
APPEARS ON: 1 disk(s)
FILE HASH
fddd7d36390f54f44bc102e1eced37364214d265a6e225b72937bd6429777438
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BACKUP | PERSONREGISTER | PRG | hedning, Gothenburg | 12 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 39 08 01 00 8F 53 41 56 45 22 40 30 3A 50 |..9....SAVE"@0:P| 00000010: 45 52 53 4F 4E 52 45 47 49 53 54 45 52 22 2C 38 |ERSONREGISTER",8| 00000020: 3A 56 45 52 49 46 59 22 50 45 52 53 4F 4E 52 45 |:VERIFY"PERSONRE| 00000030: 47 49 53 54 45 52 22 2C 38 00 54 08 04 00 8F 20 |GISTER",8.T.... | 00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000050: 2A 2A 2A 2A 00 6F 08 06 00 8F 20 2A 2A 2A 50 45 |****.o.... ***PE| 00000060: 52 53 4F 4E 52 45 47 49 53 54 45 52 2A 2A 2A 00 |RSONREGISTER***.| 00000070: 8A 08 08 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 4B 47 |..... ********KG| 00000080: 42 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A5 08 09 00 8F |B*********......| 00000090: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************| 000000A0: 2A 2A 2A 2A 2A 00 BD 08 0A 00 97 20 35 33 32 38 |*****...... 5328| 000000B0: 30 2C 36 3A 97 20 35 33 32 38 31 2C 36 00 EF 08 |0,6:. 53281,6...| 000000C0: 0F 00 86 20 4E 24 28 34 30 29 2C 45 24 28 34 30 |... N$(40),E$(40| 000000D0: 29 2C 47 24 28 34 30 29 2C 50 24 28 34 30 29 2C |),G$(40),P$(40),| 000000E0: 50 4E 52 24 28 34 30 29 2C 54 24 28 34 30 29 00 |PNR$(40),T$(40).| 000000F0: FF 08 14 00 99 20 22 93 22 3A 99 3A 99 3A 99 00 |..... ".":.:.:..| 00000100: 0D 09 1E 00 43 52 24 B2 C7 28 31 33 29 00 1F 09 |....CR$..(13)...| 00000110: 28 00 99 20 A3 33 29 22 4D 45 4E 59 22 3A 99 00 |(.. .3)"MENY":..| 00000120: 4E 09 32 00 99 20 A3 33 29 22 9E 53 9A 4B 41 50 |N.2.. .3)".S.KAP| 00000130: 41 4E 44 45 20 41 56 20 46 49 4C 22 3A 99 20 A3 |ANDE AV FIL":. .| 00000140: 32 37 29 22 53 56 41 52 41 20 4D 45 44 22 00 77 |27)"SVARA MED".w| 00000150: 09 3C 00 99 20 A3 33 29 22 9E 4E 9A 59 41 20 50 |.<.. .3)".N.YA P| 00000160: 4F 53 54 45 52 22 3A 99 20 A3 32 37 29 22 4E 5D |OSTER":. .27)"N]| 00000170: 47 4F 54 20 41 56 22 00 A2 09 46 00 99 20 A3 33 |GOT AV"...F.. .3| 00000180: 29 22 9E 50 9A 4F 53 54 55 54 53 4B 52 49 46 54 |)".P.OSTUTSKRIFT| 00000190: 22 3A 99 20 A3 32 37 29 22 54 45 43 4B 4E 45 4E |":. .27)"TECKNEN| 000001A0: 3A 22 00 D4 09 50 00 99 20 A3 33 29 22 9E 52 9A |:"...P.. .3)".R.| 000001B0: 45 47 49 53 54 45 52 55 54 53 4B 52 49 46 54 22 |EGISTERUTSKRIFT"| 000001C0: 3A 99 20 A3 32 37 29 22 53 2C 4E 2C 50 2C 52 2C |:. .27)"S,N,P,R,| 000001D0: 55 2C 41 22 00 EC 09 5A 00 99 20 A3 33 29 22 9E |U,A"...Z.. .3)".| 000001E0: 55 9A 50 50 44 41 54 45 52 49 4E 47 00 03 0A 5F |U.PPDATERING..._| 000001F0: 00 99 3A 99 20 A3 33 29 22 9E 41 9A 56 53 4C 55 |..:. .3)".A.VSLU| 00000200: 54 41 22 00 0D 0A 64 00 99 3A 99 3A 99 00 2B 0A |TA"...d..:.:..+.| 00000210: 6E 00 99 20 A3 33 29 22 56 49 4C 4B 45 4E 20 20 |n.. .3)"VILKEN | 00000220: 4F 50 45 52 41 54 49 4F 4E 3F 22 00 3A 0A 73 00 |OPERATION?".:.s.| 00000230: 8F 20 52 49 54 41 20 52 41 4D 00 49 0A 78 00 81 |. RITA RAM.I.x..| 00000240: 20 49 B2 30 20 A4 20 32 32 00 66 0A 82 00 97 20 | I.0 . 22.f.... | 00000250: 31 30 36 35 AA 49 2C 31 36 30 3A 97 20 35 35 33 |1065.I,160:. 553| 00000260: 33 37 AA 49 2C 37 00 83 0A 96 00 97 20 31 39 34 |37.I,7...... 194| 00000270: 35 AA 49 2C 31 36 30 3A 97 20 35 36 32 31 37 AA |5.I,160:. 56217.| 00000280: 49 2C 37 00 A6 0A AA 00 97 20 31 30 36 35 AA 49 |I,7...... 1065.I| 00000290: AC 34 30 2C 31 36 30 3A 97 20 35 35 33 33 37 AA |.40,160:. 55337.| 000002A0: 49 AC 34 30 2C 37 00 C9 0A BE 00 97 20 31 30 38 |I.40,7...... 108| 000002B0: 38 AA 49 AC 34 30 2C 31 36 30 3A 97 20 35 35 33 |8.I.40,160:. 553| 000002C0: 36 30 AA 49 AC 34 30 2C 37 00 D1 0A D2 00 82 20 |60.I.40,7...... | 000002D0: 49 00 E7 0A DC 00 A1 20 41 24 3A 8B 20 41 24 B2 |I...... A$:. A$.| 000002E0: 22 22 A7 20 32 32 30 00 FB 0A E6 00 8B 20 41 24 |"". 220...... A$| 000002F0: B2 22 53 22 20 A7 20 31 30 30 30 00 0F 0B F0 00 |."S" . 1000.....| 00000300: 8B 20 41 24 B2 22 4E 22 20 A7 20 32 30 30 30 00 |. A$."N" . 2000.| 00000310: 23 0B FA 00 8B 20 41 24 B2 22 50 22 20 A7 20 33 |#.... A$."P" . 3| 00000320: 30 30 30 00 37 0B 04 01 8B 20 41 24 B2 22 52 22 |000.7.... A$."R"| 00000330: 20 A7 20 34 30 30 30 00 4B 0B 0E 01 8B 20 41 24 | . 4000.K.... A$| 00000340: B2 22 55 22 20 A7 20 35 30 30 30 00 5F 0B 13 01 |."U" . 5000._...| 00000350: 8B 20 41 24 B2 22 41 22 20 A7 20 36 30 30 30 00 |. A$."A" . 6000.| 00000360: 69 0B 18 01 89 20 32 32 30 00 85 0B E8 03 8F 20 |i.... 220...... | 00000370: 2A 2A 2A 53 4B 41 50 41 4E 44 45 20 41 56 20 46 |***SKAPANDE AV F| 00000380: 49 4C 2A 2A 2A 00 B9 0B F2 03 99 20 22 93 11 11 |IL***...... "...| 00000390: 11 11 11 11 11 11 11 11 11 56 41 44 20 53 4B 41 |.........VAD SKA| 000003A0: 4C 4C 20 46 49 4C 45 4E 20 48 45 54 41 22 3A 99 |LL FILEN HETA":.| 000003B0: 3A 85 20 42 24 3A 49 B2 31 00 D0 0B 06 04 42 24 |:. B$:I.1.....B$| 000003C0: B2 42 24 AA 22 2C 53 45 51 2C 57 52 49 54 45 22 |.B$.",SEQ,WRITE"| 000003D0: 00 EC 0B 10 04 9F 20 31 2C 38 2C 31 35 2C 22 49 |...... 1,8,15,"I| 000003E0: 22 3A 9F 20 32 2C 38 2C 32 2C 42 24 00 F8 0B 1F |":. 2,8,2,B$....| 000003F0: 04 A0 20 32 3A A0 20 31 00 03 0C 2E 04 89 20 32 |.. 2:. 1...... 2| 00000400: 30 34 30 00 26 0C D0 07 8F 20 2A 2A 2A 49 4E 53 |040.&.... ***INS| 00000410: 4B 52 49 46 54 20 41 56 20 4E 59 41 20 50 4F 53 |KRIFT AV NYA POS| 00000420: 54 45 52 2A 2A 2A 00 55 0C DA 07 99 20 22 93 11 |TER***.U.... "..| 00000430: 11 11 11 11 11 11 11 11 11 11 56 41 44 20 48 45 |..........VAD HE| 00000440: 54 45 52 20 46 49 4C 45 4E 22 3A 99 3A 85 20 42 |TER FILEN":.:. B| 00000450: 24 3A 49 B2 31 00 66 0C E4 07 9F 20 31 2C 38 2C |$:I.1.f.... 1,8,| 00000460: 31 35 2C 22 49 22 00 7C 0C E9 07 9F 20 32 2C 38 |15,"I".|.... 2,8| 00000470: 2C 32 2C 42 24 AA 22 2C 53 2C 52 22 00 A9 0C EF |,2,B$.",S,R"....| 00000480: 07 84 32 2C 4E 24 28 49 29 2C 45 24 28 49 29 2C |..2,N$(I),E$(I),| 00000490: 47 24 28 49 29 2C 50 24 28 49 29 2C 50 4E 52 24 |G$(I),P$(I),PNR$| 000004A0: 28 49 29 2C 54 24 28 49 29 00 C0 0C F0 07 8B 20 |(I),T$(I)...... | 000004B0: 4E 24 28 49 29 B2 22 30 22 20 A7 20 32 30 33 34 |N$(I)."0" . 2034| 000004C0: 00 D4 0C F1 07 49 B2 49 AA 31 3A 20 20 20 89 20 |.....I.I.1: . | 000004D0: 32 30 33 31 00 DC 0C F2 07 A0 20 32 00 F2 0C F3 |2031...... 2....| 000004E0: 07 9F 20 32 2C 38 2C 32 2C 42 24 AA 22 2C 53 2C |.. 2,8,2,B$.",S,| 000004F0: 52 22 00 00 0D F4 07 81 20 4A B2 31 20 A4 20 49 |R"...... J.1 . I| 00000500: 00 2D 0D F5 07 84 32 2C 4E 24 28 4A 29 2C 45 24 |.-....2,N$(J),E$| 00000510: 28 4A 29 2C 47 24 28 4A 29 2C 50 24 28 4A 29 2C |(J),G$(J),P$(J),| 00000520: 50 4E 52 24 28 4A 29 2C 54 24 28 4A 29 00 35 0D |PNR$(J),T$(J).5.| 00000530: F6 07 82 20 4A 00 43 0D F7 07 A0 20 32 3A 4A B2 |... J.C.... 2:J.| 00000540: 4A AB 31 00 5F 0D F8 07 9F 20 32 2C 38 2C 32 2C |J.1._.... 2,8,2,| 00000550: 22 40 30 3A 22 AA 42 24 AA 22 2C 53 2C 57 22 00 |"@0:".B$.",S,W".| 00000560: 7A 0D 0C 08 85 20 22 93 46 5C 52 4E 41 4D 4E 20 |z.... ".F\RNAMN | 00000570: 20 20 20 22 3B 4E 24 28 4A 29 00 96 0D 16 08 99 | ";N$(J)......| 00000580: 3A 85 20 22 45 46 54 45 52 4E 41 4D 4E 20 20 22 |:. "EFTERNAMN "| 00000590: 3B 45 24 28 4A 29 00 B2 0D 20 08 99 3A 85 20 22 |;E$(J)... ..:. "| 000005A0: 47 41 54 55 41 44 52 45 53 53 20 22 3B 47 24 28 |GATUADRESS ";G$(| 000005B0: 4A 29 00 CE 0D 2A 08 99 3A 85 20 22 50 4F 53 54 |J)...*..:. "POST| 000005C0: 41 44 52 45 53 53 20 22 3B 50 24 28 4A 29 00 EC |ADRESS ";P$(J)..| 000005D0: 0D 34 08 99 3A 85 20 22 50 45 52 53 4F 4E 4E 52 |.4..:. "PERSONNR| 000005E0: 2E 20 20 22 3B 50 4E 52 24 28 4A 29 00 08 0E 3E |. ";PNR$(J)...>| 000005F0: 08 99 3A 85 20 22 54 45 4C 45 46 4F 4E 20 20 20 |..:. "TELEFON | 00000600: 20 22 3B 54 24 28 4A 29 00 18 0E 52 08 99 3A 99 | ";T$(J)...R..:.| 00000610: 3A 99 3A 4A B2 4A AA 31 00 31 0E 5C 08 99 20 22 |:.:J.J.1.1.\.. "| 00000620: 56 49 4C 4C 20 44 55 20 53 4B 52 49 56 41 20 49 |VILL DU SKRIVA I| 00000630: 4E 00 4A 0E 66 08 99 20 22 46 4C 45 52 20 50 4F |N.J.f.. "FLER PO| 00000640: 53 54 45 52 22 3A 85 20 43 24 00 64 0E 70 08 8B |STER":. C$.d.p..| 00000650: 20 C6 28 43 24 29 B2 37 34 20 A7 20 32 30 36 30 | .(C$).74 . 2060| 00000660: 3A 99 20 4A 00 72 0E 71 08 4E 24 28 4A 29 B2 22 |:. J.r.q.N$(J)."| 00000670: 30 22 00 96 0E 72 08 50 24 28 4A 29 B2 22 30 22 |0"...r.P$(J)."0"| 00000680: 3A 50 4E 52 24 28 4A 29 B2 22 30 22 3A 54 24 28 |:PNR$(J)."0":T$(| 00000690: 4A 29 B2 22 30 22 00 A4 0E 73 08 45 24 28 4A 29 |J)."0"...s.E$(J)| 000006A0: B2 22 30 22 00 B2 0E 74 08 47 24 28 4A 29 B2 22 |."0"...t.G$(J)."| 000006B0: 30 22 00 C0 0E 75 08 81 20 4B B2 31 20 A4 20 4A |0"...u.. K.1 . J| 000006C0: 00 F7 0E 7A 08 98 32 2C 4E 24 28 4B 29 43 52 24 |...z..2,N$(K)CR$| 000006D0: 45 24 28 4B 29 43 52 24 47 24 28 4B 29 43 52 24 |E$(K)CR$G$(K)CR$| 000006E0: 50 24 28 4B 29 43 52 24 50 4E 52 24 28 4B 29 43 |P$(K)CR$PNR$(K)C| 000006F0: 52 24 54 24 28 4B 29 00 FF 0E 7F 08 82 20 4B 00 |R$T$(K)...... K.| 00000700: 10 0F 84 08 A0 20 32 3A A0 20 31 3A 89 20 32 30 |..... 2:. 1:. 20| 00000710: 00 32 0F B8 0B 8F 2A 2A 2A 45 4E 53 54 41 4B 41 |.2....***ENSTAKA| 00000720: 20 50 4F 53 54 55 54 53 4B 52 49 46 54 45 52 2A | POSTUTSKRIFTER*| 00000730: 2A 2A 00 5D 0F C2 0B 99 20 22 93 11 11 11 11 11 |**.].... "......| 00000740: 11 11 11 11 11 11 56 41 44 20 48 45 54 45 52 20 |......VAD HETER | 00000750: 46 49 4C 45 4E 22 3A 99 3A 85 20 42 24 00 80 0F |FILEN":.:. B$...| 00000760: D6 0B 9F 20 31 2C 38 2C 31 35 2C 22 49 22 3A 9F |... 1,8,15,"I":.| 00000770: 20 32 2C 38 2C 32 2C 42 24 AA 22 2C 53 2C 52 22 | 2,8,2,B$.",S,R"| 00000780: 00 B4 0F EA 0B 99 20 22 41 4E 47 45 20 53 5C 4B |...... "ANGE S\K| 00000790: 42 45 47 52 45 50 50 20 4D 45 44 20 41 54 54 20 |BEGREPP MED ATT | 000007A0: 53 56 41 52 41 20 4A 20 45 4C 4C 45 52 20 4E 22 |SVARA J ELLER N"| 000007B0: 3A 99 3A 99 00 D9 0F 08 0C 85 20 22 5B 52 20 53 |:.:....... "[R S| 000007C0: 5C 4B 42 45 47 52 45 50 50 45 54 20 2D 46 5C 52 |\KBEGREPPET -F\R| 000007D0: 4E 41 4D 4E 2D 22 3B 43 24 00 ED 0F 12 0C 8B 20 |NAMN-";C$...... | 000007E0: 43 24 B2 22 4A 22 20 A7 20 33 31 39 30 00 14 10 |C$."J" . 3190...| 000007F0: 1C 0C 85 20 22 5B 52 20 53 5C 4B 42 45 47 52 45 |... "[R S\KBEGRE| 00000800: 50 50 45 54 20 2D 45 46 54 45 52 4E 41 4D 4E 2D |PPET -EFTERNAMN-| 00000810: 22 3B 43 24 00 28 10 26 0C 8B 20 43 24 B2 22 4A |";C$.(.&.. C$."J| 00000820: 22 20 A7 20 33 32 30 30 00 50 10 30 0C 85 20 22 |" . 3200.P.0.. "| 00000830: 5B 52 20 53 5C 4B 42 45 47 52 45 50 50 45 54 20 |[R S\KBEGREPPET | 00000840: 2D 47 41 54 55 41 44 52 45 53 53 2D 22 3B 43 24 |-GATUADRESS-";C$| 00000850: 00 64 10 3A 0C 8B 20 43 24 B2 22 4A 22 20 A7 20 |.d.:.. C$."J" . | 00000860: 33 32 31 30 00 8C 10 44 0C 85 20 22 5B 52 20 53 |3210...D.. "[R S| 00000870: 5C 4B 42 45 47 52 45 50 50 45 54 20 2D 50 4F 53 |\KBEGREPPET -POS| 00000880: 54 41 44 52 45 53 53 2D 22 3B 43 24 00 A0 10 4E |TADRESS-";C$...N| 00000890: 0C 8B 20 43 24 B2 22 4A 22 20 A7 20 33 32 32 30 |.. C$."J" . 3220| 000008A0: 00 CA 10 58 0C 85 20 22 5B 52 20 53 5C 4B 42 45 |...X.. "[R S\KBE| 000008B0: 47 52 45 50 50 45 54 20 2D 50 45 52 53 4F 4E 4E |GREPPET -PERSONN| 000008C0: 55 4D 4D 45 52 2D 22 3B 43 24 00 DE 10 62 0C 8B |UMMER-";C$...b..| 000008D0: 20 43 24 B2 22 4A 22 20 A7 20 33 32 33 30 00 05 | C$."J" . 3230..| 000008E0: 11 6C 0C 99 20 22 41 4E 47 45 20 54 45 4C 45 46 |.l.. "ANGE TELEF| 000008F0: 4F 4E 4E 55 4D 4D 45 52 22 3A 85 20 53 24 3A 89 |ONNUMMER":. S$:.| 00000900: 20 33 35 30 30 00 26 11 76 0C 99 20 22 41 4E 47 | 3500.&.v.. "ANG| 00000910: 45 20 46 5C 52 4E 41 4D 4E 22 3A 85 20 53 24 3A |E F\RNAMN":. S$:| 00000920: 89 20 33 35 30 30 00 49 11 80 0C 99 20 22 41 4E |. 3500.I.... "AN| 00000930: 47 45 20 45 46 54 45 52 4E 41 4D 4E 22 3A 85 20 |GE EFTERNAMN":. | 00000940: 53 24 3A 89 20 33 35 30 30 00 6D 11 8A 0C 99 20 |S$:. 3500.m.... | 00000950: 22 41 4E 47 45 20 47 41 54 55 41 44 52 45 53 53 |"ANGE GATUADRESS| 00000960: 22 3A 85 20 53 24 3A 89 20 33 35 30 30 00 91 11 |":. S$:. 3500...| 00000970: 94 0C 99 20 22 41 4E 47 45 20 50 4F 53 54 41 44 |... "ANGE POSTAD| 00000980: 52 45 53 53 22 3A 85 20 53 24 3A 89 20 33 35 30 |RESS":. S$:. 350| 00000990: 30 00 B7 11 9E 0C 99 20 22 41 4E 47 45 20 50 45 |0...... "ANGE PE| 000009A0: 52 53 4F 4E 4E 55 4D 4D 45 52 22 3A 85 20 53 24 |RSONNUMMER":. S$| 000009B0: 3A 89 20 33 35 30 30 00 E2 11 AC 0D 84 32 2C 41 |:. 3500......2,A| 000009C0: 24 28 31 29 2C 41 24 28 32 29 2C 41 24 28 33 29 |$(1),A$(2),A$(3)| 000009D0: 2C 41 24 28 34 29 2C 41 24 28 35 29 2C 41 24 28 |,A$(4),A$(5),A$(| 000009E0: 36 29 00 F9 11 AD 0D 8B 20 41 24 28 31 29 B2 22 |6)...... A$(1)."| 000009F0: 30 22 20 A7 20 33 36 32 30 00 01 12 B6 0D 46 B2 |0" . 3620.....F.| 00000A00: 30 00 0F 12 C0 0D 81 20 49 B2 31 20 A4 20 36 00 |0...... I.1 . 6.| 00000A10: 26 12 C1 0D 8B 20 53 24 B3 B1 41 24 28 49 29 20 |&.... S$..A$(I) | 00000A20: A7 20 33 36 30 30 00 3C 12 C5 0D 99 22 93 22 3A |. 3600.<....".":| 00000A30: 99 41 24 28 31 29 2C 41 24 28 32 29 00 50 12 D4 |.A$(1),A$(2).P..| 00000A40: 0D 99 20 41 24 28 33 29 3A 99 20 41 24 28 34 29 |.. A$(3):. A$(4)| 00000A50: 00 70 12 E8 0D 99 20 22 50 4E 52 22 2C 41 24 28 |.p.... "PNR",A$(| 00000A60: 35 29 3A 99 20 22 54 45 4C 22 2C 41 24 28 36 29 |5):. "TEL",A$(6)| 00000A70: 00 7A 12 F7 0D 99 3A 99 3A 99 00 A7 12 FC 0D 99 |.z....:.:.......| 00000A80: 20 22 46 5C 52 20 46 4F 52 54 53 41 54 54 20 41 | "F\R FORTSATT A| 00000A90: 52 42 45 54 45 20 54 52 59 43 4B 20 4D 45 4C 4C |RBETE TRYCK MELL| 00000AA0: 41 4E 53 4C 41 47 22 00 B3 12 07 0E A0 20 32 3A |ANSLAG"...... 2:| 00000AB0: A0 20 31 00 CE 12 0B 0E A1 20 56 24 3A 20 20 8B |. 1...... V$: .| 00000AC0: 20 56 24 B2 22 22 20 20 A7 20 33 35 39 35 00 D7 | V$."" . 3595..| 00000AD0: 12 0C 0E 89 20 32 30 00 DF 12 10 0E 82 20 49 00 |.... 20...... I.| 00000AE0: EA 12 1A 0E 89 20 33 35 30 30 00 0E 13 24 0E 99 |..... 3500...$..| 00000AF0: 20 22 46 49 4E 4E 53 20 45 4A 20 49 20 52 45 47 | "FINNS EJ I REG| 00000B00: 49 53 54 52 45 54 22 3A 89 20 33 35 38 30 00 2A |ISTRET":. 3580.*| 00000B10: 13 A0 0F 8F 2A 2A 2A 52 45 47 49 53 54 45 52 55 |....***REGISTERU| 00000B20: 54 53 4B 52 49 46 54 2A 2A 2A 00 55 13 AA 0F 99 |TSKRIFT***.U....| 00000B30: 20 22 93 11 11 11 11 11 11 11 11 11 11 11 56 41 | "............VA| 00000B40: 44 20 48 45 54 45 52 20 46 49 4C 45 4E 22 3A 99 |D HETER FILEN":.| 00000B50: 3A 85 20 42 24 00 77 13 B4 0F 9F 20 31 2C 38 2C |:. B$.w.... 1,8,| 00000B60: 31 35 2C 22 49 22 3A 9F 32 2C 38 2C 32 2C 42 24 |15,"I":.2,8,2,B$| 00000B70: AA 22 2C 53 2C 52 22 00 AB 13 BE 0F 99 3A 99 20 |.",S,R"......:. | 00000B80: 20 22 56 49 4C 4C 20 44 55 20 48 41 20 55 54 53 | "VILL DU HA UTS| 00000B90: 4B 52 49 46 54 45 4E 20 50 5D 20 53 4B 52 49 56 |KRIFTEN P] SKRIV| 00000BA0: 41 52 45 20 45 4C 4C 45 52 20 22 00 CE 13 C8 0F |ARE ELLER ".....| 00000BB0: 99 20 22 42 49 4C 44 53 4B 5B 52 4D 20 45 4C 4C |. "BILDSK[RM ELL| 00000BC0: 45 52 20 45 54 54 49 4B 45 54 54 45 52 22 00 D4 |ER ETTIKETTER"..| 00000BD0: 13 CD 0F 99 00 F3 13 D2 0F 85 20 22 45 4C 4C 45 |.......... "ELLE| 00000BE0: 52 20 52 41 44 20 28 53 2F 42 2F 45 2F 52 29 22 |R RAD (S/B/E/R)"| 00000BF0: 3B 43 24 00 FB 13 D3 0F 49 B2 31 00 28 14 DC 0F |;C$.....I.1.(...| 00000C00: 84 32 2C 4E 24 28 49 29 2C 45 24 28 49 29 2C 47 |.2,N$(I),E$(I),G| 00000C10: 24 28 49 29 2C 50 24 28 49 29 2C 50 4E 52 24 28 |$(I),P$(I),PNR$(| 00000C20: 49 29 2C 54 24 28 49 29 00 41 14 E6 0F 8B 20 4E |I),T$(I).A.... N| 00000C30: 24 28 49 29 20 B2 20 22 30 22 20 A7 20 34 32 30 |$(I) . "0" . 420| 00000C40: 30 00 51 14 F0 0F 49 B2 49 AA 31 3A 89 34 30 36 |0.Q...I.I.1:.406| 00000C50: 30 00 5D 14 68 10 A0 20 32 3A A0 20 31 00 71 14 |0.].h.. 2:. 1.q.| 00000C60: 6D 10 8B 20 43 24 B2 22 53 22 20 A7 20 34 35 30 |m.. C$."S" . 450| 00000C70: 30 00 85 14 6F 10 8B 20 43 24 B2 22 45 22 20 A7 |0...o.. C$."E" .| 00000C80: 20 34 37 30 30 00 99 14 70 10 8B 20 43 24 B2 22 | 4700...p.. C$."| 00000C90: 52 22 20 A7 20 34 38 35 30 00 A7 14 72 10 81 20 |R" . 4850...r.. | 00000CA0: 4A B2 31 20 A4 20 49 00 C1 14 7C 10 99 20 22 93 |J.1 . I...|.. ".| 00000CB0: 22 3B 4E 24 28 4A 29 3B 22 20 22 3B 45 24 28 4A |";N$(J);" ";E$(J| 00000CC0: 29 00 D4 14 86 10 99 20 47 24 28 4A 29 3A 99 50 |)...... G$(J):.P| 00000CD0: 24 28 4A 29 00 F5 14 90 10 99 22 50 4E 52 22 2C |$(J)......"PNR",| 00000CE0: 50 4E 52 24 28 4A 29 3A 99 20 22 54 45 4C 22 2C |PNR$(J):. "TEL",| 00000CF0: 54 24 28 4A 29 00 FF 14 95 10 99 3A 99 3A 99 00 |T$(J)......:.:..| 00000D00: 23 15 9A 10 99 20 22 46 5C 52 20 4E 5B 53 54 41 |#.... "F\R N[STA| 00000D10: 20 54 52 59 43 4B 20 4D 45 4C 4C 41 4E 20 53 4C | TRYCK MELLAN SL| 00000D20: 41 47 22 00 3B 15 A4 10 A1 20 53 24 3A 8B 20 53 |AG".;.... S$:. S| 00000D30: 24 B2 22 22 20 A7 20 34 32 36 30 00 43 15 AE 10 |$."" . 4260.C...| 00000D40: 82 20 4A 00 5F 15 B8 10 99 3A 99 20 22 53 4C 55 |. J._....:. "SLU| 00000D50: 54 20 50 5D 20 52 45 47 49 53 54 52 45 54 22 00 |T P] REGISTRET".| 00000D60: 74 15 BD 10 81 20 49 B2 31 20 A4 20 32 35 30 30 |t.... I.1 . 2500| 00000D70: 3A 82 20 49 00 7D 15 C2 10 89 20 32 30 00 97 15 |:. I.}.... 20...| 00000D80: 94 11 9F 20 31 32 38 2C 32 2C 33 2C C7 28 33 38 |... 128,2,3,.(38| 00000D90: 29 AA C7 28 39 36 29 00 AE 15 95 11 9D 20 31 32 |)..(96)...... 12| 00000DA0: 38 20 20 20 20 20 20 20 20 20 20 20 20 20 00 BC |8 ..| 00000DB0: 15 99 11 81 20 4A B2 31 20 A4 20 49 00 DC 15 9E |.... J.1 . I....| 00000DC0: 11 98 31 32 38 2C C7 28 31 34 29 C7 28 31 36 29 |..128,.(14).(16)| 00000DD0: 22 30 35 22 42 24 20 C7 28 31 35 29 00 F5 15 A8 |"05"B$ .(15)....| 00000DE0: 11 98 31 32 38 2C C7 28 31 36 29 22 30 34 22 4E |..128,.(16)"04"N| 00000DF0: 24 28 4A 29 3B 00 08 16 B2 11 98 31 32 38 2C 22 |$(J);......128,"| 00000E00: 20 22 3B 45 24 28 4A 29 00 20 16 BC 11 98 31 32 | ";E$(J). ....12| 00000E10: 38 2C C7 28 31 36 29 22 30 34 22 47 24 28 4A 29 |8,.(16)"04"G$(J)| 00000E20: 00 38 16 C6 11 98 31 32 38 2C C7 28 31 36 29 22 |.8....128,.(16)"| 00000E30: 30 34 22 50 24 28 4A 29 00 58 16 D0 11 98 31 32 |04"P$(J).X....12| 00000E40: 38 2C C7 28 31 36 29 22 30 34 50 4E 52 20 20 22 |8,.(16)"04PNR "| 00000E50: AA 50 4E 52 24 28 4A 29 00 76 16 DA 11 98 31 32 |.PNR$(J).v....12| 00000E60: 38 2C C7 28 31 36 29 22 30 34 54 45 4C 20 20 22 |8,.(16)"04TEL "| 00000E70: AA 54 24 28 4A 29 00 85 16 E4 11 98 31 32 38 2C |.T$(J)......128,| 00000E80: C7 28 31 33 29 00 8D 16 EE 11 82 20 4A 00 BB 16 |.(13)...... J...| 00000E90: F8 11 98 31 32 38 2C C7 28 31 34 29 C7 28 31 36 |...128,.(14).(16| 00000EA0: 29 22 30 34 53 4C 55 54 20 50 5D 20 52 45 47 49 |)"04SLUT P] REGI| 00000EB0: 53 54 52 45 54 22 C7 28 31 35 29 00 C5 16 02 12 |STRET".(15).....| 00000EC0: A0 20 31 32 38 00 CE 16 0C 12 89 20 32 30 00 E8 |. 128...... 20..| 00000ED0: 16 5C 12 9F 20 31 32 38 2C 32 2C 33 2C C7 28 33 |.\.. 128,2,3,.(3| 00000EE0: 38 29 AA C7 28 39 36 29 00 F2 16 5D 12 9D 20 31 |8)..(96)...].. 1| 00000EF0: 32 38 00 09 17 60 12 8F 20 45 54 54 49 4B 45 54 |28...`.. ETTIKET| 00000F00: 54 55 54 53 4B 52 49 46 54 00 17 17 61 12 81 20 |TUTSKRIFT...a.. | 00000F10: 4A B2 31 20 A4 20 49 00 30 17 70 12 98 31 32 38 |J.1 . I.0.p..128| 00000F20: 2C C7 28 31 36 29 22 30 34 22 4E 24 28 4A 29 3B |,.(16)"04"N$(J);| 00000F30: 00 43 17 7A 12 98 31 32 38 2C 22 20 22 3B 45 24 |.C.z..128," ";E$| 00000F40: 28 4A 29 00 5B 17 84 12 98 31 32 38 2C C7 28 31 |(J).[....128,.(1| 00000F50: 36 29 22 30 34 22 47 24 28 4A 29 00 65 17 89 12 |6)"04"G$(J).e...| 00000F60: 98 31 32 38 2C 00 7D 17 8E 12 98 31 32 38 2C C7 |.128,.}....128,.| 00000F70: 28 31 36 29 22 30 34 22 50 24 28 4A 29 00 8C 17 |(16)"04"P$(J)...| 00000F80: AC 12 98 31 32 38 2C C7 28 31 33 29 00 94 17 B6 |...128,.(13)....| 00000F90: 12 82 20 4A 00 9E 17 CA 12 A0 20 31 32 38 00 A7 |.. J...... 128..| 00000FA0: 17 D4 12 89 20 32 30 00 C1 17 F2 12 9F 20 31 32 |.... 20...... 12| 00000FB0: 38 2C 32 2C 33 2C C7 28 33 38 29 AA C7 28 39 36 |8,2,3,.(38)..(96| 00000FC0: 29 00 CB 17 F3 12 9D 20 31 32 38 00 EB 17 FC 12 |)...... 128.....| 00000FD0: 98 31 32 38 2C C7 28 31 34 29 C7 28 31 36 29 22 |.128,.(14).(16)"| 00000FE0: 30 35 22 42 24 20 C7 28 31 35 29 00 F5 17 01 13 |05"B$ .(15).....| 00000FF0: 98 31 32 38 2C 00 03 18 06 13 81 20 4A B2 31 20 |.128,...... J.1 | 00001000: A4 20 49 00 1E 18 10 13 98 31 32 38 2C C7 28 31 |. I......128,.(1| 00001010: 36 29 22 30 34 22 50 4E 52 24 28 4A 29 3B 00 37 |6)"04"PNR$(J);.7| 00001020: 18 1A 13 98 31 32 38 2C C7 28 31 36 29 22 31 38 |....128,.(16)"18| 00001030: 22 4E 24 28 4A 29 3B 00 4B 18 24 13 98 31 32 38 |"N$(J);.K.$..128| 00001040: 2C 22 20 22 3B 45 24 28 4A 29 3B 00 64 18 2E 13 |," ";E$(J);.d...| 00001050: 98 31 32 38 2C C7 28 31 36 29 22 34 32 22 47 24 |.128,.(16)"42"G$| 00001060: 28 4A 29 3B 00 7C 18 38 13 98 31 32 38 2C C7 28 |(J);.|.8..128,.(| 00001070: 31 36 29 22 36 38 22 54 24 28 4A 29 00 84 18 42 |16)"68"T$(J)...B| 00001080: 13 82 20 4A 00 8E 18 47 13 98 31 32 38 2C 00 BC |.. J...G..128,..| 00001090: 18 4C 13 98 31 32 38 2C C7 28 31 34 29 C7 28 31 |.L..128,.(14).(1| 000010A0: 36 29 22 31 30 53 4C 55 54 20 50 5D 20 52 45 47 |6)"10SLUT P] REG| 000010B0: 49 53 54 52 45 54 22 C7 28 31 35 29 00 C6 18 56 |ISTRET".(15)...V| 000010C0: 13 A0 20 31 32 38 00 CF 18 60 13 89 20 32 30 00 |.. 128...`.. 20.| 000010D0: E9 18 88 13 8F 20 2A 2A 2A 20 55 50 50 44 41 54 |..... *** UPPDAT| 000010E0: 45 52 49 4E 47 20 2A 2A 2A 00 18 19 92 13 99 20 |ERING ***...... | 000010F0: 22 93 11 11 11 11 11 11 11 11 11 11 11 56 41 44 |"............VAD| 00001100: 20 48 45 54 45 52 20 46 49 4C 45 4E 22 3A 99 3A | HETER FILEN":.:| 00001110: 85 20 42 24 3A 49 B2 31 00 3B 19 9C 13 9F 20 31 |. B$:I.1.;.... 1| 00001120: 2C 38 2C 31 35 2C 22 49 22 3A 9F 20 32 2C 38 2C |,8,15,"I":. 2,8,| 00001130: 32 2C 42 24 AA 22 2C 53 2C 52 22 00 68 19 A6 13 |2,B$.",S,R".h...| 00001140: 84 32 2C 4E 24 28 49 29 2C 45 24 28 49 29 2C 47 |.2,N$(I),E$(I),G| 00001150: 24 28 49 29 2C 50 24 28 49 29 2C 50 4E 52 24 28 |$(I),P$(I),PNR$(| 00001160: 49 29 2C 54 24 28 49 29 00 7F 19 B0 13 8B 20 4E |I),T$(I)...... N| 00001170: 24 28 49 29 B2 22 30 22 20 A7 20 35 30 35 32 00 |$(I)."0" . 5052.| 00001180: 90 19 BA 13 49 B2 49 AA 31 3A 89 20 35 30 33 30 |....I.I.1:. 5030| 00001190: 00 A3 19 BC 13 99 22 93 22 3A 81 20 4A B2 31 20 |......".":. J.1 | 000011A0: A4 20 49 00 BF 19 BF 13 99 20 4A 3B 22 20 22 3B |. I...... J;" ";| 000011B0: 4E 24 28 4A 29 3B 22 20 22 3B 45 24 28 4A 29 00 |N$(J);" ";E$(J).| 000011C0: C7 19 C1 13 82 20 4A 00 F2 19 C4 13 99 3A 85 20 |..... J......:. | 000011D0: 22 56 49 4C 4B 45 4E 20 50 4F 53 54 20 53 4B 41 |"VILKEN POST SKA| 000011E0: 4C 4C 20 5B 4E 44 52 41 53 3F 20 28 4E 52 29 22 |LL [NDRAS? (NR)"| 000011F0: 3B 41 00 0E 1A CE 13 99 3A 99 20 22 93 22 3B 4E |;A......:. ".";N| 00001200: 24 28 41 29 3B 22 20 22 3B 45 24 28 41 29 00 22 |$(A);" ";E$(A)."| 00001210: 1A D8 13 99 20 47 24 28 41 29 3A 99 20 50 24 28 |.... G$(A):. P$(| 00001220: 41 29 00 3C 1A EC 13 99 20 50 4E 52 24 28 41 29 |A).<.... PNR$(A)| 00001230: 3A 99 20 54 24 28 41 29 3A 99 3A 99 00 5F 1A 00 |:. T$(A):.:.._..| 00001240: 14 99 20 22 56 49 4C 4B 45 54 20 46 5B 4C 54 20 |.. "VILKET F[LT | 00001250: 53 4B 41 4C 4C 20 5B 4E 44 52 41 53 20 3F 22 00 |SKALL [NDRAS ?".| 00001260: 83 1A 0A 14 99 3A 99 20 22 9E 46 9A 5C 52 4E 41 |.....:. ".F.\RNA| 00001270: 4D 4E 22 3A 99 20 22 9E 45 9A 46 54 45 52 4E 41 |MN":. ".E.FTERNA| 00001280: 4D 4E 22 00 A4 1A 1E 14 99 20 22 9E 47 9A 41 54 |MN"...... ".G.AT| 00001290: 41 22 3A 20 99 20 22 9E 50 9A 4F 53 54 41 44 52 |A": . ".P.OSTADR| 000012A0: 45 53 53 22 00 CB 1A 32 14 99 20 22 9E 4E 9A 55 |ESS"...2.. ".N.U| 000012B0: 4D 4D 45 52 28 50 45 52 53 4F 4E 29 22 3A 99 20 |MMER(PERSON)":. | 000012C0: 22 9E 54 9A 45 4C 45 46 4F 4E 22 00 E4 1A 3C 14 |".T.ELEFON"...<.| 000012D0: 99 20 22 9E 49 9A 4E 47 41 20 5B 4E 44 52 49 4E |. ".I.NGA [NDRIN| 000012E0: 47 41 52 22 00 FC 1A 46 14 A1 20 53 24 3A 8B 20 |GAR"...F.. S$:. | 000012F0: 53 24 B2 22 22 20 A7 20 35 31 39 30 00 10 1B 50 |S$."" . 5190...P| 00001300: 14 8B 20 53 24 B2 22 46 22 20 A7 20 35 33 30 30 |.. S$."F" . 5300| 00001310: 00 24 1B 5A 14 8B 20 53 24 B2 22 45 22 20 A7 20 |.$.Z.. S$."E" . | 00001320: 35 34 30 30 00 38 1B 64 14 8B 20 53 24 B2 22 47 |5400.8.d.. S$."G| 00001330: 22 20 A7 20 35 35 30 30 00 4C 1B 6E 14 8B 20 53 |" . 5500.L.n.. S| 00001340: 24 B2 22 50 22 20 A7 20 35 36 30 30 00 60 1B 78 |$."P" . 5600.`.x| 00001350: 14 8B 20 53 24 B2 22 4E 22 20 A7 20 35 37 30 30 |.. S$."N" . 5700| 00001360: 00 74 1B 82 14 8B 20 53 24 B2 22 54 22 20 A7 20 |.t.... S$."T" . | 00001370: 35 32 39 30 00 88 1B 8C 14 8B 20 53 24 B2 22 49 |5290...... S$."I| 00001380: 22 20 A7 20 35 38 34 35 00 93 1B 96 14 89 20 35 |" . 5845...... 5| 00001390: 31 39 30 00 B9 1B AA 14 85 20 22 53 4B 52 49 56 |190...... "SKRIV| 000013A0: 20 54 45 4C 45 46 4F 4E 4E 52 20 22 3B 54 24 28 | TELEFONNR ";T$(| 000013B0: 41 29 3A 89 20 35 38 30 30 00 DF 1B B4 14 85 20 |A):. 5800...... | 000013C0: 22 53 4B 52 49 56 20 46 5C 52 4E 41 4D 4E 20 20 |"SKRIV F\RNAMN | 000013D0: 20 22 3B 4E 24 28 41 29 3A 89 20 35 38 30 30 00 | ";N$(A):. 5800.| 000013E0: 05 1C 18 15 85 20 22 53 4B 52 49 56 20 45 46 54 |..... "SKRIV EFT| 000013F0: 45 52 4E 41 4D 4E 20 22 3B 45 24 28 41 29 3A 89 |ERNAMN ";E$(A):.| 00001400: 20 35 38 30 30 00 2B 1C 7C 15 85 20 22 53 4B 52 | 5800.+.|.. "SKR| 00001410: 49 56 20 47 41 54 55 41 44 52 45 53 53 22 3B 47 |IV GATUADRESS";G| 00001420: 24 28 41 29 3A 89 20 35 38 30 30 00 51 1C E0 15 |$(A):. 5800.Q...| 00001430: 85 20 22 53 4B 52 49 56 20 50 4F 53 54 41 44 52 |. "SKRIV POSTADR| 00001440: 45 53 53 22 3B 50 24 28 41 29 3A 89 20 35 38 30 |ESS";P$(A):. 580| 00001450: 30 00 79 1C 44 16 85 20 22 53 4B 52 49 56 20 50 |0.y.D.. "SKRIV P| 00001460: 45 52 53 4F 4E 4E 52 20 20 22 3B 50 4E 52 24 28 |ERSONNR ";PNR$(| 00001470: 41 29 3A 89 20 35 38 30 30 00 81 1C A8 16 A0 20 |A):. 5800...... | 00001480: 32 00 9D 1C B2 16 9F 20 32 2C 38 2C 32 2C 22 40 |2...... 2,8,2,"@| 00001490: 30 3A 22 AA 42 24 AA 22 2C 53 2C 57 22 00 AB 1C |0:".B$.",S,W"...| 000014A0: BC 16 81 20 4A B2 31 20 A4 20 49 00 E2 1C C6 16 |... J.1 . I.....| 000014B0: 98 32 2C 4E 24 28 4A 29 43 52 24 45 24 28 4A 29 |.2,N$(J)CR$E$(J)| 000014C0: 43 52 24 47 24 28 4A 29 43 52 24 50 24 28 4A 29 |CR$G$(J)CR$P$(J)| 000014D0: 43 52 24 50 4E 52 24 28 4A 29 43 52 24 54 24 28 |CR$PNR$(J)CR$T$(| 000014E0: 4A 29 00 EA 1C D0 16 82 20 4A 00 0D 1D D5 16 85 |J)...... J......| 000014F0: 20 22 11 11 46 4C 45 52 20 5B 4E 44 52 49 4E 47 | "..FLER [NDRING| 00001500: 41 52 20 20 20 4A 9D 9D 9D 22 3B 4A 24 00 21 1D |AR J...";J$.!.| 00001510: D6 16 8B 20 4A 24 B2 22 4A 22 20 A7 20 35 30 35 |... J$."J" . 505| 00001520: 32 00 2D 1D DA 16 A0 20 32 3A A0 20 31 00 36 1D |2.-.... 2:. 1.6.| 00001530: E4 16 89 20 32 30 00 3C 1D 70 17 80 00 00 00 |... 20.<.p..... |
..9....SAVE"@0:PERSONREGISTER",8:VERIFY" PERSONREGISTER",8.T.... **************** ****.O.... ***PERSONREGISTER***...... ** ******KGB*********...... *************** *****...... 53280,6:. 53281,6...... N$(4 0),E$(40),G$(40),P$(40),PNR$(40),T$(40). ..... ".":.:.:......CR$.G(13)...(.. .3)" MENY":..N.2.. .3)".S.KAPANDE AV FIL":. . 27)"SVARA MED".W.<.. .3)".N.YA POSTER":. .27)"N]GOT AV"...F.. .3)".P.OSTUTSKRIFT ":. .27)"TECKNEN:".T.P.. .3)".R.EGISTERU TSKRIFT":. .27)"S,N,P,R,U,A"...Z.. .3)". U.PPDATERING..._..:. .3)".A.VSLUTA"...D. .:.:..+.N.. .3)"VILKEN OPERATION?".:.S. . RITA RAM.I.X.. I.0 . 22.F.... 1065.I,1 60:. 55337.I,7...... 1945.I,160:. 56217. I,7...... 1065.I.40,160:. 55337.I.40,7.I .... 1088.I.40,160:. 55360.I.40,7.Q.R.. I...... A$:. A$."". 220...... A$."S" . 1 000...... A$."N" . 2000.#.... A$."P" . 3 000.7.... A$."R" . 4000.K.... A$."U" . 5 000._.... A$."A" . 6000.I.... 220...... ***SKAPANDE AV FIL***...... "........... .VAD SKALL FILEN HETA":.:. B$:I.1.P...B$ .B$.",SEQ,WRITE"...... 1,8,15,"I":. 2,8, 2,B$..... 2: 1...... 2040.&.P.. ***INS KRIFT AV NYA POSTER***.U.Z.. ".......... ..VAD HETER FILEN":.:. B$:I.1.F.... 1,8, 15,"I".|.... 2,8,2,B$.",S,R"......2,N$(I ),E$(I),G$(I),P$(I),PNR$(I),T$(I)...... N$(I)."0" . 2034.T...I.I.1: . 2031.... . 2...... 2,8,2,B$.",S,R"...... J.1 . I .-....2,N$(J),E$(J),G$(J),P$(J),PNR$(J), T$(J).5.... J.C... 2:J.J.1._.... 2,8,2, "@0:".B$.",S,W".Z.... ".F\RNAMN ";N$( J)......:. "EFTERNAMN ";E$(J)... ..:. " GATUADRESS ";G$(J).N.*..:. "POSTADRESS " ;P$(J)...4..:. "PERSONNR. ";PNR$(J)...> ..:. "TELEFON ";T$(J)...R..:.:.:J.J.1 .1.\.. "VILL DU SKRIVA IN.J.F.. "FLER PO STER":. C$.D.P.. F(C$).74 . 2060:. J.R.Q .N$(J)."0"...R.P$(J)."0":PNR$(J)."0":T$( J)."0"...S.E$(J)."0"...T.G$(J)."0"...U.. K.1 . J...Z..2,N$(K)CR$E$(K)CR$G$(K)CR$ P$(K)CR$PNR$(K)CR$T$(K)..... K..... 2: 1:. 20.2....***ENSTAKA POSTUTSKRIFTER* **.].B.. "............VAD HETER FILEN":. :. B$...V.. 1,8,15,"I":. 2,8,2,B$.",S,R" ...... "ANGE S\KBEGREPP MED ATT SVARA J ELLER N":.:..Y.... "[R S\KBEGREPPET -F\R NAMN-";C$...... C$."J" . 3190...... "[R S\KBEGREPPET -EFTERNAMN-";C$.(.&.. C$."J " . 3200.P.0.. "[R S\KBEGREPPET -GATUADR ESS-";C$.D.:.. C$."J" . 3210...D.. "[R S \KBEGREPPET -POSTADRESS-";C$. .N.. C$."J " . 3220.J.X.. "[R S\KBEGREPPET -PERSONN UMMER-";C$...B.. C$."J" . 3230...L.. "AN GE TELEFONNUMMER":. S$:. 3500.&.V.. "ANG E F\RNAMN":. S$:. 3500.I.... "ANGE EFTER NAMN":. S$:. 3500.M.... "ANGE GATUADRESS ":. S$:. 3500...... "ANGE POSTADRESS":. S$:. 3500...... "ANGE PERSONNUMMER":. S$ :. 3500......2,A$(1),A$(2),A$(3),A$(4),A $(5),A$(6)...... A$(1)."0" . 3620.....F. 0...... I.1 . 6.&.A.. S$..A$(I) . 3600.< .E..".":.A$(1),A$(2).P.T.. A$(3):. A$(4) .P.... "PNR",A$(5):. "TEL",A$(6).Z....:. :....... "F\R FORTSATT ARBETE TRYCK MELL ANSLAG"..... 2: 1.N.... V$: . V$."" . 3595.W.... 20...... I...... 3500...$.. "FINNS EJ I REGISTRET":. 3580.*. ..***R EGISTERUTSKRIFT***.U.... "............VA D HETER FILEN":.:. B$.W.... 1,8,15,"I":. 2,8,2,B$.",S,R"......:. "VILL DU HA UTS KRIFTEN P] SKRIVARE ELLER ".N.H.. "BILDS K[RM ELLER ETTIKETTER".T.M.....R.. "ELLE R RAD (S/B/E/R)";C$...S.I.1.(....2,N$(I) ,E$(I),G$(I),P$(I),PNR$(I),T$(I).A.... N $(I) . "0" . 4200.Q...I.I.1:.4060.].H. 2: 1.Q.M.. C$."S" . 4500...O.. C$."E" . 4700...P.. C$."R" . 4850...R.. J.1 . I. A.|.. ".";N$(J);" ";E$(J).T.... G$(J):.P $(J)......"PNR",PNR$(J):. "TEL",T$(J)... ...:.:..#.... "F\R N[STA TRYCK MELLAN SL AG".;.... S$:. S$."" . 4260.C.... J._... .:. "SLUT P] REGISTRET".T.... I.1 . 2500 :. I.}.B.. 20...... 128,2,3,G(38).G(96). ..... 128 ...... J.1 . I.... ..128,G(14)G(16)"05"B$ G(15)......128,G( 16)"04"N$(J);......128," ";E$(J). ....12 8,G(16)"04"G$(J).8.F..128,G(16)"04"P$(J) .X.P..128,G(16)"04PNR ".PNR$(J).V.Z..12 8,G(16)"04TEL ".T$(J)......128,G(13)... ... J......128,G(14)G(16)"04SLUT P] REGI STRET"G(15).E... 128.N.... 20...\.. 128 ,2,3,G(38).G(96)...].. 128...`.. ETTIKET TUTSKRIFT...A.. J.1 . I.0.P..128,G(16)"0 4"N$(J);.C.Z..128," ";E$(J).[....128,G(1 6)"04"G$(J).E....128,.}....128,G(16)"04" P$(J)......128,G(13)...... J...J. 128.. .T.. 20.A.... 128,2,3,G(38).G(96).K.... 128......128,G(14)G(16)"05"B$ G(15)..... .128,...... J.1 . I......128,G(16)"04"PN R$(J);.7....128,G(16)"18"N$(J);.K.$..128 ," ";E$(J);.D....128,G(16)"42"G$(J);.|.8 ..128,G(16)"68"T$(J)...B.. J...G..128,.. .L..128,G(14)G(16)"10SLUT P] REGISTRET"G (15).F.V. 128.O.`.. 20...... *** UPPDAT ERING ***...... "............VAD HETER F ILEN":.:. B$:I.1.;.... 1,8,15,"I":. 2,8, 2,B$.",S,R".H....2,N$(I),E$(I),G$(I),P$( I),PNR$(I),T$(I)..... N$(I)."0" . 5052. ....I.I.1:. 5030......".":. J.1 . I..... . J;" ";N$(J);" ";E$(J).G.A.. J...D..:. "VILKEN POST SKALL [NDRAS? (NR)";A...N.. :. ".";N$(A);" ";E$(A).".X.. G$(A):. P$( A).<.... PNR$(A):. T$(A):.:.._.... "VILK ET F[LT SKALL [NDRAS ?"......:. ".F.\RNA MN":. ".E.FTERNAMN"...... ".G.ATA": . ". P.OSTADRESS".K.2.. ".N.UMMER(PERSON)":. ".T.ELEFON"...<.. ".I.NGA [NDRINGAR"...F .. S$:. S$."" . 5190...P.. S$."F" . 5300 .$.Z.. S$."E" . 5400.8.D.. S$."G" . 5500 .L.N.. S$."P" . 5600.`.X.. S$."N" . 5700 .T.... S$."T" . 5290...... S$."I" . 5845 ...... 5190...... "SKRIV TELEFONNR ";T$( A):. 5800...... "SKRIV F\RNAMN ";N$(A) :. 5800...... "SKRIV EFTERNAMN ";E$(A):. 5800.+.|.. "SKRIV GATUADRESS";G$(A):. 5 800.Q.... "SKRIV POSTADRESS";P$(A):. 580 0.Y.D.. "SKRIV PERSONNR ";PNR$(A):. 580 0..... 2...... 2,8,2,"@0:".B$.",S,W"... ... J.1 . I...F..2,N$(J)CR$E$(J)CR$G$(J) CR$P$(J)CR$PNR$(J)CR$T$(J)...P.. J...U.. "..FLER [NDRINGAR J...";J$.!.V.. J$." J" . 5052.-.Z. 2: 1.6.... 20.<.P.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL