home *** CD-ROM | disk | FTP | other *** search
/ MASPC 1 / MASPC_1.iso / CursoWordI / ABUSCA.DXR / 00096.ls < prev    next >
Encoding:
Text File  |  1998-07-20  |  632 b   |  32 lines
  1. on mouseUp
  2.   global xhelp
  3.   set the cursor of sprite 9 to 0
  4.   set the cursor of sprite 10 to 0
  5.   if xhelp = "abusca" then
  6.     go("dos", "Menu")
  7.   else
  8.     case xhelp of
  9.       "ptest":
  10.         DoFadeOut(3, 90)
  11.         go(1, "ptest")
  12.       "ptestfi":
  13.         DoFadeOut(3, 90)
  14.         go("tres", "ptestfi")
  15.       "aglosa":
  16.         go("dos", "aglosa")
  17.       "confi":
  18.         go("confi", "menu")
  19.       "afichas":
  20.         DoFadeOut(3, 90)
  21.         go(9, "afichas")
  22.       "avideos":
  23.         DoFadeOut(3, 90)
  24.         go(1, "avideos")
  25.       "autil":
  26.         go(1, "autil")
  27.       otherwise:
  28.         go("dos", "menu")
  29.     end case
  30.   end if
  31. end
  32.