rendered paste bodyalias -l c1 { return $+($chr(3),14,$1-,$chr(3)) }
alias -l c2 { return $+($chr(3),04,$1-,$chr(3)) }
alias -l c3 { return $+($chr(3),06,$1-,$chr(3)) }
alias -l c4 { return $+($chr(3),02,$1-,$chr(3)) }
alias -l c5 { return $+($chr(3),03,$1-,$chr(3)) }
alias -l c6 { return $+($chr(3),07,$1-,$chr(3)) }
on *:TEXT:!dmcommands*:#: {
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
notice $nick $c3(¤) $c2(Dm Commands) $c3(¤)
notice $nick $c2(!dm) $c6(~) $c1(To start/join a Death Match)
notice $nick $c2(!stopdm) $c6(~) $c1(To stop a dm if you're in it)
notice $nick $c2(!defaultwin) $c6(~) $c1(Use it if your opponent doesnt attack)
notice $nick $c2(!rank Nick ) $c6(~) $c1(To see someone's DM Stats)
notice $nick $c2(!dmweps) $c6(~) $c1(To see the DM Weapons)
}
}
on *:TEXT:!dmweps*:#: {
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
notice $nick $c3(¤) $c2(Dm Weapons) $c3(¤)
notice $nick $c2(!dds) $c6(~) $c1(To dds spec your opponent, uses 25% spec)
notice $nick $c2(!whip) $c6(~) $c1(To whip your opponent)
notice $nick $c2(!d2h) $c6(~) $c1(To d2h your opponent)
notice $nick $c2(!cbow) $c6(~) $c1(To range your opponent)
notice $nick $c2(!dmace) $c6(~) $c1(To smash your opponent)
notice $nick $c2(!dh) $c6(~) $c1(To strike your opponent with your Dharok's Greataxe)
notice $nick $c2(!barrage) $c6(~) $c1(To barrage your opponent)
notice $nick $c2(!eat) $c6(~) $c1(To eat a shark and heal 20 hp)
notice $nick $c2(!spec) $c6(~) $c1(To recharge 25% spec)
notice $nick $c2(!dmcommands) $c6(~) $c1(To see the commands)
}
}
on *:TEXT:!rank*:#: {
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($2 == $null) {
notice $nick $c3(¤) $c6($nick) $c3(¤) $c2(Won:) $c6($readini(dm.ini,$nick,Won)) $c3(¤) $c2(Lost:) $c6($readini(dm.ini,$nick,Lost)) $c3(¤)
}
else {
notice $nick $c3(¤) $c6($2) $c3(¤) $c2(Won:) $c6($readini(dm.ini,$2,Won)) $c3(¤) $c2(Lost:) $c6($readini(dm.ini,$2,Lost)) $c3(¤)
}
}
}
on *:TEXT:!defaultwin*:#: {
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,AutoWin) == $readini(dm.ini,$chan,nick2) || $readini(dm.ini,$chan,AutoWin) == $readini(dm.ini,$chan,nick1)) {
halt
}
if ($nick == $readini(dm.ini,$chan,nick1) && $readini(dm.ini,$chan,turn) == 2) {
msg $chan $c2($nick) $c1(has called for a) $c2(default win.) $c1(If) $c2($readini(dm.ini,$chan,nick2)) $c1(doesn't attack in 1 minute) $c2($nick) $c1(Wins !)
writeini -n dm.ini $chan AutoWin $readini(dm.ini,$chan,nick2)
timer $+ $chan $+ AutoWin1 1 60 writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
timer $+ $chan $+ AutoWin2 1 60 writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
timer $+ $chan $+ AutoWin3 1 60 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!) $c4((by default))
timer $+ $chan $+ AutoWin4 1 60 remini -n dm.ini $chan
halt
}
if ($nick == $readini(dm.ini,$chan,nick2) && $readini(dm.ini,$chan,turn) == 1) {
msg $chan $c2($nick) $c1(has called for a) $c2(default win.) $c1(If) $c2($readini(dm.ini,$chan,nick1)) $c1(doesn't attack in 1 minute) $c2($nick) $c1(Wins !)
writeini -n dm.ini $chan AutoWin $readini(dm.ini,$chan,nick1)
timer $+ $chan $+ AutoWin1 1 60 writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
timer $+ $chan $+ AutoWin2 1 60 writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
timer $+ $chan $+ AutoWin3 1 60 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!) $c4((by default))
timer $+ $chan $+ AutoWin4 1 60 remini -n dm.ini $chan
halt
}
}
}
on *:TEXT:!dm:#: {
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,status) == on) {
notice $nick $c3(¤) $c1(There's already a) $c2(Death Match) $c1(active) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(You're already in the) $c2(Death Match) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick2)) == $null) {
writeini -n dm.ini $chan nick2 $nick
writeini -n dm.ini $chan turn 1
writeini -n dm.ini $chan status on
timer $+ $chan $+ 1 off
timer $+ $chan $+ 2 off
msg $chan $c2(DeathMath!) $c5($readini(dm.ini,$chan,nick1)) $c1(vs.) $c5($readini(dm.ini,$chan,nick2) !) $c1(Type) $c2(!DmWeps) $c1(to see how to attack!) $c2(Let the fight BEGIN !)
notice $readini(dm.ini,$chan,nick1) $c3(¤) $c1(You are attacking first!) $c2(Good luck!) $c3(¤)
notice $readini(dm.ini,$chan,nick2) $c3(¤) $c2($readini(dm.ini,$chan,nick1)) $c1(is attacking first!) $c2(Good luck!) $c3(¤)
}
if ($readini(dm.ini,$chan,status) == $null) {
writeini -n dm.ini $chan barrage1 3
writeini -n dm.ini $chan barrage2 3
writeini -n dm.ini $chan status waiting
writeini -n dm.ini $chan nick1 $nick
writeini -n dm.ini $chan nick1hp 99
writeini -n dm.ini $chan nick2hp 99
writeini -n dm.ini $chan nick1sharks 3
writeini -n dm.ini $chan nick2sharks 3
writeini -n dm.ini $chan nick1spec 100
writeini -n dm.ini $chan nick2spec 100
timer $+ $chan $+ 1 1 30 remini -n dm.ini $chan
timer $+ $chan $+ 2 1 30 msg $chan $c1(The) $c2(Death Math) $c1(has been canceled) $c2((Not enough players))
msg $chan $c2($nick) $c1(has started a) $c2(DeathMath!) $c1(To fight) $c2($nick) $c1(type) $c2(!Dm)
}
}
}
on $*:TEXT:/^[!](dds|ddagger|dagger)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1) && ($readini(dm.ini,$chan,nick1) == $nick) && ($readini(dm.ini,$chan,nick1spec) <= 24) {
notice $nick $c3(¤) $c1(You don't have enough) $c2(energy) $c1(left!) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp)
writeini -n dm.ini $chan oldspec1 $readini(dm.ini,$chan,nick1spec)
writeini -n dm.ini $chan nick1spec $calc( $readini(dm.ini,$chan,oldspec1) - 25 )
writeini -n dm.ini $chan hit1 $rand(1,20)
writeini -n dm.ini $chan hit2 $rand(1,25)
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1) + $readini(dm.ini,$chan,hit2)) )
if ($readini(dm.ini,$chan,nick2hp) <= 0) {
msg $chan $c2($nick) $c1(specs a) $c2($readini(dm.ini,$chan,hit1)) $c1(and a) $c2($readini(dm.ini,$chan,hit2)) $c1(on) $c2($readini(dm.ini,$chan,nick2) $+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(specs a) $c2($readini(dm.ini,$chan,hit1)) $c1(and a) $c2($readini(dm.ini,$chan,hit2)) $c1(on) $c2($readini(dm.ini,$chan,nick2)$+ 12.) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick1spec) $+ %) $c1(spec left) $c3(¤)
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2spec) <= 24) {
notice $nick $c3(¤) $c1(You don't have enough) $c2(energy) $c1(left!) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp)
writeini -n dm.ini $chan oldspec2 $readini(dm.ini,$chan,nick2spec)
writeini -n dm.ini $chan nick2spec $calc( $readini(dm.ini,$chan,oldspec2) - 25 )
writeini -n dm.ini $chan hit1 $rand(1,25)
writeini -n dm.ini $chan hit2 $rand(1,25)
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1) - $readini(dm.ini,$chan,hit2) )
if ($readini(dm.ini,$chan,nick1hp) <= 0) {
msg $chan $c2($nick) $c1(specs a) $c2($readini(dm.ini,$chan,hit1)) $c1(and a) $c2($readini(dm.ini,$chan,hit2)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(specs a) $c2($readini(dm.ini,$chan,hit1)) $c1(and a) $c2($readini(dm.ini,$chan,hit2)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick2spec) $+ %) $c1(spec left) $c3(¤)
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
halt
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on $*:TEXT:/^[!](heal|shark|eat)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Math's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2sharks) <= 0) {
notice $nick $c3(¤) $c1(You have no sharks left) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,nick1sharks) <= 0) {
notice $nick $c3(¤) $c1(You have no sharks left) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan nick1hp $calc($readini(dm.ini,$chan,nick1hp)+20)
writeini -n dm.ini $chan nick1sharks $calc($readini(dm.ini,$chan,nick1sharks) - 1)
if ($readini(dm.ini,$chan,nick1hp) >= 100) {
writeini -n dm.ini $chan nick1hp 99
msg $chan $c2($nick) $c1(ate a Shark.) $c2($nick) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hitpoints left)
notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick1sharks)) $c1(shark/s left) $c3(¤)
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
writeini -n dm.ini $chan Turn 2
halt
}
else {
msg $chan $c2($nick) $c1(ate a Shark.) $c2($nick) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hitpoints left)
notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick1sharks)) $c1(shark left) $c3(¤)
writeini -n dm.ini $chan Turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan nick2hp $calc($readini(dm.ini,$chan,nick2hp)+20)
writeini -n dm.ini $chan nick2sharks $calc($readini(dm.ini,$chan,nick2sharks) - 1)
if ($readini(dm.ini,$chan,nick2hp) >= 100) {
writeini -n dm.ini $chan nick2hp 99
msg $chan $c2($nick) $c1(ate a Shark.) $c2($nick) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hitpoints left)
notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick2sharks)) $c1(shark/s left) $c3(¤)
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
writeini -n dm.ini $chan Turn 1
halt
}
else {
msg $chan $c2($nick) $c1(ate a Shark.) $c2($nick) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hitpoints left)
notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick2sharks)) $c1(shark/s left) $c3(¤)
writeini -n dm.ini $chan Turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
halt
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on $*:TEXT:/^[!](stopdm|enddm|haltdm)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($nick == Nedyc) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick $+ .)
remini -n dm.ini $chan
}
if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick $+ .)
remini -n dm.ini $chan
}
if ($nick == $readini(dm.ini,$chan,nick2)) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick $+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
remini -n dm.ini $chan
halt
}
if ($nick == $readini(dm.ini,$chan,nick1)) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick $+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(is the winner!)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Won) + 1 )
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
if ($nick isop $chan) {
if ($chan == #Nedyc) { halt }
remini -n dm.ini $chan
msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick)
halt
}
}
}
on $*:TEXT:/^[!](dmace|mace|dragonmace)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp)
writeini -n dm.ini $chan hit1 $rand(0,40)
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick2hp) <= 0) {
msg $chan $c2($nick) $c1(smashes) $c2($readini(dm.ini,$chan,nick2)) $c1(with a dragon mace hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(smashes) $c2($readini(dm.ini,$chan,nick2)) $c1(with a dragon mace hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp)
writeini -n dm.ini $chan hit1 $rand(0,40)
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1))
if ($readini(dm.ini,$chan,nick1hp) <= 0) {
msg $chan $c2($nick) $c1(smashes) $c2($readini(dm.ini,$chan,nick1)) $c1(with a dragon mace hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(smashes) $c2($readini(dm.ini,$chan,nick1)) $c1(with a dragon mace hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on $*:TEXT:/^[!](cbow|xbow|bow)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp)
writeini -n dm.ini $chan hit1 $rand(1,35)
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick2hp) <= 0) {
msg $chan $c2($nick) $c1(fires an arrow to) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(fires an arrow to) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp)
writeini -n dm.ini $chan hit1 $rand(1,35)
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1))
if ($readini(dm.ini,$chan,nick1hp) <= 0) {
msg $chan $c2($nick) $c1(fires an arrow to) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(fires an arrow to) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on $*:TEXT:/^[!](d2h|2h|dragon2h)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp)
writeini -n dm.ini $chan hit1 $rand(1,35)
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick2hp) <= 0) {
msg $chan $c2($nick) $c1(d2hnd's a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick2)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(d2hnd's a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick2)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp)
writeini -n dm.ini $chan hit1 $rand(1,35)
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1))
if ($readini(dm.ini,$chan,nick1hp) <= 0) {
msg $chan $c2($nick) $c1(d2hnd's a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(d2hnd's a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on $*:TEXT:/^[!](whip|flick|lash)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp)
writeini -n dm.ini $chan hit1 $rand(10,30)
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick2hp) <= 0) {
msg $chan $c2($nick) $c1(whips a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick2)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(whips a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick2)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp)
writeini -n dm.ini $chan hit1 $rand(10,30)
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1))
if ($readini(dm.ini,$chan,nick1hp) <= 0) {
msg $chan $c2($nick) $c1(whips a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(whips a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on $*:TEXT:/^[!](dh|dharock|gaxe)$/Si:*:{
if ($readini(dm.ini,$chan,$nick) == Dharock) {
notice $nick $c3(¤) $c1(You are still recovering from your) $c2(Dharok) $c1(hit before. Use another attack) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp)
writeini -n dm.ini $chan hit1 $rand(1,60)
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick2hp) <= 0) {
msg $chan $c2($nick) $c1(strikes at) $c2($readini(dm.ini,$chan,nick2)) $c1(with his greataxe hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
msg $chan $c2($nick) $c1(strikes at) $c2($readini(dm.ini,$chan,nick2)) $c1(with his greataxe hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
writeini -n dm.ini $chan $nick Dharock
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp)
writeini -n dm.ini $chan hit1 $rand(1,35)
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1))
if ($readini(dm.ini,$chan,nick1hp) <= 0) {
msg $chan $c2($nick) $c1(strikes at) $c2($readini(dm.ini,$chan,nick1)) $c1(with his greataxe hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
else {
msg $chan $c2($nick) $c1(strikes at) $c2($readini(dm.ini,$chan,nick1)) $c1(with his greataxe hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
writeini -n dm.ini $chan $nick Dharock
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on *:TEXT:!adddmchan*:#:{
if ($nick == Nedyc) {
writeini -n alloweddm.ini $2 allowed allowed
notice $nick $c3(¤) $c1(Added) $c2($2) $c1(to the Allowed List) $c3(¤)
}
}
on *:TEXT:!deldmchan*:#:{
if ($nick == Nedyc) {
remini -n alloweddm.ini $2 allowed
notice $nick $c3(¤) $c1(Removed) $c2($2) $c1(from the Allowed List) $c3(¤)
}
}
on $*:TEXT:/^[!](ice|barrage|ancient)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,barrage2) <= 0) {
notice $nick $c3(¤) $c1(You are out of runes) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,barrage1) <= 0) {
notice $nick $c3(¤) $c1(You are out of runes) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp)
writeini -n dm.ini $chan hit1 $rand(1,30)
writeini -n dm.ini $chan freeze $rand(1,10)
writeini -n dm.ini $chan barrage1 $calc($readini(dm.ini,$chan,barrage1)-1)
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick2hp) <= 0) {
msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
remini -n dm.ini $chan
halt
}
elseif ($readini(dm.ini,$chan,freeze) >= 5) {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
msg $chan $c2($readini(dm.ini,$chan,nick2)) $c1(has been frozen and missed their turn!) $c1(It is) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn again!)
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp)
writeini -n dm.ini $chan hit1 $rand(1,30)
writeini -n dm.ini $chan barrage2 $calc($readini(dm.ini,$chan,barrage2)-1)
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1))
writeini -n dm.ini $chan freeze $rand(1,10)
if ($readini(dm.ini,$chan,nick1hp) <= 0) {
msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
elseif ($readini(dm.ini,chan,freeze) <= 5) {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
msg $chan $c2($readini(dm.ini,$chan,nick1)) $c1(has been frozen and missed their turn!) $c1(It is) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn again!)
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
halt
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on *:TEXT:!win*:#: {
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,status) == on) {
if ($nick == Nedyc) {
msg $chan $c2($nick) $c1(randomly comes into the fight and hits a) $c2(99) $c1(on) $c2($readini(dm.ini,$chan,nick1)) $c1(and) $c2($readini(dm.ini,$chan,nick2)) $c1(. Owned Pl0x!) $c2(Nedyc WINS :D)
remini -n dm.ini $chan
}
}
}
}
on *:TEXT:!spec*:#: {
if ($1 == !speccheck) { halt }
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2spec) >= 100) {
notice $nick $c3(¤) $c1(You already have max spec) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,nick1spec) >= 100) {
notice $nick $c3(¤) $c1(You already have max spec) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan nick1spec $calc( $readini(dm.ini,$chan,nick1spec)+25)
msg $chan $c2($nick) $c1(recharged) $c2(25%) $c1(of their spec,) $c2($nick) $c1(now has) $c2($readini(dm.ini,$chan,nick1spec) $+ %) $c1(spec)
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
writeini -n dm.ini $chan Turn 2
halt
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan nick2spec $calc( $readini(dm.ini,$chan,nick2spec)+25)
msg $chan $c2($nick) $c1(recharged) $c2(25%) $c1(of their spec,) $c2($nick) $c1(now has) $c2($readini(dm.ini,$chan,nick2spec) $+ %) $c1(spec)
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
writeini -n dm.ini $chan Turn 1
halt
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
on 1:NICK: {
if ($nick == $readini(dm.ini,$chan,nick1)) {
writeini dm.ini $chan nick1 $newnick
halt
}
if ($nick == $readini(dm.ini,$chan,nick2)) {
writeini dm.ini $chan nick2 $newnick
halt
}
}
on *:QUIT: {
if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) {
remini -n dm.ini $chan
msg $chan $c2(Death Match) $c1(cancelled)
halt
}
if ($nick == $readini(dm.ini,$chan,nick1)) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Won) + 1 )
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
if ($nick == $readini(dm.ini,$chan,nick2)) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
remini -n dm.ini $chan
halt
}
}
on *:KICK:#: {
if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $knick) {
remini -n dm.ini $chan
msg $chan $c2(Death Match) $c1(cancelled)
halt
}
if ($knick == $readini(dm.ini,$chan,nick1)) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Won) + 1 )
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
if ($knick == $readini(dm.ini,$chan,nick2)) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
remini -n dm.ini $chan
halt
}
}
on *:PART:#: {
if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) {
remini -n dm.ini $chan
msg $chan $c2(Death Match) $c1(cancelled)
halt
}
if ($nick == $readini(dm.ini,$chan,nick1)) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Won) + 1 )
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
if ($nick == $readini(dm.ini,$chan,nick2)) {
msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
remini -n dm.ini $chan
halt
}
}
on $*:TEXT:/^[!](guth|guthans|guth)$/Si:*:{
if ($readini(alloweddm.ini,$chan,allowed) == $null) {
notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
halt
}
if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,AutoWin) == $nick) {
timer $+ $chan $+ AutoWin1 off
timer $+ $chan $+ AutoWin2 off
timer $+ $chan $+ AutoWin3 off
timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
msg $chan $c2(Default Win) $c1(ended)
}
if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) {
notice $nick $c3(¤) $c1(Please wait) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,status) == waiting) {
notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤)
halt
}
if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) {
writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp)
writeini -n dm.ini $chan hit1 $rand(5,30)
writeini -n dm.ini $chan heal $rand(1,10)
writeini -n dm.ini $chan barrage1 $calc($readini(dm.ini,$chan,barrage1)-1)
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick2hp) <= 0) {
msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
remini -n dm.ini $chan
halt
}
elseif ($readini(dm.ini,$chan,heal) >= 5) {
remini -n dm.ini $chan $nick
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) + ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick1hp >= 100)) {
writeini -n dm.ini $chan nick1hp 99
}
msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(is able to heal himself using guthans and now has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hitpoints.) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 2
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!)
halt
}
}
if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) {
writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp)
writeini -n dm.ini $chan hit1 $rand(5,30)
writeini -n dm.ini $chan barrage2 $calc($readini(dm.ini,$chan,barrage2)-1)
writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1))
writeini -n dm.ini $chan heal $rand(1,10)
if ($readini(dm.ini,$chan,nick1hp) <= 0) {
msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!)
timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
remini -n dm.ini $chan
halt
}
elseif ($readini(dm.ini,chan,heal) <= 5) {
remini -n dm.ini $chan $nick
writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) + ($readini(dm.ini,$chan,hit1)) )
if ($readini(dm.ini,$chan,nick2hp >= 100)) {
writeini -n dm.ini $chan nick2hp 99
}
msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(is able to heal himself using guthans and now has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hitpoints.) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
halt
}
else {
remini -n dm.ini $chan $nick
msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
writeini -n dm.ini $chan turn 1
msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
halt
}
}
else {
notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
}
}
}
alias -l hiscore_duel {
var %alls = 0, %allp = 0, %wins = 0, %winp = 0, %loss = 0, %losp = 0, %a = 0
while (%a < $readini(dm.ini,0,Won)) {
var %a = %a + 1, %p = $readini(dm.ini,,%a), %s = $readini(duels.ini,alltime,%p), %win = $gettok(%s,1,32), %los = $gettok(%s,2,32)
if (%win > %wins) var %wins = $v1, %winp = %p
if (%los > %loss) var %loss = $v1, %losp = %p
if ($calc(%los + %win) > %alls) var %alls = $v1, %allp = %p
}
notice $1 $c1(Most Wins:) $+($c2(%winp),$c1($chr(40)),$c2(%wins),$c1($chr(41)))
notice $1 $c1(Most Losses:) $+($c2(%losp),$c1($chr(40)),$c2(%loss),$c1($chr(41)))
notice $1 $c1(Most DMs played:) $+($c2(%allp),$c1($chr(40)),$c2(%alls),$c1($chr(41)))
}
alias -l checkscore {
var %alls = 0, %allp = 0, %wins = 0, %winp = 0, %loss = 0, %losp = 0, %a = 0
while (%a < $ini(duels.ini,alltime,0)) {
var %a = %a + 1, %p = $ini(duels.ini,alltime,%a), %s = $readini(duels.ini,alltime,%p), %win = $gettok(%s,1,32), %los = $gettok(%s,2,32)
if (%win > %wins) var %wins = $v1, %winp = %p
if (%los > %loss) var %loss = $v1, %losp = %p
if ($calc(%los + %win) > %alls) var %alls = $v1, %allp = %p
}
return %allp %winp %losp
}