home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / roudoku.dir / 00028_Script_28 < prev    next >
Text File  |  1995-11-10  |  481b  |  18 lines

  1.  
  2. on mouseDOWN
  3.   global sentakusi, syurui,kasira
  4.   puppetSound "PUSH_SE"
  5.   put Clickon() into vSP
  6.   put item 1 of the name of cast the castNum of sprite vSP into cName
  7.   puppetSprite 9, true
  8.   set the castNum of sprite 9 = the number of cast (cName & ",DW")
  9.   set the locH of sprite 9 = the locH of sprite vSP
  10.   set the locV of sprite 9 = the locV of sprite vSP 
  11.   updatestage
  12.   put 3 into sentakusi
  13.   put "Φä╟├π┬╟├Γ├" into syurui
  14.   MARKBUTTON
  15.   Kensaku
  16. end if
  17.  
  18. end