Server Lock

By Kerrie on Aug 23, 2009

This is a rip.
I apologize for the post,
script was given to me.

menu * {
Protections
.$iif($group(#lock) == On,$style(1)) Server Lock
..$iif($group(#lock) == On,$style(2)) On: .enable #lock | msg # 4Server Lock has now started.
..$iif($group(#lock) == Off,$style(2)) Off: .disable #lock | 4Server Lock is now terminated.
}

#lock off
on *:snotice:*Client connecting*:{
if ($gettok($read(server.txt,w,$gettok($remove($9,$chr(40)),1,64)),0,32) != $null) { globops $9 a 4Staff Member has Connected } 
else { kill $9 4Server Is On Lock } 
}
#lock end

Like Page Follow Author

Comments

GlobalAnomaly - Aug 23, 2009

Code must be at least 25% yours, but since you admit it's a rip I won't complain :O

Respond

Cheiron - Aug 23, 2009

dont need to delete it.. just give the credit where it is due and links to the original in your introduction

Respond

Kerrie - Aug 23, 2009

Eh, given to me.
Couldn't find a lock for our server.
I'll delete since it's a rip.

Respond

Cheiron - Aug 23, 2009

just an alteration from this snippet dated april 28th 2009
http://www.hawkee.com/snippet/6068/

menu menubar {
  Protections
  .Server LockDown
  .. -
  .. $iif($group(#lock) == on,$style(1) Enabled,Enabled): enable #lock | set %lock on | msg $chan 4Server Locked Down now started.
  .. $iif($group(#lock) == off,$style(1) Disabled,Disabled): disable #lock | set %lock off | msg $chan 4Server Lockdown now terminated.
} 
#lock off
on *:snotice:*Client connecting*:{
  if (%lock == on) {
    var %tempfilea $read(server.txt,w,$gettok($remove($9,$chr(40)),1,64)) 
    if ($gettok(%tempfilea,0,32) != $null) { globops $9 a 4Safelist User has Connected } 
    else { kill $9 4Server Is Locked Down
      unset %tempfilea 
    } 
  }
}
#lock end

Respond