mirc chat bot scripting � on / off auto ( join / leave ) message

By ryan7461035 on Dec 11, 2010

alias autoJoin {
if (%nmJoin isop %chJoin) {
describe %chJoin -> [MOD] %nmJoin has joined.
}
else {
describe %chJoin -> %nmJoin has joined.
}
}

on *:join:#:{
if (%awFlag == 1) {
%chJoin = $chan
%nmJoin = $nick
/timerJoin 1 1 /autoJoin
}
}

on *:part:#:{
if (%awFlag == 1) {
if ($nick isop $chan) {
describe $chan -> [MOD] $nick has left.
}
else {
describe $chan -> $nick has left.
}
}
}

on *:text:!start auto message:#:{
%awFlag = 1
describe $chan Auto join / leave massage started.
}

on *:text:!stop auto message:#:{
%awFlag = 0
describe $chan Auto join / leave message stopped.
}

Comments

Sign in to comment.
Tidum   -  Dec 12, 2010

All I can think ryan is saying is: What the hell are these people saying that I have 40+ e-mail notifications!!!!

 Respond  
Jethro   -  Dec 12, 2010

sunslayer wrote:> i can't tell where the constructive criticism ended and the ranting started...This so called teen fiasco really messes with your head good.

 Respond  
sunslayer   -  Dec 12, 2010

i can't tell where the constructive criticism ended and the ranting started...

 Respond  
blackvenomm666   -  Dec 11, 2010

which is why he doesnt like me for pointing out the fact that one of his snippets didnt work at all.

 Respond  
Jethro   -  Dec 11, 2010

Teen can't take it when people jump all over him. His ego is too spoiled to realize or even shift his conniving attitude toward others. You either acknowledge his work bein' the greatest of all time or you ain't no friend of his. Don't even bother making a reply to his provided examples, or else his inner child's gonna get real disturbing.

 Respond  
blackvenomm666   -  Dec 11, 2010

notice i did help.:)

 Respond  
H0LLYWOOD   -  Dec 11, 2010

wow, if i was the author, i would delete all your comments and ask for help from people that arent interested in bitching and complaining about others. (weather its a rewrite of someones snippet or just a simple edit) this is a sharing and help site ppl. so stop bitching and lets get back to the sharing and helping.

 Respond  
blackvenomm666   -  Dec 11, 2010

oh yea and ryan7461035 instead of doing /timerJoin 1 1 /autoJoin
you can get rid of the /'s and just do .timerjoin 1 1 autojoin
the . will silence the timers just makes it a little less annoying

 Respond  
_Teen_   -  Dec 11, 2010

some people don't consider what you do helping they consider it an annoyance from a moron

this ppl, its you, and you, and you? omg its night here yet, i will see Supernatural on tv, i dont want to spend my night discussing with a nerd

 Respond  
blackvenomm666   -  Dec 11, 2010

you wanna try calling me a f a g idc im bi so i guess thats half right. secondly you have no proof of your accusations that napa does my sockets either so why don't you take your own advice and get proof or stfu. and i also help people here so whats your point in continuing to say that? the diff between you and me is i know when people want my help and when they don't. and some people don't consider what you do helping they consider it an annoyance from a moron. so should really learn who cares what you have to say and who doesnt

 Respond  
_Teen_   -  Dec 11, 2010

you on the other hand get your sockets anywhere you can grab em.

do you have proof of what you're saying? c'mon, you said to everyone that Ford do my scripts, so its better you ask for him, or you proof it, cause everyone will think, that you're a liar... or for other one of course... cause if i copy the ppl script, they probably would have already manifested... i just asked for help here, one time with a socket script... for IP TRACKER, but that project was made many months ago... venom, you just talk, about things that you dont know... go learn something first, i took some time to learn things and come here to help ppl, i didnt learn nothing in 1 day

\/ next one who post on this snippet its f-a-g =) probably will be blackvenom

 Respond  
blackvenomm666   -  Dec 11, 2010

and how did i not help here? i edited it in a way that would allow the user to better understand it if he regex is beyond them atm. i consider that helping for one. for two most of my helping people happens in private messages i get from them just ask cupcake. for three i didnt take 40 minutes moron. i stopped working on it. then started working on it again later you should really learn your facts oh and napa has only made ONE of my sockets which i then changed to my own use. i mean seriously if you cannot tell the difference between my socktes and napa's sockets you are a complete and total nub. and on the one he did do that i edited to my own use i put a thanks for his help up in the description. you on the other hand get your sockets anywhere you can grab em. one day your saying you wanna learn next day your releasing well scripted sockets? i think not. your having people write your sockets for you then posting them as yours learn when to shut up teen. oh and i dont wanna see you hurt yourself anymore than you already have trying to insult people here so just take a break and stop thinking. shouldnt be too hard for you to do.

 Respond  
