on *:TEXT:!dm:#dani_l11:{ inc %dmc 
  %dmc 
  if (%dmc == 1) { set %dmnick1 $nick 
    msg $chan 11 $nick 7wil vechten, ben je dapper genoeg? typ !dm 
    timer 1 30 msg $chan sorry %dmnick1 er is niemand die met je wilt vechten
    timer 1 30 unset %counterdm
    timer 1 30 unset %dmnick1
    timer 1 30 unset %hp1
    timer 1 30 unset %dmhit
    timer 1 30 unset %dmc
    timer 1 30 unset %hp2
    timer 1 30 unset %dmnick2
  timer 1 30 unset %beurt   }
  if (%dmc == 2 && $nick == %dmnick1) { set %dmc %dmc - 1 
  msg $chan 4je kan niet tegen jezelf vechten }
  if (%dmc == 2 && $nick != %dmnick1) { set %dmnick2 $nick
    /timers off
    msg $chan 4de death-match wordt gestart...
    set %hp1 99
    set %hp2 99
    set %spec1 100
    set %spec2 100
    msg $chan 11 %dmnick2 7en11 %dmnick1 7gaan een duel aan
    msg $chan 11 %dmnick2 7en11 %dmnick1 7hebben bijde hebben 99hp, oneindig veel sharks en 100% spec.
    msg $chan 7!dmcommands om te zien wat je allemaal kan doen.
    /dmbeurt
  set %beurt %dmnick1 }
  if (%dmc > 2 ) { msg $chan sorry, er is al een dm bezig } 
  if ( %hp1 < 1 ) { timers off
    msg $chan 11 %dmnick1 7heeft gewonnen!
    describe $chan buigt voor de gene die %dmnick2 de baas was! 
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %dmc
    unset %beurt
    unset %dmnick2
    unset %hp2 $(|) unset %shark1c $(|) unset %shark2c
  unset %dmhit }
  if ( %hp2 < 1 ) { timers off 
    msg $chan 11 %dmnick2 7heeft gewonnen! 
    describe $chan buigt voor de gene die %dmnick1 de baas was! 
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %beurt
    unset %dmnick2
    unset %hp2
    unset %dmhit $(|) unset %shark1c $(|) unset %shark2c
unset %dmc } } 

on *:TEXT:!whip:#dani_l11: { inc %sharks1
  inc %sharks2
  if ($nick == %dmnick2 && %beurt == %dmnick2) { set %dmhit $rand(0,40)
    /timers off
    if (%dmhit > %hp1) { set %dmhit %hp1 }
    set %hp1 %hp1 - %dmhit
    msg $chan 11 $nick 7heeft 4 %dmhit 7gehit op11 %dmnick1
    msg $chan 11 %dmnick1 7heeft nu nog4 %hp1 hp 7over!
    set %beurt %dmnick1 
    notice %dmnick1 het is nu jouw beurt
  /dmbeurt }
  if ($nick == %dmnick1 && %beurt == %dmnick1) { set %dmhit $rand(1,40)
    /timers off
    if (%dmhit > %hp2) { set %dmhit %hp2 }
    set %hp2 %hp2 - %dmhit
    msg $chan 11 $nick 7heeft 4 %dmhit 7gehit op11 %dmnick2
    msg $chan 11 %dmnick2 7heeft nu nog4 %hp2 hp 7over!
    set %beurt %dmnick2 
    notice %dmnick2 het is nu jouw beurt
  /dmbeurt }
  if ( %hp1 < 1 ) { timers off
    msg $chan  %dmnick2 heeft gewonnen!
    describe $chan buigt voor de gene die %dmnick1 de baas was! 
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %dmc
    unset %beurt
    unset %dmnick2
    unset %hp2 
  unset %dmhit }
  if ( %hp2 < 1 ) { timers off 
    msg $chan  %dmnick1 heeft gewonnen! 
    describe $chan buigt voor de gene die %dmnick2 de baas was! 
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %beurt
    unset %dmnick2
    unset %hp2
    unset %dmhit 
  unset %dmc } 
}


