All pastes #899150 Raw Edit

Unnamed

public text v1 · immutable
·published 2008-02-10 22:35 UTC
rendered paste body
on *:TEXT:!dmcommands:#DMDayz: {
  if (%chandm != $chan) { 
    notice $nick You are in the wrong channel! Goto 7 $+ %chandm $+  for DMing!
    HALT
    msg $nick .::. Attacks .::. 
    msg $nick .whip 
    msg $nick .dds 
    msg $nick .dh 
    msg $nick .eat 
    msg $nick .msb
    msg $nick .anchor
    msg $nick .guthan
    msg $nick .cbow
    msg $nick .other
    msg $nick .dbow
    msg $nick .::. Others .::.
    msg $nick .tele
    msg $nick .dm 
    msg $nick .stopdm
  }
}
on *:TEXT:!dm:#DMDayz: {
  if (%duel2 == active) { 
    msg $chan a DM is already active please wait for it to end. 
  } 
  if (%duel == active) { 
    set %player2 $nick
    msg $chan the match is set! %player1 vs %player2 
    set %duel2 active 
    set %p1hp 99 
    set %p2hp 99 
    set %spec1 0 
    set %spec2 0 
    set %turn 1 

  } 
  else { 
    set %duel active 
    set %player1 $nick 
    msg $chan $nick has initiated a DM type !DM to fight them 
  } 
} 


on *:TEXT:!eat:#DMDayz: {
  if (%turn == 1) { 
    if (%p1hp == 99) {
      notice $nick You already have 99 hitpoints, please choose another command.
      halt
    }
    else ($nick == %player1) { 
      set %turn 2 
      inc %p1hp 20 
      msg $chan %player1 eats a shark and gains 20 hp 
      msg $chan %player1 has %p1hp hp left 
    } 
  } 
  else if (%turn == 2) { 
    if (%p2hp == 99) {
      notice $nick You already have 99 hitpoints, please choose another command.
      halt
    }
    if ($nick == %player2) { 
      set %turn 1 
      inc %p2hp 20 
      msg $chan %player2 eats a shark and gains 20 hp 
      msg $chan %player2 has %p2hp hp
    } 
  } 
} 

on *:TEXT:!dds:#DMDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      if (%spec2 < 4) { 
        set %hit1 $rand(0,23) 
        set %hit2 $rand(0,23) 
        inc %spec1 
        msg $chan %player1 has hit %hit1 and %hit2 
        dec %p2hp %hit1 
        dec %p2hp %hit2 
        msg $chan %player2 has %p2hp hp left 
        set %turn 2 
      } 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
    else if (%spec1 == 4) { 
      notice %player1 you are out of specials 
    } 
  } 
  else { 
    if (%turn == 2) { 
      if ($nick == %player2) { 
        if (%spec2 < 4) { 
          set %hit1 $rand(0,23) 
          set %hit2 $rand(0,23) 
          inc %spec2 
          msg $chan %player2 has hit %hit1 and %hit2 
          dec %p1hp %hit1 
          dec %p1hp %hit2 
          msg $chan %player1 has %p1hp hp left 
          set %turn 1 
          if (%p2hp < 0) { 
            msg $chan %player1 has defeated %player2
            unset %duel 
            unset %player1 
            unset %player2 
            unset %duel2 
            unset %p1hp 
            unset %p2hp 
            unset %spec1 
            unset %spec2 
            unset %turn 
            unset %hit1 
            unset %hit2 
          } 
          else { 
          } 
        } 
        else if (%spec2 == 4) { 
          notice %player2 you are out of specials. 
        } 
      } 
    } 
  } 
} 

on *:text:!dbow*:#DmDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      if (%spec2 < 4) { 
        set %hit1 $rand(5,45) 
        set %hit2 $rand(2,42) 
        inc %spec1 
        msg $chan %player1 has hit %hit1 and %hit2 
        dec %p2hp %hit1 
        dec %p2hp %hit2 
        msg $chan %player2 has %p2hp hp left 
        set %turn 2 
      } 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
    else if (%spec1 == 4) { 
      notice %player1 you are out of specials 
    } 
  } 
  else { 
    if (%turn == 2) { 
      if ($nick == %player2) { 
        if (%spec2 < 4) { 
          set %hit1 $rand(5,45) 
          set %hit2 $rand(2,42) 
          inc %spec2 
          msg $chan %player2 has hit %hit1 and %hit2 
          dec %p1hp %hit1 
          dec %p1hp %hit2 
          msg $chan %player1 has %p1hp hp left 
          set %turn 1 
          if (%p2hp < 0) { 
            msg $chan %player1 has defeated %player2
            unset %duel 
            unset %player1 
            unset %player2 
            unset %duel2 
            unset %p1hp 
            unset %p2hp 
            unset %spec1 
            unset %spec2 
            unset %turn 
            unset %hit1 
            unset %hit2 
          } 
          else { 
          } 
        } 
        else if (%spec2 == 4) { 
          notice %player2 you are out of specials. 
        } 
      } 
    } 
  } 
} 


