home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1996 December / CD_shareware_12-96.iso / DOS / Programa / PSSWRD.ZIP / PASSWORD.BAS < prev    next >
Encoding:
BASIC Source File  |  1996-09-27  |  317 b   |  12 lines
  1. 10 CLS
  2. 20 a = 1
  3. 30 PRINT "What's the Password, Butthead?!"
  4. 40 INPUT x$
  5. 50 IF x$ = "Butthead" GOTO 100
  6. 60 IF a > 1000 GOTO 10
  7. 70 PRINT "Ha! Ha! Ha! Ha! Ha! Ha! It's not '"; x$; "'!"; " TRY AGAIN!"
  8. 80 a = a + 1
  9. 90 GOTO 60
  10. 100 PRINT "Congratulations, you finally hacked into the 'Top Secutity MEGA-System!'"
  11.  
  12.