home *** CD-ROM | disk | FTP | other *** search
/ Club KidSoft Volume 3 #1 / ClubKidsoft.iso / demos / digimpct / ozzies / mainstr.dxr / 00102.ls < prev    next >
Encoding:
Text File  |  1994-11-15  |  382 b   |  19 lines
  1. on mouseUp
  2.   global UserPath
  3.   cursor(0)
  4.   puppetTempo(10)
  5.   if the machineType <> 256 then
  6.     if the shiftDown then
  7.       go(1, UserPath & "FOREST:FRMAIN.DXR")
  8.     else
  9.       go(1, UserPath & "FOREST:FRINTRO.DXR")
  10.     end if
  11.   else
  12.     if the shiftDown then
  13.       go(1, UserPath & "FOREST\FRMAIN.DXR")
  14.     else
  15.       go(1, UserPath & "FOREST\FRINTRO.DXR")
  16.     end if
  17.   end if
  18. end
  19.