on *:TEXT:!dds:#dani_l11:{ set %dmhit $rand(0,25)
  set %dmhit1 $rand(0,25)
  if (%spec1 == 0 && $nick == %dmnick1) { msg $chan je hebt geen special meer... gebruik een andere optie 
  set %spec1 0 }
  if ($nick == %dmnick1 && %beurt == %dmnick1 && %spec1 != 0) { timers off
    set %totalhit %dmhit + %dmhit1
    if (%totalhit > %hp2) { set %spread $calc(%totalhit / 2)
      set %dmhit %spread
    set %dmhit %spread }
    set %spec1 %spec1 - 25
    msg $chan 11 %dmnick1 7gebruikt 25% van z'n special en heeft nu nog %spec1 $+ % over
    msg $chan 11 %dmnick1 7heeft4 %dmhit 7en4 %dmhit1 11gehit op11 %dmnick2
    set %hp2 %hp2 - %totalhit
    msg $chan 11 %dmnick2 7heeft nu nog4 %hp2 hp7 over!
    set %beurt %dmnick2
    notice %dmnick2 het is nu jouw beurt 
  /dmbeurt } 
  if (%spec2 == 0 && $nick == %dmnick2) { msg $chan je hebt geen special meer... gebruik een andere optie 
  set %spec2 0 }
  if ($nick == %dmnick2 && %beurt == %dmnick2 && %spec2 != 0) { timers off
    set %totalhit %dmhit + %dmhit1
    if (%totalhit > %hp1) { set %spread $calc(%totalhit / 2)
      set %dmhit %spread
    set %dmhit %spread }
    set %spec2 %spec2 - 25
    msg $chan 11 %dmnick2 7gebruikt 25% van z'n special en heeft nu nog %spec2 $+ % over
    msg $chan 11 %dmnick2 7heeft4 %dmhit 7en4 %dmhit1 11gehit op11 %dmnick1
    set %totalhit %dmhit + %dmhit1
    set %hp1 %hp1 - %totalhit
    msg $chan 11 %dmnick1 7heeft nu nog4 %hp1 hp7 over!
    set %beurt %dmnick1
    notice %dmnick1 het is nu jouw beurt 
  /dmbeurt }
  if ( %hp1 < 1 ) { timers off
    msg $chan  %dmnick2 heeft gewonnen!
    describe $chan buigt voor de gene die %dmnick1 de baas was! 
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %dmc
    unset %beurt
    unset %dmnick2
    unset %hp2 $(|) unset %shark1c $(|) unset %shark2c
  unset %dmhit }
  if ( %hp2 < 1 ) { timers off 
    msg $chan  %dmnick1 heeft gewonnen! 
    describe $chan buigt voor de gene die %dmnick2 de baas was! 
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %beurt
    unset %dmnick2
    unset %hp2
    unset %dmhit $(|) unset %shark1c $(|) unset %shark2c
  unset %dmc } 
}

on *:TEXT:!eat:#dani_l11:{ if ($nick == %dmnick1 && %beurt == %dmnick1 && %shark1 != 0) {
    timers off
    msg $chan 11 %dmnick1 7heeft een shark gegeten en heeft nu 20hp erbij
    set %hp1 %hp1 + 20
    msg $chan 11 %dmnick1 7heeft nu4 %hp1 hp
    set %beurt %dmnick2
    notice %dminck2 het is nu jouw beurt 
  /dmbeurt }
  if ($nick == %dmnick2 && %beurt == %dmnick2 && %shark2 != 0) { 
    timers off
    msg $chan 11 %dmnick2 7heeft een shark gegeten en heeft nu 20hp erbij
    set %hp2 %hp2 + 20
    msg $chan 11 %dmnick2 7heeft nu4 %hp2 hp
    set %beurt %dmnick1
    notice %dmnick1 het is nu jouw beurt
    /dmbeurt
  } 
}

