Recent Posts
Anonymous
None | 7 sec ago
Squit
None | 9 sec ago
Anonymous
None | 18 sec ago
LA LA LAND o/
CMake | 32 sec ago
Anonymous
None | 35 sec ago
Anonymous
None | 39 sec ago
ff
None | 59 sec ago
Anonymous
Bash | 1 min ago
Minigame
Java | 1 min ago
Stunt
None | 1 min ago
Sitereport
Find cool info about any domain on the internet?
visit sitereport
Free Subdomains
Want a pastebin.com sub-domain for your community?
learn more...
What is pastebin?
Pastebin is a website that hosts all your text & code on dedicated servers for easy sharing.
learn more...
Learn a little bit about the new Pastebin.com on our help page. hide message
By Ratatoi on the 10th of Feb 2008 10:51:10 PM Download | Raw | Embed | Report
  1. on *:text:!dmcommands*:#:{
  2.   if (%chandm != $chan) {
  3.     notice $nick %dmlogo You are in the wrong channel! Goto 7 $+ %chandm $+  for DMing!
  4.     HALT
  5.   }
  6.   if (%commandhalt2 [ $+ [ $nick ] ] != $null) { HALT }
  7.   if (%commandhalt != $null) { notice $nick 06I am currently sending commands to somebody else.05 Please wait.
  8.     set %commandhalt2 [ $+ [ $nick ] ] yes
  9.   HALT }
  10.   unset %commandhalt2*
  11.   set %commandhalt yes
  12.   timer 01 10 unset %commandhalt
  13.   msg $chan %dmlogo Sending $nick DMCommands.
  14.   msg $chan %dmlogo Please wait 15-20 seconds before using another command.
  15.   msg $nick %dmlogo DM RULES.
  16.   msg $nick %dmlogo You start with 100% Special Attack meter. It is suggested you use this.
  17.   msg $nick %dmlogo Every turn, your Special Attack meter raises 5%.
  18.   msg $nick %dmlogo DM SPECIAL COMMANDS.
  19.   msg $nick %dmlogo Syntax: Command :: Percent special uses :: Max hit :: Effect
  20.   msg $nick %dmlogo !dds :: 25% :: 46 (double 23) :: Hits twice.
  21.   msg $nick %dmlogo !dmace :: 25% :: 50 :: Double the chance to hit below 25.
  22.   msg $nick %dmlogo !anchor :: 50% :: 40 :: Double the chance to hit above 15.
  23.   msg $nick %dmlogo !dscim :: 60% :: 35 :: 5% chance of earning 100% special meter. 10% chance of earning 40% special meter. 50% chance of STEALING 10% special meter.
  24.   msg $nick %dmlogo !whip :: 55% :: 35 (40. See special) :: If hits below 10, do 1 extra damage. If hits above 11, do 2 extra damage, if hits above 25, do 3 extra damage, if hits 35, do 5 extra damage and steal 20% special meter.
  25.   msg $nick %dmlogo !daxe :: 60% :: Either hits 0 or 45 :: Low chance to hit 45.
  26.   msg $nick %dmlogo DM NORMAL COMMANDS.
  27.   msg $nick %dmlogo Syntax: Command :: Max hit :: Effect
  28.   msg $nick %dmlogo !Nwhip :: 30 :: None.
  29.   msg $nick %dmlogo !Nmaul :: 25 :: Slightly high chance to hit higher.
  30.   msg $nick %dmlogo !Nanchor :: 35 :: Slightly high chance to hit lower.
  31.   msg $nick %dmlogo !Ndscim :: 25 :: Regenerate 5% extra special meter this turn.
  32.   msg $nick %dmlogo OTHER COMMANDS.
  33.   msg $nick %dmlogo Syntax: Command :: Effect
  34.   msg $nick %dmlogo !dmstop :: Stops DM. Requires two people to initiate.
  35.   msg $nick %dmlogo !dmcommands :: Display all commands. This that you are reading IS !dmcommands
  36.   msg $nick %dmlogo !dmcheck :: Display current Win/Lose record, K/D ratio, gold, items.
  37.   msg $nick %dmlogo !dmadmin :: For ADMINS. Displays admin commands.
  38.   msg $nick %dmlogo !dmbuy :: If buying mod is enabled, lets you buy/check items to buy.
  39.   msg $nick %dmlogo !dmmods :: Checks what mods are currently enabled.
  40. }
  41. on *:text:!dds*:#:{
  42.   if (%otherdmbot == yes) { HALT }
  43.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  44.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  45.   if (%chandm != $chan) { HALT }
  46.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  47.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  48.   if (%dmspec [ $+ [ $nick ] ] < 25) { notice $nick %dmlogo You do not have enough special meter! | HALT }
  49.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  50.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  51.   dec %dmspec [ $+ [ $nick ] ] 25
  52.   set %dmhit1 $rand(0,28)
  53.   set %dmhit2 $rand(0,28)
  54.   if (%buydmmod == yes) {
  55.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  56.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  57.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  58.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  59.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  60.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  61.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  62.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  63.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  64.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  65.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  66.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  67.   }
  68.   if (%dmhit1 < 0) { set %dmhit1 0 }
  69.   if (%dmhit2 < 0) { set %dmhit2 0 }
  70.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  71.   msg $chan %dmlogo $nick uses his DDS Special and hits a %dmhit1 and %dmhit2 $+ !
  72.   set %dmhit $calc( %dmhit1 + %dmhit2 )
  73.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  74.   dmregen $nick %dmotherperson
  75.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  76. }
  77. on *:text:!dmace*:#:{
  78.   if (%otherdmbot == yes) { HALT }
  79.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  80.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  81.   if (%chandm != $chan) { HALT }
  82.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  83.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  84.   if (%dmspec [ $+ [ $nick ] ] < 25) { notice $nick %dmlogo You do not have enough special meter! | HALT }
  85.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  86.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  87.   dec %dmspec [ $+ [ $nick ] ] 25
  88.   set %dmhit $rand(0,50)
  89.   if (%dmhit > 25) {
  90.     set %dmhit $rand(0,55)
  91.   }
  92.   if (%buydmmod == yes) {
  93.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  94.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  95.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  96.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  97.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  98.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  99.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  100.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  101.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  102.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  103.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  104.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  105.   }
  106.   if (%dmhit < 0) { set %dmhit 0 }
  107.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  108.   msg $chan %dmlogo $nick uses his DMace Special and hits a %dmhit $+ !
  109.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  110.   dmregen $nick %dmotherperson
  111.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  112. }
  113. on *:text:!anchor*:#:{
  114.   if (%otherdmbot == yes) { HALT }
  115.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  116.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  117.   if (%chandm != $chan) { HALT }
  118.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  119.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  120.   if (%dmspec [ $+ [ $nick ] ] < 50) { notice $nick %dmlogo You do not have enough special meter! | HALT }
  121.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  122.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  123.   dec %dmspec [ $+ [ $nick ] ] 50
  124.   set %dmhit $rand(0,35)
  125.   if (%dmhit < 15) {
  126.     set %dmhit $rand(0,45)
  127.   }
  128.   if (%buydmmod == yes) {
  129.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  130.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  131.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  132.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  133.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  134.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  135.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  136.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  137.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  138.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  139.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  140.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  141.   }
  142.   if (%dmhit < 0) { set %dmhit 0 }
  143.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  144.   msg $chan %dmlogo $nick uses his Anchor Special and hits a %dmhit $+ !
  145.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  146.   dmregen $nick %dmotherperson
  147.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  148. }
  149. on *:text:!dscim*:#:{
  150.   if (%otherdmbot == yes) { HALT }
  151.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  152.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  153.   if (%chandm != $chan) { HALT }
  154.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  155.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  156.   if (%dmspec [ $+ [ $nick ] ] < 60) { notice $nick %dmlogo You do not have enough special meter! | HALT }
  157.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  158.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  159.   dec %dmspec [ $+ [ $nick ] ] 60
  160.   set %dmhit $rand(0,37)
  161.   set %dmrand1 $rand(1,20)
  162.   if (%dmrand1 == 1) { set %dmscima yes }
  163.   set %dmrand2 $rand(1,10)
  164.   if (%dmrand2 == 1) { set %dmscimb yes }
  165.   set %dmrand3 $rand(1,2)
  166.   if (%dmrand3 == 1) { set %dmscimc yes }
  167.   if (%buydmmod == yes) {
  168.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  169.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  170.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  171.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  172.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  173.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  174.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  175.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  176.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  177.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  178.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  179.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  180.   }
  181.   if (%dmhit < 0) { set %dmhit 0 }
  182.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  183.   msg $chan %dmlogo $nick uses his Dscim Special and hits a %dmhit $+ !
  184.   if (%dmscima == yes) { msg $chan %dmlogo $nick Also gains an extra _100%_ worth of special meter! | inc %dmspec [ $+ [ $nick ] ] 100 }
  185.   if (%dmscimb == yes) { msg $chan %dmlogo $nick Also gains an extra _40%_ worth of special meter! | inc %dmspec [ $+ [ $nick ] ] 40 }
  186.   if (%dmscimc == yes) { msg $chan %dmlogo $nick Also STEALS _10%_ special meter from %dmotherperson $+ ! | inc %dmspec [ $+ [ $nick ] ] 10 | dec %dmspec [ $+ [ %dmotherperson ] ] 10 }
  187.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  188.   dmregen $nick %dmotherperson
  189.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  190. }
  191. on *:text:!whip*:#:{
  192.   if (%otherdmbot == yes) { HALT }
  193.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  194.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  195.   if (%chandm != $chan) { HALT }
  196.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  197.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  198.   if (%dmspec [ $+ [ $nick ] ] < 55) { notice $nick %dmlogo You do not have enough special meter! | HALT }
  199.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  200.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  201.   dec %dmspec [ $+ [ $nick ] ] 55
  202.   set %dmhit $rand(0,42)
  203.   if (%dmhit < 11) { inc %dmhit 1 | set %dmwhip 1 }
  204.   if (%dmhit > 10) && (%dmhit < 35) { inc %dmhit 2 | set %dmwhip 2 }
  205.   if (%dmhit == 35) { inc %dmhit 5 | set %dmwhip 5 }
  206.   if (%buydmmod == yes) {
  207.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  208.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  209.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  210.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  211.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  212.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  213.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  214.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  215.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  216.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  217.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  218.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  219.   }
  220.   if (%dmhit < 0) { set %dmhit 0 }
  221.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  222.   msg $chan %dmlogo $nick uses his Whip Special and hits a %dmhit $+ , which includes a + $+ %dmwhip bonus!
  223.   if (%dmwhip == 5) { msg $chan %dmlogo $nick Also steals _20%_ special meter from %dmotherperson $+ !
  224.     inc %dmspec [ $+ [ $nick ] ] 20
  225.     dec %dmspec [ $+ [ %dmotherperson ] ] 20
  226.   }
  227.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  228.   dmregen $nick %dmotherperson
  229.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  230. }
  231. on *:text:!daxe*:#:{
  232.   if (%otherdmbot == yes) { HALT }
  233.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  234.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  235.   if (%chandm != $chan) { HALT }
  236.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  237.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  238.   if (%dmspec [ $+ [ $nick ] ] < 60) { notice $nick %dmlogo You do not have enough special meter! | HALT }
  239.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  240.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  241.   dec %dmspec [ $+ [ $nick ] ] 60
  242.   set %dmhit $rand(1,5)
  243.   if (%dmhit < 2) { set %dmhit 0 }
  244.   if (%dmhit > 3) { set %dmhit 65 }
  245.   if (%buydmmod == yes) {
  246.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  247.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  248.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  249.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  250.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  251.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  252.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  253.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  254.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  255.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  256.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  257.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  258.   }
  259.   if (%dmhit < 0) { set %dmhit 0 }
  260.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  261.   msg $chan %dmlogo $nick uses his Daxe Special and hits a %dmhit $+ .
  262.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  263.   dmregen $nick %dmotherperson
  264.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  265. }
  266. on *:text:!nwhip*:#:{
  267.   if (%otherdmbot == yes) { HALT }
  268.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  269.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  270.   if (%chandm != $chan) { HALT }
  271.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  272.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  273.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  274.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  275.   set %dmhit $rand(0,42)
  276.   if (%buydmmod == yes) {
  277.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  278.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  279.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  280.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  281.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  282.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  283.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  284.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  285.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  286.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  287.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  288.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  289.   }
  290.   if (%dmhit < 0) { set %dmhit 0 }
  291.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  292.   msg $chan %dmlogo $nick uses his Whip and hits a %dmhit $+ .
  293.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  294.   dmregen $nick %dmotherperson
  295.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  296. }
  297. on *:text:!nmaul*:#:{
  298.   if (%otherdmbot == yes) { HALT }
  299.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  300.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  301.   if (%chandm != $chan) { HALT }
  302.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  303.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  304.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  305.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  306.   set %dmhit $rand(0,4)
  307.   if (%dmhit != 4) {
  308.     set %dmhit $rand(0,30)
  309.   }
  310.   if (%dmhit == 4) {
  311.     set %dmhit $rand(15,25)
  312.   }
  313.   if (%buydmmod == yes) {
  314.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  315.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  316.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  317.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  318.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  319.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  320.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  321.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  322.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  323.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  324.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  325.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  326.   }
  327.   if (%dmhit < 0) { set %dmhit 0 }
  328.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  329.   msg $chan %dmlogo $nick uses his maul and hits a %dmhit $+ .
  330.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  331.   dmregen $nick %dmotherperson
  332.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  333. }
  334. on *:text:!nanchor*:#:{
  335.   if (%otherdmbot == yes) { HALT }
  336.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  337.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  338.   if (%chandm != $chan) { HALT }
  339.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  340.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  341.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  342.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  343.   set %dmhit $rand(0,4)
  344.   if (%dmhit != 4) {
  345.     set %dmhit $rand(0,40)
  346.   }
  347.   if (%dmhit == 4) {
  348.     set %dmhit $rand(0,21)
  349.   }
  350.   if (%buydmmod == yes) {
  351.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  352.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  353.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  354.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  355.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  356.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  357.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  358.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  359.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  360.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  361.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  362.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  363.   }
  364.   if (%dmhit < 0) { set %dmhit 0 }
  365.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  366.   msg $chan %dmlogo $nick uses his anchor and hits a %dmhit $+ .
  367.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  368.   dmregen $nick %dmotherperson
  369.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  370. }
  371. on *:text:!ndscim*:#:{
  372.   if (%otherdmbot == yes) { HALT }
  373.   if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
  374.   if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
  375.   if (%chandm != $chan) { HALT }
  376.   if (%dm != on) { notice $nick %dmlogo There is no current DM going on! Type !DM to start! | HALT }
  377.   if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick %dmlogo You are not in the DM! | HALT }
  378.   if (%dmturn != $nick) { notice $nick %dmlogo It is not your turn! | HALT }
  379.   if (%dmwait == on) { notice $nick %dmlogo Please wait until your health meter shows up before doing an attack! | HALT }
  380.   set %dmhit $rand(0,30)
  381.   if (%buydmmod == yes) {
  382.     if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
  383.     if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
  384.     if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
  385.     if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
  386.     if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
  387.     if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
  388.     if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
  389.     if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
  390.     if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
  391.     if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
  392.     if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
  393.     if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
  394.   }
  395.   if (%dmhit < 0) { set %dmhit 0 }
  396.   if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
  397.   msg $chan %dmlogo $nick uses his dscim and hits a %dmhit $+ , and also regenerates an extra 5% special meter!
  398.   inc %dmspec [ $+ [ $nick ] ] 5
  399.   dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  400.   dmregen $nick %dmotherperson
  401.   notice $nick %dmlogo You now have %dmspec [ $+ [ $nick ] ] special bar.
  402. }
  403. alias dmregen {
  404.   if (%otherdmbot == yes) { HALT }
  405.   inc %dmspec [ $+ [ $1 ] ] 5
  406.   if (%dmspec [ $+ [ $1 ] ] > 100) { set %dmspec [ $+ [ $1 ] ] 100 }
  407.   set %dmturn $2
  408.   msg %chandm %dmlogo It is now $2 $+ 's turn!
  409.   if (%dmhealth [ $+ [ %dmnick1 ] ] > 99) {
  410.   set %dmhealth [ $+ [ %dmnick1 ] ] 99 }
  411.   if (%dmhealth [ $+ [ %dmnick2 ] ] > 99) {
  412.   set %dmhealth [ $+ [ %dmnick2 ] ] 99 }
  413.   if (%dmturn != $me) {
  414.     timer 01 02 msg %chandm %dmlogo Health: %dmnick1 $+ (05 $+ %dmhealth [ $+ [ %dmnick1 ] ] $+ ) %dmnick2 $+ (05 $+ %dmhealth [ $+ [ %dmnick2 ] ] $+ )
  415.     timer 01 02 unset %dmwait
  416.   }
  417.   set %dmwait on
  418.   dmcheck
  419. }
  420. alias dmcheck {
  421.   if (%otherdmbot == yes) { HALT }
  422.   if (%dmhealth [ $+ [ %dmnick1 ] ] < 1) {
  423.     msg %chandm %dmlogo %dmnick1 has fallen to the ground, while %dmnick2 celebrates a glorious win! %dmnick2 wins!
  424.     inc %losedm [ $+ [ %dmnick1 ] ]
  425.     inc %winsdm [ $+ [ %dmnick2 ] ]
  426.     set %golddm1 $rand(150,500)
  427.     set %golddm2 $rand(50,150)
  428.     set %golddm1 $calc(%golddm1 + %dmhealth [ $+ [ %dmnick2 ] ] - %dmhealth [ $+ [ %dmnick1 ] ] + %dmspec [ $+ [ %dmnick2 ] ] - %dmspec [ $+ [ %dmnick1 ] ])
  429.     if (%dmnick2 != $me) { notice %dmnick2 You win04 %golddm1 Gold! }
  430.     if (%dmnick1 != $me) { notice %dmnick1 You win04 %golddm2 Gold! }
  431.     inc %golddm [ $+ [ %dmnick1 ] ] %golddm2
  432.     inc %golddm [ $+ [ %dmnick2 ] ] %golddm1
  433.     inc %allgolddm [ $+ [ %dmnick1 ] ] %golddm2
  434.     inc %allgolddm [ $+ [ %dmnick2 ] ] %golddm1
  435.     if (%listdm2 [ $+ [ %dmnick1 ] ] != $null) { set %listdm [ $+ [ %dmnick1 ] ] %listdm2 [ $+ [ %dmnick1 ] ] }
  436.     if (%listdm2 [ $+ [ %dmnick2 ] ] != $null) { set %listdm [ $+ [ %dmnick2 ] ] %listdm2 [ $+ [ %dmnick2 ] ] }
  437.     unset %listdm2*
  438.     unset %dm*
  439.     halt
  440.   }
  441.   if (%dmhealth [ $+ [ %dmnick2 ] ] < 1) {
  442.     msg %chandm %dmlogo %dmnick2 has fallen to the ground, while %dmnick1 celebrates a glorious win! %dmnick1 wins!
  443.     inc %losedm [ $+ [ %dmnick2 ] ]
  444.     inc %winsdm [ $+ [ %dmnick1 ] ]
  445.     set %golddm1 $rand(150,500)
  446.     set %golddm2 $rand(50,150)
  447.     set %golddm1 $calc(%golddm1 + %dmhealth [ $+ [ %dmnick1 ] ] - %dmhealth [ $+ [ %dmnick2 ] ] + %dmspec [ $+ [ %dmnick1 ] ] - %dmspec [ $+ [ %dmnick2 ] ])
  448.     if (%dmnick1 != $me) { notice %dmnick1 You win04 %golddm1 Gold! }
  449.     if (%dmnick2 != $me) { notice %dmnick2 You win04 %golddm2 Gold! }
  450.     inc %golddm [ $+ [ %dmnick1 ] ] %golddm1
  451.     inc %golddm [ $+ [ %dmnick2 ] ] %golddm2
  452.     inc %allgolddm [ $+ [ %dmnick1 ] ] %golddm1
  453.     inc %allgolddm [ $+ [ %dmnick2 ] ] %golddm2
  454.     if (%listdm2 [ $+ [ %dmnick1 ] ] != $null) { set %listdm [ $+ [ %dmnick1 ] ] %listdm2 [ $+ [ %dmnick1 ] ] }
  455.     if (%listdm2 [ $+ [ %dmnick2 ] ] != $null) { set %listdm [ $+ [ %dmnick2 ] ] %listdm2 [ $+ [ %dmnick2 ] ] }
  456.     unset %listdm2*
  457.     unset %dm*
  458.     halt
  459.   }
  460.   dmaiturn
  461. }
  462. on *:load:{
  463.   set %dmlogo 04[05DM04]
  464.   unset %dm*
  465.   :genderdm
  466.   set %genderdm $?="Are you a guy or girl? Please type GUY or GIRL."
  467.   if (%genderdm == guy) {
  468.     set %genderdm his
  469.   }
  470.   if (%genderdm == girl) {
  471.     set %genderdm her
  472.   }
  473.   if (%genderdm != her) && (%genderdm != his) { goto genderdm }
  474.   set %buydmmod $?="Do you want Buy Mod enabled? (Lets people buy items with gold they earn, recommended.) $+ $crlf $+ Answer Y/N."
  475.   if (%admindm == y) || (%admindm == yes) {
  476.     set %buydmmod yes
  477.   }
  478.   if (%admindm == n) || (%admindm == no) {
  479.     set %buydmmod no
  480.   }
  481.   :admindm
  482.   set %admindm $?="Do you want any Admins? (They can edit basically anything, even during a game. Only aliases of course. $+ $crlf $+ Answer Y/N."
  483.   if (%admindm == y) || (%admindm == yes) {
  484.     set %admindm yes
  485.     set %adminsdm $?="What are the nicks of what Admins you want? Type a comma inbetween each. No spaces."
  486.   }
  487.   if (%admindm == n) || (%admindm == no) {
  488.     set %admindm no
  489.   }
  490.   if (%admindm != yes) && (%admindm != no) && (%admindm != y) && (%admindm != n) {
  491.     goto admindm
  492.   }
  493.   set %chandm $?="What channel do you want your DM script to be in? (Default: #chatdm )"
  494.   set %copymod $?="Do you want CopyMod Beta on? (While fighting the bot, it imitates your items. (YES/NO, Y/N)"
  495.   if (%copymod == n) { set %copymod no }
  496.   if (%copymod == y) { set %copymod yes }
  497. }
  498. alias dmadmins {
  499.   if (%otherdmbot == yes) { HALT }
  500.   if ($1 == $null) { set %adminsdm $?="What are the nicks of people you want as admins?"
  501.     halt
  502.   }
  503.   set %adminsdm $1-
  504.   halt
  505. }
  506. on *:text:!dmadmin*:#: {
  507.   if (%otherdmbot == yes) { HALT }
  508.   if ($nick !isin %adminsdm) { notice $nick %dmlogo You are not an admin! | HALT }
  509.   if ($2 == commands) || ($2 == $null) {
  510.     msg $nick %dmlogo ADMIN COMMANDS
  511.     msg $nick %dmlogo An underlined line means YOU put that info in.
  512.     msg $nick %dmlogo If something is bold underlined, it means it is optional.
  513.     msg $nick %dmlogo Syntax: Command - What it does
  514.     msg $nick %dmlogo !dmadmin edit type amount other - Edits type to amount.
  515.     msg $nick %dmlogo EDIT COMMANDS (type)
  516.     msg $nick %dmlogo !dmadmin edit hp amount person - Edits person's Health to amount
  517.     msg $nick %dmlogo !dmadmin edit wins amount person - Edits person's Win amount to amount
  518.     msg $nick %dmlogo !dmadmin edit loses amount person - Edits person's Lose amount to amount
  519.     msg $nick %dmlogo !dmadmin edit special amount person - Edits person's Special Meter to amount
  520.     msg $nick %dmlogo !dmadmin edit vote amount - Edits the current amount of votes to end the game to amount
  521.     msg $nick %dmlogo !dmadmin edit gold amount person - Edits person's gold amount to amount
  522.     msg $nick %dmlogo !dmadmin edit person number person - Changes number's game position to person's. If person is unspecified, it's you.
  523.     msg $nick %dmlogo !dmadmin edit copymod on/off - Changed Copy Mod to On or Off
  524.     msg $nick %dmlogo !dmadmin edit buydmmod on/off - Changed Buying Mod to On or Off
  525.     msg $nick %dmlogo DM NUMBER SYNTAX FOR ABOVE COMMAND: number 1: person who first said !DM. number 2: person who accepted DM by typing !DM second.
  526.     msg $nick %dmlogo More commmands to be coming. Admin in beta mode currently.
  527.     halt
  528.   }
  529.   if ($2 == edit) {
  530.     if ($3 == gold) {
  531.       set %golddm [ $+ [ $5 ] ] $4
  532.       notice $nick %dmlogo $5 $+ 's Gold set to $4 $+ .
  533.       halt
  534.     }
  535.     if ($3 == hp) {
  536.       set %dmhealth [ $+ [ $5 ] ] $4
  537.       notice $nick %dmlogo $5 $+ 's Health set to $4 $+ .
  538.       halt
  539.     }
  540.     if ($3 == wins) {
  541.       set %winsdm [ $+ [ $5 ] ] $4
  542.       notice $nick %dmlogo $5 $+ 's Wins set to $4 $+ .
  543.       halt
  544.     }
  545.     if ($3 == loses) {
  546.       set %losedm [ $+ [ $5 ] ] $4
  547.       notice $nick %dmlogo $5 $+ 's Loses set to $4 $+ .
  548.       halt
  549.     }
  550.     if ($3 == special) {
  551.       set %dmspec [ $+ [ $5 ] ] $4
  552.       notice $nick %dmlogo $5 $+ 's Special Meter set to $4 $+ .
  553.       halt
  554.     }
  555.     if ($3 == vote) {
  556.       set %dmstopcount $4
  557.       notice $nick %dmlogo Votes to end the game now $4 $+ .
  558.       halt
  559.     }
  560.     if ($3 == copymod) {
  561.       if ($4 != on) && ($4 != off) {
  562.         notice $nick %dmlogo Please type !dmadmin edit copymod on/off
  563.         halt
  564.       }
  565.       set %copymod $4
  566.       notice $nick %dmlogo CopyMod now $4
  567.       halt
  568.     }
  569.     if ($3 == buydmmod) {
  570.       if ($4 != on) && ($4 != off) {
  571.         notice $nick %dmlogo Please type !dmadmin edit buydmmod on/off
  572.         halt
  573.       }
  574.       set %copymod $4
  575.       notice $nick %dmlogo Buying Mod now $4
  576.       halt
  577.     }
  578.   }
  579.   if ($3 == person) {
  580.     if ($5 == $null) {
  581.       if ($4 == 1) {
  582.         if (%dmturn == %dmnick1) {
  583.           set %dmturn $nick
  584.         }
  585.         set %dmhealth [ $+ [ $nick ] ] %dmhealth [ $+ [ %dmnick1 ] ]
  586.         set %dmspec [ $+ [ $nick ] ] %dmspec [ $+ [ %dmnick1 ] ]
  587.         notice $nick %dmlogo You are now in the place of %dmnick1 $+ .
  588.         msg %dmchan %dmlogo $nick is now in the place of %dmnick1 $+ .
  589.         set %dmnick1 $nick
  590.         halt
  591.       }
  592.       if ($4 == 2) {
  593.         if (%dmturn == %dmnick2) {
  594.           set %dmturn $nick
  595.         }
  596.         set %dmhealth [ $+ [ $nick ] ] %dmhealth [ $+ [ %dmnick2 ] ]
  597.         set %dmspec [ $+ [ $nick ] ] %dmspec [ $+ [ %dmnick2 ] ]
  598.         notice $nick %dmlogo You are now in the place of %dmnick2 $+ .
  599.         msg %dmchan %dmlogo $nick is now in the place of %dmnick2 $+ .
  600.         set %dmnick1 $nick
  601.         halt
  602.       }
  603.     }
  604.     if ($5 != $null) {
  605.       if ($4 == 1) {
  606.         if (%dmturn == %dmnick1) {
  607.           set %dmturn $5
  608.         }
  609.         set %dmhealth [ $+ [ $5 ] ] %dmhealth [ $+ [ %dmnick1 ] ]
  610.         set %dmspec [ $+ [ $5 ] ] %dmspec [ $+ [ %dmnick1 ] ]
  611.         notice $nick %dmlogo $5 is now in the place of %dmnick1 $+ .
  612.         msg %dmchan %dmlogo $5 is now in the place of %dmnick1 $+ .
  613.         set %dmnick1 $nick
  614.         halt
  615.       }
  616.       if ($4 == 2) {
  617.         if (%dmturn == %dmnick2) {
  618.           set %dmturn $5
  619.         }
  620.         set %dmhealth [ $+ [ $5 ] ] %dmhealth [ $+ [ %dmnick2 ] ]
  621.         set %dmspec [ $+ [ $5 ] ] %dmspec [ $+ [ %dmnick2 ] ]
  622.         notice $nick %dmlogo $5 is now in the place of %dmnick2 $+ .
  623.         msg %dmchan %dmlogo $5 is now in the place of %dmnick2 $+ .
  624.         set %dmnick1 $nick
  625.         halt
  626.       }
  627.     }
  628.   }
  629. }
  630. alias chandm {
  631.   if ($1 == $null) {
  632.     echo -a %dmlogo Setting ( $+ %chandm $+ ) to $active
  633.     set %chandm $active
  634.     halt
  635.   }
  636.   echo -a %dmlogo Setting ( $+ %chandm $+ )  to $1-
  637.   set %chandm $1-
  638.   halt
  639. }
  640. alias dmend {
  641.   if (%otherdmbot == yes) { HALT }
  642.   if (%dmnick2 == $null) {
  643.     msg %chandm %dmlogo Nobody has replied to %dmnick1 $+ 's DM request within 15 seconds! I will face you!
  644.     if (%copymod == yes) { set %listdm2 [ $+ [ $me ] ] %listdm [ $+ [ $me ] ]
  645.       set %listdm [ $+ [ $me ] ] %listdm [ $+ [ %dmnick1 ] ]
  646.     }
  647.     set %dmai on
  648.     set %dmnick2 $me
  649.     set %dm on
  650.     set %dmrand $rand(1,2)
  651.     if (%dmrand == 1) {
  652.       set %dmturn %dmnick1
  653.     }
  654.     if (%dmrand == 2) {
  655.       set %dmturn %dmnick2
  656.     }
  657.     msg %chandm %dmlogo DM started between %dmnick1 and %dmnick2 $+ !
  658.     msg %chandm %dmlogo To see commands, type !dmcommands $+ !
  659.     msg %chandm %dmlogo Random pick... %dmturn goes first!
  660.     msg %chandm %dmlogo For current mods running, type !dmmods!
  661.     set %dmspec [ $+ [ %dmnick1 ] ] 100
  662.     set %dmspec [ $+ [ %dmnick2 ] ] 100
  663.     set %dmhealth [ $+ [ %dmnick1 ] ] 99
  664.     set %dmhealth [ $+ [ %dmnick2 ] ] 99
  665.     dmaiturn
  666.   }
  667. }
  668. on *:text:!dmmods*:#: {
  669.   if (%dmcommands == on) {
  670.     notice $nick %dmlogo Currently sending somebody else the mods.
  671.     notice $nick %dmlogo Please try again in 10 seconds.
  672.     halt
  673.   }
  674.   set %dmcommands on
  675.   timer 01 10 unset %dmcommands
  676.   if (%copymod == yes) {
  677.     notice $nick %dmlogo CopyMod Beta is enabled! When you face the bot, it will copy your items!
  678.   }
  679.   if (%buydmmod == yes) {
  680.     notice $nick %dmlogo BuyingMod Beta is enabled! You can buy items for initial use all the time. Type !dmbuy for more info.
  681.   }
  682.   if (%admindm == yes) {
  683.     notice $nick %dmlogo AdminDM Beta is enabled! Certain people get to use admin commands!
  684.     notice $nick %dmlogo AdminDM Beta is enabled! Admins: %adminsdm
  685.   }
  686. }
  687. on *:text:!dmbuy*:#: {
  688.   if (%otherdmbot == yes) { HALT }
  689.   if (%buydmmod != yes) { msg nick %dmlogo This bot has DM Buying Mod turned OFF. | HALT }
  690.   if (%golddm [ $+ [ $nick ] ] == $null) { set %golddm [ $+ [ $nick ] ] 0 }
  691.   if ($2 == $null) || ($2 == list) {
  692.     if (%dmcommands == on) {
  693.       notice $nick %dmlogo Currently sending somebody else the commands.
  694.       notice $nick %dmlogo Please try again in 15 seconds.
  695.       halt
  696.     }
  697.     set %dmcommands on
  698.     timer 01 20 unset %dmcommands
  699.     msg $chan %dmlogo Sending $nick DM Items To Buy List.
  700.     msg $chan %dmlogo Please wait 15-20 seconds before using another command.
  701.     msg $nick %dmlogo ITEMS TO BUY LIST
  702.     msg $nick %dmlogo TO BUY: !dmbuy buy item
  703.     msg $nick %dmlogo Syntax: Item - Price - Effect
  704.     msg $nick %dmlogo Health_Boost1 - 1500 - Increases your health by 1 hp each turn.
  705.     msg $nick %dmlogo Health_Boost5 - 5000 - Increases your health by 5 hp each turn.
  706.     msg $nick %dmlogo Health_Boost10 - 9500 - Increases your health by 10 hp each turn.
  707.     msg $nick %dmlogo Special_Boost100 - 20000 - Infinite special meter.
  708.     msg $nick %dmlogo Special_Boost50 - 12000 - Increases your special meter by 50 each turn.
  709.     msg $nick %dmlogo Special_Boost15 - 7000 - Increases your special meter by 15 each turn.
  710.     msg $nick %dmlogo Special_Boost10 - 5000 - Increases your special meter by 10 each turn.
  711.     msg $nick %dmlogo Special_Boost5 - 2500 - Increases your special meter by 5 each turn.
  712.     msg $nick %dmlogo Extra_Damage - 10000 - Hits an extra 5 damage every hit.
  713.     msg $nick %dmlogo Weak_Armor - 1500 - Get inflicted with 1 less damage every hit.
  714.     msg $nick %dmlogo Med_Armor - 2500 - Get inflicted with 2 less damage every hit.
  715.     msg $nick %dmlogo Strong_Armor - 10000 - Get inflicted with 5 less damage every hit.
  716.     msg $nick %dmlogo Inc_Wins1 - 4000 - Increase your wins by 1 win.
  717.     msg $nick %dmlogo Inc_Wins5 - 15000 - Increase your wins by 5 wins.
  718.     msg $nick %dmlogo Dec_Loses1 - 5000 - Decrease your loses by 1 lose.
  719.     msg $nick %dmlogo Dec_Loses5 - 20000 - Decrease your loses by 5 loses.
  720.     msg $nick %dmlogo Dm Beta Buying Mod
  721.   }
  722.   if ($2 == buy) {
  723.     if ($3 isin %listdm [ $+ [ $nick ] ]) {
  724.       notice $nick You already have $3 $+ !
  725.       halt
  726.     }
  727.     if ($3 == dec_lose1) {
  728.       if (%golddm [ $+ [ $nick ] ] < 5000) {
  729.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  730.         halt
  731.       }
  732.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  733.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  734.       dec %golddm [ $+ [ $nick ] ] 5000
  735.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  736.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  737.       dec %losedm [ $+ [ $nick ] ] 1
  738.     }
  739.     if ($3 == dec_lose5) {
  740.       if (%golddm [ $+ [ $nick ] ] < 20000) {
  741.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  742.         halt
  743.       }
  744.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  745.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  746.       dec %golddm [ $+ [ $nick ] ] 20000
  747.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  748.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  749.       dec %losedm [ $+ [ $nick ] ] 5
  750.     }
  751.     if ($3 == inc_wins5) {
  752.       if (%golddm [ $+ [ $nick ] ] < 15000) {
  753.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  754.         halt
  755.       }
  756.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  757.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  758.       dec %golddm [ $+ [ $nick ] ] 15000
  759.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  760.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  761.       inc %winsdm [ $+ [ $nick ] ] 5
  762.     }
  763.     if ($3 == inc_wins1) {
  764.       if (%golddm [ $+ [ $nick ] ] < 4000) {
  765.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  766.         halt
  767.       }
  768.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  769.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  770.       dec %golddm [ $+ [ $nick ] ] 4000
  771.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  772.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  773.       inc %winsdm [ $+ [ $nick ] ] 1
  774.     }
  775.     if ($3 == strong_armor) {
  776.       if (%golddm [ $+ [ $nick ] ] < 10000) {
  777.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  778.         halt
  779.       }
  780.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  781.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  782.       dec %golddm [ $+ [ $nick ] ] 10000
  783.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  784.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  785.     }
  786.     if ($3 == med_armor) {
  787.       if (%golddm [ $+ [ $nick ] ] < 2500) {
  788.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  789.         halt
  790.       }
  791.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  792.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  793.       dec %golddm [ $+ [ $nick ] ] 2500
  794.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  795.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  796.     }
  797.     if ($3 == weak_armor) {
  798.       if (%golddm [ $+ [ $nick ] ] < 1500) {
  799.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  800.         halt
  801.       }
  802.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  803.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  804.       dec %golddm [ $+ [ $nick ] ] 1500
  805.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  806.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  807.     }
  808.     if ($3 == extra_damage) {
  809.       if (%golddm [ $+ [ $nick ] ] < 10000) {
  810.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  811.         halt
  812.       }
  813.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  814.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  815.       dec %golddm [ $+ [ $nick ] ] 10000
  816.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  817.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  818.     }
  819.     if ($3 == special_boost5) {
  820.       if (%golddm [ $+ [ $nick ] ] < 2500) {
  821.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  822.         halt
  823.       }
  824.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  825.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  826.       dec %golddm [ $+ [ $nick ] ] 2500
  827.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  828.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  829.     }
  830.     if ($3 == special_boost10) {
  831.       if (%golddm [ $+ [ $nick ] ] < 5000) {
  832.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  833.         halt
  834.       }
  835.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  836.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  837.       dec %golddm [ $+ [ $nick ] ] 5000
  838.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  839.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  840.     }
  841.     if ($3 == special_boost15) {
  842.       if (%golddm [ $+ [ $nick ] ] < 7000) {
  843.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  844.         halt
  845.       }
  846.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  847.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  848.       dec %golddm [ $+ [ $nick ] ] 7000
  849.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  850.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  851.     }
  852.     if ($3 == special_boost50) {
  853.       if (%golddm [ $+ [ $nick ] ] < 12000) {
  854.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  855.         halt
  856.       }
  857.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  858.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  859.       dec %golddm [ $+ [ $nick ] ] 12000
  860.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  861.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  862.     }
  863.     if ($3 == special_boost100) {
  864.       if (%golddm [ $+ [ $nick ] ] < 20000) {
  865.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  866.         halt
  867.       }
  868.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  869.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  870.       dec %golddm [ $+ [ $nick ] ] 20000
  871.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  872.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  873.     }
  874.     if ($3 == health_boost1) {
  875.       if (%golddm [ $+ [ $nick ] ] < 1500) {
  876.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  877.         halt
  878.       }
  879.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  880.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  881.       dec %golddm [ $+ [ $nick ] ] 1500
  882.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  883.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  884.     }
  885.     if ($3 == health_boost5) {
  886.       if (%golddm [ $+ [ $nick ] ] < 5000) {
  887.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  888.         halt
  889.       }
  890.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  891.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  892.       dec %golddm [ $+ [ $nick ] ] 5000
  893.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  894.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  895.     }
  896.     if ($3 == health_boost10) {
  897.       if (%golddm [ $+ [ $nick ] ] < 9500) {
  898.         notice $nick %dmlogo You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
  899.         halt
  900.       }
  901.       if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
  902.       if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
  903.       dec %golddm [ $+ [ $nick ] ] 9500
  904.       msg $nick %dmlogo Your Items: %listdm [ $+ [ $nick ] ]
  905.       msg $nick %dmlogo Your gold: %golddm [ $+ [ $nick ] ]
  906.     }
  907.   }
  908. }
  909. alias dmaiturn {
  910.   if (%otherdmbot == yes) { HALT }
  911.   if (%dmai == on) {
  912.     if (%dmturn == $me) {
  913.       if (%dmspec [ $+ [ $me ] ] > 59) {
  914.         set %dmrand $rand(1,6)
  915.         goto %dmrand
  916.       }
  917.       if (%dmspec [ $+ [ $me ] ] > 54) && (%dmspec < 60) {
  918.         set %dmrand $rand(1,4)
  919.         goto %dmrand
  920.       }
  921.       if (%dmspec [ $+ [ $me ] ] > 49) && (%dmspec < 55) {
  922.         set %dmrand $rand(1,3)
  923.         goto %dmrand
  924.       }
  925.       if (%dmspec [ $+ [ $me ] ] > 24) && (%dmspec < 50) {
  926.         set %dmrand $rand(1,2)
  927.         goto %dmrand
  928.       }
  929.       if (%dmspec [ $+ [ $me ] ] < 25) {
  930.         set %dmrand $rand(7,10)
  931.         goto %dmrand
  932.       }
  933.       :10
  934.       if (%dmrand == 10) {
  935.         if (%dmai == on) {
  936.           if (%dmturn == $me) {
  937.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  938.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  939.             msg %chandm !ndscim
  940.             set %dmhit1 $rand(0,25)
  941.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  942.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  943.             if (%buydmmod == yes) {
  944.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  945.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  946.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  947.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  948.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  949.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  950.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  951.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  952.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  953.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  954.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  955.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  956.             }
  957.             if (%dmhit1 < 0) { set %dmhit1 0 }
  958.             msg %chandm %dmlogo $me uses %genderdm Dscim and hits a %dmhit1 $+ , and also regenerates an extra 5% special meter!
  959.             inc %dmspec [ $+ [ $me ] ] 5
  960.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  961.             dmregen $me %dmotherperson
  962.           }
  963.         }
  964.       }
  965.       :9
  966.       if (%dmrand == 9) {
  967.         if (%dmai == on) {
  968.           if (%dmturn == $me) {
  969.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  970.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  971.             msg %chandm !nanchor
  972.             set %dmhit1 $rand(0,4)
  973.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  974.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  975.             if (%dmhit1 != 4) {
  976.               set %dmhit1 $rand(0,35)
  977.             }
  978.             if (%dmhit1 == 4) {
  979.               set %dmhit1 $rand(0,21)
  980.             }
  981.             if (%buydmmod == yes) {
  982.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  983.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  984.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  985.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  986.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  987.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  988.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  989.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  990.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  991.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  992.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  993.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  994.             }
  995.             if (%dmhit1 < 0) { set %dmhit1 0 }
  996.             msg %chandm %dmlogo $me uses %genderdm Anchor and hits a %dmhit1 $+ .
  997.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  998.             dmregen $me %dmotherperson
  999.           }
  1000.         }
  1001.       }
  1002.       :8
  1003.       if (%dmrand == 8) {
  1004.         if (%dmai == on) {
  1005.           if (%dmturn == $me) {
  1006.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1007.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1008.             msg %chandm !nmaul
  1009.             set %dmhit1 $rand(0,4)
  1010.             if (%dmhit1 != 4) {
  1011.               set %dmhit1 $rand(0,25)
  1012.             }
  1013.             if (%dmhit1 == 4) {
  1014.               set %dmhit1 $rand(15,25)
  1015.             }
  1016.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1017.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1018.             if (%buydmmod == yes) {
  1019.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  1020.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  1021.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  1022.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  1023.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  1024.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  1025.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  1026.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  1027.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  1028.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  1029.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  1030.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  1031.             }
  1032.             if (%dmhit1 < 0) { set %dmhit1 0 }
  1033.             msg %chandm %dmlogo $me uses %genderdm Maul and hits a %dmhit1 $+ .
  1034.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  1035.             dmregen $me %dmotherperson
  1036.           }
  1037.         }
  1038.       }
  1039.       :7
  1040.       if (%dmrand == 7) {
  1041.         if (%dmai == on) {
  1042.           if (%dmturn == $me) {
  1043.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1044.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1045.             msg %chandm !nwhip
  1046.             set %dmhit1 $rand(0,30)
  1047.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1048.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1049.             if (%buydmmod == yes) {
  1050.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  1051.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  1052.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  1053.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  1054.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  1055.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  1056.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  1057.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  1058.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  1059.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  1060.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  1061.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  1062.             }
  1063.             if (%dmhit1 < 0) { set %dmhit1 0 }
  1064.             msg %chandm %dmlogo $me uses %genderdm Whip and hits a %dmhit1 $+ .
  1065.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  1066.             dmregen $me %dmotherperson
  1067.           }
  1068.         }
  1069.       }
  1070.       :6
  1071.       if (%dmrand == 6) {
  1072.         if (%dmai == on) {
  1073.           if (%dmturn == $me) {
  1074.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1075.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1076.             msg %chandm !daxe
  1077.             dec %dmspec [ $+ [ $me ] ] 60
  1078.             set %dmhit1 $rand(1,5)
  1079.             if (%dmhit < 2) { set %dmhit 0 }
  1080.             if (%dmhit > 3) { set %dmhit 45 }
  1081.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1082.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1083.             if (%buydmmod == yes) {
  1084.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  1085.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  1086.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  1087.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  1088.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  1089.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  1090.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  1091.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  1092.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  1093.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  1094.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  1095.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  1096.             }
  1097.             if (%dmhit1 < 0) { set %dmhit1 0 }
  1098.             msg %chandm %dmlogo $me uses %genderdm Daxe Special and hits a %dmhit1 $+ !
  1099.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  1100.             dmregen $me %dmotherperson
  1101.           }
  1102.         }
  1103.       }
  1104.       :5
  1105.       if (%dmrand == 5) {
  1106.         if (%dmai == on) {
  1107.           if (%dmturn == $me) {
  1108.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1109.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1110.             msg %chandm !dscim
  1111.             dec %dmspec [ $+ [ $me ] ] 60
  1112.             set %dmhit1 $rand(0,35)
  1113.             set %dmrand1 $rand(1,20)
  1114.             if (%dmrand1 == 1) { set %dmscima yes }
  1115.             set %dmrand2 $rand(1,10)
  1116.             if (%dmrand2 == 1) { set %dmscimb yes }
  1117.             set %dmrand3 $rand(1,2)
  1118.             if (%dmrand3 == 1) { set %dmscimc yes }
  1119.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1120.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1121.             if (%buydmmod == yes) {
  1122.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  1123.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  1124.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  1125.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  1126.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  1127.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  1128.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  1129.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  1130.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  1131.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  1132.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  1133.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  1134.             }
  1135.             if (%dmhit1 < 0) { set %dmhit1 0 }
  1136.             msg %chandm %dmlogo $me uses %genderdm DScim Special and hits a %dmhit1 $+ !
  1137.             if (%dmscima == yes) { msg %chandm %dmlogo $me Also gains an extra _100%_ worth of special meter! | inc %dmspec [ $+ [ $me ] ] 100 }
  1138.             if (%dmscimb == yes) { msg %chandm %dmlogo $me Also gains an extra _40%_ worth of special meter! | inc %dmspec [ $+ [ $me ] ] 40 }
  1139.             if (%dmscimc == yes) { msg %chandm %dmlogo $me Also STEALS _10%_ special meter from %dmotherperson $+ ! | inc %dmspec [ $+ [ $me ] ] 10 | dec %dmspec [ $+ [ %dmotherperson ] ] 10 }
  1140.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  1141.             dmregen $me %dmotherperson
  1142.           }
  1143.         }
  1144.       }
  1145.       :4
  1146.       if (%dmrand == 4) {
  1147.         if (%dmai == on) {
  1148.           if (%dmturn == $me) {
  1149.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1150.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1151.             msg %chandm !whip
  1152.             dec %dmspec [ $+ [ $me ] ] 55
  1153.             set %dmhit1 $rand(0,35)
  1154.             if (%dmhit1 < 11) { inc %dmhit1 1 | set %dmwhip 1 }
  1155.             if (%dmhit1 > 10) && (%dmhit1 < 35) { inc %dmhit1 2 | set %dmwhip 2 }
  1156.             if (%dmhit1 == 35) { inc %dmhit1 5 | set %dmwhip 5 }
  1157.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1158.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1159.             if (%buydmmod == yes) {
  1160.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  1161.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  1162.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  1163.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  1164.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  1165.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  1166.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  1167.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  1168.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  1169.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  1170.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  1171.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  1172.             }
  1173.             if (%dmhit1 < 0) { set %dmhit1 0 }
  1174.             msg %chandm %dmlogo $me uses %genderdm Whip Special and hits a %dmhit1 $+ , which includes a + $+ %dmwhip bonus!
  1175.             if (%dmwhip == 5) { msg %chandm %dmlogo $me Also steals _20%_ special meter from %dmotherperson $+ !
  1176.               inc %dmspec [ $+ [ $me ] ] 20
  1177.               dec %dmspec [ $+ [ %dmotherperson ] ] 20
  1178.             }
  1179.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  1180.             dmregen $me %dmotherperson
  1181.           }
  1182.         }
  1183.       }
  1184.       :3
  1185.       if (%dmrand == 3) {
  1186.         if (%dmai == on) {
  1187.           if (%dmturn == $me) {
  1188.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1189.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1190.             msg %chandm !anchor
  1191.             dec %dmspec [ $+ [ $me ] ] 50
  1192.             set %dmhit1 $rand(0,35)
  1193.             if (%dmhit1 < 15) {
  1194.               set %dmhit1 $rand(0,40)
  1195.             }
  1196.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1197.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1198.             if (%buydmmod == yes) {
  1199.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  1200.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  1201.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  1202.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  1203.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  1204.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  1205.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  1206.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  1207.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  1208.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  1209.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  1210.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  1211.             }
  1212.             if (%dmhit1 < 0) { set %dmhit1 0 }
  1213.             msg %chandm %dmlogo $me uses %genderdm Anchor Special and hits a %dmhit1 $+ !
  1214.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  1215.             dmregen $me %dmotherperson
  1216.           }
  1217.         }
  1218.       }
  1219.       :2
  1220.       if (%dmrand == 2) {
  1221.         if (%dmai == on) {
  1222.           if (%dmturn == $me) {
  1223.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1224.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1225.             msg %chandm !dmace
  1226.             dec %dmspec [ $+ [ $me ] ] 25
  1227.             set %dmhit1 $rand(0,50)
  1228.             if (%dmhit1 > 25) {
  1229.               set %dmhit1 $rand(0,50)
  1230.             }
  1231.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1232.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1233.             if (%buydmmod == yes) {
  1234.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  1235.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  1236.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  1237.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  1238.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  1239.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  1240.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  1241.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  1242.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  1243.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  1244.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  1245.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  1246.             }
  1247.             if (%dmhit1 < 0) { set %dmhit1 0 }
  1248.             msg %chandm %dmlogo $me uses %genderdm DMace Special and hits a %dmhit1 $+ !
  1249.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
  1250.             dmregen $me %dmotherperson
  1251.           }
  1252.         }
  1253.       }
  1254.       :1
  1255.       if (%dmrand == 1) {
  1256.         if (%dmai == on) {
  1257.           if (%dmturn == $me) {
  1258.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1259.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1260.             msg %chandm !dds
  1261.             dec %dmspec [ $+ [ $me ] ] 25
  1262.             set %dmhit1 $rand(0,23)
  1263.             set %dmhit2 $rand(0,23)
  1264.             if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
  1265.             if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
  1266.             if (%buydmmod == yes) {
  1267.               if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
  1268.               if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
  1269.               if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
  1270.               if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
  1271.               if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
  1272.               if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
  1273.               if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
  1274.               if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
  1275.               if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
  1276.               if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
  1277.               if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
  1278.               if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
  1279.             }
  1280.             if (%dmhit1 < 0) { set %dmhit1 0 }
  1281.             if (%dmhit2 < 0) { set %dmhit2 0 }
  1282.             msg %chandm %dmlogo $me uses %genderdm DDS Special and hits a %dmhit1 and %dmhit2 $+ !
  1283.             set %dmhit $calc( %dmhit1 + %dmhit2 )
  1284.             dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
  1285.             dmregen $me %dmotherperson
  1286.           }
  1287.         }
  1288.       }
  1289.     }
  1290.   }
  1291. }
  1292. on *:text:!dmcheck*:#:{
  1293.   if (%chandm != $chan) {
  1294.     notice $nick %dmlogo You are in the wrong channel! Goto 7 $+ %chandm $+  for DMing!
  1295.     HALT
  1296.   }
  1297.   if (%otherdmbot == yes) { HALT }
  1298.   if ($2 == $null) {
  1299.     if (%winsdm [ $+ [ $nick ] ] == $null) { set %winsdm [ $+ [ $nick ] ] 0 }
  1300.     if (%losedm [ $+ [ $nick ] ] == $null) { set %losedm [ $+ [ $nick ] ] 0 }
  1301.     if (%golddm [ $+ [ $nick ] ] == $null) { set %golddm [ $+ [ $nick ] ] 0 }
  1302.     notice $nick %dmlogo You have ( $+ %golddm [ $+ [ $nick ] ] $+ ) Gold.
  1303.     notice $nick %dmlogo Gold earned to date: ( $+ %allgolddm [ $+ [ $nick ] ] $+ ) $+ .
  1304.     if (%buydmmod == yes) { notice $nick %dmlogo You're Item List: %listdm [ $+ [ $nick ] ] }
  1305.     notice $nick %dmlogo Wins: ( $+ %winsdm [ $+ [ $nick ] ] $+ )
  1306.     notice $nick %dmlogo Loses: ( $+ %losedm [ $+ [ $nick ] ] $+ )
  1307.     if (%losedm [ $+ [ $nick ] ] != 0) { notice $nick %dmlogo Win Ratio: Everytime you lose, you average ( $+ $calc( %winsdm [ $+ [ $nick ] ] / %losedm [ $+ [ $nick ] ] ) $+ ) wins. }
  1308.     if (%losedm [ $+ [ $nick ] ] == 0) { notice $nick %dmlogo Win Ratio: Everytime you lose, you average ( $+ %winsdm [ $+ [ $nick ] ] $+ ) wins. }
  1309.     halt
  1310.   }
  1311.   if (%winsdm [ $+ [ $2 ] ] == $null) { set %winsdm [ $+ [ $2 ] ] 0 }
  1312.   if (%losedm [ $+ [ $2 ] ] == $null) { set %losedm [ $+ [ $2 ] ] 0 }
  1313.   if (%golddm [ $+ [ $2 ] ] == $null) { set %golddm [ $+ [ $2 ] ] 0 }
  1314.   notice $nick %dmlogo $2 has ( $+ %golddm [ $+ [ $2 ] ] $+ ) Gold.
  1315.   notice $nick %dmlogo $2 $+ 's Gold earned to date: ( $+ %allgolddm [ $+ [ $2 ] ] $+ ) $+ .
  1316.   if (%buydmmod == yes) { notice $nick %dmlogo $2 $+ 's Item List: %listdm [ $+ [ $2 ] ] }
  1317.   notice $nick %dmlogo $2 $+ 's Wins: ( $+ %winsdm [ $+ [ $2 ] ] $+ )
  1318.   notice $nick %dmlogo $2 $+ 's Loses: ( $+ %losedm [ $+ [ $2 ] ] $+ )
  1319.   if (%losedm [ $+ [ $2 ] ] == 0) { notice $nick %dmlogo $2 $+ 's Win Ratio: Everytime $2 loses, they average ( $+ %winsdm [ $+ [ $2 ] ] $+ ) wins. }
  1320.   if (%losedm [ $+ [ $2 ] ] != 0) { notice $nick %dmlogo $2 $+ 's Win Ratio: Everytime $2 loses, they average ( $+ $calc( %winsdm [ $+ [ $2 ] ] / %losedm [ $+ [ $2 ] ] ) $+ ) wins. }
  1321.   halt
  1322. }
  1323. on *:text:!dmstop*:#:{
  1324.   if (%chandm != $chan) {
  1325.     notice $nick %dmlogo You are in the wrong channel! Goto 7 $+ %chandm $+  for DMing!
  1326.     HALT
  1327.   }
  1328.   if (%otherdmbot == yes) { HALT }
  1329.   if (%dm != on) {
  1330.     notice $Nick %dmlogo No game is currently running!
  1331.     halt
  1332.   }
  1333.   if (%dmstopcount == $null) {
  1334.     set %dmstopcount 1
  1335.     msg %chandm %dmlogo There is now 1 vote to end the game!
  1336.     halt
  1337.   }
  1338.   if (%dmstopcount == 1) {
  1339.     msg %chandm %dmlogo Ending game!
  1340.     unset %dm*
  1341.     halt
  1342.   }
  1343. }
  1344. on *:text:!stopdm*:#:{
  1345.   if (%chandm != $chan) {
  1346.     notice $nick %dmlogo You are in the wrong channel! Goto 7 $+ %chandm $+  for DMing!
  1347.     HALT
  1348.   }
  1349.   if (%otherdmbot == yes) { HALT }
  1350.   if (%dm != on) {
  1351.     notice $Nick %dmlogo No game is currently running!
  1352.     halt
  1353.   }
  1354.   if (%dmstopcount == $null) {
  1355.     set %dmstopcount 1
  1356.     msg %chandm %dmlogo There is now 1 vote to end the game!
  1357.     halt
  1358.   }
  1359.   if (%dmstopcount == 1) {
  1360.     msg %chandm %dmlogo Ending game!
  1361.     unset %dm*
  1362.     halt
  1363.   }
  1364. }
  1365. on *:text:!dm*:#:{
  1366.   if (%chandm != $chan) {
  1367.     notice $nick %dmlogo You are in the wrong channel! Goto 7 $+ %chandm $+  for DMing!
  1368.     HALT
  1369.   }
  1370.   if (%otherdmbot == yes) { HALT }
  1371.   if ($chan == %chandm) {
  1372.     if (%dmfixing == yes) { msg %chandm %dmlogo DM'ing is currently disabled! We are adding a few new features. We hope to be back shortly.
  1373.       halt
  1374.     }
  1375.   }
  1376.   if (%dmfixing == yes) { notice $nick %dmlogo DM'ing is currently disabled! We are adding a few new features. We hope to be back shortly.
  1377.     halt
  1378.   }
  1379.   if ($1 == !dm) {
  1380.     if (%dm == on) {
  1381.       notice $Nick %dmlogo A dm is already running! Have 2 people type !dmstop to stop it!
  1382.       halt
  1383.     }
  1384.     if ($chan != %chandm) {
  1385.       notice $nick %dmlogo This is the wrong channel for DMing! Please goto %chandm to DM!
  1386.       halt
  1387.     }
  1388.     if (%dmstart == $null) {
  1389.       msg %chandm %dmlogo A DM request has been opened! One more person needs to type !DM to join!
  1390.       timer 01 15 dmend
  1391.       unset %dm*
  1392.       set %dmnick1 $nick
  1393.       set %dmstart yes
  1394.       halt
  1395.     }
  1396.     if (%dmstart == yes) {
  1397.       if (%dmnick1 != $nick) {
  1398.         set %dmnick2 $nick
  1399.         set %dm on
  1400.         msg %chandm %dmlogo DM started between %dmnick1 and %dmnick2 $+ !
  1401.         msg %chandm %dmlogo To see commands, type !dmcommands $+ !
  1402.         set %dmrand $rand(1,2)
  1403.         if (%dmrand == 1) {
  1404.           set %dmturn %dmnick1
  1405.         }
  1406.         if (%dmrand == 2) {
  1407.           set %dmturn %dmnick2
  1408.         }
  1409.         set %dmspec [ $+ [ %dmnick1 ] ] 100
  1410.         set %dmspec [ $+ [ %dmnick2 ] ] 100
  1411.         set %dmhealth [ $+ [ %dmnick1 ] ] 99
  1412.         set %dmhealth [ $+ [ %dmnick2 ] ] 99
  1413.         msg %chandm %dmlogo Random pick... %dmturn goes first!
  1414.       }
  1415.     }
  1416.   }
  1417. }
Submit a correction or amendment below. [ previous version ] | [ difference ] | Make A New Post
To highlight particular lines, prefix each line with @h@
Syntax highlighting:
Post expiration:
Post exposure:
Name / Title:
Email: