Sorry your browser is not supported!

set text font "verdana" : set text size 12 : print "You are walking down the road when a guy says: "Hi. My name is Bob. I want to play a fun game against you." (Press a key)" : wait key : do : RANDOMIZE TIMER() : cls : NUM=1+rnd(2) : set cursor 0,0 : print "SCORE: ",Score : input "BOB:    I AM THINKING OF A NUMBER BETWEEN 1 AND 3. WHAT IS IT?     ",GUESS : wait 200 : if GUESS<>NUM :  print "BOB:    IT WAS ",NUM,". YOU LOSE!        *Bob kills you*" : wait key : end :  else :  print "BOB:    CORRECT!" : inc Score,10 : wait key : endif : wait 200 : loop

set text font "verdana" : set text size 12 : print "You are walking down the road when a guy says: "Hi. My name is Bob. I want to play a fun game against you." (Press a key)" : wait key : do : RANDOMIZE TIMER() : cls : NUM=1+rnd(2) : set cursor 0,0 : print "SCORE: ",Score : input "BOB:    I AM THINKING OF A NUMBER BETWEEN 1 AND 3. WHAT IS IT?     ",GUESS : wait 200 : if GUESS<>NUM :  print "BOB:    IT WAS ",NUM,". YOU LOSE!        *Bob kills you*" : wait key :  else :  print "BOB:    CORRECT!" : inc Score,10 : wait key : endif : wait 200 : loop

set text font "verdana" : set text size 12 
print "You are walking down the road when a guy says: "Hi. My name is Bob. I want to play a fun game against you." (Press a key)" 
wait key : do : RANDOMIZE TIMER() : cls : NUM=1+rnd(2) : set cursor 0,0 
print "SCORE: ",Score 
print "BOB:    Choose a dice, I will pick a number off of it, and you must roll it!     "
Input "I choose a ",dicesides 
print "sided dice!" : gosub guess
print "Rolling a dice you choosed ";num;"."
wait 200 
if GUESS<>NUM
print "BOB:    IT WAS ",NUM,". YOU LOSE!        *Bob kills you*"
wait key:end :else:print "BOB:    CORRECT!" : inc Score,10 : wait key : endif : wait 200 : loop
Guess:
If dicesides < 4 : dicesides = 4
print "You change your mind and roll a 4 sided dice."
endif 
guess = rnd(dicesides):num = RND(dicesides) 
if num <1 then num = 1 : if guess <1 then num = 1
return

set text font "verdana" : set text size 12 : print "Bob is walking down the road when your ghost says: "Hi. I am a ghost. I want to play a fun game against you." (Press a key)" : wait key : randomize timer() : cls : NUM=1+rnd(99) : set cursor 0,0 : print "SCORE: 0" : print "GHOST:    I AM THINKING OF A NUMBER BETWEEN 1 AND 100. WHAT IS IT?" : GUESS = 1+rnd(100) : wait 2000 : print "BOB: " + str$(GUESS) + "." : wait 600 : if GUESS<>NUM : print "GHOST:    IT WAS ",NUM,". YOU LOSE!        *Your ghost kills Bob*" : else : print "GHOST:    CORRECT!        *Your ghost kills Bob anyway*" : endif : wait key : end

set text font "verdana" : set text size 12 : print "You are floating in ghost land when some ghost says: Hi. I'm Bob's ghost. I want to play a fun game against you. (Press a key)" : wait key : do : RANDOMIZE TIMER() : cls : NUM=1+rnd(999) : set cursor 0,0 : print "SCORE: ",Score : input "BOB'S GHOST:    I AM THINKING OF A NUMBER BETWEEN 1 AND 1000. WHAT IS IT FOOL?       GUESS: ",GUESS : wait 200 : if GUESS<>NUM :  print "BOB:    IT WAS ",NUM,". YOU LOSE!        *Bob's ghost tries to eat your soul but you eat his instead because you feel like it*" : wait key : end :  else :  print "BOB:    WHAT THE HECK!? THAT'S RIGHT! EEK!" : inc Score,10 : wait key : Print "*Bob runs away crying* You win!" : wait key : end : endif : loop

print "You are reading The Spirit World Times, it says Bob died and has two daughters, so you go back to Earth to spend Bob's inheritance money. You posses one of his" : print "daughters and go to the most expensive restaurant in town.  The waitress is his other daughter and she is crying.  SISTER: Sister... I know you hated that" : input "Dad plays guess the magic number or die with people, but do you care about him at all? ", CARE$ : print "SISTER: Never mind, don't answer.  I know you do, even though you sent everyone in town that computer virus that says he's stupid." : wait 4000 : print "French Fries     Salad" : print "Hamburger       Hot Dog" : print "Steak                Soup" : input "SISTER: What do you want for dinner?", FOOD$ : print "All we've got left is hot dogs...  I'll get you one with hot sauce, sister..." : wait 2000 : print "When you eat the hot dog remember you ate Bob's soul so he is burning in your stomach from the hot sauce.  He makes you burp him out and his ghost" : print "flys back to his body and on the way he goes right through your house and gets zapped by your computer and says "Why i fell stupidd?"  You follow him." : input "It's time to play that fun game again with Bob!  What's the number between 1 and 1000000 for Bob to guess? ", NUM : print "YOU: I'm thinking of a number between 1 and 1000000, what is it stupidd?" : wait 3000 : print "BOB: November." : wait 1500 : print "YOU: Huh?" : wait 2000 : print "The police come and see a zombie that used to be Bob.  They take Bob to a zombie museum.  You break into your own house because Bob's daughter doesn't have your" : print "keys.  You look at the computer virus Bob's daughter sent you.  It is a one line computer program that explains why bob was "stupidd": Bob's_IQ = 0" : wait key

