rendered paste bodyON *:TEXT:!dm:#duel1,#duel2:{
if ($readini(pdm.ini,$chan,Player1) == $nick || $readini(pdm.ini,$chan,Player2) == $nick) {
notice $nick You're already in the game.
halt
}
if ($readini(dm.ini,$chan,Status) == ON2) {
notice $nick There is already a Deathmatch, please wait until it is over or join another duel channel.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
writeini pdm.ini $chan Player2 $nick
writeini dm.ini $chan Status ON2
writeini hp.ini $chan Player2 99
writeini turn.ini $chan Turn $rand(1,2)
writeini shark.ini $chan Player2 20
writeini spec.ini $chan Player2 100
writeini spec.ini $chan Player1 100
msg $chan The deathmatch will be $readini(pdm.ini,$chan,Player1) vs. $readini(pdm.ini,$chan,Player2) $+ !
msg $chan $readini(pdm.ini,$chan,$+(Player,$readini(turn.ini,$chan,turn))) gets first hit.
notice $readini(pdm.ini,$chan,Player2) You have 99 hitpoints and 20 sharks, these replenish 20 hitpoints each.
timerduel $+ $chan 1 60 /stopdm $chan
halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
writeini pdm.ini $chan Player1 $nick
writeini dm.ini $chan Status ON
writeini hp.ini $chan Player1 99
writeini shark.ini $chan Player1 20
msg $chan $readini(pdm.ini,$chan,Player1) has initiated a deathmatch! Type !dm to fight $readini(pdm.ini,$chan,Player1) $+ .
timerduel $+ $chan 1 60 /stopdm $chan
notice $readini(pdm.ini,$chan,Player1) You have 99 hitpoints and 20 sharks, these replenish 20 hitpoints each.
halt
}
}
ON *:TEXT:!whip*:#duel1,#duel2:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no deathmatch in play, type !dm to initiate one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You do not have a challenger!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
set %chance $rand(0,2)
if (%chance == 2) || (%chance == 1) {
writeini hit.ini $chan Hit $rand(1,35)
} | else { writeini hit.ini $chan Hit 0 }
set %player2hp $readini(hp.ini,$chan,Player2)
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player1) lashes at $readini(pdm.ini,$chan,Player2) with a whip, hitting %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan $readini(pdm.ini,$chan,Player1) lashes at $readini(pdm.ini,$chan,Player2) with a whip, hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
set %chance $rand(0,2)
if (%chance == 2) || (%chance == 1) {
writeini hit.ini $chan Hit $rand(1,35)
} | else { writeini hit.ini $chan Hit 0 }
set %player1hp $readini(hp.ini,$chan,Player1)
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player2) lashes at $readini(pdm.ini,$chan,Player1) with a whip, hitting %player1hp $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan $readini(pdm.ini,$chan,Player2) lashes at $readini(pdm.ini,$chan,Player1) with a whip, hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
}
}
ON *:TEXT:!dh*:#duel1,#duel2:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no deathmatch in play, type !dm to initiate one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You do not have a challenger!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
if ($readini(hp.ini,$chan,Player1) >= 81) { writeini hit.ini $chan Hit $rand(0,20) }
elseif (($readini(hp.ini,$chan,Player1) >= 61) && ($readini(hp.ini,$chan,Player1) <= 80)) { writeini hit.ini $chan Hit $rand(0,30) }
elseif (($readini(hp.ini,$chan,Player1) >= 41) && ($readini(hp.ini,$chan,Player1) <= 60)) { writeini hit.ini $chan Hit $rand(0,40) }
elseif (($readini(hp.ini,$chan,Player1) >= 21) && ($readini(hp.ini,$chan,Player1) <= 40)) { writeini hit.ini $chan Hit $rand(0,50) }
elseif (($readini(hp.ini,$chan,Player1) > 10) && ($readini(hp.ini,$chan,Player1) <= 20)) { writeini hit.ini $chan Hit $rand(0,70) }
elseif (($readini(hp.ini,$chan,Player1) > 1) && ($readini(hp.ini,$chan,Player1) <= 10)) { writeini hit.ini $chan Hit $rand(5,85) }
elseif ($readini(hp.ini,$chan,Player1) = 1) { writeini hit.ini $chan Hit $rand(21,99) }
set %player2hp $readini(hp.ini,$chan,Player2)
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) with Dharok's Axe, hitting %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini dds.ini $chan Total
remini pdm.ini $chan Player2
halt
}
else {
msg $chan $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) with Dharok's Axe, hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
if ($readini(hp.ini,$chan,Player2) >= 81) { writeini hit.ini $chan Hit $rand(0,20) }
elseif (($readini(hp.ini,$chan,Player2) >= 61) && ($readini(hp.ini,$chan,Player2) <= 80)) { writeini hit.ini $chan Hit $rand(0,30) }
elseif (($readini(hp.ini,$chan,Player2) >= 41) && ($readini(hp.ini,$chan,Player2) <= 60)) { writeini hit.ini $chan Hit $rand(0,40) }
elseif (($readini(hp.ini,$chan,Player2) >= 21) && ($readini(hp.ini,$chan,Player2) <= 40)) { writeini hit.ini $chan Hit $rand(0,50) }
elseif (($readini(hp.ini,$chan,Player2) > 10) && ($readini(hp.ini,$chan,Player2) <= 20)) { writeini hit.ini $chan Hit $rand(0,70) }
elseif (($readini(hp.ini,$chan,Player2) > 1) && ($readini(hp.ini,$chan,Player2) <= 10)) { writeinihit.ini $chan Hit $rand(5,85) }
elseif ($readini(hp.ini,$chan,Player2) = 1) { writeini hit.ini $chan Hit $rand(21,99) }
set %player2hp $readini(hp.ini,$chan,Player1)
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) with Dharok's Axe, hitting %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) with Dharok's Axe, hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
}
}
ON *:TEXT:!eat*:#duel1,#duel2:{
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(shark.ini,$chan,Player2) <= 0 ) {
Notice $nick You are out of sharks!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(shark.ini,$chan,Player1) <= 0 ) {
Notice $nick You are out of sharks!
halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no deathmatch in play, type !dm to initiate one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You can't eat before you have a challenger!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
if ($readini(hp.ini,$chan,Player1) >= 79) { writeini hp.ini $chan Player1 99 }
elseif ($readini(hp.ini,$chan,Player1) < 79) { writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) + 20 ) }
writeini shark.ini $chan Player1 $calc( $readini(shark.ini,$chan,Player1) - 1)
notice $readini(pdm.ini,$chan,Player1) You now have $readini(shark.ini,$chan,Player1) sharks left.
msg $chan $readini(pdm.ini,$chan,Player1) has eaten a shark, and now has $readini(hp.ini,$chan,Player1) hp.
writeini turn.ini $chan Turn 2
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
if ($readini(hp.ini,$chan,Player2) >= 79) { writeini hp.ini $chan Player2 99 }
elseif ($readini(hp.ini,$chan,Player2) < 79) { writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) + 20 ) }
writeini shark.ini $chan Player2 $calc( $readini(shark.ini,$chan,Player2) - 1)
notice $readini(pdm.ini,$chan,Player2) You now have $readini(shark.ini,$chan,Player2) sharks left.
msg $chan $readini(pdm.ini,$chan,Player2) has eaten a shark, and now has $readini(hp.ini,$chan,Player2) hp.
writeini turn.ini $chan Turn 1
halt
}
else {
notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
}
}
ON *:TEXT:!dds*:#duel1,#duel2:{
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(spec.ini,$chan,Player1) <= 0 ) {
notice $nick You have no special bar remaining!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(spec.ini,$chan,Player2) <= 0 ) {
notice $nick You have no special bar remaining!
halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no deathmatch in play, type !dm to initiate one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You do not have a challenger!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
if ($readini(hp.ini,$chan,Player2) < 25) { writeini hit.ini $chan Hit $rand(0,$readini(hp.ini,$chan,Player2)) | writeini hit.ini $chan Hit2 $rand(0,$calc($readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit))) }
else { writeini hit.ini $chan Hit $rand(0,25) | if ($calc($readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit)) >= 25) { writeini hit.ini $chan Hit2 $rand(0,25) }
else { writeini hit.ini $chan Hit2 $rand(0,$calc($readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit))) } }
set %player2hp $readini(hp.ini,$chan,Player2)
writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(dds.ini,$chan,total) )
writeini spec.ini $chan Player1 $calc( $readini(spec.ini,$chan,Player1) - 25 )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player1) swipes at $readini(pdm.ini,$chan,Player2) with a DDS Special, hitting $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
notice $nick You have $readini(spec.ini,$chan,Player1) $+ % of your special bar left.
msg $chan $readini(pdm.ini,$chan,Player1) swipes at $readini(pdm.ini,$chan,Player2) with a DDS Special, hitting $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
if ($readini(hp.ini,$chan,Player1) < 25) { writeini hit.ini $chan Hit $rand(0,$readini(hp.ini,$chan,Player1)) | writeini hit.ini $chan Hit2 $rand(0,$calc($readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit))) }
else { writeini hit.ini $chan Hit $rand(0,25) | if ($calc($readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit)) >= 25) { writeini hit.ini $chan Hit2 $rand(0,25) }
else { writeini hit.ini $chan Hit2 $rand(0,$calc($readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit))) } }
set %player2hp $readini(hp.ini,$chan,Player1)
writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(dds.ini,$chan,total) )
writeini spec.ini $chan Player2 $calc( $readini(spec.ini,$chan,Player2) - 25 )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player2) swipes at $readini(pdm.ini,$chan,Player1) with a DDS Special, hitting $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
notice $nick You have $readini(spec.ini,$chan,Player2) $+ % of your special bar left.
msg $chan $readini(pdm.ini,$chan,Player2) swipes at $readini(pdm.ini,$chan,Player1) with a DDS Special, hitting $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
}
}
ON *:TEXT:!stopDM*:#duel1,#duel2:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no deathmatch in progress in this channel!
halt
}
if ($nick isop $chan || $nick ishop $chan) {
msg $chan Deathmatch was halted by $nick $+ .
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
}
else {
notice $nick You need +h or above to use this command.
}
}
ON *:TEXT:!dmcommands*:#duel1,#duel2:{
msg $nick !StopDM - Stops DM, can only be used by halfop and above.
msg $nick !DM - Initiate a DM.
msg $nick !Whip - Whip someone, max hit of 35, 66% chance of a hit.
msg $nick !DDS - Max hit of 25-25, good chance of hitting although it can hit 0. 4 specials allowed per deathmatch.
msg $nick !DH - Dharoks. Hits are as follows $chr(91) $+ (3 Your HP ) (4 Hit Range ) $+ $chr(93) $chr(124) $+ $chr(124) $chr(91) $+ (3 1hp ) (4 21-99 (Instant KO if opponent hp 21 or under) ) $+ $chr(93) $chr(124) $chr(91) $+ (3 2-19hp ) (4 0-70 ) $+ $chr(93) $chr(124) $chr(91) $+ (3 20-39hp ) (4 0-50 ) $+ $chr(93) $chr(124) $chr(91) $+ (3 40-59hp ) (4 0-40 ) $+ $chr(93) $chr(124) $chr(91) $+ (3 60-69hp ) (4 0-30 ) $+ $chr(93) $chr(124) $chr(91) $+ (3 70+hp ) (4 0-20 ) $+ $chr(93)
msg $nick !Eat - Eats a shark, giving you back 20hp, you have 20 of these.
msg $nick !verac - Gives you a definate low hit of 5-20.
msg $nick !barrage - Hits 75% chance of a hit, can hit up to 30.
msg $nick !tele - Teles you away, loser.
}
ON *:TEXT:!tele*:#duel1,#duel2:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no deathmatch in play, type !dm to initiate one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You cannot teleport before the deathmatch has begun!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player1) has teleported away.
msg $chan $readini(pdm.ini,$chan,Player2) wins the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player2) has teleported away.
msg $chan $readini(pdm.ini,$chan,Player1) wins the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
}
else { notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
}
}
ON *:TEXT:!verac*:#duel1,#duel2:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no deathmatch in play, type !dm to initiate one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You do not have a challenger!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
writeini hit.ini $chan Hit $rand(5,20)
set %player2hp $readini(hp.ini,$chan,Player2)
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player1) hits $readini(pdm.ini,$chan,Player2) with his flail, smacking %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan $readini(pdm.ini,$chan,Player1) hits $readini(pdm.ini,$chan,Player2) with his flail, smacking $readini(hit.ini,$chan,hit) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
writeini hit.ini $chan Hit $rand(5,20)
set %player1hp $readini(hp.ini,$chan,Player1)
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player2) hits $readini(pdm.ini,$chan,Player1) with his flail, smacking %player1hp $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan $readini(pdm.ini,$chan,Player2) hits $readini(pdm.ini,$chan,Player1) with his flail, smacking $readini(hit.ini,$chan,hit) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
}
}
ON *:TEXT:!barrage*:#duel1,#duel2:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no deathmatch in play, type !dm to initiate one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You do not have a challenger!
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
set %chance $rand(0,3)
if (%chance == 1) || (%chance == 2) || (%chance == 3) { writeini hit.ini $chan Hit $rand(1,30) }
else { writeini hit.ini $chan Hit 0 }
set %player2hp $readini(hp.ini,$chan,Player2)
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player1) attempts to cast ice barrage on $readini(pdm.ini,$chan,Player2) hitting %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan $readini(pdm.ini,$chan,Player1) attempts to cast ice barrage on $readini(pdm.ini,$chan,Player2) hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
timerduel $+ $chan off
timerduel $+ $chan 1 60 /stopdm $chan
writeini hit.ini $chan Hit $rand(5,20)
set %player1hp $readini(hp.ini,$chan,Player1)
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
timerduel $+ $chan off
msg $chan $readini(pdm.ini,$chan,Player2) attempts to cast ice barrage on $readini(pdm.ini,$chan,Player1) hitting %player1hp $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan $readini(pdm.ini,$chan,Player2) attempts to cast ice barrage on $readini(pdm.ini,$chan,Player1) hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
}
}
on 1:QUIT:{ if ($nick == $readini(pdm.ini,#duel1,Player1)) { stopdmquit #duel1 $nick $readini(pdm.ini,#duel1,Player2) }
elseif ($nick == $readini(pdm.ini,#duel1,Player2)) { stopdmquit #duel1 $nick $readini(pdm.ini,#duel1,Player1) }
elseif ($nick == $readini(pdm.ini,#duel2,Player1)) { stopdmquit #duel1 $nick $readini(pdm.ini,#duel1,Player2) }
elseif ($nick == $readini(pdm.ini,#duel2,Player2)) { stopdmquit #duel1 $nick $readini(pdm.ini,#duel1,Player1) }
}
on 1:PART:#duel1,#duel2:{ if ($nick == $readini(pdm.ini,#duel1,Player1)) { stopdmpart $chan $nick $readini(pdm.ini,$chan,Player2) }
elseif ($nick == $readini(pdm.ini,#duel1,Player2)) { stopdmquit $chan $nick $readini(pdm.ini,$chan,Player1) }
}
on 1:KICK:#duel1,#duel2:{ if ($knick == $readini(pdm.ini,#duel1,Player1)) { stopdmkick $chan $knick $readini(pdm.ini,$chan,Player2) }
elseif ($knick == $readini(pdm.ini,#duel1,Player2)) { stopdmkick $chan $nick $readini(pdm.ini,$chan,Player1) }
}
on 1:NICK:{ if ($nick == $readini(pdm.ini,#duel1,Player1)) { writeini pdm.ini #duel1 Player1 $newnick }
elseif ($nick == $readini(pdm.ini,#duel1,Player2)) { writeini pdm.ini #duel1 Player2 $newnick }
elseif ($nick == $readini(pdm.ini,#duel2,Player1)) { writeini pdm.ini #duel2 Player1 $newnick }
elseif ($nick == $readini(pdm.ini,#duel2,Player2)) { writeini pdm.ini #duel2 Player2 $newnick }
}