Top

Garbagebag


mIRC Code
+ 0 likes
Please Register to submit score.
Bookmark and Share
Average Score  0.0 (of 0 scores)
Date Added  May 11, 2009
Last Updated  May 11, 2009
Tags  game  games  giveaway 

Introduction

this script i have been working on for about a week its sorta a giveaway script i ran it on my mirc and it worked so i thought i would post it see what you all thought could also be used as a santa's bag

Grab the Code

on *:text:!Garbagebag:#:{
set %GB $rand(1,3)
if (%GB == 1) { describe # pulls a Small gift out of his Garbagebag and Tosses it at $nick }
if (%GB == 2) { describe # pulls a few packages out of his Garbagebag it hit's $nick in the chest }
if (%GB == 3) { describe # pulls out a huge Gift and tosses it to $nick }
unset %gb
}

Comments

  (55)  RSS
Cheiron
Comments: 627
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 2:46 pm
you need to remove the no= bits btw and you are missing closing brackets also. you are close to getting this snippet right though. i will post an example one for you so you can see a correct method.. look at it, see how it is done and then edit yours so it is correct. call it a learning help :)

Code:

#bu on
on *:TEXT:*!bu*:#channelname:{
  var %bu = $rand(1,12)
  .msg $chan 12,14 $nick wants to show some appreciation for the dj.
  if (%bu == 1) .timer 1 2 msg $chan 2,0 «»«»«»«»«»«» Big Thumbs Up for the DJ.«»«»«»«»«»«
  if (%bu == 2) .timer 1 2 msg $chan 1,7 ~»º}©{º«~ Goddamm what a tune DJ !!! ~»º}©{º«~
 if (%bu == 3) .timer 1 2 msg $chan 11,1©º°¨¨°º©©º°¨¨°º©4 Tune-a-rific!! 11©º°¨¨°º©©º°¨¨°º©
  if (%bu == 4) .timer 1 2 msg $chan 13,0 °*.¡.*°*.¡.*°°*.¡.*°*.i.*°°*.¡.*°*. Give it up for the DJ! °*.¡.*°*.¡.*°°*.¡.*°*.¡.*°°*.¡.*°*.¡.*°°*.¡.*°
 if (%bu == 5) .timer 1 2 msg $chan 14,1.04.4.7.:8::0 Totally Top Tune!!! 8::7:.4.04.14,1.
  if (%bu == 6) .timer 1 2 msg $chan 10,0 ^Å^ x ^Å^ ¤ ^Å^{{ Better Music than anywhere on earth! }}^Å^ ¤ ^Å^ x ^Å^
  if (%bu == 7) .timer 1 2 msg $chan 5,0 °º©o¿,,¿o©º°¨¨°º© Damm this DJ Rocks! ©º°¨¨°º©o¿,,¿o©º°
  if (%bu == 8) .timer 1 2 msg $chan 8,1 (¯`·.,¸¸.·´¯`·.¸¸.-> 3,1Lets Hear it for the DJ!8,1 <-.¸¸.·´¯`·.¸¸.·´¯)
  if (%bu == 9) .timer 1 2 msg $chan 9,1 *~~~~~#####> The DJ is putting on one hell of a show folks *~~~~~#####>
  if (%bu == 10) .timer 1 2 msg $chan 3,1 _\|/_  4,1.»º}®{º«..º}®{º«.1,0Show Some Total respect for the hard work for the DJ today 4,1.»º}®{º«..»º} ®{º«.3,1  _\|/_
 if (%bu == 11) .timer 1 2 msg $chan 4,0 (¯`'·.¸(¯`'·.¸| 1,4A huge Thank you to all the DJ's here from the Channel's Radio 4,0 |¸.·'´¯)¸.·'´¯)
  if (%bu == 12) .timer 1 2 msg $chan 4,2/2,8!4,2\ 11,2Turn This Tune Up, It ROCKS!! 4/2,8!4,2\
}
#bu off
RevJohn Straub
Comments: 46
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 2:53 pm
i seen my misstakes and im fixing them now

RevJohn Straub
Comments: 46
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 3:02 pm
it should work better now

Kirby
Comments: 475
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 3:12 pm
You need to /set global variables; instead, you can /var local variables, if you use the method that you are using right now.
Instead, you can just simply use tokens.

