home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / devglry / ingenius / shockwav / quest.dcr / 00011.ls < prev    next >
Encoding:
Text File  |  1996-05-10  |  158 b   |  11 lines
  1. on exitFrame
  2.   global gActText
  3.   if NetDone() then
  4.     set gActText to netTextResult()
  5.     init()
  6.     go(the frame + 1)
  7.   else
  8.     go(the frame)
  9.   end if
  10. end
  11.