Untitled

on *:text:!tb *:#:{
  if ($nick ishop $chan) || ($nick isop $chan) {
    if ($2 isnum) {
      if ($3 ishop $chan) || ($3 isop $chan) {
        notice $nick Please Do Not Ban My Staff Members!
      }
      else {
        ban -ku $+ $calc($2 * 60) $chan $3 2 3>14[ $+ 3 $+ $3 Has Been Time-Banned For14 $2 3Minutes!14]3<3>14[3 $+ $4- $+ 14]3<
      }
    }
    elseif ($3 isnum) {
      if ($2 ishop $chan) || ($2 isop $chan) {
        notice $nick 3>14[3Please Do Not Ban My Staff Members!14]3<
      }
      else {
        ban -ku $+ $calc($3 * 60) $chan $2 2 3>14[ $+ 3 $+ $3 Has Been Time-Banned For14 $3 3Minutes!14]3<3>14[3 $+ $4- $+ 14]3<
      }
    }
  }
}
on *:unban:#: if ($bnick) .notice $bnick You have been unbanned from $chan

}

on *:join:#pc90elites: {
if ($nick = Daystar1124) /msg $chan 11,12 It's Daystar1124! Run and hide!
elseif ($nick = jmk10) /msg $chan Hey, its our leader, welcome!!!
else /bs say #pc90elites @cmb $nick
}

on *:SOCKOPEN:udc: {
if ($sockerr) {
  if (!$window(@errors)) { .window @errors }
  echo -t @errors SockOpen Error when checking for updates: $sock(udc).wsmsg
  return
}
.sockwrite -n udc GET /update.txt HTTP/1.1
.sockwrite -n udc Host: thefreebot.com $+ $crlf $+ $crlf
}
on *:SOCKREAD:udc: {
if ($sockerr) {
  if (!$window(@errors)) { .window @errrors }
  echo -t @errors SockRead Error when checking for updates: $sock(udc).wsmsg
  return
}
.sockread %udc
if ($+(*.*,$chr(124),*) !iswm %udc) { halt }
if (($readini(Settings.ini,versions,$gettok(%udc,1,124)) < $gettok(%udc,2,124)) || (!$readini(Settings.ini,versions,$gettok(%udc,1,124)))) { .sockclose udc | .updatefile %udc }
}
on *:SOCKCLOSE:udc: {
echo -ts [FreeBot Updater] Updates Compelted, all files up to date!
}
alias updatefile {
.tokenize 124 $1-
.set %udf $1
.set %udv $2
.set %udn $3
.set %uds $4
.set %udi $5
.set %udl $6
if ($script($1) || $alias($1)) { 
  if ($readini(Settings.ini,update,inform) && $server) { $($readini(Settings.ini,update,it),2) [FreeBot Updater] Updating $3 from $+([,$readini(Settings.ini,versions,$1),]) to $+([,$2,]) - Update: $5 - Feature disabled during update. }
  echo -ts [FreeBot Updater] Updating $3 from $+([,$readini(Settings.ini,versions,$1),]) to $+([,$2,]) - Update: $5
  .unload $iif(%uds == remote,-rs,-a) $1
}
else {
  if ($readini(Settings.ini,update,inform) && $server) { $($readini(Settings.ini,update,it),2) [FreeBot Updater] Adding $3 to FreeBot - Addition: $5 }
  echo -ts [FreeBot Updater] Adding $3 to FreeBot - Addition: $5
}
if ($exists($shortfn($+($mircdir,$6)))) { .remove $+(",$mircdir,$6,") }
.sockopen fbud thefreebot.com 80
}
on *:SOCKOPEN:fbud: {
if ($sockerr) {
  if (!$window(@errors)) { .window @errors }
  echo -t @errors SockOpen Error when checking for updates: $sock(fbud).wsmsg
  return
}
.set %fbud_read $false
.sockwrite -n fbud GET /files/ $+ %udf HTTP/1.1
.sockwrite -n fbud Host: thefreebot.com $+ $crlf $+ $crlf
}
on *:SOCKREAD:fbud: {
if ($sockerr) {
  if (!$window(@errors)) { .window @errors }
  echo -t @errors SockOpen Error when checking for updates: $sock(fbud).wsmsg
  return
}
.sockread %fbud
if (!%fbud) { halt }
if (!%fbud_read) { noop }
else { .write $+(",$mircdir,%udl,") %fbud }
if (%fbud == Content-Type: text/plain) { .set %fbud_read $true }
}
on *:SOCKCLOSE:fbud: {
if (%uds != ext) { .load $iif(%uds == remote,-rs,-a) %udf }
.writeini -n Settings.ini versions %udf %udv
if ($readini(Settigns.ini,update,inform) && $server) { $($readini(Settings.ini,update,it),2) [FreeBot Updater] Update of %udn completed, commands re-enabled. }
echo -ts [FreeBot Updater] Update of %udn  to $+([,%udv,]) completed!
.sockopen udc thefreebot.com 80
}
on *:START: {
echo -ts [FreeBot Updater] Running Updater on Startup...
.sockopen udc thefreebot.com 80
}

on *:TEXT:!change *:#pc90elites:{
if ($nick isop $chan) || ($nick ishop $chan) || {
  /set %pcsettime $ctime
  /set %nick $nick
  /set %pcw $2-
  /set %pcsettime $ctime
  /set %nick $nick
  /msg $chan 12The Pest control world has been updated. Type 4!pcw 12to see it. 
  else {
    /notice $nick You NEED Voice or higher to use the !change command.
  }
}
on *:text:!pc:#pc90elites: { 
  /inc %countpcw 1
/notice $nick 12Current PC World is4  %pcw 12Last Updated:4 $+($duration($calc($ctime - %pcsettime)),) - 12Last Set by:4 %nick 12This command has been used4 %countpcw times $+ .   }
}
on *:text:!pcw:#pc90elites: { 
/inc %countpcw 1
/notice $nick 12Current PC World is4  %pcw 12Last Updated:4 $+($duration($calc($ctime - %pcsettime)),) - 12Last Set by:4 %nick 12This command has been used4 %countpcw times $+ .   }
}
on *:text:!world:#pc90elites: { 
/inc %countpcw 1
/notice $nick 12Current PC World is4  %pcw 12Last Updated:4 $+($duration($calc($ctime - %pcsettime)),) - 12Last Set by:4 %nick 12This command has been used4 %countpcw times $+ .   }
}
on *:text:!startpcw:#pc90elites: { 
/set %pcstarttime $ctime
}
on *:text:!endpcw:#pc90elites: { notice $nick That game lasted: $+($duration($calc($ctime - %pcstarttime)),) }
}
}