Code:
on *:text:!Garbagebag:#:{
set %GB $rand(1,3)
if (%GB == 1) { describe # pulls a Small gift out of his Garbagebag and Tosses it at $nick }
if (%GB == 2) { describe # pulls a few packages out of his Garbagebag it hit's $nick in the chest }
if (%GB == 3) { describe # pulls out a huge Gift and tosses it to $nick }
unset %gb
}
can be changed to:
Code:
on $*:text:/^[.!@](Garbagebag)/Si:#:{
  describe # pulls $gettok(a Small gift out of his $regml(1) and Tosses it at| a few packages out of his $regml(1) and Tosses it at|out a huge Gift and tosses it to,$r(1,3),124) $nick
}
or:
Code:
on $*:text:/^[.!@](Garbagebag)/Si:#:{
  var %x a Small gift out of his $regml(1) and Tosses it at| a few packages out of his $regml(1) and Tosses it at|out a huge Gift and tosses it to
  describe # pulls $gettok(%x,$r(1,$numtok(%x,124)),124) $nick
}


/help Token identifiers for more information on tokens.
^Neptune
Comments: 598
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 3:34 pm
Um.. you're imposing regex on a beginner? :|
RevJohn Straub
Comments: 46
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 3:40 pm
this is my second script and i dont mind being tought something it may be helpfull in more codeing i do
PATX
Comments: 390
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 3:51 pm
lol but u need to read a tut. u cant just jump into that, and if ur a begainer then u can stick with the global var for now. also this reminds me of a Weasel script.... idk....
Kirby
Comments: 475
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 3:53 pm
Here's a quick lesson on tokens.

Code:
on $*:text:/^[.!@](Garbagebag)/Si:#:{
  var %x a Small gift out of his $regml(1) and Tosses it at| a few packages out of his $regml(1) and Tosses it at|out a huge Gift and tosses it to
  describe # pulls $gettok(%x,$r(1,$numtok(%x,124)),124) $nick
}


Basically, %x is a variable that stores 3 different kinds of information, separated by |'s ($chr(120)'s). There are three |'s in the variable, hence 3 tokens.

Here comes the larger part.

$gettok or, getting the tokens, can be used to retrieve desired tokens from a string.
Syntax: $gettok(string,N,C), where in this case the string is %x, the N (numbers) is a random number between 1 ~ 3 (because you only have 3 tokens), and C is the |, or $chr(124).

$numtok can be used to retrieve the total # of tokens in a string.
Syntax: $numtok(string,C).
I could've just put 3 in the $r(1,____), but $numtok would be safer in this case because you could've added more items to the variable, %x.

Finally, what's the $regml(1)? If you take a look at on $*:text:/^[.!@](Garbagebag)/Si:#:{, you can see a parentheses around "Garbagebag". This means that in the regex string in the text event, it will take "Garbagebag" as the $regml.
I just thought it would be tedious to write "Garbagebag" every single time.
Also, the /Si means "Strip" and "in-case-sensitive" - it strips the given text and treats it as not case sensitive.
And, ^[.!@] means that the command names can be a period, an exclamation point, or a @ sign. ^ means that it start with the subsequent text, which is the [.!@].

Other than that, it should be pretty self-explanatory. :P

