on *:join:#lung:{
.timer 1 2 .signal -n hu_join $nick
}
on !*:signal:hu_join:{
if ($1 isop #lung || $1 ishop #lung) { .notice $1 Welcome to #lung, please press !on to be on validators list and do !off please before any nick changes or before you leave. Thank You. }
else { .notice $1 Welcome, please type !vali now to get a list of those who are validating. Please pm only 1 of these. If they do not respond in an orderly fashion(2 minutes) than pm another one. Thank You. }
}
on $*:TEXT:*:#: {
if ($left($1,1) !isin @!.) halt
if ($network == nitrousirc) {
if (geo1988 !ison #heart && anna^ !ison #heart && Geo`AFK !ison #heart) {
if ($chan == #hu_scripts || $chan == #heart) {
if ($right($1,-1) == world) var %style = world
elseif ($right($1,-1) == time) var %style = hutime
elseif ($right($1,-1) == huforums) var %style = forums
elseif ($right($1,-1) == member) var %style = members
elseif ($right($1,-1) == reminder) var %style = remind
}
if ($chan == #lung) {
if ($nick isop #lung || $nick ishop #lung) {
if ($right($1,-1) == remove) var %style = lremove
elseif ($right($1,-1) == on) var %style = lon
elseif ($right($1,-1) == off) var %style = loff
}
}
if ($nick ison #lung) {
elseif ($right($1,-1) == validators) var %style = lact
elseif ($right($1,-1) == vali) var %style = lact
}
}
}
if (%style == lremove) {
if ($findtok(%validating,$2,32)) { set %Validating $deltok(%Validating,$findtok(%Validating,$2,32),32) | .notice $nick $2 Has been removed from the validators list.
}
}
if (%style == lact) {
if (%Validating) { .notice $nick The current staff validating are: $replacex(%Validating,$chr(32),$+($chr(44),$chr(32))) }
else { .notice $nick There are no staff currently available for validating }
}
if (%style == lon) {
if (!$findtok(%validating,$nick,32)) {
set %Validating $addtok(%Validating,$nick,32) | .notice $nick You have been added to the validators list
}
}
if (%style == loff) {
if ($findtok(%validating,$nick,32)) {
set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32) | .notice $nick You have been removed from the validators list.
}
}
if (%style == remind) {
set %remind.rand $rand(3,15)
timer 1 1 /reminder $chan
timer2 1 2 set %remind.rand $rand(3,15)
timer 1 3 /reminder $chan
}
if (%style == world) {
if ($nick !isreg #heart || $nick !isreg #stomach) {
notice $nick Current World: 12 http://heartunit.org/forums/index.php?showforum=22 9Be sure you intend on PCing before you click this link!
}
else {
notice $nick Notice 4You must apply for Squire on the Heart site at this link to get the world link: 9http://heartunit.org/forums/index.php?showtopic=33888&st=0&#entry236108
}
}
if (%style == hutime) { notice $nick World was set $duration($calc($ctime - %settime)) ago
}
if (%style == forums) { notice $nick Heart Unit Website: 4 http://heartunit.org/forums/
}
if (%style == members) { notice $nick http://heartunit.org/forums/index.php?act=members&name= $+ $2
}
}
alias remind {
set %remind.rand $rand(1,4)
timer1 1 1 /reminder $chan
timer2 1 2 set %remind.rand $rand(1,4)
timer3 1 3 /reminder $chan
}
alias reminder {
msg $1 Reminder: $+ %remind.rand The world has changed, please hop to the new world as soon as possible.
}
on !*:PART:#lung:{
if ($nick isop $chan) || ($nick ishop $chan) && ($findtok(%Validating,$nick,32)) {
set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32) | .notice $nick You have been removed from the validators list
}
}
on *:NICK:{
if ($newnick isop #lung) || ($newnick ishop #lung) && ($findtok(%Validating,$nick,32)) {
set %Validating $replacex(%Validating,$nick,$newnick)
}
}
on !*:DEOP:#lung:{
if ($findtok(%Validating,$nick,32)) {
set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32) | .notice $opnick You have been removed from the validators list
}
}
on !*:DEHELP:#lung:{
if ($findtok(%Validating,$nick,32)) {
set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32) | .notice $hnick You have been removed from the validators list
}
}
on *:QUIT:{
if ($findtok(%Validating,$nick,32)) {
set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32)
}
}
alias on { set %Validating $addtok(%Validating,$iif($1,$1,$me),32) | $iif($1,.notice $1,echo -ga) You have been added to the active list }
alias off { set %Validating $deltok(%Validating,$findtok(%Validating,$iif($1,$1,$me),32),32) | $iif($1,.notice $1,echo -ga) You have been removed from the active list }
alias validators {
if (%Validating) { $iif($1,.notice $1,say) The current staff validating are: $replacex(%Validating,$chr(32),$+($chr(44),$chr(32))) }
else { $iif($1,.notice $1,say) There are no staff currently available for validating }
}