rendered paste bodyon *:TEXT:!barrage:#: {
if ($nick == %turn1) && (%barrages [ $+ [ %turn1 ] ] >= 0) {
set %barrage $rand(0,30)
set %R $r(1,10)
dec %barrages [ $+ [ %turn1 ] ]
dec %hp [ $+ [ %turn2 ] ] %barrage
}
if ( %hp [ $+ [ %turn2 ] ] < 1 ) {
set %hp [ $+ [ %turn2 ] ] 0
msg $chan 10[9›10›] %turn1 just hit a %barrage with ice barrage. %turn2 $+ 's hp is %hp [ $+ [ %turn2 ] ] $+ .
timer 1 1 msg $chan 10[9›10›] %turn2 is now dead!
scores
dmoff
}
elseif (%barrages [ $+ [ %turn1 ] ] <= -1) {
notice %turn1 10[9›10›] You can only use the Barrage 4 times per DM.
halt
}
elseif ($nick == %turn1) && ($nick != %turn2) && (%barrages [ $+ [ %turn1 ] ] >= 0) && (%R isnum 1-7) {
set %frozen [ $+ [ %turn2 ] ] on
msg $chan 10[9›10›] %turn1 just hit a %barrage with ice barrage. %turn2 $+ 's hp is %hp [ $+ [ %turn2 ] ] $+ .
notice %turn1 10[9›10›] You have %barrages [ $+ [ %turn1 ] ] more barrages left.
timer 1 1 msg $chan 10[9›10›] %turn2 is frozen!
inc %specbar [ $+ [ %turn1 ] ] $iif(%specbar [ $+ [ %turn1 ] ] >= 96, $calc( 100 - %specbar [ $+ [ %turn1 ] ] ) , 5 )
set %turn1 %turn11
set %turn2 %turn22
set %turn11 %turn2
set %turn22 %turn1
set %frozen [ $+ [ %turn2 ] ] off
unset %R
timer 1 2 msg $chan 10[9›10›] It's %turn1 $+ 's turn.
}
elseif ($nick == %turn1) && ($nick != %turn2) && (%barrages [ $+ [ %turn1 ] ] >= 0) && (%R isnum 8-10) {
msg $chan 10[9›10›] %turn1 just hit a %barrage with ice barrage. %turn2 $+ 's hp is %hp [ $+ [ %turn2 ] ] $+ .
notice %turn1 10[9›10›] You have %barrages [ $+ [ %turn1 ] ] more barrages left.
inc %specbar [ $+ [ %turn1 ] ] $iif(%specbar [ $+ [ %turn1 ] ] >= 96, $calc( 100 - %specbar [ $+ [ %turn1 ] ] ) , 5 )
set %turn1 %turn11
set %turn2 %turn22
set %turn11 %turn2
set %turn22 %turn1
set %frozen [ $+ [ %turn1 ] ] off
unset %R
timer 1 1 msg $chan10[9›10›] It's %turn1 $+ 's turn.
}
elseif ($nick == %turn2) {
notice $nick 10[9›10›] It's not your turn!
}
}