napa182 commented on Comment: Curse Word Dialog - Mar 19, 2013

yeah i will prob not update this snippet as it is an old snippet if anything i will prob just remake a new one later on some time ;x

napa182 commented on Comment: Bible Passage For Bot - Mar 03, 2013

if i have time i may work on that for ya.

napa182 commented on Comment: Facts script - Mar 03, 2013

konsumer doing the snippet that way an you will have abuse. you did away with strips an protections

napa182 commented on mIRC Snippet: Repeat Kick: Version 1 - Mar 03, 2013

1

you would be better off using hash instead of vars, but to each their own.

napa182 commented on Comment: Ultimate Bot Auto Voice Script - Jan 13, 2013

erm posted twice =/

napa182 commented on Comment: Ultimate Bot Auto Voice Script - Jan 13, 2013

kinda a global var nightmare tbh but keep at it...

napa182 commented on mIRC Snippet: Ultimate Bot Auto Voice Script - Jan 13, 2013

kinda a global var nightmare

napa182 commented on mIRC Snippet: Avoid a slap :p - Nov 15, 2012

you should add some sort of flood protection to this or you can be flooded out.
Also you have an extra closing bracket.

napa182 commented on mIRC Snippet: Daffy IRC bot (mSL) - Nov 15, 2012

Plornt they are not really identifiers the are more like triggers.
Lego the snippet is kind of redundant. You should cut out the redundancy an make it more efficient. Keep at it...

napa182 commented on mIRC Snippet: Xbox Live Gamer-Tag Look-Up Socket - Nov 06, 2012

The last xbox live update had screwed a lot of things up besides the dashboard. seems it screwed the site to look-up as well so here is a fast fix using a different site.

copy/paste into a new remote of your bot. trigger is @xbox <gamertag>
Example:

Quote

<napa182> @xbox markmywords ns
<&Sick0> Last seen 4 hours ago playing Trials Evolution
<&Sick0> Online Status: Offline || Xbox Membership: Gold || Zone: Recreation || Country: United States

<napa182> @xbox rising son 13
<&Sick0> Last seen 10/31/2012 playing Modern Warfare® 3
<&Sick0> Online Status: Offline || Xbox Membership: Gold || Zone: Underground || Country: United States

<napa182> @xbox llxNYXxll
<&Sick0> Last seen 15 hours ago playing Modern Warfare® 3
<&Sick0> Online Status: Offline || Xbox Membership: Gold || Zone: Recreation || Country: Australia

<napa182> @xbox StealthyPeer
<&Sick0> Online Status: Offline || Xbox Membership: Silver/Free || Zone: Underground || Country: United Kingdom

		Code 			
on $*:text:/^@xbox\s(.+)/iS:#: {
  if (!%f) { inc -u3 %f
    if ($sock(xbox)) sockclose xbox
    sockopen xbox www.xboxgamertag.com 80
    sockmark xbox $+(/search/,$replace($regml(1),$chr(32),$+($chr(45)))/) $&
      msg #
  }
}
on *:sockopen:xbox: {
  sockwrite -nt xbox GET $gettok($sock(xbox).mark,1,32) HTTP/1.1
  sockwrite -nt xbox Host: $+($sock(xbox).addr,$str($crlf,2))
}
on *:load: {
  echo 12 -a You Have Just Loaded Napa182's Xbox Live Look-up Socket
  echo 07 -a A irc.EzzyChat.com Production
}
on *:sockread:xbox: {
  var %xbox | sockread %xbox
  if ($regex(%xbox,/<p class="topc">(.+)<\/p>/)) {
    $gettok($sock(xbox).mark,2-,32) $regml(1)
  }
  if ($regex(%xbox,/<p>(Online Status:.+)<\/p>/)) {
    $gettok($sock(xbox).mark,2-,32) $regsubex($regml(1),/<[^>]*>/g,$chr(32))
  }
}	

napa182 commented on mIRC Snippet: Powerlevel Script(Updated) - Sep 10, 2012

maybe add apond the set var to use it as a flood pro as well as using maybe the $iff
You should have added to this before you posted it tbh...

		Code 			
on *$:TEXT:/^!powerlevel$/iS:#:{
  if (!%powerlevel) { set -u5 %powerlevel $r(0,10000)
    msg # $iif(%powerlevel > 9000,12it's... It's... It's Over 9000!!!,$nick 12has a powerlevel of 4 %powerlevel 12!!)
  }
}	

napa182 commented on mIRC Snippet: On join entrymsg PM - Sep 10, 2012

=/

napa182 commented on mIRC Snippet: Fun Tweets - Sep 10, 2012

1

No eggdrop. you can either copy an paste this in ur own mirc or a bot's remote.

napa182 commented on mIRC Snippet: Random Riddle an Solution - Aug 18, 2012

This socket still works fine on my end. I don't know why it is doing what you are saying it is doing on yours.

Quote

