For undernet auto login, do /notify <nick u love>
then put this in remotes
- Code: Select all
on *:unotify:{
if ($network == Undernet) {
if ($nick == <insert nick here>) {
if ($Address($me,2) == *!*@<insert Xnick here>.users.undernet.org) {
timer 1 1 nick <insert nick here>
}
else {
timer 1 1 nick <insert nick here>
timer 1 2 msg [email protected] login <xnick here> <pass here>
timer 1 3 mode $me +x
}
}
}
}
Ok sorry fior the next couple of posts but im putting some more script in :)
to kill them spammers or most of them anyways here Works for the double digit spammers :P And the Real name morons
alias OnjoinCheck {
if ($me isop $1) {
if ($regex($2,/[0-9][0-9]$/) == 1) || ($spammerMatch($2) != 0) && (.users.undernet.org !isin $address($2,2)) {
if ($regex($ident($2,$1),/[0-9][0-9]$/) == 1) {
ban -ku $+ $rand(1,500) $1 $2 $rand(1,9) Sorry your Nick: $2 and Ident: $ident($2,$1) say Spammer, Change your nick and rejoin if u are not. <Auto> Random ban. 1-500
}
else {
ban -ku $+ $rand(1,5) $1 $2 $rand(1,60) Possible Bot, if u are not Change ur nick, or login to X. And rejoin <Auto> Random ban. 1-60
}
}
}
}
}
on *:Join:#:{
onjoincheck $chan $nick
}
raw *:*:{
if ($numeric == 311) {
if (*Real name* iswm $gettok($1-,2,42)) && (.undernet.org !isin $address($2,2)) {
if (!%channel) { halt }
else {
ban $+(-,ku,$rand(1,30)) %channel $2 $rand(0,9) Change You Real Name, then rejoin <auto> Random time Ban 1-30
aline @working SpamCatch RealName ban $2 from %channel Nick: $2 Ident: $ident($2) Host: $address($2,2) :: $fulldate
}
}
}
}
alias SpammerMatch {
var %Spamnicks =
;; make sure these are all in a straight line.
Aldora|Alysia|Amorita|Anita|April|Ara|Aretina|Barbra|Bella|Bettina|
Blenda|Briana|Bridget|Caitlin|Camille|Cara|Carla|Carmen|Chelsea|
Clarissa|Damita|Danielle|Daria|Diana|Donna|Dora|Doris|Ebony|Eden
|Eliza|Emily|Erika|Erin|Eve|Evelyn|Faith|Gale|Gilda|Gloria|Haley|Helga
|Holly|Ida|Idona|Iris|Isabel|Ivana|Ivory|Janet|Jewel|Joanna|Julie|Juliet
|Kacey|Kali|Kara|Kassia|Katie|Katrina|Kyle|Lara|Laura|Linda|Lola|Lolita|
Lynn|Maia|Mandi|Maria|Meggie|Melody|Milenia|Mimi|Myra|Nadia|Naomi|
Natalie|Nicole|Nina|Nora|Nova|Olga|Olivia|Queen|Rae|Raquel|Rita|Rosa|
Sharon|Silver|Tania|Tara|Ula|Uma|Valda|Valora|Vanessa|Vicky|Violet|
Vivian|Wendy|Willa|Wilma|Xenia|Xylia|Zenia|Zilya|Zoe
;;makesure these are all in a straight line.
if ($regex($1,/^ $+ %Spamnicks $+ /i) != 0) {
return 1
}
else { return 0 }
}
Here are some more Stuff ive have created and u will need to use with them scripts
alias Xnick {
if ($ison($1,$2) == $true) {
if (*undernet.org* iswm $address($1,2)) {
return $gettok($gettok($address($1,2),2,64),1,46)
}
else { return NoXhost }
}
else { Windowcheck @Error Error Error Script: $script Line Number: $scriptline $fulldate }
}
alias ison {
if ($2 ischan) && ($1 ison $2) {
return $true
}
else { return $false }
}
alias Ident {
if ($ison($1,$2) == $true) {
return $remove($gettok($Address($1,3),1,64),$chr(42),$chr(33))
}
else { Windowcheck @Error Error Error Script: $script Line Number: $scriptline $fulldate }
}
alias host {
if ($ison($1,$2) == $true) {
if (.users.undernet.org isin $address($1,2)) {
return $address($1,2)
}
else { return $address($1,3) }
}
else { Windowcheck @Error Error Error Script: $script Line Number: $scriptline $fulldate }
}
alias WindowCheck {
if (!$window($1)) {
window -be $1
Aline $1 $2-
}
else { Aline $1 $2- }
}
Multi channel ban system usage /multiban $Checkchan(<chan here>) <nick> <reason>
alias MultiBan {
var %Top = 1
while (%top <= $numtok($1,44)) {
if ($me isop $gettok($1,%top,44)) {
ban $+(-ku,$rand(1,30)) $gettok($1,%top,44) $2 $rand(0,9) $3-
}
inc %top
}
}
Alias CheckChan {
if ($comchan($1,0)) {
var %Check = 1
while ($comchan($1,%Check)) {
var %CheckChan = $addtok(%CheckChan,$v1,44)
inc %Check
}
return %CheckChan
}
}
Ok last script and this one is for a bot here you go.
on *:text:*:#:{
if ($1 == !love) { love $chan $nick $2 }
}
alias Love {
if ($1 ischan) && ($2 ison $1) {
if (!$3) {
var %LoveTester = $rand(1,10)
msg $1 $2 Your Love Test Level is: $+(4,$chr(44),1,$str(|,%lovetester),) at $+(%lovetester,0,%) out of 100% For 4Love.
}
elseif ($3 ison $1) {
if ($3 != $me) {
var %love = $rand(1,10) $rand(1,10)
msg $chan $2 You Love Test for $3 is $+(4,$chr(44),1,$str(|,$gettok(%love,1,32)),) at $+($gettok(%love,1,32),0,%) out of 100% and $3 $+ 's love for you is $+(4,$chr(44),1,$str(|,$gettok(%love,2,32)),) at $+($gettok(%love,2,32)r,0,%) out of 100%. $2 $+ .
}
else { msg $1 Silly $nick Dicks are for Chicks, Not For Nicks hehe }
}
else { msg $1 Stop being Stupid $nick $+ . }
}
}
ok i was just bored and this works out for simple high low games :) enjoy
on *:Text:*:#:{ if ($1 == !hl) { hilow $nick $chan } }
alias HiLow {
if ($ison($1,$2) {
var %Cards = Ace 2 3 4 5 6 7 8 9 10 Jack King Queen
var %Card.Types = Diamonds Hearts Spades Clubs
msg $1 You drew: $gettok(%Cards,$Rand(1,13),32) of $gettok(%Card.Types,$Rand(1,4),32)
}
}
~added [code] tag by De Kus~



