ask               Heslo,Zadej heslo
    if @Heslo <> Veslo22  then exit
    ask               Fn,Zadej jmeno
    set               !exportfn,c:/$(Fn).equ
    dset.export.equ
    exit