Puke

Please Register to submit score.

Average Score	7.6
Scores Submitted	8
Date Added	Apr 26, 2008
Last Updated	Apr 26, 2008
Tags	bluethen etc funny puke

Introduction

Looks like someone ate a little too much candy.

Updates:
Added a limit of 300.

Grab the Code

;Puke 1.01
;Made by BlueThen on April 26, 2008.
;To install, paste this snippet into your remotes (alt + r)
;Then type /puke or right click the channel or status and click Puke.
;Then type out how many particles you want (50 to 100 is recommended)
;Bluethen.com :D
menu channel,status {
  Puke: { puke }
}
alias puke {
  set %puke.t $?="Puke Particles:"
  if (%puke.t > 300) { echo 4ERROR! (Either too many, or it's not a number) | halt }
  window -paoCzdk0 +tnbL @Puke -1 -1 400 400 | window -poCzdhk0 +tnbL @puke.buf -1 -1 400 400
  window -poCzdhk0 +tnbL @puke.buf2 -1 -1 400 400 | puke.init
}
alias -l puke.init {
  %puke.x = %puke.t
  while (%puke.x > 0) {
    hadd -m %puke.x $+ y a $r(1,360) | hadd -m %puke.x $+ y s $r(5,10) | hadd -m %puke.x $+ y d $r(150,200) 
    hadd -m %puke.x $+ y c $rgb($r(1,255) ,$r(1,255) ,$r(1,255)) | hadd -m %puke.x $+ y p $r(2,20) | dec %puke.x
  }
  puke.frame
}
on *:close:@puke: window -c @puke.buf | window -c @puke.buf2 | set %puke.c y | unset %puke.x %puke.t
alias -l puke.frame {
  if (%puke.c != y) {
    clear @puke.buf | clear @puke.buf2 | drawfill @puke.buf2 0 0 1 1 1 | drawdot @puke.buf2 7 150 0 175
    drawdot -r @puke.buf2 16777215 50 100 250 | drawdot -r @puke.buf2 16777215 37.5 62.5 125
    drawdot @puke.buf2 1 20 62.5 125 | drawfill @puke.buf 0 0 1 1 1 | drawfill @puke 0 0 1 1 1 | %puke.x = %puke.t
    drawtext @puke.buf 1 Tahoma 20 200 50 Made By BlueThen | drawtext @puke.buf 1 Tahoma 20 200 70 BlueThen.com  
    while (%puke.x > 0) {
      drawdot -r @puke.buf $hget(%puke.x $+ y ,c) $hget(%puke.x $+ y ,s) $calc(0 + ($hget(%puke.x $+ y ,d) * $cos($hget(%puke.x $+ y ,a)).deg)) $calc(400 + ($hget(%puke.x $+ y ,d) * $sin($hget(%puke.x $+ y ,a)).deg))
      hinc %puke.x $+ y a $hget(%puke.x $+ y ,s) | dec %puke.x
    }
    drawcopy -mt @puke.buf2 16777215 0 0 400 400 @puke.buf 0 0 400 400 | drawcopy -m @puke.buf 0 0 400 400 @puke 0 0 400 400 | .timer -mo 1 0 puke.frame
  }
  else unset %puke.c
}

Comments

(10) RSS

Go to Bottom

BlueThen

Comments: 231

mIRC Snippet: Puke
Posted on Apr 26, 2008 10:48 am

Delicious!

Bouncer

Comments: 121

mIRC Snippet: Puke
Posted on Apr 26, 2008 10:53 am

Lol, so creative. :P

Comments: 795

mIRC Snippet: Puke
Posted on Apr 26, 2008 11:01 am

Ha yeah thats fun =/ you should really add a limit on the amount of particles =/i crashed my mIRC LOL i did to many and halt breaking is a pain.Cool tho BT WD.`-.-�

BlueThen

Comments: 231

mIRC Snippet: Puke
Posted on Apr 26, 2008 11:08 am

Done. :P

jonesy44

Comments: 614

mIRC Snippet: Puke
Posted on Apr 26, 2008 11:42 am

This made me LOL so much! haha, creative too xP

Great work lol 10/10 bud xD

Eugenio

Comments: 462

mIRC Snippet: Puke
Posted on Apr 26, 2008 12:49 pm

lmfao I gave 10/10 for this one.

Mitchell

Comments: 22

mIRC Snippet: Puke
Posted on Apr 27, 2008 7:04 pm

although it isn't something I'd use every day, it is very creative and well done! 10/10 for you :) got any others? :D

Comments: 795

mIRC Snippet: Puke
Posted on Apr 27, 2008 7:17 pm

Click on code snippets under his DP on the top right of this page.Ther eunder friends.Hes got some neat picwins if you liked this you d like those.`-.-�

BlueThen

Comments: 231

mIRC Snippet: Puke
Posted on Apr 27, 2008 7:24 pm

Yeah. http://www.hawkee.com/snippets/user/37047/

If you're even more interested, you can register and post your scripts at bluethen.com :D (please? :( )

Comments: 795

mIRC Snippet: Puke
Posted on May 4, 2008 12:17 am

WEWT !@#$ spitin image BT :P

Puke

Introduction

Grab the Code

Comments

BlueThen

My Snippet Tags

Contact

Friends (8)

Sponsors

		Everything and Anything (8th Grade)
Last seen: Jul 04, 2008 Profile \| Website Friends (8) Snippets (35) Images (39) Comments Received (491) Comments Submitted (231) Forum Posts (88)