on *:JOIN:#:{ if ($ulevel > 1) { msg #  $+ $nick is a level $ulevel cfas-Bot Admin. } } on *:TEXT:-adduser*:#:{ if ($ulevel < 0 ) { .notice $nick You Lack Access To Use This Command. | halt } { guser $2- | notice $nick added $3 to userlist with access level $2 ( $+ $4 $+ ) } } on *:text:join*:?:{ if ($ulevel < 400 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me ison $chan) { .notice $nick I am already in that channel. | halt } { .join $2 | .notice $nick Joined $2 } | halt } on *:text:-join*:#:{ if ($ulevel < 400 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me ison $2) { .notice $nick I am already in that channel. | halt } { .join $2 | .notice $nick Joined $2 } | halt } on *:text:leave*:#:{ if ($ulevel < 400 ) { .notice $nick You Lack Access To Use This Command. | halt } { .part $chan $3- | .notice $nick Parted $chan } | halt } on *:text:part*:?:{ if ($ulevel < 400 ) { .notice $nick You Lack Access To Use This Command. | halt } { part $chan $2- } } on *:text:part*:#:{ if ($ulevel < 400 ) { .notice $nick You Lack Access To Use This Command. | halt } { part $chan $2- } } on *:TEXT:-quit:*:{ if ($ulevel < 500 ) { .notice $nick You Lack Access To Use This Command. | halt } { .quit $2- ( $+ $nick- $+ ) } } on *:text:-access*:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } { .notice $nick You have access $iif($ulevel == 0,none,$ulevel) to $me } } on 500:text:-restart*:*: { quit $2- server irc.us.gamesurge.net } on 400:join:#:{ if ($me isop $chan) { mode $chan +o $nick } } on 300:join:#:{ if ($me isop $chan) { mode $chan +v $nick } } on *:text:-say*:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if ($ulevel < 300 ) { .notice $nick You Lack Access To Use This Command. | halt } if (!$2) { .notice $nick What do you want me to say? | halt } .msg $chan $2- } on *:text:-commands:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } .notice $nick Use -commands0 for access 0 .notice $nick Use -commands100 for access 100 .notice $nick Use -commands200 for access 200 .notice $nick Use -commands300 for access 300 .notice $nick Use -commands400 for access 400 .notice $nick Use -commands500 for access 500 } on *:text:-commands0:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } .notice $nick -Version .notice $nick -Credits } on *:text:-commands100:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if ($ulevel < 100 ) { .notice $nick You Do Not Have Enough Access To Use These Commands. | halt } .notice $nick -Voice .notice $nick -Devoice } on *:text:-commands200:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if ($ulevel < 200 ) { .notice $nick You Do Not Have Enough Access To Use These Commands. | halt } .notice $nick -Kick .notice $nick -Ban .notice $nick -Unban .notice $nick -Mode } on *:text:-commands300:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if ($ulevel < 300 ) { .notice $nick You Do Not Have Enough Access To Use These Commands. | halt } .notice $nick -Op .notice $nick -Deop .notice $nick -Say } on *:text:-commands400:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if ($ulevel < 400 ) { .notice $nick You Do Not Have Enough Access To Use These Commands. | halt } .notice $nick -Join .notice $nick -Part .notice $nick -Kb .notice $nick -Tb .notice $nick [^B]Notes:[^B] -Tb Nick <(How many seconds you want them banned for)> } on *:text:-commands500:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if ($ulevel < 500 ) { .notice $nick You Do Not Have Enough Access To Use These Commands. | halt } .notice $nick -Adduser .notice $nick [^B]Syntax:[^B] -Adduser <1> } on *:text:-op*:#:{ if ($ulevel < 300 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to op? | halt } if ($2 !ison $chan) { .notice $nick $2 is not in $chan | halt } if ($2 isop $chan) { .notice $nick $2 is already opped in $chan | halt } .mode $chan +o $2 .notice $nick I have Opped $2 } on 200:text:-deop*:#:{ if ($ulevel < 300 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to de-op? | halt } if ($2 !ison $chan) { .notice $nick $2 is not in $chan | halt } if ($2 !isop $chan) { .notice $nick $2 is Not Opped in $chan | halt } .mode $chan -o $2 .notice $nick I have De-Opped $2 } on *:text:-voice*:#:{ if ($ulevel < 100 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to voice? | halt } if ($2 !ison $chan) { .notice $nick $2 is not in $chan | halt } if ($2 isvoice $chan) { .notice $nick $2 is already voiced in $chan | halt } .mode $chan +v $2 .notice $nick I have voiced $2 } on *:text:-devoice*:#:{ if ($ulevel < 100 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to de-voice? | halt } if ($2 !ison $chan) { .notice $nick $2 is not in $chan | halt } if ($2 !isvoice $chan) { .notice $nick $2 is not voiced in $chan | halt } .mode $chan -v $2 .notice $nick I have de-voiced $2 } on *:text:-v:#:{ if ($ulevel < 100 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to voice? | halt } if ($2 !ison $chan) { .notice $nick $2 is not in $chan | halt } if ($2 isvoice $chan) { .notice $nick $2 is already voiced in $chan | halt } .mode $chan +v $2 .notice $nick I have voiced $2 } on *:text:-dv*:#:{ if ($ulevel < 100 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to de-voice? | halt } if ($2 !ison $chan) { .notice $nick $2 is not in $chan | halt } if ($2 !isvoice $chan) { .notice $nick $2 is not voiced in $chan | halt } .mode $chan -v $2 .notice $nick I have de-voiced $2 } on *:text:-ban*:#:{ if ($ulevel < 200 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to ban? | halt } if ($2 isban $chan) { .notice $nick $2 is Banned in $chan already | halt } .ban $chan $2 .notice $nick I have Banned $2 } on *:text:-unban*:#:{ if ($ulevel < 200 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to unban? | halt } if ($address($2,6) !isban #) { .notice $nick $2 is not banned | halt } ban -r # $2 6 .notice $nick I have unbanned $2 } on *:text:-ub*:#:{ if ($ulevel < 200 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to unban? | halt } if ($2 !isban $chan) { .notice $nick $2 is not banned from $chan | halt } else { .mode $chan -b $2 } .notice $nick I have unbanned $2 } on *:text:-kb*:#:{ if ($ulevel < 300 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to kick ban? | halt } if ($2 !ison $chan) { .notice $nick $2 is not in $chan | halt } else { .mode $chan +b $address($2,2) .kick $chan $2 $3- $+ ( $+ $nick $+ ) .notice $nick $2 has been kick banned from $chan } } on *:text:-kick*:#:{ if ($ulevel < 200 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick Who do u want to kick? | halt } if ($2 !ison $chan) { .notice $nick $2 is not in $chan | halt } .kick $chan $2 .notice $nick I have kicked $2 } on *:text:-mode*:#:{ if ($ulevel < 200 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if (!$2) { .notice $nick What mode would you like? | halt } .mode $chan $2 .notice $nick I have changed the modes to $2 } on *:text:-tb*:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } if ($ulevel < 300 ) { .notice $nick You Do Not Have Enough Access To Use These Commands. | halt } .ban -u $+ $3 $chan $address($2,2) .kick $nick $chan .notice $nick I have timebanned $2 for $3 Seconds } on *:text:-version:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } .notice $nick cfas-Bot Version 1.0 (cfastic #cfas) November 30th 8:52 am 2006. } on *:text:-credits:#:{ if ($me !isop $chan) { .notice $nick $me needs to be opped in $chan to function Properly. | halt } .notice $nick $me was created by cfastic and some other friends from #irate and #betabots $+ . } on *:TEXT:-bind*:#:{ if ($ulevel < 500 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($2) { if (!$3) { notice $nick $2 requirers more parameters. | halt } if ($3 == *) || ($3 == none) || ($3 == off) { unset $+(%,$chan,$2) | notice $nick $2 for # is now off. | halt } set $+(%,$chan,$2) $3- notice $nick $2 for #cfas has been set to $3- } } on *:TEXT:-unbind*:#:{ if ($ulevel < 500 ) { .notice $nick You Lack Access To Use This Command. | halt } if (!$2) notice $nick use -unbind Trigger if ($~($+(%,$chan,$2),2) == $null) { notice $nick Error: I don't recoginze $2 as a binding. | halt } unset $+(%,$chan,$2) notice $nick Successfully unbound $2 } on *:TEXT:*#*:#cfas: { if ($nick isreg $chan) { inc %ad. [ $+ [ $nick ] ] if (%ad. [ $+ [ $nick ] ] == 1) { notice $nick Don't advertise Channels in here. Thank You. } if (%ad. [ $+ [ $nick ] ] == 2) { ban -ku600 $chan $nick TempBan 10 min for channel advertising } if (%ad. [ $+ [ $nick ] ] == 3) { ban -ku1800 $chan $nick TempBan 30 min for channel advertising | unset %ad. [ $+ [ $nick ] ] } } } on *:text:-greeton*:#cfas:{ if ($ulevel < 500 ) { .notice $nick You Lack Access To Use This Command. | halt } if ($nick !isop $chan) { notice $nick %t Sorry You Lack Access To This Command! %t } else { set %greeton true notice $nick %t Greeting Turned On %t } } on *:text:-greetoff*:#cfas:{ if ($nick !isop $chan) { notice $nick %t Sorry You Must be Op to use this Command! %t } else { set %greeton false notice $nick %t Greeting Turned Off %t } } on *:text:-setgreeting *:#cfas:{ if (%greeton == true) { set %greeting $2- | .notice $nick %t Channel Greeting Set To " $+ $2- $+ " %t else { notice $nick %t Greeting Isnt On! Type -greeton To Activate The Bot's Greeting! %t } } } on *:JOIN:#cfas:{ if (%greeton == true) { notice $nick %t %greeting %t } } on *:text:.greeting*:#:{ notice $nick %t Current Greeting: " $+ %greeting $+ " %t }