home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1996 July / macformat-039.iso / DATABASE / BODY.DIR / 00015.ls < prev    next >
Encoding:
Text File  |  1996-03-14  |  383 b   |  15 lines
  1. on mouseDown
  2.   global gMakerName, gMakerNum
  3.   puppetSound("click")
  4.   updateStage()
  5.   set tmp to line the mouseLine of field "Filenames"
  6.   set gMakerName to tmp
  7.   set gMakerNum to NameToNum(gMakerName)
  8.   put gMakerName && gMakerNum
  9.   if (gMakerNum = 0) or ((gMakerNum = 1) and (gMakerName <> "ALI")) then
  10.     alert("oops! problem with name")
  11.   else
  12.     go(the frame + 1)
  13.   end if
  14. end
  15.