home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / pushpop.zip / DD.CMD next >
OS/2 REXX Batch file  |  1992-10-13  |  201b  |  9 lines
  1. /*   Change directory CMD:  uses a stack  */
  2. address CMD '@ECHO OFF'
  3. parse upper arg in
  4. direc = DIRECTORY()
  5. new = DIRECTORY(in)
  6. address CMD 'SET DIRSTK=%DIRSTK%'direc';'
  7. address CMD 'CD'
  8. exit
  9.