home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / load.dir / 00016_Script_16 < prev    next >
Text File  |  1995-11-10  |  317b  |  14 lines
  1. on mouseDown
  2.   global fName
  3.   if pushButton() then
  4.     if (the number of chars in field "Name" > 0 and the number of chars in field "Name" < 9) then
  5.       set fName = line 1 of field "Name"
  6.       go to "GoLand"
  7.     else
  8.       put "" into field "Name"
  9.       go to the frame
  10.     end if
  11.     
  12.   end if
  13.   
  14. end