home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / yoriai.dir / 00012_Script_12 < prev    next >
Text File  |  1995-11-10  |  351b  |  17 lines
  1. on mouseUp
  2.   global vP,YORIAI,DANSION  
  3.   put "A" into vP  
  4.   if DANSION = 0 then put 1 after vP    
  5.   else
  6.     if DANSION = 3 then put 2 after vP       
  7.     else
  8.       if DANSION <> 0  then  put "D" after vP
  9.     end if
  10.   end if
  11.  
  12.   go to vP
  13.   sound playFile 1,"\S_YORIAI\" & vP & "_TALK"
  14.   updateStage
  15.   
  16.   put vP into field "TEST"
  17. end