home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / BATWORKS.ZIP / NAMEDEMO.PTB < prev    next >
Encoding:
Text File  |  1990-05-22  |  140 b   |  8 lines
  1. delay(10)
  2. abc=wingetact()
  3. if abc != "Your Name Please" then exit
  4. ignoreinput(@true)
  5. sendkey("George Bush~")
  6. ignoreinput(@FALSE)
  7. exit
  8.