_Teen_   -  Dec 11, 2010

PWND! lol.

never feed the trolls, never
even when this troll, its blackvenom, he wants to be famous, with his friends here

why don't you start spending more time learning how to code better

i bet with everyone, that im better than you... you took 40 minutes to edit a simple script, and i took 10 minutes, and then you said to everyone that ''ford'' edited to me... by the way, everyone knows that napa do the socket scripts for you...

i really dont understand this guy... we never see him helping others, he just comment, when his friends comments, and always the same comments... he only say bad words, but i dont blame you, I know you probably haven't had a good childhood.

when you reach my feet, let me know, so i dont have to dirty my shoes stepping on you

 Respond  
cupcake   -  Dec 11, 2010

Have to say, at least this snippets getting alot of attention. LoL

 Respond  
Tidum   -  Dec 11, 2010

That has to be a bash.org quote. :D

 Respond  
Luna   -  Dec 11, 2010

PWND! lol.

 Respond  
blackvenomm666   -  Dec 11, 2010

@teen

well, im not the brown nosin, of ford, I just appreciate your willingness to help,
instead of other guys here, that think its Khaled himself, there are many skilled guys here, who really are interested to help, i really apreciate the ppl who just know a few things on MSL and wants to know more, and help, instead of some guys that dont know nothing like you, and come here to say something of other users

im not an expert, i need to learn many things yet, of course, but i dont act like a GOD here, that instead help ppl, they just criticize others, and dont post any answer for the question...

by the way, this its becoming a chat, i will let u all alone

Hey F|_|cknuts if i knew nothing about coding msl how is it i have 2 released versions of irc. and a crapton of snippets on here all of which work unlike yours.
you need to stop thinking YOUR god and that the way you say to do things is the only way it should be done. your just a lil kid who got butthurt because i found a snippet of yours that didnt work pointed it out in the comments of that snippet then created my complete own version of it that did work. why don't you start spending more time learning how to code better and less time trying to bash people when you can barely speak english good enough to make people understand you if you want i can get ahold of bubba for you to help you learn english that way you'd have an incentive to learn the better you get the more d1ck you get from him

 Respond  
blackvenomm666   -  Dec 11, 2010

and here is yet another way to do it this one without any regex

and to teen

and the bootlicker blackvenom ( the guy that dont even know how to use vars )

look retard i used vars

alias autoJoin {
  if (%nmJoin isop %chJoin) {
    describe %chJoin -> [MOD] %nmJoin has joined.
  }
  else {
    describe %chJoin -> %nmJoin has joined.
  }
}

on *:join:#:{
  if (%awFlag == 1) {
    .set %checkchan $chan
    var %na $read(automsgchan.txt,w,%checkchan)
    if (%na = %checkchan) { halt }
    else { %chJoin = $chan
      %nmJoin = $nick
      .timerJoin 1 1 autoJoin
    }
  }
}
on *:part:#:{
  if (%awFlag == 1) {
    .set %checkchan $chan
    var %na $read(automsgchan.txt,w,%checkchan)
    if (%na = %checkchan) { halt }
    if ($nick isop $chan) {
      describe $chan -> [MOD] $nick has left.
    }
    else {
      describe $chan -> $nick has left.
    }
  }
}
on *:text:!start auto message:#:{
  %awFlag = 1
  describe $chan Auto join / leave massage started.
  .set %msgchan $chan
  var %na $read(automsgchan.txt,w,%msgchan)
  if (%na = %msgchan) { write -w $+ %msgchan automsgchan.txt 
  }
}

on *:text:!stop auto message:#:{
  describe $chan Auto join / leave message stopped.
  .set %nomsgchan $chan
  var %na $read(automsgchan.txt,w,%nomsgchan)
  if (%na = %nomsgchan) { halt }
  else { write automsgchan.txt $chan 
  }
}
 Respond  
Jethro   -  Dec 11, 2010

It's pathetic of Teen who thinks this is some sort of epic war. I can imagine he'd like people to get down on their knees and kiss his beloved ego. The truth is, his ego is an illusion contrary to the reality that constantly defeats his self-realization.

P.S. Will you stop labeling people already? This is getting old and your insecurity is running rampant in your attempt to submit your alibi over and and over again. It's a vicious cycle you'll never get out of.

 Respond  
_Teen_   -  Dec 11, 2010

