home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / bbozu7.dir / 00085_Script_85 < prev    next >
Text File  |  1995-11-13  |  1KB  |  41 lines
  1. on mouseUp
  2.   global gChangeP,gHuda,gMotihuda
  3.   sound playFile 2, "\S_BZMKRI\CARD_C"
  4.   if gChangeP = 0 then
  5.     set the visible of sprite 18 = 0
  6.     set the visible of sprite 19 = 0
  7.     set the visible of sprite 20 = 0
  8.   else
  9.     if gChangeP = 1 then
  10.       set the visible of sprite 18 = 1
  11.       set the visible of sprite 19 = 0
  12.       set the visible of sprite 20 = 0
  13.     else
  14.       if gChangeP = 2 then
  15.         set the visible of sprite 18 = 1
  16.         set the visible of sprite 19 = 1
  17.         set the visible of sprite 20 = 0
  18.       else
  19.         if gChangeP = 3 then
  20.           set the visible of sprite 18 = 1
  21.           set the visible of sprite 19 = 1
  22.           set the visible of sprite 20 = 1
  23.         end if
  24.       end if
  25.     end if
  26.   end if
  27.   updateStage
  28.   ChengeHudaP
  29.   wait 40
  30.   Hantei
  31.   if gHuda = 7 then
  32.     set the castNum of sprite 48 = 1000
  33.     updateStage
  34.     go to frame"ItadakiP"
  35.   else
  36.     set the castNum of sprite 48 = 1000
  37.     puppetSound "turnover"
  38.     go to frame"Toru2"
  39.   end if
  40.   PuppetSound 0
  41. end