home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / devglry / maricopa / source / quizzer.dir / 00033.ls < prev    next >
Encoding:
Text File  |  1996-04-18  |  233 b   |  12 lines
  1. on exitFrame
  2.   if not NetDone() or (the timer < (60 * 10)) then
  3.     go(the frame - 1)
  4.   else
  5.     put netTextResult() into field "qText"
  6.     puppetSprite(2, 0)
  7.     puppetSprite(11, 0)
  8.     makeQuiz()
  9.     go(the frame + 1)
  10.   end if
  11. end
  12.