Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- lias chanhalt {
- if ((($1 == #Innocence) || ($1 == #L) || ($1 == #Hi) || ($1 == #Chill) || ($1 == #Grr) || ($1 == #Bots) || ($1 == #Administration)) && ($me != Grr)) || (($1 == #BlueBNC) || ($1- == #xbnc)) { return $true }
- else return $false
- }
- alias cc1 return $+($chr(3),01,$1-)
- alias cc2 return $+($chr(3),10,$1-)
- on *:part:#: if ($nick == $me) remini chans.ini $chan
- on *:invite:#: {
- if ($me == Dropparty) { halt }
- if (%blackl [ $+ [ $chan ] ] == yes) { .notice $Nick Cannot join, channel is blacklisted! Reason: %blackreason [ $+ [ $chan ] ] $3- | halt }
- if ($me == Grr) {
- if (!$readini(chans.ini,$chan,nick)) {
- var %c $gettok([01] [02] $null,$r(1,3),32)
- .notice Grr $+ %c JOIN $chan
- msg #V $cc1( •••) $cc1($chr(40)) $+ $cc2(INVITE) $+ $cc1($chr(41)) $cc1(I was invited to) $cc2($chan) $cc1(by) $cc2($nick) $+ $cc1(.) $cc1(I sent:) $cc2(Grr $+ %c)
- set %j $+ $chan $nick
- }
- else msg #Administration $cc1( •••) $cc1($chr(40)) $+ $cc2(INVITE) $+ $cc1($chr(41)) $cc2($nick) $cc1(tried inviting me to) $cc2($chan) $cc1(but) $cc2($readini(chans.ini,$chan,nick)) $cc1(was already on the channel.)
- }
- }
- on *:notice:JOIN *:?: {
- if ($me == Dropparty) { halt }
- if ($nick == Grr) {
- if ($chan(0) == 30) || ($me ison $2-) $iif($me !ison $2-,.notice Grr REJOIN $2-)
- else $1-
- }
- }
- on *:notice:REJOIN *:?: {
- if ($me == Dropparty) { halt }
- if ($me == Grr) {
- .notice Grr $+ $gettok([01] [02] $null,$r(1,3),32) JOIN $2-
- }
- }
- on *:join:#: {
- if ($chan == #Bots) { halt }
- if ($me != Grr) { halt }
- if ($nick == $me) && (!$chanhalt($chan)) {
- msg # 1••• (10JOIN1):10 $me 1bot has joined $chan - Bot tag:10 $right($iif($me == Grr,[00],$me),4) - 1Made by: 10Omg1 - Invited by:10 $iif(%j [ $+ [ $chan ] ],$v1,[Auto-Join]) 1- Any problems? Join #Innocence to tell us! 1- Try out DropParty 10/invite dropparty $chan 1-
- if ($($+(%,j,$chan),2)) unset %j $+ $chan
- writeini chans.ini $chan nick $me
- }
- }
- ;============= add -> if ($chanhalt($chan)) halt <- To the beginning of all scripts that are used on multiple bots.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement