Pro Slap!

By Phil_FW on Jan 29, 2011

This is a Pro version of 'Slap!', using different weapons at random, the guns are from COD MW3. I also used $gettok to make it shorter. Enjoy :D

menu nicklist {
  .Pro Slap!: { 
    .timer 1 0 /me walks up to $$1 $+ , takes out a9,1 $gettok(12 inch butterfly knife|bowie knife|wooden stick|fleshlight|glove with a brick inside it|2 ton Acme weight|blow-up doll|toothpick| ,$r(1,8),124) and massacres them with it14,1...
    .timer 1 2 /me then goes to his car and takes out7,1 $gettok(an M4A1|a SCAR-L|an ACR 6.8|an AA-12|a Desert Eagle|a .44 Magnum ,$r(1,8),124) and shoots15,1 $$1 in the head and walks away.
    .timer 1 3 /msg $chan 9,1another bitch.. 11,1PWNED!!!
  }

Comments

Sign in to comment.
Phil_FW   -  Apr 15, 2012

different weapons, and shorter

 Respond  
chachin   -  Apr 14, 2012

what's updated.. it looks same :P

 Respond  
Phil_FW   -  Apr 13, 2012

UPDATED :D

 Respond  
gooshie   -  Mar 09, 2011

Jethro_
Nice screeny! I believe that was like the "hacker's" last post b4 they went !virtual/irl. Btw, I believe it's spelled "1337". Anyway, I enjoyed that episode alot simply because I stopped watching numb3rs about half way into season one and saw that episode on a fluke without knowing it was gonna feature irc. Until I heard 'irc' and went PERK I was like half watching it while multitasking because when you only have 'rabbit ear tv' picking a station to watch is like voting for a new president, as in, least of two evils or choose 'A' simply because you hate 'B'.

 Respond  
Jethro   -  Mar 09, 2011

Since you've mentioned it, gooshie, I found that episode on youtube and watched it partially.
Here is one screen grab from that show:ImageLooks like they exchange the messages in "l33t"

 Respond  
gooshie   -  Mar 09, 2011

jaytea
I'm gonna apply at that show 'numb3rs' since they did an episode about irc before only I guess I'm gonna have to learn 1337 $p34|< as that's how they say everyone on irc chats. I'm thinking of scripting up a translator for that. Sorta useless really because we all know we speak in classic klingon on irc.

 Respond  
jaytea   -  Mar 09, 2011

job writing mSL?? where?? :D

 Respond  
gooshie   -  Mar 09, 2011

napa182
I'm studying some new advanced code writing techniques now and my next version should be a vast improvement on my previous post.

 Respond  
gooshie   -  Mar 08, 2011

yup napa182 gonna need you for sockets to fetch the weapons list from Black Ops 3 'attack of the vatican assasines' starring charlie sheen. (I hear its gonna have a hidden F18 in it that you can do straffing runs in your underwear before your first cup of coffee)

 Respond  
napa182   -  Mar 08, 2011

yeah let me know if you find a place... ;P

 Respond  
gooshie   -  Mar 08, 2011

I can think of at least half dozen more ways including:
1) ini file
2) regex
3) hash tables
4) goto
5) etc
6) ......
7) whatever..

What I really need to know now is where do I apply for the $100,000/yr job writing msl?

 Respond  
napa182   -  Mar 08, 2011

roflmao

 Respond  
gooshie   -  Mar 08, 2011

Wait!.. im not done yet! We could put the unique in an external text file one line each and read a random line.

menu nicklist {
  .slaaaap
  ..$iif($$1,Proooo Slap! $1,Pick a Nick):{
    .timer 1 1 me walks up to15,1 $1 then pulls out a9,1 $read(walk.txt) and massacres them with it...
    .timer 1 3 me goes to his car and takes out a 7,1 $read(car.txt) and shoots $1 in the head and walks away.
    .timer 1 5 say 9,1another bitch.. 11,1PWNED!!!
  }
}
__________________________________________________________________________________________________________________
 Respond  
