home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1997 March / Image.iso / intro / install.bak < prev    next >
Encoding:
Text File  |  1996-12-17  |  772 b   |  27 lines
  1. AskPath('Geben sie eine Pfad auf der Festplatte an, in dem die veränderlichen Daten gepeichert werden sollen',
  2. 'C:\sueintro\')
  3.        OpenFile('Sue.CFG')
  4.        write('CDROM=',sourcedrive,':')
  5.        write('SAVE=',path)
  6.        write('INV=',path,'INV\')
  7.        write('PATCH=',path,'PATCH\')
  8.        write('MIDI=',path,'MIDI\')
  9.        write('WAV=',path,'WAV\')
  10.        write('FLC=',path,'FLC\')
  11.        write('DAT=',path,'DAT')
  12.        write('CODE=',path,'code')
  13.        CloseFile
  14.        copydir('INV')
  15.        copydir('PATCH')
  16.        copydir('MIDI')
  17.        copydir('FLC')
  18.        copydir('WAV')
  19.        copy('code')
  20.        copy('dat')
  21.        copy('demo.exe')
  22.        copy('dos4gw.exe')
  23.        copy('ultramid.ini')
  24.        copy('ultramid.exe')
  25. cd(path,'.')
  26.  
  27.