home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / bbozu7.dir / 00015_Script_15 < prev    next >
Text File  |  1995-11-13  |  746b  |  35 lines
  1. on mouseDown
  2.   global gHuda,gMotihuda
  3.   
  4.   set the cursor of sprite 48 =  [2014,2015]
  5.   
  6.   if gHuda = 8 then
  7.     set gMotihuda = gMotihuda - 1
  8.     set the castNum of sprite 48 = 1000
  9.     updateStage
  10.     go to frame"ChangeCard"
  11.     set the cursor of sprite 48 = 0
  12.     exit
  13.   end if
  14.   
  15.   Hantei
  16.   if gHuda = 7 then
  17.     sound playFile 2, "\S_BZMKRI\CARD_Y"
  18.     repeat while soundBusy(2)
  19.     end repeat
  20.     set gMotihuda = gMotihuda - 1
  21.     set the castNum of sprite 48 = 1000
  22.     updateStage
  23.     go to frame"ItadakiP"
  24.   else
  25.     set the castNum of sprite 48 = 1000
  26.     puppetSound "turnover"
  27.     updateStage
  28.     wait 10
  29.     go to frame"Toru2"
  30.     --    PuppetSound 0
  31.   end if
  32.   set the cursor of sprite 48 = 0
  33. end
  34.  
  35.