All pastes #449501 Raw Edit

Untitled

public text v1 · immutable
·published 2007-04-20 07:29 UTC
rendered paste body
on *:text:!dm:#:{
  set %dm.color 4
  if (%dm.started == ON) {
    notice $nick %dm.color $+ %dm.opponent has already taken the request! Please wait for the Death-Match to finish!
    halt
  }
  if (%dm == ON) {
    set %dm.opponent $nick
    msg $chan %dm.color $+ Request taken! The fight will be %dm.starter Vs. %dm.opponent $+ ! Please select your rules. Type !rules for more information.
    set %dm.started ON
    halt
  }
  set %dm.starter $nick
  set %dm ON
  msg $chan %dm.color $+ %dm.starter Has Requested a Death-Match! Type !DM to fight him/her.
}
on *:text:!rules:#:{
  if (%dm == ON) {
    if ($nick != %dm.starter) {
      msg $nick %dm.color $+ Sorry. Only the starter of the DM picks rules. After he decides on which ones, they will be forwarded to the opponent. Please wait...
      halt
    }
    timer703 1 1 msg $nick %dm.color $+ Here are the options you get to choose from for the Death-Match.
    timer704 1 3 msg $nick %dm.color $+ Pick a food: !food (lobsters/swordfish/sharks). 
    timer706 1 9 msg $nick %dm.color $+ Pick a Weapon Set !wepset (1/2/3/4) - 1: Whip,DDS,GMaul -- 2: DScim,DDS -- 3: Full Dharoks -- 4: MSB/Ice Barrage
    timer707 1 12 msg $nick %dm.color $+ Please type this in the channel you started the DM in.
    timer707 1 15 msg $nick %dm.color $+ After you have typed something for each option, your requests will be forwarded to your opponent. Please say the rules in the channel you started the DM in.
  }
}
on *:text:!food*:#:{
  if (%dm == ON) {
    if (%dm.opt.food == ON) {
      notice $nick %dm.color $+ The food has already been chosen. Pick a weapon set. !rules for more information.
      halt
    }
    if ($nick == %dm.starter) {
      if ($2 == lobsters) && (%dm.opt.food != ON) {
        set %dm.food 12
        inc %dm.opt
        %dm.color $+ msg %dm.opponent Lobsters was chosen as the food you will eat. Please wait..
        if (%dm.opt == 2) msg %dm.opponent %dm.color $+ %dm.starter has chosen all rules for the DM! Here are the rules: Your food will heal %dm.food and your weapon set is number %dm.wepset $+ . (1:Whip,DDS,Gmaul - 2:Dlong,DDS - 3:Dharoks)
        set %dm.opt.food ON
      }
      if ($2 == swordfish) && (%dm.opt.food != ON) {
        set %dm.food 14
        inc %dm.opt
        %dm.color $+ msg %dm.opponent Swordfish was chosen as the food you will eat. Please wait..
        if (%dm.opt == 2) msg %dm.opponent %dm.color $+ %dm.starter has chosen all rules for the DM! Here are the rules: Your food will heal %dm.food and your weapon set is number %dm.wepset $+ . (1:Whip,DDS,Gmaul - 2:Dlong,DDS - 3:Dharoks)
        set %dm.opt.food ON
      }
      if ($2 == sharks) && (%dm.opt.food != ON) {
        set %dm.food 20
        inc %dm.opt
        %dm.color $+ msg %dm.opponent Sharks was chosen as the food you will eat. Please wait..
        if (%dm.opt == 2) msg %dm.opponent %dm.color $+ %dm.starter has chosen all rules for the DM! Here are the rules: Your food will heal %dm.food and your weapon set is number %dm.wepset $+ . (1:Whip,DDS,Gmaul - 2:Dlong,DDS - 3:Dharoks)
        set %dm.opt.food ON
      }
      if (%dm.opt == 1) && (%dm.opt.food == ON) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Have Been Decided. Please wait..
      if (%dm.opt == 2) && (%dm.opt.food == ON) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Have Been Decided. %dm.starter please type !fight to initiate the fight.
      if ($2 != lobsters) && ($2 != swordfish) && ($2 != sharks) {
        msg $nick %dm.color $+ Sorry. Your food was not recognized. Please type !rules for more information.
        halt
      }
      :two
      if (%dm.wepset == 1) {
        msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !flick( whip attack - max hit 40 ) - !dds ( 25% spec bar drain ) - !gmaul ( 100% spec bar drain ) -- Good luck! Type !fight to start the fight.
        msg %dm.opponent %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !flick( whip attack - max hit 40 ) - !dds ( 25% spec bar drain ) - !gmaul ( 100% spec bar drain ) -- Good luck! Please await the start of your fight - Look in the channel you started the deathmatch in.
      }
      if (%dm.wepset == 2) {
        msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !slash ( dscim attack ) - !dds ( 25% spec bar drain ) -- Good luck! Type !fight to start the fight.
        msg %dm.opponent %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !slash ( dscim attack ) - !dds ( 25% spec bar drain ) -- Good luck! - Please await the start of your fight - Look in the channel you started the dm in.
      }
      if (%dm.wepset == 3) {
        msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !daxe ( max hit 70 ) -- Good luck! Type !fight to start the fight.
        msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !daxe ( max hit 70 ) -- Good luck! - Please await the start of your fight Look in the channel the dm was started.
      }
      if (%dm.wepset == 4) {
        msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !msb ( max hit 25,25 ) !icebarrage ( max hit 30) -- Good luck! Type !fight to start the fight.
      msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !msb ( max hit 25,25 ) !icebarrage ( max hit 30) -- Good luck! - Please await the start of your fight Look in the channel the dm was started.      }
    }
  }
}
on *:text:!wepset*:#:{
  if (%dm == ON) {
    if (%dm.opt.wepset == ON) {
      notice $nick %dm.color $+ The weapon set has been chosen. Please pick a food. !rules for more information.
      halt
    }
    if ($nick == %dm.starter) {
      if ($2 == 1) {
        set %dm.wepset 1
        inc %dm.opt
        set %dm.opt.wepset ON
        if (%dm.opt == 1) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Decided... Please wait..
        if (%dm.opt == 2) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Decided.. Fight starting - Please wait.. Type !fight to initiate the fight %dm.starter $+ .
        if (%dm.opt == 2) msg %dm.opponent %dm.color $+ %dm.starter has chosen all rules for the DM! Here are the rules: Your food will heal %dm.food and your weapon set is number %dm.wepset (1:Whip,DDS,Gmaul - 2:DScim,DDS - 3:Dharoks - 4:Ice Barrage, MSB)
        if (%dm.opt == 2) goto two
        if (%dm.opt == 1) msg %dm.opponent %dm.color $+ Your weapon set is %dm.wepset decided by %dm.starter $+ . (1:Whip,DDS,Gmaul - 2:DScim,DDS - 3:Dharoks) Please stand by.
        halt
      }
      if ($2 == 2) {
        set %dm.wepset 2
        inc %dm.opt
        set %dm.opt.wepset ON
        if (%dm.opt == 1) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Decided... Please wait..
        if (%dm.opt == 2) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Decided.. Fight starting - Please wait.. Type !fight to initiate the fight %dm.starter $+ .
        if (%dm.opt == 2) msg %dm.opponent %dm.color $+ %dm.starter has chosen all rules for the DM! Here are the rules: Your food will heal %dm.food and your weapon set is number %dm.wepset (1:Whip,DDS,Gmaul - 2:DScim,DDS - 3:Dharoks - 4:Ice Barrage, MSB)
        if (%dm.opt == 2) goto two
        if (%dm.opt == 1) msg %dm.opponent %dm.color $+ Your weapon set is %dm.wepset decided by %dm.starter $+ . (1:Whip,DDS,Gmaul - 2:DScim,DDS - 3:Dharoks) Please stand by.
        halt
      }
      if ($2 == 3) {
        set %dm.wepset 3
        inc %dm.opt
        set %dm.opt.wepset ON
        if (%dm.opt == 1) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Decided... Please wait..
        if (%dm.opt == 2) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Decided.. Fight starting - Please wait.. Type !fight to initiate the fight %dm.starter $+ .
        if (%dm.opt == 2) msg %dm.opponent %dm.color $+ %dm.starter has chosen all rules for the DM! Here are the rules: Your food will heal %dm.food and your weapon set is number %dm.wepset (1:Whip,DDS,Gmaul - 2:DScim,DDS - 3:Dharoks - 4:Ice Barrage, MSB)
        if (%dm.opt == 2) goto two
        if (%dm.opt == 1) msg %dm.opponent %dm.color $+ Your weapon set is %dm.wepset decided by %dm.starter $+ . (1:Whip,DDS,Gmaul - 2:DScim,DDS - 3:Dharoks) Please stand by.
        halt
      }
      if ($2 == 4) {
        set %dm.wepset 4
        inc %dm.opt
        set %dm.opt.wepset ON
        if (%dm.opt == 1) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Decided... Please wait..
        if (%dm.opt == 2) msg $chan %dm.color $+ [ $+ %dm.opt $+ /2] Options Decided.. Fight starting - Please wait.. Type !fight to initiate the fight %dm.starter $+ .
        if (%dm.opt == 2) msg %dm.opponent %dm.color $+ %dm.starter has chosen all rules for the DM! Here are the rules: Your food will heal %dm.food and your weapon set is number %dm.wepset (1:Whip,DDS,Gmaul - 2:DScim,DDS - 3:Dharoks - 4:Ice Barrage, MSB)
        if (%dm.opt == 2) goto two
        if (%dm.opt == 1) msg %dm.opponent %dm.color $+ Your weapon set is %dm.wepset decided by %dm.starter $+ . (1:Whip,DDS,Gmaul - 2:DScim,DDS - 3:Dharoks - 4:Ice Barrage, MSB) Please stand by.
        halt
      }
      if ($2 != 1) && ($2 != 2) && ($2 != 3) && ($2 != 4) {
        msg $nick Sorry. Your weapon set was not recognized. Please type !rules for more information.
        halt
        :two
        if (%dm.wepset == 1) {
          msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !flick( whip attack - max hit 40 ) - !dds ( 25% spec bar drain ) - !gmaul ( 100% spec bar drain ) -- Good luck! Type !fight to start the fight.
          msg %dm.opponent %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !flick( whip attack - max hit 40 ) - !dds ( 25% spec bar drain ) - !gmaul ( 100% spec bar drain ) -- Good luck! Please await the start of your fight - Look in the channel you started the deathmatch in.
        }
        if (%dm.wepset == 2) {
          msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !slash ( dscim attack ) - !dds ( 25% spec bar drain ) -- Good luck! Type !fight to start the fight.
          msg %dm.opponent %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !slash ( dscim attack ) - !dds ( 25% spec bar drain ) -- Good luck! - Please await the start of your fight - Look in the channel you started the dm in.
        }
        if (%dm.wepset == 3) {
          msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !daxe ( max hit 70 ) -- Good luck! Type !fight to start the fight.
          msg %dm.opponent %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !daxe ( max hit 70 ) -- Good luck! - Please await the start of your fight Look in the channel the dm was started.
        }
        if (%dm.wepset == 4) {
          msg %dm.starter %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !msb ( max hit 25,25 ) !icebarrage ( max hit 30) -- Good luck! Type !fight to start the fight.
          msg %dm.opponent %dm.color $+ Here are the commands you can use in the DM. !eat ( heals %dm.food ) - !msb ( max hit 25,25 ) !icebarrage ( max hit 30)  -- Good luck! - Please await the start of your fight Look in the channel the dm was started.
        }             
      }
    }
  }
}
on *:text:!fight:#:{
  if (%dm == ON) {
    if ($nick == %dm.starter) {
      if ((%dm.wepset != $null) || (%dm.food != $null)) {
        set %dm.attacker %dm.starter
        set %dm.starter.health 99
        set %dm.opponent.health 99
        set %dm.opponent.spec 100
        set %dm.starter.spec 100
        mode $chan +m
        mode $chan +vv %dm.opponent %dm.starter
        if (%dm.wepset == 1) timer909 1 2 msg $chan %dm.color $+ The fight has begun! The weapon set is Whip, DDS, and Granite Maul. The food heals %dm.food $+ . Both players are set to 99hp.
        if (%dm.wepset == 1) timer910 1 4 msg $chan %dm.color $+ Good luck to both players! And the lucky noob who starts off is %dm.starter $+ ! Wait for it...
        if (%dm.wepset == 1) timer911 1 6 msg $chan %dm.color $+ Cmon, you can do it! Start off the match! GO!
        if (%dm.wepset == 2) timer912 1 2 msg $chan %dm.color $+ The fight has begun! The weapon set is Dragon Scimitar and DDS. The food heals %dm.food $+ . Both players are set to 99hp.
        if (%dm.wepset == 2) timer913 1 4 msg $chan %dm.color $+ Good luck to both players! And the lucky noob who starts off is %dm.starter $+ ! Wait for it...
        if (%dm.wepset == 2) timer914 1 6 msg $chan %dm.color $+ Cmon, you can do it! Start off the match! GO!
        if (%dm.wepset == 3) timer915 1 2 msg $chan %dm.color $+ The fight has begun! The weapon set is Dharoks! The food heals %dm.food $+ . Both players are set to 99hp.
        if (%dm.wepset == 3) timer916 1 4 msg $chan %dm.color $+ Good luck to both players! And the lucky noob who starts off is %dm.starter $+ ! Wait for it...
        if (%dm.wepset == 3) timer917 1 6 msg $chan %dm.color $+ Cmon, you can do it! Start off the match! GO!
        if (%dm.wepset == 4) timer918 1 2 msg $chan %dm.color $+ The fight has begun! The weapon set is Hybrid! The food heals %dm.food $+ . Both players are set to 99hp.
        if (%dm.wepset == 4) timer919 1 4 msg $chan %dm.color $+ Good luck to both players! And the lucky noob who starts off is %dm.starter $+ ! Wait for it...
        if (%dm.wepset == 4) timer920 1 6 msg $chan %dm.color $+ Cmon, you can do it! Start off the match! GO!
        if (%dm.opt.food != ON) && (%dm.opt.wepset != ON) {
          notice $nick %dm.color $+ Sorry. Something is wrong. Check if you have set a weapon set or a food. Type !rules for more information.
        }
      }
    }
  }
}
on *:text:!flick:#:{
  if (%dm != $null) {
    if (%dm.wepset == 1) {
      if ($nick != %dm.attacker) {
        notice $nick %dm.color $+ It's not your turn noob!
        halt
      }
      if (%dm.attacker == %dm.starter) {
        set %dm.flick $rand(0,40)
        dec %dm.opponent.health %dm.flick
        if (%dm.opponent.health < 1) { set %dm.opponent.health 0 | goto two }
        msg $chan %dm.color $+ %dm.attacker flicks %dm.opponent with his Abyssal Whip and hits a %dm.flick . %dm.opponent has %dm.opponent.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.opponent it's now your turn!
        set %dm.attacker %dm.opponent
        halt
      }
      if (%dm.attacker == %dm.opponent) {
        set %dm.flick $rand(0,40)
        dec %dm.starter.health %dm.flick
        if (%dm.starter.health < 1) { set %dm.starter.health 0 | goto two }
        msg $chan %dm.color $+ %dm.attacker flicks %dm.starter with his Abyssal Whip and hits a %dm.flick . %dm.starter has %dm.starter.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.starter it's now your turn!
        set %dm.attacker %dm.starter
        halt
      }
      :two
      if (%dm.opponent.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.starter $+ ! You have defeated %dm.opponent with a %dm.flick for a KO!
        unset %dm.*
        unset %dm
        halt
      }
      if (%dm.starter.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.opponent $+ ! You have defeated %dm.starter with a %dm.flick for a KO!
        unset %dm.*
        unset %dm
        halt
      }
    }
  }
}
on *:text:!dds:#:{
  if (%dm != $null) {
    if ((%dm.wepset == 1) || (%dm.wepset == 2)) {
      if ($nick != %dm.attacker) {
        notice $nick %dm.color $+ It's not your turn noob!
        halt
      }
      if (%dm.attacker == %dm.starter) {
        if (%dm.starter.spec < 25) { notice $nick %dm.color $+ You have %dm.starter.spec $+ % Spec left. That is not enough.
          msg $chan %dm.color $+ Go ahead %dm.opponent , take a shot!
          set %dm.attacker %dm.opponent
          halt
        }
      }
      if (%dm.attacker == %dm.opponent) {
        if (%dm.opponent.spec < 25) { notice $nick %dm.color $+ You have %dm.opponent.spec $+ % Spec left. That is not enough.
          msg $chan %dm.color $+ Go ahead %dm.starter , take a shot!
          set %dm.attacker %dm.starter
          halt
        }
      }
      if (%dm.attacker == %dm.starter) {
        set %dm.dds1 $rand(0,28)
        set %dm.dds2 $rand(0,28)
        set %dm.dds $calc(%dm.dds1 + %dm.dds2)
        dec %dm.opponent.health %dm.dds
        if (%dm.opponent.health < 1) { set %dm.opponent.health 0 | goto two }
        msg $chan %dm.color $+ %dm.starter slashes %dm.opponent with his DDS Special Attack and hits a %dm.dds1 , %dm.dds2 . %dm.opponent has %dm.opponent.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.opponent it's now your turn!
        set %dm.attacker %dm.opponent
        dec %dm.starter.spec 25
        halt
      }
      if (%dm.attacker == %dm.opponent) {
        set %dm.dds1 $rand(0,28)
        set %dm.dds2 $rand(0,28)
        set %dm.dds $calc(%dm.dds1 + %dm.dds2)
        dec %dm.starter.health %dm.dds
        if (%dm.starter.health < 1) { set %dm.starter.health 0 | goto two }
        msg $chan %dm.color $+ %dm.opponent slashes %dm.starter with his DDS Special Attack and hits a %dm.dds1 , %dm.dds2 . %dm.starter has %dm.starter.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.starter it's now your turn!
        set %dm.attacker %dm.starter
        dec %dm.opponent.spec 25
        halt
      }
      :two
      if (%dm.opponent.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.starter $+ ! You have defeated %dm.opponent with a %dm.dds1 and %dm.dds2 for a KO!
        unset %dm.*
        unset %dm
        halt
      }
      if (%dm.starter.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.opponent $+ ! You have defeated %dm.starter with a %dm.dds1 and %dm.dds2 for a KO!
        unset %dm.*
        unset %dm
        halt
      }
    }
  }
}
on *:text:!gmaul:#:{
  if (%dm != $null) {
    if (%dm.wepset == 1) {
      if ($nick != %dm.attacker) {
        notice $nick %dm.color $+ It's not your turn noob!
        halt
      }
      if (%dm.attacker == %dm.starter) {
        if (%dm.starter.spec < 100) { notice $nick %dm.color $+ You have %dm.starter.spec $+ % Spec left. That is not enough.
          msg $chan %dm.color $+ Go ahead %dm.opponent , take a shot!
          set %dm.attacker %dm.opponent
          halt
        }
      }
      if (%dm.attacker == %dm.opponent) {
        if (%dm.opponent.spec < 100) { notice $nick %dm.color $+ You have %dm.opponent.spec $+ % Spec left. That is not enough.
          msg $chan %dm.color $+ Go ahead %dm.starter , take a shot!
          set %dm.attacker %dm.starter
          halt
        }
      }
      if (%dm.attacker == %dm.starter) {
        set %dm.maul1 $rand(0,38)
        set %dm.maul2 $rand(0,38)
        set %dm.maul3 $rand(0,38)
        set %dm.gmaul $calc(%dm.maul1 + %dm.maul2 + %dm.maul3)
        dec %dm.opponent.health %dm.gmaul
        if (%dm.opponent.health < 1) { set %dm.opponent.health 0 | goto two }
        msg $chan %dm.color $+ %dm.attacker mauls %dm.opponent with his Granite Maul and hits a %dm.maul1 , %dm.maul2 , and %dm.maul3 . %dm.opponent has %dm.opponent.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.opponent it's now your turn!
        set %dm.attacker %dm.opponent
        set %dm.starter.spec 0
        halt
      }
      if (%dm.attacker == %dm.opponent) {
        set %dm.maul1 $rand(0,38)
        set %dm.maul2 $rand(0,38)
        set %dm.maul3 $rand(0,38)
        set %dm.gmaul $calc(%dm.maul1 + %dm.maul2 + %dm.maul3)
        dec %dm.starter.health %dm.gmaul
        if (%dm.starter.health < 1) { set %dm.starter.health 0 | goto two }
        msg $chan %dm.color $+ %dm.attacker mauls %dm.starter with his Granite Maul and hits a %dm.maul1 , %dm.maul2 , and %dm.maul3 . %dm.starter has %dm.starter.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.starter it's now your turn!
        set %dm.attacker %dm.starter
        set %dm.opponent.spec 0
        halt
      }
      :two
      if (%dm.opponent.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.starter $+ ! You have defeated %dm.opponent with a %dm.maul1 , %dm.maul2 , and a %dm.maul3 for a KO!
        unset %dm.*
        unset %dm
        halt
      }
      if (%dm.starter.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.opponent $+ ! You have defeated %dm.starter with a %dm.maul1 , %dm.maul2 , and a %dm.maul3 for a KO!
        unset %dm.*
        unset %dm
        halt
      }
    }
  }
}
on *:text:!stopdm:#:{
  if (%dm != ON) {
    notice $nick %dm.color $+ There is no DM active.
    halt
  }
  if ((($nick == %dm.starter) || ($nick == %dm.opponent) || ($nick == Fave))) {
    mode $chan -m
    mode $chan -vv %dm.opponent %dm.starter
    msg $chan %dm.color $+ The current DM has been turned off by $nick $+ .
    unset %dm.*
    unset %dm
  }
}
on *:text:!eat:#:{
  if (%dm != ON) {
    notice $nick %dm.color $+ There is no DM active.
    halt
  }
  if ($nick != %dm.attacker) { notice $nick It's not your turn noob! | halt }
  if ($nick == %dm.starter) {
    if (%dm.starter.food == 0) { notice $nick You have no more food! | goto three }
    inc %dm.starter.health %dm.food
    dec %dm.starter.food 
    goto two
  }
  if ($nick == %dm.opponent) {
    if (%dm.opponent.food == 0) { notice $nick You have no more food! | goto three }
    inc %dm.opponent.health %dm.food
    dec %dm.starter.food
    goto two
  }
  :two
  if (%dm.starter.health > 99) { set %dm.starter.health 99 }
  if (%dm.opponent.health > 99) { set %dm.opponent.health 99 }
  if ($nick == %dm.starter) {
    msg $chan %dm.color $+ %dm.starter eats the food. He now has %dm.starter.health health remaining and %dm.starter.food food left!
    msg $chan %dm.color $+ Go ahead, %dm.opponent take a shot!
    set %dm.attacker %dm.opponent
    halt
  }
  if ($nick == %dm.opponent) {
    msg $chan %dm.color $+ %dm.opponent eats the food. He now has %dm.opponent.health health remaining and %dm.opponent.food food left!
    msg $chan %dm.color $+ Go ahead, %dm.starter take a shot!
    set %dm.attacker %dm.starter
    halt
    :three
    if (%dm.attacker == %dm.starter) {
      msg $chan %dm.starter has no more food left!
      set %dm.attacker %dm.opponent
      msg $chan Go ahead, %dm.opponent - defeat him!
      halt
    }
    if (%dm.attacker == %dm.opponent) {
      msg $chan %dm.opponent has no more food left!
      set %dm.attacker %dm.starter
      msg $chan Go ahead, %dm.starter - defeat him!
      halt
    }
  }
} 
on *:text:!slash:#:{
  if (%dm != $null) {
    if (%dm.wepset == 2) {
      if ($nick != %dm.attacker) {
        notice $nick %dm.color $+ It's not your turn noob!
        halt
      }
      if (%dm.attacker == %dm.starter) {
        set %dm.scim $rand(0,30)
        dec %dm.opponent.health %dm.scim
        if (%dm.opponent.health < 1) { set %dm.opponent.health 0 | goto two }
        msg $chan %dm.color $+ %dm.starter slashes %dm.opponent with his Dragon Scimitar and hits a %dm.scim . %dm.opponent has %dm.opponent.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.opponent it's now your turn!
        set %dm.attacker %dm.opponent
        halt
      }
      if (%dm.attacker == %dm.opponent) {
        set %dm.scim $rand(0,30)
        dec %dm.starter.health %dm.scim
        if (%dm.starter.health < 1) { set %dm.starter.health 0 | goto two }
        msg $chan %dm.color $+ %dm.opponent slashes %dm.starter with his Dragon Scimitar and hits a %dm.scim . %dm.starter has %dm.starter.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.starter it's now your turn!
        set %dm.attacker %dm.starter
        halt
      }
      :two
      if (%dm.opponent.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.starter $+ ! You have defeated %dm.opponent with a %dm.scim for a KO!
        unset %dm.*
        unset %dm
        halt
      }
      if (%dm.starter.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.opponent $+ ! You have defeated %dm.starter with a %dm.scim for a KO!
        unset %dm.*
        unset %dm
        halt
      }
    }
  }
}
on *:text:!daxe:#:{
  if (%dm != $null) {
    if (%dm.wepset == 3) {
      if ($nick != %dm.attacker) {
        notice $nick %dm.color $+ It's not your turn noob!
        halt
      }
      if (%dm.attacker == %dm.starter) {
        set %dm.daxe $rand(0,50)
        if (%dm.starter.health < 15) { set %dm.daxe $rand(20,80) }
        dec %dm.opponent.health %dm.daxe
        if (%dm.opponent.health < 1) {
          set %dm.opponent.health 0
          goto two
        }
        msg $chan %dm.color $+ %dm.starter hits %dm.opponent with his Dharok's Great Axe and hits a %dm.daxe %dm.opponent has %dm.opponent.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.opponent it's now your turn!
        set %dm.attacker %dm.opponent
        halt
      }
      if (%dm.attacker == %dm.opponent) {
        set %dm.daxe $rand(0,50)
        if (%dm.opponent.health < 15) { set %dm.daxe $rand(20,80) }
        dec %dm.starter.health %dm.daxe
        if (%dm.starter.health < 1) {
          set %dm.starter.health 0
          goto two
        }
        msg $chan %dm.color $+ %dm.opponent hits %dm.starter with his Dharok's Great Axe and hits a %dm.daxe %dm.starter has %dm.starter.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.starter it's now your turn!
        set %dm.attacker %dm.starter
        halt
      }
      :two
      if (%dm.opponent.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.starter $+ ! You have defeated %dm.opponent with a mighty %dm.daxe for a KO!
        unset %dm.*
        unset %dm
        halt
      }
      if (%dm.starter.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.opponent $+ ! You have defeated %dm.starter with a mighty %dm.daxe for a KO!
        unset %dm.*
        unset %dm
        halt
      }
    }
  }
}
on *:text:!msb:#:{
  if (%dm != $null) {
    if (%dm.wepset == 4) {
      if ($nick != %dm.attacker) {
        notice $nick %dm.color $+ It's not your turn noob!
        halt
      }
      if (%dm.attacker == %dm.starter) {
        if (%dm.starter.spec < 50) { notice $nick %dm.color $+ You have %dm.starter.spec $+ % Spec left. That is not enough.
          msg $chan %dm.color $+ Go ahead %dm.opponent , take a shot!
          set %dm.attacker %dm.opponent
          halt
        }
      }
      if (%dm.attacker == %dm.opponent) {
        if (%dm.opponent.spec < 50) { notice $nick %dm.color $+ You have %dm.opponent.spec $+ % Spec left. That is not enough.
          msg $chan %dm.color $+ Go ahead %dm.starter , take a shot!
          set %dm.attacker %dm.starter
          halt
        }
      }
      if (%dm.attacker == %dm.starter) {
        set %dm.msb1 $rand(15,25)
        set %dm.msb2 $rand(15,25)
        set %dm.msb $calc(%dm.msb1 + %dm.msb2)
        dec %dm.opponent.health %dm.msb
        if (%dm.opponent.health < 1) { set %dm.opponent.health 0 | goto two }
        msg $chan %dm.color $+ %dm.attacker specs %dm.opponent with his MSB Spec and hits a %dm.msb1 , %dm.msb2 . %dm.opponent has %dm.opponent.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.opponent it's now your turn!
        set %dm.attacker %dm.opponent
        dec %dm.starter.spec 50
        halt
      }
      if (%dm.attacker == %dm.opponent) {
        set %dm.msb1 $rand(15,25)
        set %dm.msb2 $rand(15,25)
        set %dm.msb $calc(%dm.msb1 + %dm.msb2)
        dec %dm.starter.health %dm.msb
        if (%dm.starter.health < 1) { set %dm.starter.health 0 | goto two }
        msg $chan %dm.color $+ %dm.attacker specs %dm.starter with his MSB Spec and hits a %dm.msb1 , %dm.msb2  . %dm.starter has %dm.starter.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.starter it's now your turn!
        set %dm.attacker %dm.starter
        dec %dm.starter.spec 50
        halt
      }
      :two
      if (%dm.opponent.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.starter $+ ! You have defeated %dm.opponent with a %dm.maul1 , %dm.maul2 , and a %dm.maul3 for a KO!
        unset %dm.*
        unset %dm
        halt
      }
      if (%dm.starter.health < 1) {
        mode $chan -m
        mode $chan -vv %dm.starter %dm.opponent
        msg $chan %dm.color $+ Congratulations %dm.opponent $+ ! You have defeated %dm.starter with a %dm.msb1 , %dm.msb2 for a KO!
        unset %dm.*
        unset %dm
        halt
      }
    }
  }
}
on *:text:!icebarrage:#:{
  if (%dm != $null) {
    if (%dm.wepset == 4) {
      if ($nick != %dm.attacker) {
        notice $nick %dm.color $+ It's not your turn noob!
        halt
      }
      if (%dm.attacker == %dm.starter) {
        set %dm.ib $rand(0,30)
        dec %dm.opponent.health %dm.ib
        if (%dm.opponent.health < 1) { set %dm.opponent.health 0 | goto two }
        msg $chan %dm.color $+ %dm.attacker freezes %dm.opponent with his Ice Barrage and hits a %dm.ib . %dm.opponent has %dm.opponent.health health remaining.
        msg $chan %dm.color $+ Go ahead, %dm.opponent it's now your turn!
        set %dm.attacker %dm.opponent
        halt
      }
    }
    if (%dm.attacker == %dm.opponent) {
      set %dm.ib $rand(0,30)
      dec %dm.starter.health %dm.ib
      if (%dm.starter.health < 1) { set %dm.starter.health 0 | goto two }
      msg $chan %dm.color $+ %dm.attacker freezes %dm.starter with an Ice Barrage and hits a %dm.ib . %dm.starter has %dm.starter.health health remaining.
      msg $chan %dm.color $+ Go ahead, %dm.starter it's now your turn!
      set %dm.attacker %dm.starter
      halt
    }
    :two
    if (%dm.opponent.health < 1) {
      mode $chan -m
      mode $chan -vv %dm.starter %dm.opponent
      msg $chan %dm.color $+ Congratulations %dm.starter $+ ! You have defeated %dm.opponent with a %dm.ib for a KO!
      unset %dm.*
      unset %dm
      halt
    }
    if (%dm.starter.health < 1) {
      mode $chan -m
      mode $chan -vv %dm.starter %dm.opponent
      msg $chan %dm.color $+ Congratulations %dm.opponent $+ ! You have defeated %dm.starter with a %dm.ib for a KO!
      unset %dm.*
      unset %dm
      halt
    }
  }
}
on 9999:text:!cleardm:#:{
  if (%dm == ON) or (%dm.started == ON) {
    	unset %dm.*
    	unset %dm
    	halt
  }
}