Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

Link zu dieser Vergleichsansicht

archiv:coding:msl:mirc_bomb [2009/12/06 20:05] – angelegt - Externe Bearbeitung 127.0.0.1archiv: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>