Top

Insult Script (Random Insult Generator)


mIRC Code
+ 1 likes
Please Register to submit score.
Bookmark and Share
Average Score  8.0 (of 1 scores)
Date Added  Jul 07, 2009
Last Updated  Jul 07, 2009
Tags  bot  generator  ini  insult  random  socket 

Introduction

My first script where i experimented with writeini and readini
Seemed to have worked out pretty well :D
Pulls insults from http://www.randominsults.net/
If you have any improvements at all please post

!insult = Insult Your self xD
!insult <nick> = Insult that person

Eg:

<~ES> !insult
<~^o0^> • ES: Save your breath... you'll need it to blow up your date. • [Times Insulted: 12]
<~ES> !insult ^o0^
<^o0^> • ^o0^: Your face reminds me of a movie star. Lassie! • [Times Insulted: 1]

Grab the Code

on *:TEXT:!insult*:#: {
  sockopen insulter www.randominsults.net 80
  if ($rand(1,10) == 1) set %insultee $nick
  elseif ($2) set %insultee $2-
  else set %insultee $nick
  set %insulterchan $chan
  writeini insult.ini insults %insultee $calc($readini(insult.ini,insults,%insultee) + $chr(49))
  set %timesinsul $readini(insult.ini,insults,%insultee)
} 
on *:sockopen:insulter: {
  sockwrite -n $sockname GET / HTTP/2.0
  sockwrite -n $sockname Host: www.randominsults.net
  sockwrite -n $sockname Connection: close
  sockwrite -n $sockname $crlf
} 
on *:sockread:insulter: {
  sockread %insulterpage
  if (<i> isin %insulterpage) {
    set %insulterquote $nohtml(%insulterpage)
  } 
}
on *:sockclose:insulter: {
  msg %insulterchan 10•04 %insultee $+ $chr(58)  %insulterquote 10• 14[Times Insulted: %timesinsul $+ $chr(93)
}
alias nohtml {
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)
  return %x
}
 

Comments

  (1)  RSS
uneek
Comments: 26
 
mIRC Snippet:  Insult Script (Random Insult Generator)
Posted on Jul 8, 2009 12:28 am
Works as described..I also really like the keeping track of times insulted.

Thanks

Commenting Options

Register or Login to Hawkee.com or use your Facebook or Twitter account by clicking the corresponding button below.

  
Bottom