ADRESBESTAND
FILE INFORMATION
FILENAME(S): ADRESBESTAND
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-11-30 21:05:47
APPEARS ON: 1 disk(s)
FILE HASH
1dbfda8fefdc88a12fc7918a5bcb3f99a04adc05e5efc4b54e2c2d9b5d8e048f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 0014A | ADRESBESTAND | PRG | DuncanTwain | 24 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 01 00 8F 20 41 44 52 45 53 42 45 53 |....... ADRESBES| 00000010: 54 41 4E 44 20 36 34 00 32 08 02 00 8F 20 44 4F |TAND 64.2.... DO| 00000020: 4F 52 20 54 4A 41 53 53 4F 20 52 4F 4F 53 53 49 |OR TJASSO ROOSSI| 00000030: 45 4E 00 4F 08 03 00 8F 20 47 52 4F 4E 49 4E 47 |EN.O.... GRONING| 00000040: 45 4E 20 2F 20 30 35 30 2D 31 33 35 36 36 34 00 |EN / 050-135664.| 00000050: 55 08 04 00 8F 00 9E 08 0A 00 97 35 33 32 38 31 |U..........53281| 00000060: 2C 31 31 3A 97 35 33 32 38 30 2C 31 33 3A 86 41 |,11:.53280,13:.A| 00000070: 24 28 31 30 30 29 2C 42 24 28 31 30 30 29 2C 43 |$(100),B$(100),C| 00000080: 24 28 31 30 30 29 2C 44 24 28 31 30 30 29 2C 45 |$(100),D$(100),E| 00000090: 24 28 31 30 30 29 2C 46 24 28 31 30 30 29 00 E8 |$(100),F$(100)..| 000000A0: 08 14 00 99 22 93 11 1D 05 22 3B 54 3B 22 41 44 |...."....";T;"AD| 000000B0: 52 45 53 53 45 4E 22 3A 4F 24 B2 22 93 4F 50 5A |RESSEN":O$.".OPZ| 000000C0: 4F 45 4B 45 4E 21 22 3A 49 24 B2 22 93 49 4E 56 |OEKEN!":I$.".INV| 000000D0: 4F 45 52 45 4E 21 22 3A 42 4C 24 B2 22 93 42 4C |OEREN!":BL$.".BL| 000000E0: 41 44 45 52 45 4E 21 22 00 2A 09 1E 00 99 22 11 |ADEREN!".*....".| 000000F0: 1D 31 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 41 44 52 45 |.1..........ADRE| 00000100: 53 20 49 4E 56 4F 45 52 45 4E 22 3A 99 22 11 1D |S INVOEREN":."..| 00000110: 32 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 41 44 52 45 53 |2..........ADRES| 00000120: 20 4F 50 5A 4F 45 4B 45 4E 22 00 6C 09 28 00 99 | OPZOEKEN".l.(..| 00000130: 22 11 1D 33 2E 2E 2E 42 4C 41 44 45 52 45 4E 20 |"..3...BLADEREN | 00000140: 44 4F 4F 52 20 42 45 53 54 41 4E 44 22 3A 99 22 |DOOR BESTAND":."| 00000150: 11 1D 34 2E 2E 2E 2E 2E 4F 50 53 4C 41 41 4E 20 |..4.....OPSLAAN | 00000160: 56 41 4E 20 42 45 53 54 41 4E 44 22 00 AE 09 32 |VAN BESTAND"...2| 00000170: 00 99 22 11 1D 35 2E 2E 2E 2E 2E 2E 2E 4C 41 44 |.."..5.......LAD| 00000180: 45 4E 20 56 41 4E 20 42 45 53 54 41 4E 44 22 3A |EN VAN BESTAND":| 00000190: 99 22 11 1D 36 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |."..6...........| 000001A0: 2E 2E 2E 2E 2E 2E 50 52 49 4E 54 45 4E 22 00 F0 |......PRINTEN"..| 000001B0: 09 3C 00 99 22 11 1D 37 2E 2E 2E 2E 2E 2E 2E 2E |.<.."..7........| 000001C0: 2E 2E 2E 2E 2E 2E 2E 2E 47 45 48 45 55 47 45 4E |........GEHEUGEN| 000001D0: 22 3A 99 22 11 1D 38 2E 2E 2E 2E 2E 2E 2E 2E 2E |":."..8.........| 000001E0: 2E 2E 2E 2E 2E 2E 2E 2E 53 54 4F 50 50 45 4E 22 |........STOPPEN"| 000001F0: 00 37 0A 46 00 99 22 11 11 4B 45 55 5A 45 21 22 |.7.F.."..KEUZE!"| 00000200: 3A 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 |:.198,0:.198,1:.| 00000210: 51 3A 91 51 8D 38 30 2C 31 32 30 2C 31 35 30 2C |Q:.Q.80,120,150,| 00000220: 31 38 30 2C 32 32 30 2C 32 36 30 2C 32 39 30 2C |180,220,260,290,| 00000230: 33 31 30 3A 89 32 30 00 79 0A 50 00 54 B2 54 AA |310:.20.y.P.T.T.| 00000240: 31 3A 99 49 24 3A 85 22 11 11 41 43 48 54 45 52 |1:.I$:."..ACHTER| 00000250: 4E 41 41 4D 22 3B 41 24 28 54 29 3A 85 22 11 56 |NAAM";A$(T):.".V| 00000260: 4F 4F 52 4E 41 41 4D 22 3B 42 24 28 54 29 3A 99 |OORNAAM";B$(T):.| 00000270: 22 11 41 44 52 45 53 22 3B 00 BB 0A 5A 00 85 43 |".ADRES";...Z..C| 00000280: 24 28 54 29 3A 85 22 11 50 4F 53 54 43 4F 44 45 |$(T):.".POSTCODE| 00000290: 22 3B 44 24 28 54 29 3A 85 22 11 57 4F 4F 4E 50 |";D$(T):.".WOONP| 000002A0: 4C 41 41 54 53 22 3B 45 24 28 54 29 3A 99 22 11 |LAATS";E$(T):.".| 000002B0: 54 45 4C 4E 55 4D 4D 45 52 22 3B 00 F2 0A 64 00 |TELNUMMER";...d.| 000002C0: 85 46 24 28 54 29 3A 99 22 11 11 4F 4B 20 5A 4F |.F$(T):."..OK ZO| 000002D0: 28 4A 2F 4E 29 22 3A 97 31 39 38 2C 30 3A 92 31 |(J/N)":.198,0:.1| 000002E0: 39 38 2C 31 3A A1 51 24 3A 8B 51 24 B2 22 4A 22 |98,1:.Q$:.Q$."J"| 000002F0: A7 8E 00 00 0B 6E 00 54 B2 54 AB 31 3A 89 38 30 |.....n.T.T.1:.80| 00000300: 00 38 0B 78 00 99 4F 24 3A 85 22 11 11 57 45 4C |.8.x..O$:."..WEL| 00000310: 4B 45 20 41 43 48 54 45 52 4E 41 41 4D 22 3B 5A |KE ACHTERNAAM";Z| 00000320: 24 3A 81 58 B2 31 A4 54 3A 8B 41 24 28 58 29 B3 |$:.X.1.T:.A$(X).| 00000330: B1 5A 24 A7 82 58 3A 8E 00 61 0B 82 00 99 22 93 |.Z$..X:..a....".| 00000340: 11 11 22 3B 42 24 2C 41 24 3A 99 22 11 22 43 24 |..";B$,A$:."."C$| 00000350: 3A 99 22 11 22 44 24 2C 45 24 3A 99 22 11 22 46 |:."."D$,E$:."."F| 00000360: 24 00 8C 0B 8C 00 99 22 11 11 44 52 55 4B 20 45 |$......"..DRUK E| 00000370: 45 4E 20 54 4F 45 54 53 22 3A 97 31 39 38 2C 30 |EN TOETS":.198,0| 00000380: 3A 92 31 39 38 2C 31 3A 82 58 3A 8E 00 C7 0B 96 |:.198,1:.X:.....| 00000390: 00 81 53 B2 31 A4 54 3A 99 42 4C 24 3A 99 22 11 |..S.1.T:.BL$:.".| 000003A0: 11 41 43 48 54 45 52 4E 41 41 4D 20 22 3B 41 24 |.ACHTERNAAM ";A$| 000003B0: 28 53 29 3A 99 22 11 56 4F 4F 52 4E 41 41 4D 20 |(S):.".VOORNAAM | 000003C0: 22 3B 42 24 28 53 29 00 0D 0C A0 00 99 22 11 41 |";B$(S)......".A| 000003D0: 44 52 45 53 20 22 3B 43 24 28 53 29 3A 99 22 11 |DRES ";C$(S):.".| 000003E0: 57 4F 4F 4E 50 4C 41 41 54 53 20 22 3B 44 24 28 |WOONPLAATS ";D$(| 000003F0: 53 29 2C 45 24 28 53 29 3A 99 22 11 54 45 4C 2E |S),E$(S):.".TEL.| 00000400: 4E 55 4D 4D 45 52 22 3B 46 24 28 53 29 00 38 0C |NUMMER";F$(S).8.| 00000410: AA 00 99 22 11 11 44 52 55 4B 20 45 45 4E 20 54 |..."..DRUK EEN T| 00000420: 4F 45 54 53 22 3A 97 31 39 38 2C 30 3A 92 31 39 |OETS":.198,0:.19| 00000430: 38 2C 31 3A 82 53 3A 8E 00 78 0C B4 00 99 22 93 |8,1:.S:..x....".| 00000440: 53 41 56 45 4E 21 22 3A 99 22 11 11 44 52 55 4B |SAVEN!":."..DRUK| 00000450: 20 4F 50 20 54 4F 45 54 53 20 41 4C 53 20 43 41 | OP TOETS ALS CA| 00000460: 53 53 45 54 54 45 20 4B 4C 41 41 52 20 49 53 2E |SSETTE KLAAR IS.| 00000470: 22 3A 97 31 39 38 2C 30 00 B2 0C BE 00 92 31 39 |":.198,0......19| 00000480: 38 2C 31 3A 9F 31 2C 31 2C 32 2C 22 41 44 20 46 |8,1:.1,1,2,"AD F| 00000490: 49 4C 45 22 3A 98 31 2C 54 3A 81 53 B2 31 A4 54 |ILE":.1,T:.S.1.T| 000004A0: 3A 98 31 2C 41 24 28 53 29 3A 98 31 2C 42 24 28 |:.1,A$(S):.1,B$(| 000004B0: 53 29 00 E0 0C C8 00 98 31 2C 43 24 28 53 29 3A |S)......1,C$(S):| 000004C0: 98 31 2C 44 24 28 53 29 3A 98 31 2C 45 24 28 53 |.1,D$(S):.1,E$(S| 000004D0: 29 3A 98 31 2C 46 24 28 53 29 3A 82 53 3A A0 31 |):.1,F$(S):.S:.1| 000004E0: 00 23 0D D2 00 99 22 11 4B 4C 41 41 52 21 21 22 |.#....".KLAAR!!"| 000004F0: 3A 44 52 55 4B 20 45 45 4E 20 A4 45 54 53 20 56 |:DRUK EEN .ETS V| 00000500: 4F B0 20 4D 45 4E 55 22 3A 50 4F 4B 45 31 39 38 |O. MENU":POKE198| 00000510: 2C 30 3A 57 41 49 54 31 39 38 2C 31 3A 52 45 54 |,0:WAIT198,1:RET| 00000520: 55 52 4E 00 63 0D DC 00 99 22 93 4C 41 44 45 4E |URN.c....".LADEN| 00000530: 21 22 3A 99 22 11 11 44 52 55 4B 20 4F 50 20 54 |!":."..DRUK OP T| 00000540: 4F 45 54 53 20 41 4C 53 20 43 41 53 53 45 54 54 |OETS ALS CASSETT| 00000550: 45 20 4B 4C 41 41 52 20 49 53 2E 22 3A 97 31 39 |E KLAAR IS.":.19| 00000560: 38 2C 30 00 9D 0D E6 00 92 31 39 38 2C 31 3A 9F |8,0......198,1:.| 00000570: 31 2C 31 2C 30 2C 22 41 44 20 46 49 4C 45 22 3A |1,1,0,"AD FILE":| 00000580: 84 31 2C 54 3A 81 53 B2 31 A4 54 3A 84 31 2C 41 |.1,T:.S.1.T:.1,A| 00000590: 24 28 53 29 3A 84 31 2C 42 24 28 53 29 00 CB 0D |$(S):.1,B$(S)...| 000005A0: F0 00 84 31 2C 43 24 28 53 29 3A 84 31 2C 44 24 |...1,C$(S):.1,D$| 000005B0: 28 53 29 3A 84 31 2C 45 24 28 53 29 3A 84 31 2C |(S):.1,E$(S):.1,| 000005C0: 46 24 28 53 29 3A 82 53 3A A0 31 00 0E 0E FA 00 |F$(S):.S:.1.....| 000005D0: 99 22 11 4B 4C 41 41 52 21 21 22 3A 44 52 55 4B |.".KLAAR!!":DRUK| 000005E0: 20 45 45 4E 20 A4 45 54 53 20 56 4F B0 20 4D 45 | EEN .ETS VO. ME| 000005F0: 4E 55 22 3A 50 4F 4B 45 31 39 38 2C 30 3A 57 41 |NU":POKE198,0:WA| 00000600: 49 54 31 39 38 2C 31 3A 52 45 54 55 52 4E 00 47 |IT198,1:RETURN.G| 00000610: 0E 04 01 99 22 93 22 3A 85 22 11 11 57 45 4C 4B |....".":."..WELK| 00000620: 45 20 41 43 48 54 45 52 4E 41 41 4D 22 3B 50 24 |E ACHTERNAAM";P$| 00000630: 3A 81 58 B2 31 A4 54 3A 8B 41 24 28 58 29 B3 B1 |:.X.1.T:.A$(X)..| 00000640: 50 24 A7 82 58 3A 8E 00 6E 0E 0E 01 9F 34 2C 34 |P$..X:..n....4,4| 00000650: 3A 9D 34 3A 98 34 2C 42 24 28 58 29 2C 41 24 28 |:.4:.4,B$(X),A$(| 00000660: 58 29 3A 98 34 3A 98 34 2C 43 24 28 58 29 00 9B |X):.4:.4,C$(X)..| 00000670: 0E 18 01 98 34 3A 98 34 2C 44 24 28 58 29 2C 45 |....4:.4,D$(X),E| 00000680: 24 28 58 29 3A 98 34 3A 98 34 2C 46 24 28 58 29 |$(X):.4:.4,F$(X)| 00000690: 3A 98 34 3A A0 34 3A 82 58 3A 8E 00 DD 0E 22 01 |:.4:.4:.X:....".| 000006A0: 99 22 93 11 11 47 45 48 45 55 47 45 4E 21 22 3A |."...GEHEUGEN!":| 000006B0: 99 22 11 11 41 41 4E 54 41 4C 20 56 52 49 4A 45 |."..AANTAL VRIJE| 000006C0: 20 47 45 48 45 55 47 45 4E 50 4C 41 41 54 53 45 | GEHEUGENPLAATSE| 000006D0: 4E 20 3A 20 22 3B B6 28 B8 28 30 29 29 00 06 0F |N : ";.(.(0))...| 000006E0: 2C 01 99 22 11 11 44 52 55 4B 20 45 45 4E 20 54 |,.."..DRUK EEN T| 000006F0: 4F 45 54 53 21 22 3A 97 31 39 38 2C 30 3A 92 31 |OETS!":.198,0:.1| 00000700: 39 38 2C 31 3A 8E 00 47 0F 36 01 99 22 93 11 11 |98,1:..G.6.."...| 00000710: 53 54 4F 50 50 45 4E 21 22 3A 99 22 48 45 45 46 |STOPPEN!":."HEEF| 00000720: 54 20 55 20 48 45 54 20 42 45 53 54 41 4E 44 20 |T U HET BESTAND | 00000730: 47 45 53 41 56 45 44 3F 22 3A 97 31 39 38 2C 30 |GESAVED?":.198,0| 00000740: 3A 92 31 39 38 2C 31 00 67 0F 40 01 A1 51 24 3A |:.198,1.g.@..Q$:| 00000750: 8B 51 24 B2 22 4A 22 A7 99 22 93 54 4F 54 20 5A |.Q$."J"..".TOT Z| 00000760: 49 45 4E 53 22 3A 80 00 9B 0F 4A 01 99 22 11 11 |IENS":....J.."..| 00000770: 44 41 4E 20 4D 4F 45 54 20 55 20 44 41 54 20 4E |DAN MOET U DAT N| 00000780: 4F 47 20 45 56 45 4E 20 44 4F 45 4E 22 3A 81 45 |OG EVEN DOEN":.E| 00000790: B2 31 A4 31 35 30 30 3A 82 3A 8E 00 00 00 34 FB |.1.1500:.:....4.| 000007A0: 00 |. |
....... ADRESBESTAND 64.2.... DOOR TJASS O ROOSSIEN.O.... GRONINGEN / 050-135664. U..........53281,11:.53280,13:.A$(100),B $(100),C$(100),D$(100),E$(100),F$(100).. ...."....";T;"ADRESSEN":O$.".OPZOEKEN!": I$.".INVOEREN!":BL$.".BLADEREN!".*....". .1..........ADRES INVOEREN":."..2....... ...ADRES OPZOEKEN".L.(.."..3...BLADEREN DOOR BESTAND":."..4.....OPSLAAN VAN BEST AND"...2.."..5.......LADEN VAN BESTAND": ."..6.................PRINTEN"...<.."..7 ................GEHEUGEN":."..8......... ........STOPPEN".7.F.."..KEUZE!":.198,0: .198,1:.Q:.Q.80,120,150,180,220,260,290, 310:.20.Y.P.T.T.1:.I$:."..ACHTERNAAM";A$ (T):.".VOORNAAM";B$(T):.".ADRES";...Z..C $(T):.".POSTCODE";D$(T):.".WOONPLAATS";E $(T):.".TELNUMMER";...D..F$(T):."..OK ZO (J/N)":.198,0:.198,1:.Q$:.Q$."J".....N.T .T.1:.80.8.X..O$:."..WELKE ACHTERNAAM";Z $:.X.1.T:.A$(X)..Z$..X:..A...."...";B$,A $:."."C$:."."D$,E$:."."F$......"..DRUK E EN TOETS":.198,0:.198,1:.X:..G....S.1.T: .BL$:."..ACHTERNAAM ";A$(S):.".VOORNAAM ";B$(S)... ..".ADRES ";C$(S):.".WOONPLAA TS ";D$(S),E$(S):.".TEL.NUMMER";F$(S).8. ..."..DRUK EEN TOETS":.198,0:.198,1:.S:. .X....".SAVEN!":."..DRUK OP TOETS ALS CA SSETTE KLAAR IS.":.198,0......198,1:.1,1 ,2,"AD FILE":.1,T:.S.1.T:.1,A$(S):.1,B$( S)...H..1,C$(S):.1,D$(S):.1,E$(S):.1,F$( S):.S: 1.#.R..".KLAAR!!":DRUK EEN .ETS V O. MENU":POKE198,0:WAIT198,1:RETURN.C... .".LADEN!":."..DRUK OP TOETS ALS CASSETT E KLAAR IS.":.198,0......198,1:.1,1,0,"A D FILE":.1,T:.S.1.T:.1,A$(S):.1,B$(S).K. ...1,C$(S):.1,D$(S):.1,E$(S):.1,F$(S):.S : 1......".KLAAR!!":DRUK EEN .ETS VO. ME NU":POKE198,0:WAIT198,1:RETURN.G....".": ."..WELKE ACHTERNAAM";P$:.X.1.T:.A$(X).. P$..X:..N....4,4:.4:.4,B$(X),A$(X):.4:.4 ,C$(X)......4:.4,D$(X),E$(X):.4:.4,F$(X) :.4: 4:.X:....".."...GEHEUGEN!":."..AANT AL VRIJE GEHEUGENPLAATSEN : ";.(.(0))... ,.."..DRUK EEN TOETS!":.198,0:.198,1:..G .6.."...STOPPEN!":."HEEFT U HET BESTAND GESAVED?":.198,0:.198,1.G.@..Q$:.Q$."J". .".TOT ZIENS":....J.."..DAN MOET U DAT N OG EVEN DOEN":.E.1.1500:.:....4..
> CLICK IMAGE PREVIEW FOR FULL MODAL