Set pscp$dir <Obey$Dir>

RMEnsure CryptRandom 0.00 RMLoad <pscp$dir>.cryptrand

If "<Choices$Write>"<>"" Then Set pscp$Choices <Choices$Write> Else Set pscp$Choices <pscp$Dir>.Choices

|Sledgehammer approach - we can do much better than this
<pscp$Dir>.X Cdir <pscp$Choices>.Crypto
<pscp$Dir>.X Cdir <pscp$Choices>.Crypto.SSH
<pscp$Dir>.X Cdir <pscp$Choices>.Crypto.CryptRand

<pscp$dir>.pscp %*0
