home *** CD-ROM | disk | FTP | other *** search
/ Voice Collection 7: Yuko Mizutani / UNTITLED.BIN / pc / ura_un.dir / 00020.ls < prev    next >
Encoding:
Text File  |  1995-01-01  |  700 b   |  37 lines

  1. on exitFrame
  2.   set zenaku to random(2)
  3.   if zenaku = 1 then
  4.     set bunki to random(3)
  5.     if bunki = 1 then
  6.       go("├º┬╝├º├ç")
  7.     else
  8.       if bunki = 2 then
  9.         go("├ç┼╕├ç┬½├ç┼╕├ç┬½")
  10.       else
  11.         go("├»├à├¡┬á")
  12.       end if
  13.     end if
  14.   else
  15.     set bunki2 to random(5)
  16.     if bunki2 = 1 then
  17.       go("├º┬╝├á┬┤")
  18.     else
  19.       if bunki2 = 2 then
  20.         go("├çΓÇá├ç├Æ├çΓÇ╣├ç├ï")
  21.       else
  22.         if bunki2 = 3 then
  23.           go("├ës├ë├¼├ë`")
  24.         else
  25.           if bunki2 = 4 then
  26.             go("├ñ├Ä├Ñ├ÿ")
  27.           else
  28.             if bunki2 = 5 then
  29.               go("├ç┬½├ç┬º├çΓÇí")
  30.             end if
  31.           end if
  32.         end if
  33.       end if
  34.     end if
  35.   end if
  36. end
  37.