Renegade Public Forums
C&C: Renegade --> Dying since 2003™, resurrected in 2024!
Home » Renegade Discussions » Mod Forum » help with irc
Re: help with irc [message #289730 is a reply to message #288933] Wed, 10 October 2007 17:34 Go to previous message
Dean20056 is currently offline  Dean20056
Messages: 46
Registered: September 2007
Location: England,London
Karma:
Recruit
hi this is what i was looking for lol i found it incase any of you want it and are intrested this is it.

on *:Load: {
set %modchan $?="State your channel for the modlist:"
echo -a Modlist now applys to %modchan
if ($?!="Turn reverse rawmodes for modlist on?") {
set %reverseraw 1
echo -a reverse rawmodes on
}
else {
unset %reverseraw
echo -a reverse rawmodes off
}
}

on *:Unload: {
unset %modchan
unset %reverseraw
}

menu status,channel {
-
Modlist
.Change modlist channel {
set %modchan $?="State your channel for the modlist:"
echo -a Modlist now applys to %modchan
}
.Reverse rawmodes on/off {
if ($?!="Turn reverse rawmodes for modlist on?") {
set %reverseraw 1
echo -a reverse rawmodes on
}
else {
unset %reverseraw
echo -a reverse rawmodes off
}
}
-
}

on *:TEXT:*:%modchan: {
if ($1 == !amod) && ($3) && ($left($nick(#,$me).pnick,1) == ~) {
writeini modlist.ini modlist $2 $3
msg # 12 $2 is added to the modlist as: + $+ $3
}
if ($1 == !dmod) && ($2) && ($left($nick(#,$me).pnick,1) == ~) {
remini modlist.ini modlist $2
msg # 4 $2 has been removed from the modlist
}
elseif ($1 == !amod || $1 == !dmod) && ($left($nick(#,$me).pnick,1) != ~) {
.notice $nick you dont have access to use this command
}
if ($1 == !modlist) && ($nick !isop #) { .notice $nick you dont have access to use this command }
elseif ($1 == !modlist) && ($nick isop #) {
var %line 2
while ($read(modlist.ini, %line)) {
if (q isin $gettok($read(modlist.ini, %line),2,61)) && ($gettok($read(modlist.ini, %line),1,61) !isin %qnicks) {
var %qnicks $addtok(%qnicks,$chr(32) $gettok($read(modlist.ini, %line),1,61),44)
}
inc %line
}
var %line 2
while ($read(modlist.ini, %line)) {
if (a isin $gettok($read(modlist.ini, %line),2,61)) && ($gettok($read(modlist.ini, %line),1,61) !isin %qnicks %anicks) {
var %anicks $addtok(%anicks,$chr(32) $gettok($read(modlist.ini, %line),1,61),44)
}
inc %line
}
var %line 2
while ($read(modlist.ini, %line)) {
if (o isin $gettok($read(modlist.ini, %line),2,61)) && ($gettok($read(modlist.ini, %line),1,61) !isin %qnicks %anicks %onicks) {
var %onicks $addtok(%onicks,$chr(32) $gettok($read(modlist.ini, %line),1,61),44)
}
inc %line
}
var %line 2
while ($read(modlist.ini, %line)) {
if (h isin $gettok($read(modlist.ini, %line),2,61)) && ($gettok($read(modlist.ini, %line),1,61) !isin %qnicks %anicks %onicks %hnicks) {
var %hnicks $addtok(%hnicks,$chr(32) $gettok($read(modlist.ini, %line),1,61),44)
}
inc %line
}
var %line 2
while ($read(modlist.ini, %line)) {
if (v isin $gettok($read(modlist.ini, %line),2,61)) && ($gettok($read(modlist.ini, %line),1,61) !isin %qnicks %anicksn %onicks %hnicks %vnicks) {
var %vnicks $addtok(%vnicks,$chr(32) $gettok($read(modlist.ini, %line),1,61),44)
}
inc %line
}
msg # 4~Owners: %qnicks
msg # 7&Admins: %anicks
msg # 8@Ops: %onicks
msg # 9 $+ $chr(37) $+ Half-ops: %hnicks
msg # 13+Voice: %vnicks
}
}

on *:JOIN:%modchan:{
if ($readini(modlist.ini,n,modlist,$nick)) {
set -e %checkmod 1
who $nick
}
}

raw 352:*:{
if (%checkmod) {
$iif(r !isincs $7, msg %modchan $6 $+ $chr(44) register with nickserv and hop to get your + $+ $readini(modlist.ini,n,modlist,$6), mode %modchan + $+ $readini(modlist.ini,n,modlist,$6) $str($chr(32) $6,$len($readini(modlist.ini,n,modlist,$6))))
unset %checkmod
}
}

on !*:RAWMODE:%modchan:{
if ($left($nick(#,$nick).pnick,1) != ~) && ($nick != Chanserv) && (%reverseraw) {
var %rawl 1
var %rawlen $len($1)
while ($mid($1,%rawl,1)) && (%rawlen > 0) {
if ($mid($1,%rawl,1) == +) || ($mid($1,%rawl,1) == -) { var %rawmodesdone $addtok(%rawmodesdone,$replacex($mid($1,%rawl,1),+,-,-,+),0) }

while ($mid($1,%rawl,1)) && ($mid($1,%rawl,1) != +) && ($mid($1,%rawl,1) != -) {
if ($calc($count($1,$mid($1,%rawl,1))/2) != $round($count($1,$mid($1,- $+ %rawl,1))/2),0)) && ($mid($1,%rawl,1) !isin %rawmodesdone) {
var %rawmodesdone $addtok(%rawmodesdone,$mid($1,%rawl,1),0)
inc %rawl
dec %rawlen
}
}
inc %rawl
dec %rawlen
}
if %rawmodesdone { mode # %rawmodesdone $2- }
}
}


It goes into your bots remoteds and u type !amod <nick> <level> like !add EKT-Dean qaohv and that would make them +q. but the bot must be +q in the channel for it to work.
 
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Previous Topic: Renegade 2007: I want you!
Next Topic: my first mod.common try it!!
Goto Forum:
  


Current Time: Sat Jan 04 09:59:04 MST 2025

Total time taken to generate the page: 0.00799 seconds