rendered paste bodyon *:text:!dm*:#: {
if ($nick == %p1 [ $+ [ $chan ] ] || $nick == %p2 [ $+ [ $chan ] ] ) { notice $nick You are already in a dm! | HALT }
if (%duel [ $+ [ $chan ] ] == ON) { notice $nick There is already running a dm!
HALT }
elseif (%duel2 [ $+ [ $chan ] ] == OFF) {
msg $chan $nick has initiated a dm!
set %p1 [ $+ [ $chan ] ] $nick
set %duel2 [ $+ [ $chan ] ] on
}
elseif (%duel2 [ $+ [ $chan ] ] == ON) {
set %shark1 [ $+ [ $chan ] ] 28
set %shark2 [ $+ [ $chan ] ] 28
set %hp1 [ $+ [ $chan ] ] 99
set %hp2 [ $+ [ $chan ] ] 99
set %dds1 [ $+ [ $chan ] ] 100
set %dds2 [ $+ [ $chan ] ] 100
set %p2 [ $+ [ $chan ] ] $nick
set %duel2 [ $+ [ $chan ] ] OFF
set %duel [ $+ [ $chan ] ] ON
msg $chan $nick has joined the dm against %p1 [ $+ [ $chan ] ] $+ !
set %starter [ $+ [ $chan ] ] $rand(1,2)
if (%starter [ $+ [ $chan ] ] == 1) { set %p1hit [ $+ [ $chan ] ] on | msg $chan %p1 [ $+ [ $chan ] ] may deal the first hit! }
if (%starter [ $+ [ $chan ] ] == 2) { set %p2hit [ $+ [ $chan ] ] on | msg $chan %p2 [ $+ [ $chan ] ] may deal the first hit! }
}
}
on *:text:!stopdm:#: {
if ($nick isop $chan) {
if (%duel [ $+ [ $chan ] ] == off || !%p1 [ $+ [ $chan ] ] || !%p2 [ $+ [ $chan ] ]) {
msg $chan There is no duel on or there are no players active at dm!
}
else {
unset %p1 [ $+ [ $chan ] ]
unset %p2 [ $+ [ $chan ] ]
set %duel [ $+ [ $chan ] ] OFF
msg $chan Dm has been stopped by $nick $+ !
}
}
}
on *:part:#: {
if ($nick == $me || $nick == %p2 [ $+ [ $chan ] ] || $nick == %p1 [ $+ [ $chan ] ]) {
set %duel [ $+ [ $chan ] ] off
unset %p1 [ $+ [ $chan ] ]
unset %p2 [ $+ [ $chan ] ]
}
}
on *:text:!cbow*:#: {
if (%p1hit [ $+ [ $chan ] ] == on && $nick == %p1 [ $+ [ $chan ] ]) {
set %hit [ $+ [ $chan ] ] $rand(0,25)
dec %hp2 [ $+ [ $chan ] ] %hit [ $+ [ $chan ] ]
if (%hp2 [ $+ [ $chan ] ] <= 0) { goto dead2 }
msg $chan $nick has hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0! %p2 [ $+ [ $chan ] ] has 4,0 %hp2 [ $+ [ $chan ] ] 1,0hp left!
set %p1hit [ $+ [ $chan ] ] off
set %p2hit [ $+ [ $chan ] ] on
HALT
:dead2
msg $chan $nick has hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0! %p2 [ $+ [ $chan ] ] has 0 HP left! %p1 [ $+ [ $chan ] ] won the dm! End of dm!
set %p1 [ $+ [ $chan ] ] off
set %p2 [ $+ [ $chan ] ] off
set %duel [ $+ [ $chan ] ] off
}
elseif (%p2hit [ $+ [ $chan ] ] == off && $nick == %p2 [ $+ [ $chan ] ]) { msg $chan It's %p1 [ $+ [ $chan ] ] $+ 's turn! | HALT }
elseif (%p2hit [ $+ [ $chan ] ] == on && $nick == %p2 [ $+ [ $chan ] ]) {
set %hit [ $+ [ $chan ] ] $rand(0,25)
dec %hp1 [ $+ [ $chan ] ] %hit [ $+ [ $chan ] ]
if (%hp1 [ $+ [ $chan ] ] <= 0) { goto dead1 }
msg $chan $nick has hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0! %p1 [ $+ [ $chan ] ] has 4,0 %hp1 [ $+ [ $chan ] ] 1,0hp left!
set %p2hit [ $+ [ $chan ] ] off
set %p1hit [ $+ [ $chan ] ] on
HALT
:dead1
msg $chan $nick has hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0! %p1 [ $+ [ $chan ] ] has 0 HP left! %p2 [ $+ [ $chan ] ] won the dm! End of dm!
set %p1 [ $+ [ $chan ] ] off
set %p2 [ $+ [ $chan ] ] off
set %duel [ $+ [ $chan ] ] off
}
elseif (%p1hit [ $+ [ $chan ] ] == off && $nick == %p1 [ $+ [ $chan ] ]) { msg $chan It's %p2 [ $+ [ $chan ] ] $+ 's turn! | HALT }
}
on *:text:!barrage*:#: {
if (%p1hit [ $+ [ $chan ] ] == on && $nick == %p1 [ $+ [ $chan ] ]) {
set %splash1 [ $+ [ $chan ] ] $rand(1,4)
if (%splash1 [ $+ [ $chan ] ] == 1) { goto splash1 | HALT }
set %hit [ $+ [ $chan ] ] $rand(0,30)
dec %hp2 [ $+ [ $chan ] ] %hit [ $+ [ $chan ] ]
if (%hp2 [ $+ [ $chan ] ] <= 0) { goto dead2 }
set %frozen2 [ $+ [ $chan ] ] $rand(1,3)
if (%frozen2 [ $+ [ $chan ] ] == 2) { goto frozen2 }
msg $chan $nick has hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0! %p2 [ $+ [ $chan ] ] has 4,0 %hp2 [ $+ [ $chan ] ] 1,0hp left!
set %p1hit [ $+ [ $chan ] ] off
set %p2hit [ $+ [ $chan ] ] on
HALT
:dead2
msg $chan $nick has hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0! %p2 [ $+ [ $chan ] ] has 0 HP left! %p1 [ $+ [ $chan ] ] won the dm! End of dm!
set %p1 [ $+ [ $chan ] ] off
set %p2 [ $+ [ $chan ] ] off
set %duel [ $+ [ $chan ] ] off
HALT
:frozen2
if (%hp2 [ $+ [ $chan ] ] <= 0) { goto dead2 | HALT }
msg $chan $nick $nick casts an ice barrage, hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0 , freezes %p2 [ $+ [ $chan ] ] and may attack once again! %p2 [ $+ [ $chan ] ] has 4,0 %hp2 [ $+ [ $chan ] ] 1,0hp left!
HALT
:splash1
msg $chan $nick casts a ice barrage and...... it splashes! %p2 [ $+ [ $chan ] ] has 4,0 %hp2 [ $+ [ $chan ] ] 1,0hp left!
set %plhit off
set %p2hit [ $+ [ $chan ] ] on
}
elseif (%p2hit [ $+ [ $chan ] ] == off && $nick == %p2 [ $+ [ $chan ] ]) { msg $chan It's %p1 [ $+ [ $chan ] ] $+ 's turn! | HALT }
elseif (%p2hit [ $+ [ $chan ] ] == on && $nick == %p2 [ $+ [ $chan ] ]) {
set %splash2 [ $+ [ $chan ] ] $rand(1,4)
if (%splash2 [ $+ [ $chan ] ] == 1) { goto splash2 | HALT }
set %hit [ $+ [ $chan ] ] $rand(0,30)
dec %hp1 [ $+ [ $chan ] ] %hit [ $+ [ $chan ] ]
if (%hp1 [ $+ [ $chan ] ] <= 0) { goto dead1 }
set %frozen1 [ $+ [ $chan ] ] $rand(1,3)
if (%frozen1 [ $+ [ $chan ] ] == 2) { goto frozen1 }
msg $chan $nick has hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0! %p1 [ $+ [ $chan ] ] has 4,0 %hp1 [ $+ [ $chan ] ] 1,0hp left!
set %p2hit [ $+ [ $chan ] ] off
set %p1hit [ $+ [ $chan ] ] on
HALT
:dead1
msg $chan $nick has hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0! %p1 [ $+ [ $chan ] ] has 0 HP left! %p2 [ $+ [ $chan ] ] won the dm! End of dm!
set %p1 [ $+ [ $chan ] ] off
set %p2 [ $+ [ $chan ] ] off
set %duel [ $+ [ $chan ] ] off
HALT
:frozen1
if (%hp1 [ $+ [ $chan ] ] <= 0) { goto dead1 | HALT }
msg $chan $nick casts an ice barrage, hit 9,0 %hit [ $+ [ $chan ] ] $+ 1,0 , freezes %p1 [ $+ [ $chan ] ] and may attack once again! %p1 [ $+ [ $chan ] ] has 4,0 %hp1 [ $+ [ $chan ] ] 1,0hp left!
HALT
:splash2
msg $chan $nick casts a ice barrage and...... it splashes! %p1 [ $+ [ $chan ] ] has 4,0 %hp1 [ $+ [ $chan ] ] 1,0hp left!
set %p2hit [ $+ [ $chan ] ] off
set %p1hit [ $+ [ $chan ] ] on
}
elseif (%p1hit [ $+ [ $chan ] ] == off && $nick == %p1 [ $+ [ $chan ] ]) { msg $chan It's %p2 [ $+ [ $chan ] ] [ $+ [ $chan ] ] $+ 's turn! | HALT }
}