All pastes #628608 Raw Edit

Untitled

public text v1 · immutable
·published 2007-07-21 13:08 UTC
rendered paste body
# s<hroud>BNC V1.1  # 
# newuser-tcl 0.1B  #
# by slot           #
#####################
#
# New added User default settings will set.
#
# Note: The Settings are not forced, this means, the User can change it! 
#
# INSTALL: Copy this File to your scripts Dir, put the line below into 
# your sbnc.tcl and rehash the bnc
# with the admin Client while you are connected.
#
# <sbnc.tcl>
# source "scripts/newuser.tcl"
#
# <Command to rehash>
# /sbnc tcl rehash

## Process

set ::defaultserver   "[list se.quakenet.org 6668]"
set ::defaultrealname "One-Game.org FREE BNCs"
set ::defaultchan     "#one.game"
set ::defaultvhost    "bncs.at.one-game.org"
set ::locks           "vhost,realname"

## Process (Do not edit!)

internalbind usrcreate new_user_event

proc new_user_event {user} { 

  setbncuser $user channels $::defaultchan
  setbncuser $user server [lindex $::defaultserver 0]
  setbncuser $user port [lindex $::defaultserver 1]
  setbncuser $user realname $::defaultrealname
  setbncuser $user vhost $::defaultvhost
  setbncuser $user lock $::locks
 }

bncreply "New User Event loaded.."