All pastes #489802 Raw Edit

tzhaar help needed

public text v1 · immutable
·published 2007-05-15 18:29 UTC
rendered paste body
on *:text:!dm:#masterrob_nl: {
  if (%dmstart == 2) { /notice $nick er is al een deathmatch bezig, wacht tot deze voorbij is en doe dit opnieuw }
  if (%dmstart == 1) {
    if ($nick == %dmaccount1) { /notice $nick je doet al mee aan de deathmatch! }
    else {
      /set %dmstart 2
      /set %dmaccount2 $nick
      /set %dmturn $rand(1,2)
      /set %dmlive1 99
      /set %dmlive2 99
      /set %dmspec1 100
      /set %dmspec2 100
      /timers off
      /msg $chan 3de deathmatch is begonnen tussen4 %dmaccount1 3en4 %dmaccount2
      /notice %dmaccount1 weet je de commands niet?  type !dmcommands
      /notice %dmaccount2 weet je de commands niet?  type !dmcommands
      if (%dmturn == 1) { /msg $chan 3de beurt gaat naar4 %dmaccount1 }
      if (%dmturn == 2) { /msg $chan 3de beurt gaat naar4 %dmaccount2 }
    }
  }
  if (%dmstart == 0) {
    /set %dmstart 1
    /set %dmaccount1 $nick
    /msg $chan 4 $+ $nick 3wilt een dm beginnen.  ben jij zo dapper genoeg om mee te doen?  type dan ook !dm
    /timer 1 30 /notice $nick sorry, er is niemand die met je wilt vechten, het gevecht is gestopt
    /timer 1 30 /msg $chan 3het gevecht is gestopt omdat er niemand anders wou vechten!
    /timer 1 30 /unset %dmaccount1
    /timer 1 30 /set %dmstart 0
  }
}
on *:text:!stopdm:#masterrob_nl: {
  if (%dmstart == 2) { 
    /set %dmstart 0
    /unset %dmaccount1
    /unset %dmaccount2
    /unset %dmlive1
    /unset %dmlive2
    /unset %dmhit1
    /unset %dmhit2
    /unset %dmturn
    /msg $chan 3de dm is gestopt door4 $nick
  }
  else { /notice $nick er is geen dm bezig! }
}

alias dmstop {
  /set %dmstart 0
  /unset %dmaccount1
  /unset %dmaccount2
  /unset %dmlive1
  /unset %dmlive2
  /unset %dmhit1
  /unset %dmhit2
  /unset %dmturn
  /msg %lalalala 11//0,11//11,12//12,2//2,1//11,1 er is een winnaar! 2,1\\12,2\\11,12\\0,11\\11,0\\
}
on *:text:!dmcommands:#masterrob_nl: {
  /notice $nick kijk in je private voor de dm opties
  /msg $nick  11//0,11//11,12//12,2//2,1//11,1 !stopdm 4|5|4|11 laat je de dm stoppen   2,1\\12,2\\11,12\\0,11\\11,0\\
  /msg $nick  11//0,11//11,12//12,2//2,1//11,1 !dm 4|5|4|11 laat je de dm starten. dit kan niet als er al 1 bezig is   2,1\\12,2\\11,12\\0,11\\11,0\\
  /msg $nick  11//0,11//11,12//12,2//2,1//11,1 !dmcommands 4|5|4|11 laat dit zien xD   2,1\\12,2\\11,12\\0,11\\11,0\\ 
  /msg $nick 11//0,11//11,12//12,2//2,1//11,1 !dds 4|5|4|11 doet 2 hits, maar er zitten bugs in xD  2,1\\12,2\\11,12\\0,11\\11,0\\
}

on *:text:!swing:#masterrob_nl: {
  if (%dmstart == 2) {
    if ($nick == %dmaccount1) {
      if (%dmturn == 1) {
        /set %dmhit1 $rand(0,35)
        /set %dmlive2 $calc(%dmlive2 - %dmhit1)
        /msg $chan 4 $+ %dmaccount1 3heeft4 %dmhit1 3gehit.
        /msg $chan 4 %dmaccount2 3heeft nog maar4 %dmlive2 3hp over.
        /msg $chan 4 %dmaccount2 3is nu aan de beurt.
        /set %dmturn 2
      }
      else { /notice $nick Je bent niet aan de beurt! }
    }
    if ($nick == %dmaccount2) {
      if (%dmturn == 2) {
        /set %dmhit2 $rand(0,35)
        /set %dmlive1 $calc(%dmlive1 - %dmhit2)
        /msg $chan 4 $+ %dmaccount2 3heeft4 %dmhit2 3gehit.
        /msg $chan 4 %dmaccount1 3heeft nog maar4 %dmlive1 3hp over.
        /msg $chan 4 %dmaccount1 3is nu aan de beurt.
        /set %dmturn 1
      }
      else { /notice $nick Je bent niet aan de beurt! }
    }
  }
}
on *:text:!dds:#masterrob_nl: {
  if (%dmstart == 2) {
    if ($nick == %dmaccount1) {
      if (%dmturn == 1) {
        /set %dmhit11 $rand(0,30)
        /set %dmhit12 $rand(0,30)
        /set %dmhitdds1 $calc(%dmhit11 + %dmhit12)
        /set %dmlive2 $calc(%dmlive2 - %dmhitdds1)
        /set %dmspec1 $calc(%dmspec1 - 25)
        /msg $chan 4 $+ %dmaccount1 3hit4 %dmhit11 3en4 %dmhit12 3op4 %dmaccount2
        /msg $chan 4 $+ %dmaccount2 3heeft nog4 %dmlive2 3over.  en4 %dmaccount1 3heeft nog maar4 %dmspec1 $+ % 3special over.
        if ( %dmlive2 > 0) {
          /msg $chan 4 $+ %dmaccount2 3is aan de beurt.
          /set %dmturn 2
        }
        if ( %dmlive2 < 1) { /dmstop | /set %lalalala $chan }
        else { /notice $nick Je bent niet aan de beurt! }
      }
      if ($nick == %dmaccount2) {
        if (%dmturn == 2) {
          /set %dmhit21 $rand(0,30)
          /set %dmhit22 $rand(0,30)
          /set %dmhitdds2 $calc(%dmhit21 + %dmhit22)
          /set %dmlive1 $calc(%dmlive1 - %dmhitdds2)
          /set %dmspec2 $calc(%dmspec2 - 25)
          /msg $chan 4 $+ %dmaccount2 3hit4 %dmhit21 3en4 %dmhit22 3op4 %dmaccount1
          /msg $chan 4 $+ %dmaccount1 3heeft nog4 %dmlive1 3over.  en4 %dmaccount2 3heeft nog maar4 %dmspec2 $+ % 3special over.
          if ( %dmlive1 > 0) {
            /msg $chan 4 $+ %dmaccount1 3is aan de beurt.
            /set %dmturn 1
          }
          if ( %dmlive1 < 1) {  /dmstop | /set %lalalala $chan  }
        }
        else { /notice $nick Je bent niet aan de beurt! }
      }
    }
  }
}