gooshie   -  Mar 08, 2011

Then of course we have typo's gettok version. Note use of 7dot as separator to avoid conflicts with comma or other keyboard accessible characters.

menu nicklist {
  .$iif($$1,Prooo Slap! $1,Pick a Nick):{ 
    .timer 1 1 me walks up to15,1 $1 then pulls out a 09,01 $gettok(12 inch Butterfly knifeBowie knifewooden stickmetal poleFleshlightglove with a brick inside it2 ton Acme weight,$rand(1,7),7)  and massacres them with it...
    .timer 1 3 me goes to his car and takes out a 07,01 $gettok(RPD Bling pro(Heartbeat sensor + FMJ)M16 with n00b tubeSPAS with red dot sightDesert Eagle,$rand(1,4),7)  and shoots $1 in the head and walks away.
    .timer 1 5 say 9,1another bitch.. 11,1PWNED!!!
  }
}
 Respond  
gooshie   -  Mar 08, 2011

Next up we have Dean's version using replace with a few fixes. This is slightly smaller even with the $$1 switch and missing 3rd msg added back in.

menu nicklist {
  .slaap
  ..$iif($$1,Proo Slap! $1,Pick a Nick): { 
    .timer 1 1 me walks up to15,1 $1 then pulls out a 9,1 $replace($r(1,7), 1, 12 inch Butterfly knife, 2,Bowie knife, 3,wooden stick, 4,metal pole, 5, Fleshlight, 6, glove with a brick inside it, 7,ton Acme weight) and massacres them with it...
    .timer 1 3 me goes to his car and takes out a 7,1 $replace($r(1,4), 1,RPD Bling pro(Heartbeat sensor + FMJ), 2,M16 with n00b tube, 3,SPAS with red dot sight, 4,Desert Eagle) and shoots $1 in the head and walks away.
    .timer 1 5 say 9,1another bitch.. 11,1PWNED!!!
  }
}
 Respond  
gooshie   -  Mar 08, 2011

This is in the style of the original using conditionals except the unigue parts are assigned to local variables. This method is easy to read and edit/add in more choices. Note inline if and $$1 and also reuse of %r.

menu nicklist {
  .slap
  ..$iif($$1,Pro Slap! $1,Pick a Nick):{
    var %r $r(1,7),%walk,%car
    if (%r = 1) %walk = 12 inch Butterfly knife         
    if (%r = 2) %walk = Bowie knife
    if (%r = 3) %walk = wooden stick
    if (%r = 4) %walk = metal pole
    if (%r = 5) %walk = Fleshlight
    if (%r = 6) %walk =  glove with a brick inside it
    if (%r = 7) %walk = ton Acme weight
    %r $r(1,4)
    if (%r = 1) %car = RPD Bling pro(Heartbeat sensor + FMJ)
    if (%r = 2) %car = M16 with n00b tube
    if (%r = 3) %car = SPAS with red dot sight
    if (%r = 4) %car = Desert Eagle
    .timer 1 1 me walks up to15,1 $1 then pulls out a9,1 %walk and massacres them with it...
    .timer 1 3 me goes to his car and takes out a 7,1 %car and shoots $1 in the head and walks away.
    .timer 1 5 say 9,1another bitch.. 11,1PWNED!!!
  }
}
_______________________________________________________________________________________________________
 Respond  
Phil_FW   -  Mar 07, 2011

Update is coming soon

 Respond  
chachin   -  Jan 31, 2011

nvm got it working ;D

 Respond  
Jethro   -  Jan 30, 2011

sunslayer, I'm typically inclined toward peace and well-being of this community, but Dean can sometimes be an upsetting, insulting character. You should've known better 'cause you've been there, seen that. Then again, it's really no benefit to pay much attention to him when there are better things to do really. Yes, I can relate to your feelings.

 Respond  
