.key src,dst
.bra {
.ket }

; $VER: strip 1.01 (17.7.94)
; Strips debug and symbol information from file
; On an idea of Patrik Lundquist

If "{src}" EQ ""
  Echo "Usage: strip [SRC] <filename> [[DST] <filename>]"
  Quit 0
EndIf

If "{dst}" EQ ""
  lk QDSTOP FROM {src} TO {src} ND NS LA NEH NOICON NW KXD
Else
  lk QDSTOP FROM {src} TO {dst} ND NS LA NEH NOICON NW KXD
EndIf