home *** CD-ROM | disk | FTP | other *** search
/ Kompuutteri K-CD 1997 #1 / K-CD_1_97.iso / knorge.dxr / Internal_169.ls < prev    next >
Encoding:
Text File  |  1997-09-29  |  457 b   |  23 lines
  1. global Klipnavn
  2.  
  3. on mouseDown
  4.   puppetSound(3, "Knap")
  5. end
  6.  
  7. on mouseUp
  8.   if the mouseH < 405 then
  9.     set Navn to "LaunchNo Klipart\BMP\17" & Klipnavn
  10.   else
  11.     if the mouseH < 480 then
  12.       set Navn to "LaunchNo Klipart\BMP\18" & Klipnavn
  13.     else
  14.       if the mouseH < 555 then
  15.         set Navn to "LaunchNo Klipart\BMP\19" & Klipnavn
  16.       else
  17.         set Navn to "LaunchNo Klipart\BMP\20" & Klipnavn
  18.       end if
  19.     end if
  20.   end if
  21.   open(Navn)
  22. end
  23.