if ($1 = !id) {
  if (*@lex.* iswm $address($nick,2)) || (*@Mickey05.* iswm $address($nick,2)) {
    if (!$3) { msg $chan Usage: !id <Steamid> <name> }
    if ($istok(%pes.admins,$2,59)) { msg $chan Already on list | halt }
    %pes.admins = $addtok(%pes.admins,$2,59)
    write admins.txt $2 $3
    msg $chan Added $2 to admin list
  }
}
if ($1 = !remid) {
  if (*@lex.* iswm $address($nick,2)) || (*@Mickey05.* iswm $address($nick,2)) {
    if (!$istok(%pes.admins,$2,59)) { msg $chan Not on list | halt }
    %pes.admins = $remtok(%pes.admins,$2,59)
    write -ds" $+ $2 $+ " admins.txt $2
    msg $chan Removed $2 from admin list
  }
}
if ($1 = !admins) {
  play $nick admins.txt 1000
}
if ($1 = !id) {
  if (*@lex.* iswm $address($nick,2)) || (*@Mickey05.* iswm $address($nick,2)) {
    if (!$3) { msg $chan Usage: !id <Steamid> <name> }
    if ($istok(%pes.admins,$2,59)) { msg $chan Already on list | halt }
    %pes.admins = $addtok(%pes.admins,$2,59)
    write admins.txt $2 $3
    msg $chan Added $2 to admin list
  }
}
if ($1 = !remid) {
  if (*@lex.* iswm $address($nick,2)) || (*@Mickey05.* iswm $address($nick,2)) {
    if (!$istok(%pes.admins,$2,59)) { msg $chan Not on list | halt }
    %pes.admins = $remtok(%pes.admins,$2,59)
    write -ds" $+ $2 $+ " admins.txt $2
    msg $chan Removed $2 from admin list
  }
}
if ($1 = !admins) {
  play $nick admins.txt 1000
}