By DragonFlare on Jul 22, 2008This Script Is All about fun but it also has a lock on it when enabled no one can use commands on your bots and srry about the three scripts earlier i was bored i guess that is no excuse i hope you like this one. To Turn the lock on type !clock to turn it off type !CUlock.
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: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 *: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 *: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 *: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
}
Why do u keep adding the amount and word times together with a $+ ?
I dont understand why you would want to see the number attached to the word like \"3times\" instead of a space in there like \"3 times\". Also the $+ you are using to do this in one of the hello events you made %+ on accident.
Something else you may not know about, you can use $ord() to append st, nd, rd, or th to the number depending on which one is the right one. So, $ord(1) would return 1st and $ord(10) would return 10th and so on.
Some other edits could include changing:
on *: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
}
to
on *:action:$(hug $me):#:{
if (%lock == on) { .notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked.}
else {
inc %moans
describe $chan $me moans
.notice $nick You Have Made Me Moan For The: %Moans $+ Time
}
}
Notice how I changed the on text event to match what you wanted exactly. This eliminated the need for the $2 == $me checks. I also used else { } to get rid of the halt you didnt really need.
You should also be combining your events when possible. I also noticed that your only looking for the words ello and hello and so on in the beggining of the sentence when it looks like you want to look for them anywhere.
Heres an example of combining events and of looking for the words anywhere.
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 #
}
to
on *:text:Hi*:#:{
if (%lock == on) { .notice $nick Commands Are Currently Locked Contact A Channel Operator To Get Them Unlocked. }
elseif (hi isin $1-) {
inc %Hi
.msg $chan Hi Has Been Said %Hi $+ Times On #
}
elseif (Helloisin $1-) {
inc %Hello
.msg $chan 12 Hello Has Been Said 9 %Hello %+ Times On #
}
elseif (Ello isin $1-) {
inc %Ello
.msg $chan 12 Ello Has Been Said 9 %Ello $+ Times On #
}
}
Notice how i used the else\'s to make sure nothing happens unless its unlocked because if it was locked than none of the elses could trigger.
