SENTENCES
FILE INFORMATION
FILENAME(S): SENTENCES
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 19:47:23
APPEARS ON: 1 disk(s)
FILE HASH
8f0f62276b22b4ea484a73f97007da911a3afb54065760b9c3ec8854060cc0bc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK A6 1 | SENTENCES | PRG | Curtcool, Frank | 22 | 15 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 03 00 8F 20 53 45 4E 54 45 4E 43 45 |....... SENTENCE|
00000010: 53 28 55 4E 49 54 20 36 29 00 3F 08 05 00 8F 20 |S(UNIT 6).?.... |
00000020: 43 4F 50 59 52 49 47 48 54 20 28 43 29 20 41 4E |COPYRIGHT (C) AN|
00000030: 44 52 45 57 20 43 4F 4C 49 4E 20 31 39 38 31 00 |DREW COLIN 1981.|
00000040: 48 08 0A 00 4E B2 31 33 00 55 08 14 00 86 50 28 |H...N.13.U....P(|
00000050: 31 33 2C 32 29 00 5F 08 1E 00 8D 32 30 30 30 00 |13,2)._....2000.|
00000060: 68 08 28 00 8D 31 30 30 00 71 08 2D 00 99 22 93 |h.(..100.q.-..".|
00000070: 22 00 8C 08 2E 00 58 24 B2 CA 28 58 24 2C 32 2C |".....X$..(X$,2,|
00000080: C3 28 58 24 29 AB 31 29 AA 22 2E 22 00 96 08 32 |.(X$).1)."."...2|
00000090: 00 8D 35 30 30 30 00 BF 08 3C 00 99 3A 99 3A 99 |..5000...<..:.:.|
000000A0: 3A 99 3A 99 3A 99 3A 99 22 46 4F 52 20 54 48 45 |:.:.:.:."FOR THE|
000000B0: 20 4E 45 58 54 20 53 45 4E 54 45 4E 43 45 22 00 | NEXT SENTENCE".|
000000C0: D2 08 46 00 99 22 48 49 54 20 41 4E 59 20 4B 45 |..F.."HIT ANY KE|
000000D0: 59 22 00 DD 08 50 00 58 B2 BB 28 31 29 00 F7 08 |Y"...P.X..(1)...|
000000E0: 5A 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 38 30 20 |Z..A$:.A$."".80 |
000000F0: 20 9B 30 AB 31 30 30 00 FF 08 5F 00 89 34 30 00 | .0.100..._..40.|
00000100: 1D 09 64 00 8F 20 4D 41 49 4E 20 53 45 4E 54 45 |..d.. MAIN SENTE|
00000110: 4E 43 45 20 47 45 4E 45 52 41 54 4F 52 00 27 09 |NCE GENERATOR.'.|
00000120: 69 00 58 24 B2 22 22 00 3A 09 6E 00 8B 20 BB 28 |i.X$."".:.n.. .(|
00000130: 31 29 B3 30 2E 35 A7 33 30 30 00 44 09 78 00 8D |1).0.5.300.D.x..|
00000140: 31 31 30 30 00 56 09 82 00 8B BB 28 31 29 B3 30 |1100.V.....(1).0|
00000150: 2E 33 A7 37 30 30 00 68 09 8C 00 8B BB 28 31 29 |.3.700.h.....(1)|
00000160: B3 30 2E 35 A7 31 37 30 00 76 09 96 00 41 B2 32 |.0.5.170.v...A.2|
00000170: 3A 8D 31 30 30 30 00 85 09 A0 00 8D 31 32 30 30 |:.1000......1200|
00000180: 3A 89 38 30 30 00 93 09 AA 00 41 B2 33 3A 8D 31 |:.800.....A.3:.1|
00000190: 30 30 30 00 A1 09 B4 00 41 B2 34 3A 8D 31 30 30 |000.....A.4:.100|
000001A0: 30 00 AA 09 BE 00 89 38 30 30 00 B4 09 2C 01 8D |0......800...,..|
000001B0: 31 32 30 30 00 C6 09 36 01 8B BB 28 31 29 B3 30 |1200...6...(1).0|
000001C0: 2E 33 A7 37 30 30 00 D8 09 40 01 8B BB 28 31 29 |.3.700...@...(1)|
000001D0: B1 30 2E 35 A7 33 37 30 00 E6 09 4A 01 41 B2 32 |.0.5.370...J.A.2|
000001E0: 3A 8D 31 30 30 30 00 F0 09 54 01 8D 31 31 30 30 |:.1000...T..1100|
000001F0: 00 F9 09 5E 01 89 38 30 30 00 07 0A 72 01 41 B2 |...^..800...r.A.|
00000200: 33 3A 8D 31 30 30 30 00 15 0A 7C 01 41 B2 35 3A |3:.1000...|.A.5:|
00000210: 8D 31 30 30 30 00 1E 0A 86 01 89 38 30 30 00 31 |.1000......800.1|
00000220: 0A BC 02 41 B2 31 3A 8D 31 30 30 30 3A 89 39 30 |...A.1:.1000:.90|
00000230: 30 00 42 0A 20 03 8B BB 28 31 29 B3 30 2E 36 A7 |0.B. ...(1).0.6.|
00000240: 20 8E 00 52 0A 2A 03 41 B2 36 3A 8D 31 30 30 30 | ..R.*.A.6:.1000|
00000250: 3A 8E 00 63 0A 84 03 8B BB 28 31 29 B1 30 2E 35 |:..c.....(1).0.5|
00000260: A7 20 8E 00 73 0A 8E 03 41 B2 37 3A 8D 31 30 30 |. ..s...A.7:.100|
00000270: 30 3A 8E 00 AD 0A E8 03 8F 20 53 55 42 52 4F 55 |0:....... SUBROU|
00000280: 54 49 4E 45 20 54 4F 20 53 45 4C 45 43 54 20 41 |TINE TO SELECT A|
00000290: 20 52 41 4E 44 4F 4D 20 57 4F 52 44 20 46 52 4F | RANDOM WORD FRO|
000002A0: 4D 20 43 41 54 45 47 4F 52 59 20 41 2E 00 D4 0A |M CATEGORY A....|
000002B0: ED 03 59 B2 50 28 41 2C 31 29 AA B5 28 28 50 28 |..Y.P(A,1)..((P(|
000002C0: 41 2C 32 29 AB 50 28 41 2C 31 29 AA 31 29 AC BB |A,2).P(A,1).1)..|
000002D0: 28 31 29 29 00 E7 0A F2 03 8C 3A 81 5A B2 31 A4 |(1))......:.Z.1.|
000002E0: 59 3A 87 59 24 3A 82 00 F8 0A FC 03 58 24 B2 58 |Y:.Y$:......X$.X|
000002F0: 24 AA 22 20 22 AA 59 24 00 FE 0A 06 04 8E 00 19 |$." ".Y$........|
00000300: 0B 4C 04 8F 20 53 45 4C 45 43 54 20 4D 41 4C 45 |.L.. SELECT MALE|
00000310: 20 53 55 42 4A 45 43 54 2E 00 2C 0B 51 04 8B BB | SUBJECT..,.Q...|
00000320: 28 31 29 B1 30 2E 35 A7 31 31 32 30 00 3C 0B 56 |(1).0.5.1120.<.V|
00000330: 04 41 B2 38 3A 8D 31 30 30 30 3A 8E 00 4D 0B 60 |.A.8:.1000:..M.`|
00000340: 04 58 24 B2 58 24 AA 22 20 54 48 45 22 00 66 0B |.X$.X$." THE".f.|
00000350: 6A 04 8B 20 BB 28 31 29 B3 30 2E 34 A7 41 B2 39 |j.. .(1).0.4.A.9|
00000360: 3A 8D 31 30 30 30 00 75 0B 74 04 41 B2 31 30 3A |:.1000.u.t.A.10:|
00000370: 8D 31 30 30 30 00 7B 0B 7E 04 8E 00 98 0B B0 04 |.1000.{.~.......|
00000380: 8F 20 53 45 4C 45 43 54 20 46 45 4D 41 4C 45 20 |. SELECT FEMALE |
00000390: 53 55 42 4A 45 43 54 2E 00 AB 0B B5 04 8B BB 28 |SUBJECT........(|
000003A0: 31 29 B1 30 2E 35 A7 31 32 32 30 00 BC 0B BA 04 |1).0.5.1220.....|
000003B0: 41 B2 31 31 3A 8D 31 30 30 30 3A 8E 00 CD 0B C4 |A.11:.1000:.....|
000003C0: 04 58 24 B2 58 24 AA 22 20 54 48 45 22 00 E6 0B |.X$.X$." THE"...|
000003D0: CE 04 8B BB 28 31 29 B3 30 2E 34 A7 41 B2 31 32 |....(1).0.4.A.12|
000003E0: 3A 8D 31 30 30 30 00 F7 0B D8 04 41 B2 31 33 3A |:.1000.....A.13:|
000003F0: 8D 31 30 30 30 3A 8E 00 12 0C D0 07 8F 20 53 45 |.1000:....... SE|
00000400: 54 20 55 50 20 50 4F 49 4E 54 45 52 20 54 41 42 |T UP POINTER TAB|
00000410: 4C 45 00 1A 0C DA 07 58 B2 31 00 25 0C E4 07 81 |LE.....X.1.%....|
00000420: 4A B2 31 A4 4E 00 32 0C EE 07 50 28 4A 2C 31 29 |J.1.N.2...P(J,1)|
00000430: B2 58 00 3A 0C F8 07 87 58 24 00 53 0C 02 08 8B |.X.:....X$.S....|
00000440: 58 24 B3 B1 22 5A 22 A7 58 B2 58 AA 31 3A 89 32 |X$.."Z".X.X.1:.2|
00000450: 30 34 30 00 68 0C 0C 08 50 28 4A 2C 32 29 B2 58 |040.h...P(J,2).X|
00000460: AB 31 3A 58 B2 58 AA 31 00 6F 0C 16 08 82 4A 00 |.1:X.X.1.o....J.|
00000470: 75 0C 2A 08 8E 00 B6 0C 88 13 8F 20 44 49 53 50 |u.*........ DISP|
00000480: 4C 41 59 20 53 45 4E 54 45 4E 43 45 20 58 24 20 |LAY SENTENCE X$ |
00000490: 57 49 54 48 4F 55 54 20 42 52 45 41 4B 49 4E 47 |WITHOUT BREAKING|
000004A0: 20 55 50 20 57 4F 52 44 53 20 41 43 52 4F 53 53 | UP WORDS ACROSS|
000004B0: 20 4C 49 4E 45 53 00 C9 0C 8D 13 8B C3 28 58 24 | LINES.......(X$|
000004C0: 29 B1 34 30 A7 35 30 32 30 00 D3 0C 92 13 99 58 |).40.5020......X|
000004D0: 24 3A 8E 00 EF 0C 9C 13 8B 20 CA 28 58 24 2C 34 |$:....... .(X$,4|
000004E0: 31 2C 31 29 B3 B1 22 A0 22 A7 20 35 30 35 30 00 |1,1)..".". 5050.|
000004F0: FF 0C A6 13 99 CA 28 58 24 2C 31 2C 34 30 29 00 |......(X$,1,40).|
00000500: 17 0D B0 13 58 24 B2 C9 28 58 24 2C C3 28 58 24 |....X$..(X$,.(X$|
00000510: 29 AB 34 31 29 3A 99 00 21 0D B5 13 89 35 30 30 |).41):..!....500|
00000520: 30 00 3B 0D BA 13 8B CA 28 58 24 2C 34 31 2C 31 |0.;.....(X$,41,1|
00000530: 29 B3 B1 22 20 22 A7 35 30 38 30 00 4B 0D C4 13 |).." ".5080.K...|
00000540: 99 CA 28 58 24 2C 31 2C 34 30 29 00 66 0D C9 13 |..(X$,1,40).f...|
00000550: 58 24 B2 CA 28 58 24 2C 34 31 2C C3 28 58 24 29 |X$..(X$,41,.(X$)|
00000560: AB 34 30 29 3A 99 00 70 0D CE 13 89 35 30 30 30 |.40):..p....5000|
00000570: 00 79 0D D8 13 50 B2 33 39 00 99 0D E2 13 8B CA |.y...P.39.......|
00000580: 28 58 24 2C 50 2C 31 29 B3 B1 22 20 22 A7 50 B2 |(X$,P,1).." ".P.|
00000590: 50 AB 31 3A 89 35 30 39 30 00 AD 0D EC 13 99 CA |P.1:.5090.......|
000005A0: 28 58 24 2C 31 2C 50 AB 31 29 20 3A 99 00 C6 0D |(X$,1,P.1) :....|
000005B0: F6 13 58 24 B2 CA 28 58 24 2C 50 AA 31 2C C3 28 |..X$..(X$,P.1,.(|
000005C0: 58 24 29 AB 50 29 00 D0 0D 00 14 89 35 30 30 30 |X$).P)......5000|
000005D0: 00 0C 0E 28 23 83 47 52 55 4E 54 53 2C 53 49 4E |...(#.GRUNTS,SIN|
000005E0: 47 53 2C 48 55 4D 53 2C 50 4C 41 59 53 20 54 48 |GS,HUMS,PLAYS TH|
000005F0: 45 20 42 41 4E 4A 4F 2C 4B 45 45 50 53 20 54 48 |E BANJO,KEEPS TH|
00000600: 45 20 52 41 44 49 4F 20 4F 4E 2C 5A 00 4F 0E 32 |E RADIO ON,Z.O.2|
00000610: 23 83 4D 45 54 2C 53 48 4F 4F 4B 20 48 41 4E 44 |#.MET,SHOOK HAND|
00000620: 53 20 57 49 54 48 2C 48 41 44 20 41 20 44 52 49 |S WITH,HAD A DRI|
00000630: 4E 4B 20 57 49 54 48 2C 47 52 45 45 54 45 44 2C |NK WITH,GREETED,|
00000640: 4B 49 53 53 45 44 2C 41 54 54 41 43 4B 45 44 00 |KISSED,ATTACKED.|
00000650: 91 0E 33 23 83 47 4C 4F 41 54 45 44 20 4F 56 45 |..3#.GLOATED OVE|
00000660: 52 2C 44 49 53 44 41 49 4E 45 44 2C 44 49 44 20 |R,DISDAINED,DID |
00000670: 4E 4F 54 20 52 45 43 4F 47 4E 49 53 45 2C 57 41 |NOT RECOGNISE,WA|
00000680: 4C 4B 45 44 20 52 49 47 48 54 20 50 41 53 54 2C |LKED RIGHT PAST,|
00000690: 5A 00 C9 0E 3C 23 83 54 4F 4F 4B 20 20 4F 46 46 |Z...<#.TOOK OFF|
000006A0: 2C 20 52 45 4D 4F 56 45 44 2C 44 49 53 43 41 52 |, REMOVED,DISCAR|
000006B0: 44 45 44 2C 53 4F 4C 44 2C 57 41 53 48 45 44 2C |DED,SOLD,WASHED,|
000006C0: 57 41 47 45 52 45 44 2C 5A 00 0C 0F 46 23 83 48 |WAGERED,Z...F#.H|
000006D0: 49 53 20 53 48 49 52 54 2C 48 49 53 20 53 48 4F |IS SHIRT,HIS SHO|
000006E0: 45 53 2C 48 49 53 20 43 4F 41 54 2C 48 49 53 20 |ES,HIS COAT,HIS |
000006F0: 53 4F 43 4B 53 2C 48 49 53 20 54 4F 55 50 45 45 |SOCKS,HIS TOUPEE|
00000700: 2C 48 49 53 20 57 41 54 43 48 2C 5A 00 56 0F 50 |,HIS WATCH,Z.V.P|
00000710: 23 83 48 45 52 20 57 49 47 2C 48 45 52 20 53 48 |#.HER WIG,HER SH|
00000720: 4F 45 53 2C 48 45 52 20 48 41 54 2C 48 45 52 20 |OES,HER HAT,HER |
00000730: 53 50 45 43 54 41 43 4C 45 53 2C 48 45 52 20 53 |SPECTACLES,HER S|
00000740: 54 4F 43 4B 49 4E 47 53 2C 48 45 52 20 57 45 4C |TOCKINGS,HER WEL|
00000750: 4C 49 45 53 2C 5A 00 9F 0F 5A 23 83 57 49 54 48 |LIES,Z...Z#.WITH|
00000760: 20 44 45 4C 49 47 48 54 2C 49 4E 20 54 48 45 20 | DELIGHT,IN THE |
00000770: 50 41 52 4B 2C 45 56 45 52 59 20 44 41 59 2C 59 |PARK,EVERY DAY,Y|
00000780: 45 53 54 45 52 44 41 59 2C 4C 41 53 54 20 57 45 |ESTERDAY,LAST WE|
00000790: 45 4B 2C 54 48 49 53 20 4D 4F 52 4E 49 4E 47 00 |EK,THIS MORNING.|
000007A0: EB 0F 5B 23 83 49 4E 20 54 48 45 20 50 55 42 4C |..[#.IN THE PUBL|
000007B0: 49 43 20 4C 49 42 52 41 52 59 2C 49 4E 20 54 48 |IC LIBRARY,IN TH|
000007C0: 45 20 53 57 49 4D 4D 49 4E 47 20 50 4F 4F 4C 2C |E SWIMMING POOL,|
000007D0: 49 4E 20 54 48 45 20 48 4F 4D 45 20 43 4F 4D 50 |IN THE HOME COMP|
000007E0: 55 54 45 52 20 53 48 4F 50 2C 5A 00 20 10 64 23 |UTER SHOP,Z. .d#|
000007F0: 83 41 4C 4C 20 54 48 45 20 54 49 4D 45 2C 4F 46 |.ALL THE TIME,OF|
00000800: 54 45 4E 2C 49 4E 20 54 48 45 20 42 41 54 48 2C |TEN,IN THE BATH,|
00000810: 51 55 49 45 54 4C 59 2C 4C 4F 55 44 4C 59 2C 5A |QUIETLY,LOUDLY,Z|
00000820: 00 62 10 6E 23 83 20 50 52 45 53 49 44 45 4E 54 |.b.n#. PRESIDENT|
00000830: 20 52 45 41 47 41 4E 2C 4D 52 2E 41 4E 44 52 4F | REAGAN,MR.ANDRO|
00000840: 50 4F 56 2C 54 48 45 20 41 59 41 54 4F 4C 4C 41 |POV,THE AYATOLLA|
00000850: 48 20 4B 48 4F 4D 45 49 4E 49 2C 4D 52 2E 46 4F |H KHOMEINI,MR.FO|
00000860: 4F 54 00 A7 10 6F 23 83 20 46 4C 49 47 48 54 20 |OT...o#. FLIGHT |
00000870: 4C 49 45 55 54 45 4E 41 4E 54 20 4A 45 52 52 59 |LIEUTENANT JERRY|
00000880: 20 52 41 57 4C 49 4E 47 53 2C 43 4F 4C 2E 20 47 | RAWLINGS,COL. G|
00000890: 48 41 44 41 46 49 2C 50 52 49 4E 43 45 20 43 48 |HADAFI,PRINCE CH|
000008A0: 41 52 4C 45 53 2C 5A 00 F0 10 78 23 83 20 43 4C |ARLES,Z...x#. CL|
000008B0: 45 56 45 52 2C 48 55 53 4B 59 2C 42 55 52 4C 59 |EVER,HUSKY,BURLY|
000008C0: 2C 46 41 54 2C 53 54 55 50 49 44 2C 48 41 4C 46 |,FAT,STUPID,HALF|
000008D0: 57 49 54 54 45 44 2C 41 49 4D 49 41 42 4C 45 2C |WITTED,AIMIABLE,|
000008E0: 47 52 55 42 42 59 2C 45 4C 45 47 41 4E 54 2C 5A |GRUBBY,ELEGANT,Z|
000008F0: 00 3B 11 82 23 83 45 4E 47 49 4E 45 20 44 52 49 |.;..#.ENGINE DRI|
00000900: 56 45 52 2C 50 49 4C 4F 54 2C 50 52 4F 46 45 53 |VER,PILOT,PROFES|
00000910: 53 4F 52 2C 4C 41 56 41 54 4F 52 59 20 41 54 54 |SOR,LAVATORY ATT|
00000920: 45 4E 44 41 4E 54 2C 46 4F 4F 54 42 41 4C 4C 45 |ENDANT,FOOTBALLE|
00000930: 52 2C 4C 49 42 52 41 52 49 41 4E 00 72 11 83 23 |R,LIBRARIAN.r..#|
00000940: 83 43 48 49 45 46 20 44 45 53 49 47 4E 45 52 20 |.CHIEF DESIGNER |
00000950: 4F 46 20 54 48 45 20 43 4F 4D 4D 4F 44 4F 52 45 |OF THE COMMODORE|
00000960: 20 36 34 2C 43 42 4D 20 53 41 4C 45 53 4D 41 4E | 64,CBM SALESMAN|
00000970: 2C 5A 00 B8 11 8C 23 83 4D 52 53 2E 54 48 41 54 |,Z....#.MRS.THAT|
00000980: 43 48 45 52 2C 4A 41 4E 45 20 46 4F 4E 44 41 2C |CHER,JANE FONDA,|
00000990: 4B 41 54 45 20 42 55 53 48 2C 56 41 4E 45 53 53 |KATE BUSH,VANESS|
000009A0: 41 20 52 45 44 47 52 41 56 45 2C 50 52 49 4E 43 |A REDGRAVE,PRINC|
000009B0: 45 53 53 20 41 4E 4E 45 00 FE 11 8D 23 83 4D 52 |ESS ANNE....#.MR|
000009C0: 53 2E 20 45 44 4E 41 20 45 56 45 52 41 47 45 2C |S. EDNA EVERAGE,|
000009D0: 50 52 49 4E 43 45 53 53 20 44 49 41 4E 41 2C 47 |PRINCESS DIANA,G|
000009E0: 4C 45 4E 44 41 20 4A 41 43 4B 53 4F 4E 2C 4B 49 |LENDA JACKSON,KI|
000009F0: 52 49 20 54 45 20 4B 41 4E 41 57 41 2C 5A 00 48 |RI TE KANAWA,Z.H|
00000A00: 12 96 23 83 42 45 41 55 54 49 46 55 4C 2C 50 52 |..#.BEAUTIFUL,PR|
00000A10: 45 54 54 59 2C 55 47 4C 59 2C 50 4C 41 49 4E 2C |ETTY,UGLY,PLAIN,|
00000A20: 43 55 52 56 41 43 45 4F 55 53 2C 46 41 53 43 49 |CURVACEOUS,FASCI|
00000A30: 4E 41 54 49 4E 47 2C 42 52 41 49 4E 59 2C 44 45 |NATING,BRAINY,DE|
00000A40: 4D 45 4E 54 45 44 2C 5A 00 91 12 A0 23 83 47 49 |MENTED,Z....#.GI|
00000A50: 52 4C 2C 50 4F 4C 49 43 45 57 4F 4D 41 4E 2C 42 |RL,POLICEWOMAN,B|
00000A60: 41 52 4D 41 49 44 2C 43 4F 4E 44 55 43 54 52 45 |ARMAID,CONDUCTRE|
00000A70: 53 53 2C 53 45 43 52 45 54 41 52 59 2C 59 4F 55 |SS,SECRETARY,YOU|
00000A80: 4E 47 20 4C 41 44 59 2C 44 4F 57 41 47 45 52 2C |NG LADY,DOWAGER,|
00000A90: 5A 00 00 33 |Z..3 |
....... SENTENCES(UNIT 6).?.... COPYRIGH
T (C) ANDREW COLIN 1981.H...N.13.U....P(
13,2)._....2000.H.(..100.Q.-..".".....X$
.J(X$,2,C(X$).1)."."...2..5000...<..:.:.
:.:.:.:."FOR THE NEXT SENTENCE".R.F.."HI
T ANY KEY"...P.X..(1)...Z..A$:.A$."".80
.0.100..._..40...D.. MAIN SENTENCE GENE
RATOR.'.I.X$."".:.N.. .(1).0.5.300.D.X..
1100.V.....(1).0.3.700.H.....(1).0.5.170
.V...A.2:.1000... ..1200:.800.....A.3:.1
000.....A.4:.1000......800...,..1200.F.6
...(1).0.3.700.X.@...(1).0.5.370...J.A.2
:.1000...T..1100...^..800...R.A.3:.1000.
..|.A.5:.1000......800.1...A.1:.1000:.90
0.B. ...(1).0.6. ..R.*.A.6:.1000:..C....
.(1).0.5. ..S...A.7:.1000:....... SUBROU
TINE TO SELECT A RANDOM WORD FROM CATEGO
RY A..T...Y.P(A,1)..((P(A,2).P(A,1).1)..
(1))......:.Z.1.Y:.Y$:......X$.X$." ".Y$
.........L.. SELECT MALE SUBJECT..,.Q...
(1).0.5.1120.<.V.A.8:.1000:..M.`.X$.X$."
THE".F.J.. .(1).0.4.A.9:.1000.U.T.A.10:
.1000.{.~........ SELECT FEMALE SUBJECT.
.......(1).0.5.1220.....A.11:.1000:..M.D
.X$.X$." THE"...N...(1).0.4.A.12:.1000..
.X.A.13:.1000:....P.. SET UP POINTER TAB
LE...Z.X.1.%....J.1.N.2...P(J,1).X.:....
X$.S....X$.."Z".X.X.1:.2040.H...P(J,2).X
.1:X.X.1.O....J.U.*........ DISPLAY SENT
ENCE X$ WITHOUT BREAKING UP WORDS ACROSS
LINES.I....C(X$).40.5020.S....X$:......
. J(X$,41,1).." ". 5050......J(X$,1,40).
....X$.I(X$,C(X$).41):..!....5000.;....J
(X$,41,1).." ".5080.K.D..J(X$,1,40).F.I.
X$.J(X$,41,C(X$).40):..P.N..5000.Y.X.P.3
9......J(X$,P,1).." ".P.P.1:.5090......J
(X$,1,P.1) :..F...X$.J(X$,P.1,C(X$).P).P
....5000...(#.GRUNTS,SINGS,HUMS,PLAYS TH
E BANJO,KEEPS THE RADIO ON,Z.O.2#.MET,SH
OOK HANDS WITH,HAD A DRINK WITH,GREETED,
KISSED,ATTACKED...3#.GLOATED OVER,DISDAI
NED,DID NOT RECOGNISE,WALKED RIGHT PAST,
Z.I.<#.TOOK OFF, REMOVED,DISCARDED,SOLD
,WASHED,WAGERED,Z...F#.HIS SHIRT,HIS SHO
ES,HIS COAT,HIS SOCKS,HIS TOUPEE,HIS WAT
CH,Z.V.P#.HER WIG,HER SHOES,HER HAT,HER
SPECTACLES,HER STOCKINGS,HER WELLIES,Z..
.Z#.WITH DELIGHT,IN THE PARK,EVERY DAY,Y
ESTERDAY,LAST WEEK,THIS MORNING...[#.IN
THE PUBLIC LIBRARY,IN THE SWIMMING POOL,
IN THE HOME COMPUTER SHOP,Z. .D#.ALL THE
TIME,OFTEN,IN THE BATH,QUIETLY,LOUDLY,Z
.B.N#. PRESIDENT REAGAN,MR.ANDROPOV,THE
AYATOLLAH KHOMEINI,MR.FOOT...O#. FLIGHT
LIEUTENANT JERRY RAWLINGS,COL. GHADAFI,P
RINCE CHARLES,Z...X#. CLEVER,HUSKY,BURLY
,FAT,STUPID,HALFWITTED,AIMIABLE,GRUBBY,E
LEGANT,Z.;..#.ENGINE DRIVER,PILOT,PROFES
SOR,LAVATORY ATTENDANT,FOOTBALLER,LIBRAR
IAN.R..#.CHIEF DESIGNER OF THE COMMODORE
64,CBM SALESMAN,Z....#.MRS.THATCHER,JAN
E FONDA,KATE BUSH,VANESSA REDGRAVE,PRINC
ESS ANNE....#.MRS. EDNA EVERAGE,PRINCESS
DIANA,GLENDA JACKSON,KIRI TE KANAWA,Z.H
..#.BEAUTIFUL,PRETTY,UGLY,PLAIN,CURVACEO
US,FASCINATING,BRAINY,DEMENTED,Z... #.GI
RL,POLICEWOMAN,BARMAID,CONDUCTRESS,SECRE
TARY,YOUNG LADY,DOWAGER,Z..3
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL