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 }