All pastes #483201 Raw Edit

Stuff

public text v1 · immutable
·published 2007-05-11 16:37 UTC
rendered paste body
} 
on *:TEXT:!dmcommands*:#: { 
  notice $nick Dm commands. 
  notice $nick !dm ~ To start/join a dm. 
  notice $nick !stopdm ~ To stop a dm if you're in it. 
  notice $nick !dds ~ To dds spec your opponent, uses 25% spec. 
  notice $nick !whip ~ To whip your opponent. 
  notice $nick !dh ~ To strike your opponent with your dhoraks greataxe, uses 50% spec. 
  notice $nick !barrage ~ To barrage your opponent. 
  notice $nick !eat ~ To eat a shark and heal 20 hp. 
  notice $nick !spec ~ To recharge 25% spec. 
} 
on *:TEXT:!dm*:#: { 
  if ($1 == !dmcommands) { halt } 
  if ($chan == #b0ts) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick No dm's for $chan 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,status) == on) { 
      notice $nick There's already an dm active. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick You're already in the fucking dm 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick2)) == $null) { 
      writeini -n dm.ini $chan nick2 $nick 
      writeini -n dm.ini $chan turn 1 
      writeini -n dm.ini $chan status on 
      timer $+ $chan $+ 1 off 
      timer $+ $chan $+ 2 off 
      msg $chan The dm is set, $readini(dm.ini,$chan,nick1) vs $readini(dm.ini,$chan,nick2) type !dmcommands to see what commands you can do. 
      notice $readini(dm.ini,$chan,nick1) You are going first, You have 10 sharks 
      notice $readini(dm.ini,$chan,nick2) You have 10 sharks and 99 hp, $readini(dm.ini,$chan,nick1) goes first. 
    } 
    if ($readini(dm.ini,$chan,status) == $null) { 
      writeini -n dm.ini $chan barrage1 2 
      writeini -n dm.ini $chan barrage2 2 
      writeini -n dm.ini $chan status waiting 
      writeini -n dm.ini $chan nick1 $nick 
      writeini -n dm.ini $chan nick1hp 99 
      writeini -n dm.ini $chan nick2hp 99 
      writeini -n dm.ini $chan nick1sharks 10 
      writeini -n dm.ini $chan nick2sharks 10 
      writeini -n dm.ini $chan nick1spec 100 
      writeini -n dm.ini $chan nick2spec 100 
      timer $+ $chan $+ 1 1 30 remini dm.ini $chan 
      timer $+ $chan $+ 2 1 30 msg $chan The dm has been canceled. 
      msg $chan $+ $nick has started a dm you have 30 seconds to type !dm to fight them. 
    } 
  } 
} 
on *:TEXT:!dds*:#: { 
  if ($chan == #botshere) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick No dm's for $chan 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick There currently isn't a dm on. Type !dm to fight. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick Please wait. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick Type !dm to join the dm with $readini(dm.ini,$chan,nick1) 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1) && ($readini(dm.ini,$chan,nick1) == $nick) && ($readini(dm.ini,$chan,nick1spec) <= 24) { 
      notice $nick You don't have enough energy left. 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan oldspec1 $readini(dm.ini,$chan,nick1spec) 
      writeini -n dm.ini $chan nick1spec $calc( $readini(dm.ini,$chan,oldspec1) - 25 ) 
      writeini -n dm.ini $chan hit1 $rand(1,20) 
      writeini -n dm.ini $chan hit2 $rand(1,20) 
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1) + $readini(dm.ini,$chan,hit2)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $+ $nick specs a $readini(dm.ini,$chan,hit1) $readini(dm.ini,$chan,hit2) on $readini(dm.ini,$chan,nick2) $+ . $readini(dm.ini,$chan,nick2) has 0 hp left! 
        timer 1 3 msg $chan $+ $nick has Won the DM! 
        remini dm.ini $chan 
        halt 
      } 
      else { 
        msg $chan $+ $nick specs a $readini(dm.ini,$chan,hit1) $readini(dm.ini,$chan,hit2) on $readini(dm.ini,$chan,nick2) $+ . $readini(dm.ini,$chan,nick2) has $readini(dm.ini,$chan,nick2hp) hp left! 
        notice $nick You have $readini(dm.ini,$chan,nick1spec) $+ % spec left. 
        writeini dm.ini $chan turn 2 
        msg $chan It is now $readini(dm.ini,$chan,nick2) $+ 's turn. 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2spec) <= 24) { 
      notice $nick You don't have enough energy left. 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan oldspec2 $readini(dm.ini,$chan,nick2spec) 
      writeini -n dm.ini $chan nick2spec $calc( $readini(dm.ini,$chan,oldspec2) - 25 ) 
      writeini -n dm.ini $chan hit1 $rand(1,20) 
      writeini -n dm.ini $chan hit2 $rand(1,20) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1) - $readini(dm.ini,$chan,hit2) ) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $+ $nick specs a $readini(dm.ini,$chan,hit1) $readini(dm.ini,$chan,hit2) on $readini(dm.ini,$chan,nick1) $+ . $readini(dm.ini,$chan,nick1) has 0 hp left! 
        timer 1 3 msg $chan $+ $nick has Won the DM! 
        remini dm.ini $chan 
        halt 
      } 
      else { 
        msg $chan $+ $nick specs a $readini(dm.ini,$chan,hit1) $readini(dm.ini,$chan,hit2) on $readini(dm.ini,$chan,nick1) $+ . $readini(dm.ini,$chan,nick1) has $readini(dm.ini,$chan,nick1hp) hp left! 
        notice $nick You have $readini(dm.ini,$chan,nick2spec) $+ % spec left. 
        writeini dm.ini $chan turn 1 
        msg $chan It is now $readini(dm.ini,$chan,nick1) $+ 's turn. 
        halt 
      } 
    } 
    else { 
      notice $nick It isn't your turn or there isn't a dm on. 
    } 
  } 
} 

