sklz

sver {XiRCON : Sk1llZ.tcl 3.8 FINAL by phlud... snipe or be sniped.}
alias SAVE {
global user h t
set fi [open /windows/sk1llz.sav w]
puts $fi "File created by [gver] at [clock format [clock seconds]]"
puts $fi "$h"
puts $fi "$t"
puts $fi "$aa"
puts $fi "$nc1"
puts $fi "$nc2"
close $fi
set fi [open /windows/sk1llz.usr w]
foreach item [array names user] {
puts $fi "$item $user($item)"
complete
}
close $fi
echo " "
echo "ALL DONE with /save"
echo " "
}