WOORDZ.BAS
FILE INFORMATION
FILENAME(S): WOORDZ.BAS
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-11-30 21:26:13
APPEARS ON: 1 disk(s)
FILE HASH
d8f2aafdb4142c042cb6934943a9e4fc134ff06fb57f5e1d5a4171c7027dd4db
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DEMO 1 | WOORDZ.BAS | PRG | DuncanTwain | 26 | 12 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4D 08 01 00 89 20 31 30 30 20 20 20 20 20 |..M.... 100 |
00000010: 20 20 20 20 3A 8F 20 44 52 41 41 49 45 4E 20 20 | :. DRAAIEN |
00000020: 20 20 20 20 20 20 20 20 28 52 55 4E 20 20 20 29 | (RUN )|
00000030: 2E 20 50 52 4F 47 52 41 4D 4D 41 20 20 20 3A 20 |. PROGRAMMA : |
00000040: 20 57 4F 4F 52 44 5A 2E 42 41 53 20 2E 00 9A 08 | WOORDZ.BAS ....|
00000050: 02 00 89 20 31 30 30 20 20 20 20 20 20 20 20 20 |... 100 |
00000060: 3A 8F 20 44 52 41 41 49 45 4E 20 20 20 20 20 20 |:. DRAAIEN |
00000070: 20 20 20 20 28 52 55 4E 20 20 20 29 2E 20 44 49 | (RUN ). DI|
00000080: 53 4B 20 20 20 20 20 20 20 20 3A 20 20 44 45 4D |SK : DEM|
00000090: 4F 2D 31 28 43 4F 50 59 2E 29 00 E0 08 03 00 89 |O-1(COPY.)......|
000000A0: 20 33 35 30 20 20 20 20 20 20 20 20 20 3A 8F 20 | 350 :. |
000000B0: 56 45 52 53 49 45 5A 45 54 54 45 52 20 20 20 20 |VERSIEZETTER |
000000C0: 20 28 52 55 4E 20 33 20 29 2E 20 54 41 41 4C 20 | (RUN 3 ). TAAL |
000000D0: 20 20 20 20 20 20 20 3A 20 20 42 41 53 49 43 2E | : BASIC.|
000000E0: 00 2C 09 04 00 89 20 34 30 30 20 20 20 20 20 20 |.,.... 400 |
000000F0: 20 20 20 3A 8F 20 4C 49 4A 53 54 20 4F 50 20 50 | :. LIJST OP P|
00000100: 52 49 4E 54 45 52 20 28 52 55 4E 20 34 20 29 2E |RINTER (RUN 4 ).|
00000110: 20 44 41 54 55 4D 20 20 20 20 20 20 20 3A 20 20 | DATUM : |
00000120: 31 39 20 4E 4F 56 2E 31 39 39 32 2E 00 79 09 05 |19 NOV.1992..y..|
00000130: 00 89 20 34 30 35 20 20 20 20 20 20 20 20 20 3A |.. 405 :|
00000140: 8F 20 48 45 52 5A 45 54 20 50 52 49 4E 54 45 52 |. HERZET PRINTER|
00000150: 20 20 20 28 47 4F 54 4F 20 35 29 2E 20 50 52 4F | (GOTO 5). PRO|
00000160: 47 52 41 4D 4D 45 55 52 20 3A 20 20 4A 2E 48 2E |GRAMMEUR : J.H.|
00000170: 56 41 4E 20 52 49 4A 4E 2E 00 7F 09 06 00 8F 00 |VAN RIJN........|
00000180: CE 09 07 00 8F 20 20 4D 45 54 20 42 45 48 55 4C |..... MET BEHUL|
00000190: 50 20 56 41 4E 20 44 49 54 20 50 52 4F 47 52 41 |P VAN DIT PROGRA|
000001A0: 4D 4D 41 20 4B 41 4E 20 4D 45 4E 20 57 4F 4F 52 |MMA KAN MEN WOOR|
000001B0: 44 5A 4F 45 4B 45 52 53 20 4F 50 4C 4F 53 53 45 |DZOEKERS OPLOSSE|
000001C0: 4E 20 4D 45 54 20 44 45 20 48 41 4E 44 2E 00 D4 |N MET DE HAND...|
000001D0: 09 08 00 8F 00 23 0A 0A 00 56 B2 30 3A 58 50 B2 |.....#...V.0:XP.|
000001E0: 58 AA 49 28 52 29 3A 59 50 B2 59 AA 4A 28 52 29 |X.I(R):YP.Y.J(R)|
000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000200: 20 3A 8F 20 53 55 42 50 52 4F 47 52 41 4D 4D 41 | :. SUBPROGRAMMA|
00000210: 20 49 4E 43 28 52 29 2E 20 20 20 20 20 20 20 20 | INC(R). |
00000220: 2A 2A 2A 00 63 0A 0B 00 8B 20 58 50 B3 58 4F 20 |***.c.... XP.XO |
00000230: B0 20 59 50 B3 59 4F 20 B0 20 58 50 B1 58 45 20 |. YP.YO . XP.XE |
00000240: B0 20 59 50 B1 59 45 20 A7 20 56 B2 31 3A 8E 20 |. YP.YE . V.1:. |
00000250: 20 20 20 3A 8F 20 42 55 49 54 45 4E 20 4B 41 44 | :. BUITEN KAD|
00000260: 45 52 2E 00 A5 0A 0C 00 58 B2 58 50 3A 59 B2 59 |ER......X.XP:Y.Y|
00000270: 50 3A 8E 20 20 20 20 20 20 20 20 20 20 20 20 20 |P:. |
00000280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000290: 20 20 20 20 20 20 20 20 20 20 3A 8F 20 4E 4F 52 | :. NOR|
000002A0: 4D 41 41 4C 2E 00 E9 0A 14 00 81 20 49 B2 31 20 |MAAL....... I.1 |
000002B0: A4 20 32 30 30 30 3A 82 20 49 3A 8E 20 20 20 20 |. 2000:. I:. |
000002C0: 20 20 20 20 20 20 20 3A 8F 20 57 41 43 48 54 2E | :. WACHT.|
000002D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002E0: 20 20 20 20 20 20 2A 2A 2A 00 32 0B 1E 00 81 20 | ***.2.... |
000002F0: 59 B2 34 30 AC 59 4F 20 A4 20 34 30 AC 59 45 20 |Y.40.YO . 40.YE |
00000300: A9 20 34 30 20 20 20 20 20 20 20 20 20 20 20 20 |. 40 |
00000310: 3A 8F 20 56 45 4C 44 20 4C 49 43 48 54 52 4F 4F |:. VELD LICHTROO|
00000320: 44 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 2A |D. *|
00000330: 2A 2A 00 57 0B 1F 00 81 20 58 B2 58 4F 20 A4 20 |**.W.... X.XO . |
00000340: 58 45 3A 97 20 42 AA 58 AA 59 2C 31 30 3A 82 20 |XE:. B.X.Y,10:. |
00000350: 58 3A 82 20 59 3A 8E 00 A0 0B 28 00 81 20 59 B2 |X:. Y:....(.. Y.|
00000360: 34 30 AC 59 4F 20 A4 20 34 30 AC 59 45 20 A9 20 |40.YO . 40.YE . |
00000370: 34 30 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F |40 :.|
00000380: 20 56 45 4C 44 20 4D 45 54 20 53 54 49 50 50 45 | VELD MET STIPPE|
00000390: 4E 2E 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A |N. ***|
000003A0: 00 C5 0B 29 00 81 20 58 B2 58 4F 20 A4 20 58 45 |...).. X.XO . XE|
000003B0: 3A 97 20 41 AA 58 AA 59 2C 34 36 3A 82 20 58 3A |:. A.X.Y,46:. X:|
000003C0: 82 20 59 3A 8E 00 0B 0C 2D 00 99 20 48 24 42 24 |. Y:....-.. H$B$|
000003D0: 42 24 42 24 42 24 48 24 3B 3A 8E 20 20 20 20 20 |B$B$B$H$;:. |
000003E0: 20 20 20 20 20 20 20 20 20 3A 8F 20 42 4F 4F 44 | :. BOOD|
000003F0: 53 43 48 41 50 50 45 4E 56 45 4C 44 20 4C 45 45 |SCHAPPENVELD LEE|
00000400: 47 2E 20 20 20 20 20 20 2A 2A 2A 00 54 0C 32 00 |G. ***.T.2.|
00000410: A1 20 4B 24 3A 8B 20 4B 24 B2 22 22 20 A7 20 35 |. K$:. K$."" . 5|
00000420: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |0 |
00000430: 20 20 3A 8F 20 54 4F 45 54 53 2D 49 4E 50 55 54 | :. TOETS-INPUT|
00000440: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000450: 20 2A 2A 2A 00 5A 0C 33 00 8E 00 99 0C 64 00 86 | ***.Z.3.....d..|
00000460: 20 49 28 37 29 2C 4A 28 37 29 20 20 20 20 20 20 | I(7),J(7) |
00000470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000480: 20 20 20 20 3A 8F 20 49 4E 43 52 45 4D 45 4E 54 | :. INCREMENT|
00000490: 56 45 43 54 4F 52 45 4E 2E 00 E5 0C 65 00 49 28 |VECTOREN....e.I(|
000004A0: 30 29 B2 AA 31 3A 49 28 31 29 B2 AA 31 3A 49 28 |0)..1:I(1)..1:I(|
000004B0: 32 29 B2 20 30 3A 49 28 33 29 B2 AB 31 20 20 20 |2). 0:I(3)..1 |
000004C0: 20 20 20 20 20 3A 49 28 34 29 B2 AB 31 3A 49 28 | :I(4)..1:I(|
000004D0: 35 29 B2 AB 31 3A 49 28 36 29 B2 20 30 3A 49 28 |5)..1:I(6). 0:I(|
000004E0: 37 29 B2 AA 31 00 31 0D 66 00 4A 28 30 29 B2 20 |7)..1.1.f.J(0). |
000004F0: 30 3A 4A 28 31 29 B2 AA 31 3A 4A 28 32 29 B2 AA |0:J(1)..1:J(2)..|
00000500: 31 3A 4A 28 33 29 B2 AA 31 20 20 20 20 20 20 20 |1:J(3)..1 |
00000510: 20 3A 4A 28 34 29 B2 20 30 3A 4A 28 35 29 B2 AB | :J(4). 0:J(5)..|
00000520: 31 3A 4A 28 36 29 B2 AB 31 3A 4A 28 37 29 B2 AB |1:J(6)..1:J(7)..|
00000530: 31 00 77 0D 67 00 42 24 B2 22 20 20 20 20 20 20 |1.w.g.B$." |
00000540: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000560: 20 20 22 3A 55 24 B2 C7 28 31 34 35 29 3A 48 24 | ":U$..(145):H$|
00000570: B2 C7 28 30 31 39 29 00 BA 0D 68 00 8F 20 20 20 |..(019)...h.. |
00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 48 4F 4F 46 44 | HOOFD|
000005B0: 50 52 4F 47 52 41 4D 4D 41 2E 00 E6 0D 69 00 99 |PROGRAMMA....i..|
000005C0: 20 C7 28 31 34 37 29 22 20 20 57 20 4F 20 4F 20 | .(147)" W O O |
000005D0: 52 20 44 20 5A 20 4F 20 45 20 4B 20 45 20 52 20 |R D Z O E K E R |
000005E0: 2E 22 3A 99 3A 99 00 0B 0E 6A 00 99 20 22 41 41 |.":.:....j.. "AA|
000005F0: 4E 54 41 4C 20 4C 45 54 54 45 52 53 20 48 4F 52 |NTAL LETTERS HOR|
00000600: 49 5A 4F 4E 54 41 41 4C 22 3A 99 00 33 0E 6B 00 |IZONTAAL":..3.k.|
00000610: 85 20 22 48 4F 4F 47 53 54 45 4E 53 20 44 45 52 |. "HOOGSTENS DER|
00000620: 54 49 47 22 3B 48 3A 8B 20 48 B1 33 30 20 A7 20 |TIG";H:. H.30 . |
00000630: 31 30 36 00 5A 0E 6C 00 99 3A 99 3A 99 20 22 41 |106.Z.l..:.:. "A|
00000640: 41 4E 54 41 4C 20 4C 45 54 54 45 52 53 20 56 45 |ANTAL LETTERS VE|
00000650: 52 54 49 43 41 41 4C 22 3A 99 00 84 0E 6D 00 85 |RTICAAL":....m..|
00000660: 20 22 48 4F 4F 47 53 54 45 4E 53 20 41 43 48 54 | "HOOGSTENS ACHT|
00000670: 54 49 45 4E 22 3B 56 3A 8B 20 56 B1 31 38 20 A7 |TIEN";V:. V.18 .|
00000680: 20 31 30 38 00 B6 0E 6E 00 58 4F B2 32 30 AB B5 | 108...n.XO.20..|
00000690: 28 48 AD 32 29 3A 58 45 B2 58 4F AA 48 AB 31 3A |(H.2):XE.XO.H.1:|
000006A0: 59 4F B2 31 34 AB B5 28 56 AD 32 29 3A 59 45 B2 |YO.14..(V.2):YE.|
000006B0: 59 4F AA 56 AB 31 00 EE 0E 6F 00 41 B2 C2 28 36 |YO.V.1...o.A..(6|
000006C0: 34 38 29 AC 32 35 36 3A 42 B2 35 35 32 39 36 3A |48).256:B.55296:|
000006D0: 97 20 36 34 36 2C 31 35 3A 97 20 35 33 32 38 30 |. 646,15:. 53280|
000006E0: 2C 31 31 3A 97 20 35 33 32 38 31 2C 31 31 00 2C |,11:. 53281,11.,|
000006F0: 0F 70 00 81 20 49 B2 30 30 30 20 A4 20 39 39 39 |.p.. I.000 . 999|
00000700: 3A 97 28 41 AA 49 29 2C 31 30 32 3A 97 28 42 AA |:.(A.I),102:.(B.|
00000710: 49 29 2C 30 38 3A 82 20 49 3A 8D 20 33 30 20 3A |I),08:. I:. 30 :|
00000720: 8F 20 20 20 20 2A 2A 20 41 20 2A 2A 00 69 0F 71 |. ** A **.i.q|
00000730: 00 8D 20 34 30 20 20 20 20 20 20 20 20 20 20 20 |.. 40 |
00000740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000750: 20 20 20 20 20 3A 8F 20 56 45 4C 44 20 4D 45 54 | :. VELD MET|
00000760: 20 53 54 49 50 50 45 4E 2E 00 AB 0F 72 00 8D 20 | STIPPEN....r.. |
00000770: 34 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |45 |
00000780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000790: 20 20 3A 8F 20 42 4F 4F 44 53 43 48 41 50 50 45 | :. BOODSCHAPPE|
000007A0: 4E 56 45 4C 44 20 4C 45 45 47 2E 00 DD 0F 73 00 |NVELD LEEG....s.|
000007B0: 99 20 22 20 4C 45 54 54 45 52 53 20 41 43 48 54 |. " LETTERS ACHT|
000007C0: 45 52 20 45 4C 4B 41 41 52 20 49 4E 42 52 45 4E |ER ELKAAR INBREN|
000007D0: 47 45 4E 2E 20 20 20 20 20 20 20 22 3B 00 0F 10 |GEN. ";...|
000007E0: 74 00 99 20 22 20 4C 4F 50 45 52 54 4F 45 54 53 |t.. " LOPERTOETS|
000007F0: 45 4E 20 4E 4F 52 4D 41 41 4C 2E 20 3C 43 4C 52 |EN NORMAAL. <CLR|
00000800: 3E 3A 56 45 4C 44 20 4C 45 45 47 2E 20 22 3B 00 |>:VELD LEEG. ";.|
00000810: 41 10 75 00 99 20 22 20 41 41 4E 20 48 45 54 20 |A.u.. " AAN HET |
00000820: 45 49 4E 44 20 3C 52 45 54 55 52 4E 3E 20 49 4E |EIND <RETURN> IN|
00000830: 44 52 55 4B 4B 45 4E 2E 20 20 20 20 20 20 20 22 |DRUKKEN. "|
00000840: 3B 00 8C 10 78 00 58 B2 58 4F 3A 59 B2 59 4F 3A |;...x.X.XO:Y.YO:|
00000850: 89 20 31 33 30 20 20 20 20 20 20 20 20 20 20 20 |. 130 |
00000860: 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 5A 4F | :. ZO|
00000870: 45 4B 45 52 56 45 4C 44 20 4C 49 4E 4B 53 42 4F |EKERVELD LINKSBO|
00000880: 56 45 4E 2E 20 2A 2A 20 42 20 2A 2A 00 C2 10 7D |VEN. ** B **...}|
00000890: 00 8D 20 31 30 20 20 20 20 20 20 20 20 20 20 20 |.. 10 |
000008A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008B0: 20 20 20 20 20 3A 8F 20 49 4E 43 52 45 4D 45 4E | :. INCREMEN|
000008C0: 54 2E 00 0A 11 82 00 5A B2 41 AA 58 AA 34 30 AC |T......Z.A.X.40.|
000008D0: 59 3A 97 20 5A 2C C2 28 5A 29 AA 31 32 38 20 20 |Y:. Z,.(Z).128 |
000008E0: 20 20 20 20 20 20 20 20 20 3A 8F 20 52 45 56 45 | :. REVE|
000008F0: 52 53 45 2E 20 20 20 20 20 20 20 20 20 20 20 20 |RSE. |
00000900: 20 20 20 2A 2A 20 43 20 2A 2A 00 4E 11 8C 00 8D | ** C **.N....|
00000910: 20 35 30 3A 97 20 5A 2C C2 28 5A 29 AB 31 32 38 | 50:. Z,.(Z).128|
00000920: 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 | :. |
00000930: 54 4F 45 54 53 20 45 4E 20 4E 4F 52 4D 41 41 4C |TOETS EN NORMAAL|
00000940: 2E 20 20 20 20 20 20 2A 2A 20 44 20 2A 2A 00 7C |. ** D **.||
00000950: 11 8D 00 8B 20 4B 24 B2 C7 28 30 31 39 29 20 A7 |.... K$..(019) .|
00000960: 20 31 32 30 20 20 20 20 20 20 20 20 20 20 20 20 | 120 |
00000970: 20 20 20 20 3A 8F 20 48 4F 4D 45 2E 00 AE 11 8E | :. HOME.....|
00000980: 00 8B 20 4B 24 B2 C7 28 30 32 39 29 20 A7 20 52 |.. K$..(029) . R|
00000990: B2 30 3A 89 20 31 32 35 20 20 20 20 20 20 20 3A |.0:. 125 :|
000009A0: 8F 20 4E 41 41 52 20 52 45 43 48 54 53 2E 00 DF |. NAAR RECHTS...|
000009B0: 11 8F 00 8B 20 4B 24 B2 C7 28 31 35 37 29 20 A7 |.... K$..(157) .|
000009C0: 20 52 B2 34 3A 89 20 31 32 35 20 20 20 20 20 20 | R.4:. 125 |
000009D0: 20 3A 8F 20 4E 41 41 52 20 4C 49 4E 4B 53 2E 00 | :. NAAR LINKS..|
000009E0: 0C 12 90 00 8B 20 4B 24 B2 C7 28 31 34 35 29 20 |..... K$..(145) |
000009F0: A7 20 52 B2 36 3A 89 20 31 32 35 20 20 20 20 20 |. R.6:. 125 |
00000A00: 20 20 3A 8F 20 4F 4D 48 4F 4F 47 2E 00 39 12 91 | :. OMHOOG..9..|
00000A10: 00 8B 20 4B 24 B2 C7 28 30 31 37 29 20 A7 20 52 |.. K$..(017) . R|
00000A20: B2 32 3A 89 20 31 32 35 20 20 20 20 20 20 20 3A |.2:. 125 :|
00000A30: 8F 20 4F 4D 4C 41 41 47 2E 00 7C 12 92 00 8B 20 |. OMLAAG..|.... |
00000A40: 4B 24 B2 C7 28 31 34 37 29 20 A7 20 31 31 33 20 |K$..(147) . 113 |
00000A50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
00000A60: 8F 20 43 4C 45 41 52 2C 20 50 4F 45 54 53 20 41 |. CLEAR, POETS A|
00000A70: 4C 4C 45 20 4C 45 54 54 45 52 53 2E 00 B5 12 93 |LLE LETTERS.....|
00000A80: 00 8B 20 4B 24 B2 C7 28 30 31 33 29 20 A7 20 32 |.. K$..(013) . 2|
00000A90: 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |00 |
00000AA0: 20 20 3A 8F 20 52 45 54 55 52 4E 20 3D 20 5A 4F | :. RETURN = ZO|
00000AB0: 45 4B 45 4E 2E 00 E5 12 96 00 44 B2 C6 28 4B 24 |EKEN......D..(K$|
00000AC0: 29 3A 8B 20 44 B3 36 34 20 B0 20 44 B1 39 30 20 |):. D.64 . D.90 |
00000AD0: A7 20 31 33 30 20 20 20 20 20 20 3A 8F 20 4C 45 |. 130 :. LE|
00000AE0: 54 54 45 52 3F 00 28 13 97 00 97 20 5A 2C 44 AB |TTER?.(.... Z,D.|
00000AF0: 36 34 3A 58 B2 58 AA 31 3A 8B 20 58 B3 B2 58 45 |64:X.X.1:. X..XE|
00000B00: 20 A7 20 31 33 30 20 20 20 20 20 3A 8F 20 4E 49 | . 130 :. NI|
00000B10: 45 55 57 20 54 45 4B 45 4E 20 45 4E 20 31 20 4E |EUW TEKEN EN 1 N|
00000B20: 2E 52 45 43 48 54 53 2E 00 6A 13 98 00 58 B2 58 |.RECHTS..j...X.X|
00000B30: 4F 3A 59 B2 59 AA 31 3A 8B 20 59 B3 B2 59 45 20 |O:Y.Y.1:. Y..YE |
00000B40: A7 20 31 33 30 20 20 20 20 20 20 20 20 20 20 20 |. 130 |
00000B50: 20 3A 8F 20 52 45 47 45 4C 20 56 4F 4C 2C 20 45 | :. REGEL VOL, E|
00000B60: 45 4E 20 4F 4D 4C 41 41 47 2E 00 A0 13 99 00 89 |EN OMLAAG.......|
00000B70: 20 31 32 30 20 20 20 20 20 20 20 20 20 20 20 20 | 120 |
00000B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B90: 20 20 20 20 3A 8F 20 56 45 4C 44 20 56 4F 4C 2E | :. VELD VOL.|
00000BA0: 00 C8 13 C8 00 48 B2 58 45 AB 58 4F AA 31 3A 47 |.....H.XE.XO.1:G|
00000BB0: B2 59 45 AB 59 4F AA 31 3A 4D B2 48 3A 8B 20 47 |.YE.YO.1:M.H:. G|
00000BC0: B1 48 20 A7 20 4D B2 47 00 0B 14 C9 00 8D 20 34 |.H . M.G...... 4|
00000BD0: 35 3A 99 20 22 20 5A 4F 45 4B 57 4F 4F 52 44 20 |5:. " ZOEKWOORD |
00000BE0: 47 45 56 52 41 41 47 44 2E 22 3A 4C 24 B2 22 4C |GEVRAAGD.":L$."L|
00000BF0: 45 54 54 45 52 53 22 3A 8B 20 4D B2 31 20 A7 20 |ETTERS":. M.1 . |
00000C00: 4C 24 B2 22 4C 45 54 54 45 52 22 00 47 14 CA 00 |L$."LETTER".G...|
00000C10: 99 20 55 24 22 48 4F 4F 47 53 54 45 4E 53 22 3B |. U$"HOOGSTENS";|
00000C20: 4D 3B 4C 24 22 20 49 4E 42 52 45 4E 47 45 4E 28 |M;L$" INBRENGEN(|
00000C30: 26 3D 45 49 4E 44 29 2E 22 55 24 20 3A 8F 20 56 |&=EIND)."U$ :. V|
00000C40: 45 52 5A 4F 45 4B 2E 00 80 14 CB 00 85 20 22 57 |ERZOEK....... "W|
00000C50: 4F 4F 52 44 22 3B 5A 24 3A 8B 20 5A 24 B2 22 26 |OORD";Z$:. Z$."&|
00000C60: 22 20 A7 20 33 30 30 20 20 20 20 20 3A 8F 20 49 |" . 300 :. I|
00000C70: 4E 47 45 56 45 4E 3B 20 26 20 3D 20 55 49 54 2E |NGEVEN; & = UIT.|
00000C80: 00 B9 14 CC 00 4C B2 C3 28 5A 24 29 3A 8B 20 4C |.....L..(Z$):. L|
00000C90: B3 31 20 B0 20 4C B1 4D 20 A7 20 32 30 31 20 20 |.1 . L.M . 201 |
00000CA0: 20 20 20 20 20 20 3A 8F 20 4C 45 45 47 20 4F 46 | :. LEEG OF|
00000CB0: 20 54 45 20 4C 41 4E 47 2E 00 FA 14 D2 00 52 59 | TE LANG......RY|
00000CC0: B2 34 30 AC 59 4F 3A 81 20 59 49 B2 59 4F 20 A4 |.40.YO:. YI.YO .|
00000CD0: 20 59 45 3A 81 20 58 49 B2 58 4F 20 A4 20 58 45 | YE:. XI.XO . XE|
00000CE0: 3A 58 58 B2 58 49 AA 52 59 3A 59 24 B2 C7 28 C2 |:XX.XI.RY:Y$..(.|
00000CF0: 28 41 AA 58 58 29 AA 36 34 29 00 3E 15 D3 00 8B |(A.XX).64).>....|
00000D00: 20 59 24 B3 B1 C8 28 5A 24 2C 31 29 20 A7 20 32 | Y$...(Z$,1) . 2|
00000D10: 39 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |90 |
00000D20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D30: 3A 8F 20 5A 4F 45 4B 20 42 45 47 49 4E 2E 00 78 |:. ZOEK BEGIN..x|
00000D40: 15 D4 00 8B 20 4C B3 32 20 A7 20 97 20 42 AA 58 |.... L.2 . . B.X|
00000D50: 58 2C 30 31 3A 8D 20 32 30 3A 97 20 42 AA 58 58 |X,01:. 20:. B.XX|
00000D60: 2C 31 33 3A 89 20 32 39 30 20 20 3A 8F 20 45 45 |,13:. 290 :. EE|
00000D70: 4E 20 54 45 4B 45 4E 2E 00 AB 15 DC 00 81 20 52 |N TEKEN....... R|
00000D80: B2 30 20 A4 20 37 3A 58 B2 58 49 3A 59 B2 59 49 |.0 . 7:X.XI:Y.YI|
00000D90: 3A 81 20 51 B2 32 20 A4 20 4C 3A 8D 20 31 30 3A |:. Q.2 . L:. 10:|
00000DA0: 8B 20 56 B2 31 20 A7 20 32 38 30 00 DA 15 E6 00 |. V.1 . 280.....|
00000DB0: 59 24 B2 C7 28 C2 28 41 AA 58 AA 34 30 AC 59 29 |Y$..(.(A.X.40.Y)|
00000DC0: AA 36 34 29 3A 8B 20 59 24 B3 B1 CA 28 5A 24 2C |.64):. Y$...(Z$,|
00000DD0: 51 2C 31 29 20 A7 20 32 38 30 00 25 16 E7 00 82 |Q,1) . 280.%....|
00000DE0: 20 51 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | Q |
00000DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E00: 20 20 20 20 3A 8F 20 5A 4F 45 4B 20 49 4E 20 52 | :. ZOEK IN R|
00000E10: 49 43 48 54 49 4E 47 20 52 2E 20 20 20 20 2A 2A |ICHTING R. **|
00000E20: 20 51 20 2A 2A 00 5E 16 F0 00 97 20 42 AA 58 58 | Q **.^.... B.XX|
00000E30: 2C 30 31 3A 58 B2 58 49 3A 59 B2 59 49 3A 81 20 |,01:X.XI:Y.YI:. |
00000E40: 51 B2 32 20 A4 20 4C 3A 8D 20 31 30 3A 97 20 42 |Q.2 . L:. 10:. B|
00000E50: AA 58 AA 34 30 AC 59 2C 30 31 3A 82 20 51 00 90 |.X.40.Y,01:. Q..|
00000E60: 16 FA 00 8D 20 32 30 20 20 20 20 20 20 20 20 20 |.... 20 |
00000E70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E80: 20 20 20 20 20 20 20 3A 8F 20 57 41 43 48 54 2E | :. WACHT.|
00000E90: 00 C9 16 04 01 97 20 42 AA 58 58 2C 31 33 3A 58 |...... B.XX,13:X|
00000EA0: B2 58 49 3A 59 B2 59 49 3A 81 20 51 B2 32 20 A4 |.XI:Y.YI:. Q.2 .|
00000EB0: 20 4C 3A 8D 20 31 30 3A 97 20 42 AA 58 AA 34 30 | L:. 10:. B.X.40|
00000EC0: AC 59 2C 31 33 3A 82 20 51 00 14 17 18 01 82 20 |.Y,13:. Q...... |
00000ED0: 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |R |
00000EE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000EF0: 20 20 20 3A 8F 20 56 4F 4C 47 45 4E 44 45 20 52 | :. VOLGENDE R|
00000F00: 49 43 48 54 49 4E 47 2E 20 20 20 20 20 2A 2A 20 |ICHTING. ** |
00000F10: 52 20 2A 2A 00 5F 17 22 01 82 20 58 49 3A 52 59 |R **._.".. XI:RY|
00000F20: B2 52 59 AA 34 30 20 20 20 20 20 20 20 20 20 20 |.RY.40 |
00000F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.|
00000F40: 20 56 4F 4C 47 45 4E 44 45 20 4C 45 54 54 45 52 | VOLGENDE LETTER|
00000F50: 2E 20 20 20 20 20 20 20 2A 2A 20 53 20 2A 2A 00 |. ** S **.|
00000F60: A7 17 27 01 82 20 59 49 3A 89 20 32 30 31 20 20 |..'.. YI:. 201 |
00000F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F80: 20 20 20 20 20 20 3A 8F 20 56 4F 4C 47 45 4E 44 | :. VOLGEND|
00000F90: 45 20 52 45 47 45 4C 2E 20 20 20 20 20 20 20 20 |E REGEL. |
00000FA0: 2A 2A 20 54 20 2A 2A 00 E9 17 2C 01 8D 20 34 35 |** T **...,.. 45|
00000FB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FD0: 3A 8F 20 42 4F 4F 44 53 43 48 41 50 50 45 4E 56 |:. BOODSCHAPPENV|
00000FE0: 45 4C 44 20 4C 45 45 47 2E 00 1B 18 2D 01 99 20 |ELD LEEG....-.. |
00000FF0: 22 46 55 4E 43 54 49 45 54 4F 45 54 53 20 46 37 |"FUNCTIETOETS F7|
00001000: 3A 20 4F 56 45 52 47 45 42 4C 45 56 45 4E 20 4C |: OVERGEBLEVEN L|
00001010: 45 54 54 45 52 53 2E 20 20 22 3B 00 4D 18 2E 01 |ETTERS. ";.M...|
00001020: 99 20 22 46 55 4E 43 54 49 45 54 4F 45 54 53 20 |. "FUNCTIETOETS |
00001030: 46 35 3A 20 4B 4C 45 55 52 20 56 45 4C 44 20 4F |F5: KLEUR VELD O|
00001040: 50 4E 49 45 55 57 20 49 4E 2E 20 22 3B 00 7F 18 |PNIEUW IN. ";...|
00001050: 2F 01 99 20 22 46 55 4E 43 54 49 45 54 4F 45 54 |/.. "FUNCTIETOET|
00001060: 53 20 46 33 3A 20 43 4F 52 52 45 43 54 49 45 2F |S F3: CORRECTIE/|
00001070: 4E 49 45 55 57 20 49 4E 2E 20 20 20 20 22 3B 00 |NIEUW IN. ";.|
00001080: B1 18 30 01 99 20 22 46 55 4E 43 54 49 45 54 4F |..0.. "FUNCTIETO|
00001090: 45 54 53 20 46 31 3A 20 4E 49 45 55 57 20 53 50 |ETS F1: NIEUW SP|
000010A0: 45 4C 2E 20 20 20 20 20 20 20 20 20 20 20 20 22 |EL. "|
000010B0: 3B 00 BA 18 36 01 8D 20 35 30 00 F8 18 40 01 8B |;...6.. 50...@..|
000010C0: 20 4B 24 B2 C7 28 31 33 36 29 20 A7 20 33 33 30 | K$..(136) . 330|
000010D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000010E0: 3A 8F 20 4F 56 45 52 47 45 42 4C 45 56 45 4E 20 |:. OVERGEBLEVEN |
000010F0: 4C 45 54 54 45 52 53 2E 00 36 19 41 01 8B 20 4B |LETTERS..6.A.. K|
00001100: 24 B2 C7 28 31 33 35 29 20 A7 20 8D 20 33 30 3A |$..(135) . . 30:|
00001110: 89 20 32 30 31 20 20 3A 8F 20 4F 4E 54 4B 4C 45 |. 201 :. ONTKLE|
00001120: 55 52 20 45 4E 20 4E 49 45 55 57 20 5A 4F 45 4B |UR EN NIEUW ZOEK|
00001130: 57 4F 4F 52 44 2E 00 68 19 42 01 8B 20 4B 24 B2 |WOORD..h.B.. K$.|
00001140: C7 28 31 33 34 29 20 A7 20 8D 20 33 30 3A 89 20 |.(134) . . 30:. |
00001150: 31 31 34 20 20 3A 8F 20 43 4F 52 52 45 43 54 49 |114 :. CORRECTI|
00001160: 45 2F 4E 49 45 55 57 2E 00 9C 19 43 01 8B 20 4B |E/NIEUW....C.. K|
00001170: 24 B2 C7 28 31 33 33 29 20 A7 20 31 30 35 20 20 |$..(133) . 105 |
00001180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.|
00001190: 20 4E 49 45 55 57 20 53 50 45 4C 2E 00 CB 19 44 | NIEUW SPEL....D|
000011A0: 01 8D 20 34 35 3A 99 20 22 46 4F 55 54 45 20 54 |.. 45:. "FOUTE T|
000011B0: 4F 45 54 53 2E 20 4E 4F 47 20 45 45 4E 53 2E 22 |OETS. NOG EENS."|
000011C0: 3A 8D 20 32 30 3A 89 20 33 30 30 00 05 1A 4A 01 |:. 20:. 300...J.|
000011D0: 4F 24 B2 22 22 3A 4E B2 30 3A 52 59 B2 34 30 AC |O$."":N.0:RY.40.|
000011E0: 59 4F 3A 81 20 59 49 B2 59 4F 20 A4 20 59 45 3A |YO:. YI.YO . YE:|
000011F0: 81 20 58 49 B2 58 4F 20 A4 20 58 45 3A 58 58 B2 |. XI.XO . XE:XX.|
00001200: 58 49 AA 52 59 00 39 1A 4B 01 8B 20 28 C2 28 42 |XI.RY.9.K.. (.(B|
00001210: AA 58 58 29 20 AF 20 31 35 29 B2 31 30 20 A7 20 |.XX) . 15).10 . |
00001220: 4F 24 B2 4F 24 AA C7 28 C2 28 41 AA 58 58 29 AA |O$.O$..(.(A.XX).|
00001230: 36 34 29 3A 4E B2 4E AA 31 00 7B 1A 4C 01 8B 20 |64):N.N.1.{.L.. |
00001240: 4E B1 36 30 20 A7 20 33 33 34 20 20 20 20 20 20 |N.60 . 334 |
00001250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001260: 20 20 3A 8F 20 36 30 20 4C 45 54 54 45 52 53 20 | :. 60 LETTERS |
00001270: 49 53 20 54 45 20 4C 41 4E 47 2E 00 92 1A 4D 01 |IS TE LANG....M.|
00001280: 82 20 58 49 3A 52 59 B2 52 59 AA 34 30 3A 82 20 |. XI:RY.RY.40:. |
00001290: 59 49 00 B3 1A 4E 01 8D 20 34 35 3A 99 20 22 4F |YI...N.. 45:. "O|
000012A0: 56 45 52 49 47 45 20 4C 45 54 54 45 52 53 3A 20 |VERIGE LETTERS: |
000012B0: 22 4F 24 00 F7 1A 4F 01 99 20 22 44 52 55 4B 20 |"O$...O.. "DRUK |
000012C0: 3C 20 20 26 20 20 20 3E 20 56 4F 4F 52 20 45 49 |< & > VOOR EI|
000012D0: 4E 44 2E 20 22 3A 99 20 55 24 22 44 52 55 4B 20 |ND. ":. U$"DRUK |
000012E0: 3C 52 45 54 55 52 4E 3E 20 56 4F 4F 52 20 56 45 |<RETURN> VOOR VE|
000012F0: 52 56 4F 4C 47 2E 22 00 0F 1B 50 01 8D 20 35 30 |RVOLG."...P.. 50|
00001300: 3A 8B 20 4B 24 B2 22 26 22 20 A7 20 33 34 30 00 |:. K$."&" . 340.|
00001310: 24 1B 51 01 8B 20 4B 24 B2 C7 28 31 33 29 20 A7 |$.Q.. K$..(13) .|
00001320: 20 32 30 31 00 3D 1B 52 01 8D 20 34 35 3A 99 20 | 201.=.R.. 45:. |
00001330: 22 46 4F 55 54 2E 22 3A 89 20 33 33 35 00 67 1B |"FOUT.":. 335.g.|
00001340: 54 01 8D 20 34 35 3A 99 20 22 20 45 49 4E 44 20 |T.. 45:. " EIND |
00001350: 56 41 4E 20 57 4F 4F 52 44 5A 4F 45 4B 45 52 2E |VAN WOORDZOEKER.|
00001360: 22 3A 89 20 34 39 30 00 92 1B 5E 01 94 20 20 20 |":. 490...^.. |
00001370: 22 54 45 4D 57 22 2C 38 3A 99 3A 99 20 22 20 20 |"TEMW",8:.:. " |
00001380: 20 47 45 52 45 44 20 4E 41 41 52 20 54 45 4D 57 | GERED NAAR TEMW|
00001390: 2E 22 00 BE 1B 63 01 95 20 22 54 45 4D 57 22 2C |."...c.. "TEMW",|
000013A0: 38 3A 99 3A 99 20 22 20 20 20 54 45 4D 57 20 47 |8:.:. " TEMW G|
000013B0: 45 43 4F 4E 54 52 4F 4C 45 45 52 44 2E 22 00 DD |ECONTROLEERD."..|
000013C0: 1B 68 01 9F 20 35 2C 38 2C 31 35 2C 22 53 30 3A |.h.. 5,8,15,"S0:|
000013D0: 57 4F 4F 52 44 5A 2E 42 41 53 2F 4F 22 00 07 1C |WOORDZ.BAS/O"...|
000013E0: 6D 01 98 35 2C 20 20 20 20 22 52 30 3A 57 4F 4F |m..5, "R0:WOO|
000013F0: 52 44 5A 2E 42 41 53 2F 4F 3D 30 3A 57 4F 4F 52 |RDZ.BAS/O=0:WOOR|
00001400: 44 5A 2E 42 41 53 22 00 29 1C 72 01 98 35 2C 20 |DZ.BAS".).r..5, |
00001410: 20 20 20 22 52 30 3A 57 4F 4F 52 44 5A 2E 42 41 | "R0:WOORDZ.BA|
00001420: 53 3D 30 3A 54 45 4D 57 22 00 31 1C 77 01 A0 20 |S=0:TEMW".1.w.. |
00001430: 35 00 5F 1C 7C 01 99 3A 99 20 22 56 45 52 53 49 |5._.|..:. "VERSI|
00001440: 45 5A 45 54 20 57 4F 4F 52 44 5A 2E 42 41 53 20 |EZET WOORDZ.BAS |
00001450: 4B 4C 41 41 52 2E 22 3A 99 3A 89 20 34 39 30 00 |KLAAR.":.:. 490.|
00001460: 91 1C 90 01 9F 20 32 2C 34 3A 98 32 2C C7 28 32 |..... 2,4:.2,.(2|
00001470: 37 29 22 21 22 C7 28 31 29 C7 28 32 37 29 C7 28 |7)"!".(1).(27).(|
00001480: 31 30 38 29 C7 28 31 30 29 C7 28 32 37 29 22 30 |108).(10).(27)"0|
00001490: 22 00 9F 1C 91 01 9D 20 32 3A 89 20 34 39 30 00 |"...... 2:. 490.|
000014A0: C9 1C 95 01 98 32 2C 20 C7 28 32 37 29 22 40 20 |.....2, .(27)"@ |
000014B0: 45 49 4E 44 20 56 41 4E 20 4C 49 53 54 2E 22 3A |EIND VAN LIST.":|
000014C0: A0 20 32 3A 89 20 34 39 30 00 CF 1C EA 01 80 00 |. 2:. 490.......|
000014D0: 00 00 |.. |
..M.... 100 :. DRAAIEN
(RUN ). PROGRAMMA : WOORDZ.BAS ....
... 100 :. DRAAIEN (RUN
). DISK : DEMO-1(COPY.)......
350 :. VERSIEZETTER (RUN 3
). TAAL : BASIC..,.... 400
:. LIJST OP PRINTER (RUN 4 ). DATUM
: 19 NOV.1992..Y.... 405 :
. HERZET PRINTER (GOTO 5). PROGRAMMEUR
: J.H.VAN RIJN.......N.... MET BEHUL
P VAN DIT PROGRAMMA KAN MEN WOORDZOEKERS
OPLOSSEN MET DE HAND..T.....#...V.0:XP.
X.I(R):YP.Y.J(R) :. SUBP
ROGRAMMA INC(R). ***.C.... XP.XO
. YP.YO . XP.XE . YP.YE . V.1:. :. BU
ITEN KADER......X.XP:Y.YP:.
:. NORMAAL....
... I.1 . 2000:. I:. :. WACHT.
***.2.... Y.40.YO
. 40.YE . 40 :. VELD LICHTROO
D. ***.W.... X.XO . XE:. B.X
.Y,10:. X:. Y:.. .(.. Y.40.YO . 40.YE .
40 :. VELD MET STIPPEN.
***.E.).. X.XO . XE:. A.X.Y,46:. X:
. Y:....-.. H$B$B$B$B$H$;:.
:. BOODSCHAPPENVELD LEEG. ***.T.2.
. K$:. K$."" . 50 :. TOE
TS-INPUT. ***.Z.3.....D..
I(7),J(7) :. I
NCREMENTVECTOREN....E.I(0)..1:I(1)..1:I(
2). 0:I(3)..1 :I(4)..1:I(5)..1:I(
6). 0:I(7)..1.1.F.J(0). 0:J(1)..1:J(2)..
1:J(3)..1 :J(4). 0:J(5)..1:J(6)..
1:J(7)..1.W.G.B$."
":U$.G(145):H$.G(019).
..H..
HOOFDPROGRAMMA....I.. G(147)"
W O O R D Z O E K E R .":.:....J.. "AA
NTAL LETTERS HORIZONTAAL":..3.K.. "HOOGS
TENS DERTIG";H:. H.30 . 106.Z.L..:.:. "A
ANTAL LETTERS VERTICAAL":....M.. "HOOGST
ENS ACHTTIEN";V:. V.18 . 108...N.XO.20..
(H.2):XE.XO.H.1:YO.14..(V.2):YE.YO.V.1..
.O.A.B(648).256:B.55296:. 646,15:. 53280
,11:. 53281,11.,.P.. I.000 . 999:.(A.I),
102:.(B.I),08:. I:. 30 :. ** A **.I.Q
.. 40 :.
VELD MET STIPPEN....R.. 45
:. BOODSCHAPPENVELD LE
EG....S.. " LETTERS ACHTER ELKAAR INBREN
GEN. ";...T.. " LOPERTOETSEN NORMA
AL. <CLR>:VELD LEEG. ";.A.U.. " AAN HET
EIND <RETURN> INDRUKKEN. ";...X.X.
XO:Y.YO:. 130 :. ZO
EKERVELD LINKSBOVEN. ** B **.B.}.. 10
:. INCREMEN
T......Z.A.X.40.Y:. Z,B(Z).128
:. REVERSE. ** C **.N....
50:. Z,B(Z).128 :. TOETS EN
NORMAAL. ** D **.|.... K$.G(019) .
120 :. HOME....... K$.G(
029) . R.0:. 125 :. NAAR RECHTS...
.... K$.G(157) . R.4:. 125 :. NAAR
LINKS....... K$.G(145) . R.6:. 125
:. OMHOOG..9.... K$.G(017) . R.2:. 125
:. OMLAAG..|.... K$.G(147) . 113
:. CLEAR, POETS ALLE LETT
ERS....... K$.G(013) . 200
:. RETURN = ZOEKEN......D.F(K$):. D.64
. D.90 . 130 :. LETTER?.(.... Z,D.
64:X.X.1:. X..XE . 130 :. NIEUW TEKE
N EN 1 N.RECHTS..J...X.XO:Y.Y.1:. Y..YE
. 130 :. REGEL VOL, EEN OMLAA
G.. .... 120
:. VELD VOL..H.H.H.XE.XO.1:G.YE.YO.1
:M.H:. G.H . M.G...I.. 45:. " ZOEKWOORD
GEVRAAGD.":L$."LETTERS":. M.1 . L$."LETT
ER".G.J.. U$"HOOGSTENS";M;L$" INBRENGEN(
&=EIND)."U$ :. VERZOEK....K.. "WOORD";Z$
:. Z$."&" . 300 :. INGEVEN; & = UIT.
...L.L.C(Z$):. L.1 . L.M . 201 :.
LEEG OF TE LANG....R.RY.40.YO:. YI.YO .
YE:. XI.XO . XE:XX.XI.RY:Y$.G(B(A.XX).6
4).>.S.. Y$..H(Z$,1) . 290
:. ZOEK BEGIN..X.T.. L.2
. . B.XX,01:. 20:. B.XX,13:. 290 :. EE
N TEKEN....... R.0 . 7:X.XI:Y.YI:. Q.2 .
L:. 10:. V.1 . 280.Z...Y$.G(B(A.X.40.Y)
.64):. Y$..J(Z$,Q,1) . 280.%.... Q
:. ZOEK IN R
ICHTING R. ** Q **.^.... B.XX,01:X.XI
:Y.YI:. Q.2 . L:. 10:. B.X.40.Y,01:. Q..
.... 20 :
. WACHT..I.... B.XX,13:X.XI:Y.YI:. Q.2 .
L:. 10:. B.X.40.Y,13:. Q...... R
:. VOLGENDE R
ICHTING. ** R **._.".. XI:RY.RY.40
:. VOLGENDE LETTER
. ** S **...'.. YI:. 201
:. VOLGENDE REGEL.
** T **...,.. 45
:. BOODSCHAPPENVELD LEEG....-..
"FUNCTIETOETS F7: OVERGEBLEVEN LETTERS.
";.M.... "FUNCTIETOETS F5: KLEUR VELD O
PNIEUW IN. ";../.. "FUNCTIETOETS F3: CO
RRECTIE/NIEUW IN. ";...0.. "FUNCTIETO
ETS F1: NIEUW SPEL. ";...6..
50...@.. K$.G(136) . 330
:. OVERGEBLEVEN LETTERS..6.A.. K$.G(135)
. . 30:. 201 :. ONTKLEUR EN NIEUW ZOEK
WOORD..H.B.. K$.G(134) . . 30:. 114 :.
CORRECTIE/NIEUW....C.. K$.G(133) . 105
:. NIEUW SPEL..K.D.. 45:.
"FOUTE TOETS. NOG EENS.":. 20:. 300...J.
O$."":N.0:RY.40.YO:. YI.YO . YE:. XI.XO
. XE:XX.XI.RY.9.K.. (B(B.XX) . 15).10 .
O$.O$.G(B(A.XX).64):N.N.1.{.L.. N.60 . 3
34 :. 60 LETTERS
IS TE LANG....M.. XI:RY.RY.40:. YI...N..
45:. "OVERIGE LETTERS: "O$...O.. "DRUK
< & > VOOR EIND. ":. U$"DRUK <RETURN>
VOOR VERVOLG."...P.. 50:. K$."&" . 340.
$.Q.. K$.G(13) . 201.=.R.. 45:. "FOUT.":
. 335.G.T.. 45:. " EIND VAN WOORDZOEKER.
":. 490...^.. "TEMW",8:.:. " GERED N
AAR TEMW."...C.. "TEMW",8:.:. " TEMW G
ECONTROLEERD."...H.. 5,8,15,"S0:WOORDZ.B
AS/O"...M..5, "R0:WOORDZ.BAS/O=0:WOOR
DZ.BAS".).R..5, "R0:WOORDZ.BAS=0:TEMW
".1.W. 5._.|..:. "VERSIEZET WOORDZ.BAS
KLAAR.":.:. 490...... 2,4:.2,G(27)"!"G(1
)G(27)G(108)G(10)G(27)"0"...... 2:. 490.
I....2, G(27)"@ EIND VAN LIST.": 2:. 49
0.O.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL