sunslayer commented on mIRC Snippet: mIRC Paint - Dec 30, 2009

i dont mind

sunslayer commented on mIRC Snippet: Yo dawg - Dec 30, 2009

/win

sunslayer commented on mIRC Snippet: Yo dawg - Dec 30, 2009

		Code 			
$iif(($2 isnum 1- $+ $lines(yodawg.txt)),$read(yodawg.txt,$2),$read(yodawg.txt))	

can be

		Code 			
$iif($read(yodawg.txt,$2),$v1,$read(yodawg.txt))	

Quote

4. Never use $chan try to use # as it is faster and simpler.

there are multiple situations where $chan should be used, like $chan(#).mode/topic/key/limit/ial, $chan(0), $chan(1) etc

sunslayer commented on mIRC Snippet: Nick Changer - Dec 30, 2009

no idea, but

Quote

IT'S A LIST WOW DOESN'T NEED TO BE IN ANY ORDER FFS!

i may be wrong but i don't think hashes are in any specific order?

sunslayer commented on mIRC Snippet: Nick Changer - Dec 30, 2009

Quote

Horses for courses.

lol'd

sunslayer commented on mIRC Snippet: Script and computer stats - Dec 30, 2009

no need for the first $+ in the beginning of each line

sunslayer commented on mIRC Snippet: Picwin Hangman - Dec 29, 2009

Quote

+ 1 likes

Quote

6/10 + like!

Quote

7/10 + like too!

lulz some1 is liers
would be nice if there was a socket to somewhere that had some questions/answers

sunslayer commented on PHP Snippet: IRC bot that needs help - Dec 29, 2009

if you need help you should have used the forums
you need an extra } at the end of the class and the reason why it wont login is because of ur syntax in IRCBot::login u only gave 3 parameters, u need atleast 5 for the USER cmd

sunslayer commented on mIRC Snippet: Computer Info - Dec 29, 2009

im not sure how hard you looked but i got this in about 10 seconds
http://www.hawkee.com/view.php?file_id=414

sunslayer commented on mIRC Snippet: Computer Info - Dec 27, 2009

@ slippy090

Quote

Erm, you have to download it. Google it.

sunslayer commented on mIRC Snippet: World of Warcraft Armory Search - Dec 27, 2009

		Code 			
    unset %realm
    unset %name	

can be

		Code 			
unset %realm %name	

but its best to use /var when your staying within one alias or event

sunslayer commented on mIRC Snippet: YouTube Search - Dec 27, 2009

you should use /var instead of /set so you don't need to unset it
the first 2 if statements are unneeded as $replace($1-,$chr(32),+) will only change the space character and not any other

		Code 			
else if ($1 == $null) { echo nothing entered, halting } { halt } 	

should be

		Code 			
else if ($1 == $null) { echo nothing entered, halting | halt } 	

but the halt is redundant.

		Code 			
