SSIMUL╭   
FILE INFORMATION
FILENAME(S): SSIMUL╭   
FILE TYPE(S): SEQ
FILE SIZE: 4.8K
FIRST SEEN: 2025-12-02 02:15:42
APPEARS ON: 1 disk(s)
FILE HASH
62bef4a6d5d75fba11cd448a06a2bccb14e28bb365178fc449bed1a60d611f73
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BAMIGA SECTOR 1 | SSIMUL╭    | SEQ | The BAM Archive | 21 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 74 6B 74 66 6F 75 74 20 20 20 1D 13 12 80 1E |.tktfout .....|
00000010: 12 00 0A 14 00 F1 77 61 63 68 74 65 6E 3D 38 31 |......wachten=81|
00000020: 30 30 0E 00 00 A4 1F 00 0D 00 14 11 00 F1 6D 65 |00............me|
00000030: 6E 75 3D 39 30 30 30 0E 00 00 28 23 00 0D 00 1E |nu=9000...(#....|
00000040: 16 00 F1 70 72 69 6E 74 6E 61 61 6D 3D 38 33 30 |...printnaam=830|
00000050: 30 0E 00 00 6C 20 00 0D 00 28 0D 00 F1 74 65 6C |0...l ...(...tel|
00000060: 3D 30 0E 00 00 00 00 00 0D 00 5A 02 00 FB 0D 00 |=0........Z.....|
00000070: 64 68 00 F5 AD 35 0E 00 00 05 00 00 3B 22 70 72 |dh...5......;"pr|
00000080: 6F 67 72 61 6D 6D 61 20 69 6E 72 69 63 68 74 65 |ogramma inrichte|
00000090: 6E 2E 22 27 27 27 3A F5 22 48 6F 65 76 65 65 6C |n."''':."Hoeveel|
000000A0: 20 6E 61 6D 65 6E 20 3F 20 20 22 3B 3A EE 61 61 | namen ? ";:.aa|
000000B0: 6E 74 6E 61 6D 65 6E 3A F5 61 61 6E 74 6E 61 6D |ntnamen:.aantnam|
000000C0: 65 6E 3A E9 6E 24 28 61 61 6E 74 6E 61 6D 65 6E |en:.n$(aantnamen|
000000D0: 2C 35 36 0E 00 00 38 00 00 29 0D 00 78 7B 00 F5 |,56...8..)..x{..|
000000E0: 22 55 69 74 20 68 6F 65 76 65 65 6C 20 6B 65 6E |"Uit hoeveel ken|
000000F0: 6E 69 73 73 65 6E 6B 72 69 6E 67 65 6E 20 3F 20 |nissenkringen ? |
00000100: 22 3B 3A EE 61 61 6E 74 73 65 74 73 3A F5 61 61 |";:.aantsets:.aa|
00000110: 6E 74 73 65 74 73 3A E9 73 24 28 61 61 6E 74 6E |ntsets:.s$(aantn|
00000120: 61 6D 65 6E 2C 61 61 6E 74 73 65 74 73 29 3A E9 |amen,aantsets):.|
00000130: 6F 24 28 61 61 6E 74 73 65 74 73 2C 31 35 0E 00 |o$(aantsets,15..|
00000140: 00 0F 00 00 29 3A EB 6E 3D 31 0E 00 00 01 00 00 |....):.n=1......|
00000150: CC 61 61 6E 74 73 65 74 73 0D 00 8C A7 00 F5 22 |.aantsets......"|
00000160: 4B 72 69 6E 67 6E 61 61 6D 20 22 3B 6E 3B 22 20 |Kringnaam ";n;" |
00000170: 20 22 3B 3A EE 6F 24 28 6E 29 3A F5 6F 24 28 6E | ";:.o$(n):.o$(n|
00000180: 29 3A F3 6E 3A F5 3A F5 3A F5 22 48 6F 65 76 65 |):.n:.:.:."Hoeve|
00000190: 65 6C 20 76 65 72 73 63 68 69 6C 6C 65 6E 64 65 |el verschillende|
000001A0: 20 77 6F 6F 6E 70 6C 61 61 74 73 20 65 6E 20 67 | woonplaats en g|
000001B0: 61 20 6A 65 20 69 6E 76 6F 65 72 65 6E 20 3F 20 |a je invoeren ? |
000001C0: 22 3A EE 61 61 6E 74 77 6F 6F 6E 70 6C 3A FA 28 |":.aantwoonpl:.(|
000001D0: C3 61 61 6E 74 77 6F 6F 6E 70 6C 3D 30 0E 00 00 |.aantwoonpl=0...|
000001E0: 00 00 00 C5 61 61 6E 74 77 6F 6F 6E 70 6C 3E 32 |....aantwoonpl>2|
000001F0: 35 35 0E 00 00 FF 00 00 29 CB EC 32 30 30 0E 00 |55......)..200..|
00000200: 00 C8 00 00 0D 03 E8 3E 00 FB 3A F5 AD 38 0E 00 |.......>..:..8..|
00000210: 00 08 00 00 3B 22 4E 61 6D 65 6E 20 69 6E 76 6F |....;"Namen invo|
00000220: 65 72 65 6E 2E 22 2C 2C 2C 2C 2C 3A ED 38 30 30 |eren.",,,,,:.800|
00000230: 30 0E 00 00 40 1F 00 3A FA 6E 3E 61 61 6E 74 6E |0...@..:.n>aantn|
00000240: 61 6D 65 6E CB FE 0D 03 F2 42 00 F5 22 4E 61 61 |amen.....B.."Naa|
00000250: 6D 22 3A F5 22 53 74 72 61 61 74 2B 6E 72 22 3A |m":."Straat+nr":|
00000260: F5 22 50 6F 73 74 63 6F 64 65 22 3A F5 22 57 6F |."Postcode":."Wo|
00000270: 6F 6E 70 6C 61 61 74 73 22 3A F5 22 54 65 6C 65 |onplaats":."Tele|
00000280: 66 6F 6F 6E 20 6E 72 22 3A EE 69 24 0D 04 30 5D |foon nr":.i$..0]|
00000290: 00 FA 69 24 3D 22 6D 65 6E 75 22 CB FE 3A F1 6E |..i$="menu"..:.n|
000002A0: 24 28 6E 2C CC 31 35 0E 00 00 0F 00 00 29 3D 69 |$(n,.15......)=i|
000002B0: 24 3A F5 AC 33 0E 00 00 03 00 00 2C 31 32 0E 00 |$:..3......,12..|
000002C0: 00 0C 00 00 3B 6E 24 28 6E 2C CC 31 35 0E 00 00 |....;n$(n,.15...|
000002D0: 0F 00 00 29 3A EE 6E 24 28 6E 2C 31 36 0E 00 00 |...):.n$(n,16...|
000002E0: 10 00 00 CC 33 36 0E 00 00 24 00 00 29 0D 04 3D |....36...$..)..=|
000002F0: C1 00 F5 AC 34 0E 00 00 04 00 00 2C 31 32 0E 00 |....4......,12..|
00000300: 00 0C 00 00 3B 6E 24 28 6E 2C 31 36 0E 00 00 10 |....;n$(n,16....|
00000310: 00 00 CC 33 35 0E 00 00 23 00 00 29 3A EE 6E 24 |...35...#..):.n$|
00000320: 28 6E 2C 33 37 0E 00 00 25 00 00 CC 34 34 0E 00 |(n,37...%...44..|
00000330: 00 2C 00 00 29 3A F5 6E 24 28 6E 2C 33 37 0E 00 |.,..):.n$(n,37..|
00000340: 00 25 00 00 CC 34 34 0E 00 00 2C 00 00 29 3A E9 |.%...44...,..):.|
00000350: 64 24 28 32 30 0E 00 00 14 00 00 29 3A EE 64 24 |d$(20......):.d$|
00000360: 3A ED 38 34 30 30 0E 00 00 D0 20 00 3A FA 77 3E |:.8400.... .:.w>|
00000370: 61 61 6E 74 77 6F 6F 6E 70 6C CB FE 3A F1 6E 24 |aantwoonpl..:.n$|
00000380: 28 6E 2C 34 35 0E 00 00 2D 00 00 29 3D C2 77 3A |(n,45...-..)=.w:|
00000390: F1 77 24 28 77 29 3D 64 24 3A F5 AC 36 0E 00 00 |.w$(w)=d$:..6...|
000003A0: 06 00 00 2C 31 32 0E 00 00 0C 00 00 3B 77 24 28 |...,12......;w$(|
000003B0: 77 29 0D 04 56 70 00 EE 6E 24 28 6E 2C 34 36 0E |w)..Vp..n$(n,46.|
000003C0: 00 00 2E 00 00 CC 35 36 0E 00 00 38 00 00 29 3A |......56...8..):|
000003D0: F5 AC 37 0E 00 00 07 00 00 2C 31 32 0E 00 00 0C |..7......,12....|
000003E0: 00 00 3B 6E 24 28 6E 2C 34 36 0E 00 00 2E 00 00 |..;n$(n,46......|
000003F0: CC 35 36 0E 00 00 38 00 00 29 3A F5 3A F5 3A EB |.56...8..):.:.:.|
00000400: 6D 3D 31 0E 00 00 01 00 00 CC 61 61 6E 74 73 65 |m=1.......aantse|
00000410: 74 73 3A F5 6F 24 28 6D 29 3B 22 20 6A 2F 6E 20 |ts:.o$(m);" j/n |
00000420: 22 3B 3A EE 69 24 0D 04 CE 1E 00 FA C3 28 69 24 |";:.i$.......(i$|
00000430: 3D 22 6A 22 C5 69 24 3D 22 6E 22 29 CB EC 31 39 |="j".i$="n")..19|
00000440: 30 30 0E 00 00 6C 07 00 0D 07 8A 7B 00 FA 69 24 |00...l.....{..i$|
00000450: 3D 22 6E 22 CB FE 3A EC 31 30 30 30 0E 00 00 E8 |="n"..:.1000....|
00000460: 03 00 3A FB 3A F5 AD 35 0E 00 00 05 00 00 3B 22 |..:.:..5......;"|
00000470: 47 65 67 65 76 65 6E 73 20 77 69 6A 7A 69 67 65 |Gegevens wijzige|
00000480: 6E 22 3A F1 74 65 6C 3D 30 0E 00 00 00 00 00 3A |n":.tel=0......:|
00000490: ED 33 30 32 30 0E 00 00 CC 0B 00 3A FA 69 24 3D |.3020......:.i$=|
000004A0: 22 6D 65 6E 75 22 CB FE 3A FA 74 65 6C 3E 31 0E |"menu"..:.tel>1.|
000004B0: 00 00 01 00 00 CB EC 32 30 30 30 0E 00 00 D0 07 |.......2000.....|
000004C0: 00 3A F1 6E 3D 6E 6E 0D 08 02 47 00 F5 3A F5 22 |.:.n=nn...G..:."|
000004D0: 4E 61 61 6D 22 3A F5 22 53 74 72 61 61 74 20 2B |Naam":."Straat +|
000004E0: 20 6E 72 2E 22 3A F5 22 50 6F 73 74 63 6F 64 65 | nr.":."Postcode|
000004F0: 22 3A F5 22 57 6F 6F 6E 70 6C 61 61 74 73 22 3A |":."Woonplaats":|
00000500: F5 22 54 65 6C 65 66 6F 6F 6E 20 6E 72 22 3A EE |."Telefoon nr":.|
00000510: 69 24 0D 08 7C 1B 00 FA 69 24 C9 22 22 CB F1 6E |i$..|...i$.""..n|
00000520: 24 28 6E 2C CC 31 35 0E 00 00 0F 00 00 29 3D 69 |$(n,.15......)=i|
00000530: 24 0D 08 7F 77 00 F5 AC 31 32 0E 00 00 0C 00 00 |$...w...12......|
00000540: 2C 31 32 0E 00 00 0C 00 00 3B 6E 24 28 6E 2C CC |,12......;n$(n,.|
00000550: 31 35 0E 00 00 0F 00 00 29 3A EE 69 24 3A FA 69 |15......):.i$:.i|
00000560: 24 C9 22 22 CB F1 6E 24 28 6E 2C 31 36 0E 00 00 |$.""..n$(n,16...|
00000570: 10 00 00 CC 33 36 0E 00 00 24 00 00 29 3D 69 24 |....36...$..)=i$|
00000580: 3A F5 AC 31 33 0E 00 00 0D 00 00 2C 31 32 0E 00 |:..13......,12..|
00000590: 00 0C 00 00 3B 6E 24 28 6E 2C 31 36 0E 00 00 10 |....;n$(n,16....|
000005A0: 00 00 CC 33 35 0E 00 00 23 00 00 29 0D 08 8E 5E |...35...#..)...^|
000005B0: 00 EE 69 24 3A FA 69 24 C9 22 22 CB F1 6E 24 28 |..i$:.i$.""..n$(|
000005C0: 6E 2C 33 37 0E 00 00 25 00 00 CC 34 34 0E 00 00 |n,37...%...44...|
000005D0: 2C 00 00 29 3D 69 24 3A F5 AC 31 34 0E 00 00 0E |,..)=i$:..14....|
000005E0: 00 00 2C 31 32 0E 00 00 0C 00 00 3B 6E 24 28 6E |..,12......;n$(n|
000005F0: 2C 33 37 0E 00 00 25 00 00 CC 34 34 0E 00 00 2C |,37...%...44...,|
00000600: 00 00 29 3A EE 69 24 3A F1 64 24 3D 69 24 0D 08 |..):.i$:.d$=i$..|
00000610: 99 62 00 FA 69 24 3D 22 22 CB F1 64 24 3D 77 24 |.b..i$=""..d$=w$|
00000620: 28 AF 6E 24 28 6E 2C 34 35 0E 00 00 2D 00 00 29 |(.n$(n,45...-..)|
00000630: 29 3A ED 38 34 30 30 0E 00 00 D0 20 00 3A F1 6E |):.8400.... .:.n|
00000640: 24 28 6E 2C 34 35 0E 00 00 2D 00 00 29 3D C2 77 |$(n,45...-..)=.w|
00000650: 3A F1 77 24 28 77 29 3D 64 24 3A F5 AC 31 35 0E |:.w$(w)=d$:..15.|
00000660: 00 00 0F 00 00 2C 31 32 0E 00 00 0C 00 00 3B 77 |.....,12......;w|
00000670: 24 28 77 29 0D 08 A2 A1 00 EE 69 24 3A FA 69 24 |$(w)......i$:.i$|
00000680: C9 22 22 CB F1 6E 24 28 6E 2C 34 36 0E 00 00 2E |.""..n$(n,46....|
00000690: 00 00 CC 35 36 0E 00 00 38 00 00 29 3D 69 24 3A |...56...8..)=i$:|
000006A0: F5 AC 31 36 0E 00 00 10 00 00 2C 31 32 0E 00 00 |..16......,12...|
000006B0: 0C 00 00 3B 6E 24 28 6E 2C 34 36 0E 00 00 2E 00 |...;n$(n,46.....|
000006C0: 00 CC 35 36 0E 00 00 38 00 00 29 3A F5 3A ED 77 |..56...8..):.:.w|
000006D0: 61 63 68 74 65 6E 3A EB 6D 3D 31 32 0E 00 00 0C |achten:.m=12....|
000006E0: 00 00 CC 31 36 0E 00 00 10 00 00 3A F5 AC 6D 2C |...16......:..m,|
000006F0: 30 0E 00 00 00 00 00 3B 22 20 20 20 20 20 20 20 |0......;" |
00000700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000710: 20 20 20 20 20 20 20 20 22 0D 08 C4 44 00 F3 6D | "...D..m|
00000720: 3A F5 AC 31 32 0E 00 00 0C 00 00 2C 30 0E 00 00 |:..12......,0...|
00000730: 00 00 00 3B 3A EB 6D 3D 31 0E 00 00 01 00 00 CC |...;:.m=1.......|
00000740: 61 61 6E 74 73 65 74 73 3A F5 6F 24 28 6D 29 3B |aantsets:.o$(m);|
00000750: 22 20 6A 2F 6E 20 6F 66 20 72 65 74 75 72 6E 22 |" j/n of return"|
00000760: 3B 0D 08 E8 35 00 EE 69 24 3A FA 69 24 3D 22 22 |;...5..i$:.i$=""|
00000770: CB EC 32 33 32 30 0E 00 00 10 09 00 3A FA C3 28 |..2320......:..(|
00000780: 69 24 3D 22 6A 22 C5 69 24 3D 22 6E 22 29 CB EC |i$="j".i$="n")..|
00000790: 32 32 38 30 0E 00 00 E8 08 00 0D 09 06 3B 00 F1 |2280.........;..|
000007A0: 73 24 28 6E 2C 6D 29 3D 69 24 3A F5 69 24 3A F3 |s$(n,m)=i$:.i$:.|
000007B0: 6D 3A F5 3A F5 22 47 65 77 69 6A 7A 69 67 64 2E |m:.:."Gewijzigd.|
000007C0: 22 3A ED 77 61 63 68 74 65 6E 3A ED 77 61 63 68 |":.wachten:.wach|
000007D0: 74 65 6E 3A EC 6D 65 6E 75 0D 0B B8 73 00 FB 3A |ten:.menu...s..:|
000007E0: F5 AD 38 0E 00 00 08 00 00 3B 22 5A 6F 65 6B 65 |..8......;"Zoeke|
000007F0: 6E 20 6F 70 20 6E 61 61 6D 22 3A F5 2C 2C 2C 2C |n op naam":.,,,,|
00000800: 22 57 65 6C 6B 65 20 6E 61 61 6D 20 6F 66 20 67 |"Welke naam of g|
00000810: 65 64 65 65 6C 74 65 20 76 61 6E 20 77 65 6C 6B |edeelte van welk|
00000820: 65 20 6E 61 61 6D 20 3F 22 3A F1 74 65 6C 3D 30 |e naam ?":.tel=0|
00000830: 0E 00 00 00 00 00 3A EE 69 24 3A FA 69 24 3D 22 |......:.i$:.i$="|
00000840: 6D 65 6E 75 22 CB FE 3A FA 69 24 3D 22 22 CB FE |menu"..:.i$=""..|
00000850: 0D 0B DB 2F 00 F5 AC 32 30 0E 00 00 14 00 00 2C |.../...20......,|
00000860: 30 0E 00 00 00 00 00 3B 22 20 20 20 20 20 20 20 |0......;" |
00000870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000880: 20 20 22 0D 0B DD A1 00 F5 AC 35 0E 00 00 05 00 | ".......5.....|
00000890: 00 2C 30 0E 00 00 00 00 00 3B 3A FA B1 69 24 3C |.,0......;:..i$<|
000008A0: 31 36 0E 00 00 10 00 00 CB EC 33 31 30 30 0E 00 |16........3100..|
000008B0: 00 1C 0C 00 3A F5 AC 32 30 0E 00 00 14 00 00 2C |....:..20......,|
000008C0: 30 0E 00 00 00 00 00 3B 22 4F 70 67 65 67 65 76 |0......;"Opgegev|
000008D0: 65 6E 20 6E 61 61 6D 20 69 73 20 74 65 20 6C 61 |en naam is te la|
000008E0: 6E 67 22 3A EC 31 39 31 30 0E 00 00 76 07 00 3A |ng":.1910...v..:|
000008F0: EB 6E 3D 31 0E 00 00 01 00 00 CC 61 61 6E 74 6E |.n=1.......aantn|
00000900: 61 6D 65 6E 3A FA 6E 24 28 6E 2C 31 2E 0E 00 00 |amen:.n$(n,1....|
00000910: 01 00 00 CC 28 B1 69 24 29 29 3D 69 24 CB ED 70 |....(.i$))=i$..p|
00000920: 72 69 6E 74 6E 61 61 6D 0D 0C 30 0E 00 F3 6E 3A |rintnaam..0...n:|
00000930: ED 77 61 63 68 74 65 6E 3A FE 0D 0F A5 8A 00 FB |.wachten:.......|
00000940: 3A F5 AD 36 0E 00 00 06 00 00 3B 22 5A 6F 65 6B |:..6......;"Zoek|
00000950: 65 6E 20 6F 70 20 6B 65 6E 6D 65 72 6B 22 3A F5 |en op kenmerk":.|
00000960: 3A F5 3A EB 73 3D 31 0E 00 00 01 00 00 CC 61 61 |:.:.s=1.......aa|
00000970: 6E 74 73 65 74 73 3A F5 6F 24 28 73 29 3A F3 73 |ntsets:.o$(s):.s|
00000980: 3A F5 3A F5 22 76 61 6E 20 77 65 6C 6B 20 6B 65 |:.:."van welk ke|
00000990: 6E 6D 65 72 6B 20 77 69 6C 20 6A 65 20 61 6C 6C |nmerk wil je all|
000009A0: 65 20 6E 61 6D 65 6E 20 67 65 6C 69 73 74 20 7A |e namen gelist z|
000009B0: 69 65 6E 20 3F 22 3A E9 64 24 28 31 35 0E 00 00 |ien ?":.d$(15...|
000009C0: 0F 00 00 29 3A EE 69 24 0D 0F F2 2A 00 FA 69 24 |...):.i$...*..i$|
000009D0: 3D 22 6D 65 6E 75 22 CB FE 3A F1 64 24 3D 69 24 |="menu"..:.d$=i$|
000009E0: 3A F5 3A EB 73 3D 31 0E 00 00 01 00 00 CC 61 61 |:.:.s=1.......aa|
000009F0: 6E 74 73 65 74 73 0D 10 0E 64 00 FA 6F 24 28 73 |ntsets...d..o$(s|
00000A00: 29 3D 64 24 CB ED 34 32 30 30 0E 00 00 68 10 00 |)=d$..4200...h..|
00000A10: 3A F3 73 3A F5 3A ED 77 61 63 68 74 65 6E 3A ED |:.s:.:.wachten:.|
00000A20: 38 31 30 30 0E 00 00 A4 1F 00 3A FE 3A EB 6E 3D |8100......:.:.n=|
00000A30: 31 0E 00 00 01 00 00 CC 61 61 6E 74 6E 61 6D 65 |1.......aantname|
00000A40: 6E 3A FA 73 24 28 6E 2C 73 29 3D 22 6A 22 CB ED |n:.s$(n,s)="j"..|
00000A50: 70 72 69 6E 74 6E 61 61 6D 3A F3 6E 3A FE 0D 13 |printnaam:.n:...|
00000A60: 8D 5C 00 FB 3A F5 AD 34 0E 00 00 04 00 00 3B 22 |.\..:..4......;"|
00000A70: 5A 6F 65 6B 65 6E 20 6F 70 20 77 6F 6F 6E 70 6C |Zoeken op woonpl|
00000A80: 61 61 74 73 22 3A F5 2C 2C 2C 2C 22 56 61 6E 20 |aats":.,,,,"Van |
00000A90: 77 65 6C 6B 65 20 77 6F 6F 6E 70 6C 61 61 74 73 |welke woonplaats|
00000AA0: 20 77 69 6C 20 6A 65 22 2C 22 61 6C 6C 65 20 6E | wil je","alle n|
00000AB0: 61 6D 65 6E 20 6C 69 73 74 65 6E 20 3F 22 0D 13 |amen listen ?"..|
00000AC0: A6 11 00 EE 69 24 3A FA 69 24 3D 22 6D 65 6E 75 |....i$:.i$="menu|
00000AD0: 22 CB FE 0D 13 AB 40 00 FA B1 69 24 3D 30 0E 00 |".....@...i$=0..|
00000AE0: 00 00 00 00 C5 B1 69 24 3E B1 77 24 28 31 0E 00 |......i$>.w$(1..|
00000AF0: 00 01 00 00 29 CB EC 35 30 33 30 0E 00 00 A6 13 |....)..5030.....|
00000B00: 00 3A EB 77 3D 31 0E 00 00 01 00 00 CC 61 61 6E |.:.w=1.......aan|
00000B10: 74 77 6F 6F 6E 70 6C 0D 13 BA 53 00 FA 77 24 28 |twoonpl...S..w$(|
00000B20: 77 2C CC 28 B1 69 24 29 29 3D 69 24 CB EC 35 31 |w,.(.i$))=i$..51|
00000B30: 30 30 0E 00 00 EC 13 00 3A F3 77 3A F5 2C 2C 2C |00......:.w:.,,,|
00000B40: 3B 22 4B 6F 6D 74 20 6E 69 65 74 20 76 6F 6F 72 |;"Komt niet voor|
00000B50: 20 69 6E 20 64 69 72 20 70 72 6F 67 72 61 6D 6D | in dir programm|
00000B60: 61 2E 22 3A ED 77 61 63 68 74 65 6E 3A FE 0D 13 |a.":.wachten:...|
00000B70: F1 45 00 EB 6E 3D 31 0E 00 00 01 00 00 CC 61 61 |.E..n=1.......aa|
00000B80: 6E 74 6E 61 6D 65 6E 3A FA AF 6E 24 28 6E 2C 34 |ntnamen:..n$(n,4|
00000B90: 35 0E 00 00 2D 00 00 29 3D 77 CB EC 70 72 69 6E |5...-..)=w..prin|
00000BA0: 74 6E 61 61 6D 3A F3 6E 3A ED 77 61 63 68 74 65 |tnaam:.n:.wachte|
00000BB0: 6E 3A EC 6D 65 6E 75 0D 17 75 81 00 FB 3A F5 AD |n:.menu..u...:..|
00000BC0: 33 0E 00 00 03 00 00 3B 22 5A 4F 45 4B 20 4F 50 |3......;"ZOEK OP|
00000BD0: 20 54 45 4C 45 46 4F 4F 4E 20 4E 55 4D 4D 45 52 | TELEFOON NUMMER|
00000BE0: 22 2C 2C 2C 3B 3A F5 22 56 61 6E 20 77 65 6C 6B |",,,;:."Van welk|
00000BF0: 20 74 65 6C 65 66 6F 6F 6E 6E 75 6D 6D 65 72 20 | telefoonnummer |
00000C00: 7A 6F 75 20 55 22 2C 22 64 65 20 62 69 6A 62 65 |zou U","de bijbe|
00000C10: 68 6F 72 65 6E 64 65 20 6E 61 61 6D 20 77 69 6C |horende naam wil|
00000C20: 6C 65 6E 22 2C 22 77 65 74 65 6E 28 6D 65 74 20 |len","weten(met |
00000C30: 6E 65 74 6E 75 6D 6D 65 72 29 2E 22 0D 17 8E 3D |netnummer)."...=|
00000C40: 00 E9 64 24 28 31 31 0E 00 00 0B 00 00 29 3A EE |..d$(11......):.|
00000C50: 69 24 3A FA 69 24 3D 22 6D 65 6E 75 22 CB FE 3A |i$:.i$="menu"..:|
00000C60: F1 64 24 3D 69 24 3A F5 3A EB 6E 3D 31 0E 00 00 |.d$=i$:.:.n=1...|
00000C70: 01 00 00 CC 61 61 6E 74 6E 61 6D 65 6E 0D 17 B6 |....aantnamen...|
00000C80: 35 00 FA 6E 24 28 6E 2C 34 36 0E 00 00 2E 00 00 |5..n$(n,46......|
00000C90: CC 35 36 0E 00 00 38 00 00 29 3D 64 24 CB ED 70 |.56...8..)=d$..p|
00000CA0: 72 69 6E 74 6E 61 61 6D 3A F3 6E 3A ED 77 61 63 |rintnaam:.n:.wac|
00000CB0: 68 74 65 6E 3A FE 0D 1F 45 15 00 EB 6E 3D 31 0E |hten:...E...n=1.|
00000CC0: 00 00 01 00 00 CC 61 61 6E 74 6E 61 6D 65 6E 0D |......aantnamen.|
00000CD0: 1F 4A 20 00 FA 6E 24 28 6E 2C CC 31 30 0E 00 00 |.J ..n$(n,.10...|
00000CE0: 0A 00 00 29 3D 22 20 20 20 20 20 20 20 20 20 20 |...)=" |
00000CF0: 22 CB FE 0D 1F 54 03 00 F3 6E 0D 1F 68 4C 00 F5 |"....T...n..hL..|
00000D00: AC 35 0E 00 00 05 00 00 2C 30 0E 00 00 00 00 00 |.5......,0......|
00000D10: 3B 22 50 72 6F 67 72 61 6D 6D 61 20 76 6F 6C 22 |;"Programma vol"|
00000D20: 2C 2C 22 67 65 65 6E 20 70 6C 61 61 74 73 20 6D |,,"geen plaats m|
00000D30: 65 65 72 22 2C 22 76 6F 6F 72 20 6E 6F 67 20 6D |eer","voor nog m|
00000D40: 65 65 72 20 6E 61 6D 65 6E 22 0D 1F 72 09 00 ED |eer namen"..r...|
00000D50: 77 61 63 68 74 65 6E 0D 1F 7C 02 00 FE 0D 1F AE |wachten..|......|
00000D60: 0B 00 F2 31 30 30 0E 00 00 64 00 00 0D 1F B8 02 |...100...d......|
00000D70: 00 FE 0D 20 71 78 00 F5 2C 2C 6E 24 28 6E 2C 31 |... qx..,,n$(n,1|
00000D80: 0E 00 00 01 00 00 CC 31 35 0E 00 00 0F 00 00 29 |.......15......)|
00000D90: 2C 2C 6E 24 28 6E 2C 31 36 0E 00 00 10 00 00 CC |,,n$(n,16.......|
00000DA0: 33 36 0E 00 00 24 00 00 29 2C 6E 24 28 6E 2C 33 |36...$..),n$(n,3|
00000DB0: 37 0E 00 00 25 00 00 CC 34 34 0E 00 00 2C 00 00 |7...%...44...,..|
00000DC0: 29 2C 2C 77 24 28 AF 6E 24 28 6E 2C 34 35 0E 00 |),,w$(.n$(n,45..|
00000DD0: 00 2D 00 00 29 29 2C 6E 24 28 6E 2C 34 36 0E 00 |.-..)),n$(n,46..|
00000DE0: 00 2E 00 00 CC 35 36 0E 00 00 38 00 00 29 0D 20 |.....56...8..). |
00000DF0: 76 19 00 F1 74 65 6C 3D 74 65 6C 2B 31 0E 00 00 |v...tel=tel+1...|
00000E00: 01 00 00 3A F1 6E 6E 3D 6E 3A FE 0D 20 D5 B0 00 |...:.nn=n:.. ...|
00000E10: EB 77 3D 31 0E 00 00 01 00 00 CC 61 61 6E 74 77 |.w=1.......aantw|
00000E20: 6F 6F 6E 70 6C 3A FA 77 24 28 77 29 3D 22 20 20 |oonpl:.w$(w)=" |
00000E30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E40: 20 20 22 C5 77 24 28 77 29 3D 64 24 CB FE 3A F3 | ".w$(w)=d$..:.|
00000E50: 77 3A F5 AC 31 37 0E 00 00 11 00 00 2C 30 0E 00 |w:..17......,0..|
00000E60: 00 00 00 00 3B 22 47 65 65 6E 20 70 6C 61 61 74 |....;"Geen plaat|
00000E70: 73 20 6D 65 65 72 20 76 6F 6F 72 20 6E 6F 67 20 |s meer voor nog |
00000E80: 65 65 6E 22 2C 22 77 6F 6F 6E 70 6C 61 61 74 73 |een","woonplaats|
00000E90: 2E 20 44 65 7A 65 20 6E 61 61 6D 20 77 6F 72 64 |. Deze naam word|
00000EA0: 74 22 2C 22 67 65 77 69 73 74 22 3A ED 77 61 63 |t","gewist":.wac|
00000EB0: 68 74 65 6E 3A ED 77 61 63 68 74 65 6E 3A FE 0D |hten:.wachten:..|
00000EC0: 23 2A 37 00 FB 3A F5 AD 39 0E 00 00 09 00 00 3B |#*7..:..9......;|
00000ED0: 22 48 4F 4F 46 44 4D 45 4E 55 22 3A F5 3A F5 3A |"HOOFDMENU":.:.:|
00000EE0: F5 22 31 20 69 6E 76 6F 65 72 65 6E 20 6E 69 65 |."1 invoeren nie|
00000EF0: 75 77 65 20 6E 61 6D 65 6E 22 0D 23 3C 14 00 F5 |uwe namen".#<...|
00000F00: 22 32 20 77 69 6A 7A 69 67 65 6E 20 6E 61 6D 65 |"2 wijzigen name|
00000F10: 6E 22 0D 23 46 14 00 F5 22 33 20 7A 6F 65 6B 65 |n".#F..."3 zoeke|
00000F20: 6E 2C 6F 70 20 6E 61 61 6D 22 0D 23 50 19 00 F5 |n,op naam".#P...|
00000F30: 22 34 20 7A 6F 65 6B 65 6E 2C 6F 70 20 6B 65 6E |"4 zoeken,op ken|
00000F40: 6D 65 72 6B 65 6E 22 0D 23 5A 1A 00 F5 22 35 20 |merken".#Z..."5 |
00000F50: 7A 6F 65 6B 65 6E 2C 6F 70 20 77 6F 6F 6E 70 6C |zoeken,op woonpl|
00000F60: 61 61 74 73 22 0D 23 64 1C 00 F5 22 36 20 7A 6F |aats".#d..."6 zo|
00000F70: 65 6B 65 6E 2C 6F 70 20 74 65 6C 65 66 6F 6F 6E |eken,op telefoon|
00000F80: 20 6E 72 2E 22 0D 23 6E 15 00 F5 22 37 20 73 61 | nr.".#n..."7 sa|
00000F90: 76 65 6E 20 70 72 6F 67 72 61 6D 6D 61 22 0D 23 |ven programma".#|
00000FA0: 8C 03 00 EE 6E 0D 23 96 1B 00 FA 6E 3C 31 0E 00 |....n.#....n<1..|
00000FB0: 00 01 00 00 C5 6E 3E 37 0E 00 00 07 00 00 CB EC |.....n>7........|
00000FC0: 6D 65 6E 75 0D 23 A0 0E 00 ED 6E 2A 31 30 30 30 |menu.#....n*1000|
00000FD0: 0E 00 00 E8 03 00 0D 23 BE 06 00 EC 6D 65 6E 75 |.......#....menu|
00000FE0: 0D FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00000FF0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001000: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001010: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001020: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001030: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001040: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001050: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001060: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001070: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001080: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001090: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000010A0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000010B0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000010C0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000010D0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000010E0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000010F0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001100: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001110: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001120: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001130: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001140: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001150: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001160: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001170: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF F8 |................|
00001180: 00 01 D1 95 B1 95 99 BD BD B8 80 83 F4 4C A0 8F |.............L..|
00001190: 10 48 8C 00 03 FF FF FF FF FF FF FF FF FF FF FF |.H..............|
000011A0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000011B0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000011C0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000011D0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000011E0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000011F0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001200: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001210: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001220: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF B7 |................|
00001230: 61 63 68 74 65 EE 00 00 A4 1F 00 AD 65 6E F5 00 |achte.......en..|
00001240: 00 28 23 00 B0 72 69 6E 74 6E 61 61 ED 00 00 6C |.(#..rintnaa...l|
00001250: 20 00 B4 65 EC 00 00 00 00 00 A1 61 6E 74 6E 61 | ..e.......antna|
00001260: 6D 65 EE 00 00 01 00 00 CE 3D 00 02 01 00 38 00 |me.......=....8.|
00001270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001290: 20 20 20 20 6C 6C 6C 64 64 20 20 20 20 20 20 20 | llldd |
000012A0: 20 20 20 20 20 20 20 20 A1 61 6E 74 73 65 74 F3 | .antset.|
000012B0: 00 00 01 00 00 D3 06 00 02 01 00 01 00 20 CF 14 |............. ..|
000012C0: 00 02 01 00 0F 00 67 79 20 20 20 20 20 20 20 20 |......gy |
000012D0: 20 20 20 20 20 EE 00 00 01 00 00 00 00 01 00 00 | ...........|
000012E0: 00 00 01 00 00 45 1F 02 A1 61 6E 74 77 6F 6F 6E |.....E...antwoon|
000012F0: 70 EC 00 00 01 00 00 49 07 00 6C 61 67 72 6F 75 |p......I..lagrou|
00001300: 77 C4 17 00 01 14 00 3A 64 3A 64 20 20 20 20 20 |w......:d:d |
00001310: 20 20 20 20 20 20 20 20 20 20 20 F7 00 00 01 00 | .....|
00001320: 00 00 00 01 00 00 00 00 01 00 00 D5 20 02 |............ . |
.TKTFOUT ...........WACHTEN=8100......
......MENU=9000...(#.......PRINTNAAM=830
0...L ...(...TEL=0........Z.....DH...5..
....;"PROGRAMMA INRICHTEN."''':."HOEVEEL
NAMEN ? ";:.AANTNAMEN:.AANTNAMEN:.N$(A
ANTNAMEN,56...8..)..X{.."UIT HOEVEEL KEN
NISSENKRINGEN ? ";:.AANTSETS:.AANTSETS:.
S$(AANTNAMEN,AANTSETS):.O$(AANTSETS,15..
....):.N=1......LAANTSETS......"KRINGNAA
M ";N;" ";:.O$(N):.O$(N):.N:.:.:."HOEVE
EL VERSCHILLENDE WOONPLAATS EN GA JE INV
OEREN ? ":.AANTWOONPL:.(CAANTWOONPL=0...
...EAANTWOONPL>255......)K.200...H.....>
..:..8......;"NAMEN INVOEREN.",,,,,:.800
0...@..:.N>AANTNAMENK....B.."NAAM":."STR
AAT+NR":."POSTCODE":."WOONPLAATS":."TELE
FOON NR":.I$..0]..I$="MENU"K.:.N$(N,L15.
.....)=I$:..3......,12......;N$(N,L15...
...):.N$(N,16......L36...$..)..=A...4...
...,12......;N$(N,16......L35...#..):.N$
(N,37...%..L44...,..):.N$(N,37...%..L44.
..,..):.D$(20......):.D$:.8400...P .:.W>
AANTWOONPLK.:.N$(N,45...-..)=BW:.W$(W)=D
$:..6......,12......;W$(W)..VP..N$(N,46.
.....L56...8..):..7......,12......;N$(N,
46......L56...8..):.:.:.M=1......LAANTSE
TS:.O$(M);" J/N ";:.I$..N...C(I$="J"EI$=
"N")K.1900...L.....{..I$="N"K.:.1000....
..:.:..5......;"GEGEVENS WIJZIGEN":.TEL=
0......:.3020...L..:.I$="MENU"K.:.TEL>1.
.....K.2000...P..:.N=NN...G..:."NAAM":."
STRAAT + NR.":."POSTCODE":."WOONPLAATS":
."TELEFOON NR":.I$..|...I$I""K.N$(N,L15.
.....)=I$..W...12......,12......;N$(N,L
15......):.I$:.I$I""K.N$(N,16......L36..
.$..)=I$:..13......,12......;N$(N,16....
..L35...#..)...^..I$:.I$I""K.N$(N,37...%
..L44...,..)=I$:..14......,12......;N$(N
,37...%..L44...,..):.I$:.D$=I$...B..I$="
"K.D$=W$(.N$(N,45...-..)):.8400...P .:.N
$(N,45...-..)=BW:.W$(W)=D$:..15......,12
......;W$(W)......I$:.I$I""K.N$(N,46....
..L56...8..)=I$:..16......,12......;N$(N
,46......L56...8..):.:.WACHTEN:.M=12....
..L16......:..M,0......;"
"..DD..M:..12......,0...
...;:.M=1......LAANTSETS:.O$(M);" J/N OF
RETURN";...5..I$:.I$=""K.2320......:.C(
I$="J"EI$="N")K.2280.........;..S$(N,M)=
I$:.I$:.M:.:."GEWIJZIGD.":.WACHTEN:.WACH
TEN:.MENU...S..:..8......;"ZOEKEN OP NAA
M":.,,,,"WELKE NAAM OF GEDEELTE VAN WELK
E NAAM ?":.TEL=0......:.I$:.I$="MENU"K.:
.I$=""K..../...20......,0......;"
".......5......,0.....
.;:..I$<16......K.3100......:..20......,
0......;"OPGEGEVEN NAAM IS TE LANG":.191
0...V..:.N=1......LAANTNAMEN:.N$(N,1....
...L(.I$))=I$K.PRINTNAAM..0...N:.WACHTEN
:.......:..6......;"ZOEKEN OP KENMERK":.
:.:.S=1......LAANTSETS:.O$(S):.S:.:."VAN
WELK KENMERK WIL JE ALLE NAMEN GELIST Z
IEN ?":.D$(15......):.I$...*..I$="MENU"K
.:.D$=I$:.:.S=1......LAANTSETS...D..O$(S
)=D$K.4200...H..:.S:.:.WACHTEN:.8100....
..:.:.N=1......LAANTNAMEN:.S$(N,S)="J"K.
PRINTNAAM:.N:....\..:..4......;"ZOEKEN O
P WOONPLAATS":.,,,,"VAN WELKE WOONPLAATS
WIL JE","ALLE NAMEN LISTEN ?"......I$:.
I$="MENU"K....@...I$=0......E.I$>.W$(1..
....)K.5030......:.W=1......LAANTWOONPL.
..S..W$(W,L(.I$))=I$K.5100......:.W:.,,,
;"KOMT NIET VOOR IN DIR PROGRAMMA.":.WAC
HTEN:....E..N=1......LAANTNAMEN:..N$(N,4
5...-..)=WK.PRINTNAAM:.N:.WACHTEN:.MENU.
.U...:..3......;"ZOEK OP TELEFOON NUMMER
",,,;:."VAN WELK TELEFOONNUMMER ZOU U","
DE BIJBEHORENDE NAAM WILLEN","WETEN(MET
NETNUMMER)."...=..D$(11......):.I$:.I$="
MENU"K.:.D$=I$:.:.N=1......LAANTNAMEN...
5..N$(N,46......L56...8..)=D$K.PRINTNAAM
:.N:.WACHTEN:...E...N=1......LAANTNAMEN.
.J ..N$(N,L10......)=" "K...T..
.N..HL...5......,0......;"PROGRAMMA VOL"
,,"GEEN PLAATS MEER","VOOR NOG MEER NAME
N"..R...WACHTEN..|.........100...D......
... QX..,,N$(N,1......L15......),,N$(N,1
6......L36...$..),N$(N,37...%..L44...,..
),,W$(.N$(N,45...-..)),N$(N,46......L56.
..8..). V...TEL=TEL+1......:.NN=N:.. U..
.W=1......LAANTWOONPL:.W$(W)="
"EW$(W)=D$K.:.W:..17......,0..
....;"GEEN PLAATS MEER VOOR NOG EEN","WO
ONPLAATS. DEZE NAAM WORDT","GEWIST":.WAC
HTEN:.WACHTEN:..#*7..:..9......;"HOOFDME
NU":.:.:."1 INVOEREN NIEUWE NAMEN".#<...
"2 WIJZIGEN NAMEN".#F..."3 ZOEKEN,OP NAA
M".#P..."4 ZOEKEN,OP KENMERKEN".#Z..."5
ZOEKEN,OP WOONPLAATS".#D..."6 ZOEKEN,OP
TELEFOON NR.".#N..."7 SAVEN PROGRAMMA".#
....N.#....N<1......EN>7......K.MENU.# .
..N*1000.......#....MENU................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
..Q..........L ..H......................
........................................
........................................
........................................
................ACHTE.......EN...(#..RIN
TNAA...L ..E.......ANTNAME......N=....8.
LLLD
D .ANTSET......S....... O.
......GY ................E..
.ANTWOONP......I..LAGROUWD.....:D:D
................U .
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL