Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

--- archiv:coding:msl:mirc_bomb [2009/12/06 20:05] – angelegt - Externe Bearbeitung 127.0.0.1
+++ archiv:coding:msl:mirc_bomb [2023/02/28 22:41] (aktuell) – psycore
@@ Zeile 1: / Zeile 1: @@
+====== Bomben Script ======
+Author: unknown
+<code mirc bomb.mrc>
+menu nicklist {
+  A-Bomb:bombkick $$1
+}
+alias bombreset {
+  /unset %bombstat*
+  /unset %bombchan*
+  /set %bombtop 0
+  /set %bombtopn 0
+  /.timerbombreset off
+  /.timerbombreset 00:01 1 1 /bombreset
+}
+on 1:text:!bombkick:#:{
+  if ( $me isop $chan ) /bombkick $nick
+}
+on 1:text:!bombstats:%atsbombchan:{
+  if ( %bombstats [ $+ [ $$1 ] ]  = on ) { /halt }
+  /set -u20 %bomstats [ $+ [ $$1 ] ] on
+  /.notice $nick Du hast $iif(%bombstat [ $+ [ $nick ] ] != $null,%bombstat [ $+ [ $nick ] ],0) Bomben erfolgreich hintereinander entschärft ;)
+}
+alias bombkick {
+  if ( %bombtop = $null ) { /set %bombtop 0 }
+  if ( %bombtopn = $null ) { /set %bombtopn 0 }
+  if ( %bombkick [ $+ [ $$1 ] ]  = on ) { /halt }
+  elseif ( %bombchan [ $+ [ $nick ] ] != $null ) {
+    if ( %bombchanb [ $+ [ $nick ] ] = blubb ) { halt }
+    /.notice $nick Nur eine Bombe alle 3 Minuten ! ;)
+    halt
+  }
+  /set -u20 %bombkick [ $+ [ $$1 ] ] on
+  /inc %bombnumber
+  /describe $chan gibt $$1 ne Bombe in die Hand ! Versuch das richtige Kabel durchzuschneiden mit !rot, !gelb oder !grün !!! schnell, du hast nur 20 sekunden!! (Bombe Nr. %bombnumber $+ )
+  /.timerbombkick $+ $$1 1 20 /kick $chan $$1 *BOOOM* - die Bombe ist hochgegangen ;) - Top: %bombtopnick - %bombtop -- Flop: %bombtopnickn - %bombtopn
+  /set %farbe $rand(1,3)
+  if (%farbe == 1) { set %farb rot }
+  if (%farbe == 2) { set %farb grün }
+  if (%farbe == 3) { set %farb gelb }
+  /set -u20 %bombcolor [ $+ [ $$1 ] ] %farb
+  /set -u180 %bombchan [ $+ [ $$1 ] ] $chan
+}
+on 1:text:!rot:#:{
+  if ( %bombkick [ $+ [ $nick ] ]  = on ) {
+    if ( %bombcolor [ $+ [ $nick ] ] = rot ) {
+      /inc %bombstat [ $+ [ $nick ] ]
+      /unset %bombstatn [ $+ [ $nick ] ]
+      /describe %bombchan [ $+ [ $nick ] ] Puh, da haste nochmal glück gehabt $nick ! Bombe entschärft. - Top: %bombtopnick - %bombtop -- Flop: %bombtopnickn - %bombtopn -- Du: %bombstat [ $+ [ $nick ] ]
+      /.timerbombkick $+ $nick off
+      /unset %bombkick [ $+ [ $nick ] ]
+      if ( %bombtop = %bombstat [ $+ [ $nick ] ] ) { msg $chan $nick ist jetz mit an der Bomb-kick-spitze! ( $+ %bombtop Entschärfungen, genau wie: %bombtopnick $+ ) | /set %bombtopnick $addtok(%bombtopnick,$nick,32) }
+      if ( %bombtop < %bombstat [ $+ [ $nick ] ] ) { /set %bombtop %bombstat [ $+ [ $nick ] ] | /set %bombtopnick $nick | msg $chan $nick ist neuer Meister-Entschärfer mit %bombtop Entschärfungen !!! }
+    }
+    else {
+      /inc %bombstatn [ $+ [ $nick ] ]
+      /describe %bombchan [ $+ [ $nick ] ] meint: falscher Draht $nick - *BOOOOOOOOOM*
+      /.timerbombkick $+ $nick off
+      /unset %bombkick [ $+ [ $nick ] ]
+      /kick %bombchan [ $+ [ $nick ] ] $nick *BOOOM* - die Bombe ist hochgegangen ;) - Top: %bombtopnick - %bombtop -- Flop: %bombtopnickn - %bombtopn -- Du: %bombstatn [ $+ [ $nick ] ]
+      /unset %bombstat [ $+ [ $nick ] ]
+      if ( %bombtopn = %bombstatn [ $+ [ $nick ] ] ) { msg $chan $nick ist jetz auch mit ganz unten! ( $+ %bombtopn Explosionen, genau wie: %bombtopnickn $+ ) | /set %bombtopnickn $addtok(%bombtopnickn,$nick,32) }
+      if ( %bombtopn < %bombstatn [ $+ [ $nick ] ] ) { /set %bombtopn %bombstatn [ $+ [ $nick ] ] | /set %bombtopnickn $nick | msg $chan $nick ist neuer Meister-Explodierer mit %bombtopn Explosionen !!! }
+    }
+  }
+}
+on 1:text:!grün:#:{
+  if ( %bombkick [ $+ [ $nick ] ]  = on ) {
+    if ( %bombcolor [ $+ [ $nick ] ] = grün ) {
+      /inc %bombstat [ $+ [ $nick ] ]
+      /unset %bombstatn [ $+ [ $nick ] ]
+      /describe %bombchan [ $+ [ $nick ] ] Puh, da haste nochmal glück gehabt $nick ! Bombe entschärft. - Top: %bombtopnick - %bombtop -- Flop: %bombtopnickn - %bombtopn -- Du: %bombstat [ $+ [ $nick ] ]
+      /.timerbombkick $+ $nick off
+      /unset %bombkick [ $+ [ $nick ] ]
+      if ( %bombtop = %bombstat [ $+ [ $nick ] ] ) { msg $chan $nick ist jetz mit an der Bomb-kick-spitze! ( $+ %bombtop Entschärfungen, genau wie: %bombtopnick $+ ) | /set %bombtopnick $addtok(%bombtopnick,$nick,32) }
+      if ( %bombtop < %bombstat [ $+ [ $nick ] ] ) { /set %bombtop %bombstat [ $+ [ $nick ] ] | /set %bombtopnick $nick | msg $chan $nick ist neuer Meister-Entschärfer mit %bombtop Entschärfungen !!! }
+    }
+    else {
+      /inc %bombstatn [ $+ [ $nick ] ]
+      /describe %bombchan [ $+ [ $nick ] ] meint: falscher Draht $nick - *BOOOOOOOOOM*
+      /.timerbombkick $+ $nick off
+      /unset %bombkick [ $+ [ $nick ] ]
+      /kick %bombchan [ $+ [ $nick ] ] $nick *BOOOM* - die Bombe ist hochgegangen ;) - Top: %bombtopnick - %bombtop -- Flop: %bombtopnickn - %bombtopn -- Du: %bombstatn [ $+ [ $nick ] ]
+      /unset %bombstat [ $+ [ $nick ] ]
+      if ( %bombtopn = %bombstatn [ $+ [ $nick ] ] ) { msg $chan $nick ist jetz auch mit ganz unten! ( $+ %bombtopn Entschärfungen, genau wie: %bombtopnickn $+ ) | /set %bombtopnickn $addtok(%bombtopnickn,$nick,32) }
+      if ( %bombtopn < %bombstatn [ $+ [ $nick ] ] ) { /set %bombtopn %bombstatn [ $+ [ $nick ] ] | /set %bombtopnickn $nick | msg $chan $nick ist neuer Meister-Explodierer mit %bombtopn Explosioenen !!! }
+    }
+  }
+}
+on 1:text:!gelb:#:{
+  if ( %bombkick [ $+ [ $nick ] ]  = on ) {
+    if ( %bombcolor [ $+ [ $nick ] ] = gelb ) {
+      /inc %bombstat [ $+ [ $nick ] ]
+      /unset %bombstatn [ $+ [ $nick ] ]
+      /describe %bombchan [ $+ [ $nick ] ] Puh, da haste nochmal glück gehabt $nick ! Bombe entschärft. - Top: %bombtopnick - %bombtop -- Flop: %bombtopnickn - %bombtopn -- Du: %bombstat [ $+ [ $nick ] ]
+      /.timerbombkick $+ $nick off
+      /unset %bombkick [ $+ [ $nick ] ]
+      if ( %bombtop = %bombstat [ $+ [ $nick ] ] ) { msg $chan $nick ist jetz mit an der Bomb-kick-spitze! ( $+ %bombtop Entschärfungen, genau wie: %bombtopnick $+ ) | /set %bombtopnick $addtok(%bombtopnick,$nick,32) }
+      if ( %bombtop < %bombstat [ $+ [ $nick ] ] ) { /set %bombtop %bombstat [ $+ [ $nick ] ] | /set %bombtopnick $nick | msg $chan $nick ist neuer Meister-Entschärfer mit %bombtop Entschärfungen !!! }
+    }
+    else {
+      /inc %bombstatn [ $+ [ $nick ] ]
+      /describe %bombchan [ $+ [ $nick ] ] meint: falscher Draht $nick - *BOOOOOOOOOM*
+      /.timerbombkick $+ $nick off
+      /unset %bombkick [ $+ [ $nick ] ]
+      /kick %bombchan [ $+ [ $nick ] ] $nick *BOOOM* - die Bombe ist hochgegangen ;) - Top: %bombtopnick - %bombtop -- Flop: %bombtopnickn - %bombtopn -- Du: %bombstatn [ $+ [ $nick ] ]
+      /unset %bombstat [ $+ [ $nick ] ]
+      if ( %bombtopn = %bombstatn [ $+ [ $nick ] ] ) { msg $chan $nick ist jetz auch mit ganz unten! ( $+ %bombtopn Entschärfungen, genau wie: %bombtopnickn $+ ) | /set %bombtopnickn $addtok(%bombtopnickn,$nick,32) }
+      if ( %bombtopn < %bombstatn [ $+ [ $nick ] ] ) { /set %bombtopn %bombstatn [ $+ [ $nick ] ] | /set %bombtopnickn $nick | msg $chan $nick ist neuer Meister-Explodierer mit %bombtopn Explosioenen !!! }
+    }
+  }
+}
+</code>