rendered paste bodyon *:text:!dm on:#: {
if ($nick isop $chan) || ($nick ishop $chan) || ($nick == Aile) || ($nick == kura) {
set %deathmatch [ $+ [ $chan ] ] enabled
msg $chan DeathMatch for $chan has been enabled.
}
}
on *:text:!dm off:#: {
if ($nick isop $chan) || ($nick ishop $chan) || ($nick == Aile) || ($nick == kura) {
unset %deathmatch [ $+ [ $chan ] ]
msg $chan DeathMatch for $chan has been disabled.
}
}
on *:TEXT:!items:#:{
notice $nick You can currently use these items in a DM:
notice $nick [WEAPONS] !whip, !dds, !dharoks, !ice barrage
notice $nick [FOOD] !shark
notice $nick [OTHER] !enddm, !recharge
}
on *:TEXT:!enddm:#:{
if ($address($nick,2) == $address($me,2)) || ($nick isop $chan) || ($nick == %dm1 [ $+ [ $chan ] ]) || ($nick == %dm2 [ $+ [ $chan ] ]) {
if (%dmstatus [ $+ [ $chan ] ] != $null) {
msg $chan $color1 $+ The current $+ $color2 DM $color1 $+ is canceled by $color2 $+ $nick $+ $color1 $+ .
}
else {
notice $nick There is no DM running on this channel!
}
unset %dm1 [ $+ [ $chan ] ]
unset %dm2 [ $+ [ $chan ] ]
unset %dmstatus [ $+ [ $chan ] ]
unset %dmturn [ $+ [ $chan ] ]
unset %dmhp1 [ $+ [ $chan ] ]
unset %dmhp2 [ $+ [ $chan ] ]
unset %dmdd1 [ $+ [ $chan ] ]
unset %dmdd2 [ $+ [ $chan ] ]
}
}
on *:TEXT:!endall*:#:{
if ($address($nick,2) == $address($me,2)) || ($nick == kura) {
amsg [AMSG] $nick is ending all games. Reason: $2-
unset %dm1*
unset %dm2*
unset %dmstatus*
unset %dmturn*
unset %dmhp1*
unset %dmhp2*
unset %dmdd1*
unset %dmdd2*
}
}
on *:TEXT:!dm*:#:{
if (%deathmatch [ $+ [ $chan ] ] == enabled) {
if ($chan == #tdc) {
notice $nick Oh no, NO DM's in $chan $+ , you $nick $+ -being-noob! Invite [DM]Mighty into another channel!
else {
if (%dmstatus [ $+ [ $chan ] ] == $null) {
set %dmstatus $+ $chan open
set %dm1 $+ $chan $nick
msg $chan $color2 $+ $nick $color1 $+ is challenging anybody in $+ $color2 $chan $color1 $+ to DM him! Show us how brave you are and accept the challenge by typing $color2 $+ !dm $color1 $+ .
}
elseif (%dmstatus [ $+ [ $chan ] ] == open) {
if ($nick == %dm1 [ $+ [ $chan ] ]) {
notice $nick You cannot fight yourself!
}
else {
set %dmstatus $+ $chan on
set %dm2 $+ $chan $nick
set %dmhp1 $+ $chan 99
set %dmhp2 $+ $chan 99
set %dmspec1 $+ $chan 100
set %dmspec2 $+ $chan 100
msg $chan $+ $color2 $+ $nick $color1 $+ has accepted the challenge and will fight against $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $+ $color1 $+ !
var %dmstart = $rand(1,2)
describe $chan gambles the dices..
if (%dmstart == 1) {
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ may start this battle by typing the first command.
set %dmturn $+ $chan 1
}
elseif (%dmstart == 2) {
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ may start this battle by typing the first command.
set %dmturn $+ $chan 2
}
msg $chan $color1 $+ To view all available items, type $+ $color2 $+ !items $color1 $+ .
}
elseif (%dmstatus [ $+ [ $chan ] ] == on) {
notice $nick There is already a DM running. Please try again later!
}
}
}
}
}
}
on *:TEXT:!whip:#:{
if (%dmstatus [ $+ [ $chan ] ] == on) {
if ($nick == %dm1 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 1) {
var %hit = $rand(0,35)
if (%hit >= %dmhp2 [ $+ [ $chan ] ]) {
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has been killed! $+ $color2 $+ $nick $color1 $+ kills $+ $color2 %dm2 [ $+ [ $chan ] ] $color1 $+ with a crushing $+ $color2 %dmhp2 [ $+ [ $chan ] ] $+ $color1 $+ .
inc %dmn [ $+ [ $nick ] ]
var %p = %dm2 [ $+ [ $chan ] ]
inc %dml [ $+ [ %p ] ]
if (%dml [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dmn [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
var %k = %dmn [ $+ [ $nick ] ]
var %l = %dml [ $+ [ $nick ] ]
var %a = %dmn [ $+ [ %p ] ]
var %s = %dml [ $+ [ %p ] ]
var %n = $calc(%k / (%k + %l))
var %x = $calc(%a / (%a + %s))
msg $chan $+ $color2 $+ $nick $color1 $+ has $+ $color2 %dmn [ $+ [ $nick ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ $nick ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%n * 100) $+ $color1 $+ $chr(37) $+ !
msg $chan $+ $color2 $+ %p $color1 $+ has $+ $color2 %dmn [ $+ [ %p ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ %p ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%x * 100) $+ $color1 $+ $chr(37) $+ !
unset %dm1 $+ $chan
unset %dm2 $+ $chan
unset %dmstatus $+ $chan
unset %dmturn $+ $chan
unset %dmhp1 $+ $chan
unset %dmhp2 $+ $chan
unset %dmspec1 $+ $chan
unset %dmspec2 $+ $chan
}
else {
set %dmhp2 $+ $chan $calc(%dmhp2 [ $+ [ $chan ] ] - %hit)
msg $chan $+ $color2 $+ $nick $color1 $+ pulls out $+ $color2 $+ an abyssal whip $color1 $+ and hits $+ $color2 %hit $color1 $+ on $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $+ $color1 $+ !
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has now $+ $color2 %dmhp2 [ $+ [ $chan ] ] $color1 $+ hp left!
set %dmturn $+ $chan 2
}
}
elseif ($nick == %dm2 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 2) {
var %hit = $rand(0,35)
if (%hit >= %dmhp1 [ $+ [ $chan ] ]) {
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has been killed! $+ $color2 $+ $nick $color1 $+ kills $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ with a crushing $+ $color2 %dmhp1 [ $+ [ $chan ] ] $+ $color1 $+ .
inc %dmn [ $+ [ $nick ] ]
var %p = %dm1 [ $+ [ $chan ] ]
inc %dml [ $+ [ %p ] ]
if (%dml [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dmn [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dml [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
if (%dmn [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
var %k = %dmn [ $+ [ $nick ] ]
var %l = %dml [ $+ [ $nick ] ]
var %a = %dmn [ $+ [ %p ] ]
var %s = %dml [ $+ [ %p ] ]
var %n = $calc(%k / (%k + %l))
var %x = $calc(%a / (%a + %s))
msg $chan $+ $color2 $+ $nick $color1 $+ has $+ $color2 %dmn [ $+ [ $nick ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ $nick ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%n * 100) $+ $color1 $+ $chr(37) $+ !
msg $chan $+ $color2 $+ %p $color1 $+ has $+ $color2 %dmn [ $+ [ %p ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ %p ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%x * 100) $+ $color1 $+ $chr(37) $+ !
unset %dm1 $+ $chan
unset %dm2 $+ $chan
unset %dmstatus $+ $chan
unset %dmturn $+ $chan
unset %dmhp1 $+ $chan
unset %dmhp2 $+ $chan
unset %dmspec1 $+ $chan
unset %dmspec2 $+ $chan
}
else {
set %dmhp1 $+ $chan $calc(%dmhp1 [ $+ [ $chan ] ] - %hit)
msg $chan $+ $color2 $+ $nick $color1 $+ pulls out $+ $color2 $+ an abyssal whip $color1 $+ and hits $+ $color2 %hit $color1 $+ on $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $+ $color1 $+ !
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has now $+ $color2 %dmhp1 [ $+ [ $chan ] ] $color1 $+ hp left!
set %dmturn $+ $chan 1
}
}
}
}
on *:TEXT:!shark:#:{
if (%dmstatus [ $+ [ $chan ] ] == on) {
if ($nick == %dm1 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 1) {
var %dmshark = $rand(1,20)
set %dmturn [ $+ [ $chan ] ] 2
if (%dmshark isnum 1) {
set %dmhp2 [ $+ [ $chan ] ] $calc(%dmhp2 [ $+ [ $chan ] ] + 20)
msg $chan $+ $color2 $+ $nick $color1 $+ accidently drops the shark. $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ takes it and eats it.
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has healed $+ $color2 20 $color1 $+ hp. He has $+ $color2 %dmhp2 [ $+ [ $chan ] ] $color1 $+ hp now!
}
else {
set %dmhp1 [ $+ [ $chan ] ] $calc(%dmhp1 [ $+ [ $chan ] ] + 20)
msg $chan $+ $color2 $+ $nick $color1 $+ eats the shark and heals $+ $color2 20 $color1 $+ hp. He has $+ $color2 %dmhp1 [ $+ [ $chan ] ] $color1 $+ hp now!
}
}
elseif ($nick == %dm2 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 2) {
var %dmshark = $rand(1,20)
set %dmturn [ $+ [ $chan ] ] 1
if (%dmshark isnum 1) {
set %dmhp1 [ $+ [ $chan ] ] $calc(%dmhp1 [ $+ [ $chan ] ] + 20)
msg $chan $+ $color2 $+ $nick $color1 $+ accidently drops the shark. $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ takes it and eats it.
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has healed $+ $color2 20 $color1 $+ hp. He has $+ $color2 %dmhp1 [ $+ [ $chan ] ] $color1 $+ hp now!
}
else {
set %dmhp2 [ $+ [ $chan ] ] $calc(%dmhp2 [ $+ [ $chan ] ] + 20)
msg $chan $+ $color2 $+ $nick $color1 $+ eats the shark and heals $+ $color2 20 $color1 $+ hp. He has $+ $color2 %dmhp2 [ $+ [ $chan ] ] $color1 $+ hp now!
}
}
}
}
on *:TEXT:!dds*:#:{
if (%dmstatus [ $+ [ $chan ] ] == on) {
if ($nick == %dm1 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 1) {
if (%dmspec1 [ $+ [ $chan ] ] < 25) {
notice $nick You do not have enough specs left! Type !recharge to add 25%.
notice $nick You have currently got %dmspec1 [ $+ [ $chan ] ] % remaining! 25% is required for a DD spec!
halt
}
else {
set %dmspec1 [ $+ [ $chan ] ] $calc(%dmspec1 [ $+ [ $chan ] ] - 25)
notice $nick Your special attack bar has now %dmspec1 [ $+ [ $chan ] ] $+ % remaining!
var %hit1 = $rand(0,30)
var %hit2 = $rand(0,30)
var %hit = $calc(%hit1 + %hit2)
if (%hit >= %dmhp2 [ $+ [ $chan ] ]) {
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has been killed! $+ $color2 $+ $nick $color1 $+ kills $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ with $+ $color2 %hit1 $color1 $+ and $+ $color2 %hit2 $color1 $+ !
inc %dmn [ $+ [ $nick ] ]
var %p = %dm2 [ $+ [ $chan ] ]
inc %dml [ $+ [ %p ] ]
if (%dml [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dmn [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dml [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
if (%dmn [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
var %k = %dmn [ $+ [ $nick ] ]
var %l = %dml [ $+ [ $nick ] ]
var %a = %dmn [ $+ [ %p ] ]
var %s = %dml [ $+ [ %p ] ]
var %n = $calc(%k / (%k + %l))
var %x = $calc(%a / (%a + %s))
msg $chan $+ $color2 $+ $nick $color1 $+ has $+ $color2 %dmn [ $+ [ $nick ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ $nick ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%n * 100) $+ $color1 $+ $chr(37) $+ !
msg $chan $+ $color2 $+ %p $color1 $+ has $+ $color2 %dmn [ $+ [ %p ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ %p ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%x * 100) $+ $color1 $+ $chr(37) $+ !
unset %dm1 $+ $chan
unset %dm2 [ $+ [ $chan ] ]
unset %dmstatus [ $+ [ $chan ] ]
unset %dmturn [ $+ [ $chan ] ]
unset %dmhp1 [ $+ [ $chan ] ]
unset %dmhp2 [ $+ [ $chan ] ]
unset %dmspec1 [ $+ [ $chan ] ]
unset %dmspec2 [ $+ [ $chan ] ]
}
else {
set %dmhp2 [ $+ [ $chan ] ] $calc(%dmhp2 [ $+ [ $chan ] ] - %hit)
msg $chan $+ $color2 $+ $nick $color1 $+ pulls out $+ $color2 $+ a dragon dagger $color1 $+ and hits $+ $color2 %hit1 $color1 $+ and $+ $color2 %hit2 $color1 $+ on $+ $color2 %dm2 [ $+ [ $chan ] ] $+ $color1 $+ !
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has now $+ $color2 %dmhp2 [ $+ [ $chan ] ] $color1 $+ hp left!
set %dmturn [ $+ [ $chan ] ] 2
}
}
}
if ($nick == %dm2 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 2) {
if (%dmspec2 [ $+ [ $chan ] ] < 25) {
notice $nick You do not have enough specs left! Type !recharge to add 25%.
notice $nick You have currently got %dmspec2 [ $+ [ $chan ] ] $+ % remaining! 25% is required for a DD spec!
halt
}
else {
set %dmspec2 [ $+ [ $chan ] ] $calc(%dmspec2 [ $+ [ $chan ] ] - 25)
notice $nick Your special attack bar has now %dmspec2 [ $+ [ $chan ] ] $+ % remaining!
var %hit1 = $rand(0,30)
var %hit2 = $rand(0,30)
var %hit = $calc(%hit1 + %hit2)
if (%hit >= %dmhp1 [ $+ [ $chan ] ]) {
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has been killed! $+ $color2 $+ $nick $color1 $+ kills $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ with $+ $color2 %hit1 $color1 $+ and $+ $color2 %hit2 $color1 $+ !
inc %dmn [ $+ [ $nick ] ]
var %p = %dm1 [ $+ [ $chan ] ]
inc %dml [ $+ [ %p ] ]
if (%dml [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dmn [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dml [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
if (%dmn [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
var %k = %dmn [ $+ [ $nick ] ]
var %l = %dml [ $+ [ $nick ] ]
var %a = %dmn [ $+ [ %p ] ]
var %s = %dml [ $+ [ %p ] ]
var %n = $calc(%k / (%k + %l))
var %x = $calc(%a / (%a + %s))
msg $chan $+ $color2 $+ $nick $color1 $+ has $+ $color2 %dmn [ $+ [ $nick ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ $nick ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%n * 100) $+ $color1 $+ $chr(37) $+ !
msg $chan $+ $color2 $+ %p $color1 $+ has $+ $color2 %dmn [ $+ [ %p ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ %p ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%x * 100) $+ $color1 $+ $chr(37) $+ !
unset %dm1 $+ $chan
unset %dm2 [ $+ [ $chan ] ]
unset %dmstatus [ $+ [ $chan ] ]
unset %dmturn [ $+ [ $chan ] ]
unset %dmhp1 [ $+ [ $chan ] ]
unset %dmhp2 [ $+ [ $chan ] ]
unset %dmspec1 [ $+ [ $chan ] ]
unset %dmspec2 [ $+ [ $chan ] ]
}
else {
set %dmhp1 [ $+ [ $chan ] ] $calc(%dmhp1 [ $+ [ $chan ] ] - %hit)
msg $chan $+ $color2 $+ $nick $color1 $+ pulls out $+ $color2 $+ a dragon dagger $color1 $+ and hits $+ $color2 %hit1 $color1 $+ and $+ $color2 %hit2 $color1 $+ on $+ $color2 %dm1 [ $+ [ $chan ] ] $+ $color1 $+ !
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has now $+ $color2 %dmhp1 [ $+ [ $chan ] ] $color1 $+ hp left!
set %dmturn [ $+ [ $chan ] ] 1
}
}
}
}
}
on *:TEXT:!dh*:#:{
if (%dmstatus [ $+ [ $chan ] ] == on) {
if ($nick == %dm1 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 1) {
if (%dmspec1 [ $+ [ $chan ] ] < 50) {
notice $nick You do not have enough specs left! Type !recharge to add 25%.
notice $nick You have currently got %dmspec1 [ $+ [ $chan ] ] $+ % remaining! 50% is required for dharoks!
halt
}
if (%dmspec1 [ $+ [ $chan ] ] >= 50) {
set %dmspec1 [ $+ [ $chan ] ] $calc(%dmspec1 [ $+ [ $chan ] ] - 50)
notice $nick Your special attack bar has now %dmspec1 [ $+ [ $chan ] ] $+ % remaining!
if (%dmhp1 [ $+ [ $chan ] ] isnum 1-10) var %hit = $rand(25,90)
if (%dmhp1 [ $+ [ $chan ] ] isnum 10-19) var %hit = $rand(10,75)
if (%dmhp1 [ $+ [ $chan ] ] isnum 20-29) var %hit = $rand(0,70)
if (%dmhp1 [ $+ [ $chan ] ] isnum 30-39) var %hit = $rand(0,65)
if (%dmhp1 [ $+ [ $chan ] ] isnum 40-49) var %hit = $rand(0,60)
if (%dmhp1 [ $+ [ $chan ] ] isnum 50-59) var %hit = $rand(0,55)
if (%dmhp1 [ $+ [ $chan ] ] isnum 60-69) var %hit = $rand(0,50)
if (%dmhp1 [ $+ [ $chan ] ] isnum 70-79) var %hit = $rand(0,45)
if (%dmhp1 [ $+ [ $chan ] ] isnum 80-89) var %hit = $rand(0,40)
if (%dmhp1 [ $+ [ $chan ] ] isnum 90-99) var %hit = $rand(0,35)
if (%hit >= %dmhp2 [ $+ [ $chan ] ]) {
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has been killed! $+ $color2 $+ $nick $color1 $+ splits $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $+ 's $color1 $+ head in two pieces with $+ $color2 %dmhp2 [ $+ [ $chan ] ] $color1 $+ !
inc %dmn [ $+ [ $nick ] ]
var %p = %dm2 [ $+ [ $chan ] ]
inc %dml [ $+ [ %p ] ]
if (%dml [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dmn [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dml [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
if (%dmn [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
var %k = %dmn [ $+ [ $nick ] ]
var %l = %dml [ $+ [ $nick ] ]
var %a = %dmn [ $+ [ %p ] ]
var %s = %dml [ $+ [ %p ] ]
var %n = $calc(%k / (%k + %l))
var %x = $calc(%a / (%a + %s))
msg $chan $+ $color2 $+ $nick $color1 $+ has $+ $color2 %dmn [ $+ [ $nick ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ $nick ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%n * 100) $+ $color1 $+ $chr(37) $+ !
msg $chan $+ $color2 $+ %p $color1 $+ has $+ $color2 %dmn [ $+ [ %p ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ %p ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%x * 100) $+ $color1 $+ $chr(37) $+ !
unset %dm1 $+ $chan
unset %dm2 [ $+ [ $chan ] ]
unset %dmstatus [ $+ [ $chan ] ]
unset %dmturn [ $+ [ $chan ] ]
unset %dmhp1 [ $+ [ $chan ] ]
unset %dmhp2 [ $+ [ $chan ] ]
unset %dmspec1 [ $+ [ $chan ] ]
unset %dmspec2 [ $+ [ $chan ] ]
}
else {
set %dmhp2 [ $+ [ $chan ] ] $calc(%dmhp2 [ $+ [ $chan ] ] - %hit)
msg $chan $+ $color2 $+ $nick $color1 $+ pulls out $+ $color2 $+ full dharoks with %dmhp1 [ $+ [ $chan ] ] hp $color1 $+ and hits $+ $color2 %hit $color1 $+ on $+ $color2 %dm2 [ $+ [ $chan ] ] $+ $color1 $+ !
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has now $+ $color2 %dmhp2 [ $+ [ $chan ] ] $color1 $+ hp left!
set %dmturn [ $+ [ $chan ] ] 2
}
}
}
if ($nick == %dm2 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 2) {
if (%dmspec2 [ $+ [ $chan ] ] < 50) {
notice $nick You do not have enough specs left! Type !recharge to add 25%.
notice $nick You have currently got %dmspec2 [ $+ [ $chan ] ] % remaining! 50% is required for dharoks!
halt
}
if (%dmspec2 [ $+ [ $chan ] ] >= 50) {
set %dmspec2 [ $+ [ $chan ] ] $calc(%dmspec2 [ $+ [ $chan ] ] - 50)
notice $nick Your special attack bar has now %dmspec2 [ $+ [ $chan ] ] $+ % remaining!
if (%dmhp2 [ $+ [ $chan ] ] isnum 1-10) var %hit = $rand(0,80)
if (%dmhp2 [ $+ [ $chan ] ] isnum 10-19) var %hit = $rand(0,75)
if (%dmhp2 [ $+ [ $chan ] ] isnum 20-29) var %hit = $rand(0,70)
if (%dmhp2 [ $+ [ $chan ] ] isnum 30-39) var %hit = $rand(0,65)
if (%dmhp2 [ $+ [ $chan ] ] isnum 40-49) var %hit = $rand(0,60)
if (%dmhp2 [ $+ [ $chan ] ] isnum 50-59) var %hit = $rand(0,55)
if (%dmhp2 [ $+ [ $chan ] ] isnum 60-69) var %hit = $rand(0,50)
if (%dmhp2 [ $+ [ $chan ] ] isnum 70-79) var %hit = $rand(0,45)
if (%dmhp2 [ $+ [ $chan ] ] isnum 80-89) var %hit = $rand(0,40)
if (%dmhp2 [ $+ [ $chan ] ] isnum 90-99) var %hit = $rand(0,35)
if (%hit >= %dmhp1 [ $+ [ $chan ] ]) {
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has been killed! $+ $color2 $+ $nick $color1 $+ splits $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $+ 's $color1 $+ head in two pieces with $+ $color2 %dmhp1 [ $+ [ $chan ] ] $color1 $+ !
inc %dmn [ $+ [ $nick ] ]
var %p = %dm1 [ $+ [ $chan ] ]
inc %dml [ $+ [ %p ] ]
if (%dml [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dmn [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dml [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
if (%dmn [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
var %k = %dmn [ $+ [ $nick ] ]
var %l = %dml [ $+ [ $nick ] ]
var %a = %dmn [ $+ [ %p ] ]
var %s = %dml [ $+ [ %p ] ]
var %n = $calc(%k / (%k + %l))
var %x = $calc(%a / (%a + %s))
msg $chan $+ $color2 $+ $nick $color1 $+ has $+ $color2 %dmn [ $+ [ $nick ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ $nick ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%n * 100) $+ $color1 $+ $chr(37) $+ !
msg $chan $+ $color2 $+ %p $color1 $+ has $+ $color2 %dmn [ $+ [ %p ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ %p ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%x * 100) $+ $color1 $+ $chr(37) $+ !
unset %dm1 $+ $chan
unset %dm2 $+ $chan
unset %dmstatus $+ $chan
unset %dmturn $+ $chan
unset %dmhp1 $+ $chan
unset %dmhp2 $+ $chan
unset %dmspec1 $+ $chan
unset %dmspec2 $+ $chan
}
else {
set %dmhp1 [ $+ [ $chan ] ] $calc(%dmhp1 [ $+ [ $chan ] ] - %hit)
msg $chan $+ $color2 $+ $nick $color1 $+ pulls out $+ $color2 $+ full dharoks with %dmhp2 [ $+ [ $chan ] ] hp $color1 $+ and hits $+ $color2 %hit $color1 $+ on $+ $color2 %dm1 [ $+ [ $chan ] ] $+ $color1 $+ !
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has now $+ $color2 %dmhp1 [ $+ [ $chan ] ] $color1 $+ hp left!
set %dmturn [ $+ [ $chan ] ] 1
}
}
}
}
}
=
on *:TEXT:!recharge:#:{
if (%dmstatus [ $+ [ $chan ] ] == on) {
if ($nick == %dm1 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 1) {
if (%dmspec1 [ $+ [ $chan ] ] isnum 0-75) {
set %dmspec1 [ $+ [ $chan ] ] $calc($dmspec1 [ $+ [ $chan ] ] + 25)
msg $chan $+ $color2 $+ $nick $color1 $+ has recharged his special attack bar with $+ $color2 25% $color1 $+ !
set %dmturn [ $+ [ $chan ] ] 2
}
elseif (%dmspec1 [ $+ [ $chan ] ] isnum 76-99) {
var %x = $calc(100 - %dmspec1 [ $+ [ $chan ] ])
set %dmspec1 [ $+ [ $chan ] ] $calc($dmspec1 [ $+ [ $chan ] ] + %x)
set %dmturn 2
msg $chan $+ $color2 $+ $nick $color1 $+ has recharged his special attack bar with $+ $color2 %x $+ % $color1 $+ !
}
elseif (%dmspec1 [ $+ [ $chan ] ] isnum 100) {
notice $nick Your special attack bar is already 100%! Please use another command.
halt
}
}
if ($nick == %dm2 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 2) {
if (%dmspec2 isnum 0-75) {
set %dmspec2 [ $+ [ $chan ] ] $calc($dmspec2 [ $+ [ $chan ] ] + 25)
msg $chan $+ $color2 $+ $nick $color1 $+ has recharged his special attack bar with $+ $color2 25% $color1 $+ !
set %dmturn [ $+ [ $chan ] ] 1
}
elseif (%dmspec2 [ $+ [ $chan ] ] isnum 76-99) {
var %x = $calc(100 - %dmspec1 [ $+ [ $chan ] ])
set %dmspec2 [ $+ [ $chan ] ] $calc($dmspec2 [ $+ [ $chan ] ] + %x)
msg $chan $+ $color2 $+ $nick $color1 $+ has recharged his special attack bar with $+ $color2 %x $+ % $color1 $+ !
set %dmturn [ $+ [ $chan ] ] 1
}
elseif (%dmspec2 [ $+ [ $chan ] ] isnum 100) {
notice $nick Your special attack bar is already 100%! Please use another command.
halt
}
}
}
}
on *:TEXT:!ice*:#:{
if (%dmstatus [ $+ [ $chan ] ] == on) {
if ($nick == %dm1 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 1) {
var %hit = $rand(0,30)
if (%hit >= %dmhp2 [ $+ [ $chan ] ]) {
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has been killed! $+ $color2 $+ $nick $color1 $+ kills $+ $color2 %dm2 [ $+ [ $chan ] ] $color1 $+ with a crushing $+ $color2 %dmhp2 [ $+ [ $chan ] ] $+ $color1 $+ .
inc %dmn [ $+ [ $nick ] ]
var %p = %dm2 [ $+ [ $chan ] ]
inc %dml [ $+ [ %p ] ]
if (%dml [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dmn [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
var %k = %dmn [ $+ [ $nick ] ]
var %l = %dml [ $+ [ $nick ] ]
var %a = %dmn [ $+ [ %p ] ]
var %s = %dml [ $+ [ %p ] ]
var %n = $calc(%k / (%k + %l))
var %x = $calc(%a / (%a + %s))
msg $chan $+ $color2 $+ $nick $color1 $+ has $+ $color2 %dmn [ $+ [ $nick ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ $nick ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%n * 100) $+ $color1 $+ $chr(37) $+ !
msg $chan $+ $color2 $+ %p $color1 $+ has $+ $color2 %dmn [ $+ [ %p ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ %p ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%x * 100) $+ $color1 $+ $chr(37) $+ !
unset %dm1 $+ $chan
unset %dm2 $+ $chan
unset %dmstatus $+ $chan
unset %dmturn $+ $chan
unset %dmhp1 $+ $chan
unset %dmhp2 $+ $chan
unset %dmspec1 $+ $chan
unset %dmspec2 $+ $chan
}
else {
set %dmhp2 $+ $chan $calc(%dmhp2 [ $+ [ $chan ] ] - %hit)
var %x = $rand(1,3)
msg $chan $+ $color2 $+ $nick $color1 $+ pulls out $+ $color2 $+ a master wand $color1 $+ and Ice Barrages $+ $color2 %hit $color1 $+ on $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $+ $color1 $+ !
if (%x = 1) {
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has been frozen by $+ $color2 $+ $nick $+ 's $color1 $+ Ice Barrage! $+ $color2 $nick $color1 $+ is now able to do another turn!
}
else {
set %dmturn $+ $chan 2
}
msg $chan $+ $color2 $+ %dm2 [ $+ [ $chan ] ] $color1 $+ has now $+ $color2 %dmhp2 [ $+ [ $chan ] ] $color1 $+ hp left!
}
}
elseif ($nick == %dm2 [ $+ [ $chan ] ]) && (%dmturn [ $+ [ $chan ] ] == 2) {
var %hit = $rand(0,30)
if (%hit >= %dmhp1 [ $+ [ $chan ] ]) {
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has been killed! $+ $color2 $+ $nick $color1 $+ kills $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ with a crushing $+ $color2 %dmhp1 [ $+ [ $chan ] ] $+ $color1 $+ .
inc %dmn [ $+ [ $nick ] ]
var %p = %dm1 [ $+ [ $chan ] ]
inc %dml [ $+ [ %p ] ]
if (%dml [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dmn [ $+ [ $nick ] ] == $null) set %dml $+ $nick 0
if (%dml [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
if (%dmn [ $+ [ %p ] ] == $null) set %dmn $+ %p 0
var %k = %dmn [ $+ [ $nick ] ]
var %l = %dml [ $+ [ $nick ] ]
var %a = %dmn [ $+ [ %p ] ]
var %s = %dml [ $+ [ %p ] ]
var %n = $calc(%k / (%k + %l))
var %x = $calc(%a / (%a + %s))
msg $chan $+ $color2 $+ $nick $color1 $+ has $+ $color2 %dmn [ $+ [ $nick ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ $nick ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%n * 100) $+ $color1 $+ $chr(37) $+ !
msg $chan $+ $color2 $+ %p $color1 $+ has $+ $color2 %dmn [ $+ [ %p ] ] $color1 $+ wins and $+ $color2 %dml [ $+ [ %p ] ] $color1 $+ losses so far! This is a win percentage of $+ $color2 $calc(%x * 100) $+ $color1 $+ $chr(37) $+ !
unset %dm1 $+ $chan
unset %dm2 $+ $chan
unset %dmstatus $+ $chan
unset %dmturn $+ $chan
unset %dmhp1 $+ $chan
unset %dmhp2 $+ $chan
unset %dmspec1 $+ $chan
unset %dmspec2 $+ $chan
}
else {
set %dmhp1 $+ $chan $calc(%dmhp1 [ $+ [ $chan ] ] - %hit)
var %x = $rand(1,3)
msg $chan $+ $color2 $+ $nick $color1 $+ pulls out $+ $color2 $+ a master wand $color1 $+ and hits $+ $color2 %hit $color1 $+ on $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $+ $color1 $+ !
if (%x = 1) {
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has been frozen by $+ $color2 $+ $nick $+ 's $color1 $+ Ice Barrage! $+ $color2 $nick $color1 $+ is now able to do another turn!
}
else {
set %dmturn $+ $chan 1
}
msg $chan $+ $color2 $+ %dm1 [ $+ [ $chan ] ] $color1 $+ has now $+ $color2 %dmhp1 [ $+ [ $chan ] ] $color1 $+ hp left!
}
}
}
}
alias -l color1 { return $+($chr(3),12) }
alias -l color2 { return $+($chr(3),4) }