home *** CD-ROM | disk | FTP | other *** search
/ Game Programming for Teens / GameProgrammingForTeens.iso / Source / chapter02 / demo02-08.bb < prev    next >
Encoding:
Text File  |  2003-04-06  |  189 b   |  13 lines
  1. ;demo02-08.bb - tests the keys pressed
  2.  
  3. x = Input$("Enter 1 to say hi, or 0 to quit. ") 
  4.  
  5. Select x
  6.     Case 1
  7.         Print "Hi!"
  8.     Case 0
  9.         End
  10.     Default
  11.         Print "Huh?"
  12. End Select
  13. WaitKey