home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / sub_karu.dir / 00102_Script_102 < prev    next >
Text File  |  1995-11-10  |  802b  |  28 lines

  1. on hai
  2.   global yomiNum, clicksprite, gHuda, gHduda2
  3.   go to "noclick"
  4.   
  5.   put clickOn() into clicksprite
  6.   if the castNum of sprite clicksprite = yomiNum then
  7.     tell the stage to go to frame "Atari"
  8.   else
  9.     if the castNum of sprite clicksprite <> yomiNum and getOne(gHuda2, yomiNum) <> 0 then
  10.       tell the stage to go to "jikangire2"
  11.     else
  12.       if the castNum of sprite clicksprite <> yomiNum and getOne(gHuda, yomiNum) = 0 and getOne(gHuda2, yomiNum) = 0 then
  13.         tell the stage to go to "Otetuki"
  14.       else
  15.         if the castNum of sprite clicksprite <> yomiNum and getOne(gHuda2, yomiNum) = 0 then
  16.           tell the stage to go to "Otetuki2"
  17.         end if
  18.       end if
  19.     end if
  20.   end if
  21.   cursor -1
  22.   tell the stage
  23.     cursor -1
  24.   end tell
  25.   
  26. end
  27.  
  28.