home *** CD-ROM | disk | FTP | other *** search
/ Windows CE - The Ultimate Companion / ROMMAN_CE.iso / Files / Programming / Basice / LIB / PAUSE.UTL < prev    next >
Text File  |  1997-03-14  |  114b  |  8 lines
  1. procedure pause(uu$)
  2.    print uu$;
  3.    loop
  4.       uu$=key$
  5.       while len%(uu$)=0
  6.       endloop
  7.    endproc
  8.