home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 1996 Counselor / COMPUSERVE.ISO / compuser.exe / compuser.DXR / 00002.ls < prev    next >
Encoding:
Text File  |  1996-07-12  |  1.5 KB  |  29 lines
  1. on startMovie
  2.   global gVolume, Gsep, CPU, gWincim, gHpwiz, gCyber, gWinworlds, gNet16, gWintv, gWQuick, gMaccim, gMacworlds, gMacNet
  3.   if the machineType < 256 then
  4.     set CPU to "MAC"
  5.     set gVolume to char 1 to offset(":", the pathName) - 1 of the pathName
  6.     set Gsep to ":"
  7.   else
  8.     set CPU to "WIN"
  9.     set gVolume to char 1 to offset("\", the pathName) - 1 of the pathName
  10.     set Gsep to "\"
  11.   end if
  12.   append(the searchPath, the pathName & "Resource")
  13.   append(the searchPath, the pathName & "Resource" & Gsep & "Video")
  14.   append(the searchPath, the pathName & "Resource" & Gsep & "Sound")
  15.   set the soundLevel to 7
  16.   updateStage()
  17.   when keyDown then nothing
  18.   set gWincim to gVolume & Gsep & "software" & Gsep & "wincim" & Gsep & "setup.exe"
  19.   set gHpwiz to gVolume & Gsep & "software" & Gsep & "hpwiz" & Gsep & "setup.exe"
  20.   set gCyber to gVolume & Gsep & "software" & Gsep & "cyber" & Gsep & "cp_setup.exe"
  21.   set gNet16 to gVolume & Gsep & "software" & Gsep & "Netscape" & Gsep & "16bit" & Gsep & "setup.exe"
  22.   set gWinworlds to gVolume & Gsep & "software" & Gsep & "worlds" & Gsep & "install.exe"
  23.   set gWintv to gVolume & Gsep & "software" & Gsep & "wintv" & Gsep & "setup.exe"
  24.   set gWQuick to gVolume & Gsep & "resource" & Gsep & "QTM" & Gsep & "setup.exe"
  25.   set gMaccim to gVolume & Gsep & "CompuServe Installation" & Gsep & "Aktualisierer"
  26.   set gMacworlds to gVolume & Gsep & "Worlds Away" & Gsep & "WorldsAway Installer"
  27.   set gMacNet to gVolume & Gsep & "Netscape 2.01" & Gsep & "Netscape 2.01 Installer"
  28. end
  29.