home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 - Leitz / Image.iso / leitz / start4.dxr / 00051.ls < prev    next >
Encoding:
Text File  |  1997-01-09  |  682 b   |  32 lines
  1. on enterFrame
  2.   global gVar, gFilm
  3.   if gVar = 1 then
  4.     set gVar to 0
  5.     if gFilm = "Info" then
  6.       set gFilm to EMPTY
  7.       go(2, "info4")
  8.     else
  9.       if gFilm = "Demo" then
  10.         set gFilm to EMPTY
  11.         open("demo\demo.exe.")
  12.       else
  13.         if gFilm = "Inst" then
  14.           set gFilm to EMPTY
  15.           open("setup\disk1\setup.exe")
  16.         else
  17.           if gFilm = "gewinn" then
  18.             set gFilm to EMPTY
  19.             go(175)
  20.           else
  21.             if gFilm = "exit" then
  22.               set gFilm to EMPTY
  23.               go(2, "quit4")
  24.             end if
  25.           end if
  26.         end if
  27.       end if
  28.     end if
  29.   end if
  30.   sound playFile 1, "main.wav"
  31. end
  32.