sunslayer   -  Jan 30, 2011

I'm not telling you to be more like me, I'm just saying that Dean made no attempt to criticize the author or you and personally I'm getting tired of all the ranting comments recently.

 Respond  
Jethro   -  Jan 30, 2011

sunslayer, perhaps I should be more like you, minding my own business and stepping out of people's affairs. I'm not trying to be sarcastic but it's the way to go. "STFU" is the key.

 Respond  
sunslayer   -  Jan 30, 2011

He didn't ask for an edit, did he? how many times have people done that? your just picking out little things to start fighting over...

 Respond  
Typo   -  Jan 30, 2011

Here is another way to go about this but using tokens. As far as an alternative goes, I think this is much easier to understand and actually learn something from than the other alternative example above. No offense meant to Dean.

menu nicklist {
  .Pro Slap!:{ 
    var %proslapran $rand(1,7), %proslap2ran $rand(1,4), %proslap 12 inch Butterfly knife,Bowie knife,wooden stick,metal pole,Fleshlight,glove with a brick inside it,2 ton Acme weight, %proslap2 RPD Bling pro(Heartbeat sensor + FMJ),M16 with n00b tube,SPAS with red dot sight,Desert Eagle
    .timer 1 1 me walks up to15,1 $$1 then pulls out a 09,01 $+ $gettok(%proslap,%proslapran,44) $+  and massacres them with it...
    .timer 1 3 me goes to his car and takes out a 07,01 $+ $gettok(%proslap2,%proslap2ran,44) $+  and shoots $$1 in the head and walks away.
    .timer 1 5 msg $chan 9,1another bitch.. 11,1PWNED!!!
  }
}

p.s. I got rid of the sub menu for pro slap, there was only one slap in it so its fine as a main menu command I thought.

 Respond  
_Dean_   -  Jan 30, 2011

i know him, and he will not think this

 Respond  
Jethro   -  Jan 29, 2011

I didn't forbid you to show your ways of going about people's snippets. You're more than welcome to do that. Except for your word choice of "edit," that is unaccounted for and may give phil24 a notion that his posted snippet is substandard or unacceptable.

By the way, you're not gonna cease to insult me by misspelling my name on purpose, are you? You start the commotion yourself and yet you rant of people giving you hard time. The world doesn't revolve around you.

 Respond  
_Dean_   -  Jan 29, 2011

He didn't ask for an edit, did he?

this is a community, a free comunity where ppl can show ideas, and new ways to do it, by the way, everytime someone post an script, why do u edit it? or show to them ''how it could be'', i didnt see no one asking u this...
next time i post a script here, i will post, Jetrho_ i dont want ur comments or edit on it

 Respond  
Jethro   -  Jan 29, 2011

Good work, Phil24. I don't think you need the !$2 to begin with.

Dean, please don't call that an edit but your approach to going about phil's snippet. He didn't ask for an edit, did he?

 Respond  
_Dean_   -  Jan 29, 2011

my edit for this

menu nicklist {
  .slap
  ..Pro Slap!: { 
    var %proslap $rand(1,7), %y = .timer 1 1 me walks up to15,1 $$1 then pulls out a 9,1, %x and massacres them with it..., %proslap2 $rand(1,4), %z = .timer 1 3 me goes to his car and takes out a 7,1, %t and shoots $$1 in the head and walks away. 
    %y $replace(%proslap, 1, 12 inch Butterfly knife, 2,Bowie knife, 3,wooden stick, 4,metal pole, 5, Fleshlight, 6, glove with a brick inside it, 7,ton Acme weight) %x
    %z $replace(%proslap2, 1,RPD Bling pro(Heartbeat sensor + FMJ), 2,M16 with n00b tube, 3,SPAS with red dot sight, 4,Desert Eagle) %t
  }
}

1013 bytes smaller

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.