GTAXL Channel Linker

By GTAXL on Oct 12, 2012

Screenshots

This very awesome script that was tweaked by me and secured by me and Zenum, relays your channel on multiple networks. Try it out, or you're lame.
http://www.hawkee.com/profile/img/1212310/

Instructions

  1. Replace #GTAXL with the channel you want to link.
  2. Replace GTAXLnet with your MAIN central IRC network.
  3. Replace #GTAXLbots with your Fake Relayer command control channel.
  4. Connect the bot on all the IRC networks you can think of, join the bot to the channel on every network.
  5. Talk on a network, enjoy!
  6. Report any bugs to GTAXL and Zenum.

In order for the script to work, the bot must be connected to all networks and joined to the channel and have permission to speak. If the bot accidently disconnected from one of the networks, the relay will become broken until he is reconnected. Future updates will include a full control to kick people on other networks from your channel, sync topic which will make the topic the same for all nets, cleaner code, and more.

How to use the fakerelay command?
Join the control channel set.
Set protective modes.
Type !fakerelay Network Nick Message here!

Version 3.02 - October 12, 2012
Changelog
• Fixed major remote computer exploits
• Re-desgined the relay
• Added a relayfaker command
• Fixed execution of commands via ON TEXT, ACTION, PART, KICK, QUIT

GTAXL (Victor Coss) irc.gtaxl.net #GTAXL
Zenum (Ollie Nixon) irc.moonchat.info #Zenum

on *:text:*:#GTAXL:{ if (| isin $1- ) { halt }
  else { relaytext $iif($network = $null,Unknown-Network,$v1) $+($chr(60),$nick,$chr(62)) $1- } 
}
on *:action:*:#GTAXL:{ if (| isin $1- ) { halt }
  else { relayaction $iif($network = $null,Unknown-Network,$v1) $+($chr(60),$nick) $1- }
}
on *:TEXT:!fakerelay *:#GTAXLbots:{ if (| isin $1- ) || ($network != GTAXLnet) { halt }
  else {
    var %a = $scon(0)
    while %a {
      if ($scon(%a).network == $1) dec %a
      else { scon %a msg #GTAXL $+(05[,$2,] 03,$remove($$3,$chr(60),$chr(62))) $+ 12>>06 $remove($4-,$chr(36)) $+ | dec %a }
    }
  }
}
$iif($network = $null,Unknown-Network,$v1) $+($chr(60),$nick)13 $1-
on *:join:#GTAXL:relayjoin $iif($network = $null,Unknown-Network,$v1) $nick 09has now entered the room 
on *:part:#GTAXL:{ if (| isin $1- ) { halt }
  else { relaypart $iif($network = $null,Unknown-Network,$v1) $nick 07has now left the room Reason: $1- }
}
on *:rawmode:#GTAXL:relaymode $iif($network = $null,Unknown-Network,$v1) $nick 08sets mode(s) $1 on $2-
on *:kick:#GTAXL:{ if (| isin $1- ) { halt }
  else { relaykick $iif($network = $null,Unknown-Network,$v1) $nick 04has kicked $knick Reason: $+ $1- }
}
on *:quit:{ if (| isin $1- ) { halt } 
  else { 
    { var %a = $comchan($nick,0)
      while %a {
        if ($comchan($nick,%a) == #GTAXL) { relayquit $iif($network = $null,Unknown-Network,$v1) $nick 04has just disconnected from $network $+ : $iif($1-,$v1,QUIT) | dec %a }
        else dec %a
    } }
  }
}
on *:nick: {
  var %a = $comchan($newnick,0)
  while (%a) {
    if ($comchan($newnick,%a) == #GTAXL) { relaynick $iif($network == $null,Unknown-Network,$v1) $nick 14is now known as $newnick | dec %a }
    else { dec %a }
} }
alias relaytext {
  var %a = $scon(0)
  while %a {
    if ($scon(%a).network == $1) dec %a
    else { scon %a msg #GTAXL $+(05[,$1,] 03,$remove($$2,$chr(60),$chr(62))) $+ 12>>06 $remove($3-,$chr(36)) $+ | dec %a }
  }
}
alias relayaction {
  var %a = $scon(0)
  while %a {
    if ($scon(%a).network == $1) dec %a
    else { scon %a msg #GTAXL $+(05[,$1,] 03,$remove($$2,$chr(60),$chr(62))) $+ 12<<13 $remove($3-,$chr(36)) $+ | dec %a }
  }
}
alias relayjoin {
  var %a = $scon(0)
  while %a {
    if ($scon(%a).network == $1) dec %a
    else { scon %a msg #GTAXL $+(05[,$1,] 03,$remove($$2,$chr(60),$chr(62))) $+ 12>06 $remove($3-,$chr(36)) $+ | dec %a }
  }
}
alias relaypart {
  var %a = $scon(0)
  while %a {
    if ($scon(%a).network == $1) dec %a
    else { scon %a msg #GTAXL $+(05[,$1,] 03,$remove($$2,$chr(60),$chr(62))) $+ 07>06 $remove($3-,$chr(36)) $+ | dec %a }
  }
}
alias relaymode {
  var %a = $scon(0)
  while %a {
    if ($scon(%a).network == $1) dec %a
    else { scon %a msg #GTAXL $+(05[,$1,] 03,$remove($$2,$chr(60),$chr(62))) $+ 05>>>>06 $remove($3-,$chr(36)) $+ | dec %a }
  }
}
alias relaykick {
  var %a = $scon(0)
  while %a {
    if ($scon(%a).network == $1) dec %a
    else { scon %a msg #GTAXL $+(05[,$1,] 03,$remove($$2,$chr(60),$chr(62))) $+ 05<*>06 $remove($3-,$chr(36)) $+ | dec %a }
  }
}
alias relayquit {
  var %a = $scon(0)
  while %a {
    if ($scon(%a).network == $1) dec %a
    else { scon %a msg #GTAXL $+(05[,$1,] 03,$remove($$2,$chr(60),$chr(62))) $+ 05~/~06 $remove($3-,$chr(36)) $+ | dec %a }
  }
}
alias relaynick {
  var %a = $scon(0)
  while %a {
    if ($scon(%a).network == $1) dec %a
    else { scon %a msg #GTAXL $+(05[,$1,] 03,$remove($$2,$chr(60),$chr(62))) $+ 09->06 $remove($3-,$chr(36)) $+ | dec %a }
  }
}

Comments

Sign in to comment.
disabledacc   -  Oct 17, 2012
 Respond  
disabledacc   -  Oct 17, 2012
 Respond  
GTAXL   -  Oct 14, 2012

@disabledacc Please look at the changelog, these problems have been resolved. What do you mean you was going to do it on me with epic shoot?

 Respond  
disabledacc   -  Oct 14, 2012
 Respond  
GTAXL   -  Oct 12, 2012

It's way better and safer than using a J-ANUS link. :)

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.