print "In the previous episode, we saw Bob returned to his zombie body, and zapped stupidd with a computer virus." : wait key : print "After 50 years, the stupidd virus has almost worn off, and Bob wants his REVENGE!" : wait key : print "Bob calls you down from your heavenly grotto, and asks you to play a game with him." : wait key : input "Do you accept?",acc$ : if left$(lower$(acc$),1) = "y" : input "Bob says I have thought of a number between 1 and 1,000,000. What is it? ",ans : print "Bob: You got it wrong! *Bob shoots you with a gun...*" : else : print "*Bob shoots you with a gun...*" : endif : wait key : print "It seems like Bob hasn't fully recovered from his StUpIdD virus. You are a ghost, and the bullet passes straight through you." : wait key : print "It hits his daughter in the head!" : wait 2000 : ink rgb(255,0,0),0 : for d = 1 to 100 : rad = rnd(100) : ang = rnd(360) : x = (screen width()/2)+(sin(ang)*rad) : y = (screen height()/2)+(cos(ang)*rad) : for ang2 = 0 to 180 : x1 = sin(ang2)*10 : y1 = cos(ang2)*10 : line x+x1,y+y1,x-x1,y-y1 : next ang2 : next d : ink rgb(255,255,255),0 : print "Bob is wery angwy now! *You put a curse on him*" : wait key : print "Bob is wery wery angwy now! *You kill him*" : wait key : print "Bob is at the gates to heaven. St Peter asks him a question:" : wait key : print "St Peter: I am thinking of a number from 1 to 1,000,000,000. You'll never get it, so just go to hell!" : wait key : print "Bob is wery wery wery angwy now! He decides to spend eternity on earth." : wait key : do : input "Bob asks you a question: I am thinking of a number from 1 to 1,000,000,000,000. What is it? ",ans : print "Bob: No! you got it wrong! *Bob eats you*" : wait key : print "You ask Bob a question: I am thinking of a number from 1 to 1,000,000,000,000. What is it?" : wait key : print "Bob: Errr... 1020184921?" : wait key : print "You: No! *You eat bob*" : wait key : loop

Randomize timer()
Print "The next day, Bob somehow clones his zombie body a million times and turned them all into"
Print "1337 robot ninja zombie warriors. You set off to kill them all...cause you feel like it."
Do
Input "You encounter one of Bob's zombie clones. 1)Punch high 2)Punch low 3)Block high 4)Block low? ->",attack$
Bobattack = rnd(3)+1
If bobattack = 1 then Print "Bob punches high."
If bobattack = 1 and attack$ = "3" then block = 1
IF bobattack = 1 and attack$ <> "3" then die = 1
If bobattack = 2 then Print "Bob punches low."
If bobattack = 2 and attack$ = "4" then block = 1
If bobattack = 2 and attack$ <> "4" then die = 1
If bobattack = 3 then Print "Bob blocks high."
IF bobattack = 3 and attack$ = "2" then punch = 1
If bobattack = 3 and attack$ = "1" then blocked = 1
If bobattack = 3 and attack$ > "2" then stalemate = 1
If bobattack = 4 then Print "Bob blocks low."
If bobattack = 4 and attack$ = "1" then punch = 1
If bobattack = 4 and attack$ = "2" then blocked = 1
IF bobattack = 4 and attack$ > "2" then stalemate = 1
If punch = 1 then Print "You punch the zombie and kill him."
If block = 1 then Print "You block his punch and, catching him offguard, kill him somehow."
If die = 1 then Print "You are punched and killed by the zombie clone."
If blocked = 1 then Print "Your punch is blocked, and the zombie kills you."
If stalemate = 1 then Print "Since you both blocked, the zombie rots and you win."
IF die = 1 or blocked = 1 then end
suspend for key
cls
score = score + 1
Print "Your score is:"+str$(score)
Loop