on *:TEXT:!dharok:#dani_l11: { if ($nick == %dmnick1 && %beurt == %dmnick1 && %spec1 == 100 && %hp1 < 16) { set %dmhit $rand(35,75)
    set %hp2 %hp2 - %dmhit
    msg $chan 11 %dmnick1 7heeft 4 %dmhit 7gehit op11 %dmnick2
    msg $chan 11 %dmnick2 7heeft nu nog4 %hp2 hp 7over.
    msg $chan 11 %dmnick1 7heeft nu 0% spec. over.
    set %beurt %dmnick2
    notice %dmnick1 7het is nu jouw beurt 
  /dmbeurt }
  if ($nick == %dmnick1 && %spec1 != 100 && %hp1 < 16 && %beurt == %dmnick1) { msg $chan 7je hebt geen 100% doe eerst !reload voordat je dit probeert (kost een hele beurt) }
  if ($nick == %dmnick1 && %spec1 == 100 && %hp1 > 15 && %beurt == %dmnick1) { msg $chan 7je hebt niet 15hp of lager, als je dat niet hebt, kan je dit niet doen }
  if ($nick == %dmnick2 && %spec2 != 100 && %hp2 < 16 && %beurt == %dmnick2) { msg $chan 7je hebt geen 100% doe eerst !reload voordat je dit probeert (kost een hele beurt) }
  if ($nick == %dmnick2 && %spec2 == 100 && %hp2 > 15 && %beurt == %dmnick2) { msg $chan 7je hebt niet 15hp of lager, als je dat niet hebt, kan je dit niet doen }
  if ($nick == %dmnick2 && %beurt == %dmnick2 && %spec2 == 100 && %hp2 < 16) { set %dmhit $rand(35,75)
    set %hp1 %hp1 - %dmhit
    msg $chan 11 %dmnick2 7heeft 4 %dmhit 7gehit op11 %dmnick1
    msg $chan 11 %dmnick1 7heeft nu nog4 %hp1 hp 7over.
    msg $chan 11 %dmnick2 7heeft nu 0% spec. over.
    set %beurt %dmnick1
    notice %dmnick2 7het is nu jouw beurt 
  /dmbeurt }
  if ( %hp1 < 1 ) { timers off
    msg $chan  %dmnick2 heeft gewonnen!
    describe $chan buigt voor de gene die %dmnick1 de baas was! 
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %dmc
    unset %beurt
    unset %dmnick2
    unset %hp2
  unset %dmhit }
  if ( %hp2 < 1 ) { timers off 
    msg $chan  %dmnick1 heeft gewonnen! 
    describe $chan buigt voor de gene die %dmnick2 de baas was! 
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %beurt
    unset %dmnick2
    unset %hp2
    unset %dmhit 
  unset %dmc } 
}


on *:TEXT:!reload:#dani_l11: { if ($nick == %dmnick1 && %beurt == %dmnick1) { set %spec1 100
    msg $chan 7 %dmnick1 heeft nu weer 100% spec. 
    set %beurt %dmnick2
  /dmbeurt }
  if ($nick == %dmnick2 && %beurt == %dmnick2) { set %spec2 100
    msg $chan 7 %dmnick2 heeft nu weer 100% spec. 
    set %beurt %dmnick1
  /dmbeurt }
}


on *:TEXT:!stopdm:#dani_l11: { if ( %dmc > 1 ) { msg $chan de dm is gestopt!
    timers off
    unset %counterdm
    unset %dmnick1
    unset %hp1
    unset %beurt
    unset %dmnick2
    unset %hp2
    unset %dmhit
    unset %dmc 
halt } }

on *:TEXT:!dmcommands:#:{ msg $nick 7!whip om gewoon te slaan, kost 0% spec.
  msg $nick 7!dds om je dragon dagger te gebruiken, je kan hitten, kost %25
  msg $nick 7!dharok om dharok te gebruiken je kan heel goed hitten maar  je moet minstens 15hp of lager hebben, kost 100%
  msg $nick 7!reload doen je hit 0, brengt je spec. terug naar 100%
msg $nick 7!eat om te eten, geeft je 20hp, kost 0% }

on *:TEXT:!dm:#tzhaar:{ set %dmchan $chan
  if (%dmchan != #dani_l11) { msg $chan  join #dani_l11 voor een dead-match, typ /join #dani_l11
  HALT }