POET IN A CAN
FILE INFORMATION
FILENAME(S): POET IN A CAN
FILE TYPE(S): PRG
FILE SIZE: 5.8K
FIRST SEEN: 2025-11-30 01:08:06
APPEARS ON: 3 disk(s)
FILE HASH
abff47295c645287876397794de971e7d9f1cb8e896d52a93bc19f674286b5d1
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | POET IN A CAN | PRG | Treasure Chest - Wolfgang Rauprich | 22 | 2 | DOWNLOAD FILE |
| SPIELE | POET IN A CAN | PRG | Treasure Chest - Wolfgang Rauprich | 26 | 1 | DOWNLOAD FILE |
| S PIELE | POET IN A CAN | PRG | Treasure Chest - Wolfgang Rauprich | 26 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 00 00 9F 31 2C 34 00 31 08 01 00 8F |.......1,4.1....|
00000010: 20 2A 20 20 20 20 20 20 20 50 4F 45 54 52 59 20 | * POETRY |
00000020: 47 45 4E 45 52 41 54 4F 52 20 20 20 20 20 20 20 |GENERATOR |
00000030: 2A 00 58 08 02 00 8F 20 2A 20 20 20 20 20 20 20 |*.X.... * |
00000040: 2D 2D 2D 2D 2D 2D 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |------ ---------|
00000050: 20 20 20 20 20 20 20 2A 00 7F 08 03 00 8F 20 2A | *...... *|
00000060: 20 46 52 4F 4D 20 20 2D 2D 20 20 22 54 48 45 20 | FROM -- "THE |
00000070: 42 41 53 49 43 20 49 44 45 41 22 20 20 20 2A 00 |BASIC IDEA" *.|
00000080: A6 08 04 00 8F 20 2A 20 42 59 20 20 2D 2D 2D 2D |..... * BY ----|
00000090: 20 20 20 52 49 43 48 41 52 44 20 46 4F 52 53 59 | RICHARD FORSY|
000000A0: 54 48 2E 20 20 2A 00 CD 08 05 00 8F 20 2A 20 20 |TH. *...... * |
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 F4 08 | *...|
000000D0: 06 00 8F 20 2A 20 4D 4F 44 49 46 49 45 44 20 46 |... * MODIFIED F|
000000E0: 4F 52 20 54 48 45 20 50 45 54 2C 20 42 59 20 2D |OR THE PET, BY -|
000000F0: 2D 20 20 2A 00 1B 09 07 00 8F 20 2A 20 28 43 29 |- *...... * (C)|
00000100: 20 52 2E 43 2E 47 45 4E 54 52 59 20 20 20 20 31 | R.C.GENTRY 1|
00000110: 39 2F 30 39 2F 37 38 2E 20 20 2A 00 25 09 08 00 |9/09/78. *.%...|
00000120: 98 31 3A 98 31 00 3D 09 0A 00 96 20 A5 4E 28 41 |.1:.1.=.... .N(A|
00000130: 29 B2 B5 28 BB 28 31 29 AC 41 AA 31 29 00 51 09 |)..(.(1).A.1).Q.|
00000140: 14 00 86 20 57 28 31 30 29 2C 57 24 28 32 35 30 |... W(10),W$(250|
00000150: 29 00 60 09 32 00 97 20 35 33 32 37 32 2C 32 33 |).`.2.. 53272,23|
00000160: 00 7D 09 64 00 8F 2A 2A 52 45 41 44 20 57 4F 52 |.}.d..**READ WOR|
00000170: 44 53 20 46 52 4F 4D 20 44 41 54 41 3A 00 90 09 |DS FROM DATA:...|
00000180: 6E 00 88 20 57 28 30 29 B2 30 20 3A 20 4B B2 30 |n.. W(0).0 : K.0|
00000190: 00 B0 09 70 00 81 20 49 B2 31 20 A4 20 31 30 20 |...p.. I.1 . 10 |
000001A0: 3A 8F 20 31 30 20 57 4F 52 44 2D 54 59 50 45 53 |:. 10 WORD-TYPES|
000001B0: 00 B9 09 73 00 87 20 58 24 00 DA 09 78 00 8B 20 |...s.. X$...x.. |
000001C0: 58 24 B2 22 2A 2A 2A 22 20 A7 31 35 30 20 3A 8F |X$."***" .150 :.|
000001D0: 20 45 4E 44 4D 41 52 4B 45 52 00 E4 09 7A 00 4B | ENDMARKER...z.K|
000001E0: B2 4B AA 31 00 F1 09 7D 00 57 24 28 4B 29 B2 58 |.K.1...}.W$(K).X|
000001F0: 24 00 FB 09 82 00 89 20 31 31 35 00 1E 0A 96 00 |$...... 115.....|
00000200: 57 28 49 29 B2 4B 20 3A 8F 20 50 4C 41 43 45 20 |W(I).K :. PLACE |
00000210: 4F 46 20 4C 41 53 54 20 49 2D 54 59 50 45 00 26 |OF LAST I-TYPE.&|
00000220: 0A 9B 00 82 20 49 00 4F 0A BE 00 99 22 93 11 11 |.... I.O...."...|
00000230: 11 11 D4 C8 C9 D3 A0 D0 D2 CF C7 D2 C1 CD A0 CE |................|
00000240: C5 C5 C4 D3 A0 C1 A0 D0 D2 C9 CE D4 C5 D2 22 00 |..............".|
00000250: 71 0A C8 00 99 20 22 11 11 11 C8 CF D7 A0 CD C1 |q.... ".........|
00000260: CE D9 A0 C3 CF CD D0 CF D3 C9 D4 C9 CF CE D3 22 |..............."|
00000270: 3B 00 79 0A D2 00 85 20 4B 00 87 0A DC 00 81 20 |;.y.... K...... |
00000280: 43 B2 31 20 A4 20 4B 00 94 0A DE 00 52 B2 BB 28 |C.1 . K.....R..(|
00000290: AB 54 49 29 00 9B 0A E1 00 98 31 00 A2 0A E4 00 |.TI)......1.....|
000002A0: 98 31 00 AC 0A E6 00 4C 24 B2 22 22 00 B6 0A F0 |.1.....L$.""....|
000002B0: 00 55 43 B2 AB 31 00 D2 0A FA 00 8D 20 34 35 30 |.UC..1...... 450|
000002C0: 30 20 3A 8F 20 54 49 54 4C 45 20 52 4F 55 54 49 |0 :. TITLE ROUTI|
000002D0: 4E 45 00 E7 0A FF 00 8B 20 C3 28 4C 24 29 B1 36 |NE...... .(L$).6|
000002E0: 32 20 89 20 32 33 30 00 FF 0A 00 01 98 31 2C 22 |2 . 230......1,"|
000002F0: 43 CF CD D0 CF D3 C9 D4 C9 CF CE 20 20 20 22 00 |C.......... ".|
00000300: 1D 0B 01 01 4C 24 B2 20 20 20 22 C5 CE D4 C9 D4 |....L$. ".....|
00000310: CC C5 C4 3A 20 20 20 20 20 22 AA 4C 24 00 28 0B |...: ".L$.(.|
00000320: 04 01 8D 20 34 38 30 30 00 2E 0B 0E 01 99 00 42 |... 4800.......B|
00000330: 0B 18 01 88 20 4E B2 A5 4E 28 38 29 AA A5 4E 28 |.... N..N(8)..N(|
00000340: 38 29 00 51 0B 22 01 88 20 4E 39 B2 A5 4E 28 38 |8).Q.".. N9..N(8|
00000350: 29 00 5F 0B 2C 01 81 20 53 B2 31 20 A4 20 4E 00 |)._.,.. S.1 . N.|
00000360: 71 0B 90 01 55 43 B2 AA 31 20 3A 20 4C 24 B2 22 |q...UC..1 : L$."|
00000370: 22 00 82 0B F4 01 8F 2A 2A 53 45 4E 54 45 4E 43 |"......**SENTENC|
00000380: 45 3A 00 9C 0B FE 01 8D 20 32 30 30 30 20 3A 8F |E:...... 2000 :.|
00000390: 20 4E 4F 55 4E 2D 50 48 52 41 53 45 00 B1 0B 00 | NOUN-PHRASE....|
000003A0: 02 8B 20 C3 28 4C 24 29 B1 37 35 20 89 20 34 30 |.. .(L$).75 . 40|
000003B0: 30 00 BC 0B 03 02 8D 20 34 38 30 30 00 C8 0B 04 |0...... 4800....|
000003C0: 02 4C 24 B2 22 20 20 22 00 E7 0B 08 02 8B BB 28 |.L$." ".......(|
000003D0: 31 29 B1 2E 34 A7 36 30 30 20 3A 8F 20 55 53 45 |1)..4.600 :. USE|
000003E0: 20 42 45 2D 52 54 4E 00 01 0C 12 02 8D 20 33 30 | BE-RTN...... 30|
000003F0: 30 30 20 3A 8F 20 56 45 52 42 2D 50 48 52 41 53 |00 :. VERB-PHRAS|
00000400: 45 00 1D 0C 26 02 89 20 20 37 30 30 20 20 3A 8F |E...&.. 700 :.|
00000410: 20 45 4E 44 20 53 45 4E 54 45 4E 43 45 00 36 0C | END SENTENCE.6.|
00000420: 58 02 8D 20 33 35 30 30 20 3A 8F 20 42 45 2D 52 |X.. 3500 :. BE-R|
00000430: 4F 55 54 49 4E 45 00 4E 0C 62 02 8D 20 34 30 30 |OUTINE.N.b.. 400|
00000440: 30 20 3A 8F 20 50 52 45 44 49 43 41 54 45 00 5C |0 :. PREDICATE.\|
00000450: 0C BC 02 8F 2A 45 4E 44 49 4E 47 3A 00 72 0C C1 |....*ENDING:.r..|
00000460: 02 8B 20 C3 28 4C 24 29 B1 37 35 20 20 89 20 35 |.. .(L$).75 . 5|
00000470: 31 36 00 8F 0C C6 02 8B 20 BB 28 31 29 B1 2E 31 |16...... .(1)..1|
00000480: 32 35 20 A7 20 38 30 30 20 3A 8F 20 22 2E 22 00 |25 . 800 :. ".".|
00000490: A6 0C D0 02 4C 24 B2 4C 24 AA 22 2C 22 20 3A 20 |....L$.L$."," : |
000004A0: 8D 20 34 38 30 30 00 C4 0C DA 02 54 B2 38 20 20 |. 4800.....T.8 |
000004B0: 20 20 20 20 20 20 3A 8F 20 43 4F 4E 4A 55 4E 43 | :. CONJUNC|
000004C0: 54 49 4F 4E 00 E0 0C E4 02 8D 20 31 30 30 30 20 |TION...... 1000 |
000004D0: 3A 8F 20 57 4F 52 44 20 53 45 4C 45 43 54 4F 52 |:. WORD SELECTOR|
000004E0: 00 F6 0C EE 02 89 20 35 30 30 20 20 20 3A 8F 20 |...... 500 :. |
000004F0: 52 45 50 45 41 54 00 0D 0D 20 03 4C 24 B2 4C 24 |REPEAT... .L$.L$|
00000500: AA 22 2E 22 20 3A 20 8D 20 34 38 30 30 00 1F 0D |."." : . 4800...|
00000510: 2A 03 8B 20 53 B3 B1 4E 39 20 A7 20 38 33 30 00 |*.. S..N9 . 830.|
00000520: 25 0D 34 03 99 00 3E 0D 3E 03 82 20 53 20 3A 8F |%.4...>.>.. S :.|
00000530: 20 4E 45 58 54 20 53 45 4E 54 45 4E 43 45 00 50 | NEXT SENTENCE.P|
00000540: 0D 48 03 99 20 20 3A 8F 20 4E 45 57 4C 49 4E 45 |.H.. :. NEWLINE|
00000550: 00 6C 0D 52 03 82 20 43 20 3A 8F 20 4E 45 58 54 |.l.R.. C :. NEXT|
00000560: 20 43 4F 4D 50 4F 53 49 54 49 4F 4E 00 72 0D 5C | COMPOSITION.r.\|
00000570: 03 99 00 7D 0D 70 03 89 20 39 39 39 39 00 96 0D |...}.p.. 9999...|
00000580: 84 03 59 24 B2 58 24 20 3A 20 8B 20 55 43 B3 30 |..Y$.X$ : . UC.0|
00000590: 20 89 20 39 38 30 00 AA 0D 8E 03 59 24 B2 22 22 | . 980.....Y$.""|
000005A0: 20 3A 20 4C B2 C3 28 58 24 29 00 CA 0D 98 03 43 | : L..(X$).....C|
000005B0: 24 B2 CA 28 58 24 2C 4C 2C 31 29 20 3A 20 8B 20 |$..(X$,L,1) : . |
000005C0: 4C B2 55 43 20 89 20 39 34 30 00 00 0E A2 03 8B |L.UC . 940......|
000005D0: 20 43 24 B2 B1 22 41 22 20 AF 20 43 24 B3 B2 22 | C$.."A" . C$.."|
000005E0: 5A 22 20 A7 20 20 20 20 20 20 20 20 20 20 20 20 |Z" . |
000005F0: 20 43 24 B2 C7 28 C6 28 43 24 29 AA 31 32 38 29 | C$..(.(C$).128)|
00000600: 00 0D 0E AC 03 59 24 B2 43 24 AA 59 24 00 17 0E |.....Y$.C$.Y$...|
00000610: B6 03 4C B2 4C AB 31 00 27 0E C0 03 8B 20 4C B1 |..L.L.1.'.... L.|
00000620: 30 20 89 20 39 32 30 00 30 0E CA 03 55 43 B2 30 |0 . 920.0...UC.0|
00000630: 00 4B 0E D4 03 4C 24 B2 4C 24 AA 59 24 20 3A 20 |.K...L$.L$.Y$ : |
00000640: 4C 24 B2 C8 28 4C 24 2C 38 30 29 00 51 0E DE 03 |L$..(L$,80).Q...|
00000650: 8E 00 6F 0E E8 03 8F 2A 2A 57 4F 52 44 2D 53 45 |..o....**WORD-SE|
00000660: 4C 45 43 54 4F 52 28 54 3D 54 59 50 45 29 3A 00 |LECTOR(T=TYPE):.|
00000670: 90 0E E9 03 4E 30 B2 57 28 54 AB 31 29 20 3A 8F |....N0.W(T.1) :.|
00000680: 20 4C 41 53 54 20 57 4F 52 44 20 49 4E 20 57 24 | LAST WORD IN W$|
00000690: 00 A2 0E ED 03 49 B2 A5 4E 28 57 28 54 29 AB 4E |.....I..N(W(T).N|
000006A0: 30 29 00 C4 0E F2 03 4C 24 B2 4C 24 AA 22 20 22 |0).....L$.L$." "|
000006B0: 20 3A 58 24 B2 57 24 28 4E 30 AA 49 29 20 3A 8D | :X$.W$(N0.I) :.|
000006C0: 20 39 30 30 00 CA 0E FC 03 8E 00 DE 0E D0 07 8F | 900............|
000006D0: 2A 2A 4E 4F 55 4E 2D 50 48 52 41 53 45 3A 00 FC |**NOUN-PHRASE:..|
000006E0: 0E DA 07 8B BB 28 31 29 B1 2E 32 A7 32 30 35 30 |.....(1)..2.2050|
000006F0: 20 3A 8F 20 55 53 45 20 4E 4F 55 4E 00 12 0F E4 | :. USE NOUN....|
00000700: 07 54 B2 36 20 20 20 20 20 20 20 3A 8F 20 4E 41 |.T.6 :. NA|
00000710: 4D 45 00 1D 0F EE 07 8D 20 31 30 30 30 00 32 0F |ME...... 1000.2.|
00000720: F8 07 89 20 32 32 30 30 20 3A 8F 20 45 4E 44 49 |... 2200 :. ENDI|
00000730: 4E 47 00 43 0F 02 08 8F 2A 55 53 49 4E 47 20 4E |NG.C....*USING N|
00000740: 4F 55 4E 00 5C 0F 07 08 54 B2 31 30 20 20 20 20 |OUN.\...T.10 |
00000750: 20 20 3A 8F 20 41 52 54 49 43 4C 45 00 67 0F 0C | :. ARTICLE.g..|
00000760: 08 8D 20 31 30 30 30 00 7D 0F 16 08 8B 20 BB 28 |.. 1000.}.... .(|
00000770: 31 29 B1 2E 32 35 20 A7 20 32 30 39 30 00 96 0F |1)..25 . 2090...|
00000780: 20 08 8D 20 32 35 30 30 20 3A 8F 20 41 44 4A 2D | .. 2500 :. ADJ-|
00000790: 50 48 52 41 53 45 00 AD 0F 2A 08 54 B2 32 20 20 |PHRASE...*.T.2 |
000007A0: 20 20 20 20 20 20 3A 8F 20 4E 4F 55 4E 00 B8 0F | :. NOUN...|
000007B0: 34 08 8D 20 31 30 30 30 00 CD 0F 3E 08 8B 20 BB |4.. 1000...>.. .|
000007C0: 28 31 29 B1 2E 31 20 A7 20 32 31 35 30 00 ED 0F |(1)..1 . 2150...|
000007D0: 48 08 58 24 B2 22 27 53 22 20 3A 8D 39 30 30 20 |H.X$."'S" :.900 |
000007E0: 3A 8F 20 50 4F 53 53 45 53 53 49 56 45 00 F8 0F |:. POSSESSIVE...|
000007F0: 52 08 89 20 32 30 37 30 00 06 10 66 08 8F 2A 45 |R.. 2070...f..*E|
00000800: 4E 44 49 4E 47 3A 00 1D 10 98 08 8B 20 BB 28 31 |NDING:...... .(1|
00000810: 29 B1 2E 31 32 35 20 A7 20 32 32 35 30 00 37 10 |)..125 . 2250.7.|
00000820: AC 08 54 B2 37 20 20 20 20 20 20 20 3A 8F 20 4C |..T.7 :. L|
00000830: 49 4E 4B 57 4F 52 44 00 42 10 B6 08 8D 20 31 30 |INKWORD.B.... 10|
00000840: 30 30 00 57 10 C0 08 89 20 32 30 30 30 20 3A 8F |00.W.... 2000 :.|
00000850: 20 52 45 50 45 41 54 00 76 10 CA 08 8E 20 20 20 | REPEAT.v.... |
00000860: 20 3A 8F 20 45 4E 44 20 4F 46 20 4E 4F 55 4E 2D | :. END OF NOUN-|
00000870: 50 48 52 41 53 45 00 90 10 C4 09 8F 2A 2A 41 44 |PHRASE......**AD|
00000880: 4A 45 43 54 49 56 41 4C 20 50 48 52 41 53 45 3A |JECTIVAL PHRASE:|
00000890: 00 A5 10 CE 09 8B 20 BB 28 31 29 B1 2E 32 20 A7 |...... .(1)..2 .|
000008A0: 20 32 35 34 30 00 BD 10 D8 09 54 B2 35 20 20 20 | 2540.....T.5 |
000008B0: 20 20 20 20 3A 8F 20 41 44 56 45 52 42 00 C8 10 | :. ADVERB...|
000008C0: E2 09 8D 20 31 30 30 30 00 E3 10 EC 09 54 B2 34 |... 1000.....T.4|
000008D0: 20 20 20 20 20 20 20 3A 8F 20 41 44 4A 45 43 54 | :. ADJECT|
000008E0: 49 56 45 00 EE 10 F6 09 8D 20 31 30 30 30 00 0C |IVE...... 1000..|
000008F0: 11 00 0A 8B 20 BB 28 31 29 B1 2E 31 20 A7 32 36 |.... .(1)..1 .26|
00000900: 30 30 20 3A 8F 20 46 49 4E 49 53 48 00 2A 11 0A |00 :. FINISH.*..|
00000910: 0A 8B BB 28 31 29 B1 2E 33 33 33 A7 32 35 31 30 |...(1)..333.2510|
00000920: 20 3A 8F 20 52 45 50 45 41 54 00 40 11 14 0A 58 | :. REPEAT.@...X|
00000930: 24 B2 22 20 41 4E 44 22 20 3A 20 8D 20 39 30 30 |$." AND" : . 900|
00000940: 00 55 11 1E 0A 89 20 32 35 31 30 20 3A 8F 20 52 |.U.... 2510 :. R|
00000950: 45 50 45 41 54 00 73 11 28 0A 8E 20 20 20 20 3A |EPEAT.s.(.. :|
00000960: 8F 20 45 4E 44 20 4F 46 20 41 44 4A 2D 50 48 52 |. END OF ADJ-PHR|
00000970: 41 53 45 00 87 11 B8 0B 8F 2A 2A 56 45 52 42 2D |ASE......**VERB-|
00000980: 50 48 52 41 53 45 3A 00 A7 11 C2 0B 54 31 B2 B5 |PHRASE:.....T1..|
00000990: 28 BB 28 31 29 AA 2E 35 29 20 3A 8F 20 54 52 41 |(.(1)..5) :. TRA|
000009A0: 4E 53 49 54 49 56 45 00 C6 11 CC 0B 41 31 B2 B5 |NSITIVE.....A1..|
000009B0: 28 BB 28 31 29 AA 2E 35 29 20 3A 8F 20 41 55 58 |(.(1)..5) :. AUX|
000009C0: 49 4C 49 41 52 59 00 D8 11 D6 0B 8B 20 41 31 B3 |ILIARY...... A1.|
000009D0: 31 20 A7 20 33 30 37 30 00 E7 11 E0 0B 54 B2 31 |1 . 3070.....T.1|
000009E0: 20 3A 8F 20 41 55 58 00 F2 11 EA 0B 8D 20 31 30 | :. AUX...... 10|
000009F0: 30 30 00 0E 12 F4 0B 8D 20 33 33 30 30 20 3A 8F |00...... 3300 :.|
00000A00: 20 4E 4F 54 20 28 4F 52 20 4E 4F 54 21 29 00 20 | NOT (OR NOT!). |
00000A10: 12 FE 0B 54 B2 33 20 3A 8F 20 54 2D 56 45 52 42 |...T.3 :. T-VERB|
00000A20: 00 40 12 08 0C 8B 20 54 31 B1 30 20 A7 33 31 30 |.@.... T1.0 .310|
00000A30: 30 20 3A 8F 20 54 52 41 4E 53 49 54 49 56 45 3F |0 :. TRANSITIVE?|
00000A40: 00 52 12 12 0C 54 B2 39 20 3A 8F 20 49 2D 56 45 |.R...T.9 :. I-VE|
00000A50: 52 42 00 6F 12 1C 0C 8D 20 31 30 30 30 20 3A 8F |RB.o.... 1000 :.|
00000A60: 20 50 49 43 4B 20 4D 41 49 4E 20 56 45 52 42 00 | PICK MAIN VERB.|
00000A70: 8F 12 26 0C 8B 20 41 31 B1 30 20 A7 33 31 33 30 |..&.. A1.0 .3130|
00000A80: 20 3A 8F 20 4E 4F 20 53 20 49 46 20 41 55 58 00 | :. NO S IF AUX.|
00000A90: AF 12 30 0C 58 24 B2 22 53 22 3A 8D 39 30 30 3A |..0.X$."S":.900:|
00000AA0: 8F 20 56 45 52 42 41 4C 20 53 55 46 46 49 58 00 |. VERBAL SUFFIX.|
00000AB0: CF 12 3A 0C 8B 54 31 B3 31 A7 33 31 35 30 20 3A |..:..T1.1.3150 :|
00000AC0: 8F 20 4E 4F 20 4F 42 4A 20 49 46 20 49 4E 54 00 |. NO OBJ IF INT.|
00000AD0: ED 12 44 0C 8D 20 32 30 30 30 20 20 20 20 20 3A |..D.. 2000 :|
00000AE0: 8F 20 4E 4F 55 4E 2D 50 48 52 41 53 45 00 0A 13 |. NOUN-PHRASE...|
00000AF0: 4E 0C 8E 20 20 3A 8F 20 45 4E 44 20 4F 46 20 56 |N.. :. END OF V|
00000B00: 45 52 42 2D 50 48 52 41 53 45 00 25 13 E4 0C 8F |ERB-PHRASE.%....|
00000B10: 2A 2A 4E 4F 54 2F 41 44 56 20 53 55 42 52 4F 55 |**NOT/ADV SUBROU|
00000B20: 54 49 4E 45 3A 00 3A 13 EE 0C 8B 20 BB 28 31 29 |TINE:.:.... .(1)|
00000B30: B1 2E 31 20 A7 20 33 33 33 30 00 50 13 F8 0C 58 |..1 . 3330.P...X|
00000B40: 24 B2 22 20 4E 4F 54 22 20 3A 20 8D 20 39 30 30 |$." NOT" : . 900|
00000B50: 00 67 13 02 0D 8B 20 BB 28 31 29 B1 2E 31 32 35 |.g.... .(1)..125|
00000B60: 20 A7 20 33 33 36 30 00 79 13 0C 0D 54 B2 35 20 | . 3360.y...T.5 |
00000B70: 3A 8F 20 41 44 56 45 52 42 00 84 13 16 0D 8D 20 |:. ADVERB...... |
00000B80: 31 30 30 30 00 A3 13 20 0D 8E 20 3A 8F 20 45 4E |1000... .. :. EN|
00000B90: 44 20 4F 46 20 4E 4F 54 2F 41 44 56 20 52 4F 55 |D OF NOT/ADV ROU|
00000BA0: 54 4E 45 00 BE 13 AC 0D 8F 2A 2A 54 4F 20 42 45 |TNE......**TO BE|
00000BB0: 20 4F 52 20 4E 4F 54 20 54 4F 20 42 45 3A 00 DC | OR NOT TO BE:..|
00000BC0: 13 B6 0D 8B 20 BB 28 31 29 B1 2E 34 20 A7 33 35 |.... .(1)..4 .35|
00000BD0: 36 30 20 3A 8F 20 49 53 2F 57 41 53 00 EF 13 C0 |60 :. IS/WAS....|
00000BE0: 0D 54 B2 31 20 3A 8F 20 55 53 45 20 41 55 58 00 |.T.1 :. USE AUX.|
00000BF0: FA 13 CA 0D 8D 20 31 30 30 30 00 18 14 D4 0D 8D |..... 1000......|
00000C00: 20 33 33 30 30 20 3A 8F 20 4E 4F 54 2F 41 44 56 | 3300 :. NOT/ADV|
00000C10: 20 52 4F 55 54 49 4E 45 00 2D 14 DE 0D 58 24 B2 | ROUTINE.-...X$.|
00000C20: 22 20 42 45 22 20 3A 20 8D 20 39 30 30 00 33 14 |" BE" : . 900.3.|
00000C30: E3 0D 8E 00 40 14 E8 0D 58 24 B2 22 20 49 53 22 |....@...X$." IS"|
00000C40: 00 5E 14 F2 0D 8B BB 28 31 29 B1 2E 33 33 33 A7 |.^.....(1)..333.|
00000C50: 33 35 39 30 3A 8F 20 42 45 2D 57 4F 52 44 00 6C |3590:. BE-WORD.l|
00000C60: 14 FC 0D 58 24 B2 22 20 57 41 53 22 00 76 14 06 |...X$." WAS".v..|
00000C70: 0E 8D 20 39 30 30 00 94 14 10 0E 8D 20 33 33 30 |.. 900...... 330|
00000C80: 30 20 3A 8F 20 4E 4F 54 2F 41 44 56 20 52 4F 55 |0 :. NOT/ADV ROU|
00000C90: 54 49 4E 45 00 AA 14 1A 0E 8E 20 3A 8F 20 45 4E |TINE...... :. EN|
00000CA0: 44 20 4F 46 20 42 45 49 4E 47 00 C6 14 A0 0F 8F |D OF BEING......|
00000CB0: 2A 2A 50 52 45 44 49 43 41 54 45 20 28 33 20 54 |**PREDICATE (3 T|
00000CC0: 59 50 45 53 29 3A 00 E3 14 AA 0F 91 20 A5 4E 28 |YPES):...... .N(|
00000CD0: 33 29 20 89 20 34 30 32 30 2C 34 30 34 30 2C 34 |3) . 4020,4040,4|
00000CE0: 30 36 30 00 F7 14 B4 0F 54 B2 37 20 3A 8F 20 4C |060.....T.7 :. L|
00000CF0: 49 4E 4B 57 4F 52 44 00 02 15 BE 0F 8D 20 31 30 |INKWORD...... 10|
00000D00: 30 30 00 1C 15 C8 0F 8D 20 32 30 30 30 20 3A 8F |00...... 2000 :.|
00000D10: 20 4E 4F 55 4E 2D 50 48 52 41 53 45 00 22 15 D2 | NOUN-PHRASE."..|
00000D20: 0F 8E 00 3B 15 DC 0F 8D 20 32 35 30 30 20 3A 8F |...;.... 2500 :.|
00000D30: 20 41 44 4A 2D 50 48 52 41 53 45 00 54 15 E6 0F | ADJ-PHRASE.T...|
00000D40: 8E 20 20 20 20 20 3A 8F 20 45 4E 44 20 4F 46 20 |. :. END OF |
00000D50: 50 52 45 44 00 62 15 94 11 8F 2A 2A 54 49 54 4C |PRED.b....**TITL|
00000D60: 45 3A 00 83 15 9E 11 91 20 A5 4E 28 34 29 20 89 |E:...... .N(4) .|
00000D70: 34 35 32 30 2C 34 35 34 30 2C 34 35 36 30 2C 34 |4520,4540,4560,4|
00000D80: 35 38 30 00 9D 15 A8 11 8D 20 32 30 30 30 20 3A |580...... 2000 :|
00000D90: 8F 20 4E 4F 55 4E 2D 50 48 52 41 53 45 00 A8 15 |. NOUN-PHRASE...|
00000DA0: B2 11 89 20 34 36 32 30 00 C1 15 BC 11 8D 20 32 |... 4620...... 2|
00000DB0: 35 30 30 20 3A 8F 20 41 44 4A 2D 50 48 52 41 53 |500 :. ADJ-PHRAS|
00000DC0: 45 00 CC 15 C6 11 89 20 34 36 32 30 00 DF 15 D0 |E...... 4620....|
00000DD0: 11 8D 20 34 30 30 30 20 3A 8F 20 50 52 45 44 00 |.. 4000 :. PRED.|
00000DE0: EA 15 DA 11 89 20 34 36 32 30 00 FF 15 E4 11 58 |..... 4620.....X|
00000DF0: 24 B2 22 20 54 4F 22 20 3A 20 8D 20 39 30 30 00 |$." TO" : . 900.|
00000E00: 11 16 EE 11 54 B2 33 20 3A 8F 20 54 2D 56 45 52 |....T.3 :. T-VER|
00000E10: 42 00 1C 16 F8 11 8D 20 31 30 30 30 00 39 16 02 |B...... 1000.9..|
00000E20: 12 8D 20 32 30 30 30 20 3A 8F 20 4F 42 4A 45 43 |.. 2000 :. OBJEC|
00000E30: 54 20 4F 46 20 56 45 52 42 00 56 16 0C 12 4C 24 |T OF VERB.V...L$|
00000E40: B2 C7 28 30 33 34 29 AA CA 28 4C 24 2C 32 29 AA |..(034)..(L$,2).|
00000E50: C7 28 30 33 34 29 00 5C 16 16 12 8E 00 79 16 C0 |.(034).\.....y..|
00000E60: 12 4C B2 C3 28 4C 24 29 20 3A 20 8B 20 4C B3 B2 |.L..(L$) : . L..|
00000E70: 34 30 20 89 20 34 39 30 30 00 9D 16 CA 12 43 24 |40 . 4900.....C$|
00000E80: B2 CA 28 4C 24 2C 34 31 2C 31 29 20 3A 20 8B 20 |..(L$,41,1) : . |
00000E90: 43 24 B2 22 20 22 20 89 20 34 39 30 30 00 CA 16 |C$." " . 4900...|
00000EA0: D4 12 8B 20 43 24 B2 22 2E 22 20 B0 20 43 24 B2 |... C$."." . C$.|
00000EB0: 22 2C 22 20 A7 20 4C 24 B2 C8 28 4C 24 2C 34 30 |"," . L$..(L$,40|
00000EC0: 29 20 3A 20 89 20 34 39 30 30 00 D3 16 DE 12 4A |) : . 4900.....J|
00000ED0: B2 34 30 00 00 17 E8 12 8B 20 CA 28 4C 24 2C 4A |.40...... .(L$,J|
00000EE0: 2C 31 29 B3 B1 22 20 22 20 A7 20 4A B2 4A AB 31 |,1).." " . J.J.1|
00000EF0: 20 3A 20 8B 20 4A B3 B1 30 20 89 20 34 38 34 30 | : . J..0 . 4840|
00000F00: 00 0C 17 F2 12 4C 45 B2 34 30 AB 4A 00 3D 17 FC |.....LE.40.J.=..|
00000F10: 12 8B 20 4C 45 B2 30 20 A7 20 4C 24 B2 C8 28 4C |.. LE.0 . L$..(L|
00000F20: 24 2C 33 39 29 AA 22 20 22 20 20 AA CA 28 4C 24 |$,39)." " ..(L$|
00000F30: 2C 34 30 29 20 3A 20 89 20 34 39 30 30 00 6E 17 |,40) : . 4900.n.|
00000F40: 06 13 8B 20 4C 45 B2 31 20 A7 20 4C 24 B2 C8 28 |... LE.1 . L$..(|
00000F50: 4C 24 2C 33 39 29 AA 22 20 20 22 20 AA CA 28 4C |L$,39)." " ..(L|
00000F60: 24 2C 34 30 29 20 3A 20 89 20 34 39 30 30 00 9F |$,40) : . 4900..|
00000F70: 17 10 13 8B 20 4C 45 B2 32 20 A7 20 4C 24 B2 C8 |.... LE.2 . L$..|
00000F80: 28 4C 24 2C 33 38 29 AA 22 20 20 20 22 AA CA 28 |(L$,38)." "..(|
00000F90: 4C 24 2C 33 39 29 20 3A 20 89 20 34 39 30 30 00 |L$,39) : . 4900.|
00000FA0: BD 17 1A 13 4C 24 B2 C8 28 4C 24 2C 33 39 29 AA |....L$..(L$,39).|
00000FB0: 22 2D 20 22 AA CA 28 4C 24 2C 34 30 29 00 CF 17 |"- "..(L$,40)...|
00000FC0: 24 13 98 31 2C 4C 24 20 3A 20 4C 24 B2 22 22 00 |$..1,L$ : L$."".|
00000FD0: D5 17 2E 13 8E 00 F2 17 88 13 8F 2A 2A 44 41 54 |...........**DAT|
00000FE0: 41 57 4F 52 44 53 28 54 59 50 45 53 31 2D 31 30 |AWORDS(TYPES1-10|
00000FF0: 29 3A 00 1B 18 EC 13 83 20 57 49 4C 4C 2C 4D 41 |):...... WILL,MA|
00001000: 59 2C 4D 55 53 54 2C 44 49 44 2C 43 41 4E 2C 53 |Y,MUST,DID,CAN,S|
00001010: 48 4F 55 4C 44 2C 57 4F 55 4C 44 00 3A 18 F6 13 |HOULD,WOULD.:...|
00001020: 83 20 43 4F 55 4C 44 2C 4D 49 47 48 54 2C 43 41 |. COULD,MIGHT,CA|
00001030: 4E 4E 4F 54 2C 53 48 41 4C 4C 00 46 18 4F 14 83 |NNOT,SHALL.F.O..|
00001040: 20 22 2A 2A 2A 22 00 76 18 50 14 83 20 44 45 53 | "***".v.P.. DES|
00001050: 50 41 49 52 2C 48 4F 50 45 2C 4C 4F 56 45 52 2C |PAIR,HOPE,LOVER,|
00001060: 4F 43 45 41 4E 2C 46 49 52 45 2C 53 50 49 52 49 |OCEAN,FIRE,SPIRI|
00001070: 54 2C 57 4F 52 44 00 A4 18 5A 14 83 20 49 44 45 |T,WORD...Z.. IDE|
00001080: 41 2C 53 4D 49 4C 45 2C 46 4C 4F 57 45 52 2C 4C |A,SMILE,FLOWER,L|
00001090: 41 44 59 2C 52 4F 53 45 2C 46 4C 41 4D 45 2C 48 |ADY,ROSE,FLAME,H|
000010A0: 45 41 52 54 00 D3 18 64 14 83 20 46 41 4E 43 59 |EART...d.. FANCY|
000010B0: 2C 53 55 4D 4D 45 52 2C 57 49 4E 54 45 52 2C 48 |,SUMMER,WINTER,H|
000010C0: 4F 55 52 2C 44 41 59 2C 42 49 52 54 48 2C 45 41 |OUR,DAY,BIRTH,EA|
000010D0: 52 54 48 00 06 19 6E 14 83 20 53 45 45 44 2C 47 |RTH...n.. SEED,G|
000010E0: 41 52 44 45 4E 2C 45 59 45 2C 59 45 41 52 2C 54 |ARDEN,EYE,YEAR,T|
000010F0: 49 4D 45 2C 57 4F 52 54 48 2C 53 45 52 56 49 43 |IME,WORTH,SERVIC|
00001100: 45 2C 4C 4F 56 45 00 39 19 78 14 83 20 44 45 4C |E,LOVE.9.x.. DEL|
00001110: 49 47 48 54 2C 53 54 41 52 2C 53 4B 59 2C 46 52 |IGHT,STAR,SKY,FR|
00001120: 49 45 4E 44 2C 45 4E 44 2C 46 52 4F 57 4E 2C 4C |IEND,END,FROWN,L|
00001130: 4F 4F 4B 2C 53 4D 49 4C 45 00 6A 19 82 14 83 20 |OOK,SMILE.j.... |
00001140: 4D 41 4E 2C 57 4F 4D 41 4E 2C 43 48 49 4C 44 2C |MAN,WOMAN,CHILD,|
00001150: 42 4F 44 59 2C 46 45 41 52 2C 48 41 4E 44 2C 43 |BODY,FEAR,HAND,C|
00001160: 52 49 4D 45 2C 57 4F 52 4C 44 00 76 19 B3 14 83 |RIME,WORLD.v....|
00001170: 20 22 2A 2A 2A 22 00 A4 19 B4 14 83 20 44 45 53 | "***"...... DES|
00001180: 54 52 4F 59 2C 4C 4F 56 45 2C 4E 45 45 44 2C 57 |TROY,LOVE,NEED,W|
00001190: 41 4E 54 2C 48 55 52 54 2C 53 54 52 49 4B 45 2C |ANT,HURT,STRIKE,|
000011A0: 46 4F 52 4D 00 D4 19 BE 14 83 20 46 45 45 4C 2C |FORM...... FEEL,|
000011B0: 46 45 41 52 2C 4C 4F 56 45 2C 4D 41 4B 45 2C 55 |FEAR,LOVE,MAKE,U|
000011C0: 4E 4D 41 4B 45 2C 4B 4E 4F 57 2C 50 52 4F 56 45 |NMAKE,KNOW,PROVE|
000011D0: 2C 53 45 45 00 E0 19 17 15 83 20 22 2A 2A 2A 22 |,SEE...... "***"|
000011E0: 00 0D 1A 18 15 83 20 42 45 41 55 54 49 46 55 4C |...... BEAUTIFUL|
000011F0: 2C 43 52 55 45 4C 2C 41 4D 41 5A 49 4E 47 2C 4C |,CRUEL,AMAZING,L|
00001200: 4F 56 45 4C 59 2C 43 55 4E 4E 49 4E 47 00 3E 1A |OVELY,CUNNING.>.|
00001210: 22 15 83 20 46 41 4C 53 45 2C 54 52 55 45 2C 47 |".. FALSE,TRUE,G|
00001220: 41 55 44 59 2C 43 4F 4C 44 2C 44 45 41 44 2C 44 |AUDY,COLD,DEAD,D|
00001230: 41 52 4B 2C 57 41 52 4D 2C 59 4F 55 4E 47 00 73 |ARK,WARM,YOUNG.s|
00001240: 1A 2C 15 83 20 4D 4F 52 54 41 4C 2C 43 48 4F 53 |.,.. MORTAL,CHOS|
00001250: 45 4E 2C 42 52 49 47 48 54 2C 45 4E 44 4C 45 53 |EN,BRIGHT,ENDLES|
00001260: 53 2C 4F 4C 44 2C 43 4F 4D 49 4E 47 2C 4C 4F 56 |S,OLD,COMING,LOV|
00001270: 49 4E 47 00 A8 1A 36 15 83 20 44 49 56 49 4E 45 |ING...6.. DIVINE|
00001280: 2C 55 4E 57 4F 52 54 48 59 2C 42 45 53 54 2C 42 |,UNWORTHY,BEST,B|
00001290: 4C 45 53 53 45 44 2C 48 55 4D 42 4C 45 2C 53 54 |LESSED,HUMBLE,ST|
000012A0: 49 4C 4C 2C 48 49 47 48 00 E6 1A 40 15 83 20 46 |ILL,HIGH...@.. F|
000012B0: 41 49 52 2C 53 57 45 45 54 2C 53 4D 49 4C 49 4E |AIR,SWEET,SMILIN|
000012C0: 47 2C 43 48 45 45 52 46 55 4C 2C 50 45 52 46 45 |G,CHEERFUL,PERFE|
000012D0: 43 54 2C 4E 41 4B 45 44 2C 47 45 4E 54 4C 45 2C |CT,NAKED,GENTLE,|
000012E0: 48 49 44 44 45 4E 00 F2 1A 7B 15 83 20 22 2A 2A |HIDDEN...{.. "**|
000012F0: 2A 22 00 1E 1B 7C 15 83 20 41 4D 41 5A 49 4E 47 |*"...|.. AMAZING|
00001300: 4C 59 2C 53 4F 4D 45 48 4F 57 2C 52 45 41 4C 4C |LY,SOMEHOW,REALL|
00001310: 59 2C 49 4E 45 58 50 4C 49 43 41 42 4C 59 00 51 |Y,INEXPLICABLY.Q|
00001320: 1B 86 15 83 20 47 41 49 4C 59 2C 46 49 45 52 43 |.... GAILY,FIERC|
00001330: 45 4C 59 2C 53 55 44 44 45 4E 4C 59 2C 53 54 52 |ELY,SUDDENLY,STR|
00001340: 41 4E 47 45 4C 59 2C 43 41 52 45 4C 45 53 53 4C |ANGELY,CARELESSL|
00001350: 59 00 89 1B 90 15 83 20 55 54 54 45 52 4C 59 2C |Y...... UTTERLY,|
00001360: 57 49 4C 4C 49 4E 47 4C 59 2C 47 52 41 44 55 41 |WILLINGLY,GRADUA|
00001370: 4C 4C 59 2C 45 4E 44 4C 45 53 53 4C 59 2C 42 45 |LLY,ENDLESSLY,BE|
00001380: 41 55 54 49 46 55 4C 4C 59 00 B9 1B 9A 15 83 20 |AUTIFULLY...... |
00001390: 47 52 45 41 54 4C 59 2C 4F 4E 4C 59 2C 53 54 49 |GREATLY,ONLY,STI|
000013A0: 4C 4C 2C 4E 45 56 45 52 2C 41 4C 57 41 59 53 2C |LL,NEVER,ALWAYS,|
000013B0: 50 45 52 46 45 43 54 4C 59 00 C5 1B DF 15 83 20 |PERFECTLY...... |
000013C0: 22 2A 2A 2A 22 00 01 1C E0 15 83 20 45 52 4F 53 |"***"...... EROS|
000013D0: 2C 56 45 4E 55 53 2C 22 4D 59 20 4C 41 44 59 22 |,VENUS,"MY LADY"|
000013E0: 2C 4E 41 54 55 52 45 2C 50 41 52 41 44 49 53 45 |,NATURE,PARADISE|
000013F0: 2C 54 49 4D 45 2C 56 49 52 54 55 45 2C 48 4F 50 |,TIME,VIRTUE,HOP|
00001400: 45 00 38 1C EA 15 83 20 4D 49 4E 45 2C 49 54 2C |E.8.... MINE,IT,|
00001410: 4C 4F 56 45 2C 52 49 43 48 41 52 44 2C 4D 45 49 |LOVE,RICHARD,MEI|
00001420: 2D 4C 59 4E 4E 2C 45 56 45 52 59 54 48 49 4E 47 |-LYNN,EVERYTHING|
00001430: 2C 44 45 53 50 41 49 52 00 6C 1C F4 15 83 20 22 |,DESPAIR.l.... "|
00001440: 4E 4F 20 4F 4E 45 22 2C 53 4F 4D 45 4F 4E 45 2C |NO ONE",SOMEONE,|
00001450: 4E 4F 54 48 49 4E 47 2C 45 56 45 52 59 42 4F 44 |NOTHING,EVERYBOD|
00001460: 59 2C 4F 55 52 53 2C 59 4F 55 52 53 00 78 1C 43 |Y,OURS,YOURS.x.C|
00001470: 16 83 20 22 2A 2A 2A 22 00 A5 1C 44 16 83 20 4F |.. "***"...D.. O|
00001480: 46 2C 49 4E 2C 46 52 4F 4D 2C 57 49 54 48 2C 4F |F,IN,FROM,WITH,O|
00001490: 46 2C 4E 45 41 52 2C 42 45 59 4F 4E 44 2C 57 49 |F,NEAR,BEYOND,WI|
000014A0: 54 48 4F 55 54 00 D4 1C 4E 16 83 20 4C 49 4B 45 |THOUT...N.. LIKE|
000014B0: 2C 48 41 56 49 4E 47 2C 4C 4F 56 49 4E 47 2C 57 |,HAVING,LOVING,W|
000014C0: 49 54 48 49 4E 2C 52 45 41 43 48 49 4E 47 2C 41 |ITHIN,REACHING,A|
000014D0: 42 4F 56 45 00 15 1D 58 16 83 20 22 4C 4F 4F 4B |BOVE...X.. "LOOK|
000014E0: 49 4E 47 20 41 54 22 2C 55 50 4F 4E 2C 4F 4E 2C |ING AT",UPON,ON,|
000014F0: 46 52 4F 4D 2C 41 53 2C 42 45 48 49 4E 44 2C 41 |FROM,AS,BEHIND,A|
00001500: 47 41 49 4E 53 54 2C 22 49 4E 20 4C 4F 56 45 20 |GAINST,"IN LOVE |
00001510: 57 49 54 48 22 00 21 1D A7 16 83 20 22 2A 2A 2A |WITH".!.... "***|
00001520: 22 00 5E 1D A8 16 83 20 41 4E 44 2C 42 55 54 2C |".^.... AND,BUT,|
00001530: 42 45 43 41 55 53 45 2C 53 4F 2C 41 4C 54 48 4F |BECAUSE,SO,ALTHO|
00001540: 55 47 48 2C 59 45 54 2C 22 41 4E 44 20 59 45 54 |UGH,YET,"AND YET|
00001550: 22 2C 54 48 45 52 45 46 4F 52 45 2C 49 46 00 99 |",THEREFORE,IF..|
00001560: 1D B2 16 83 20 57 48 49 4C 45 2C 57 48 45 4E 2C |.... WHILE,WHEN,|
00001570: 57 48 45 52 45 41 53 2C 46 4F 52 2C 22 53 4F 20 |WHEREAS,FOR,"SO |
00001580: 54 48 41 54 22 2C 22 41 4E 44 20 53 4F 22 2C 22 |THAT","AND SO","|
00001590: 41 4E 44 20 45 56 45 4E 22 00 A5 1D 0B 17 83 20 |AND EVEN"...... |
000015A0: 22 2A 2A 2A 22 00 E0 1D 0C 17 83 20 53 4C 45 45 |"***"...... SLEE|
000015B0: 50 2C 46 41 4C 4C 2C 44 49 45 2C 52 45 4D 41 49 |P,FALL,DIE,REMAI|
000015C0: 4E 2C 43 48 41 4E 47 45 2C 53 49 4E 47 2C 45 58 |N,CHANGE,SING,EX|
000015D0: 50 4C 4F 52 45 2C 42 4C 4F 57 2C 54 48 49 4E 4B |PLORE,BLOW,THINK|
000015E0: 00 16 1E 16 17 83 20 47 52 4F 57 2C 53 50 45 41 |...... GROW,SPEA|
000015F0: 4B 2C 46 41 44 45 2C 45 58 49 53 54 2C 46 4C 45 |K,FADE,EXIST,FLE|
00001600: 45 2C 43 4F 4D 45 2C 45 58 43 45 4C 2C 48 4F 50 |E,COME,EXCEL,HOP|
00001610: 45 2C 4C 4F 4F 4B 00 4A 1E 20 17 83 20 46 52 4F |E,LOOK.J. .. FRO|
00001620: 57 4E 2C 53 4D 49 4C 45 2C 54 48 49 4E 4B 2C 4C |WN,SMILE,THINK,L|
00001630: 4F 56 45 2C 46 41 49 4C 2C 57 48 49 53 50 45 52 |OVE,FAIL,WHISPER|
00001640: 2C 53 55 52 52 45 4E 44 45 52 00 56 1E 6F 17 83 |,SURRENDER.V.o..|
00001650: 20 22 2A 2A 2A 22 00 84 1E 70 17 83 20 54 48 45 | "***"...p.. THE|
00001660: 2C 45 41 43 48 2C 4E 4F 2C 45 56 45 52 59 2C 53 |,EACH,NO,EVERY,S|
00001670: 4F 4D 45 2C 4D 59 2C 59 4F 55 52 2C 54 48 49 53 |OME,MY,YOUR,THIS|
00001680: 2C 54 48 45 00 BA 1E 7A 17 83 20 49 54 53 2C 48 |,THE...z.. ITS,H|
00001690: 49 53 2C 48 45 52 2C 4F 55 52 2C 4F 4E 45 2C 54 |IS,HER,OUR,ONE,T|
000016A0: 48 41 54 2C 41 4E 59 2C 41 4E 4F 54 48 45 52 2C |HAT,ANY,ANOTHER,|
000016B0: 22 45 56 45 4E 20 54 48 45 22 00 F7 1E 84 17 83 |"EVEN THE"......|
000016C0: 20 22 54 48 45 20 4F 4E 4C 59 22 2C 22 4F 4E 4C | "THE ONLY","ONL|
000016D0: 59 20 54 48 45 22 2C 22 41 4E 20 4F 4C 44 22 2C |Y THE","AN OLD",|
000016E0: 22 41 20 53 4D 41 4C 4C 22 2C 22 53 4F 4D 45 20 |"A SMALL","SOME |
000016F0: 4F 46 20 54 48 45 22 00 03 1F D3 17 83 20 22 2A |OF THE"...... "*|
00001700: 2A 2A 22 00 09 1F 0F 27 80 00 00 00 |**"....'.... |
.......1,4.1.... * POETRY GENERATO
R *.X.... * ------ ---------
*..... * FROM -- "THE BASIC ID
EA" *...... * BY ---- RICHARD FORSY
TH. *.M.... *
*...... * MODIFIED FOR THE PET, BY -
- *...... * (C) R.C.GENTRY 19/09/78.
*.%....1:.1.=.... .N(A)..(.(1).A.1).Q.
... W(10),W$(250).`.2.. 53272,23.}.D..**
READ WORDS FROM DATA:...N.. W(0).0 : K.0
...P.. I.1 . 10 :. 10 WORD-TYPES...S.. X
$.Z.X.. X$."***" .150 :. ENDMARKER...Z.K
.K.1...}.W$(K).X$...... 115.....W(I).K :
. PLACE OF LAST I-TYPE.&.... I.O...."...
..THIS PROGRAM NEEDS A PRINTER".Q.H.. ".
..HOW MANY COMPOSITIONS";.Y.R.. K......
C.1 . K.....R..(.TI)......1......1.....L
$."".....UC..1.R.... 4500 :. TITLE ROUTI
NE...... C(L$).62 . 230......1,"COMPOSIT
ION ".....L$. "ENTITLED: ".L$.(.
... 4800.......B.... N..N(8)..N(8).Q."..
N9..N(8)._.,.. S.1 . N.Q...UC..1 : L$."
"......**SENTENCE:...... 2000 :. NOUN-PH
RASE...... C(L$).75 . 400...... 4800.H..
.L$." ".......(1)..4.600 :. USE BE-RTN.
..... 3000 :. VERB-PHRASE...&.. 700 :.
END SENTENCE.6.X.. 3500 :. BE-ROUTINE.N
.B.. 4000 :. PREDICATE.\....*ENDING:.R.A
.. C(L$).75 . 516...F.. .(1)..125 . 800
:. "."...P.L$.L$."," : . 4800.D.Z.T.8
:. CONJUNCTION...... 1000 :. WORD
SELECTOR...... 500 :. REPEAT... .L$.L$
."." : . 4800...*.. S..N9 . 830.%.4...>.
>.. S :. NEXT SENTENCE.P.H.. :. NEWLINE
.L.R.. C :. NEXT COMPOSITION.R.\...}.P..
9999.....Y$.X$ : . UC.0 . 980.....Y$.""
: L.C(X$).J...C$.J(X$,L,1) : . L.UC . 9
40...... C$.."A" . C$.."Z" .
C$.G(F(C$).128).....Y$.C$.Y$.....L.L.1.
'.... L.0 . 920.0.J.UC.0.K.T.L$.L$.Y$ :
L$.H(L$,80).Q.....O....**WORD-SELECTOR(T
=TYPE):.....N0.W(T.1) :. LAST WORD IN W$
.....I..N(W(T).N0).D...L$.L$." " :X$.W$(
N0.I) :. 900.J.......P..**NOUN-PHRASE:..
.Z...(1)..2.2050 :. USE NOUN.....T.6
:. NAME...... 1000.2.... 2200 :. ENDI
NG.C....*USING NOUN.\...T.10 :. ART
ICLE.G.... 1000.}.... .(1)..25 . 2090...
.. 2500 :. ADJ-PHRASE...*.T.2 :.
NOUN...4.. 1000.M.>.. .(1)..1 . 2150...
H.X$."'S" :.900 :. POSSESSIVE...R.. 2070
...F..*ENDING:...... .(1)..125 . 2250.7.
..T.7 :. LINKWORD.B.... 1000.W....
2000 :. REPEAT.V.J.. :. END OF NOUN-
PHRASE...D..**ADJECTIVAL PHRASE:...N.. .
(1)..2 . 2540...X.T.5 :. ADVERB.H.
... 1000.....T.4 :. ADJECTIVE.....
. 1000...... .(1)..1 .2600 :. FINISH.*..
...(1)..333.2510 :. REPEAT.@...X$." AND"
: . 900.U.... 2510 :. REPEAT.S.(.. :
. END OF ADJ-PHRASE......**VERB-PHRASE:.
..B.T1..(.(1)..5) :. TRANSITIVE.F.L.A1..
(.(1)..5) :. AUXILIARY.X.V.. A1.1 . 3070
.....T.1 :. AUX...... 1000...... 3300 :.
NOT (OR NOT!). ...T.3 :. T-VERB.@.... T
1.0 .3100 :. TRANSITIVE?.R...T.9 :. I-VE
RB.O.... 1000 :. PICK MAIN VERB...&.. A1
.0 .3130 :. NO S IF AUX...0.X$."S":.900:
. VERBAL SUFFIX.O.:..T1.1.3150 :. NO OBJ
IF INT...D.. 2000 :. NOUN-PHRASE...
N.. :. END OF VERB-PHRASE.%....**NOT/AD
V SUBROUTINE:.:.... .(1)..1 . 3330.P...X
$." NOT" : . 900.G.... .(1)..125 . 3360.
Y...T.5 :. ADVERB...... 1000... .. :. EN
D OF NOT/ADV ROUTNE......**TO BE OR NOT
TO BE:...... .(1)..4 .3560 :. IS/WAS....
.T.1 :. USE AUX...J.. 1000...T.. 3300 :.
NOT/ADV ROUTINE.-...X$." BE" : . 900.3.
....@...X$." IS".^.....(1)..333.3590:. B
E-WORD.L...X$." WAS".V.... 900...... 330
0 :. NOT/ADV ROUTINE...... :. END OF BEI
NG.F. ..**PREDICATE (3 TYPES):...... .N(
3) . 4020,4040,4060.....T.7 :. LINKWORD.
..... 1000...H.. 2000 :. NOUN-PHRASE.".R
...;.... 2500 :. ADJ-PHRASE.T.... :.
END OF PRED.B....**TITLE:...... .N(4) .
4520,4540,4560,4580...... 2000 :. NOUN-P
HRASE...... 4620.A.... 2500 :. ADJ-PHRAS
E.L.F.. 4620...P.. 4000 :. PRED...Z.. 46
20.....X$." TO" : . 900.....T.3 :. T-VER
B...... 1000.9.... 2000 :. OBJECT OF VER
B.V...L$.G(034).J(L$,2).G(034).\.....Y..
.L.C(L$) : . L..40 . 4900...J.C$.J(L$,41
,1) : . C$." " . 4900.J.T.. C$."." . C$.
"," . L$.H(L$,40) : . 4900.S...J.40.....
. J(L$,J,1).." " . J.J.1 : . J..0 . 4840
.....LE.40.J.=.... LE.0 . L$.H(L$,39)."
" .J(L$,40) : . 4900.N.... LE.1 . L$.H(
L$,39)." " .J(L$,40) : . 4900...... LE.
2 . L$.H(L$,38)." ".J(L$,39) : . 4900.
....L$.H(L$,39)."- ".J(L$,40).O.$..1,L$
: L$."".U..........**DATAWORDS(TYPES1-10
):...... WILL,MAY,MUST,DID,CAN,SHOULD,WO
ULD.:.... COULD,MIGHT,CANNOT,SHALL.F.O..
"***".V.P.. DESPAIR,HOPE,LOVER,OCEAN,FI
RE,SPIRIT,WORD...Z.. IDEA,SMILE,FLOWER,L
ADY,ROSE,FLAME,HEART.S.D.. FANCY,SUMMER,
WINTER,HOUR,DAY,BIRTH,EARTH...N.. SEED,G
ARDEN,EYE,YEAR,TIME,WORTH,SERVICE,LOVE.9
.X.. DELIGHT,STAR,SKY,FRIEND,END,FROWN,L
OOK,SMILE.J.... MAN,WOMAN,CHILD,BODY,FEA
R,HAND,CRIME,WORLD.V.... "***"...... DES
TROY,LOVE,NEED,WANT,HURT,STRIKE,FORM.T..
.. FEEL,FEAR,LOVE,MAKE,UNMAKE,KNOW,PROVE
,SEE...... "***"...... BEAUTIFUL,CRUEL,A
MAZING,LOVELY,CUNNING.>.".. FALSE,TRUE,G
AUDY,COLD,DEAD,DARK,WARM,YOUNG.S.,.. MOR
TAL,CHOSEN,BRIGHT,ENDLESS,OLD,COMING,LOV
ING...6.. DIVINE,UNWORTHY,BEST,BLESSED,H
UMBLE,STILL,HIGH...@.. FAIR,SWEET,SMILIN
G,CHEERFUL,PERFECT,NAKED,GENTLE,HIDDEN..
.{.. "***"...|.. AMAZINGLY,SOMEHOW,REALL
Y,INEXPLICABLY.Q.... GAILY,FIERCELY,SUDD
ENLY,STRANGELY,CARELESSLY...... UTTERLY,
WILLINGLY,GRADUALLY,ENDLESSLY,BEAUTIFULL
Y...... GREATLY,ONLY,STILL,NEVER,ALWAYS,
PERFECTLY.E.... "***"...... EROS,VENUS,"
MY LADY",NATURE,PARADISE,TIME,VIRTUE,HOP
E.8.... MINE,IT,LOVE,RICHARD,MEI-LYNN,EV
ERYTHING,DESPAIR.L.... "NO ONE",SOMEONE,
NOTHING,EVERYBODY,OURS,YOURS.X.C.. "***"
...D.. OF,IN,FROM,WITH,OF,NEAR,BEYOND,WI
THOUT.T.N.. LIKE,HAVING,LOVING,WITHIN,RE
ACHING,ABOVE...X.. "LOOKING AT",UPON,ON,
FROM,AS,BEHIND,AGAINST,"IN LOVE WITH".!.
... "***".^.... AND,BUT,BECAUSE,SO,ALTHO
UGH,YET,"AND YET",THEREFORE,IF...... WHI
LE,WHEN,WHEREAS,FOR,"SO THAT","AND SO","
AND EVEN"...... "***"...... SLEEP,FALL,D
IE,REMAIN,CHANGE,SING,EXPLORE,BLOW,THINK
...... GROW,SPEAK,FADE,EXIST,FLEE,COME,E
XCEL,HOPE,LOOK.J. .. FROWN,SMILE,THINK,L
OVE,FAIL,WHISPER,SURRENDER.V.O.. "***"..
.P.. THE,EACH,NO,EVERY,SOME,MY,YOUR,THIS
,THE...Z.. ITS,HIS,HER,OUR,ONE,THAT,ANY,
ANOTHER,"EVEN THE"...... "THE ONLY","ONL
Y THE","AN OLD","A SMALL","SOME OF THE".
..S.. "***"....'....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL