.ENABLE SUBSTITUTION
.ASKS DEV device to find rsxmc (def=vd1)
.IF DEV = "" .SETS DEV "VD1"
.ASK LIST List
.SETS NL ""
.SETS LI ",KILL/-SP/NL"
.IFF LIST .SETS NL "/NL"
.IFF LIST .SETS LI ""
run $mp/prm="/lmkill'NL'"
mac kill'LI'='DEV':[11,10]rsxmc/pa:1,SY:'<UIC>'kill.mpp
tkb @kill.bld
