remote vhost

#sethost on
on *:TEXT:!sethost:#Vhost: { .notice # ( $nick ) : To change your vhost type: !sethost <The.Vhost.You.Want> }
on *:TEXT:!sethost *:#Vhost: {
if (%ignore. [ $+ [ $nick ] ]) { .notice # ( $nick ) : You are still in my ignore list. please wait until the 10 minutes ends | halt }
if (encrypted- isin $2) { .notice # ( $nick ) : Sorry that vhost seems to be a hostname of some body which can't be used as your vhost. | halt }
if !$regex($$2,/^(?:[-a-zA-Z0-9.]*)$/) { .notice # ( $nick ) : Sorry, Your vhost may only contain ( a-z, A-Z, 0-9, '-' & '.' ) | halt }
if ($chr(32) isin $2-) { .notice # ( $nick ) : Please type the vhost you want without space(s). | halt }
if ($chr(46) !isin $2) { .notice # ( $nick ) : Error Detected: Your vhost must atleast have one "." | halt }
if ($len($2) < 5) { .notice # ( $nick ) : Sorry that vhost is too short, please choose a longer vhost. | halt }
if ($len($2) > 60) { .notice # ( $nick ) : Sorry that vhost is too long, please choose a shorter vhost. | halt }
var %ban (bitch|shit|fuck|asshole|cunt|slut|cock|owner|admin|ircop|fucked|operator|ip|Fuck|staff|services*)
if ($regex($2-,%ban)) { .notice # ( $nick ) : Sorry that vhost contains a word that you are not allowed to have in your vhost, please choose another vhost | halt }
if (!$regex($2-,%ban)) {
var %x 1,%y,%z | while ($gettok($2,%x,46)) { %y = $ifmatch | if (%y isnum) { inc %z } | inc %x }
if (%z = 4) { .notice # ( $nick ) : Sorry that vhost seems to be an ip address which can't be used as your vhost. | halt }
if (%z != 4) {
if ($chr(46) isin $2) { .notice hostserv add $nick $2 | /msg operserv unidentify $nick | /msg # ( $nick ) : Your Vhost have been successfully set to ( $2 ) - Please type /ns identify <urpass> to activate your host - You are now ignored for 10 minutes. | set -u600 %ignore. [ $+ [ $nick ] ] on | halt }
}
} }
#sethost end


#vhost on
on *:TEXT:!vhost:#Vhost: { .notice # ( $nick ) : To change your vhost type: !vhost <The.Vhost.You.Want> }
on *:TEXT:!vhost *:#Vhost: {
if (%ignore. [ $+ [ $nick ] ]) { .notice # ( $nick ) : You are still in my ignore list. please wait until the 10 minutes ends | halt }
if (encrypted- isin $2) { .notice # ( $nick ) : Sorry that vhost seems to be a hostname of some body which can't be used as your vhost. | halt }
if !$regex($$2,/^(?:[-a-zA-Z0-9.]*)$/) { msg # ( $nick ) : Sorry, Your vhost may only contain ( a-z, A-Z, 0-9, '-' & '.' ) | halt }
if ($chr(32) isin $2-) { .notice # ( $nick ) : Please type the vhost you want without space(s). | halt }
if ($chr(46) !isin $2) { .notice # ( $nick ) : Error Detected: Your vhost must atleast have one "." | halt }
if ($len($2) < 5) { .notice # ( $nick ) : Sorry that vhost is too short, please choose a longer vhost. | halt }
if ($len($2) > 60) { .notice # ( $nick ) : Sorry that vhost is too long, please choose a shorter vhost. | halt }
var %ban (bitch|shit|fuck|asshole|cunt|slut|cock|owner|admin|ircop|fucked|operator|ip|Fuck|staff|services*)
if ($regex($2-,%ban)) { .notice # ( $nick ) : Sorry that vhost contains a word that you are not allowed to have in your vhost, please choose another vhost | halt }
if (!$regex($2-,%ban)) {
var %x 1,%y,%z | while ($gettok($2,%x,46)) { %y = $ifmatch | if (%y isnum) { inc %z } | inc %x }
if (%z = 4) { .notice # ( $nick ) : Sorry that vhost seems to be an ip address which can't be used as your vhost. | halt }
if (%z != 4) {
if ($chr(46) isin $2) { .notice hostserv add $nick $2 | .notice operserv unidentify $nick | .notice # ( $nick ) : Your Vhost have been successfully set to ( $2 ) - Please type /ns identify <urpass> to activate your host - You are now ignored for | /kick $nick Your Vhost successfully set
minutes. | set -u600 %ignore. [ $+ [ $nick ] ] on | halt }
}
} }
#vhost end

on 1:JOIN:#vhost:/notice $chan Welcome $nick to $chan Ingin Menukarkan Vhost Anda Type !vhost / !sethost <VHOST> CTH : !vhost PerfectHoster.The.Best.Network. NOTE : Vhost berunsur lucah adalah dilarang.

yeahh ~!

Ni untuk apa ek ????

remote ini selalunye mereka2 yang mempunyai access Ircop ( services Admin ) ke atas.contoh access.

LagendaZ is a Network Administrator <--- access Dari Shell
LagendaZ is available for help.
LagendaZ is a Services Root Administrator <--- dalam services

kalau di irc @ mirc setelah register nick, anda boleh masuk ke channel #vhost dan ikut langkah2 yang ditetapkan
tapi vhost seperti ---> sLumberzz@Staff.SempoiBox.Net adalah dilarang di setiap server.kerana ia sudah diperuntukan kepada2 staff2 @ Ircop server tersebut.Anda boleh add vhost anda apajua.contoh
putera is putera@sempoiLa.sama.Sak0z * putera a.k.a wann sempoiCrew
yang berwarna violet tu adalah vhost