<~napa182> @riddle
<&Sick0> :[Riddle]: What travels the world but stays in a corner? :[Solution in 10 seconds]:
<&Sick0> :[Solution]: 'A stamp.'

<~napa182> @riddle
<&Sick0> :[Riddle]: Is it legal to bury a man living in Mexico across the border in the United States? :[Solution in 10 seconds]:
<&Sick0> :[Solution]: 'The last time we checked, it was not legal to bury a living man under any circumstances!'

<~napa182> @riddle
<&Sick0> :[Riddle]: A man has 9 children. Half of them are boys. How is this possible? :[Solution in 10 seconds]:
<&Sick0> :[Solution]: 'They are all boys.'

napa182 commented on mIRC Snippet: Facts script - Aug 16, 2012

3

here is a fast socket using the facts you have posted. I used pastebin.com to socket to as it does not go down all that often.
anyways this is just a fast mock up of a working example nothing more..
I hope this can help you in learning sockets or get a better idea about them at the lest.
as always keep coding in msl ;x

		Code 			
on $*:text:/^@facts$/iS:#: {
  if (!$hget(f,f)) {
    if ($sock(fac)) sockclose fac
    sockopen fac pastebin.com 80
    sockmark fac $r(1,100) msg # 11,1WTFact $chr(35)
  }
}
on *:sockopen:fac: {
  sockwrite -nt fac GET /RecUZJge HTTP/1.1
  sockwrite -nt fac Host: $+($sock(fac).addr,$str($crlf,2))
}
on *:sockread:fac: {
  var %fac | sockread %fac
  if ($regex(%fac,/<div class="de\d">(.+)<\/div>/)) {  
    hinc -mu5 f f 1 
    if ($hget(f,f) = $gettok($sock(fac).mark,1,32)) { 
      $+($gettok($sock(fac).mark,2-,32),$hget(f,f),15,$chr(44),1) $+(",$remove($regml(1),&nbsp;,&quot;),") 
      sockclose fac
    } 
  }
}	

example:

Quote

<~napa182> @facts
<~Sick0> WTFact #18 "Human thighbones are stronger than concrete. "
<~napa182> @facts
<~Sick0> WTFact #34 "The human brain cannot create faces. Therefore when you dream, if you see someone you do not know, you have seen their face before. "

napa182 commented on mIRC Snippet: Facts script - Aug 15, 2012

2

would have been better if it was a socket tbh, but to each their own I guess.....

napa182 commented on mIRC Snippet: [Nick Protect/Force Join Protect] - Aug 03, 2012

why so many menus to turn the groups on an off when you can use one to turn say group #forcejoin on an off an so on.
example:

		Code 			