on *:text:!msb*:#DmDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      if (%spec2 < 4) { 
        set %hit1 $rand(5,23) 
        set %hit2 $rand(2,18) 
        inc %spec1 
        msg $chan %player1 has hit %hit1 and %hit2 
        dec %p2hp %hit1 
        dec %p2hp %hit2 
        msg $chan %player2 has %p2hp hp left 
        set %turn 2 
      } 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
    else if (%spec1 == 4) { 
      notice %player1 you are out of specials 
    } 
  } 
  else { 
    if (%turn == 2) { 
      if ($nick == %player2) { 
        if (%spec2 < 4) { 
          set %hit1 $rand(5,23) 
          set %hit2 $rand(2,18) 
          inc %spec2 
          msg $chan %player2 has hit %hit1 and %hit2 
          dec %p1hp %hit1 
          dec %p1hp %hit2 
          msg $chan %player1 has %p1hp hp left 
          set %turn 1 
          if (%p2hp < 0) { 
            msg $chan %player1 has defeated %player2
            unset %duel 
            unset %player1 
            unset %player2 
            unset %duel2 
            unset %p1hp 
            unset %p2hp 
            unset %spec1 
            unset %spec2 
            unset %turn 
            unset %hit1 
            unset %hit2 
          } 
          else { 
          } 
        } 
        else if (%spec2 == 4) { 
          notice %player2 you are out of specials. 
        } 
      } 
    } 
  } 
} 


on *:text:!anchor*:#DmDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      set %hit $rand(5,35) 
      msg $chan %player1 has hit a %hit 
      dec %p2hp %hit 
      msg $chan %player2 has %p2hp hp left 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
  else if (%turn == 2) { 
    if ($nick == %player2) { 
      set %turn 1 
      set %hit $rand(5,35) 
      msg $chan %player2 has hit a %hit 
      dec %p1hp %hit 
      msg $chan %player1 has %p1hp hp left 
      if (%p1hp < 0) { 
        msg $chan %player2 has defeated %player1 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
} 



on *:text:!cbow*:#DmDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      set %hit $rand(10,25) 
      msg $chan %player1 has hit a %hit 
      dec %p2hp %hit 
      msg $chan %player2 has %p2hp hp left 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
  else if (%turn == 2) { 
    if ($nick == %player2) { 
      set %turn 1 
      set %hit $rand(10,25) 
      msg $chan %player2 has hit a %hit 
      dec %p1hp %hit 
      msg $chan %player1 has %p1hp hp left 
      if (%p1hp < 0) { 
        msg $chan %player2 has defeated %player1 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
} 


on *:text:!whip*:#DmDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      set %hit $rand(0,35) 
      msg $chan %player1 has hit a %hit 
      dec %p2hp %hit 
      msg $chan %player2 has %p2hp hp left 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
  else if (%turn == 2) { 
    if ($nick == %player2) { 
      set %turn 1 
      set %hit $rand(0,35) 
      msg $chan %player2 has hit a %hit 
      dec %p1hp %hit 
      msg $chan %player1 has %p1hp hp left 
      if (%p1hp < 0) { 
        msg $chan %player2 has defeated %player1 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
} 

on *:text:!dh*:#DmDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      set %dh $rand(10,70) 
      msg $chan %player1 has hit a %dh 
      dec %p2hp %dh 
      msg $chan %player2 has %p2hp hp left 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
  if (%turn == 2) { 
    if ($nick == %player2) { 
      set %turn 1 
      set %dh $rand(10,70) 
      msg $chan %player2 has hit a %dh 
      dec %p1hp %dh 
      msg $chan %player1 has %p1hp hp left 
      if (%p1hp < 0) { 
        msg $chan %player2 has defeated %player1
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
}
on *:text:!guth*:#DmDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      set %dh $rand(0,30) 
      msg $chan %player1 has hit a %dh 
      dec %p2hp %dh 
      msg $chan %player2 has %p2hp hp left 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
  if (%turn == 2) { 
    if ($nick == %player2)  
    set %turn 1 
    set %dh $rand(0,30) 
    msg $chan %player2 has hit a %dh 
    dec %p1hp %dh 
    msg $chan %player1 has %p1hp hp left 
    if (%p1hp < 0) { 
      msg $chan %player2 has defeated %player1
      unset %duel 
      unset %player1 
      unset %player2 
      unset %duel2 
      unset %p1hp 
      unset %p2hp 
      unset %spec1 
      unset %spec2 
      unset %turn 
      unset %hit1 
      unset %hit2 
    } 
    else { 
    } 
  } 
} 

on *:text:!tele*:#DmDayz: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      msg $chan %player1 has teleported out, the winner is %player2
      unset %duel 
      unset %player1 
      unset %player2 
      unset %duel2 
      unset %p1hp 
      unset %p2hp 
      unset %spec1 
      unset %spec2 
      unset %turn 
      unset %hit1 
      unset %hit2 
    }
    else{
  }
  if (%turn == 2) { 
    if ($nick == %player2) { 
      msg $chan %player2 has teleported out, the winner is %player1
      unset %duel 
      unset %player1 
      unset %player2 
      unset %duel2 
      unset %p1hp 
      unset %p2hp 
      unset %spec1 
      unset %spec2 
      unset %turn 
      unset %hit1 
      unset %hit2 
    }
  }
}
on *:text:!stopdm*:#DmDayz: 
if ($nick == $player1 || $nick == %player2 || $address($nick,2) == $readini(botsettings.ini,staff,$address($nick,2))) && ($2) { 
  msg $chan 4DM ENDED
  unset %duel 
  unset %player1 
  unset %player2 
  unset %duel2 
  unset %p1hp 
  unset %p2hp 
  unset %spec1 
  unset %spec2 
  unset %turn 
  unset %hit1 
  unset %hit2