This is a quite simple !DM script. It does what its meant to do, create little 'fights' between people in the channel, under their request.
You can start by saving this in your mIRC directory, then open it, and hit yes, then type in the channel you want your !DM script to be in.
For anyone to initiate a "dm", they just need to type !DM.
For commands and an explanation, they need to type !DMcommands
Here is a list of everything (taken from !dmcommands):
DM RULES.
You start with 100% Special Attack meter. It is suggested you use this.
Every turn, your Special Attack meter raises 5%.
DM SPECIAL COMMANDS.
Syntax: Command :: Percent special uses :: Max hit :: Effect
!dds :: 25% :: 46 (double 23) :: Hits twice.
!dmace :: 25% :: 50 :: Double the chance to hit below 25.
!anchor :: 50% :: 40 :: Double the chance to hit above 15.
!dscim :: 60% :: 35 :: 5% chance of earning 100% special meter. 10% chance of earning 40% special meter. 50% chance of STEALING 10% special meter.
!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.
!daxe :: 60% :: Either hits 0 or 45 :: Low chance to hit 45.
DM NORMAL COMMANDS.
Syntax: Command :: Max hit :: Effect
!Nmaul :: 25 :: Slightly high chance to hit higher.
!Nanchor :: 35 :: Slightly high chance to hit lower.
!Ndscim :: 25 :: Regenerate 5% extra special meter this turn.
OTHER COMMANDS.
Syntax: Command :: Effect
!dmstop :: Stops DM. Requires two people to initiate.
!dmcommands :: Display all commands. This that you are reading IS !dmcommands
!dmcheck :: Display current Win/Lose record, K/D ratio, gold, items.
!dmmods :: Checks what mods are currently enabled.
!admindm :: For ADMINS. Displays admin commands.
ADMIN COMMANDS
An underlined line means YOU put that info in.
If something is bold underlined, it means it is optional.
Syntax: Command - What it does
!dmadmin edit type amount other - Edits type to amount.
EDIT COMMANDS (type)
!dmadmin edit hp amount person - Edits person's Health to amount
!dmadmin edit wins amount person - Edits person's Win amount to amount
!dmadmin edit loses amount person - Edits person's Lose amount to amount
!dmadmin edit special amount person - Edits person's Special Meter to amount
!dmadmin edit vote amount - Edits the current amount of votes to end the game to amount
!dmadmin edit gold amount person - Edits person's gold amount to amount
!dmadmin edit person number person - Changes number's game position to person's. If person is unspecified, it's you.
DM NUMBER SYNTAX FOR ABOVE COMMAND: number 1: person who first said !DM. number 2: person who accepted DM by typing !DM second.
More commmands to be coming. Admin in beta mode currently.
ITEMS TO BUY LIST
TO BUY: !dmbuy buy item
Syntax: Item - Price - Effect
Health_Boost1 - 1500 - Increases your health by 1 hp each turn.
Health_Boost5 - 5000 - Increases your health by 5 hp each turn.
Health_Boost10 - 9500 - Increases your health by 10 hp each turn.
Special_Boost100 - 20000 - Infinite special meter.
Special_Boost50 - 12000 - Increases your special meter by 50 each turn.
Special_Boost15 - 7000 - Increases your special meter by 15 each turn.
Special_Boost10 - 5000 - Increases your special meter by 10 each turn.
Special_Boost5 - 2500 - Increases your special meter by 5 each turn.
Extra_Damage - 10000 - Hits an extra 5 damage every hit.
Weak_Armor - 1500 - Get inflicted with 1 less damage every hit.
Med_Armor - 2500 - Get inflicted with 2 less damage every hit.
Strong_Armor - 10000 - Get inflicted with 5 less damage every hit.
Inc_Wins1 - 4000 - Increase your wins by 1 win.
Inc_Wins5 - 15000 - Increase your wins by 5 wins.
Dec_Loses1 - 5000 - Decrease your loses by 1 lose.
Dec_Loses5 - 20000 - Decrease your loses by 5 loses.
Dm Beta Buying Mod
...............
Please bare in mind that this is currently IN testing, and has NOT been thoroughly tested. I will update this with, of course, updates and bug fixes and whatnot. Just comment a bug/glitch or whatever if you come across one.
...............
Update: Saturday, March 24, 2007. 12:31am EST time :
For one, the script actually works now. Everything seems to work according to plan.
Update: Saturday, March 24, 2007. 12:54am EST time :
Fixed a few anonymous things. Works crystal clear for as far as I can see.
I will be adding more specials and whatnot and MAYBE a leveling system. Also wanting to make an AI you could face if nobody else is there to play with you.
Update: Saturday, March 24, 2007. 1:55pm EST time :
Fixed a few things. Added a whole AI bot you can face if nobody else is there to play with you.
Update: Saturday, March 24, 2007. 2:01pm EST time :
Added a Win/Loss record. Type !dmcheck to check your record.
Update: Saturday, March 24, 2007. 2:15pm EST time :
Changed a few things, now allows !stopdm as well as !dmstop
Update: Saturday, March 24, 2007. 2:40pm EST time :
Fixed anchor special when used by AI. It now should work and do damage.
Update: Saturday, March 24, 2007. 8:04pm EST time :
Fixed an inconvenient spelling error ;)
Update: Saturday, March 24, 2007. 8:26pm EST time :
Changed DAxe special: Instead of hitting a 55, it now hits a 45.
Instead of a 1/3 chance to get it, theres now a 2/5 chance.
Update: Saturday, March 24, 2007. 9:15pm EST time :
DMace special now doesn't wait until the next turn before inflicting the damage.
Update: Date not worth mentioning.
Just fixed a few things :P
Update: Saturday, March 24, 2007. 11:43pm EST time :
DMace now works.
Update: Monday, March 26, 2007. 8:42pm EST time :
Daxe less cheap and hits at a 3/10 chance instead of 2/5
Update: Thursday, April 05, 2007. 2:55am EST time :
No update in a while ;) cant find any bugs :) !nanchor i guess works with AI bot now..idk why lmao. couldve just been a bug in my friend's bot's aliases.
Anyway, I just added a little feature; when you type !dmcheck [optional nick] itll show an average KD ratio.
Update: Thursday, April 05, 2007. 3:28am EST time :
There is now a complete !Dmadmin script. Still in testing, though. Expect updates for bugs. Post any problems here.
All Admin commands can be viewed by "!dmadmin" or "!dmadmin commands" if you are an admin. To set admins, you must either Re-Load the script, OR type "/dmadmins ADMINSYOUWANT" as ADMINSYOUWANT is the names of people you want as admins, no spaces, commas inbetween.
All admin commands are listed below the usual commands above this text. Straight from file.
Update: Thursday, April 05, 2007. 4:42am EST time :
Agh, after a while of working, a big update has gone through.
A mod for GOLD.
And a bunch of stuff to buy.
To see stuff able to buy, look at help stuff above this text. Straight from file, as usual.
Theres also a choice now if you are a boy or a girl when you load the script.
Update: Thursday, April 05, 2007. 5:33pm EST time :
Changed the way gold was distrubuted and the calculations. It now gives you less or more depending on more badly you beat your opponent.
If you win:
The more health you have: more gold
The less health opponent has: more gold
The more special you have: more gold
The less special they have: more gold
Update: Thursday, April 05, 2007. 5:55pm EST time :
Nothing special. Only thing changed is that the highest amount of special meter you can have is now 100%, so you cant overlap it.
Update: Thursday, April 05, 2007. 6:12pm EST time :
Nothing special again. Just added [DM] to the Death text.
Update: Thursday, April 05, 2007. 11:17pm EST time :
Not much big, but when you type !dmcheck now, you will get there 'total gold earned to date'.
Update: Friday, April 06, 2007. 3:29pm EST time :
Just for if you have two bots in one chan, i developed a beta thing to see if others are DM bots as well. They must have this version (2.0) or higher for this to work.
Keep in mind that its still being tested, and its not finished. So it may not work at all. Yet.
Update: Saturday, June 02, 2007. 3:14am EST time :
A LOONG time since an update o.O
I took out the bot thing to stop multiple bots, after all, who would have that anyway? It was very irritating.
Added !dmmods, which checks what current mods are running and what they do.
Also added CopyMod Beta, which has the AI copy what items you have, so you dont have a terrible advantage over them while fighting them if you bought many items.
To Activate all of this, please load this script, answer the questions, and continue on with gameplay!
NOTE: This will NOT erase any game 'saves', such as money, items, etc.
Update: Saturday, June 02, 2007. 3:47am EST time :
Meh, some bug fixes. Items actually work on bots now, and very many bot variables labled as "%dmhit" are now "%dmhit1" to clarify that there is one hit, and to help run a few other things to help items run in the first place.
In all, there was a few other bugs that I also fixed.
Update: Wednesday, June 20, 2007. 11:54pm EST time :
Some bug fixes, script 'should' work entirely now, added a little bit of color, made it so you cant type !dmcheck and !dmcommands and !dmstop etc in the wrong channel.
Update: Wednesday, June 21, 2007. 12:01am EST time :
Changed some things, made "#chatdm" to your custom DM room, and made daxe quote "more cheap", giving it a 2/5 chance to hit again instead of the 3/10 that i changed it to a while back. the daxe was useless before this update o.O, fixed a small little error.
also changed 20 second timer to fight the bot to 15.
Update: Saturday, June 23, 2007. 6:36pm EST time :
Fixed a MAJOR problem where if somebody parted in your set DM channel, mIRC would crash. I highly recommend getting this update.
Update: Thursday, July 26, 2007. 12:53am EST time :
Currently going to make a SCRIPT (instead of SNIPPET) version of this because it is too long for this box. When uploaded I will have a link here showing where you can get the script.
Anotherwards, this script doesnt work.
Update:
http://www.hawkee.com/snippet/3012/
NEW VERSION^
Update: Saturday, May 24, 2008. 1:12pm EST time :
So-called 'new version' is deleted. Message to me if you want this script. I am currently in the process of re-vamping the WHOLE script to have classes and whatnot, you can goto
www.classmatchmirc.tk or
www.freewebs.com/classmatch to see how it is doing, and check out current classes. You can play the beta version (not all classes made, i have PLENTY to do) in #classmatch in irc.swiftirc.net
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
Update: Saturday, May 24, 2008. 1:12pm EST time :
So-called 'new version' is deleted. Message to me if you want this script. I am currently in the process of re-vamping the WHOLE script to have classes and whatnot, you can goto www.classmatchmirc.tk or www.freewebs.com/classmatch to see how it is doing, and check out current classes. You can play the beta version (not all classes made, i have PLENTY to do) in #classmatch in irc.swiftirc.net
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
Update: Saturday, May 24, 2008. 1:12pm EST time :
So-called 'new version' is deleted. Message to me if you want this script. I am currently in the process of re-vamping the WHOLE script to have classes and whatnot, you can goto www.classmatchmirc.tk or www.freewebs.com/classmatch to see how it is doing, and check out current classes. You can play the beta version (not all classes made, i have PLENTY to do) in #classmatch in irc.swiftirc.net
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
Update: Saturday, May 24, 2008. 1:12pm EST time :
So-called 'new version' is deleted. Message to me if you want this script. I am currently in the process of re-vamping the WHOLE script to have classes and whatnot, you can goto www.classmatchmirc.tk or www.freewebs.com/classmatch to see how it is doing, and check out current classes. You can play the beta version (not all classes made, i have PLENTY to do) in #classmatch in irc.swiftirc.net
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
Update: Saturday, May 24, 2008. 1:12pm EST time :
So-called 'new version' is deleted. Message to me if you want this script. I am currently in the process of re-vamping the WHOLE script to have classes and whatnot, you can goto www.classmatchmirc.tk or www.freewebs.com/classmatch to see how it is doing, and check out current classes. You can play the beta version (not all classes made, i have PLENTY to do) in #classmatch in irc.swiftirc.net
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
Update: Saturday, May 24, 2008. 1:12pm EST time :
So-called 'new version' is deleted. Message to me if you want this script. I am currently in the process of re-vamping the WHOLE script to have classes and whatnot, you can goto www.classmatchmirc.tk or www.freewebs.com/classmatch to see how it is doing, and check out current classes. You can play the beta version (not all classes made, i have PLENTY to do) in #classmatch in irc.swiftirc.net
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
you can see the following text to see what the script looked like a while ago.
;;;;;;;;;;;;;;;;;;;;;READ THIS FIRST!!!!;;;;;;;;;;;;;;;;;;;;;;
on *:text:!dmcommands*:#:{
if (%chandm != $chan) {
notice $nick 04[05DM04] You are in the wrong channel! Goto 7 $+ %chandm $+ for DMing!
HALT
}
if (%commandhalt2 [ $+[ $nick ] ] != $null) { HALT }
if (%commandhalt != $null) { notice $nick 06I am currently sending commands to somebody else.05 Please wait.
set %commandhalt2 [ $+ [ $nick ] ] yes
HALT }
unset %commandhalt2*
set %commandhalt yes
timer 01 10 unset %commandhalt
msg $chan 04[05DM04] Sending $nick DMCommands.
msg $chan 04[05DM04] Please wait 15-20 seconds before using another command.
msg $nick 04[05DM04] DM RULES.
msg $nick 04[05DM04] You start with 100% Special Attack meter. It is suggested you use this.
msg $nick 04[05DM04] Every turn, your Special Attack meter raises 5%.
msg $nick 04[05DM04] DM SPECIAL COMMANDS.
msg $nick 04[05DM04] Syntax: Command :: Percent special uses :: Max hit :: Effect
msg $nick 04[05DM04] !dds :: 25% :: 46 (double 23) :: Hits twice.
msg $nick 04[05DM04] !dmace :: 25% :: 50 :: Double the chance to hit below 25.
msg $nick 04[05DM04] !anchor :: 50% :: 40 :: Double the chance to hit above 15.
msg $nick 04[05DM04] !dscim :: 60% :: 35 :: 5% chance of earning 100% special meter. 10% chance of earning 40% special meter. 50% chance of STEALING 10% special meter.
msg $nick 04[05DM04] !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.
msg $nick 04[05DM04] !daxe :: 60% :: Either hits 0 or 45 :: Low chance to hit 45.
msg $nick 04[05DM04] DM NORMAL COMMANDS.
msg $nick 04[05DM04] Syntax: Command :: Max hit :: Effect
msg $nick 04[05DM04] !Nwhip :: 30 :: None.
msg $nick 04[05DM04] !Nmaul :: 25 :: Slightly high chance to hit higher.
msg $nick 04[05DM04] !Nanchor :: 35 :: Slightly high chance to hit lower.
msg $nick 04[05DM04] !Ndscim :: 25 :: Regenerate 5% extra special meter this turn.
msg $nick 04[05DM04] OTHER COMMANDS.
msg $nick 04[05DM04] Syntax: Command :: Effect
msg $nick 04[05DM04] !dmstop :: Stops DM. Requires two people to initiate.
msg $nick 04[05DM04] !dmcommands :: Display all commands. This that you are reading IS !dmcommands
msg $nick 04[05DM04] !dmcheck :: Display current Win/Lose record, K/D ratio, gold, items.
msg $nick 04[05DM04] !dmadmin :: For ADMINS. Displays admin commands.
msg $nick 04[05DM04] !dmbuy :: If buying mod is enabled, lets you buy/check items to buy.
msg $nick 04[05DM04] !dmmods :: Checks what mods are currently enabled.
}
on *:text:!dds*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmspec [ $+ [ $nick ] ] < 25) { notice $nick 04[05DM04] You do not have enough special meter! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
dec %dmspec [ $+ [ $nick ] ] 25
set %dmhit1 $rand(0,23)
set %dmhit2 $rand(0,23)
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit1 < 0) { set %dmhit1 0 }
if (%dmhit2 < 0) { set %dmhit2 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his DDS Special and hits a %dmhit1 and %dmhit2 $+ !
set %dmhit $calc( %dmhit1 + %dmhit2 )
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!dmace*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmspec [ $+ [ $nick ] ] < 25) { notice $nick 04[05DM04] You do not have enough special meter! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
dec %dmspec [ $+ [ $nick ] ] 25
set %dmhit $rand(0,50)
if (%dmhit > 25) {
set %dmhit $rand(0,50)
}
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his DMace Special and hits a %dmhit $+ !
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!anchor*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmspec [ $+ [ $nick ] ] < 50) { notice $nick 04[05DM04] You do not have enough special meter! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
dec %dmspec [ $+ [ $nick ] ] 50
set %dmhit $rand(0,35)
if (%dmhit < 15) {
set %dmhit $rand(0,40)
}
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his Anchor Special and hits a %dmhit $+ !
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!dscim*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmspec [ $+ [ $nick ] ] < 60) { notice $nick 04[05DM04] You do not have enough special meter! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
dec %dmspec [ $+ [ $nick ] ] 60
set %dmhit $rand(0,35)
set %dmrand1 $rand(1,20)
if (%dmrand1 == 1) { set %dmscima yes }
set %dmrand2 $rand(1,10)
if (%dmrand2 == 1) { set %dmscimb yes }
set %dmrand3 $rand(1,2)
if (%dmrand3 == 1) { set %dmscimc yes }
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his Dscim Special and hits a %dmhit $+ !
if (%dmscima == yes) { msg $chan 04[05DM04] $nick Also gains an extra _100%_ worth of special meter! | inc %dmspec [ $+ [ $nick ] ] 100 }
if (%dmscimb == yes) { msg $chan 04[05DM04] $nick Also gains an extra _40%_ worth of special meter! | inc %dmspec [ $+ [ $nick ] ] 40 }
if (%dmscimc == yes) { msg $chan 04[05DM04] $nick Also STEALS _10%_ special meter from %dmotherperson $+ ! | inc %dmspec [ $+ [ $nick ] ] 10 | dec %dmspec [ $+ [ %dmotherperson ] ] 10 }
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!whip*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmspec [ $+ [ $nick ] ] < 55) { notice $nick 04[05DM04] You do not have enough special meter! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
dec %dmspec [ $+ [ $nick ] ] 55
set %dmhit $rand(0,35)
if (%dmhit < 11) { inc %dmhit 1 | set %dmwhip 1 }
if (%dmhit > 10) && (%dmhit < 35) { inc %dmhit 2 | set %dmwhip 2 }
if (%dmhit == 35) { inc %dmhit 5 | set %dmwhip 5 }
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his Whip Special and hits a %dmhit $+ , which includes a + $+ %dmwhip bonus!
if (%dmwhip == 5) { msg $chan 04[05DM04] $nick Also steals _20%_ special meter from %dmotherperson $+ !
inc %dmspec [ $+ [ $nick ] ] 20
dec %dmspec [ $+ [ %dmotherperson ] ] 20
}
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!daxe*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmspec [ $+ [ $nick ] ] < 60) { notice $nick 04[05DM04] You do not have enough special meter! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
dec %dmspec [ $+ [ $nick ] ] 60
set %dmhit $rand(1,5)
if (%dmhit < 2) { set %dmhit 0 }
if (%dmhit > 3) { set %dmhit 45 }
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his Daxe Special and hits a %dmhit $+ .
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!nwhip*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
set %dmhit $rand(0,30)
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his Whip and hits a %dmhit $+ .
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!nmaul*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
set %dmhit $rand(0,4)
if (%dmhit != 4) {
set %dmhit $rand(0,25)
}
if (%dmhit == 4) {
set %dmhit $rand(15,25)
}
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his maul and hits a %dmhit $+ .
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!nanchor*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
set %dmhit $rand(0,4)
if (%dmhit != 4) {
set %dmhit $rand(0,35)
}
if (%dmhit == 4) {
set %dmhit $rand(0,21)
}
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his anchor and hits a %dmhit $+ .
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
on *:text:!ndscim*:#:{
if (%otherdmbot == yes) { HALT }
if ($nick == %dmnick1) { set %dmotherperson %dmnick2 }
if ($nick == %dmnick2) { set %dmotherperson %dmnick1 }
if (%chandm != $chan) { HALT }
if (%dm != on) { notice $nick 04[05DM04] There is no current DM going on! Type !DM to start! | HALT }
if (%dmnick1 == $nick) && (%dmnick2 == $nick) { notice $nick 04[05DM04] You are not in the DM! | HALT }
if (%dmturn != $nick) { notice $nick 04[05DM04] It is not your turn! | HALT }
if (%dmwait == on) { notice $nick 04[05DM04] Please wait until your health meter shows up before doing an attack! | HALT }
set %dmhit $rand(0,25)
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $nick ] ]) { set %dmhit $calc(%dmhit + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit $calc(%dmhit - 5) }
if (special_boost100 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmspec [ $+ [ $nick ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $nick ] ]) { inc %dmhealth [ $+ [ $nick ] ] 10 }
}
if (%dmhit < 0) { set %dmhit 0 }
if (%dmspec [ $+ [ $nick ] ] > 100) { set %dmspec [ $+ [ $nick ] ] 100 }
msg $chan 04[05DM04] $nick uses his dscim and hits a %dmhit $+ , and also regenerates an extra 5% special meter!
inc %dmspec [ $+ [ $nick ] ] 5
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit
dmregen $nick %dmotherperson
notice $nick 04[05DM04] You now have %dmspec [ $+ [ $nick ] ] special bar.
}
alias dmregen {
if (%otherdmbot == yes) { HALT }
inc %dmspec [ $+ [ $1 ] ] 5
if (%dmspec [ $+ [ $1 ] ] > 100) { set %dmspec [ $+ [ $1 ] ] 100 }
set %dmturn $2
msg %chandm 04[05DM04] It is now $2 $+ 's turn!
if (%dmhealth [ $+ [ %dmnick1 ] ] > 99) {
set %dmhealth [ $+ [ %dmnick1 ] ] 99 }
if (%dmhealth [ $+ [ %dmnick2 ] ] > 99) {
set %dmhealth [ $+ [ %dmnick2 ] ] 99 }
if (%dmturn != $me) {
timer 01 02 msg %chandm 04[05DM04] Health: %dmnick1 $+ (05 $+ %dmhealth [ $+ [ %dmnick1 ] ] $+ ) %dmnick2 $+ (05 $+ %dmhealth [ $+ [ %dmnick2 ] ] $+ )
timer 01 02 unset %dmwait
}
set %dmwait on
dmcheck
}
alias dmcheck {
if (%otherdmbot == yes) { HALT }
if (%dmhealth [ $+ [ %dmnick1 ] ] < 1) {
msg %chandm 04[05DM04] %dmnick1 has fallen to the ground, while %dmnick2 celebrates a glorious win! %dmnick2 wins!
inc %losedm [ $+ [ %dmnick1 ] ]
inc %winsdm [ $+ [ %dmnick2 ] ]
set %golddm1 $rand(150,500)
set %golddm2 $rand(50,150)
set %golddm1 $calc(%golddm1 + %dmhealth [ $+ [ %dmnick2 ] ] - %dmhealth [ $+ [ %dmnick2 ] ] + %dmspec [ $+ [ %dmnick1 ] ] - %dmspec [ $+ [ %dmnick1 ] ])
if (%dmnick2 != $me) { notice %dmnick2 You win04 %golddm1 Gold! }
if (%dmnick1 != $me) { notice %dmnick1 You win04 %golddm2 Gold! }
inc %golddm [ $+ [ %dmnick1 ] ] %golddm2
inc %golddm [ $+ [ %dmnick2 ] ] %golddm1
inc %allgolddm [ $+ [ %dmnick1 ] ] %golddm2
inc %allgolddm [ $+ [ %dmnick2 ] ] %golddm1
if (%listdm2 [ $+ [ %dmnick1 ] ] != $null) { set %listdm [ $+ [ %dmnick1 ] ] %listdm2 [ $+ [ %dmnick1 ] ] }
if (%listdm2 [ $+ [ %dmnick2 ] ] != $null) { set %listdm [ $+ [ %dmnick2 ] ] %listdm2 [ $+ [ %dmnick2 ] ] }
unset %listdm2*
unset %dm*
halt
}
if (%dmhealth [ $+ [ %dmnick2 ] ] < 1) {
msg %chandm 04[05DM04] %dmnick2 has fallen to the ground, while %dmnick1 celebrates a glorious win! %dmnick1 wins!
inc %losedm [ $+ [ %dmnick2 ] ]
inc %winsdm [ $+ [ %dmnick1 ] ]
set %golddm1 $rand(150,500)
set %golddm2 $rand(50,150)
set %golddm1 $calc(%golddm1 + %dmhealth [ $+ [ %dmnick1 ] ] - %dmhealth [ $+ [ %dmnick2 ] ] + %dmspec [ $+ [ %dmnick1 ] ] - %dmspec [ $+ [ %dmnick2 ] ])
if (%dmnick1 != $me) { notice %dmnick1 You win04 %golddm1 Gold! }
if (%dmnick2 != $me) { notice %dmnick2 You win04 %golddm2 Gold! }
inc %golddm [ $+ [ %dmnick1 ] ] %golddm1
inc %golddm [ $+ [ %dmnick2 ] ] %golddm2
inc %allgolddm [ $+ [ %dmnick1 ] ] %golddm1
inc %allgolddm [ $+ [ %dmnick2 ] ] %golddm2
if (%listdm2 [ $+ [ %dmnick1 ] ] != $null) { set %listdm [ $+ [ %dmnick1 ] ] %listdm2 [ $+ [ %dmnick1 ] ] }
if (%listdm2 [ $+ [ %dmnick2 ] ] != $null) { set %listdm [ $+ [ %dmnick2 ] ] %listdm2 [ $+ [ %dmnick2 ] ] }
unset %listdm2*
unset %dm*
halt
}
dmaiturn
}
on *:load:{
unset %dm*
:genderdm
set %genderdm $?="Are you a guy or girl? Please type GUY or GIRL."
if (%genderdm == guy) {
set %genderdm his
}
if (%genderdm == girl) {
set %genderdm her
}
if (%genderdm != her) && (%genderdm != his) { goto genderdm }
set %buydmmod $?="Do you want Buy Mod enabled? (Lets people buy items with gold they earn, recommended.) $+ $crlf $+ Answer Y/N."
if (%admindm == y) || (%admindm == yes) {
set %buydmmod yes
}
if (%admindm == n) || (%admindm == no) {
set %buydmmod no
}
:admindm
set %admindm $?="Do you want any Admins? (They can edit basically anything, even during a game. Only aliases of course. $+ $crlf $+ Answer Y/N."
if (%admindm == y) || (%admindm == yes) {
set %admindm yes
set %adminsdm $?="What are the nicks of what Admins you want? Type a comma inbetween each. No spaces."
}
if (%admindm == n) || (%admindm == no) {
set %admindm no
}
if (%admindm != yes) && (%admindm != no) && (%admindm != y) && (%admindm != n) {
goto admindm
}
set %chandm $?="What channel do you want your DM script to be in? (Default: #chatdm )"
set %copymod $?="Do you want CopyMod Beta on? (While fighting the bot, it imitates your items. (YES/NO, Y/N)"
if (%copymod == n) { set %copymod no }
if (%copymod == y) { set %copymod yes }
}
alias dmadmins {
if (%otherdmbot == yes) { HALT }
if ($1 == $null) { set %adminsdm $?="What are the nicks of people you want as admins?"
halt
}
set %adminsdm $1-
halt
}
on *:text:!dmadmin*:#: {
if (%otherdmbot == yes) { HALT }
if ($nick !isin %adminsdm) { notice $nick 04[05DM04] You are not an admin! | HALT }
if ($2 == commands) || ($2 == $null) {
msg $nick 04[05DM04] ADMIN COMMANDS
msg $nick 04[05DM04] An underlined line means YOU put that info in.
msg $nick 04[05DM04] If something is bold underlined, it means it is optional.
msg $nick 04[05DM04] Syntax: Command - What it does
msg $nick 04[05DM04] !dmadmin edit type amount other - Edits type to amount.
msg $nick 04[05DM04] EDIT COMMANDS (type)
msg $nick 04[05DM04] !dmadmin edit hp amount person - Edits person's Health to amount
msg $nick 04[05DM04] !dmadmin edit wins amount person - Edits person's Win amount to amount
msg $nick 04[05DM04] !dmadmin edit loses amount person - Edits person's Lose amount to amount
msg $nick 04[05DM04] !dmadmin edit special amount person - Edits person's Special Meter to amount
msg $nick 04[05DM04] !dmadmin edit vote amount - Edits the current amount of votes to end the game to amount
msg $nick 04[05DM04] !dmadmin edit gold amount person - Edits person's gold amount to amount
msg $nick 04[05DM04] !dmadmin edit person number person - Changes number's game position to person's. If person is unspecified, it's you.
msg $nick 04[05DM04] !dmadmin edit copymod on/off - Changed Copy Mod to On or Off
msg $nick 04[05DM04] !dmadmin edit buydmmod on/off - Changed Buying Mod to On or Off
msg $nick 04[05DM04] DM NUMBER SYNTAX FOR ABOVE COMMAND: number 1: person who first said !DM. number 2: person who accepted DM by typing !DM second.
msg $nick 04[05DM04] More commmands to be coming. Admin in beta mode currently.
halt
}
if ($2 == edit) {
if ($3 == gold) {
set %golddm [ $+ [ $5 ] ] $4
notice $nick 04[05DM04] $5 $+ 's Gold set to $4 $+ .
halt
}
if ($3 == hp) {
set %dmhealth [ $+ [ $5 ] ] $4
notice $nick 04[05DM04] $5 $+ 's Health set to $4 $+ .
halt
}
if ($3 == wins) {
set %winsdm [ $+ [ $5 ] ] $4
notice $nick 04[05DM04] $5 $+ 's Wins set to $4 $+ .
halt
}
if ($3 == loses) {
set %losedm [ $+ [ $5 ] ] $4
notice $nick 04[05DM04] $5 $+ 's Loses set to $4 $+ .
halt
}
if ($3 == special) {
set %dmspec [ $+ [ $5 ] ] $4
notice $nick 04[05DM04] $5 $+ 's Special Meter set to $4 $+ .
halt
}
if ($3 == vote) {
set %dmstopcount $4
notice $nick 04[05DM04] Votes to end the game now $4 $+ .
halt
}
if ($3 == copymod) {
if ($4 != on) && ($4 != off) {
notice $nick 04[05DM04] Please type !dmadmin edit copymod on/off
halt
}
set %copymod $4
notice $nick 04[05DM04] CopyMod now $4
halt
}
if ($3 == buydmmod) {
if ($4 != on) && ($4 != off) {
notice $nick 04[05DM04] Please type !dmadmin edit buydmmod on/off
halt
}
set %copymod $4
notice $nick 04[05DM04] Buying Mod now $4
halt
}
}
if ($3 == person) {
if ($5 == $null) {
if ($4 == 1) {
if (%dmturn == %dmnick1) {
set %dmturn $nick
}
set %dmhealth [ $+ [ $nick ] ] %dmhealth [ $+ [ %dmnick1 ] ]
set %dmspec [ $+ [ $nick ] ] %dmspec [ $+ [ %dmnick1 ] ]
notice $nick 04[05DM04] You are now in the place of %dmnick1 $+ .
msg %dmchan 04[05DM04] $nick is now in the place of %dmnick1 $+ .
set %dmnick1 $nick
halt
}
if ($4 == 2) {
if (%dmturn == %dmnick2) {
set %dmturn $nick
}
set %dmhealth [ $+ [ $nick ] ] %dmhealth [ $+ [ %dmnick2 ] ]
set %dmspec [ $+ [ $nick ] ] %dmspec [ $+ [ %dmnick2 ] ]
notice $nick 04[05DM04] You are now in the place of %dmnick2 $+ .
msg %dmchan 04[05DM04] $nick is now in the place of %dmnick2 $+ .
set %dmnick1 $nick
halt
}
}
if ($5 != $null) {
if ($4 == 1) {
if (%dmturn == %dmnick1) {
set %dmturn $5
}
set %dmhealth [ $+ [ $5 ] ] %dmhealth [ $+ [ %dmnick1 ] ]
set %dmspec [ $+ [ $5 ] ] %dmspec [ $+ [ %dmnick1 ] ]
notice $nick 04[05DM04] $5 is now in the place of %dmnick1 $+ .
msg %dmchan 04[05DM04] $5 is now in the place of %dmnick1 $+ .
set %dmnick1 $nick
halt
}
if ($4 == 2) {
if (%dmturn == %dmnick2) {
set %dmturn $5
}
set %dmhealth [ $+ [ $5 ] ] %dmhealth [ $+ [ %dmnick2 ] ]
set %dmspec [ $+ [ $5 ] ] %dmspec [ $+ [ %dmnick2 ] ]
notice $nick 04[05DM04] $5 is now in the place of %dmnick2 $+ .
msg %dmchan 04[05DM04] $5 is now in the place of %dmnick2 $+ .
set %dmnick1 $nick
halt
}
}
}
}
alias chandm {
if ($1 == $null) {
echo -a 04[05DM04] Setting ( $+ %chandm $+ ) to $active
set %chandm $active
halt
}
echo -a 04[05DM04] Setting ( $+ %chandm $+ ) to $1-
set %chandm $1-
halt
}
alias dmend {
if (%otherdmbot == yes) { HALT }
if (%dmnick2 == $null) {
msg %chandm 04[05DM04] Nobody has replied to %dmnick1 $+ 's DM request within 15 seconds! I will face you!
if (%copymod == yes) { set %listdm2 [ $+ [ $me ] ] %listdm [ $+ [ $me ] ]
set %listdm [ $+ [ $me ] ] %listdm [ $+ [ %dmnick1 ] ]
}
set %dmai on
set %dmnick2 $me
set %dm on
set %dmrand $rand(1,2)
if (%dmrand == 1) {
set %dmturn %dmnick1
}
if (%dmrand == 2) {
set %dmturn %dmnick2
}
msg %chandm 04[05DM04] DM started between %dmnick1 and %dmnick2 $+ !
msg %chandm 04[05DM04] To see commands, type !dmcommands $+ !
msg %chandm 04[05DM04] Random pick... %dmturn goes first!
msg %chandm 04[05DM04] For current mods running, type !dmmods!
set %dmspec [ $+ [ %dmnick1 ] ] 100
set %dmspec [ $+ [ %dmnick2 ] ] 100
set %dmhealth [ $+ [ %dmnick1 ] ] 99
set %dmhealth [ $+ [ %dmnick2 ] ] 99
dmaiturn
}
}
on *:text:!dmmods*:#: {
if (%dmcommands == on) {
notice $nick 04[05DM04] Currently sending somebody else the mods.
notice $nick 04[05DM04] Please try again in 10 seconds.
halt
}
set %dmcommands on
timer 01 10 unset %dmcommands
if (%copymod == yes) {
notice $nick 04[05DM04] CopyMod Beta is enabled! When you face the bot, it will copy your items!
}
if (%buydmmod == yes) {
notice $nick 04[05DM04] BuyingMod Beta is enabled! You can buy items for initial use all the time. Type !dmbuy for more info.
}
if (%admindm == yes) {
notice $nick 04[05DM04] AdminDM Beta is enabled! Certain people get to use admin commands!
notice $nick 04[05DM04] AdminDM Beta is enabled! Admins: %adminsdm
}
}
on *:text:!dmbuy*:#: {
if (%otherdmbot == yes) { HALT }
if (%buydmmod != yes) { msg nick 04[05DM04] This bot has DM Buying Mod turned OFF. | HALT }
if (%golddm [ $+ [ $nick ] ] == $null) { set %golddm [ $+ [ $nick ] ] 0 }
if ($2 == $null) || ($2 == list) {
if (%dmcommands == on) {
notice $nick 04[05DM04] Currently sending somebody else the commands.
notice $nick 04[05DM04] Please try again in 15 seconds.
halt
}
set %dmcommands on
timer 01 20 unset %dmcommands
msg $chan 04[05DM04] Sending $nick DM Items To Buy List.
msg $chan 04[05DM04] Please wait 15-20 seconds before using another command.
msg $nick 04[05DM04] ITEMS TO BUY LIST
msg $nick 04[05DM04] TO BUY: !dmbuy buy item
msg $nick 04[05DM04] Syntax: Item - Price - Effect
msg $nick 04[05DM04] Health_Boost1 - 1500 - Increases your health by 1 hp each turn.
msg $nick 04[05DM04] Health_Boost5 - 5000 - Increases your health by 5 hp each turn.
msg $nick 04[05DM04] Health_Boost10 - 9500 - Increases your health by 10 hp each turn.
msg $nick 04[05DM04] Special_Boost100 - 20000 - Infinite special meter.
msg $nick 04[05DM04] Special_Boost50 - 12000 - Increases your special meter by 50 each turn.
msg $nick 04[05DM04] Special_Boost15 - 7000 - Increases your special meter by 15 each turn.
msg $nick 04[05DM04] Special_Boost10 - 5000 - Increases your special meter by 10 each turn.
msg $nick 04[05DM04] Special_Boost5 - 2500 - Increases your special meter by 5 each turn.
msg $nick 04[05DM04] Extra_Damage - 10000 - Hits an extra 5 damage every hit.
msg $nick 04[05DM04] Weak_Armor - 1500 - Get inflicted with 1 less damage every hit.
msg $nick 04[05DM04] Med_Armor - 2500 - Get inflicted with 2 less damage every hit.
msg $nick 04[05DM04] Strong_Armor - 10000 - Get inflicted with 5 less damage every hit.
msg $nick 04[05DM04] Inc_Wins1 - 4000 - Increase your wins by 1 win.
msg $nick 04[05DM04] Inc_Wins5 - 15000 - Increase your wins by 5 wins.
msg $nick 04[05DM04] Dec_Loses1 - 5000 - Decrease your loses by 1 lose.
msg $nick 04[05DM04] Dec_Loses5 - 20000 - Decrease your loses by 5 loses.
msg $nick 04[05DM04] Dm Beta Buying Mod
}
if ($2 == buy) {
if ($3 isin %listdm [ $+ [ $nick ] ]) {
notice $nick You already have $3 $+ !
halt
}
if ($3 == dec_lose1) {
if (%golddm [ $+ [ $nick ] ] < 5000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 5000
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
dec %losedm [ $+ [ $nick ] ] 1
}
if ($3 == dec_lose5) {
if (%golddm [ $+ [ $nick ] ] < 20000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 20000
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
dec %losedm [ $+ [ $nick ] ] 5
}
if ($3 == inc_wins5) {
if (%golddm [ $+ [ $nick ] ] < 15000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 15000
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
inc %winsdm [ $+ [ $nick ] ] 5
}
if ($3 == inc_wins1) {
if (%golddm [ $+ [ $nick ] ] < 4000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 4000
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
inc %winsdm [ $+ [ $nick ] ] 1
}
if ($3 == strong_armor) {
if (%golddm [ $+ [ $nick ] ] < 10000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 10000
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == med_armor) {
if (%golddm [ $+ [ $nick ] ] < 2500) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 2500
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == weak_armor) {
if (%golddm [ $+ [ $nick ] ] < 1500) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 1500
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == extra_damage) {
if (%golddm [ $+ [ $nick ] ] < 10000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 10000
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == special_boost5) {
if (%golddm [ $+ [ $nick ] ] < 2500) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 2500
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == special_boost10) {
if (%golddm [ $+ [ $nick ] ] < 5000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 5000
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == special_boost15) {
if (%golddm [ $+ [ $nick ] ] < 7000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 7000
msg $nick 04[05DM04] Your Items: %listdm [ $+ [ $nick ] ]
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == special_boost50) {
if (%golddm [ $+ [ $nick ] ] < 12000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 12000
msg $nick 04[05DM04] Your Items: %listdm
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == special_boost100) {
if (%golddm [ $+ [ $nick ] ] < 20000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 20000
msg $nick 04[05DM04] Your Items: %listdm
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == health_boost1) {
if (%golddm [ $+ [ $nick ] ] < 1500) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 1500
msg $nick 04[05DM04] Your Items: %listdm
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == health_boost5) {
if (%golddm [ $+ [ $nick ] ] < 5000) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 5000
msg $nick 04[05DM04] Your Items: %listdm
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
if ($3 == health_boost10) {
if (%golddm [ $+ [ $nick ] ] < 9500) {
notice $nick 04[05DM04] You do not have enough gold! You have %golddm [ $+ [ $nick ] ] gold!
halt
}
if (%listdm [ $+ [ $nick ] ] != $null) { set %listdm [ $+ [ $nick ] ] %listdm [ $+ [ $nick ] ] $+ , $+ $3 }
if (%listdm [ $+ [ $nick ] ] == $null) { set %listdm [ $+ [ $nick ] ] $3 }
dec %golddm [ $+ [ $nick ] ] 9500
msg $nick 04[05DM04] Your Items: %listdm
msg $nick 04[05DM04] Your gold: %golddm [ $+ [ $nick ] ]
}
}
}
alias dmaiturn {
if (%otherdmbot == yes) { HALT }
if (%dmai == on) {
if (%dmturn == $me) {
if (%dmspec [ $+ [ $me ] ] > 59) {
set %dmrand $rand(1,6)
goto %dmrand
}
if (%dmspec [ $+ [ $me ] ] > 54) && (%dmspec < 60) {
set %dmrand $rand(1,4)
goto %dmrand
}
if (%dmspec [ $+ [ $me ] ] > 49) && (%dmspec < 55) {
set %dmrand $rand(1,3)
goto %dmrand
}
if (%dmspec [ $+ [ $me ] ] > 24) && (%dmspec < 50) {
set %dmrand $rand(1,2)
goto %dmrand
}
if (%dmspec [ $+ [ $me ] ] < 25) {
set %dmrand $rand(7,10)
goto %dmrand
}
:10
if (%dmrand == 10) {
if (%dmai == on) {
if (%dmturn == $me) {
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
msg %chandm !ndscim
set %dmhit1 $rand(0,25)
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
}
if (%dmhit1 < 0) { set %dmhit1 0 }
msg %chandm 04[05DM04] $me uses %genderdm Dscim and hits a %dmhit1 $+ , and also regenerates an extra 5% special meter!
inc %dmspec [ $+ [ $me ] ] 5
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
dmregen $me %dmotherperson
}
}
}
:9
if (%dmrand == 9) {
if (%dmai == on) {
if (%dmturn == $me) {
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
msg %chandm !nanchor
set %dmhit1 $rand(0,4)
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
if (%dmhit1 != 4) {
set %dmhit1 $rand(0,35)
}
if (%dmhit1 == 4) {
set %dmhit1 $rand(0,21)
}
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
}
if (%dmhit1 < 0) { set %dmhit1 0 }
msg %chandm 04[05DM04] $me uses %genderdm Anchor and hits a %dmhit1 $+ .
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
dmregen $me %dmotherperson
}
}
}
:8
if (%dmrand == 8) {
if (%dmai == on) {
if (%dmturn == $me) {
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
msg %chandm !nmaul
set %dmhit1 $rand(0,4)
if (%dmhit1 != 4) {
set %dmhit1 $rand(0,25)
}
if (%dmhit1 == 4) {
set %dmhit1 $rand(15,25)
}
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
}
if (%dmhit1 < 0) { set %dmhit1 0 }
msg %chandm 04[05DM04] $me uses %genderdm Maul and hits a %dmhit1 $+ .
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
dmregen $me %dmotherperson
}
}
}
:7
if (%dmrand == 7) {
if (%dmai == on) {
if (%dmturn == $me) {
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
msg %chandm !nwhip
set %dmhit1 $rand(0,30)
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
}
if (%dmhit1 < 0) { set %dmhit1 0 }
msg %chandm 04[05DM04] $me uses %genderdm Whip and hits a %dmhit1 $+ .
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
dmregen $me %dmotherperson
}
}
}
:6
if (%dmrand == 6) {
if (%dmai == on) {
if (%dmturn == $me) {
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
msg %chandm !daxe
dec %dmspec [ $+ [ $me ] ] 60
set %dmhit1 $rand(1,5)
if (%dmhit < 2) { set %dmhit 0 }
if (%dmhit > 3) { set %dmhit 45 }
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
if (%buydmmod == yes) {
if (extra_damage isin %listdm [ $+ [ $me ] ]) { set %dmhit1 $calc(%dmhit1 + 5) }
if (weak_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 1) }
if (med_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 2) }
if (strong_armor isin %listdm [ $+ [ %dmotherperson ] ]) { set %dmhit1 $calc(%dmhit1 - 5) }
if (special_boost100 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 100 }
if (special_boost50 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 50 }
if (special_boost15 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 15 }
if (special_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 10 }
if (special_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmspec [ $+ [ $me ] ] 5 }
if (health_boost1 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 1 }
if (health_boost5 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 5 }
if (health_boost10 isin %listdm [ $+ [ $me ] ]) { inc %dmhealth [ $+ [ $me ] ] 10 }
}
if (%dmhit1 < 0) { set %dmhit1 0 }
msg %chandm 04[05DM04] $me uses %genderdm Daxe Special and hits a %dmhit1 $+ !
dec %dmhealth [ $+ [ %dmotherperson ] ] %dmhit1
dmregen $me %dmotherperson
}
}
}
:5
if (%dmrand == 5) {
if (%dmai == on) {
if (%dmturn == $me) {
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
msg %chandm !dscim
dec %dmspec [ $+ [ $me ] ] 60
set %dmhit1 $rand(0,35)
set %dmrand1 $rand(1,20)
if (%dmrand1 == 1) { set %dmscima yes }
set %dmrand2 $rand(1,10)
if (%dmrand2 == 1) { set %dmscimb yes }
set %dmrand3 $rand(1,2)
if (%dmrand3 == 1) { set %dmscimc yes }
if ($me == %dmnick1) { set %dmotherperson %dmnick2 }
if ($me == %dmnick2) { set %dmotherperson %dmnick1 }
if (%buydmmod == yes) {