program shakespeare version 9 syntax local x = runiform() if `x'<=0.02 { di as txt " To be, or not to be: that is the question " di as txt " Hamlet, Act 3, Scene 1 " exit } if `x'>0.02 & `x'<=0.04 { di as txt " All the world's a stage, and all the men and women merely players." di as txt " They have their exits and their entrances. " di as txt " And one man in his time plays many parts " di as txt " As you like it, Act 2, Scene 7 " exit } if `x'>0.04 & `x'<=0.06 { di as txt " 'Romeo, Romeo! Wherefore art thou Romeo?'" di as txt " Romeo & Juliet, Act 2 , Scene 2 " exit } if `x'>0.06 & `x'<=0.08 { di as txt " 'Now is the winter of our discontent' " di as text " Richard III, Act 1, Scene 1 " exit } if `x'>0.08 & `x'<=0.10 { di as txt " 'Is this a dagger, which I see before me?' " di as txt " Macbeth, Act 2 , Scene 1 " exit } if `x'>0.10 & `x'<=0.12 { di as txt " 'The lady doth protest too much, methinks' " di as txt " Hamlet, Act 3, Scene 2 " exit } if `x'>0.12 & `x'<=0.14 { di as txt " 'Beware the Ides of March' " di as txt " Julius Caesar, Act 1 , Scene 2 " exit } if `x'>0.14 & `x'<=0.16 { di as txt " 'Get thee to a nunnery' " di as txt " Hamlet, Act 3 , Scene 1 " exit } if `x'>0.16 & `x'<=0.18 { di as txt " If music be the food of love, play on " di as txt " Twelfth Night, Act 1 , Scene 3 " exit } if `x'>0.18 & `x'<=0.20 { di as txt " 'What's in a name? A rose by any other name would smell just as sweet' " di as txt " Romeo & Juliet, Act 2, Scene 2 " exit } if `x'>0.20 & `x'<=0.22 { di as txt " 'The better part of valor is discretion' " di as txt " Henry IV, Part 1, Act 5, Scene 4 " exit } if `x'>0.22 & `x'<=0.24 { di as txt " 'To thine own self be true' " di as txt " Hamlet Act 1 , Scene 3 " exit } if `x'>0.24 & `x'<=0.26 { di as txt " 'All that glitters is not gold' " di as txt " The Merchant of Venice, Act 2 , Scene 7" exit } if `x'>0.26 & `x'<=0.27 { di as txt " 'Love looks not with the eyes, but with the mind; and therefore is winged Cupid painted blind' " di as txt " A Midsummer Nights Dream, Act 1, Scene 1 " exit } if `x'>0.27 & `x'<=0.29 { di as txt " 'Friends, Romans, countrymen, lend me your ears. I come to bury Caesar, not praise him' " di as txt " Julius Caesar, Act 3, Scene 2 " exit } if `x'>0.29 & `x'<=0.31 { di as txt " Cry 'Havoc' and let slip the dogs of war" di as txt " Julius Caesar Act 3 Scene 1 " exit } if `x'>0.31 & `x'<=0.33 { di as txt " 'A horse, a horse, my Kingdom for a horse' " di as txt " Richard iii, Act 5, Scene 4 " exit } if `x'>0.33 & `x'<=0.35 { di as txt " 'There are more things in Heaven and earth than are dreamt of in your philosophy' " di as txt " Hamlet, Act1 Scene 5 " exit } if `x'>0.57 & `x'<=0.59 { di as txt " 'You don't need a weatherman to know which way the wind blows' " di as txt " Subterranean Homesick Blues " exit } if `x'>0.36 & `x'<= 0.39 { di as txt " 'Shall I compare thee to a summers day? Thou art more lovely and more temperate' " di as txt " Sonnet 18 " exit } if `x'>0.39 & `x'<=0.41 { di as txt " 'Uneasy lies the head that wears the crown' " di as txt " Henry IV, Part 2, Act 3, Scene 1 " exit } if `x'>0.41 & `x'<=0.43 { di as txt " 'Brevity is the soul of wit' " di as txt " Hamlet Act 2 Scene 2 " exit } if `x'>0.43 & `x'<=0.45 { di as txt " 'This royal throne of kings, this sceptred isle: This blessed plot, this earth, this realm, this England' " di as txt " Richard II, Act 2, Scene 1 " exit } if `x'>0.45 & `x'<=0.47 { di as txt " 'What light through yonder window breaks' " di as txt " Romeo and Juliet, Act 2, Scene 2 " exit } if `x'>0.47 & `x'<= 0.49 { di as txt " 'Some are born great, some achieve greatness, and some have greatness thrust upon them' " di as txt " Twelfth Night, Act 2, Scene 5 " exit } if `x'>0.49 & `x'<= 0.51 { di as txt " 'Cowards die many times before their deaths; the valiant never taste of death but once' " di as txt " Julius Caesar Act 2 , Scene 5 " exit } if `x'>0.51 & `x'<= 0.53 { di as txt " 'Full fathom five thy father lies, of his bones are coral made. ' " di as txt " The Tempest, Act 1 , Scene 2 " exit } if `x'>0.53 & `x'<= 0.55 { di as txt " 'A man can die but once' " di as txt " Henry IV, Part 2, Act 3, Scene 2 " exit } if `x'>0.55 & `x'<= 0.57 { di as txt " 'How sharper than a serpents tooth it is to have a thankless child! ' " di as txt " King Lear, Act 1, Scene 4 " exit } if `x'>0.35 & `x'<= 0.36 { di as txt " 'Fraility, thy name is woman' " di as txt " Hamlet, Act 1 , Scene 2 " exit } if `x'>0.59 & `x'<= 0.61 { di as txt " 'If you prick us, do we not bleed? If you tickle us, do we not laugh?' " di as txt " The Merchant of Venice, Act 3 , Scene 1 " exit } if `x'>0.61 & `x'<= 0.63 { di as txt " 'I am one who loved not wisely but too well' " di as txt " Othello, Act 5, Scene 2" exit } if `x'>0.63 & `x'<= 0.65 { di as txt " 'We are such stuff as dreams are made on, and our little life is rounded with a sleep ' " di as txt " The Tempest, Act 4, Scene 1 " exit } if `x'>0.65 & `x'<= 0.67 { di as txt " ' Life ís but a walking shadow, a poor player, that struts and frets his hour upon the stage, and " di as txt " then is heard no more; it is a tale told by an idiot, full of sound and fury, signifying nothing" di as txt " Macbeth , Act 5, Scene 5 " exit } if `x'>0.67 & `x'<= 0.69 { di as txt " 'To thine own self be true, and it must follow, as the night the day, " di as txt " thou canst not then be false to any man ' " di as txt " Hamlet, Act 1 , Scene 3" exit } if `x'>0.69 & `x'<= 0.71 { di as txt " 'Et tu, Brute?' " di as txt " Julius Caesar, Act 3, Scene 1" exit } if `x'>0.71 & `x'<= 0.73 { di as txt " 'There is nothing either good or bad, but thinking makes it so' " di as txt " Hamlet, Act 2 , Scene 2" exit } if `x'>0.73 & `x'<= 0.75 { di as txt " 'Nothing will come off nothing' " di as txt " King Lear, Act 1, Scene 1" exit } if `x'>0.75 & `x'<= 0.77 { di as txt " 'The course of true love never did run smooth' " di as txt " A Midsummer Nights Dream, Act 1, Scene 1" exit } if `x'>0.77 & `x'<= 0.79 { di as txt " 'Lord, what fools these mortals be! ' " di as txt "A Midsummer Nightís Dream, Act 1, Scene 1 " exit } if `x'>0.79 & `x'<= 0.81 { di as txt " 'The fault, dear Brutus, lies not within the stars, but in ourselves, that we are underlings ' " di as txt " Hamlet, Act 1 , Scene 3" exit } if `x'>0.81 & `x'<= 0.83 { di as txt " To thine own self be true, and it must follow, as the night the day, " di as txt " thou canst not then be false to any man " di as txt " Julius Caesar, Act 1, Scene 2" exit } if `x'>0.83 & `x'<= 0.85 { di as txt " 'Let me not to the marriage of true minds admit impediments ' " di as txt "Sonnet 116" exit } if `x'>0.85 & `x'<= 0.87 { di as txt " 'The evil that men do lives after them; The good is oft interred with their bones ' " di as txt "Julius Caesar, Act 3, Scene 2 " exit } if `x'>0.87 & `x'<= 0.89 { di as txt " 'But, for my own part, it was Greek to me ' " di as txt "Julius Caesar, Act 1, Scene 2 " exit } if `x'>0.89 & `x'<= 0.91 { di as txt " Neither a borrower nor a lender be; for loan oft loses both itself and friend, " di as txt " and borrowing dulls the edge of husbandry. " di as txt " Hamlet, Act 1 , Scene 3" exit } if `x'>0.91 & `x'<= 0.93 { di as txt " 'We know what we are, but know not what we may be ' " di as txt " Hamlet, Act 4 , Scene 5" exit } if `x'>0.93 & `x'<= 0.95 { di as txt " 'Off with his head!' " di as txt " Richard III, Act 3, Scene 4" exit } if `x'>0.95 & `x'<= 0.97 { di as txt " 'Misery acquaints a man with strange bedfellows ' " di as txt " The Tempest, Act 2, Scene 2 " exit } if `x'>0.97 & `x'<= 0.99 { di as txt " 'I am a man more sinned against than sinning ' " di as txt " King Lear, Act 3, Scene 2 " exit } if `x'>0.99 & `x'<= 1 { di as txt " 'I cannot tell what the dickens his name is ' " di as txt " The Merry Wives of Windsor, Act 3, Scene 2 " exit } end