..Turn Fj $iif($group(#forcejoin) = On,Off,On): $+(.,$iif($group(#forcejoin) = On,dis,en),able) #forcejoin	

that way you only need one to turn that group on an off

an looks like you have a typo on line 37 you used !- instead of !=

anyways keep at it.....

napa182 commented on mIRC Snippet: Hopefully Hawkee's First and Formost What The F*** Facts!!! - Jul 13, 2012

What do you mean by first? This is more like them old add/remove/say quote snippets from years back. Anyways nice work an keep at it and you will get sockets down so you can use them in anyway you want..

napa182 commented on mIRC Snippet: Script Help System By JeSTeR - May 24, 2012

why do you have two on sockopen events? an ur last else line is all edited out, you may as well remove it or put it as an on load event.

napa182 commented on mIRC Snippet: Greetings Script - May 19, 2012

1

Quote

It let's you greet people easily.

um not really when you have to scroll looking for a greet. =/

napa182 commented on mIRC Snippet: Epic Slap Script Part 2 - May 19, 2012

heres a fun one I made long ago just a slap with a random item socket. idk maybe someone can take away a diff way to do these rather then using a txt ini or hash file. anyways keep at it..
example:

Quote

* ~napa182 slaps Death around a bit with some Brickhouse Soaps
* ~napa182 slaps Sick0 around a bit with some Leco Butter + Margarine
* ~napa182 slaps Death around a bit with some Ecolab Multipurpose Cleaner Kit

		Code 			
menu nicklist {
  - 
  Slap $+([,$$1,]) {
    if ($sock(item2)) sockclose item2
    sockopen item2 www.globalpackagegallery.com 80
    sockmark item2 describe # slaps $1 around a bit with some
  }
  -
}
on *:load:{
  echo 07 -a You Have Just Loaded Napa182's Slap With A Random Item
  echo 04 -a An Irc.EzzyChat.com Production
}
on *:sockopen:item2: {
  sockwrite -nt item2 GET /main.php/random?g2_albumId= HTTP/1.1
  sockwrite -nt item2 Host: $+($sock(item2).addr,$str($crlf,2))
}
on *:sockread:item2: {
  var %item2 | sockread %item2
  if ($regex(%item2,/^Album:(.+?)\50/)) {
    $sock(item2).mark $replace($regml(1),&amp;,&,&quot;,")
    sockclose item2
  }
}	

napa182 commented on mIRC Snippet: Curse Word Dialog - May 19, 2012

tbh I really don't know how justin.tv is set up as i never been there. So you may have to edit it to ur needs.
Good luck.

napa182 commented on mIRC Snippet: Movie setnow and setnext - May 16, 2012

2

um a small/fast edit to include a timer an i took out that you can't do that message as it is annoying, an i made it say if nothing is set for !now or !next it will now say Nothing set.
As for the timer you will have to put in the amount of seconds for it to change example !swap 30 for 30 seconds an !swap 3600 for an hour

		Code 			
on $*:TEXT:/^!(setn(ow|ext)|swap)\s(.+)$|^!(now|next)$/iS:#:{ 
  if ($nick = $remove(#,$chr(35))) { 
    if ($regml(1) = swap && $regml(2) isnum) { 
      .timermovie1 1 $regml(2) set $+(%,now.,#) $($+(%,next.,#),2) 
      .timermovie2 1 $calc($regml(2) + 1) unset $+(%,next.,#)
      msg # movie in next will swap to now in $regml(2) seconds
    }
    if ($regml(3)) {
      set $+(%,$iif($regml(1) = setnow,now,next),.,#) $regml(3) 
      msg # $iif($regml(1) = setnow,now,next) playing set to: $regml(3) 
    }
  }
  if ($istok(now|next,$regml(1),124) && !%f) { inc -u5 %f
    msg # $iif($($+(%,$regml(1),.,#),2),$v1,Nothing set)
  } 
}	

napa182 commented on mIRC Snippet: Movie setnow and setnext - May 16, 2012

Maybe make it all under one text event, and add a flood pro to the !now an !next trigger so others don't flood the room with it.
Been awhile in coding msl but maybe something like this..
Example:

		Code 			
on $*:TEXT:/^!(setn(ow|ext))\s(.+)|^!(now|next)/iS:#:{ 
  if ($regml(3)) {
    if ($nick = $remove(#,$chr(35))) {
      set $+(%,$iif($regml(1) = setnow,now,next),.,#) $regml(3) 
      msg # $iif($regml(1) = setnow,now,next) playing set to: $regml(3) 
    }
    else { msg # You can't do that. You aren't allowed. }
  }
  if ($istok(now|next,$regml(1),124) && !%f) { inc -u5 %f
    msg # $($+(%,$regml(1),.,#),2)
  } 
}	

napa182 commented on mIRC Snippet: Some Bot Commands - May 12, 2012

Most people that post msl snippets have either a irc channel or a irc server of their own. No need to spam it like that. You can always post the link to it in ur profile.

napa182 commented on mIRC Snippet: Xbox Live Gamer-Tag Look-Up Socket - May 12, 2012

no problem hope it works well for ya...

napa182 commented on mIRC Snippet: Some Bot Commands - May 12, 2012

that scanbug is a tad bit floody an useless

napa182 commented on mIRC Snippet: Xbox Live Gamer-Tag Look-Up Socket - Apr 28, 2012

RobNuts, you did load this onto u bot right? if not it wont work unless you change it to an on input event. an no one meant any sarcasm at all. just trying to figure out why it is not working for you.

Also xbox live's site sometimes seems like it is on crack, but the info it pulls is what the site has.

napa182 commented on mIRC Snippet: Xbox Live Gamer-Tag Look-Up Socket - Apr 27, 2012

yeah I was thinking maybe he is using an older version of mirc, but who knows. I can't help them if they don't tell me whats wrong.

napa182 commented on mIRC Snippet: Xbox Live Gamer-Tag Look-Up Socket - Apr 27, 2012

Hey napalm` long time no talk to. How have you been?

Also RobNuts can you give a reason it is not outputting anything for you?
As it works fine

Quote

<~napa182> @xbox rising son 13
<~Sick0> rising son 13, Last seen 4 minutes ago playing Xbox Dashboard - Gamerscore 6020

<~napa182> @xbox llxNYXxll
<~Sick0> llxNYXxll, Last seen 20 hours ago playing Call of Duty Black Ops - Gamerscore 140

<~napa182> @xbox Th3GrimRipp3r
<~Sick0> Th3GrimRipp3r, Last seen 2 hours ago playing Xbox Dashboard - Gamerscore 925

<~napa182> @xbox Rustyshack760sr
<~Sick0> Rustyshack760sr, Last seen 22 hours ago playing Call of Duty Black Ops - Gamerscore 155

<~napa182> @xbox mendojuggler 17
<~Sick0> mendojuggler 17, Online playing GTA IV - In a Party - Gamerscore 725

<~napa182> @xbox you are calling a moron
<~Sick0> Ooops! I don't know who "you are calling a moron" is. Looks like you may have misspelled the Gamer-tag you are looking for.

Comments

Quote

Code

Code

Quote

Code

Quote

Code

Quote

Quote

Code

Code

Code

Quote

napa182