home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 54 / ClassicFond54.iso / games / stars.rar / ted.vol / open.cs < prev    next >
Text File  |  1999-02-19  |  205b  |  8 lines
  1. Ted::close $Ted::currFile
  2. openFile Ted::diskName "Ted Volumes" *.ted
  3. if test $dlgResult != [cancel]
  4.      newObject tedTerrVol SimVolume $Ted::diskName
  5.     Ted::open $Ted::diskName
  6.     Ted::focus
  7. endif
  8.