.key dir

; $VER: pcd 38.1 (11.10.91)
; This is a CD script that remembers the previous directory

IF "<dir>" EQ ""
  Assign ofrom<$$>: ""
  CD from<$$>:
  Assign from<$$>: ofrom<$$>:
  Assign ofrom<$$>:
Else
  Assign from<$$>: ""
  CD <dir>
EndIF
