By DragonFlare on Jul 22, 2008You Have To Set Lvls for this snipplet its pretty self explanitory.
on @*:text:!Clock*:#:{
if ($nick isop $chan) {
set %lock on
.msg $chan Commands are now locked.Please contact a channel operator to have them unlocked.
}
}
on @*:text:!CUlock*:#:{
if ($nick isop $chan) {
unset %lock
.msg $chan Commands are now Unlocked..
}
}
on *:text:StaffBot:#:{
if (%lock == on) {
.notice $nick commands are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
msg $chan Yes, $nick
}
on 4:text:op*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
mode $chan +o $2-
.msg $chan $nick If you need me again Type StaffBot
}
on 4:text:deop*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
mode $chan -o $2-
}
on 3:text:protect*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
mode $chan +a $2-
describe $chan User $2- Is Now An Admin $nick
}
on 3:text:deprotect*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
mode $chan -a $2-
}
on 3:text:halfop*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
mode $chan +h $2-
}
on 3:text:dehalfop*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
mode $chan -h $2-
}
on 10:text:hop:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
/hop #
}
ON 1:TEXT:die*:#: {
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
describe $chan dies
}
on 6:text:say *:#: {
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
msg $chan $2-
}
on 2:text:voice*:#: {
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
mode $chan +v $2-
}
on 2:text:devoice*:#: {
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Ok, $nick
mode $chan -v $2-
}
on 6:text:me *:#: {
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan $2-
}
menu nicklist {
Shitlist
.add:{ auser shit $1 | set %rs. [ $+ [ $1 ] ] $?="Reason:" | kchan $1 }
.del:{ ruser shit $1 | unset %rs. [ $+ [ $1 ] ] }
}
alias kchan {
var %x = 1 , %z = $comchan($1,0)
while (%x <= %z) {
kick $comchan($1,%x) $1 Shitlisted: %rs. [ $+ [ $nick ] ]
ban $comchan($1,%x) $1 2
inc %x 1
}
}
on *:load: {
echo 12 -a You Have Just Loaded Napa182's Funny Kicker / Banner
echo 12 -a A Script0rs Inc. Production
echo -a 14,1( 14,1?15,1?0,1?0,1? ??X????t0??X? ?0,1?15,1?14,1? ) tm.
}
Menu Nicklist {
shoot {
inc %moronshot
var %moron $1, %moron.shot $calc($readini(moron.ini, $address(%moron,2),Shot) +1)
writeini moron.ini $address(%moron,2) Shot %moron.shot
describe $chan look's Though the Scope on his 82A1/M107 and see's %moron
.timer 1 2 describe $chan Lines up %moron in his sights
.timer 1 5 describe $chan Clicks off the safety
.timer 1 8 describe $chan Pull's the trigger on his 82A1/M107
.timer 1 9 ban -k # %moron 2 14,1[12,1?0,1::And %moron $+ 's Head is no more but a stain on the ground::12,1?14,1]
.timer 1 10 .msg %moron 14,1[12,1?0,1::You Are The $ord(%moronshot) Total Moron I have Shot..::12,1?14,1][12,1?0,1::But It Seems I Had To Shoot You For The $ord($readini(moron.ini, $address(%moron,2),Shot)) Time::12,1?14,1]
}
}
on shit:join:#:{
if ($nick != petras) && ($Nick != savas) && ($nick != $me) {
kick # $nick Shitlisted: %rs. [ $+ [ $nick ] ]
ban # $nick 2
echo -a $timestamp *** Shitlist: $nick joined $chan
}
}
on *:text:spin:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
var %nick = $nick(#,$r(1,$nick(#,0)))
describe $chan spins the bottle...
timer 1 3 msg $chan The bottle is slowing down...
timer 1 5 msg $chan The bottle stopped...
timer 1 7 msg $chan It landed on...
timer 1 9 msg $chan %nick $+ !
timer 1 11 msg $chan $nick must $gettok(Make Out With|Kiss|Make Love With|Have Sex With|Smooch|French Kiss|Must Shave Your Pubes,$r(1,6),124) %nick $+ !
}
on *:text:pickpocket*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
msg $chan 12,14 $me walks up to $2 silently...
.timer 1 2 msg $chan 0,2 $me carefully reaches inside $2 $+ 's pocket and finds...
var %item = $rand(1,12)
if (%item == 1) .timer 1 2 msg $chan 2,0 A cell phone!
if (%item == 2) .timer 1 2 msg $chan 3,9 money!
if (%item == 3) .timer 1 2 msg $chan 5,0 A wallet! w00t!
if (%item == 4) .timer 1 2 msg $chan 0,1 A receipt... -.-
if (%item == 5) .timer 1 2 msg $chan 14,1 An ipod!!!
if (%item == 6) .timer 1 2 msg $chan 7,0 Cigarettes... blah...
if (%item == 7) .timer 1 2 msg $chan 4,0 A lighter... wonder what that's for...
if (%item == 8) .timer 1 2 msg $chan 1,4 OMG! A condom!
if (%item == 9) .timer 1 2 msg $chan 15,0 A quarter ~ wooptido -.-
if (%item == 10) .timer 1 2 msg $chan 13,0 Yummy! Bubble gum!
if (%item == 11) .timer 1 2 msg $chan 12,0 Nuthin...
if (%item == 12) .timer 1 2 msg $chan 12,14 Lint???
}
on *:join:#: {
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %joins [ $+ [ $chan ] ]
.msg $chan You are visitor number %joins [ $+ [ $chan ] ] to join $chan $+ , $nick $+ .
}
on 6:TEXT:part*:#: {
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
msg $chan 9,1parting $2 .....
part $2
}
on 6:text:ban*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
mode # +bbbb $2-
}
on 6:text:Unban*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
mode # -bbbb $2-
}
on 6:text:kick*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/chanserv kick # $2-
}
on 6:text:KB*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
mode # +b $2-
/chanserv kick # $2-
}
on 6:text:mute*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
mode $chan +m
mode $chan -a $2-
mode $chan -o $2-
mode $chan -h $2-
mode $chan -v $2-
mode $chan +b ~q: $+ $address($2,2)
.msg $chan You Have Been Muted $2 Reason: $3-
}
on 6:text:Unmute*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
mode $chan -m
mode $chan +v $2-
mode $chan -b ~q: $+ $address($2,2)
.msg $chan I just unmuted $2
}
on 100:text:SopAdd*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/msg Chanserv sop # Add $2-
}
on 100:text:SopDel*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/msg Chanserv sop # Del $2-
}
on 100:text:AopAdd*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/msg Chanserv Aop # Add $2-
}
on 100:text:AopDel*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/msg Chanserv Aop # Del $2-
}
on 100:text:AccessAdd*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/msg Chanserv Access # Add $2-
}
on 100:text:AccessDel*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/msg Chanserv Access # Del $2-
}
on 100:text:BotAssign*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/msg Botserv Assign # $2-
}
on 100:text:BotUnAssign*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/msg Botserv Unassign # $2-
}
on 10:text:Auser*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/auser $2-
}
on 2:text:Roll Over*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Rolls Over
}
on $6:text:$(/ $+ $me set [+-][beIkfLljpsmntirRcOAQKVCuzNSMTG]/Si):#:mode $chan $3-
on 2:text:Fetch*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Fetches $2-
.msg $2- $nick Requests Your Assistance On #
}
on 2:text:Drown*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Drowns $2-
}
on 2:text:Attack*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %attacks
describe $chan Attacks $2-
.msg $chan You Are Number %attacks $+ To Be Attacked By Me $2-
}
on 2:text:Hump*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Humps $2-
}
on 2:text:hug*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Hugs $2- For $nick
}
on 2:text:Poke*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Pokes $2- For $nick
}
on 2:text:Pet*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Pets $2- For $nick
}
on 2:text:Kiss*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Kisses $2- For $nick
}
on 2:text:Cmodes*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
.msg $chan Channel Modes:
.msg $chan A = Server/Net/Tech Admin only channel (Settable by Admins)
.msg $chan a nick Makes the user a channel admin
.msg $chan b nick!user@host= Bans the nick!user@host from the channel. Note: Extended Bans are now available. Please see the FAQ topic, How do I use the Extended Ban Types? for more information.
.msg $chan c = Blocks messages with ANSI color (Color Block).
.msg $chan C = No CTCPs allowed in the channel.
.msg $chan e nick!user@host = Exception ban - If someone matches it they can join even if a ban matches them
.msg $chan f [*]lines:seconds = Flood protection, if the * is given a user will be kick banned when they send lines in seconds if * is not given they are just kicked and not banned. Note: Flood protection has been greatly improved. Please see the FAQ topic, How do I enabled Flood Protection for more information.
.msg $chan G = Makes the channel G Rated. Any bad words are replaced with censored in channel messages (badwords.channel.conf).
.msg $chan H = No +I users may join (Settable by Admins)
.msg $chan h nick = Gives HalfOp status to the user
.msg $chan i = Invite-only allowed
.msg $chan K = /KNOCK is not allowed
.msg $chan k key = Needs the Channel Key to join the channel
.msg $chan L #chan2 = If +l is full, the next user will auto-join #chan2
.msg $chan l x= Channel may hold at most number of users. x= number of max users
.msg $chan M = A registered nickname (+r) is required to talk
.msg $chan m = Moderated channel, Only users with mode +voh can speak.
.msg $chan n = No messages from outside channel
.msg $chan N = No Nickname changes are permitted in the channel.
.msg $chan O = IRC Operator only channel (Settable by IRCOps)
.msg $chan o nick = Gives Operator status to the user
.msg $chan p = Private channel
.msg $chan q nick = Sets channel owner
.msg $chan Q = No kicks able in channel unless by U:Lines
.msg $chan r = Channel is Registered
.msg $chan R = Requires a Registered nickname to join the channel
.msg $chan s = Secret channel
.msg $chan S = Strip all incoming colors away
.msg $chan t = Only Channel Operators may set the topic
.msg $chan T = No NOTICE's allowed in the channel
.msg $chan U = Strips formatting away (reverse, bolds, and underlines.)
.msg $chan u = "Auditorium". Makes /NAMES and /WHO #channel only show Operators.
.msg $chan V = /INVITE is not allowed
.msg $chan v nick = Gives Voice to the user (May talk if chan is +m)
.msg $chan z = Only Clients on a Secure Connection (SSL) can join.
}
on 2:text:Tackle*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %Tackles
describe $chan Tackles $2-
.msg $chan You Are The %Tackles $+ Person To Be Tackled On #
}
on 2:text:Kill*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Kills $2- For $nick
}
on *:join:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
/cs kick #
}
on 100:text:Amsg*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Sending Amsg's To Channels $nick
/notice #Kellieeemae Join #house-of-Angels
}
on 1000:text:Kill*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
Describe $chan Killing $2- From Server $nick
/kill $2- Requested by $nick $2- You Have Been Kill $2- On Request By $nick
}
on 4:text:Invite*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
Describe $chan Inviting nicks $nick
/invite $2- #
describe $chan Invitation To $2- Sent $nick
}
alias power {
var %a 1,%b 1,%c 0,%d 0,%e 0
while (%a <= $scon(0)) {
scon %a
var %e $calc(%e + $chan(0))
while (%b <= $chan(0)) {
if ($me isop $chan(%b)) { var %c $calc(%c + $nick($chan(%b),0)) | inc %d | inc %b }
inc %b
}
var %b 0
inc %a
}
echo -a I am op in %d $+ / %e channels on $scon(0) Networks. I currently pwn %c people.
}
on 2:text:RA*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %RA
.msg $chan 4R0,4E4,0D0,1 0,4A4,0L0,4E4,0R0,4T4,0!7,1-> 8,1ONE BITCH DETECTED!
.msg $chan $2- You Are The %RA $+ Bitch To Be Detected On #
}
on 4:text:Bitch*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
describe $chan Calls $2- A Bitch
.msg $chan $2- You Have Been Called A Bitch
.msg $chan $2- If You Have Problems With This Talk To Spencer
}
on 2:action:hug*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
if ($2 == $me) inc %moans
if ($2 == $me) describe $chan $me moans
if ($2 == $me) .notice $nick You Have Made Me Moan For The: %Moans $+ Time
}
on 2:action:lick*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
if ($2 == $me) inc %licks
if ($2 == $me) describe $chan $me Moans And Licks Back
if ($2 == $me) .notice $nick You Have Made Me Moan For The: %licks $+ Time $nick
}
on *:text:Hi*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %Hi
.msg $chan Hi Has Been Said %Hi $+ Times On #
}
on *:Text:Hello*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %Hello
.msg $chan 12 Hello Has Been Said 9 %Hello %+ Times On #
}
on *:text:Ello*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %Ello
.msg $chan 12 Ello Has Been Said 9 %Ello $+ Times On #
}
on 2:text:Sit*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %Sit
describe $chan Sits and Waits For A Treat From $nick
.msg $chan i Have Been Told To Sit %Sit $+ Times
}
on *:text:Piss On*:#:{
if (%lock == on) {
.notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. | halt }
inc %pisses
describe $chan Pisses $2-'s Foot
.msg $chan You Are The %Pisses $+ Person I Have Pissed On
}
Ok, theres sooooooooooo much to go over and its obvious that you have a bad habbit of getting ahead of yourself. I think we need to do this on irc. Ill help you rebuild this thing.
To answer one of your questions, you dont need a $+ at all between the %variable and the word times, thats why it was so confusing why you were doing it.
I couldnt get to sleep lastnight and I\'m very tired now so I need to get some sleep before I help you. Ill join your server later today if you tell me what server yor on and what your nick will be and what channel I should look for ya in so I can help ya.
Let me know if that sounds good.
and on the staffbot thing its not exactly working the way i had planned i wanted it to do comands only when someone said its name and its not doing that how do i fix that napa, typo? and on the combining the texts hows that work i mean im not sure how that works and i tried it your way typo it wouldnt work so what do i do now?
Do you not listen to anything said to you? You keep making the same mistakes over and over and over and over.
Read the comments on your other snippets and learn from them.
Once again you arent combing events, you are using $+ to make \"3 times\" look like \"3times\" which is silly, you have %+ where $+ belongs in atleast one spot, you say things like \"hello has been said #times\" but only check the word hello if its the first word in a sentence and this same exact problem repeats numerous times, you insist on using /\'s for commands when you dont need them inside of scripts, you have absolutely no flood protection of any kind and infact your script intentionally and severly floods with the cmodes on text event.
Every single thing I mentioned above has been mentioned in your other recent snippets.
I could go on but I don\'t think you even listen. It\'s like you just don\'t care if the script you release is crap or quality.
If it\'s that you don\'t understand, then ask for help, me and a lot of other users here are more than willing to help you figure out anything your having trouble with.