Randomize timer()
Print "The next day, Bob somehow clones his zombie body a million times and turned them all into"
Print "1337 robot ninja zombie warriors. You set off to kill them all...cause you feel like it."
Do
Input "You encounter one of Bob's zombie clones. 1)Punch high 2)Punch low 3)Block high 4)Block low? ->",attack$
Bobattack = rnd(3)+1
If bobattack = 1 then Print "Bob punches high."
If bobattack = 1 and attack$ = "3" then block = 1
IF bobattack = 1 and attack$ <> "3" then die = 1
If bobattack = 2 then Print "Bob punches low."
If bobattack = 2 and attack$ = "4" then block = 1
If bobattack = 2 and attack$ <> "4" then die = 1
If bobattack = 3 then Print "Bob blocks high."
IF bobattack = 3 and attack$ = "2" then punch = 1
If bobattack = 3 and attack$ = "1" then blocked = 1
If bobattack = 3 and attack$ > "2" then stalemate = 1
If bobattack = 4 then Print "Bob blocks low."
If bobattack = 4 and attack$ = "1" then punch = 1
If bobattack = 4 and attack$ = "2" then blocked = 1
IF bobattack = 4 and attack$ > "2" then stalemate = 1
If punch = 1 then Print "You punch the zombie and kill him."
If block = 1 then Print "You block his punch and, catching him offguard, kill him somehow."
If die = 1 then Print "You are punched and killed by the zombie clone."
If blocked = 1 then Print "Your punch is blocked, and the zombie kills you."
If stalemate = 1 then Print "Since you both blocked, the zombie rots and you win."
IF die = 1 or blocked = 1 then end
suspend for key
cls
inc score
Print "Your score is:"+str$(score)
if score = 1000000
   print "You've killed all of Bob's zombies!"
   wait key
endif
Loop

bob(99999, "what is it, dumb zombie?", "What!?  It's the apocalypse!  RUN!!!", "HA HA!!! WRONG!")
wait key
end

function bob(limit as dword, prompt as string, right as string, wrong as string)
  local guess as dword
  local num as dword
  num = rnd(limit - 1) + 1
  print "I'm thinking of a number between 1 and " + str$(limit) + ", " + prompt
  input guess
  if guess = num
    print right
    exitfunction 1
  else
    print wrong
  endif
endfunction 0

Randomize timer() : set text font "verdana" : Print "The next day, Bob somehow clones his zombie body a million times and turned them all into" : Print "1337 robot ninja zombie warriors. You set off to kill them all...cause you feel like it." : Do : Input "You encounter one of Bob's zombie clones. 1)Punch high 2)Punch low 3)Block high 4)Block low? ->",attack$ : Bobattack = rnd(3+1) : If bobattack = 1 : Print "Bob punches high." : endif : If bobattack = 1 and attack$ = "3" : block = 1 : endif : IF bobattack = 1 and attack$ <> "3" : die = 1 : endif : If bobattack = 2 : Print "Bob punches low." : endif : If bobattack = 2 and attack$ = "4" : block = 1 : endif : If bobattack = 2 and attack$ <> "4" : die = 1 : endif
If bobattack = 3 : Print "Bob blocks high." : endif : IF bobattack = 3 and attack$ = "2" : punch = 1 : endif : If bobattack = 3 and attack$ = "1" : blocked = 1 : endif : If bobattack = 3 and attack$ > "2" : stalemate = 1 : endif : If bobattack = 4 : Print "Bob blocks low." : endif : If bobattack = 4 and attack$ = "1" : punch = 1 : endif : If bobattack = 4 and attack$ = "2" : blocked = 1 : endif : IF bobattack = 4 and attack$ > "2" : stalemate = 1 : endif : If punch = 1
Print "You punch the zombie and kill him." : endif : If block = 1 : Print "You block his punch and, catching him offguard, kill him somehow." : endif : If die = 1 : Print "You are punched and almost killed by the zombie clone." : endif : If blocked = 1 : Print "Your punch is blocked, and the zombie almost kills you." : endif : If stalemate = 1 : Print "Since you both blocked, the zombie rots and you win." : endif : IF die = 1 or blocked = 1 : print "You fall on the ground.. And feel the pain in your body.. One of the bob zombie clone comes talk to you.." : print "''Do you wanna play my miracle number game''?" : input "(1) Yes (2) No ",play$ : If play$="1" : bob(5, "What is it?", "What it was correct!!!???? *You get the super powers so you kill all the bob zombie clones! ", "Wrong! *Bob zombie clone kills you..*") : else print "*Bob zombie clone kills you..*" : wait key : end : endif : endif
suspend for key : cls : inc score:if super=1 : repeat : inc score : until score=>1000000 : endif: Print "Your score is:"+str$(score) : if score => 1000000 : print "You've killed all of Bob's zombies!" : endif : wait key:Loop
function bob(limit as dword, prompt as string, right as string, wrong as string) :  local guess as dword : local num as dword : num = rnd(limit - 1) + 1 : print "I'm thinking of a number between 1 and " + str$(limit) + ", " + prompt : input guess : if guess = num : print right : wait key : super=1 : exitfunction 1 : else print wrong : wait key : end : endif
endfunction 0

cls
Congratulations!
wait key
cls
PRINT "A girl named sally walks up and says PICK A POTION"
PRINT "Would you like a Mystery Potion? [Y/N]"
if scancode()=REMSTART whatever the code for Y is REMEND
PRINT "It was poisonious *YOU DIE*"
endif
if scancode()=REMSTART whatever the code for N is REMEND
PRINT "How About a Fishy Potion?"
`etc etc

then you can have a mini PICK THE RIGHT THING game