(Sorry that I went into the regex's).
Aucun50
Comments: 548
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 7:21 pm
Good explanation of tokens kirby good to learn them and use them when starting scripting although it might seem hard.

I see you have unset after your if's try in the var something like "set -u10 %GB $r(1,3)" that will unset the var after 10 seconds. Also maybe use elseif after your first if statement good to get into that habit.
napa182
Comments: 1,454
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 9:47 pm
Aucun50 there is no need to do "set -u10 %GB $r(1,3)" if they would use a local var instead of a global.
Aucun50
Comments: 548
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 9:58 pm
As far as i see he was using a global var with unset after the if's, unless he was going to change it. Also i have had problems when using local vars with $r in the past they work sometimes then stop working randomly, that could be my mirc acting up I'm not sure most people use global vars for $r.
napa182
Comments: 1,454
 
mIRC Snippet:  Garbagebag
Posted on May 11, 2009 10:02 pm
iv never had a problem with useing local vars with $r
also i didnt say they used a local i said if they would use a local.
NIGathan
Comments: 208
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 5:05 am
Aucun50: Maybe your var was being used as a local and global var..
WorldDMT
Comments: 171
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 12:03 pm
hi

sorry i don't speak verry well english :p

@Kirby: if we have 15 or more tigers what we'll do? a $gettok with all that tigers? no!!

@Cheiron: if we get the variable %bu = 12 the code will calculate 12 time before gate the true condition

better use an alias with goto and don't forget $strip cz some user use a color text, bold or underline and that will don't execute the event

Code:
on *:text:*:#:if ($stirp($1) == !Garbagebag) xbag

alias -l xbag {
  goto $r(1,3)
  :1
  describe # pulls a Small gift out of his Garbagebag and Tosses it at $nick
  return
  2:
  describe # pulls a few packages out of his Garbagebag it hit's $nick in the chest
  return
  3:
  describe # pulls out a huge Gift and tosses it to $nick
  return
}


u can add up to 1000 words and u'll have just one condition

or else easier u can put the words into a file.txt and use $read

Code:
on *:text:*:#:if ($stirp($1) == !Garbagebag) $read(file.txt)


$read wil read rondomly the words into the file.txt
Cheiron
Comments: 627
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 12:50 pm
mine was an example only of a working code using a variable combined with a random factor.. mine had 12 random lines of which when the command was issued, it would choose one of those 12 at random. it was not there as a replacement for him, more of a pointer as to how brackets worked (which he was originally missing) and how a basic variable was set.
Kirby
Comments: 475
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 2:59 pm
Quote:
@Kirby: if we have 15 or more tigers what we'll do? a $gettok with all that tigers? no!!
...
better use an alias with goto and don't forget $strip cz some user use a color text, bold or underline and that will don't execute the event


Take a look at what you're saying.
Code:
alias -l xbag {
  goto $r(1,3)
  :1
...

Why would you make a separate alias just for that? Thus, it's using an unnecessary goto loop...
^Neptune
Comments: 598
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 5:56 pm
Weasel
Comments: 117
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 6:17 pm
Wow.... More stupid than what i make
napa182
Comments: 1,454
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 6:26 pm
Weasel.. "Nothing is more stupid then what you make."

At lest we can tell that RevJohn Straub is trying to learn. Unlike you Weasel, all you do is rip things out from other peoples codes then try to pass them off as ur own, but the funny thing about that is you cant even do that right. Just sad Weasel...
Weasel
Comments: 117
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 6:35 pm
DUDE I MAKE MY OWN! WOW, The ppl at hawkee are total Nubs/idiots
napa182
Comments: 1,454
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 6:45 pm
Weasel you are an Utter Moron and a joke. I'm surpized you have mental capacity to breath let alone comment on here.
Jethro_
Comments: 436
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 6:58 pm
Also, Weasel, deleting posts at your own thread is an act of cowardice.
RevJohn Straub
Comments: 46
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 7:03 pm
Weasel your an idiot thats why im not responding to your comments i will keep scripting the way i script wheather you like i scripts or not i dont care
MaxEvans
Comments: 89
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 8:37 pm
Weasel calls everyone here nubs? Most of the people I've met on here including Kirby, Jethro_, Neptune^, etc are seriously brilliant when it comes to scripting. When all Weasel does is posts the same script over and over with different content. That is sad. And, RevJohn Straub, this script isn't too bad. =]
Aucun50
Comments: 548
 
mIRC Snippet:  Garbagebag
Posted on May 12, 2009 10:11 pm
"DUDE I MAKE MY OWN! WOW, The ppl at hawkee are total Nubs/idiots"

I would have to disagree, most of the people here have tried at one point to help you and have given you some good advice yet you ignore 90% of it and continue to post the same things over and over. I guess what I'm saying is you need to get of your high horse and listen every now and then, almost everyone is tried of opening there hawkee page to find yet another script that doesn't need to be posted.

I like that your trying Weasel but you don't need to post everything you made.
WorldDMT
Comments: 171
 
mIRC Snippet:  Garbagebag
Posted on May 13, 2009 5:17 am
Quote:
Why would you make a separate alias just for that? Thus, it's using an unnecessary goto loop...


i used an alias just for make the code more readable u can make the goto into the event

i used goto to get easer street without too much calculate conditions to find the true

but i also say the $read identifier is better for this case
PATX
Comments: 390
 
mIRC Snippet:  Garbagebag
Posted on May 13, 2009 3:12 pm
Weasel: this is the same thing u make...
MaxEvans
Comments: 89
 
mIRC Snippet:  Garbagebag
Posted on May 13, 2009 3:40 pm
Only difference is, this has a bit more creativity.
RevJohn Straub
Comments: 46
 
mIRC Snippet:  Garbagebag
Posted on May 13, 2009 3:41 pm
ty Max

MaxEvans
Comments: 89
 
mIRC Snippet:  Garbagebag
Posted on May 13, 2009 3:42 pm
Yw =]
Kirby
Comments: 475
 
