home *** CD-ROM | disk | FTP | other *** search
/ Voice Collection 7: Yuko Mizutani / UNTITLED.BIN / pc / m_ura01.dir / 00035.ls < prev    next >
Encoding:
Text File  |  1995-11-24  |  335 b   |  21 lines
  1. on exitFrame
  2.   global q1, q2, q3, q4, q5, count
  3.   set q5 to random(21)
  4.   if q5 = q1 then
  5.     go(the frame)
  6.   else
  7.     if q5 = q2 then
  8.       go(the frame)
  9.     else
  10.       if q5 = q3 then
  11.         go(the frame)
  12.       else
  13.         if q5 = q4 then
  14.           go(the frame)
  15.         end if
  16.       end if
  17.     end if
  18.   end if
  19.   set count to 5
  20. end
  21.