Advertisement
westor

!Bomb Game Addon hotfix v1.0 for Delirious

Jan 6th, 2016
298
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 7.54 KB | None | 0 0
  1. on *:TEXT:!bomb *:#: {
  2.   if ((%floodbombride) || ($($+(%,floodbombride.,$nick),2))) { return }
  3.   set -eu60 %floodbombride On
  4.   set -eu60 %floodbombride. $+ $nick On
  5.   tokenize 32 $strip($remove($1-,@))
  6.   if $2 != $me {
  7.     if %cutwire != 1 {
  8.       if $2 = Random {
  9.         set -e %bombwire $rand(1,5)
  10.         :one
  11.         set -e %bombee $nick(#,$r(1,$nick(#,0,a)),a)
  12.         if %bombee = $me { goto one }
  13.         set -e %cutwire 1
  14.         if %bombwire = 1 { set -e %bombwirecolor red | set -e %wireright RED }
  15.         if %bombwire = 2 { set -e %bombwirecolor orange | set -e %wireright ORANGE }
  16.         if %bombwire = 3 { set -e %bombwirecolor yellow | set -e %wireright YELLOW }
  17.         if %bombwire = 4 { set -e %bombwirecolor green | set -e %wireright GREEN }
  18.         if %bombwire = 5 { set -e %bombwirecolor blue | set -e %wireright BLUE }
  19.         if %bombstats. [ $+ [ %bombee ] ] != 1 { set -e %bombstats. [ $+ [ %bombee ] ] 1 | set -e %bombwin. [ $+ [ %bombee ] ] 0 | set -e %bomblose. [ $+ [ %bombee ] ] 0 | set -e %bombtimeout. [ $+ [ %bombee ] ] 0 }
  20.         msg $chan $nick planted a bomb with a 45 second timer under %bombee $+ 's chair! %bombee needs to pick a wire to cut: RED ORANGE YELLOW GREEN BLUE
  21.         .timerBomb 1 46 msg $chan TICK - TICK - TICK - TICK - BOOM! %bombee took too long, and got blown up. Stupid %bombee $+ ! All they had to do was cut the %wireright wire...
  22.         .timer 1 47 unset %bombwire
  23.         .timer 1 47 unset %bombee
  24.         .timer 1 47 unset %cutwire
  25.         .timerStats 1 47 inc %bombtimeout. [ $+ [ %bombee ] ] 1
  26.       }
  27.       elseif $2 ison $chan {
  28.         set -e %bombwire $rand(1,5)
  29.         set -e %bombee $2
  30.         set -e %cutwire 1
  31.         if %bombwire = 1 { set -e %bombwirecolor red | set -e %wireright RED }
  32.         if %bombwire = 2 { set -e %bombwirecolor orange | set -e %wireright ORANGE }
  33.         if %bombwire = 3 { set -e %bombwirecolor yellow | set -e %wireright YELLOW }
  34.         if %bombwire = 4 { set -e %bombwirecolor green | set -e %wireright GREEN }
  35.         if %bombwire = 5 { set -e %bombwirecolor blue | set -e %wireright BLUE }
  36.         if %bombstats. [ $+ [ $2 ] ] != 1 { set -e %bombstats. [ $+ [ $2 ] ] 1 | set -e %bombwin. [ $+ [ $2 ] ] 0 | set -e %bomblose. [ $+ [ $2 ] ] 0 | set -e %bombtimeout. [ $+ [ $2 ] ] 0 }
  37.         msg $chan $nick planted a bomb with a 45 second timer under $2 $+ 's chair! $2 needs to pick a wire to cut: RED ORANGE YELLOW GREEN BLUE
  38.         .timerBomb 1 46 msg $chan TICK - TICK - TICK - TICK - BOOM! $2 took too long, and got blown up. Stupid $2 $+ ! All they had to do was cut the %wireright wire...
  39.         .timer 1 47 unset %bombwire
  40.         .timer 1 47 unset %bombee
  41.         .timer 1 47 unset %cutwire
  42.         .timerStats 1 47 inc %bombtimeout. [ $+ [ $2 ] ] 1
  43.       }
  44.       else { msg $chan Sorry, but I don't see a $2 in this channel... }
  45.     }
  46.     else { msg $chan Someone else is currently being bombed. Please wait until they explode or redeem themself by cutting the correct wire! }
  47.   }
  48.   else { msg $chan I can't bomb myself, stupid! }
  49. }
  50.  
  51. on *:TEXT:red:#: {
  52.   tokenize 32 $strip($1-)
  53.   if $nick = %bombee {
  54.     if $1 = %bombwirecolor {
  55.       msg $chan HOLY CRAP! $nick just saved themself by cutting the RED WIRE!
  56.       inc -e %bombwin. [ $+ [ $nick ] ] 1
  57.       .timerBomb off
  58.       unset %bombwire
  59.       unset %bombee
  60.       unset %cutwire
  61.       unset %bombwirecolor
  62.     }
  63.     else {
  64.       msg $chan TICK - TICK - TICK - BOOM! $nick cut the RED wire and suffered the consequences. Stupid stupid $nick $+ . Should have cut the %wireright wire!
  65.       inc -e %bomblose. [ $+ [ $nick ] ] 1
  66.       .timerBomb off
  67.       unset %bombwire
  68.       unset %bombee
  69.       unset %cutwire
  70.       unset %bombwirecolor
  71.     }
  72.   }
  73. }
  74.  
  75.  
  76. on *:TEXT:green:#: {
  77.   tokenize 32 $strip($1-)
  78.   if $nick = %bombee {
  79.     if $1 = %bombwirecolor {
  80.       msg $chan HOLY CRAP! $nick just saved themself by cutting the GREEN WIRE!
  81.       inc -e %bombwin. [ $+ [ $nick ] ] 1
  82.       .timerBomb off
  83.       unset %bombwire
  84.       unset %bombee
  85.       unset %cutwire
  86.       unset %bombwirecolor
  87.     }
  88.     else {
  89.       msg $chan TICK - TICK - TICK - BOOM! $nick cut the GREEN wire and suffered the consequences. Stupid stupid $nick $+ . Should have cut the %wireright wire!
  90.       .timerBomb off
  91.       inc -e %bomblose. [ $+ [ $nick ] ] 1
  92.       unset %bombwire
  93.       unset %bombee
  94.       unset %cutwire
  95.       unset %bombwirecolor
  96.     }
  97.   }
  98. }
  99.  
  100.  
  101. on *:TEXT:yellow:#: {
  102.   tokenize 32 $strip($1-)
  103.   if $nick = %bombee {
  104.     if $1 = %bombwirecolor {
  105.       msg $chan HOLY CRAP! $nick just saved themself by cutting the YELLOW WIRE!
  106.       inc -e %bombwin. [ $+ [ $nick ] ] 1
  107.       .timerBomb off
  108.       unset %bombwire
  109.       unset %bombee
  110.       unset %cutwire
  111.       unset %bombwirecolor
  112.     }
  113.     else {
  114.       msg $chan TICK - TICK - TICK - BOOM! $nick cut the YELLOW wire and suffered the consequences. Stupid stupid $nick $+ . Should have cut the %wireright wire!
  115.       .timerBomb off
  116.       inc -e %bomblose. [ $+ [ $nick ] ] 1
  117.       unset %bombwire
  118.       unset %bombee
  119.       unset %cutwire
  120.       unset %bombwirecolor
  121.     }
  122.   }
  123. }
  124.  
  125.  
  126. on *:TEXT:blue:#: {
  127.   tokenize 32 $strip($1-)
  128.   if $nick = %bombee {
  129.     if $1 = %bombwirecolor {
  130.       msg $chan HOLY CRAP! $nick just saved themself by cutting the BLUE WIRE!
  131.       inc -e %bombwin. [ $+ [ $nick ] ] 1
  132.       .timerBomb off
  133.       unset %bombwire
  134.       unset %bombee
  135.       unset %cutwire
  136.       unset %bombwirecolor
  137.     }
  138.     else {
  139.       msg $chan TICK - TICK - TICK - BOOM! $nick cut the BLUE wire and suffered the consequences. Stupid stupid $nick $+ . Shoulda have cut the %wireright wire!
  140.       .timerBomb off
  141.       inc -e %bomblose. [ $+ [ $nick ] ] 1
  142.       unset %bombwire
  143.       unset %bombee
  144.       unset %cutwire
  145.       unset %bombwirecolor
  146.     }
  147.   }
  148. }
  149.  
  150.  
  151. on *:TEXT:orange:#: {
  152.   tokenize 32 $strip($1-)
  153.   if $nick = %bombee {
  154.     if $1 = %bombwirecolor {
  155.       msg $chan HOLY CRAP! $nick just saved themself by cutting the ORANGE WIRE!
  156.       inc -e %bombwin. [ $+ [ $nick ] ] 1
  157.       .timerBomb off
  158.       unset %bombwire
  159.       unset %bombee
  160.       unset %cutwire
  161.       unset %bombwirecolor
  162.     }
  163.     else {
  164.       msg $chan TICK - TICK - TICK - BOOM! $nick cut the ORANGE wire and suffered the consequences. Stupid stupid $nick $+ . Should have cut the %wireright wire!
  165.       .timerBomb off
  166.       inc -e %bomblose. [ $+ [ $nick ] ] 1
  167.       unset %bombwire
  168.       unset %bombee
  169.       unset %cutwire
  170.       unset %bombwirecolor
  171.     }
  172.   }
  173. }
  174.  
  175. on *:TEXT:!bombstats:#: {
  176.   tokenize 32 $strip($remove($1-,@))
  177.   if ((%flood!bombstats2) || ($($+(%,flood!bombstats2.,$nick),2))) { return }
  178.   set -eu15 %flood!bombstats2 On
  179.   set -eu30 %flood!bombstats2. $+ $nick On
  180.   if %bombstats. [ $+ [ $nick ] ] != 1 { msg $chan $nick has not yet been bombed. Let's bomb them! }
  181.   else { msg $chan $nick has cut the correct wire %bombwin. [ $+ [ $nick ] ] times. $nick has cut the wrong wire %bomblose. [ $+ [ $nick ] ] times. $nick has not cut a wire, losing by default, %bombtimeout. [ $+ [ $nick ] ] times. }
  182. }
  183.  
  184. on *:TEXT:!bombstats *:#: {
  185.   tokenize 32 $strip($remove($1-,@))
  186.   if ((%flood!bombstats1) || ($($+(%,flood!bombstats1.,$nick),2))) { return }
  187.   set -eu15 %flood!bombstats1 On
  188.   set -eu30 %flood!bombstats1. $+ $nick On
  189.   if %bombstats. [ $+ [ $2 ] ] != 1 { msg $chan $2 has not yet been bombed. Let's bomb them! }
  190.   else { msg $chan $2 has cut the correct wire %bombwin. [ $+ [ $2 ] ] times. $2 has cut the wrong wire %bomblose. [ $+ [ $2 ] ] times. $2 has not cut a wire, losing by default, %bombtimeout. [ $+ [ $2 ] ] times. }
  191. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement