home *** CD-ROM | disk | FTP | other *** search
/ Game Programming for Teens / GameProgrammingForTeens.iso / Source / chapter02 / demo02-10.bb < prev    next >
Encoding:
Text File  |  2003-04-06  |  275 b   |  14 lines
  1. ;demo02-10.bb - Demonstrates the use of Goto
  2. ;Place a label
  3. .label 
  4. Print "Hello" 
  5.  
  6.  
  7. ;Does user want to repeat?
  8. selection = Input("Enter 1 if you want me to repeat 'Hello' ==> ") 
  9. If (selection = 1) 
  10.     
  11.     ;Go to the top and print hello again
  12.     Goto label 
  13. EndIf
  14. End