alias yt {
  var %ytsearch = $replace($1-,$chr(32),+)
  if (%ytsearch) { run http://www.youtube.com/results?search_query= $+ %ytsearch }
  else { echo -a nothing entered, halting }
}	

is a simpler way to do it

sunslayer commented on mIRC Snippet: Thottbot Search - Dec 27, 2009

no need for the if/else

		Code 			
alias thottbot {
 run http://www.thottbot.com/?s= $+ $replace($1-,$chr(32),+)
}	

will work fine

sunslayer commented on PHP Snippet: Google Translator - Dec 09, 2009

:p my bad

sunslayer commented on PHP Snippet: Google Translator - Dec 08, 2009

updated
they've been updating their site quit a bit recently

sunslayer commented on mIRC Snippet: $caps Identifier - Dec 07, 2009

@RJosh, true but i would use * instead of + so it will match singe lettered words

sunslayer commented on mIRC Snippet: $caps Identifier - Dec 07, 2009

@Testor thats because Nick-away is one word :p

		Code 			
$regsubex($1-,/(\w)(.+?)(\W|\b)/g,$+($upper(\1),$lower(\2),\3))	

will separate words by any non alphanumeric char

Quote

And if you Lower the whole string, then new sentences are all also lower cased, unless it actually does that o.O.

if your referring to

		Code 			
$lower(\2)	

that doesn't lower the whole string, just $right($1,-1)

sunslayer commented on mIRC Snippet: $caps Identifier - Dec 07, 2009

		Code 			
$regsubex($1-,/(\w)(.+?)(\W)/g,$+($upper(\1),$lower(\2),\3))	

will capitalize the first letter and make the rest of the word lowercase for each word which looks better imo

sunslayer commented on mIRC Snippet: Bomb Dialog - Dec 06, 2009

VinX there are already bot versions
http://www.hawkee.com/snippet/6273/ is one

sunslayer commented on mIRC Snippet: Bomb Dialog - Dec 06, 2009

@SnoooP,Ghost-writer comments to troll i wouldn't consider anything he says to be readworthy as generally he doesnt even know wtf he talkin bout either

Quote

gets a 4 imo, its been done before you just put it in a dialog, WOW?

Ghost-writer's Bomb snippet
i find it lulzworthy u can say that when he made a dialog version that is shorter then your text event version, but atleast you didnt "bracket abuse it", o wait...

sunslayer commented on PHP Snippet: PHPTok - Dec 06, 2009

using RJosh's example i got this

		Code 			
	function gettok($string,$n,$c) {
      if(is_numeric($c)) $c=chr($c);
      $tok=explode($c,$string);
      if($n==0) return count($tok);
      elseif($n<0) {
         $tok=array_reverse($tok);
         return $tok[lasttok($n+1,"-")];
      }
      elseif(preg_match("/(\d+)-(\d+)?/",$n,$range)) {
        $start=$range[1]-1;
        if (!$range[2]) $end=numtok($string,$c);
        else $end=$range[2];
        for(;$start<$end;$start++,$text.=$tok[$start-1].$c);
        return $text;
      }
      else return $tok[$n-1];
    }	

supports negative and multiple ranges

sunslayer commented on PHP Snippet: PHPTok - Dec 06, 2009

@RJosh

		Code 			
$tok = explode($string,$c);	

$c should come before $string and your missing a few semicolons
the code doesn't work for negative ranges either

sunslayer commented on PHP Snippet: PHPTok - Dec 05, 2009

		Code 			
	function findtok($text,$token,$n,$c) {
	  $text=explode($c,$text);
	  foreach ($text as $num => $match) 
	    if ($match==$token) $all.=$num+1 ." ";
	  $a=numtok($all," ");
	  if ($n!=0&&$n<=$a) return gettok($all,$c,$n);
	  else return $a-1;
	}
	function reptok ($text,$token,$new,$n,$c) {
	  $text=explode($c,$text);
      foreach ($text as $num => $match) {
	    if ($match==$token) {
	      $a++;
	      if ($a==$n||$n==0) $text[$num]=$new;
	    }
      }
	  return implode($c,$text);
	}
	function regtok($text,$string,$n,$c) {
	  $text=explode($c,$text);
	  foreach ($text as $num => $match)
	    if (preg_match($string,$match)) $all.=$num+1 ." ";
	  $a=numtok($all," ");
	  if ($n!=0&&$n<=$a) return gettok($all,$c,$n);
	  else return $a-1;
	}	

they all follow same syntax as mIRC
you can use regtok for wildtok just add a '/' before and after the wildcard string

sunslayer commented on mIRC Snippet: ASCII evaluator v2 - Dec 03, 2009

Quote

P.S. I think sunslayer has those two aliases reversed

srry, i suffer from a severe case of dyslexia...

sunslayer commented on Python Snippet: mask() - Dec 02, 2009

shot in the dark here but... couldn't you just use regex to split up the host name and just replace the back references with a wildcard?

sunslayer commented on mIRC Snippet: ASCII evaluator v2 - Dec 01, 2009

i beat napa to the napa :O

sunslayer commented on mIRC Snippet: ASCII evaluator v2 - Dec 01, 2009

@Testor $addtok will only work if the token doesn't already exist, you can use $instok but using regex is much faster and simpler

		Code 			
alias ascii { echo -a 7CHR: $regsubex($1-,/(.)/g,$+($!chr,$chr(40),\t,$chr(41) = $asc(\t) $iif(\n != \0,$chr(44)))) }	

		Code 			
alias char { echo -a 07ASCII: $regsubex($1-,/(\d+)(?=(?:\W)+|.*)/g,$+($!asc,$chr(40),\t,$chr(41) = $chr(\t) $iif(\n != \0,$chr(44)))) }
	

sunslayer commented on mIRC Snippet: Bitly url shortener - Nov 29, 2009

Quote

btw, z.pe is the shortest URL shortener ever to exist.

thats what she said.

you should probably check to make sure that they are putting a url and not just some text

sunslayer commented on mIRC Snippet: Kings of Chaos Stats calclulator - Nov 28, 2009

you should use /var as opposed to /set so there is no need to unset %calc*
you could save yourself a lot of lines if you use an alias to calc %calc2-4 instead

		Code 			
on *:TEXT:!csa*:#:{
  if ($2 == Flaming) { noop $csa($calc(( $3 *5*12000)*1.333),$nick) }
  elseif ($2 == Ballistas) { noop $csa($calc(( $3 *5*12000)*1.667),$nick) }
}
alias csa {
  var %calc = $1,%calc2 = $bytes($calc( %calc * 1.5),b),%calc3 = $bytes($calc( %calc * 1.3),b),%calc4 = $bytes( %calc,b)
  .notice $2 Your Sa with Other is: %calc4
  .notice $2 Your Sa with Orcs is: %calc2
  .notice $2 Your Sa with Undead is: %calc3
}	

is an example it shouldn't be that hard to add the rest

sunslayer commented on mIRC Snippet: Query Responder - Nov 28, 2009

Quote

I fail to see your flood protection.

		Code 			
var -u6 %flood flood	

sets %flood for 6 seconds before it is unset and

		Code 			
if (!%flood) {	

prevents the code from processing if %flood is $true

		Code 			
if ($nick !== $me)	

you can simply use the ! event prefix instead of the /if
and @Master-Of-Death

		Code 			
on *:OPEN:?:*:{ if ($away == $true) {
.halt
.msg $nick I am away, I'll respond when I can. [amsg]
}
elseif ($away == $false) {
.msg $nick I have been idle for $duration($idle) i'll respond when I return. [amsg]
}
}	

will only trigger if the person is not away, /halt stops all processing of the script so

		Code 			
.msg $nick I am away, I'll respond when I can. [amsg]	

will never trigger.
there is no need to silince /halt either as it doesn't output anything anyways
also instead of using

		Code 			
if ($away == $true)	

and

		Code 			
($away == $false)	

you can shorten it with the '!' to negate it

		Code 			
if ($away)	

and

		Code 			
if (!$away)	

Comments

Code

Code

Quote

Quote

Quote

Quote

Quote

Quote

Quote

Code

Code

Code

Code

Code

Code

Code

Quote

Code

Code

Quote

Code

Code

Code

Quote

Code

Code

Quote

Code

Quote

Code

Code

Code

Code

Code

Code

Code

Code

Code

sunslayer