mIRC Snippet:  Garbagebag
Posted on May 13, 2009 4:27 pm
Quote:
i used an alias just for make the code more readable u can make the goto into the event

i used goto to get easer street without too much calculate conditions to find the true

but i also say the $read identifier is better for this case

To be honest, you would only use $read for reading typically larger amounts of information. Otherwise, I think tokens would be better than making a separate alias for it. It's just what I think.
Also, instead of $strip($1) that you used, you could just change the text event a bit:
Code:
on $*:text:/^[.!@]garbagebag/Si:#: {

All the characters [.!@] is unnecessary, but I put it there as an extra precaution; not everybody likes to use the same trigger.
Weasel
Comments: 117
 
mIRC Snippet:  Garbagebag
Posted on May 13, 2009 5:42 pm
Max, WTC??
i think penguins of madagascar thing is creative, can i have a direct link to post a snippet?
RevJohn Straub
Comments: 46
 
mIRC Snippet:  Garbagebag
Posted on May 13, 2009 6:21 pm
no weasel you can if he wanted a snipit im sure he would have made it himself
mkbln7
Comments: 7
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 11:39 am
You can actually make the script part of this shorter if you use a .txt file.
For instance, say you used the filename gb.txt

Code:

on *:text:!Garbagebag:#: {
msg $chan $read($shortfn($mircdir) $+ gb.txt)
}


But that would only be really good if you were going to add more than 3 lines to it.
WorldDMT
Comments: 171
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 12:15 pm
that a was say before

Quote:
but i also say the $read identifier is better for this case
napa182
Comments: 1,454
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 1:48 pm
no point in useing a txt file for 3 lines. just go with the tokens for this. unless you are going to add a ton more lines then yeah a txt would work better.

also add some flood pros to it maybe sothing like this as an example:

Code:
on $*:text:/^@bag$/iS:#:{
  if (!$($+(%,bagflood,.,$nick),2)) {
    set -u3 $+(%,bagflood,.,$nick) on
    describe # pulls $gettok(a Small gift.a few packages.a huge Gift,$r(1,3),46) out of his Bag and Tosses it at $nick
  }
}
jonesy44
Comments: 1,856
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 1:52 pm
"working on for about a week" are you kidding me?
napa182
Comments: 1,454
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 1:55 pm
jonesy44, RevJohn Straub is new to scripting..
jonesy44
Comments: 1,856
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 3:10 pm
lol,fe.
WorldDMT
Comments: 171
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 3:14 pm
Quote:
no point in useing a txt file for 3 lines


yes i say that because i saw the comment of Cheiron i saw 12 lines

and i give an exemple if he want add more words
RevJohn Straub
Comments: 46
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 3:35 pm
i have a 5 year old son to raise not to include my resturant that i own and run and then there is a catering business that i also run
Kirbeh_Pr0nz
Comments: 144
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 6:55 pm
/me claps.
Im a Highschool student taking care of my parents and nephew.
Anyone else having a Dr. Phil moment?
Prelude
Comments: 99
 
mIRC Snippet:  Garbagebag
Posted on May 14, 2009 7:12 pm
Really Kirbeh_fails?, you're gunna mock someone for having a life?, other then learning a useless coding language?, lol you have balls. Ima be lite today, so as for the rest of you that think this code sucks LOL guess what?!?!, this is where you ALL started (myself included;p), just cause you're no longer a ''noob'' doesn't mean you should think you're bad ass. Think of how much time you waste?, honestly grow up, it's supposed to be FUN, most of you take it too serious. >D.

@Weasel: ''it's knock knock time Rico!'', moron you can't even post snippets correctly you fú©k, go play and stop trolling and tryin to make friends on the internet.

For those that try to help, well done.

P.s: AJ stfu;p
jonesy44
Comments: 1,856
 
