rem 0-9 a-z
rem descrambler
print "Infinite Crime Solver Version 1.0 By Atomic_Bios"
KMD$ = COMMAND$
KMD$ = LTRIM$(KMD$)
IF KMD$ = "" THEN
print "usage: ics text"
print "text is any imformation about the crime"
END
ENDIF
intro:
a$ = KMD$
a$ = lcase$(a$)
main:
randomize
L = len(a$)
print "Informant Says:"
for j = 1 to L
t$ = mid$(a$,j,1)
print t$;
print "=";
if t$ = "0" then
a1$ = "sands"
a2$ = "winter"
a3$ = "won the race"
a4$ = "heads/tails"
endif
if t$ = "1" then
a1$ = "lottery winner"
a2$ = "fast race"
a3$ = "ice orange"
a4$ = "meat ripper"
endif
if t$ = "2" then
a1$ = "cancer patient"
a2$ = "beer drinker"
a3$ = "fishing bobber"
a4$ = "desease"
endif
if t$ = "3" then
a1$ = "graffetti"
a2$ = "black coin trick"
a3$ = "lava lamp"
a4$ = "music concert"
endif
if t$ = "4" then
a1$ = "gangs"
a2$ = "crane, pond dive"
a3$ = "rake leaves"
a4$ = "dead people"
endif
if t$ = "5" then
a1$ = "wedding cake"
a2$ = "smart kid"
a3$ = "fast car"
a4$ = "ignorant"
endif
if t$ = "6" then
a1$ = "ink letter"
a2$ = "older person"
a3$ = "rotten morals"
a4$ = "find cash"
endif
if t$ = "7" then
a1$ = "meat freezer"
a2$ = "metal puzzle toys"
a3$ = "sick vomit"
a4$ = "yourself"
endif
if t$ = "8" then
a1$ = "peer pressure"
a2$ = "bad situation"
a3$ = "mean person"
a4$ = "bogeyman"
endif
if t$ = "9" then
a1$ = "fat man"
a2$ = "big boy"
a3$ = "knight armor"
a4$ = "swamps"
endif
if t$ = "a" then
a1$ = "pets"
a2$ = "ransom"
a3$ = "hate cops"
a4$ = "myths"
endif
if t$ = "b" then
a1$ = "gang rape"
a2$ = "huge pot bag"
a3$ = "huge antenna"
a4$ = "baby boy"
endif
if t$ = "c" then
a1$ = "big crank bags"
a2$ = "heroin villan"
a3$ = "huge trucks"
a4$ = "skunk clowns"
endif
if t$ = "d" then
a1$ = "daylight farmer"
a2$ = "ratting out"
a3$ = "done dare"
a4$ = "wiz math"
endif
if t$ = "e" then
a1$ = "fast rabbit"
a2$ = "perfect lovers"
a3$ = "huge network"
a4$ = "super equasion"
endif
if t$ = "f" then
a1$ = "infinite network"
a2$ = "everyone"
a3$ = "many universes"
a4$ = ""
endif
if t$ = "g" then
a1$ = "fat people"
a2$ = "nuclear power"
a3$ = "bad factories"
a4$ = "secret plans"
endif
if t$ = "h" then
a1$ = "perfect monsters"
a2$ = "economy fuels"
a3$ = "magic disney"
a4$ = "endless latter"
endif
if t$ = "i" then
a1$ = "huge forks"
a2$ = "massive fires"
a3$ = "atomic blasts"
a4$ = "invisible man"
endif
if t$ = "j" then
a1$ = "atomic juices"
a2$ = "best advice"
a3$ = "perfect Satan"
a4$ = "trickster"
endif
if t$ = "k" then
a1$ = "elephants "
a2$ = "staples store"
a3$ = "Lucifers ovens"
a4$ = "roaring river"
endif
if t$ = "l" then
a1$ = "land zone"
a2$ = "tomato"
a3$ = "road rage"
a4$ = "look longer"
endif
if t$ = "m" then
a1$ = "make pizza"
a2$ = "family home"
a3$ = "rook chess"
a4$ = "poison dart"
endif
if t$ = "n" then
a1$ = "hit nail head"
a2$ = "name notes"
a3$ = "stone pizza"
a4$ = "weak victim"
endif
if t$ = "o" then
a1$ = "pickle head"
a2$ = "brillow man"
a3$ = "vicious lobsters"
a4$ = "can't 911"
endif
if t$ = "p" then
a1$ = "safe world"
a2$ = "atomic flowers"
a3$ = "pretty woman"
a4$ = "world war"
endif
if t$ = "q" then
a1$ = "storm drive"
a2$ = "ping pong"
a3$ = "pac-man"
a4$ = "save everyone"
endif
if t$ = "r" then
a1$ = "rocky road"
a2$ = "coke company"
a3$ = "massive pumps"
a4$ = "super-villan"
endif
if t$ = "s" then
a1$ = "singing serpant"
a2$ = "silly strings"
a3$ = "power punch"
a4$ = "find poison"
endif
if t$ = "t" then
a1$ = "speed dance"
a2$ = "sandy date"
a3$ = "singer"
a4$ = "mass media"
endif
if t$ = "u" then
a1$ = "big shot"
a2$ = "huge cat"
a3$ = "alive carrot"
a4$ = "devils bomb"
endif
if t$ = "v" then
a1$ = "simply right"
a2$ = "blast pipes"
a3$ = "endless corn"
a4$ = "generals men"
endif
if t$ = "w" then
a1$ = "wacky tango"
a2$ = "unstable mixture"
a3$ = "endless bridges"
a4$ = "transgenetic"
endif
if t$ = "x" then
a1$ = "there now"
a2$ = "toy trains"
a3$ = "heavenly figs"
a4$ = "alckemy"
endif
if t$ = "y" then
a1$ = "goat antlers"
a2$ = "fork druid"
a3$ = "frog bogs"
a4$ = "robots"
endif
if t$ = "z" then
a1$ = "infinite psychic"
a2$ = "talk to dead"
a3$ = "save the world"
a4$ = "everyone"
endif
print a1$;
print ",";
print a2$;
print ",";
print a3$;
print ",";
print a4$;
print "."
next j
END