All pastes #626640 Raw Edit

Mine

public text v1 · immutable
·published 2007-07-19 19:51 UTC
rendered paste body
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 | msg #eyes a scouter has left please check your worlds by using !eye(s)
  }
  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 | msg #eyes a scouter has left please check your worlds by using !eye(s)
      if (%eyes.leader == $nick) {
        unset %eyes.leader
      }
    }
  }
}
on *:kick:#eyes: {
  if ($hget(eyes,$knick) == $knick) {
    /outty $knick | msg #eyes a scouter was kicked please recheck your worlds by using !eye(s).
  }
}
alias outty {
  dec %eyes | hdel eyes $1 $1 | dec %leg 
  hdel scout $1 $1 | /left $1 | /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 left { 
  if (%eyes == 1 ) { 
    if (%scouter.1 == $1) {  /scouter1 | /clean2 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]  
    } 
    if (%scouter.2 == $1) { /clean2 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ] 
    } 
  }
  if (%eyes == 2 ) { 
    if (%scouter.1 == $1) {  /scouter1 | /scouter2 | /clean3 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]  
    } 
    if (%scouter.2 == $1) { /scouter2 | /clean3 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.3 == $1) { /clean3 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
  }
  if (%eyes == 3 ) { 
    if (%scouter.1 == $1) { /scouter1 | /scouter2 | /scouter3 | /clean4 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.2 == $1) { /scouter2 | /scouter3 | /clean4 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.3 == %1) { /scouter3 | /clean4 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.4 == %1) { /clean4 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
  }
  if (%eyes == 4 ) { 
    if (%scouter.1 == $1) { /scouter1 | /scouter2 | /scouter3 | /scouter4 | /clean5  | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.2 == $1) {  /scouter2 | /scouter3 | /scouter4 | /clean5  | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.3 == $1) { /scouter3 | /scouter4 | /clean5  | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.4 == $1) { /scouter4 | /clean5  | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.5 == $1) { /clean5 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
  }
  if (%eyes == 5 ) { 
    if (%scouter.1 == $1) { /scouter1 | /scouter2 | /scouter3 | /scouter4 | /clean6 
      /scouter5 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.2 == $1) { /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /clean6 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.3 == $1) { /scouter3 | /scouter4 | /scouter5 | /clean6  | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.4 == $1) {  /scouter4 | /scouter5 | /clean6 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.5 == $1) { /scouter5 | /clean6 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.6 == $1) { /clean6 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
  }
  if (%eyes == 6 ) { 
    if (%scouter.1 == $1) { /scouter1 | /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /scouter6 | /clean7 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.2 == $1) { /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /scouter6 | /clean7 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.3 == $1) { /scouter3 | /scouter4 | /scouter5 | /scouter6 | /clean7 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.4 == $1) { /scouter4 | /scouter5 | /scouter6 | /clean7 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.5 == $1) { /scouter5 | /scouter6 | /clean7 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.6 == $1) { /scouter6 | /clean7 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.7 == $1) { /clean7 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
  }
  if (%eyes == 7 ) { 
    if (%scouter.1 == $1) { /scouter1 | /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /scouter6 | /scouter7 | /clean8 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.2 == $1) { /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /scouter6 | /scouter7 | /clean8 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.3 == $1) {  /scouter3 | /scouter4 | /scouter5 | /scouter6 | /scouter7 | /clean8 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.4 == $1) { /scouter4 | /scouter5 | /scouter6 | /scouter7 | /clean8 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.5 == $1) { /scouter5 | /scouter6 | /scouter7 | /clean8 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.6 == $1) { /scouter6 | /scouter7 | /clean8 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.7 == $1) { /scouter7 | /clean8 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.8 == $1) { /clean8 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
  }
  if (%eyes == 8 ) { 
    if (%scouter.1 == $1) { /scouter1 | /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /scouter6 | /scouter7 | /scouter8 | /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.2 == $1) { /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /scouter6 | /scouter7 | /scouter8 | /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.3 == $1) { /scouter3 | /scouter4 | /scouter5 
      /scouter6 | /scouter7 | /scouter8 | /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.4 == $1) { /scouter4 | /scouter5 | /scouter6 
      /scouter7 | /scouter8 | /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.5 == $1) { /scouter5 | /scouter6 | /scouter7 | /scouter8 | /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.6 == $1) { /scouter6 | /scouter7 | /scouter8 | /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.7 == $1) { /scouter7 | /scouter8 | /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.8 == $1) { /scouter8 | /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.9 == %1) {  /clean9 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
  }
  if (%eyes == 9 ) { 
    if (%scouter.1 == $1) { /scouter1 | /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /scouter6 | /scouter7 | /scouter8 
      /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.2 == $1) { /clean10 | /scouter2 | /scouter3 | /scouter4 
      /scouter5 | /scouter6 | /scouter7 | /scouter8 | /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.3 == $1) { /scouter3 | /scouter4 | /scouter5 | /scouter6 | /scouter7 | /scouter8 
      /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.4 == $1) { /scouter4 | /scouter5 | /scouter6 | /scouter7 | /scouter8 
      /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.5 == $1) { /scouter5 | /scouter6 | /scouter7 | /scouter8 
      /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.6 == $1) { /scouter6 | /scouter7 | /scouter8 | /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.7 == $1) { /scouter7 | /scouter8 | /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.8 == $1) { /scouter8 | /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.9 == $1) { /scouter9 | /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
    if (%scouter.10 == $1) {  /clean10 | unset %scouters. [ $+ [ $1 ] ] | unset %scout. [ $+ [ $1 ] ]
    } 
  } 
}
alias scouter9 { 
  set %scouters. [ $+ [ %scouter.10 ] ] 9 | set %scout. [ $+ [ %scouter.10 ] ] %scouter.10 | set %scouter.9 %scouter.10 
} 
alias scouter8 { 
  set %scouters. [ $+ [ %scouter.9 ] ] 8 | set %scout. [ $+ [ %scouter.9 ] ] %scouter.9 | set %scouter.8 %scouter.9 
} 
alias scouter7 { 
  set %scouters. [ $+ [ %scouter.8 ] ] 7 | set %scout. [ $+ [ %scouter.8 ] ] %scouter.8 | set %scouter.7 %scouter.8 
} 
alias scouter6 { 
  set %scouters. [ $+ [ %scouter.7 ] ] 6 | set %scout. [ $+ [ %scouter.7 ] ] %scouter.7 | set %scouter.6 %scouter.7 
} 
alias scouter5 { 
  set %scouters. [ $+ [ %scouter.6 ] ] 5 | set %scout. [ $+ [ %scouter.6 ] ] %scouter.6 | set %scouter.5 %scouter.6 
} 
alias scouter4 { 
  set %scouters. [ $+ [ %scouter.5 ] ] 4 | set %scout. [ $+ [ %scouter.5 ] ] %scouter.5 | set %scouter.4 %scouter.5 
} 
alias scouter3 { 
  set %scout. [ $+ [ %scouter.4 ] ] %scouter.4 | set %scouter.3 %scouter.4 | set %scouters.3 %scouter.4 
} 
alias scouter2 { 
  set %scouters. [ $+ [ %scouter.3 ] ] 2 | set %scout. [ $+ [ %scouter.3 ] ] %scouter.3 | set %scouter.2 %scouter.3
} 
alias scouter1 { 
  set %scouters. [ $+ [ %scouter.2 ] ] 1 | set %scout. [ $+ [ %scouter.2 ] ] %scouter.2 | set %scouter.1 %scouter.2  
}
alias clean2 {
  unset %scouter.2  
}
alias clean3 {
  unset %scouter.3 
}
alias clean4 {
  unset %scouter.4  
}
alias clean5 {
  unset %scouter.5
}
alias clean6 {
  unset %scouter.6 
}
alias clean7 {
  unset %scouter.7  
}
alias clean8 {
  unset %scouter.8  
}
alias clean9 {
  unset %scouter.9  
}
alias clean10 {
  unset %scouter.10  
}