home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / yoriai.dir / 00029_Script_29 < prev    next >
Text File  |  1995-11-10  |  475b  |  27 lines
  1. on mouseUp
  2.   global YORIAI,DANSION  
  3.   put "E" into vP  
  4.   
  5.   if DANSION = 0 then 
  6.     put 1 after vP
  7.     go to "E1"
  8.   else
  9.     if DANSION = 3 then 
  10.       put "J1" into vP
  11.       go to "E1"
  12.     else
  13.       if DANSION = 1 then
  14.         put "D" after vP    
  15.         go to"ED"      
  16.       else
  17.         put 1 after vP
  18.         go to "ED"
  19.       end if
  20.     end if
  21.   end if
  22.   
  23.   
  24.   sound playFile 1,"\S_YORIAI\" & vP & "_TALK"
  25.   
  26.   put vP into field "TEST"
  27. end