well, im not the brown nosin, of ford, I just appreciate your willingness to help,
instead of other guys here, that think its Khaled himself, there are many skilled guys here, who really are interested to help, i really apreciate the ppl who just know a few things on MSL and wants to know more, and help, instead of some guys that dont know nothing like you, and come here to say something of other users

im not an expert, i need to learn many things yet, of course, but i dont act like a GOD here, that instead help ppl, they just criticize others, and dont post any answer for the question...

by the way, this its becoming a chat, i will let u all alone

 Respond  
Luna   -  Dec 11, 2010

Comment numbar 30. :D

 Respond  
blackvenomm666   -  Dec 11, 2010

since when don't i know how to use vars? i use them in a lot of my scripts and all my scripts work the way i inetend them too so that right there nulls that comment. and that bootlicker comment is funny cause your the one brown nosin ford so bad your head is practically up his arse

 Respond  
_Teen_   -  Dec 11, 2010

now the crew is complete, Napa, Jetrho_ and the bootlicker blackvenom ( the guy that dont even know how to use vars )

 Respond  
Tidum   -  Dec 11, 2010

Thank you Teen. Now maybe ryan can learn how to use regex.(and maybe he won't kill us for giving him 20 notices on his snippet) ;)

 Respond  
blackvenomm666   -  Dec 11, 2010

Some of the Best Scriptors come to Hawkee, they spare the time to help people with codes and snippets. We should appreciate all of them Jethro_, napa182, Lawnmowerman, RussellB and Teen lot more not mentioned. ((( Try to get along with each other)))) keep doing a good job helping people

i agree with this one just - the teen

 Respond  
napa182   -  Dec 11, 2010

hahahahaha

who ever said I was the only one that knew sha1 a ton of people know it moron.

 Respond  
_Teen_   -  Dec 11, 2010

i just have something to say to u

4f6513a33733045958726e6367dc91a5b05c1778
b47f363e2b430c0647f14deea3eced9b0ef300ce
2871591e64f027a23fadafaa00305a8bd3484292

ohhhhhh, seems that you're not the only that knows sha1

 Respond  
napa182   -  Dec 11, 2010

the comments on this snippet made me laugh so damn hard.

It's sad that one would get so bent cuz another showed a diff way to go about it. Tough sh**it really. just suck it up an learn from it.

 Respond  
_Teen_   -  Dec 11, 2010

i just explained the regex thing, if some of u wants the entire explanations, tell me, less Jethro_

on $*:text:/^!(start|stop)\sauto message$/iS:#:{
;; the $ on the begin will evaluate the reference, and it means that its a regular expression to be evaluated
;; we start using / then the ^ (anchor) means that,this reference needs to be on the beginning of the command
;; (start|stop) is the referenced text, the on text event, using regular expression, will analize if start or stop is on text after the ! 
;; \s means ''space'' it needs to have a space after the command !start or !stop
;; the $ (dollar sign) here, on the end, means that, this text/reference needs to be the last thing on line
;; so /^!(start|stop) auto message$/ needs to be the only thing on line, starting with !(start|stop) and end with message
;; closing the regular expression references using /
;; ''i'' after the close, means ''ignore all capital letters/uppercase''
;; ''S'' means, ignore all control codes, like colors, bold, underlined, reverse etc

  $iif($regml(1) == start, set $+(%,awflag,#) 1, unset $+(%,awflag,#))
;; if the on text found any match on the references, now $regml(0) its 1, so $regml(1) has a value, its ''start'' or ''stop''
;; the $iif condition will analize if $regml(1) == start, if yes, command 1, else command 2, in this case, else will be the reference ''stop''
;; $regml([name], N)
;; This can be used to reference the back referenced (items enclosed in parentheses) values returned by a call to $regex() or $regsub().
;; $regml explanation retired from the help file from mIRC who explains better

  describe $chan Auto join / leave massage $iif($regml(1) == start, started., stopped)
}

on !*:join:#:{
  if ($($+(%,awflag,#),2) == 1) { .timercheckops 1 1 checkops $nick $chan }
}
alias checkops {
  if ($1 isop $2) { describe $2 -> [MOD] $1 has joined. }
  else { describe $2 -> $1 has joined. }
}

on !*:part:#:{
  if ($($+(%,awflag,#),2) == 1) {
    if $nick isop $chan { describe $chan -> [MOD] $nick has left. }
    else { describe $chan -> $nick has left. }
  }
}
 Respond  
Jethro   -  Dec 11, 2010

Yes, Burrito. But there are times regex can come in handy when matching multiple commands. I was basically reinforcing teen's regex, but he went bananas over me.

 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.