home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / bbozu7.dir / 00082_Script_82 < prev    next >
Text File  |  1995-11-13  |  420b  |  14 lines
  1. on mouseDown
  2.   global gMotihuda,gMotihudaB,BName
  3.   set the cursor of sprite 2 = 0
  4.   set the cursor of sprite 3 = 0
  5.   set the cursor of sprite 4 = 0
  6.   set gMotihuda = gMotihuda + gMotihudaB
  7.   set gMotihudaB = 0
  8.   TakeItadaki BName
  9.   Zoom 16,6,8,6
  10.   put gMotihudaB && "±ß" into field"B"
  11.   set newRect = rect( 207 , 165 , 207 + gMotihudaB , 192 )
  12.   set the rect of sprite 32 to newRect
  13.   go to frame"Toru2"
  14. end