on *:TEXT:!eat*:#: { 
  if ($chan == #botshere) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick No dm's for $chan 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick There currently isn't a dm on. Type !dm to fight. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick Please wait. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick Type !dm to join the dm with $readini(dm.ini,$chan,nick1) 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2sharks) <= 0) { 
      notice $nick You ate all 10 of your sharks. 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,nick1sharks) <= 0) { 
      notice $nick You ate all 10 of your sharks. 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan nick1hp $calc($readini(dm.ini,$chan,nick1hp)+20) 
      writeini -n dm.ini $chan nick1sharks $readini(dm.ini,$chan,nick1sharks)-1) 
      if ($readini(dm.ini,$chan,nick1hp) >= 100) { 
        writeini dm.ini $chan nick1hp 99 
        msg $chan $+ $nick ate a Shark, $nick has $readini(dm.ini,$chan,nick1hp) hitpoints.  
        notice $nick You have $readini(dm.ini,$chan,nick1sharks) Shark Left. 
        msg $chan It is now $readini(dm.ini,$chan,nick2) $+ 's turn. 
        writeini dm.ini $chan Turn 2 
        halt 
      } 
      else { 
        msg $chan $+ $nick ate a Shark, $nick has $readini(dm.ini,$chan,nick1hp) hitpoints.  
        notice $nick You have $readini(dm.ini,$chan,nick1sharks) Shark Left. 
        writeini dm.ini $chan Turn 2 
        msg $chan It is now $readini(dm.ini,$chan,nick2) $+ 's turn. 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan nick2hp $calc($readini(dm.ini,$chan,nick2hp)+20) 
      writeini -n dm.ini $chan nick2sharks $readini(dm.ini,$chan,nick2sharks)-1) 
      if ($readini(dm.ini,$chan,nick2hp) >= 100) { 
        writeini dm.ini $chan nick2hp 99 
        msg $chan $+ $nick ate a Shark, $nick has $readini(dm.ini,$chan,nick2hp) hitpoints.  
        notice $nick You have $readini(dm.ini,$chan,nick2sharks) Shark Left. 
        msg $chan It is now $readini(dm.ini,$chan,nick1) $+ 's turn. 
        writeini dm.ini $chan Turn 1 
        halt 
      } 
      else { 
        msg $chan $+ $nick ate a Shark, $nick has $readini(dm.ini,$chan,nick2hp) hitpoints.  
        notice $nick You have $readini(dm.ini,$chan,nick2sharks) Shark Left. 
        writeini dm.ini $chan Turn 1 
        msg $chan It is now $readini(dm.ini,$chan,nick1) $+ 's turn. 
        halt 
      } 
    } 
    else { 
      notice $nick It isn't your turn or there isn't a dm on. 
    } 
  } 
} 
on *:TEXT:!stopdm:#:{ 
  if ($chan == #botshere) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick No dm's for $chan 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick There isn't a dm in $chan $+ . 
      halt 
    } 
    if ($nick == $readini(dm.ini,$chan,nick2) || $nick == $readini(dm.ini,$chan,nick1) || $nick isop $chan) { 
      remini dm.ini $chan  
      msg $chan The dm for $chan was ended by $nick $+ . 
      halt 
      else { 
        notice $nick You must be in the dm to stop it.  
      } 
    } 
  } 
} 
on *:TEXT:!whip*:#: { 
  if ($chan == #botshere) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick No dm's for $chan 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick There currently isn't a dm on. Type !dm to fight. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick Please wait. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick Type !dm to join the dm with $readini(dm.ini,$chan,nick1) 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(1,35)  
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $+ $nick whips a $readini(dm.ini,$chan,oldhp2) on $readini(dm.ini,$chan,nick2) $+ . $readini(dm.ini,$chan,nick2) has 0 hp left! 
        timer 1 3 msg $chan $+ $nick has Won the DM! 
        remini dm.ini $chan 
        halt 
      } 
      else { 
        msg $chan $+ $nick whip a $readini(dm.ini,$chan,hit1) on $readini(dm.ini,$chan,nick2) $+ . $readini(dm.ini,$chan,nick2) has $readini(dm.ini,$chan,nick2hp) hp left! 
        writeini dm.ini $chan turn 2 
        msg $chan It is now $readini(dm.ini,$chan,nick2) $+ 's turn. 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(1,35) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $+ $nick whip a $readini(dm.ini,$chan,oldhp1) on $readini(dm.ini,$chan,nick1) $+ . $readini(dm.ini,$chan,nick1) has 0 hp left! 
        timer 1 3 msg $chan $+ $nick has Won the DM! 
        remini dm.ini $chan 
        halt 
      } 
      else { 
        msg $chan $+ $nick whips a $readini(dm.ini,$chan,hit1) on $readini(dm.ini,$chan,nick1) $+ . $readini(dm.ini,$chan,nick1) has $readini(dm.ini,$chan,nick1hp) hp left! 
        writeini dm.ini $chan turn 1 
        msg $chan It is now $readini(dm.ini,$chan,nick1) $+ 's turn. 
      } 
    } 
    else { 
      notice $nick It isn't your turn or you aren't in the current dm. 
    } 
  } 
} 
on *:TEXT:!dh*:#: { 
  if ($chan == #botshere) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick No dm's for $chan 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick There currently isn't a dm on. Type !dm to fight. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick Please wait. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick Type !dm to join the dm with $readini(dm.ini,$chan,nick1) 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1) && ($readini(dm.ini,$chan,nick1) == $nick) && ($readini(dm.ini,$chan,nick1spec) <= 49) { 
      notice $nick You don't have enough energy left. 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(1,60)  
      writeini -n dm.ini $chan oldspec1 $readini(dm.ini,$chan,nick1spec) 
      writeini -n dm.ini $chan nick1spec $calc( $readini(dm.ini,$chan,oldspec1) - 50 ) 
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $+ $nick strikes  a $readini(dm.ini,$chan,oldhp2) on $readini(dm.ini,$chan,nick2) with his greataxe! $readini(dm.ini,$chan,nick2) has 0 hp left! 
        timer 1 3 msg $chan $+ $nick has Won the DM! 
        remini dm.ini $chan 
        halt 
      } 
      else { 
        msg $chan $+ $nick strikes a $readini(dm.ini,$chan,hit1) on $readini(dm.ini,$chan,nick2) with his greataxe! $readini(dm.ini,$chan,nick2) has $readini(dm.ini,$chan,nick2hp) hp left! 
        writeini dm.ini $chan turn 2 
        notice $nick You have $readini(dm.ini,$chan,nick1spec) $+ % spec left. 
        msg $chan It is now $readini(dm.ini,$chan,nick2) $+ 's turn. 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2) && ($readini(dm.ini,$chan,nick2) == $nick) && ($readini(dm.ini,$chan,nick2spec) <= 49) { 
      notice $nick You don't have enough energy left. 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(1,35) 
      writeini -n dm.ini $chan oldspec2 $readini(dm.ini,$chan,nick2spec) 
      writeini -n dm.ini $chan nick2spec $calc($readini(dm.ini,$chan,oldspec2) - 50) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $+ $nick strikes a $readini(dm.ini,$chan,oldhp1) on $readini(dm.ini,$chan,nick1) with his greataxe! $readini(dm.ini,$chan,nick1) has 0 hp left! 
        timer 1 3 msg $chan $+ $nick has Won the DM! 
        remini dm.ini $chan 
        halt 
      } 
      else { 
        msg $chan $+ $nick strikes a $readini(dm.ini,$chan,hit1) on $readini(dm.ini,$chan,nick1) with his greataxe! $readini(dm.ini,$chan,nick1) has $readini(dm.ini,$chan,nick1hp) hp left! 
        writeini dm.ini $chan turn 1 
        notice $nick You have $readini(dm.ini,$chan,nick2spec) $+ % spec left. 
        msg $chan It is now $readini(dm.ini,$chan,nick1) $+ 's turn. 
      } 
    } 
    else { 
      notice $nick It isn't your turn or you aren't in the current dm. 
    } 
  } 
} 
on *:TEXT:!adddmchan*:#:{ 
  if ($nick ishop #clan-peacefull || $nick isop #clan-peacefull) { 
    writeini -n alloweddm.ini $2 allowed allowed 
    msg $chan $+ $2 has been added to the allow list. 
  } 
} 
on *:TEXT:!deldmchan*:#:{ 
  if ($nick ishop #clan-peacefull || $nick isop #clan-peacefull) { 
    remini alloweddm.ini $2 allowed 
    msg $chan $+ $2 has been removed from the allow list. 
  } 
} 
on *:TEXT:!barrage*:#: { 
  if ($chan == #botshere) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick No dm's for $chan 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick There currently isn't a dm on. Type !dm to fight. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick Please wait. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick Type !dm to join the dm with $readini(dm.ini,$chan,nick1) 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,barrage2) <= 0) { 
      notice $nick You are out of runes :o. 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,barrage1) <= 0) { 
      notice $nick You are out of runes :o. 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(1,30) 
      writeini -n dm.ini $chan freeze $rand(1,10) 
      writeini -n dm.ini $chan barrage1 $calc($readini(dm.ini,$chan,barrage1)-1) 
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $+ $nick conjures up an ice barrage and hits $readini(dm.ini,$chan,oldhp2) on $readini(dm.ini,$chan,nick2) $+ . $readini(dm.ini,$chan,nick2) has 0 hp left! 
        timer 1 3 msg $chan $+ $nick has Won the DM! 
        remini dm.ini $chan 
        halt 
      } 
      elseif ($readini(dm.ini,$chan,freeze) >= 5) { 
        msg $chan $+ $nick conjures up an ice barrage and hits $readini(dm.ini,$chan,hit1) on $readini(dm.ini,$chan,nick2) $+ . $readini(dm.ini,$chan,nick2) has $readini(dm.ini,$chan,nick2hp) hp left! 
        msg $chan $+ $readini(dm.ini,$chan,nick2) has been frozen and missed their turn! 
        msg $chan It is $readini(dm.ini,$chan,nick1) $+ 's turn again! 
        halt 
      } 
      else { 
        msg $chan $+ $nick conjures up an ice barrage and hits $readini(dm.ini,$chan,hit1) on $readini(dm.ini,$chan,nick2) $+ . $readini(dm.ini,$chan,nick2) has $readini(dm.ini,$chan,nick2hp) hp left! 
        writeini -n dm.ini $chan turn 2 
        msg $chan It is now $readini(dm.ini,$chan,nick2) $+ 's turn. 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(1,30) 
      writeini -n dm.ini $chan barrage2 $calc($readini(dm.ini,$chan,barrage2)-1) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      writeini -n dm.ini $chan freeze $rand(1,10) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $+ $nick conjures up an ice barrage and hits $readini(dm.ini,$chan,oldhp1) on $readini(dm.ini,$chan,nick1) $+ . $readini(dm.ini,$chan,nick2) has 0 hp left! 
        timer 1 3 msg $chan $+ $nick has Won the DM! 
        remini dm.ini $chan 
        halt 
      } 
      elseif ($readini(dm.ini,chan,freeze) <= 5) { 
        msg $chan $+ $nick conjures up an ice barrage and hits $readini(dm.ini,$chan,hit1) on $readini(dm.ini,$chan,nick1) $+ . $readini(dm.ini,$chan,nick1) has $readini(dm.ini,$chan,nick1hp) hp left! 
        msg $chan $+ $readini(dm.ini,$chan,nick1) has been frozen and missed their turn! 
        msg $chan It is $readini(dm.ini,$chan,nick2) $+ 's turn again! 
        halt 
      } 
      else { 
        msg $chan $+ $nick conjures up an ice barrage and hits $readini(dm.ini,$chan,hit1) on $readini(dm.ini,$chan,nick1) $+ . $readini(dm.ini,$chan,nick1) has $readini(dm.ini,$chan,nick1hp) hp left! 
        writeini -n dm.ini $chan turn 1 
        msg $chan It is now $readini(dm.ini,$chan,nick1) $+ 's turn. 
        halt 
      } 
    } 
    else { 
      notice $nick It isn't your turn or you aren't in the current dm. 
    } 
  } 
} 
on *:TEXT:!rape*:#: { 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,status) == on) { 
      if ($nick isop #clan-peacefull { 
        msg $chan $+ $nick hits 9999 on $readini(dm.ini,$chan,nick1) and $readini(dm.ini,$chan,nick2) $+ . Overkill much? $nick won l0l!! 
        remini dm.ini $chan 
      } 
    } 
  } 
} 
on *:TEXT:!spec*:#: { 
  if ($chan == #botshere) { halt } 
  if ($1 == !speccheck) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick No dm's for $chan 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick There currently isn't a dm on. Type !dm to fight. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick Please wait. 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick Type !dm to join the dm with $readini(dm.ini,$chan,nick1) 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2spec) >= 100) { 
      notice $nick You already have max spec. 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,nick1spec) >= 100) { 
      notice $nick You already have max spec. 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan nick1spec $calc( $readini(dm.ini,$chan,nick1spec)+25) 
      msg $chan $+ $nick recharged 25% of their spec, $nick now has $readini(dm.ini,$chan,nick1spec) $+ % spec. 
      msg $chan It is now $readini(dm.ini,$chan,nick2) $+ 's turn. 
      writeini dm.ini $chan Turn 2 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan nick2spec $calc( $readini(dm.ini,$chan,nick2spec)+25) 
      msg $chan $+ $nick recharged 25% of their spec, $nick now has $readini(dm.ini,$chan,nick2spec) $+ % spec.  
      msg $chan It is now $readini(dm.ini,$chan,nick1) $+ 's turn.  
      writeini dm.ini $chan Turn 1 
      halt 
    } 
    else { 
      notice $nick It isn't your turn or there isn't a dm on. 
    } 
  }