TELEFONREGISTER
FILE INFORMATION
FILENAME(S): TELEFONREGISTER
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-12-01 13:41:53
APPEARS ON: 1 disk(s)
FILE HASH
d7bd63f588c3627ef2bff02f0a8c7dc24ffa0e7118dfed0b86655986f9e26d85
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JANNES DISK | TELEFONREGISTER | PRG | hedning, smalandsstenar | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 01 00 99 22 93 11 11 11 11 11 11 11 |..)...."........| 00000010: 11 11 11 11 22 A3 31 34 29 22 4C 41 44 44 41 52 |....".14)"LADDAR| 00000020: 20 49 4E 20 4E 41 4D 4E 22 00 4F 08 05 00 86 41 | IN NAMN".O....A| 00000030: 24 28 32 35 36 2C 37 29 3A 97 35 33 32 38 30 2C |$(256,7):.53280,| 00000040: 30 3A 97 35 33 32 38 31 2C 30 3A 99 22 1E 22 00 |0:.53281,0:.".".| 00000050: 8C 08 0A 00 81 49 B2 30 A4 32 3A 87 51 5A 28 49 |.....I.0.2:.QZ(I| 00000060: 29 2C 5A 5A 28 49 29 2C 51 57 28 49 29 2C 5A 57 |),ZZ(I),QW(I),ZW| 00000070: 28 49 29 3A 82 49 3A 87 51 5A 28 33 29 2C 51 57 |(I):.I:.QZ(3),QW| 00000080: 28 33 29 3A 53 4F B2 35 34 32 37 32 00 C6 08 14 |(3):SO.54272....| 00000090: 00 53 55 B2 53 4F AA 37 3A 97 53 4F AA 32 34 2C |.SU.SO.7:.SO.24,| 000000A0: 31 35 3A 97 53 4F AA 35 2C 30 3A 97 53 55 AA 35 |15:.SO.5,0:.SU.5| 000000B0: 2C 30 3A 97 53 4F AA 36 2C 32 34 30 3A 97 53 55 |,0:.SO.6,240:.SU| 000000C0: AA 36 2C 32 34 30 00 0C 09 1E 00 83 39 33 2E 31 |.6,240......93.1| 000000D0: 32 35 33 30 35 32 2C 31 30 37 2E 39 30 38 38 38 |253052,107.90888| 000000E0: 32 2C 34 36 2C 38 30 2C 35 36 2E 32 33 33 31 31 |2,46,80,56.23311| 000000F0: 36 32 2C 32 32 32 2E 35 37 35 38 39 37 2C 35 31 |62,222.575897,51| 00000100: 2C 38 38 2C 31 37 32 2E 36 30 30 38 00 30 09 28 |,88,172.6008.0.(| 00000110: 00 83 36 33 2E 36 34 37 31 36 33 34 2C 35 36 2C |..63.6471634,56,| 00000120: 39 38 2C 31 35 32 2E 31 37 30 38 30 31 2C 36 32 |98,152.170801,62| 00000130: 00 52 09 32 00 4E B2 30 3A 9F 31 2C 38 2C 32 2C |.R.2.N.0:.1,8,2,| 00000140: 22 30 3A 54 45 4C 52 45 47 44 41 54 41 2C 53 2C |"0:TELREGDATA,S,| 00000150: 52 22 00 8C 09 3C 00 4E B2 4E AA 31 3A 81 49 B2 |R"...<.N.N.1:.I.| 00000160: 31 A4 37 3A 84 31 2C 41 24 28 4E 2C 49 29 3A 82 |1.7:.1,A$(N,I):.| 00000170: 49 3A 8B 41 24 28 4E 2C 31 29 B3 B1 22 45 4E 44 |I:.A$(N,1).."END| 00000180: 20 4F 46 20 44 41 54 41 22 A7 36 30 00 99 09 46 | OF DATA".60...F| 00000190: 00 A0 31 3A 4E B2 4E AB 31 00 AE 09 50 00 81 49 |..1:N.N.1...P..I| 000001A0: B2 31 A4 37 3A 87 42 24 28 49 29 3A 82 49 00 F3 |.1.7:.B$(I):.I..| 000001B0: 09 5A 00 83 22 20 20 20 20 45 46 54 45 52 4E 41 |.Z.." EFTERNA| 000001C0: 4D 4E 22 2C 22 20 20 20 20 20 20 46 5C 52 4E 41 |MN"," F\RNA| 000001D0: 4D 4E 22 2C 22 20 20 20 20 50 45 52 53 4F 4E 4E |MN"," PERSONN| 000001E0: 52 2E 22 2C 22 42 4F 53 54 41 44 53 41 44 52 45 |R.","BOSTADSADRE| 000001F0: 53 53 22 00 28 0A 5F 00 83 22 20 20 20 50 4F 53 |SS".(._.." POS| 00000200: 54 41 44 52 45 53 53 22 2C 22 20 20 20 54 45 4C |TADRESS"," TEL| 00000210: 45 46 4F 4E 4E 52 2E 22 2C 22 20 20 20 41 4E 4D |EFONNR."," ANM| 00000220: 5B 52 4B 4E 49 4E 47 22 00 5F 0A 64 00 99 22 93 |[RKNING"._.d..".| 00000230: 22 3A 99 A3 31 33 29 22 52 20 45 20 47 20 49 20 |":..13)"R E G I | 00000240: 53 20 54 20 45 20 52 22 3A 99 A3 31 33 29 22 A3 |S T E R":..13)".| 00000250: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 |..............".| 00000260: 78 0A 78 00 99 3A 99 3A 99 A3 31 35 29 22 46 31 |x.x..:.:..15)"F1| 00000270: 20 2D 20 4C 5B 53 41 22 00 91 0A 82 00 99 3A 99 | - L[SA"......:.| 00000280: A3 31 35 29 22 46 33 20 2D 20 53 4B 52 49 56 41 |.15)"F3 - SKRIVA| 00000290: 22 00 AA 0A 8C 00 99 3A 99 A3 31 35 29 22 46 35 |"......:..15)"F5| 000002A0: 20 2D 20 52 41 44 45 52 41 22 00 C2 0A 96 00 99 | - RADERA"......| 000002B0: 3A 99 A3 31 35 29 22 46 37 20 2D 20 5B 4E 44 52 |:..15)"F7 - [NDR| 000002C0: 41 22 00 DA 0A A0 00 99 3A 99 A3 31 35 29 22 46 |A"......:..15)"F| 000002D0: 32 20 2D 20 53 50 41 52 41 22 00 F2 0A AA 00 99 |2 - SPARA"......| 000002E0: 3A 99 A3 31 35 29 22 46 34 20 2D 20 53 4C 55 54 |:..15)"F4 - SLUT| 000002F0: 41 22 00 0A 0B B4 00 99 3A 99 A3 31 35 29 22 46 |A"......:..15)"F| 00000300: 36 20 2D 20 52 49 4E 47 41 22 00 25 0B C8 00 A1 |6 - RINGA".%....| 00000310: 41 24 3A 8B 41 24 B3 22 85 22 B0 41 24 B1 22 8B |A$:.A$.".".A$.".| 00000320: 22 A7 32 30 30 00 55 0B D2 00 99 22 93 22 3A 91 |".200.U....".":.| 00000330: C6 28 41 24 29 AB 31 33 32 89 33 30 30 2C 34 30 |.(A$).132.300,40| 00000340: 30 2C 35 30 30 2C 36 30 30 2C 37 30 30 2C 38 30 |0,500,600,700,80| 00000350: 30 2C 39 30 30 00 80 0B 2C 01 99 22 4C 5B 53 41 |0,900...,.."L[SA| 00000360: 22 3A 99 3A 8D 31 30 30 30 3A 8B 46 B2 30 A7 81 |":.:.1000:.F.0..| 00000370: 49 B2 31 A4 31 30 30 30 3A 82 49 3A 89 31 30 30 |I.1.1000:.I:.100| 00000380: 00 AB 0B 36 01 99 3A 85 22 53 4B 41 20 4A 41 47 |...6..:."SKA JAG| 00000390: 20 52 49 4E 47 41 22 3B 41 24 3A 8B C8 28 41 24 | RINGA";A$:..(A$| 000003A0: 2C 31 29 B2 22 4E 22 A7 31 30 30 00 C5 0B 40 01 |,1)."N".100...@.| 000003B0: 43 24 B2 41 24 28 49 2C 36 29 3A 8D 32 30 30 30 |C$.A$(I,6):.2000| 000003C0: 3A 89 33 31 30 00 D5 0B 90 01 99 22 53 4B 52 49 |:.310......"SKRI| 000003D0: 56 41 22 3A 99 00 FE 0B 9A 01 81 49 B2 31 A4 37 |VA":.......I.1.7| 000003E0: 3A 43 24 28 49 29 B2 22 2D 22 3A 99 3A 99 42 24 |:C$(I)."-":.:.B$| 000003F0: 28 49 29 3B 3A 85 43 24 28 49 29 3A 82 49 00 10 |(I);:.C$(I):.I..| 00000400: 0C A4 01 81 49 B2 31 A4 4E 3A 81 4A B2 31 A4 37 |....I.1.N:.J.1.7| 00000410: 00 3A 0C AE 01 41 B2 C3 28 43 24 28 4A 29 29 3A |.:...A..(C$(J)):| 00000420: 8B 41 B1 C3 28 41 24 28 49 2C 4A 29 29 A7 41 B2 |.A..(A$(I,J)).A.| 00000430: C3 28 41 24 28 49 2C 4A 29 29 00 66 0C B8 01 81 |.(A$(I,J)).f....| 00000440: 4B B2 31 A4 41 3A 8B CA 28 43 24 28 4A 29 2C 4B |K.1.A:..(C$(J),K| 00000450: 2C 31 29 B2 CA 28 41 24 28 49 2C 4A 29 2C 4B 2C |,1)..(A$(I,J),K,| 00000460: 31 29 A7 34 38 30 00 8B 0C C2 01 8B CA 28 43 24 |1).480.......(C$| 00000470: 28 4A 29 2C 4B 2C 31 29 B1 CA 28 41 24 28 49 2C |(J),K,1)..(A$(I,| 00000480: 4A 29 2C 4B 2C 31 29 A7 34 39 30 00 BB 0C CC 01 |J),K,1).490.....| 00000490: 81 4C B2 4E AA 31 A4 49 AA 31 A9 AB 31 3A 81 4D |.L.N.1.I.1..1:.M| 000004A0: B2 31 A4 37 3A 41 24 28 4C 2C 4D 29 B2 41 24 28 |.1.7:A$(L,M).A$(| 000004B0: 4C AB 31 2C 4D 29 3A 82 4D 2C 4C 00 E2 0C D6 01 |L.1,M):.M,L.....| 000004C0: 4E B2 4E AA 31 3A 81 4D B2 31 A4 37 3A 41 24 28 |N.N.1:.M.1.7:A$(| 000004D0: 49 2C 4D 29 B2 43 24 28 4D 29 3A 82 4D 3A 89 31 |I,M).C$(M):.M:.1| 000004E0: 30 30 00 EB 0C E0 01 82 4B 2C 4A 00 F7 0C EA 01 |00......K,J.....| 000004F0: 82 49 3A 89 34 37 30 00 24 0D F4 01 99 22 52 41 |.I:.470.$...."RA| 00000500: 44 45 52 41 22 3A 99 3A 8D 31 30 30 30 3A 8B 46 |DERA":.:.1000:.F| 00000510: B2 30 A7 81 49 B2 31 A4 31 30 30 30 3A 82 49 3A |.0..I.1.1000:.I:| 00000520: 89 31 30 30 00 5B 0D FE 01 99 3A 85 22 56 49 4C |.100.[....:."VIL| 00000530: 4C 20 44 55 20 52 41 44 45 52 41 20 44 45 4E 4E |L DU RADERA DENN| 00000540: 41 20 50 4F 53 54 22 3B 41 24 3A 8B C8 28 41 24 |A POST";A$:..(A$| 00000550: 2C 31 29 B2 22 4E 22 A7 31 30 30 00 8F 0D 08 02 |,1)."N".100.....| 00000560: 4E B2 4E AB 31 3A 81 4A B2 49 A4 4E 3A 81 4B B2 |N.N.1:.J.I.N:.K.| 00000570: 31 A4 37 3A 41 24 28 4A 2C 4B 29 B2 41 24 28 4A |1.7:A$(J,K).A$(J| 00000580: AA 31 2C 4B 29 3A 82 4B 2C 4A 3A 89 31 30 30 00 |.1,K):.K,J:.100.| 00000590: BB 0D 58 02 99 22 5B 4E 44 52 41 22 3A 99 3A 8D |..X.."[NDRA":.:.| 000005A0: 31 30 30 30 3A 8B 46 B2 30 A7 81 49 B2 31 A4 31 |1000:.F.0..I.1.1| 000005B0: 30 30 30 3A 82 49 3A 89 31 30 30 00 F3 0D 62 02 |000:.I:.100...b.| 000005C0: 99 3A 85 22 56 49 4C 4C 20 44 55 20 5B 4E 44 52 |.:."VILL DU [NDR| 000005D0: 41 20 49 20 44 45 4E 4E 41 20 50 4F 53 54 22 3B |A I DENNA POST";| 000005E0: 41 24 3A 8B C8 28 41 24 2C 31 29 B2 22 4E 22 A7 |A$:..(A$,1)."N".| 000005F0: 31 30 30 00 0D 0E 6C 02 99 22 93 22 3A 81 4A B2 |100...l..".":.J.| 00000600: 31 A4 37 3A 99 3A 99 42 24 28 4A 29 3B 00 2F 0E |1.7:.:.B$(J);./.| 00000610: 76 02 50 B2 B9 28 58 29 3A 99 22 20 20 22 3B 41 |v.P..(X):." ";A| 00000620: 24 28 49 2C 4A 29 3A 99 22 91 22 A3 50 29 3B 00 |$(I,J):.".".P);.| 00000630: 68 0E 80 02 85 43 24 28 4A 29 3A 82 4A 3A 81 4A |h....C$(J):.J:.J| 00000640: B2 49 A4 4E 3A 81 4B B2 31 A4 37 3A 41 24 28 4A |.I.N:.K.1.7:A$(J| 00000650: 2C 4B 29 B2 41 24 28 4A AA 31 2C 4B 29 3A 82 4B |,K).A$(J.1,K):.K| 00000660: 2C 4A 3A 4E B2 4E AB 31 00 71 0E 8A 02 89 34 32 |,J:N.N.1.q....42| 00000670: 30 00 A1 0E BC 02 99 22 53 50 41 52 41 22 3A 99 |0......"SPARA":.| 00000680: 3A 9F 31 2C 38 2C 31 35 3A 98 31 2C 22 53 30 3A |:.1,8,15:.1,"S0:| 00000690: 52 45 47 49 53 54 45 52 2D 44 41 54 41 22 3A A0 |REGISTER-DATA":.| 000006A0: 31 00 BF 0E C6 02 9F 31 2C 38 2C 32 2C 22 30 3A |1......1,8,2,"0:| 000006B0: 54 45 4C 52 45 47 44 41 54 41 2C 53 2C 57 22 00 |TELREGDATA,S,W".| 000006C0: E1 0E D0 02 81 49 B2 31 A4 4E 3A 81 4A B2 31 A4 |.....I.1.N:.J.1.| 000006D0: 37 3A 98 31 2C 41 24 28 49 2C 4A 29 3A 82 4A 2C |7:.1,A$(I,J):.J,| 000006E0: 49 00 0F 0F DA 02 98 31 2C 22 45 4E 44 20 4F 46 |I......1,"END OF| 000006F0: 20 44 41 54 41 22 3A 81 49 B2 32 A4 37 3A 98 31 | DATA":.I.2.7:.1| 00000700: 2C 22 2A 22 3A 82 49 3A A0 31 3A 89 31 30 30 00 |,"*":.I:.1:.100.| 00000710: 15 0F 20 03 80 00 3A 0F 84 03 41 24 B2 22 4A 22 |.. ...:...A$."J"| 00000720: 3A 99 22 93 22 3A 85 22 54 45 4C 45 46 4F 4E 2D |:.".":."TELEFON-| 00000730: 4E 55 4D 4D 45 52 22 3B 43 24 00 70 0F 8E 03 8D |NUMMER";C$.p....| 00000740: 32 30 30 30 3A 85 22 53 4B 41 4C 4C 20 4A 41 47 |2000:."SKALL JAG| 00000750: 20 52 49 4E 47 41 20 49 47 45 4E 22 3B 41 24 3A | RINGA IGEN";A$:| 00000760: 8B C8 28 41 24 2C 31 29 B2 22 4A 22 A7 39 31 30 |..(A$,1)."J".910| 00000770: 00 79 0F 98 03 89 31 30 30 00 97 0F E8 03 99 22 |.y....100......"| 00000780: 44 45 54 20 46 49 4E 4E 53 22 3B 4E 3B 22 20 50 |DET FINNS";N;" P| 00000790: 4F 53 54 45 52 2E 22 00 BE 0F F2 03 99 3A 99 22 |OSTER."......:."| 000007A0: 53 4B 52 49 56 20 56 41 44 20 44 55 20 56 45 54 |SKRIV VAD DU VET| 000007B0: 20 4F 4D 20 50 45 52 53 4F 4E 45 4E 2E 22 00 E7 | OM PERSONEN."..| 000007C0: 0F FC 03 81 49 B2 31 A4 37 3A 53 24 28 49 29 B2 |....I.1.7:S$(I).| 000007D0: 22 2D 22 3A 99 3A 99 42 24 28 49 29 3B 3A 85 53 |"-":.:.B$(I);:.S| 000007E0: 24 28 49 29 3A 82 49 00 0D 10 06 04 46 B2 30 3A |$(I):.I.....F.0:| 000007F0: 81 49 B2 31 A4 4E 3A 81 4A B2 31 A4 37 3A 8B 53 |.I.1.N:.J.1.7:.S| 00000800: 24 28 4A 29 B2 22 2D 22 A7 31 30 38 30 00 2B 10 |$(J)."-".1080.+.| 00000810: 10 04 8B C3 28 53 24 28 4A 29 29 B1 C3 28 41 24 |....(S$(J))..(A$| 00000820: 28 49 2C 4A 29 29 A7 31 31 31 30 00 5A 10 1A 04 |(I,J)).1110.Z...| 00000830: 81 4B B2 31 A4 C3 28 53 24 28 4A 29 29 3A 41 24 |.K.1..(S$(J)):A$| 00000840: B2 CA 28 53 24 28 4A 29 2C 4B 2C 31 29 3A 8B 41 |..(S$(J),K,1):.A| 00000850: 24 B2 22 3F 22 A7 31 30 37 30 00 77 10 24 04 8B |$."?".1070.w.$..| 00000860: 41 24 B3 B1 CA 28 41 24 28 49 2C 4A 29 2C 4B 2C |A$...(A$(I,J),K,| 00000870: 31 29 A7 31 31 31 30 00 7E 10 2E 04 82 4B 00 AE |1).1110.~....K..| 00000880: 10 38 04 82 4A 3A 99 22 93 22 3A 46 B2 46 AA 31 |.8..J:.".":F.F.1| 00000890: 3A 81 4A B2 31 A4 37 3A 8B 41 24 28 49 2C 4A 29 |:.J.1.7:.A$(I,J)| 000008A0: B3 B1 22 2D 22 A7 99 41 24 28 49 2C 4A 29 00 BC |.."-"..A$(I,J)..| 000008B0: 10 42 04 82 4A 3A 41 24 B2 22 4A 22 00 F1 10 4C |.B..J:A$."J"...L| 000008C0: 04 99 3A 85 22 53 4B 41 4C 4C 20 4A 41 47 20 4C |..:."SKALL JAG L| 000008D0: 45 54 41 20 45 46 54 45 52 20 46 4C 45 52 22 3B |ETA EFTER FLER";| 000008E0: 41 24 3A 8B C8 28 41 24 2C 31 29 B2 22 4E 22 A7 |A$:..(A$,1)."N".| 000008F0: 8E 00 1A 11 56 04 82 49 3A 8B 46 B2 30 A7 99 3A |....V..I:.F.0..:| 00000900: 99 22 46 49 4E 4E 53 20 45 4A 20 49 20 52 45 47 |."FINNS EJ I REG| 00000910: 49 53 54 52 45 54 2E 22 3A 8E 00 34 11 60 04 99 |ISTRET.":..4.`..| 00000920: 3A 99 46 3B 22 20 53 54 59 43 4B 45 4E 22 3A 46 |:.F;" STYCKEN":F| 00000930: B2 30 3A 8E 00 60 11 D0 07 81 4A B2 31 A4 C3 28 |.0:..`....J.1..(| 00000940: 43 24 29 3A 58 24 B2 CA 28 43 24 2C 4A 2C 31 29 |C$):X$..(C$,J,1)| 00000950: 3A 8B 58 24 B2 22 30 22 A7 58 24 B2 22 31 31 22 |:.X$."0".X$."11"| 00000960: 00 7C 11 DA 07 8B C6 28 58 24 29 B3 34 38 B0 C6 |.|.....(X$).48..| 00000970: 28 58 24 29 B1 35 37 A7 32 30 35 30 00 B5 11 E4 |(X$).57.2050....| 00000980: 07 81 54 B2 31 A4 32 30 3A 82 3A 5A 41 B2 C5 28 |..T.1.20:.:ZA..(| 00000990: 58 24 29 AB 31 3A 59 25 B2 5A 41 AD 33 3A 43 25 |X$).1:Y%.ZA.3:C%| 000009A0: B2 5A 41 AB 33 AC 59 25 3A 97 53 4F AA 31 2C 51 |.ZA.3.Y%:.SO.1,Q| 000009B0: 57 28 59 25 29 00 EE 11 EE 07 97 53 4F 2C 51 5A |W(Y%)......SO,QZ| 000009C0: 28 59 25 29 3A 97 53 55 AA 31 2C 5A 57 28 43 25 |(Y%):.SU.1,ZW(C%| 000009D0: 29 3A 97 53 55 2C 5A 5A 28 43 25 29 3A 97 53 4F |):.SU,ZZ(C%):.SO| 000009E0: AA 34 2C 31 37 3A 97 53 55 AA 34 2C 31 37 00 FD |.4,17:.SU.4,17..| 000009F0: 11 F8 07 81 54 B2 31 A4 31 30 30 3A 82 00 16 12 |....T.1.100:....| 00000A00: 02 08 97 53 4F AA 34 2C 30 3A 97 53 55 AA 34 2C |...SO.4,0:.SU.4,| 00000A10: 30 3A 82 4A 3A 8E 00 00 00 |0:.J:.... |
..)...."............".14)"LADDAR IN NAMN ".O....A$(256,7):.53280,0:.53281,0:.".". .....I.0.2:.QZ(I),ZZ(I),QW(I),ZW(I):.I:. QZ(3),QW(3):SO.54272.F...SU.SO.7:.SO.24, 15:.SO.5,0:.SU.5,0:.SO.6,240:.SU.6,240.. ....93.1253052,107.908882,46,80,56.23311 62,222.575897,51,88,172.6008.0.(..63.647 1634,56,98,152.170801,62.R.2.N.0:.1,8,2, "0:TELREGDATA,S,R"...<.N.N.1:.I.1.7:.1,A $(N,I):.I:.A$(N,1).."END OF DATA".60...F . 1:N.N.1...P..I.1.7:.B$(I):.I...Z.." EFTERNAMN"," F\RNAMN"," PERSONN R.","BOSTADSADRESS".(._.." POSTADRESS" ," TELEFONNR."," ANM[RKNING"._.D..". ":..13)"R E G I S T E R":..13)"......... ......".X.X..:.:..15)"F1 - L[SA"......:. .15)"F3 - SKRIVA"......:..15)"F5 - RADER A".B....:..15)"F7 - [NDRA".Z. ..:..15)"F 2 - SPARA"......:..15)"F4 - SLUTA"...... :..15)"F6 - RINGA".%.H..A$:.A$.".".A$.". ".200.U.R..".":.F(A$).132.300,400,500,60 0,700,800,900...,.."L[SA":.:.1000:.F.0.. I.1.1000:.I:.100...6..:."SKA JAG RINGA"; A$:.H(A$,1)."N".100.E.@.C$.A$(I,6):.2000 :.310.U...."SKRIVA":.......I.1.7:C$(I)." -":.:.B$(I);:.C$(I):.I......I.1.N:.J.1.7 .:...A.C(C$(J)):.A.C(A$(I,J)).A.C(A$(I,J )).F....K.1.A:.J(C$(J),K,1).J(A$(I,J),K, 1).480...B..J(C$(J),K,1).J(A$(I,J),K,1). 490...L..L.N.1.I.1..1:.M.1.7:A$(L,M).A$( L.1,M):.M,L...V.N.N.1:.M.1.7:A$(I,M).C$( M):.M:.100......K,J......I:.470.$...."RA DERA":.:.1000:.F.0..I.1.1000:.I:.100.[.. ..:."VILL DU RADERA DENNA POST";A$:.H(A$ ,1)."N".100.....N.N.1:.J.I.N:.K.1.7:A$(J ,K).A$(J.1,K):.K,J:.100...X.."[NDRA":.:. 1000:.F.0..I.1.1000:.I:.100...B..:."VILL DU [NDRA I DENNA POST";A$:.H(A$,1)."N". 100...L..".":.J.1.7:.:.B$(J);./.V.P..(X) :." ";A$(I,J):.".".P);.H....C$(J):.J:.J .I.N:.K.1.7:A$(J,K).A$(J.1,K):.K,J:N.N.1 .Q....420......"SPARA":.:.1,8,15:.1,"S0: REGISTER-DATA": 1...F..1,8,2,"0:TELREGDA TA,S,W"...P..I.1.N:.J.1.7:.1,A$(I,J):.J, I...Z..1,"END OF DATA":.I.2.7:.1,"*":.I: 1:.100... ...:...A$."J":.".":."TELEFON- NUMMER";C$.P....2000:."SKALL JAG RINGA I GEN";A$:.H(A$,1)."J".910.Y....100......" DET FINNS";N;" POSTER."......:."SKRIV VA D DU VET OM PERSONEN."......I.1.7:S$(I). "-":.:.B$(I);:.S$(I):.I.....F.0:.I.1.N:. J.1.7:.S$(J)."-".1080.+....C(S$(J)).C(A$ (I,J)).1110.Z....K.1.C(S$(J)):A$.J(S$(J) ,K,1):.A$."?".1070.W.$..A$..J(A$(I,J),K, 1).1110.~....K...8..J:.".":F.F.1:.J.1.7: .A$(I,J).."-"..A$(I,J)...B..J:A$."J"...L ..:."SKALL JAG LETA EFTER FLER";A$:.H(A$ ,1)."N".....V..I:.F.0..:."FINNS EJ I REG ISTRET.":..4.`..:.F;" STYCKEN":F.0:..`.P ..J.1.C(C$):X$.J(C$,J,1):.X$."0".X$."11" .|.Z..F(X$).48.F(X$).57.2050......T.1.20 :.:ZA.E(X$).1:Y%.ZA.3:C%.ZA.3.Y%:.SO.1,Q W(Y%)......SO,QZ(Y%):.SU.1,ZW(C%):.SU,ZZ (C%):.SO.4,17:.SU.4,17......T.1.100:.... ...SO.4,0:.SU.4,0:.J:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL