http://www.livescience.com/16339-culture-racism.html
You fucken retards.
DIM WORDS$(1024)
N = 0
DO
READ A$
IF A$ <> "END" THEN
WORDS$(N) = A$
N = N + 1
END IF
LOOP UNTIL A$ = "END"
PRINT N; " words in vocabulary."
PRINT
PRINT "You must talk to God, first, before running this program."
PRINT
OPEN "OUT.TXT" FOR OUTPUT AS #1
DO
I = -1
DO
I = I + 1
IF I >= N * 100 THEN I = 0
LOOP UNTIL INKEY$ <> ""
I = INT(I / 100)
PRINT WORDS$(I); " ";
PRINT #1, WORDS$(I); " ";
LOOP UNTIL WORDS$(I) = "done"
PRINT #1,
CLOSE #1
PRINT
PRINT "Press A Key"
DO
LOOP UNTIL INKEY$ <> ""
DATA "good","bad","fun","silly","stupid"
DATA "me","you","God","Obama","Bush"
DATA "love","hate","happy","sad","obviously"
DATA "okay","whatever","do_it","why","now"
DATA "money","car","oil","house","computer"
DATA "angel","demon","Satan","Heaven","Hell"
DATA "USA","Europe","Egypt","Russia","China"
DATA "Microsoft","Linux","LoseThos","Apple","Google"
DATA "sin","sex","lust","greed","sloth"
DATA "fortitude","virtue","patience","charity","honest"
DATA "music","art","software","hardware","food"
DATA "pity","probably","pest","pretty","ugly"
DATA "I","prayer","piety","you","your"
DATA "stupid","smart","healthy","unhealthy","quick"
DATA "fantastic","foolish","wise","Oops","Hmmm"
DATA "rediculous","biggot","grieved","ouch","conservative"
DATA "liberal","bickering","ouch","smurfs","bam"
DATA "zap","oy!","shalom","furious","fake"
DATA "impossible","crazy","joking","lovely","planet"
DATA "Venus","Mars","horrendous","buddy","nice"
DATA "day","night","wonder","laughable","better"
DATA "perfect","swear","lucky","mocked","occasion"
DATA "know","right","wrong","spunky","dignity"
DATA "prosparity","rich","poor","middle_class","meh"
DATA "care","don't","kludge","theory","practice"
DATA "experts","class","yawn","varoom","evolution"
DATA "population","threads","meek","Jesus","theft"
DATA "adultery","guppy","whale","astrophysics","gravity"
DATA "boss","hero","mess","nightmare","ordinarily"
DATA "special","nuts","bored","relax","news"
DATA "tip","super","cool","nasty","fancy"
DATA "birds","cats","dogs","goats","horses"
DATA "farm","produce","parks","nature","wild"
DATA "tame","cultivated","city","Vegas","D.C."
DATA "rock","tree","water","salt","CO2"
DATA "climate","rain","snow","ice","mud"
DATA "storm","lightening","thunder","gun","war"
DATA "shoot","smack","work","play","music"
DATA "soul","body","brain","heart","hand"
DATA "NASA","Afghanistan","France","Africa","Britain"
DATA "Germany","Japan","Russia","Mexico","person"
DATA "Catholic","Jew","Christian","Muslim","Buddist"
DATA "atheist","homo","ha!","programmer","scientist"
DATA "doctor","priest","cop","politician","lawyer"
DATA "Israel","Palistinians","Brazil","peace","hippy"
DATA "song","radio","TV","home","phone"
DATA "football","superbowl","game","show","teach"
DATA "school","M.I.T.","Ivy League","Harvard","Yale"
DATA "Stanford","ASU","physics","chemestry","biology"
DATA "hopefully","awesome","joyous","sermon","Christ"
DATA "Mohammad","BBC","Moses","proton","electron"
DATA "photon","neutron","radiation","magnetism","atom"
DATA "energy","mass","speed","relativity","charge"
DATA "economics","Nobel","saint","prize","win"
DATA "lose","death","birth","marriage","man"
DATA "woman","animal","king","president","leader"
DATA "Ticketmaster","event","ticket","chased","day"
DATA "monkey","plant","dinosaurs","shells","vertebrates"
DATA "primates","bugs","flowers","fruit","bear"
DATA "fire","smoke","burning","hidden","adapt"
DATA "King David","Bible","ark","flood","star"
DATA "slavery","freedom","rejoice","brave","coward"
DATA "fight","sing","write","read","paper"
DATA "Pope","please","thank you","New Testament","Old Testament"
DATA "seek","find","goto","get","give"
DATA "spend","save","book","email","Internet"
DATA "surely","So","let","it","be"
DATA "grown","adult","child","innocent","teenager"
DATA "drive","sports","band"
DATA "vacation","church","Sunday","math","geography"
DATA "of","the","is","a","in"
DATA "on","under","over","between","after"
DATA "before","time","space","Star Trek","Star Wars"
DATA "movie","should","shouldn't","commandment","for"
DATA "tax","IRS","FBI","CIA","media"
DATA "luxury","needy","enough","go","went"
DATA "remember","forget","fix","found","lost"
DATA "despair","laugh","cookie","genetic","algorithm"
DATA "ice_cream","soap","opera","umm...","fast"
DATA "black","hole","Sun","approach","light"
DATA "hilarious","funny","comical","ROFLMAO","LOL"
DATA "done","done","done","done","done"
DATA "done","done","done","done","done"
DATA "done","done","done","done","done"
DATA "done","done","done","done","done"
DATA "done","done","done","done","done"
DATA "done","done","done","done","done"
DATA "END"
God says...
proton CIA electron needy Mohammad went speed tax energy went mass IRS luxury IRS after went IRS go biology hardware economics Linux mass IRS found IRS forget IRS IRS Star Wars Star Trek after under needy IRS shouldn't remember remember music electron art media luxury commandment forget CIA energy pest went software atom probably tax remember commandment magnetism fortitude enough tax probably commandment piety should Star Trek mass should proton save after atom for virtue neutron pretty rejoice space should Star Wars FBI went ugly IRS space tax media enough tax CIA for for tax between needy relativity enough photon sex photon media FBI needy go remember needy needy commandment speed remember went food media CIA go atom IRS neutron should commandment go shouldn't ordinarily prayer time BBC remember for enough electron should go needy pretty media atom remember IRS photon before atom went remember space electron needy neutron media enough luxury needy radiation enough remember went movie found for chemestry fix Star Wars went movie fix needy atom forget mass lost child movie needy go went hopefully enough media found go mass go electron CIA radiation tax media tax Mohammad CIA Star Trek chemestry FBI forget M.I.T. luxury luxury went went chemestry demon energy needy IRS fix enough found photon tax luxury enough CIA commandment needy went mass your before enough energy fix for movie forget enough ASU Star Trek CIA shouldn't movie movie tax should mass is needy music Harvard needy enough lost IRS atom enough piety Mohammad M.I.T. pity commandment comical Sunday IRS TV movie media went fix media FBI neutron forget tax Star Wars ROFLMAO food relativity prayer Mohammad seek enough luxury Star Wars is light enough go a lawyer should went fix CIA media Star Wars go time a luxury food atom needy the CIA go media luxury magnetism go for shouldn't Star Wars commandment funny time time forget FBI vacation IRS forget needy fix the computer umm... enough under IRS found fix found remember forget luxury tax atom done