mIRC Snippet:  Garbagebag
Posted on May 15, 2009 10:48 am
Prelude, on yer knees, get suckin
RevJohn Straub
Comments: 46
 
mIRC Snippet:  Garbagebag
Posted on May 15, 2009 12:01 pm
jonesy44 my 5 year old makes better scripts then you and Weasel together
jonesy44
Comments: 1,856
 
mIRC Snippet:  Garbagebag
Posted on May 15, 2009 2:39 pm
lol, have you even looked at any of my scripts?
MaxEvans
Comments: 89
 
mIRC Snippet:  Garbagebag
Posted on May 15, 2009 2:47 pm
Umm, Rev, jonesy's scripts are really good. So don't go bashing him.
Cheiron
Comments: 627
 
mIRC Snippet:  Garbagebag
Posted on May 15, 2009 2:54 pm
jonesy is one of the more respected scripters here on hawkee alongside napa, nathan and a few others.. if slips of the tongue can be ignored that is.... for we all have our moments of bashing other people. their coding is to be learned from and they can help you alot.
MaxEvans
Comments: 89
 
mIRC Snippet:  Garbagebag
Posted on May 15, 2009 3:17 pm
I agree fully with you, Cheiron. To me bashing is very immature and stupid. I respect all the ones who know more than me, and I learn from their advice. =]
napa182
Comments: 1,454
 
mIRC Snippet:  Garbagebag
Posted on May 15, 2009 3:20 pm
yawns...

he said that as a joke cuz of what jonesy said to Dan so get over it...
Kirby
Comments: 475
 
mIRC Snippet:  Garbagebag
Posted on May 15, 2009 4:07 pm
Stop giving me notices!!!
OMG!?!? ;o
jonesy44
Comments: 1,856
 
mIRC Snippet:  Garbagebag
Posted on May 16, 2009 8:45 am
RevJohn Straub, we coo'? I'm up for a good ol' e-hug >..
Prelude
Comments: 99
 
mIRC Snippet:  Garbagebag
Posted on May 16, 2009 9:13 am
Oh lol i didnt expect a reply, tisk tisk AJ.

Quote:

[6:37:PM:Fri] * Nemesis changes topic to '[17:40] <@Jonesy44> suck my !@#$ <-- fag'

Getting your lil wee wee touched by men seems to be a recurring theme recently with you AJ. I may have to roll over and wake up your mum and have a lil chat ^_^.

LOL nah its all in good fun boys, if you take any offense to what ''I'' say, you're slow, I just know most of you so I razz a bit. But yeah picken ''CODES'' apart when ppl are ''new'' to any coding language or putting them down Is a bit lame, unless your a fucckin prodigy and was born with the know;edge, the 99% of us have to LEARN what we are doing. So that's why instead of ripping newer coders a new one or say, ''you're doing it wrong'' is crap, you went through the same thing, so help these ppl out, It'll feel good to pass some knowledge on and know they don't have to go through the %^&! you did, amirite?. So as Cheiron said, the good scriptors should be the only ones RESALLY listened to. lol there are exceptions of course, ppl like weasel for example;p. Im here for moral support, those who DO know who I'am know I'll help if need be, but most you got this under control. So im here for moral support.

As for the code:
i agree with ''mkbln7'' AND Napa about the .txt use, the simple $read at random from a file is better then making thes separate lines of code, add some flood protection (which you should do here as well) simple doesn't have to be to complicated
Code:
 
on *:TEXT:*!Trigger:#: { 
if (%gvar) { halt }
set -u5 %gvar on
.msg $chan $read($shortfn($mircdir) $+ gb.txt)
}
)


or throw in Napa's flood pro:
Code:
 if (!$($(%,bagflood,.,$nick),2) { set -u3 $+(%,bagflood,.,$nick) on
Up to you. Then you dont have to worry about fools spaming ya, after that if you feel froggy you can add text event triggers so the ppl in your channel can ADD more responses. Or just you or who you trust not to be a douche. Lots of things you can expand on here really. But some simple stuff.

P.s: ...I won't really wake her up AJ.
jonesy44
Comments: 1,856
 
mIRC Snippet:  Garbagebag
Posted on May 16, 2009 11:30 am
lmao Nem, i want you ;)
Prelude
Comments: 99
 
mIRC Snippet:  Garbagebag
Posted on May 16, 2009 12:07 pm
...They all do...

Commenting Options

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

  
Bottom