dim proverb$(2,100)
randomize time$("seconds")
np=40

for p=1 to 2
    for q=1 to np
          read a$
          proverb$(p,q)=a$
    next
next

q=0
while q<np
    cls:q=q+1
    for p=1 to 2
        r=1+int(rnd(1)*np)
        while proverb$(p,r)="-"
            r=r+1:if r>np then r=1
        wend
        print proverb$(p,r);" ";
        proverb$(p,r)="-"
    next
    print:print
    print"Press Enter for another,"
    print"or X to exit: ";
    k=0
    do
        k=asc(input$(1))
    loop until k=88 or k=120 or k=13
    if k<>13 then q=np
wend
cls:end

DATA "A bird in the hand"
DATA "A friend in need"
DATA "A job worth doing"
DATA "A little knowledge"
DATA "A stolen pleasure"
DATA "A thing of beauty"
DATA "Absolute power"
DATA "All work and no play"
DATA "Anger"
DATA "Blind ambition"
DATA "Charity"
DATA "Crime"
DATA "Curiosity"
DATA "Envy"
DATA "Evil"
DATA "Generosity"
DATA "God in his wisdom"
DATA "Haste"
DATA "Heaven above"
DATA "Hindsight"
DATA "Honesty"
DATA "Impulsive behavior"
DATA "Jealousy"
DATA "Love"
DATA "Misery"
DATA "Money"
DATA "Much ado about nothing"
DATA "One good turn"
DATA "Pride"
DATA "Procrastination"
DATA "Regret"
DATA "Revenge"
DATA "Selfishness"
DATA "Success"
DATA "The devil you know"
DATA "The darkest hour"
DATA "The early bird"
DATA "The pursuit of happiness"
DATA "The road less travelled"
DATA "The road to hell"

DATA "breeds contempt."
DATA "brings happiness."
DATA "can work miracles."
DATA "cannot buy happiness."
DATA "comes before a fall."
DATA "comes to those who wait."
DATA "corrupts absolutely."
DATA "costs nothing."
DATA "does nobody any good."
DATA "doesn't pay."
DATA "has a silver lining."
DATA "heals all wounds."
DATA "hurts."
DATA "is a dangerous thing."
DATA "is a joy forever."
DATA "is a mixed blessing."
DATA "is bad news."
DATA "is best forgotten."
DATA "is better than nothing."
DATA "is bliss."
DATA "is cheap."
DATA "is good news."
DATA "is its own reward."
DATA "is next to godliness."
DATA "is only skin deep."
DATA "is often spoken in jest."
DATA "is sweet."
DATA "is the best medicine."
DATA "is the best policy."
DATA "is the root of all evil."
DATA "is the path to wisdom."
DATA "is a thing of beauty."
DATA "justifies the means."
DATA "kills."
DATA "lasts forever."
DATA "leads to a lifetime of regret."
DATA "makes you stronger."
DATA "pleases no one."
DATA "speaks louder than words."
DATA "will move mountains."