home *** CD-ROM | disk | FTP | other *** search
/ Discover Planet Earth / EB.ISO / Installation.exe / Main / %ExecutableFullScreen% / %ExecutableFullScreen%.dxr / 00001.ls next >
Encoding:
Text File  |  2007-10-30  |  540 b   |  19 lines
  1. on exitFrame
  2.   global gDriveHD, gDriveCD, gFromProjector, gPathDelimiter, gExtension, gOldRes, gResXtra
  3.   set the exitLock to 1
  4.   if the machineType = 256 then
  5.     gPathDelimiter = "\"
  6.   else
  7.     gPathDelimiter = ":"
  8.   end if
  9.   gDriveHD = the moviePath & "Data" & gPathDelimiter
  10.   gResXtra = new(xtra("Resolution"), "AARESX-87443-26211-89134")
  11.   OK_Again = gResXtra.set_resolution(640, 480, the colorDepth)
  12.   gFromProjector = 1
  13.   if the machineType = 256 then
  14.     go(1, gDriveHD & "TdesM")
  15.   else
  16.     go(1, gDriveHD & "TdesM")
  17.   end if
  18. end
  19.