Mine

alias eyestart {
  hmake scout 5 | hmake worlds 5 | hmake active 5 | hmake eyes 5 | hmake change 5
  if ($isfile(worlds.htb)) hload active active.htb
  if ($isfile(change.htb)) hload worlds worlds.htb
  if ($isfile(eyes.htb)) hload eyes eyes.htb
  if ($isfile(scout.htb)) hload scout scout.htb
  if ($isfile(change.htb)) hload change change.htb
  echo -ea eyescripts started
}
on *:Start: {
  hmake scout 5 | hmake worlds 5 | hmake active 5 | hmake eyes 5 | hmake good 5
  if ($isfile(worlds.htb)) hload active active.htb
  if ($isfile(change.htb)) hload worlds worlds.htb
  if ($isfile(eyes.htb)) hload eyes eyes.htb
  if ($isfile(scout.htb)) hload scout scout.htb
  if ($isfile(change.htb)) hload change change.htb
  if ($isfile(good.htb)) hload good good.htb
}
on *:connect: {
  hmake scout 5 | hmake worlds 5 | hmake active 5 | hmake eyes 5 | hmake good 5
  if ($isfile(worlds.htb)) hload active active.htb
  if ($isfile(change.htb)) hload worlds worlds.htb
  if ($isfile(eyes.htb)) hload eyes eyes.htb
  if ($isfile(scout.htb)) hload scout scout.htb
  if ($isfile(change.htb)) hload change change.htb
  if ($isfile(good.htb)) hload good good.htb
}
on *:Quit: {
  if ($hget(eyes,$nick) == $nick) {
    outty $nick
  }
  if ($hget(active,$nick) == $nick) {
    hdel active $nick $nick
  }
}
on *:TEXT:!remove *:#heart: {
  if ($nick ishop $chan || $nick isop $chan) {
    hdel active $2 $2 
  }
}
on *:Part:#: {
  if ($chan == #heart) {
    if ($hget(active,$nick) == $nick ) {
      hdel active $nick $nick 
    }
  }
  if ($chan == #eyes) {
    if ($hget(eyes,$nick) == $nick) {
      /outty $nick 
    }
  }
}
on *:kick:#eyes: {
  if ($hget(eyes,$knick) == $knick) {
    /outty $knick
  }
}
alias outty {
  dec %eyes | hdel eyes $1 $1 | set %leg 0 | msg #eyes a scouter was kicked please recheck your worlds by using !eye.
  unset %scouter.* | hdel scout $1 $1 | unset %scout.* | unset %scouters.* | /huworld
}
on *:join:#eyes: {
  notice $nick Put in !leader to see who is the scouting leader. Please put in !on to be an active scouter and then !eye(s)? to be giving a list of worlds to scout..
  inc %joins. [ $+ [ $nick ] ]
}
alias clean2 {
  unset %scouters. [ $+ [ %scouter.2 ] ] | unset %scout. [ $+ [ %scouter.2 ] ] | unset %scouter.2 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}
alias clean3 {
  unset %scouters. [ $+ [ %scouter.3 ] ] | unset %scout. [ $+ [ %scouter.4 ] ] | unset %scouter.3 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}
alias clean4 {
  unset %scouters. [ $+ [ %scouter.4 ] ] | unset %scout. [ $+ [ %scouter.4 ] ] | unset %scouter.4 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}
alias clean5 {
  unset %scouters. [ $+ [ %scouter.5 ] ] | unset %scout. [ $+ [ %scouter.5 ] ] | unset %scouter.5 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}
alias clean6 {
  unset %scouters. [ $+ [ %scouter.6 ] ] | unset %scout. [ $+ [ %scouter.6 ] ] | unset %scouter.6 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}
alias clean7 {
  unset %scouters. [ $+ [ %scouter.7 ] ] | unset %scout. [ $+ [ %scouter.7 ] ] | unset %scouter.7 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}
alias clean8 {
  unset %scouters. [ $+ [ %scouter.8 ] ] | unset %scout. [ $+ [ %scouter.8 ] ] | unset %scouter.8 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}
alias clean9 {
  unset %scouters. [ $+ [ %scouter.9 ] ] | unset %scout. [ $+ [ %scouter.9 ] ] | unset %scouter.9 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}
alias clean10 {
  unset %scouters. [ $+ [ %scouter.10 ] ] | unset %scout. [ $+ [ %scouter.10 ] ] | unset %scouter.10 | unset %scouters. [ $+ [ $1 ] ] |  unset %scout. [ $+ [ $1 ] ] 
}