By MAcMAD on Nov 10, 2012Okay so this my project I am working on, and frankly - i am running out of ideas lol I know, how terrible... Please do me a favor and read the WHOLE description as parts of this snipped needs to be placed in their own txt file. Otherwise the game WILL NOT WORK!!!
Okay so here are the instructions:
I have listed the snippet below. Please look carefully for the following:
########
name of the txt file
########
snippet
########
end of file
########
The parts of the snippet has be saved in the name specified, each part of this snippet will have to have their own txt file. They cannot be in the same txt file. Things will clash and the variables will be messed up.
Please be careful when saving it as this will be one very long snippet. LOOK CAREFULLY WHERE THEY ARE SEPERATED!!
Create two folders in your bot's directory called Players and Guilds.
If you do not to this the game will also not work!!!
I am looking for someone to help me build this game as I want it to be a very successful game. Please Leave your comments and feel welcome to share your ideas. PM if you wish to work on this with me. Also note that Liquid_Night is me, it is my irc nick - so do not even think that I stole this.
The code is very untidy and I prefer it this way as I do not want people easily changing things on their own. I am more than willing to give support to this snippet and continue to provide updates as the game progresses. Ask me nicely and I will might actually add your idea into the game. Please Respect my work and the hours I have put in before you leave a nasty comment.
Anyway I'll post a link here in the description if you wish to download the files already in the correct files they need to be in.
There will be a lot of bugs at first but nothing we cannot sort out for you.
Keep checking Description for update links please. Also, click the like button, i know you want to :)
Base game Download Link: http://filebeam.com/download2.php?a=150521b67c17c37703be035762cb2c37&b=ec8ed77219e607d2f55b9d3d80d3daa4
Update link: NONE at the moment
once you have all the files loaded into your bot, go into pvt with it and type in the !login and the password you set for admins. This will make you admin of the bot and allow you to change variables in the menu it provides. Set them correctly. At this point in time you will not have any items in the database. So once you are admin of the bot log in the game and you will see admin commands in game, there you will be able to create your own items for the game. Read the instructions carefully each time you create an item.
type !play in the main channel to begin playing after you have loaded all files and have followed my instructions like creating the folders needed for the game. Type !whois and a players nickname to see their stats. type `help to view the help file. type !items to see how many items are created. Type !viewitem and the item ID to view the item stats.
Have fun and please comment
##############################################
##############################################
Alliance Vs. Horde V2.1 Scripted by macmad #
##############################################
##############################################
##################
FILE NAME: AVH
##################
on 1:load:{
.set %chan #$$?=("In what chan should the bot work?(leave out the #)")
}
on 1:TEXT:!die:%chan:{
if ( $nick == LiQuID_NiGhT ) {
set %AVH off
/topic %chan 3[4OFFLINE3] 3AVH 10V.3 %Version 10is currently active for playing. Type 3!play 10to start playing. Type 3`help10 for any further help. Type 3!update10 before playing to make sure your profile is up to date.
msg $chan 10 AVH has been switched off. Restarting
/quit Restarting operation
set %network $server
}
elseif ( $nick != Liquid_night ) {
msg $chan 10Very funny $nick $+ . But seriously? No
}
}
on 1:TEXT:`help:%chan:{
/notice $nick [Avh] help:
notice $nick This an all stats based game that has no picture, only text. Keeping your stats well active will prove to be very usefull.
notice $nick Find a pattern and stick with it.
notice $nick -
notice $nick If you already played before and now the bot is asking you to update your account, you can simply type !update in the main channel to begin update.
notice $nick This will allow the bot to write the needed files in it's database to ensure you have a bug free playing experience
notice $nick For any further Asistance, you may PM LiQuID_NiGhT or Shadrack on server irc.ptawug.co.za in channel #avh
notice $nick -
notice $nick Please note that the game is constantly being worked on and new things are always added. Always come back to see what's new.
notice $nick Enjoy :)
}
on 1:Join:%chan:{
if ( $nick == $me ) {
/topic %chan 3[9ONLINE3] 3AVH 10V.3 %Version 10is currently active for playing. Type 3!play 10to start playing. Type 3`help10 for any further help. Type 3!update10 before playing to make sure your profile is up to date.
halt
}
elseif ( $nick != $me ) {
/notice $nick 10Welcome to 3AVH. 10Feel free to check our Game called Antic war. Simply type 3!play10 to start :)
/notice $nick 10Having problems playing? Try typing /dccallow +Commander 0 and try again :)
}
}
on 1:TEXT:!whois *:%Chan:{
if ($readini( players\ $+ $2- $+ .ini , seen , $2- ) == seen ) {
/aamsg 10[7 Player info10] 3 $+ $2- $+ ,7 $($+(%,title.,$2),2) 10is level3 $readini( players\ $+ $2 $+ .ini , level , $2 ) 10(LIFE:3 $readini( players\ $+ $2 $+ .ini , life , $2 ) 10 $+ , GUILD:3 $($+(%,gname.,$2),2) 10 $+ , STATUS:3 $readini( players\ $+ $2 $+ .ini , status , $2 ) $+ , 10SIDE:3 $readini( players\ $+ $2 $+ .ini , side , $2 ) $+ , 10CLASS:3 $readini( players\ $+ $2 $+ .ini , CLASS , $2 ) )
}
elseif ($readini( players\ $+ $2- $+ .ini , seen , $2- ) != seen ) {
/aamsg 3 $+ $2- 10does not exist in my database. 3Double-check10 your spelling and try again.
}
}
on 1:TEXT:!avh *:%chan:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
if ( $2 == on ) {
set %AVH on
aamsg 10 AVH has been switched back on and is fully operational
/topic %chan 3[9ONLINE3] 3AVH 10V.3 %Version 10is currently active for playing. Type 3!play 10to start playing. Type 3`help10 for any further help. Type 3!update10 before playing to make sure your profile is up to date.
}
elseif ( $2 == off ) {
set %AVH off
aamsg 10 AVH has been switched off. The game will not be playble untill switched back on
/topic %chan 3[4OFFLINE3] 3AVH 10V.3 %Version 10 is currently active for playing. Type 3!play 10to start playing. Type 3`help10 for any further help. Type 3!update10 before playing to make sure your profile is up to date.
}
}
elseif ($readini( players\ $+ $nick $+ .ini , admin , $nick ) != loggedin ) {
msg %chan 10Sorry3 $nick $+ 10, but you do not have access to that command
}
}
on 1:TEXT:!play:%chan:{
if ( %avh == off ) {
/msg %achan The Game is Currently switched off
}
elseif ( %avh == on ) {
dcc chat $nick
/mode %chan +v $nick
if ($readini( players\ $+ $nick $+ .ini , update , $nick ) != %version ) { /notice $nick Your profile has not been update to the latest version, with out an update you will be unable to play. Please type !update in channel to begin update. | halt }
}
}
on 1:OPEN:=:{
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) != seen ) {
writeini players\ $+ $nick $+ .ini menu $nick cpass
.msg =$nick 10Hi there,3 $nick
.msg =$nick 10We have added a 3password protection10 system for your safety.
.msg =$nick 10Please supply us with a 3password10 for your profile.
update $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , seen , $nick ) == seen ) {
if ($readini( players\ $+ $nick $+ .ini , update , $nick ) != %version ) {
/notice $nick Your profile has not been update to the latest version, with out an update you will be unable to play. Please type !update in channel to begin update.
}
elseif ($readini( players\ $+ $nick $+ .ini , update , $nick ) == %version ) {
if ($readini( players\ $+ $nick $+ .ini , spass , $nick ) != yes ) {
.msg =$nick 10Hi there,3 $nick
.msg =$nick 10We have added a 3password protection10 system for your safety. Do not stress, your profile has not been deleted if you have played before.
.msg =$nick 10Please supply us with a 3password10 for your profile.
writeini players\ $+ $nick $+ .ini menu $nick cpass
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , spass , $nick ) == yes ) {
writeini players\ $+ $nick $+ .ini menu $nick epass
.msg =$nick 10Welcome back3 $nick
.msg =$nick 10Please supply me with me with your 3password
halt
}
}
}
}
on 1:NOTICE:!setupdate *:?:{
set %update $2-
/msg %achan New update value has been set
}
on 1:CHAT:*:{
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == cpass ) {
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) != seen ) {
writeini players\ $+ $nick $+ .ini pass $nick $1-
.msg =$nick 10Thank you3 $nick $+ 10. You're 3password10 has been securely saved. Please remember this for furture use.
set $+(%,title.,$nick) The Newbie
writeini players\ $+ $nick $+ .ini spass $nick yes
aamsg 3 $+ $nick 10Is now online
writeini players\ $+ $nick $+ .ini status $nick ONLINE
check_update $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , seen , $nick ) == seen ) {
writeini players\ $+ $nick $+ .ini pass $nick $1-
.msg =$nick 10Thank you3 $nick $+ 10. You're 3password10 has been securely saved. Please remember this for furture use.
writeini players\ $+ $nick $+ .ini spass $nick yes
aamsg 3 $+ $nick 10Is now online
writeini players\ $+ $nick $+ .ini status $nick ONLINE
check_update $nick
halt
}
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == epass ) {
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) == seen ) {
if ($readini( players\ $+ $nick $+ .ini , pass , $nick ) == $1 ) {
writeini players\ $+ $nick $+ .ini status $nick ONLINE
aamsg 3 $+ $nick 10Is now online
check_update $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , pass , $nick ) != $1- ) {
.msg =$nick 10Wrong 3password10. Your attempt to log in is bein 3monitored10. Please check your spelling and try again.
halt
}
}
}
if ( $1 == 1 ) {
if ( %AVH == on ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == main ) {
1 $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 2 ) {
msg =$nick -
set $+(%,mana.,$nick) $calc( $($+(%,mana.,$nick),2) - %manause )
writeini players\ $+ $nick $+ .ini mana $nick $($+(%,mana.,$nick),2)
if ( $($+(%,mana.,$nick),2) < %manause ) {
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { msg =$nick 10You do not have enough Energy to fight }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { msg =$nick 10You do not have enough Mana to fight }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { msg =$nick 10You do not have enough Energy to fight }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { msg =$nick 10You do not have enough Energy to fight }
set $+(%,battle.,$nick) 0
bplayer_attack $nick
bot_attack $nick
}
if ( $($+(%,mana.,$nick),2) >= %manause ) {
set $+(%,battle.,$nick) 0
bplayer_attack $nick
bot_attack $nick
}
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 3 ) {
writeini players\ $+ $nick $+ .ini life $nick alive
set $+(%,hp.,$nick) $($+(%,mxhp.,$nick),2)
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,mxhp.,$nick),2)
/msg =$nick 10Your 3HEALTH10 has been restored
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $($+(%,hcost.,$nick),2) ) {
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { msg =$nick 10 You do not have enough money in your 3Wallet10 to replenish your 3Energy | halt }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { msg =$nick 10 You do not have enough money in your 3Wallet10 to replenish your 3mana | halt }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { msg =$nick 10 You do not have enough money in your 3Wallet10 to replenish your 3Energy | halt }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == Ranger ) { msg =$nick 10 You do not have enough money in your 3Wallet10 to replenish your 3Energy | halt }
}
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $($+(%,hcost.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini mana $nick $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
writeini players\ $+ $nick $+ .ini gold $nick $calc( $readini( players\ $+ $nick $+ .ini , gold , $nick ) - $($+(%,hcost.,$nick),2) )
set $+(%,mana.,$nick) $($+(%,mxmana.,$nick),2)
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { msg =$nick 10Your 3ENERGY10 has been restored | halt }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { msg =$nick 10Your 3MANA10 has been restored | halt }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { msg =$nick 10Your 3ENERGY10 has been restored | halt }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { msg =$nick 10Your 3ENERGY10 has been restored | halt }
}
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 5 ) {
if ($readini( players\ $+ $nick $+ .ini , workouts , $nick ) > 0 ) {
inc $+(%,strength.,$nick) 5
writeini players\ $+ $nick $+ .ini strength $nick $($+(%,strength.,$nick),2)
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { /msg =$nick 10You Trained your Strength... Strength increased by3 5 }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { /msg =$nick 10You Trained your Intelligence... Intelligence increased by3 5 }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { /msg =$nick 10You Trained your Strength... Strength increased by3 5 }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { /msg =$nick 10You Trained your focus... Focuse increased by3 5 }
dec $+(%,Work.,$nick) 1
writeini players\ $+ $nick $+ .ini workouts $nick $($+(%,work.,$nick),2)
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , workouts , $nick ) == 0 ) {
/msg =$nick 10You have no more Workout points remaining
halt
}
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
IU1 $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == cside ) {
writeini players\ $+ $nick $+ .ini side $nick Order
aamsg 10[7Faction10]3 $nick 10sided with the 3Order 10and shal be marked by the 3Chaos!!
cclass $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == cclass ) {
writeini players\ $+ $nick $+ .ini class $nick Ninja
aamsg 10[7Class10]3 $nick 10has chosen to become a 3Ninja
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) == seen ) { main $nick }
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) != seen ) { create $nick }
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop1
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop1 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop1 , cost ) ) { buy1 $nick }
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == L ) {
set $+(%,battle.,$nick) 0
2 $nick
}
}
elseif ( %AVH != on ) {
/msg =$nick 10The game is currently switched off. Contact one of the opers and they might be able to assist you
halt
}
}
elseif ( $1 == 2 ) {
if ( %AVH == on ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == main ) {
set $+(%,battle.,$nick) 0
2 $nick
}
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
IU2 $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == cside ) {
writeini players\ $+ $nick $+ .ini side $nick Chaos
aamsg 10[7Faction10]3 $nick 10sided with3 Chaos 10and shal be marked by the 3Order!!
cclass $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == cclass ) {
writeini players\ $+ $nick $+ .ini class $nick Mage
aamsg 10[7Class10]3 $nick 10Has Chosen to be a 3Mage
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) == seen ) { main $nick }
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) != seen ) { create $nick }
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop2
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop2 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop2 , cost ) ) { buy1 $nick }
}
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 5 ) {
if ($readini( players\ $+ $nick $+ .ini , workouts , $nick ) > 0 ) {
inc $+(%,defence.,$nick) 5
writeini players\ $+ $nick $+ .ini defence $nick $($+(%,defence.,$nick),2)
/msg =$nick 10You Trained your Defence... Defence increased by3 5
dec $+(%,Work.,$nick) 1
writeini players\ $+ $nick $+ .ini workouts $nick $($+(%,work.,$nick),2)
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , workouts , $nick ) == 0 ) {
/msg =$nick 10You have no more Work out points left.
halt
}
}
}
elseif ( %AVH != on ) {
/msg =$nick 10The game is currently switched off. Contact one of the opers and they might be able to assist you
halt
}
}
elseif ( $1 == 3 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
msg =$nick -
IU3 $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == cclass ) {
writeini players\ $+ $nick $+ .ini class $nick Knight
aamsg 10[7Class10]3 $nick 10Has Chosen to be a 3Knight
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) == seen ) { main $nick }
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) != seen ) { create $nick }
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == main ) {
heal $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop3
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop3 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop3 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 4 ) {
if ( %AVH == on ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == main ) {
arena $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
IU4 $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == cclass ) {
writeini players\ $+ $nick $+ .ini class $nick Ranger
aamsg 10[7Class10]3 $nick 10Has Chosen to be a 3Ranger
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) == seen ) { main $nick }
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) != seen ) { create $nick }
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop4
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop4 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop4 , cost ) ) { buy1 $nick }
}
}
elseif ( %AVH != on ) {
/msg =$nick 10The game is currently switched off. Contact one of the opers and they might be able to assist you
halt
}
}
elseif ( $1 == 5 ) {
if ( %AVH == on ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == main ) {
/msg =$nick -
/msg =$nick 10You Curently have :3 $readini( players\ $+ $nick $+ .ini , workouts , $nick ) :10 Work out points.
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { /msg =$nick 3[1]: 10Train Strength (cost 1 work out point ) | /msg =$nick 3[2]: 10Train Defence (cost 1 work out point ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { /msg =$nick 3[1]: 10Train Intelligence (cost 1 work out point ) | /msg =$nick 3[2]: 10Train Defence (cost 1 work out point ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { /msg =$nick 3[1]: 10Train Strength (cost 1 work out point ) | /msg =$nick 3[2]: 10Train Defence (cost 1 work out point ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { /msg =$nick 3[1]: 10Train FOCUS (cost 1 work out point ) | /msg =$nick 3[2]: 10Train Defence (cost 1 work out point ) }
/msg =$nick -
writeini players\ $+ $nick $+ .ini menu $nick 5
/msg =$nick 3[x]:10 To go back.
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
IU5 $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop5
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop5 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop5 , cost ) ) { buy1 $nick }
}
}
elseif ( %AVH != on ) {
/msg =$nick 10The game is currently switched off. Contact one of the opers and they might be able to assist you
halt
}
}
elseif ( $1 == 6 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == main ) {
bank $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop6
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop6 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop6 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 7 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop7
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop7 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop7 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 8 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop8
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop8 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop8 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 9 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop9
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop9 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop9 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 10 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop10
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop10 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop10 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 11 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop11
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop11 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop11 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 12 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop12
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop12 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop12 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 13 ) {
msg =$nick -
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
msg =$nick -
set $+(%,buy.,$nick) %shop13
msg =$nick -
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop13 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop13 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == 14 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
set $+(%,buy.,$nick) %shop14
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( items.ini , id $+ %shop14 , cost ) ) { /msg =$nick 4You have do not have enough gold in your wallet to purchase this item | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( items.ini , id $+ %shop14 , cost ) ) { buy1 $nick }
}
}
elseif ( $1 == L ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == L ) {
if ( $($+(%,bli.,$nick),2) != 0 ) {
loot1 $nick
}
elseif ( $($+(%,bli.,$nick),2) == 0 ) {
msg =$nick 10There are no more Items to be looted
}
}
}
elseif ( $1 == help ) {
/msg =$nick ;========================================================
/msg =$nick ; 3 HELP FILE
/msg =$nick ;========================================================
/msg =$nick Use the numbers provided to you to navitgate around.
/msg =$nick If you wish to go to the gym you would type in 5 and the bot will take you to the gym
/msg =$nick ;========================================================
halt
}
elseif ( $1 == x ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 1 ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 2 ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 3 ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 4 ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 5 ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == 6 ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == L ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == at ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == sh ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
main $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == pvp ) {
main $nick
}
}
}
alias create {
/msg =$nick -
/msg =$nick 10[ 3Antic_war10] 10Scripter -=10[ 3LiQuID_NiGhT 10]=-
/msg =$nick -
/msg =$nick 3[1]:10 Your stats
/msg =$nick 3[2]:10 Training room
/msg =$nick 3[3]:10 Hospital
/msg =$nick 3[4]:10 Battle Arena
/msg =$nick 3[5]: 10Gym
/msg =$nick 3[6]: 10Bank
/msg =$nick 3[7]: 10Local Shop
/msg =$nick 3[8]: 10Guild
/msg =$nick -
/msg =$nick 3[help]: 10Help file
/msg =$nick -
set $+(%,Strength.,$nick) 45
set $+(%,Defence.,$nick) 50
set $+(%,xp.,$nick) 0
set $+(%,mxp.,$nick) 100
set $+(%,Work.,$nick) 5
set $+(%,level.,$nick) 1
set $+(%,hp.,$nick) 100
set $+(%,mxhp.,$nick) 100
set $+(%,bhp.,$nick) 100
set $+(%,bmhp.,$nick) 100
set $+(%,bat.,$nick) 20
set $+(%,hand1.,$nick) 0
set $+(%,hand2.,$nick) 0
set $+(%,bdef.,$nick) 20
set $+(%,dmg.,$nick) 0
set $+(%,bdmg.,$nick) 0
set $+(%,head.,$nick) 0
set $+(%,chest.,$nick) 0
set $+(%,arms.,$nick) 0
set $+(%,legs.,$nick) 0
set $+(%,armor.,$nick) 0
set $+(%,attack.,$nick) 0
set $+(%,feet.,$nick) 0
set $+(%,gname.,$nick) NONE
writeini players\ $+ $nick $+ .ini xp $nick $($+(%,xp.,$nick),2)
writeini players\ $+ $nick $+ .ini mxp $nick $($+(%,mxp.,$nick),2)
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
writeini players\ $+ $nick $+ .ini mxhp $nick $($+(%,mxhp.,$nick),2)
writeini players\ $+ $nick $+ .ini bothp $nick $($+(%,bhp.,$nick),2)
writeini players\ $+ $nick $+ .ini botmxhp $nick $($+(%,bmhp.,$nick),2)
writeini players\ $+ $nick $+ .ini battack $nick $($+(%,bat.,$nick),2)
writeini players\ $+ $nick $+ .ini bdefence $nick $($+(%,bdef.,$nick),2)
writeini players\ $+ $nick $+ .ini botlife $nick alive
writeini players\ $+ $nick $+ .ini level $nick $($+(%,level.,$nick),2)
writeini players\ $+ $nick $+ .ini workouts $nick $($+(%,work.,$nick),2)
writeini players\ $+ $nick $+ .ini Attack $nick $($+(%,Attack.,$nick),2)
writeini players\ $+ $nick $+ .ini Defence $nick $($+(%,Defence.,$nick),2)
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini strength $nick $($+(%,strength.,$nick),2)
writeini players\ $+ $nick $+ .ini gold $nick 45
writeini players\ $+ $nick $+ .ini bank $nick 300
writeini players\ $+ $nick $+ .ini menu $nick main
writeini players\ $+ $nick $+ .ini seen $nick seen
writeini players\ $+ $nick $+ .ini life $nick alive
writeini players\ $+ $nick $+ .ini seen $nick seen
writeini players\ $+ $nick $+ .ini slot1 $nick -
writeini players\ $+ $nick $+ .ini slot2 $nick -
writeini players\ $+ $nick $+ .ini slot3 $nick -
writeini players\ $+ $nick $+ .ini slot4 $nick -
writeini players\ $+ $nick $+ .ini slot5 $nick -
writeini players\ $+ $nick $+ .ini head $nick -
writeini players\ $+ $nick $+ .ini chest $nick -
writeini players\ $+ $nick $+ .ini arms $nick -
writeini players\ $+ $nick $+ .ini legs $nick -
writeini players\ $+ $nick $+ .ini feet $nick -
writeini players\ $+ $nick $+ .ini status $nick ONLINE
writeini players\ $+ $nick $+ .ini update $nick %version
writeini players\ $+ $nick $+ .ini hand1 $nick -
writeini players\ $+ $nick $+ .ini hand2 $nick -
writeini players\ $+ $nick $+ .ini mana $nick 100
writeini players\ $+ $nick $+ .ini mxmana $nick 100
set $+(%,mana.,$nick) 100
set $+(%,mxmana.,$nick) 100
update $nick
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/msg =$nick 3[ICF]:10 For Create Item Information
/msg =$nick 3[showitems]:10 This pastes the whole item template. ( it WILL flood ) so try becareful using this
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , admin , $nick ) != loggedin ) {
halt
}
}
Alias main {
writeini players\ $+ $nick $+ .ini menu $nick main
msg =$nick -
/msg =$nick 10[ 3Antic_war10]
msg =$nick -
msg =$nick 10You are currently at the main menu
msg =$nick -
/msg =$nick 3[1]:10 Your stats [7new updates!10]
/msg =$nick 3[2]:10 Training room
/msg =$nick 3[3]:10 Hospital
/msg =$nick 3[4]:10 Battle Arena
/msg =$nick 3[5]: 10Your trainer [7New!10]
/msg =$nick 3[6]: 10Bank
/msg =$nick 3[7]: 10Local Shop
/msg =$nick 3[8]: 10Guild
/msg =$nick -
/msg =$nick 3[help]: 10Help file
/msg =$nick -
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/msg =$nick 3[ICF]:10 For Create Item Information
/msg =$nick 3[showitems]:10 This pastes the whole item template. ( it WILL flood ) so try becareful using this
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , admin , $nick ) != loggedin ) {
halt
}
}
alias 1 {
/msg =$nick -
/msg =$nick 10[ 3STATS10]
/msg =$nick -
/msg =$nick 10Health points:3 $readini( players\ $+ $nick $+ .ini , hp , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { /msg =$nick 10Mana points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
/msg =$nick 10ALIVE/DEAD:3 $readini( players\ $+ $nick $+ .ini , life , $nick )
/msg =$nick -
/msg =$nick 10WALLET:3 $readini( players\ $+ $nick $+ .ini , Gold , $nick )
/msg =$nick -
/msg =$nick 10LEVEL:3 $readini( players\ $+ $nick $+ .ini , level , $nick )
/msg =$nick 10XP:3 $($+(%,xp.,$nick),2) / $($+(%,mxp.,$nick),2)
/msg =$nick -
msg =$nick 10HEAD:3 $readini( players\ $+ $nick $+ .ini , head , $nick ) 10(3 $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , discrip ) 10)
msg =$nick 10CHEST:3 $readini( players\ $+ $nick $+ .ini , chest , $nick ) 10(3 $readini( items.ini , ID $+ $($+(%,Chest.,$nick),2) , discrip ) 10)
msg =$nick 10ARMS:3 $readini( players\ $+ $nick $+ .ini , arms , $nick ) 10(3 $readini( items.ini , ID $+ $($+(%,Arms.,$nick),2) , discrip ) 10)
msg =$nick 10LEGS:3 $readini( players\ $+ $nick $+ .ini , legs , $nick ) 10(3 $readini( items.ini , ID $+ $($+(%,Legs.,$nick),2) , discrip ) 10)
msg =$nick 10FEET:3 $readini( players\ $+ $nick $+ .ini , feet , $nick ) 10(3 $readini( items.ini , ID $+ $($+(%,Feet.,$nick),2) , discrip ) 10)
msg =$nick -
msg =$nick 10LEFT HAND(4HAND110):3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10(3 $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , discrip ) 10)
msg =$nick 10RIGHT HAND(4HAND210):3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10(3 $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , discrip ) 10)
msg =$nick -
/msg =$nick 10ATTACK :3 $readini( players\ $+ $nick $+ .ini , ATTACK , $NICK )
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { /msg =$nick 10STRENGTH :3 $readini( players\ $+ $nick $+ .ini , STRENGTH , $NICK ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == MAGE ) { /msg =$nick 10INTELLIGENCE :3 $readini( players\ $+ $nick $+ .ini , STRENGTH , $NICK ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { /msg =$nick 10STRENGTH :3 $readini( players\ $+ $nick $+ .ini , STRENGTH , $NICK ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == RANGER ) { /msg =$nick 10FOCUS :3 $readini( players\ $+ $nick $+ .ini , STRENGTH , $NICK ) }
msg =$nick -
/msg =$nick 10ARMOR :3 $readini( players\ $+ $nick $+ .ini , ARMOR , $NICK )
/msg =$nick 10DEFENCE :3 $readini( players\ $+ $nick $+ .ini , DEFENCE , $NICK )
msg =$nick -
/msg =$nick 10Wourkouts :3 $readini( players\ $+ $nick $+ .ini , Workouts , $NICK )
/msg =$nick -
/msg =$nick 3[10b3]: 10Open your bag
writeini players\ $+ $nick $+ .ini menu $nick 1
/msg =$nick 3[x]: 10back
halt
}
alias heal {
/msg =$nick 3[10Hospital3]
/msg =$nick -
/msg =$nick 10You are Currently3 $readini( players\ $+ $nick $+ .ini , life , $nick )
/msg =$nick 10HP:3 $($+(%,hp.,$nick),2) / $($+(%,mxhp.,$nick),2)
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { /msg =$nick 10Mana points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , mana , $nick ) >= $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) ) {
set $+(%,hcost.,$nick) 0
/msg =$nick -
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { /msg =$nick 10We only charge for replenishing your energy, as it is not a medical Issue. }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { /msg =$nick 10We only charge for replenishing your mana, as it is not a medical Issue. }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { /msg =$nick 10We only charge for replenishing your energy, as it is not a medical Issue. }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { /msg =$nick 10We only charge for replenishing your energy, as it is not a medical Issue. }
/msg =$nick 3[1]:10HEAL (COST:3 $($+(%,hcost.,$nick),2) 10)
/msg =$nick -
/msg =$nick 3[x]:10 back
writeini players\ $+ $nick $+ .ini menu $nick 3
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mana , $nick ) < $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) ) {
set $+(%,mxmana.,$nick) $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
set $+(%,mana.,$nick) $readini( players\ $+ $nick $+ .ini , mana , $nick )
set $+(%,hcost.,$nick) $($+(%,mxmana.,$nick),2)
dec $+(%,hcost.,$nick) $($+(%,mana.,$nick),2)
set $+(%,hcost.,$nick) $calc( $($+(%,hcost.,$nick),2) / %hcost )
set $+(%,hcost.,$nick) $round($($+(%,hcost.,$nick),2),1)
if ( $($+(%,hcost.,$nick),2) <= 0 ) { set $+(%,hcost.,$nick) $calc( $($+(%,hcost.,$nick),2) * -1 ) }
/msg =$nick -
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { /msg =$nick 10We only charge for replenishing your energy, as it is not a medical Issue. }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { /msg =$nick 10We only charge for replenishing your mana, as it is not a medical Issue. }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { /msg =$nick 10We only charge for replenishing your energy, as it is not a medical Issue. }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { /msg =$nick 10We only charge for replenishing your energy, as it is not a medical Issue. }
/msg =$nick 3[1]:10HEAL (COST:3 $($+(%,hcost.,$nick),2) 10)
/msg =$nick -
/msg =$nick 3[x]:10 back
writeini players\ $+ $nick $+ .ini menu $nick 3
halt
}
}
alias 2 {
/msg =$nick -
/msg =$nick 3[10Training room3] [10Completed version3]
/msg =$nick 10Your 3HP is:
/msg =$nick 10HP:3 $($+(%,hp.,$nick),2) / $($+(%,mxhp.,$nick),2)
/msg =$nick 10XP:3 $($+(%,xp.,$nick),2) / $($+(%,mxp.,$nick),2)
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ninja ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == mage ) { /msg =$nick 10Mana points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == knight ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
if ($readini( players\ $+ $nick $+ .ini , class , $nick ) == ranger ) { /msg =$nick 10Energy points:3 $readini( players\ $+ $nick $+ .ini , mana , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) }
/msg =$nick -
/msg =$nick 3[13]10: Attack bot
/msg =$nick -
/msg =$nick 3[10x3]:10 back (remember, if you go back the bot's hp will have been restored)
set $+(%,bhp.,$nick) $($+(%,bmhp.,$nick),2)
writeini players\ $+ $nick $+ .ini botlife $nick alive
set $+(%,dmg.,$nick) $calc( ($($+(%,attack.,$nick),2) * .5) + ($($+(%,strength.,$nick),2) * .8) )
set $+(%,bdmg.,$nick) $calc( ($($+(%,attack.,$nick),2) * .25) + ($($+(%,strength.,$nick),2) * .25) )
set $+(%,bhp.,$nick) $($+(%,mxhp.,$nick),2)
dec $+(%,bdmg.,$nick) 0.90
set $+(%,block.,$nick) $calc( ($($+(%,armor.,$nick),2) * .15) + ($($+(%,defence.,$nick),2) * .25) )
set $+(%,bblock.,$nick) $calc( ($($+(%,armor.,$nick),2) * .15) + ($($+(%,defence.,$nick),2) * .25) )
writeini players\ $+ $nick $+ .ini menu $nick 2
halt
}
alias update {
writeini players\ $+ $nick $+ .ini side $nick -
writeini players\ $+ $nick $+ .ini update $nick %version
/notice $nick Your profile has been fully updated. you are now ready to play
halt
}
alias pwon {
set $+(%,bhp.,$nick) 0
writeini players\ $+ $nick $+ .ini bothp $nick $($+(%,bhp.,$nick),2)
writeini players\ $+ $nick $+ .ini botlife $nick dead
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick ) + 0.50 ) )
/msg =$nick 10You Have killed the 3bot 10with your last attack3 dealing $($+(%,dmg.,$nick),2) 10damage.
/msg =$nick 10You have looted3 0.50 10GOLD from the bot
inc $+(%,xp.,$nick) 35
if ( $($+(%,xp.,$nick),2) < $($+(%,mxp.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini xp $nick $($+(%,xp.,$nick),2)
msg =$nick 10Your Experience increased to3 $($+(%,xp.,$nick),2)
msg =$nick -
msg =$nick 10There is an item to be looted:
set $+(%,bli.,$nick) $rand(1, %itemmax)
set $+(%,bli.,$nick) $rand(1, %itemmax)
msg =$nick 10Item: 10[3 $readini( items.ini , id $+ $($+(%,bli.,$nick),2) , name ) 10] 10[3 $readini( items.ini , id $+ $($+(%,bli.,$nick),2) , discrip ) 10] 10[3 $readini( items.ini , id $+ $($+(%,bli.,$nick),2) , part ) 10]
msg =$nick -
msg =$nick 3[L]:10To loot this item
msg =$nick 3[1]:10To fight the bot again
msg =$nick -
msg =$nick 3[x]:10To go back
writeini players\ $+ $nick $+ .ini menu $nick L
halt
}
elseif ( $($+(%,xp.,$nick),2) >= $($+(%,mxp.,$nick),2) ) {
inc $+(%,mxp.,$nick) 423
writeini players\ $+ $nick $+ .ini mxp $nick $($+(%,mxp.,$nick),2)
set $+(%,xp.,$nick) 0
writeini players\ $+ $nick $+ .ini xp $nick $($+(%,xp.,$nick),2)
inc $+(%,level.,$nick) 1
writeini players\ $+ $nick $+ .ini level $nick $($+(%,level.,$nick),2)
inc $+(%,work.,$nick) 3
writeini players\ $+ $nick $+ .ini workouts $nick $($+(%,work.,$nick),2)
inc $+(%,mxhp.,$nick) 75
writeini players\ $+ $nick $+ .ini mxhp $nick $($+(%,mxhp.,$nick),2)
inc $+(%,bmhp.,$nick) 75
writeini players\ $+ $nick $+ .ini botmxhp $nick $($+(%,bmhp.,$nick),2)
inc $+(%,bat.,$nick) 10
set $+(%,mxmana.,$nick) $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
inc $+(%,mxmana.,$nick) 75
writeini players\ $+ $nick $+ .ini mxmana $nick $($+(%,mxmana.,$nick),2)
inc $+(%,bdef.,$nick) 10
writeini players\ $+ $nick $+ .ini battack $nick $($+(%,bat.,$nick),2)
writeini players\ $+ $nick $+ .ini bdefence $nick $($+(%,bdef.,$nick),2)
/aamsg 3 $+ $nick 10 has leveled up. Now level3 $readini( players\ $+ $nick $+ .ini , level , $nick )
msg =$nick 7You have gained a 10level. 7You have been given3 3 7workout points.
set $+(%,hp.,$nick) $($+(%,mxhp.,$nick),2)
/msg =$nick 10YouR 3HEALTH10 has been restored.
if ( $($+(%,level.,$nick),2) == 10 ) { set $+(%,title.,$nick) The Avenger | /aamsg 3 $+ $nick $+ 's 10 title has changed to7 $($+(%,title.,$nick),2) }
2 $nick
halt
}
}
alias loot1 {
if ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , id $+ $($+(%,bli.,$nick),2) , name )
set $+(%,bli1.,$nick) $($+(%,bli.,$nick),2)
set $+(%,bli.,$nick) 0
msg =$nick 10Your Item has been looted
2 $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) != - ) {
loot2 $nick
}
}
alias loot2 {
if ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , id $+ $($+(%,bli.,$nick),2) , name )
set $+(%,bli2.,$nick) $($+(%,bli.,$nick),2)
set $+(%,bli.,$nick) 0
msg =$nick 10Your Item has been looted
2 $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) != - ) {
loot3 $nick
}
}
alias loot3 {
if ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , id $+ $($+(%,bli.,$nick),2) , name )
set $+(%,bli3.,$nick) $($+(%,bli.,$nick),2)
set $+(%,bli.,$nick) 0
msg =$nick 10Your Item has been looted
2 $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) != - ) {
loot4 $nick
}
}
alias loot4 {
if ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , id $+ $($+(%,bli.,$nick),2) , name )
set $+(%,bli4.,$nick) $($+(%,bli.,$nick),2)
set $+(%,bli.,$nick) 0
msg =$nick 10Your Item has been looted
2 $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) != - ) {
loot5 $nick
}
}
alias loot5 {
if ($readini( players\ $+ $nick $+ .ini , slot5 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , id $+ $($+(%,bli.,$nick),2) , name )
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
set $+(%,bli.,$nick) 0
msg =$nick 10Your Item has been looted
2 $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot5 , $nick ) != - ) {
msg =$nick Your 10bag is full
halt
}
}
on 1:TEXT:!viewitem *:%chan:{
if ( $2 <= 0 ) {
msg %chan 3 $+ $nick $+ 10, Don't be a smart ass.
}
if ( $2 > 0 ) {
if ( $2 <= %itemmax ) {
msg %chan 10ITEM3 $2 $+ 10 ( NAME:3 $readini( items.ini , ID $+ $2 , name ) 10) 10( DISCRIPTION:3 $readini( items.ini , ID $+ $2 , discrip ) 10) ( PART:3 $readini( items.ini , id $+ $2 , part ) 10)
}
elseif ( $2 > %itemmax ) {
msg %chan 10That item does not exist.
}
}
}
on 1:TEXT:!items:%chan:{
msg %chan 10There are a total of3 %itemmax 10items in my database
}
##########################################################
End of File
##########################################################
##############
FILE NAME: ARENA
##############
on 1:chat:kill *:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) != loggedin ) { .msg =$nick 4The battle arena is currently unavailable | halt }
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == at ) {
if ($readini( players\ $+ $2 $+ .ini , seen , $2 ) != seen ) { msg =$nick 3 $+ $2 10does not exsist. Please Double check your spelling and try again | halt }
if ( $2 == $nick ) { msg =$nick 10Don't be a smart ass. | halt }
set $+(%,battle.,$nick) 0
set %tar $2
set $+(%,target.,$nick) $2
set $+(%,dmg.,$nick) $calc( $($+(%,defence.,$2),2) - $($+(%,attack.,$nick),2) )
set $+(%,dmg.,$2) $calc( $($+(%,defence.,$nick),2) - $($+(%,atttack.,$2),2) )
if ($readini( players\ $+ %tar $+ .ini , status , %tar ) == online ) { msg = $+ $+ %tar $nick is attacking you }
pattackt $nick
tattackp
}
elseif ($readini( players\ $+ $nick $+ .ini , menu , $nick ) != at ) {
msg =$nick Error 2032
}
}
alias arena {
msg =$nick -
msg =$nick 3[10The Battle arena3]
msg =$nick -
msg =$nick 3[4kill3]10: To kill someone ( example: kill noob )
msg =$nick -
msg =$nick 3[x]:10 back
writeini players\ $+ $nick $+ .ini menu $nick at
}
alias pattackt {
set $+(%,prand.,$nick) $rand(0,5)
inc $+(%,battle.,$nick) 1
if ( $($+(%,battle.,$nick),2) > 100 ) {
msg =$nick 4The battle ended in a Draw!
arena $nick
halt
}
elseif ( $($+(%,battle.,$nick),2) < 100 ) {
set $+(%,prand.,$nick) $rand(0,5)
if ($readini( players\ $+ $nick $+ .ini , life , $nick ) == alive ) {
if ($readini( players\ $+ %tar $+ .ini , life , %tar ) == alive ) {
if $($+(%,dmg.,$nick),2) >= 0 ) {
if ( $($+(%,dmg.,$nick),2) < $($+(%,hp.,%tar),2) ) {
dec $+(%,hp.,%tar) $($+(%,dmg.,$nick),2)
writeini players\ $+ %tar $+ .ini hp %tar $($+(%,hp.,%tar),2)
/msg =$nick 10You have attacked 3 %tar 10, dealing3 $($+(%,dmg.,$nick),2) 10damage. Decreasing their life to3 $readini( players\ $+ %tar $+ .ini , hp , %tar ) $+ / $+ $readini( players\ $+ %tar $+ .ini , mxhp , %tar )
tattackp $nick
halt
}
elseif ( $($+(%,dmg.,$nick),2) >= $($+(%,hp.,%tar),2) ) {
ptwon $nick
}
}
elseif ( $($+(%,dmg.,$nick),2) <= 0 ) {
if ( $($+(%,prand.,$nick),2) != 1 ) { msg =$nick 3 $+ %tar $+ 's 10defence is too great to penetrate | tattackp $nick }
if ( $($+(%,prand.,$nick),2) == 1 ) {
set $+(%,dmg.,$nick) $calc( $($+(%,dmg.,$nick),2) * -1 )
set $+(%,dmg.,$nick) $calc( $($+(%,dmg.,$nick),2) / 25 )
if ( $($+(%,dmg.,$nick),2) >= $($+(%,hp.,%tar),2) ) {
ptwon $nick
halt
}
elseif ( $($+(%,dmg.,$nick),2) < $($+(%,hp.,%tar),2) ) {
dec $+(%,hp.,%tar) $($+(%,dmg.,$nick),2)
writeini players\ $+ %tar $+ .ini hp %tar $($+(%,hp.,%tar),2)
/msg =$nick 10You have attacked 3 %tar 10, dealing3 $($+(%,dmg.,$nick),2) 10damage. Decreasing their life to3 $readini( players\ $+ %tar $+ .ini , hp , %tar ) $+ / $+ $readini( players\ $+ %tar $+ .ini , mxhp , %tar ) 10[ 4LUCKY HIT10 ]
tattackp $nick
halt
}
}
}
}
}
elseif ($readini( players\ $+ $nick $+ .ini , life , $nick ) != alive ) {
msg =$nick 10You are 3dead10. You cannot fight when you are 3dead10.
halt
}
}
}
alias tattackp {
inc $+(%,battle.,$nick) 1
set $+(%,brand.,$nick) $rand(0,5)
if ($readini( players\ $+ $nick $+ .ini , life , $nick ) == alive ) {
if ($readini( players\ $+ %tar $+ .ini , life , %tar ) == alive ) {
if $($+(%,dmg.,%tar),2) >= 0 ) {
if ( $($+(%,dmg.,%tar),2) < $($+(%,hp.,$nick),2) ) {
dec $+(%,hp.,$nick) $($+(%,dmg.,%tar),2)
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
/msg =$nick 3 $+ %tar 10has attacked you, dealing3 $($+(%,dmg.,%tar),2) 10damage. Decreasing your life to3 $readini( players\ $+ $nick $+ .ini , hp , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
pattackt $nick
halt
}
elseif ( $($+(%,dmg.,%tar),2) >= $($+(%,hp.,$nick),2) ) {
set $+(%,hp.,$nick) 0
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
writeini players\ $+ $nick $+ .ini life $nick dead
/msg =$nick 4You have been killed.
halt
}
}
elseif ( $($+(%,dmg.,%tar),2) <= 0 ) {
if ( $($+(%,brand.,$nick),2) != 1 ) { msg =$nick 10You successfully blocked %tar $+ 's attack | pattackt $nick }
if ( $($+(%,brand.,$nick),2) == 1 ) {
set $+(%,dmg.,%tar) $calc( $($+(%,dmg.,%tar),2) * -1 )
set $+(%,dmg.,%tar) $calc( $($+(%,dmg.,%tar),2) / 25 )
if ( $($+(%,dmg.,%tar),2) >= $($+(%,hp.,$nick),2) ) {
set $+(%,hp.,$nick) 0
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
writeini players\ $+ $nick $+ .ini life $nick dead
/msg =$nick 4You have been killed.
halt
}
elseif ( $($+(%,dmg.,%tar),2) < $($+(%,hp.,$nick),2) ) {
dec $+(%,hp.,$nick) $($+(%,dmg.,%tar),2)
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
/msg =$nick 3 $+ %tar 10has attacked you, dealing3 $($+(%,dmg.,%tar),2) 10damage. Decreasing your life to3 $readini( players\ $+ $nick $+ .ini , hp , $nick ) $+ / $+ $readini( players\ $+ $nick $+ .ini , mxhp , $nick ) 10[ 4LUCKY HIT10 ]
pattackt $nick
halt
}
}
}
}
elseif ($readini( players\ $+ %tar $+ .ini , life , %tar ) != alive ) {
msg =$nick 3 $+ %tar 10is dead, no point in attacking
halt
}
}
}
alias ptwon {
set $+(%,hp.,%tar) 0
writeini players\ $+ %tar $+ .ini hp %tar $($+(%,hp.,%tar),2)
writeini players\ $+ %tar $+ .ini life %tar dead
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick ) + 1.50 ) )
/msg =$nick 10You Have killed 3 $+ %tar 10with your last attack3 dealing $($+(%,dmg.,$nick),2) 10damage.
aamsg 3 $+ $nick 10has just killed %tar
msg = $+ %tar 3 $+ $nick 10Has just killed you
/msg =$nick 10You have looted3 1.50 10GOLD from3 %tar
inc $+(%,xp.,$nick) 40
if ( $($+(%,xp.,$nick),2) < $($+(%,mxp.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini xp $nick $($+(%,xp.,$nick),2)
msg =$nick 10Your Experience increased to3 $($+(%,xp.,$nick),2)
msg =$nick -
msg =$nick 3[kill]:10To fight someone else
msg =$nick -
msg =$nick 3[x]:10To go back
writeini players\ $+ $nick $+ .ini menu $nick at
arena $nick
halt
}
elseif ( $($+(%,xp.,$nick),2) >= $($+(%,mxp.,$nick),2) ) {
inc $+(%,mxp.,$nick) 50
writeini players\ $+ $nick $+ .ini mxp $nick $($+(%,mxp.,$nick),2)
set $+(%,xp.,$nick) 0
writeini players\ $+ $nick $+ .ini xp $nick $($+(%,xp.,$nick),2)
inc $+(%,level.,$nick) 1
writeini players\ $+ $nick $+ .ini level $nick $($+(%,level.,$nick),2)
inc $+(%,work.,$nick) 3
writeini players\ $+ $nick $+ .ini workouts $nick $($+(%,work.,$nick),2)
inc $+(%,mxhp.,$nick) 20
writeini players\ $+ $nick $+ .ini mxhp $nick $($+(%,mxhp.,$nick),2)
inc $+(%,bmhp.,$nick) 15
writeini players\ $+ $nick $+ .ini botmxhp $nick $($+(%,bmhp.,$nick),2)
inc $+(%,bat.,$nick) 10
inc $+(%,bdef.,$nick) 10
writeini players\ $+ $nick $+ .ini battack $nick $($+(%,bat.,$nick),2)
writeini players\ $+ $nick $+ .ini bdefence $nick $($+(%,bdef.,$nick),2)
/aamsg 3 $+ $nick 10 has leveled up. Now level3 $readini( players\ $+ $nick $+ .ini , level , $nick )
msg =$nick 10You have gained a 10level. You have been given3 3 10workout points.
set $+(%,hp.,$nick) $($+(%,mxhp.,$nick),2)
/msg =$nick 10YouR 3HEALTH10 has been restored.
arena $nick
halt
}
}
#################
End of File
#################
#################
FILE NAME:BOTBATTLE
#################
alias bplayer_attack {
set %rand $rand(0,5)
if ( $($+(%,Bblock.,$NICK),2) > $($+(%,block.,$nick),2) ) {
if ( %rand > 1 ) { msg =$nick 3 The BOT's 10's defence is too greate to penetrate! | BOT_attack $nick }
if ( %rand < 1 ) {
set $+(%,Bhp.,$NICK) $calc( $($+(%,Bhp.,$NICK),2) - $($+(%,dmg.,$nick),2) )
if ( $($+(%,Bhp.,$NICK),2) <= 0 ) { msg =$nick 3You have killed7 the BOT! | pwon $nick }
msg =$nick 10You hit3 the BOT 10for (3 $($+(%,dmg.,$nick),2) 10) reducing its life to3 $($+(%,hp.,$nick),2) $+ / $+ $($+(%,mxhp.,$nick),2)
writeini players\ $+ nick $+ .ini bothp $nick $($+(%,bhp.,$nick),2)
BOT_attack $nick
}
}
if ( $($+(%,block.,$nick),2) <= $($+(%,block.,$nick),2) ) {
set $+(%,Bhp.,$NICK) $calc( $($+(%,Bhp.,$NICK),2) - $($+(%,dmg.,$nick),2) )
if ( $($+(%,Bhp.,$NICK),2) <= 0 ) { msg =$nick 3You have killed7 the BOT! | pwon $nick }
msg =$nick 10You hit3 the BOT 10for (3 $($+(%,dmg.,$nick),2) 10) reducing its life to3 $($+(%,bhp.,$nick),2) $+ / $+ $($+(%,mxhp.,$nick),2)
writeini players\ $+ nick $+ .ini bothp $nick $($+(%,bhp.,$nick),2)
BOT_attack $nick
}
}
alias bot_attack {
set %rand $rand(0,5)
if ( $($+(%,block.,$nick),2) > $($+(%,bblock.,$nick),2) ) {
if ( %rand > 1 ) { msg =$nick 7You successfully defend the attack! | bplayer_attack $nick }
if ( %rand < 1 ) {
set $+(%,hp.,$nick) $calc( $($+(%,hp.,$nick),2) - $($+(%,bdmg.,$nick),2) )
if ( $($+(%,hp.,$nick),2) <= 0 ) { msg =$nick 4You have been killed by the BOT! | set $+(%,hp.,$nick) 0 | writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2) | writeini players\ $+ $nick $+ .ini life $nick dead | halt }
msg =$nick 10You got hit by3 The bot 10for (3 $($+(%,bdmg.,$nick),2) 10) reducing you life to3 $($+(%,hp.,$nick),2) $+ / $+ $($+(%,mxhp.,$nick),2)
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
bplayer_attack $nick
}
}
if ( $($+(%,block.,$nick),2) <= $($+(%,bblock.,$nick),2) ) {
set $+(%,hp.,$nick) $calc( $($+(%,hp.,$nick),2) - $($+(%,bdmg.,$nick),2) )
if ( $($+(%,hp.,$nick),2) <= 0 ) { msg =$nick 4You have been killed by the BOT! | set $+(%,hp.,$nick) 0 | writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2) | writeini players\ $+ $nick $+ .ini life $nick dead | halt }
msg =$nick 10You got hit by3 the BOT 10for (3 $($+(%,bdmg.,$nick),2) 10) reducing you life to3 $($+(%,hp.,$nick),2) $+ / $+ $($+(%,mxhp.,$nick),2)
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
bplayer_attack $nick
}
}
alias bplayer_won {
set $+(%,bhp.,$nick) 0
writeini players\ $+ $nick $+ .ini bhp $nick $($+(%,hp.,$nick),2)
writeini players\ $+ $nick $+ .ini botlife $nick dead
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick ) + 0.50 ) )
/msg =$nick 10You have looted3 1.50 10GOLD from3 the BOT
inc $+(%,xp.,$nick) 75
if ( $($+(%,xp.,$nick),2) < $($+(%,mxp.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini xp $nick $($+(%,xp.,$nick),2)
msg =$nick 10Your Experience increased to3 $($+(%,xp.,$nick),2)
2 $nick
halt
}
elseif ( $($+(%,xp.,$nick),2) >= $($+(%,mxp.,$nick),2) ) {
inc $+(%,mxp.,$nick) 230
writeini players\ $+ $nick $+ .ini mxp $nick $($+(%,mxp.,$nick),2)
set $+(%,xp.,$nick) 0
writeini players\ $+ $nick $+ .ini xp $nick $($+(%,xp.,$nick),2)
inc $+(%,level.,$nick) 1
writeini players\ $+ $nick $+ .ini level $nick $($+(%,level.,$nick),2)
inc $+(%,work.,$nick) 3
writeini players\ $+ $nick $+ .ini workouts $nick $($+(%,work.,$nick),2)
inc $+(%,mxhp.,$nick) 20
writeini players\ $+ $nick $+ .ini mxhp $nick $($+(%,mxhp.,$nick),2)
inc $+(%,bmhp.,$nick) 15
writeini players\ $+ $nick $+ .ini botmxhp $nick $($+(%,bmhp.,$nick),2)
inc $+(%,bat.,$nick) 10
inc $+(%,bdef.,$nick) 10
writeini players\ $+ $nick $+ .ini battack $nick $($+(%,bat.,$nick),2)
writeini players\ $+ $nick $+ .ini bdefence $nick $($+(%,bdef.,$nick),2)
/aamsg 3 $+ $nick 10 has leveled up. Now level3 $readini( players\ $+ $nick $+ .ini , level , $nick )
msg =$nick 7You have gained a 10level. 7You have been given3 3 7workout points.
set $+(%,hp.,$nick) $($+(%,mxhp.,$nick),2)
/msg =$nick 10YouR 3HEALTH10 has been restored.
2 $nick
halt
}
}
#############
END OF FILE
#############
###################
FILE NAME:CSIDE
###################
alias check_update {
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) == seen ) {
if ($readini( players\ $+ $nick $+ .ini , side , $nick ) == - ) { cside $nick }
if ($readini( players\ $+ $nick $+ .ini , side , $nick ) != - ) { main $nick }
}
if ($readini( players\ $+ $nick $+ .ini , seen , $nick ) != seen ) {
if ($readini( players\ $+ $nick $+ .ini , side , $nick ) == - ) { cside $nick }
if ($readini( players\ $+ $nick $+ .ini , side , $nick ) != - ) { create $nick }
}
}
alias cside {
msg =$nick -
msg =$nick 10[3Choose which side you want to be on10]
msg =$nick -
msg =$nick 3[1]:10 Order
msg =$nick 3[2]:10 Chaos
msg =$nick -
writeini players\ $+ $nick $+ .ini menu $nick cside
halt
}
alias cclass {
msg =$nick -
msg =$nick 10[3Class Creation10]
msg =$nick -
msg =$nick 3[1]:10Ninja ( Ninjas focus on their Strength to blow an enemy with Critcal hit or on their Vital points )
msg =$nick 3[2]:10Mage ( Mages Believe that the power of intelligence can conquer all )
msg =$nick 3[3]:10Knight ( The Knights go through the brutal training of mass strength and armor )
msg =$nick 3[4]:10Ranger ( Rangers Focus on their Ranged attacks and extreme FOCUS, even when swinging a sword, the enemy is no further away that the far reaches of the sword- nor any closer )
msg =$nick -
writeini players\ $+ $nick $+ .ini menu $nick cclass
halt
}
#############
END OF FILE
#############
###############
FILE NAME: GUILD
###############
on 1:CHAT:*:{
if ( $1 == 8 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == main ) {
writeini players\ $+ $nick $+ .ini menu $nick guild
guildm $nick
}
}
elseif ( $1 == create ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( guilds\ $+ $2 $+ .ini , $2 , name ) == $2 ) { .msg =$nick 10That guild already exists | halt }
if ($readini( guilds\ $+ $2 $+ .ini , $2 , name ) != $2 ) {
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < %guild_cost ) { .msg =$nick 10You do not have enough gold in your wallet to start your own Guild | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= %guild_cost ) { set %gc $2- | guildc $nick }
}
}
}
elseif ( $1 == join ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( guilds\ $+ $2 $+ .ini , $2 , name ) != $2 ) { .msg =$nick 10That guild does not exist | halt }
if ($readini( guilds\ $+ $2 $+ .ini , $2 , name ) == $2 ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) { .msg =$nick 10You are already own a guild or you are already in another guild | halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $readini( guilds\ $+ $2 $+ .ini , $2 , jmoney ) ) { .msg =$nick 10You do not have enough gold in your wallet to join this guild }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $readini( guilds\ $+ $2 $+ .ini , $2 , jmoney ) ) { set %gc $2- | guildj $nick }
}
}
}
elseif ( $1 == leave ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
writeini guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini $($+(%,gname.,$nick),2) mem $+ $readini( players\ $+ $nick $+ .ini , guildnum , $nick ) -
writeini players\ $+ $nick $+ .ini inguild $nick no
set %gn $($+(%,gname.,$nick),2)
dec $+(%,gtotm.,%gn) 1
if ( $($+(%,gtotm.,%gn),2) <= 0 ) { /remove -b guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini | aamsg 10[7GUILD10]3 $($+(%,gname.,$nick),2) 10has been deleted due to lack of members. (empty guild) }
set $+(%,gname.,$nick) NONE
guildm $nick
}
}
}
elseif ( $1 == donate ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $2- ) { .msg =$nick 10You do not have enough gold in your wallet to donate that much to the Guild }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $2- ) {
writeini guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini $($+(%,gname.,$nick),2) bank $calc( $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , bank ) + $2- )
writeini players\ $+ $nick $+ .ini gold $nick $calc( $readini( players\ $+ $nick $+ .ini , gold , $nick ) - $2- )
msg =$nick You have donated $2- Gold to $($+(%,gname.,$nick),2)
}
}
}
}
elseif ( $1 == info ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
Guild_info $nick
}
}
}
elseif ( $1 == members ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
msg =$nick 3[10Guild Memebers3]
msg =$nick -
msg =$nick 10OWNER:3 $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner )
msg =$nick 10CO-OWNER:3 $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cOwner )
msg =$nick 10CO-OWNER2:3 $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cOwner2 )
msg =$nick -
set %count_gmem 0
guild_members1 $nick
}
}
}
elseif ( $1 == ptco ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) {
if ( $($+(%,gname.,$2),2) != $($+(%,gname.,$nick),2) ) { .msg =$nick 10That person is not in your Guild }
if ( $($+(%,gname.,$2),2) == $($+(%,gname.,$nick),2) ) {
writeini guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini $($+(%,gname.,$nick),2) cowner $2
.msg =$nick 3 $+ $2 10has been promoted
aamsg 3 $+ $2 10has been promoted to co-owner of7 $($+(%,gname.,$nick),2)
}
}
}
}
}
elseif ( $1 == ptco2 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) {
if ( $($+(%,gname.,$2),2) != $($+(%,gname.,$nick),2) ) { .msg =$nick 10That person is not in your Guild }
if ( $($+(%,gname.,$2),2) == $($+(%,gname.,$nick),2) ) {
writeini guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini $($+(%,gname.,$nick),2) cowner2 -
.msg =$nick 3 $+ $2 10has been promoted
aamsg 3 $+ $2 10has been promoted to the second co-owner of7 $($+(%,gname.,$nick),2)
}
}
}
}
}
elseif ( $1 == kick ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) {
if ( $($+(%,gname.,$2),2) != $($+(%,gname.,$nick),2) ) { .msg =$nick 10That person is not in your Guild }
if ( $($+(%,gname.,$2),2) == $($+(%,gname.,$nick),2) ) {
writeini guilds\ $+ $($+(%,gname.,$2),2) $+ .ini $($+(%,gname.,$2),2) mem $+ $readini( players\ $+ $2 $+ .ini , guildnum , $2 ) -
writeini players\ $+ $2 $+ .ini inguild $2 no
.msg =$nick 3 $+ $2 10has been kicked from the guild
aamsg 3 $+ $2 10has been kicked out of7 $($+(%,gname.,$nick),2)
set $+(%,gname.,$2) NONE
guildm $nick
}
}
elseif ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cOwner ) == $nick ) {
if ( $($+(%,gname.,$2),2) != $($+(%,gname.,$nick),2) ) { .msg =$nick 10That person is not in your Guild }
if ( $($+(%,gname.,$2),2) == $($+(%,gname.,$nick),2) ) {
writeini guilds\ $+ $($+(%,gname.,$2),2) $+ .ini $($+(%,gname.,$2),2) mem $+ $readini( players\ $+ $2 $+ .ini , guildnum , $2 ) -
writeini players\ $+ $2 $+ .ini inguild $2 no
.msg =$nick 3 $+ $2 10has been kicked from the guild
aamsg 3 $+ $2 10has been kicked out of7 $($+(%,gname.,$nick),2)
set $+(%,gname.,$2) NONE
guildm $nick
}
}
elseif ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cOwner2 ) == $nick ) {
if ( $($+(%,gname.,$2),2) != $($+(%,gname.,$nick),2) ) { .msg =$nick 10That person is not in your Guild }
if ( $($+(%,gname.,$2),2) == $($+(%,gname.,$nick),2) ) {
writeini guilds\ $+ $($+(%,gname.,$2),2) $+ .ini $($+(%,gname.,$2),2) mem $+ $readini( players\ $+ $2 $+ .ini , guildnum , $2 ) -
writeini players\ $+ $2 $+ .ini inguild $2 no
.msg =$nick 3 $+ $2 10has been kicked from the guild
aamsg 3 $+ $2 10has been kicked out of7 $($+(%,gname.,$nick),2)
set $+(%,gname.,$2) NONE
guildm $nick
}
}
}
}
}
elseif ( $1 == jmoney ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) {
writeini guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini $($+(%,gname.,$nick),2) jmoney $2
.msg =$nick 10It'll now cost3 $2 10Gold to enter this guild
guildm $nick
}
elseif ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cOwner ) == $nick ) {
writeini guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini $($+(%,gname.,$nick),2) jmoney $2
.msg =$nick 10It'll now cost3 $2 10Gold to enter this guild
guildm $nick
}
}
}
}
elseif ( $1 == take ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == guild ) {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) {
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , bank ) < $2 ) { .msg =$nick 10The Guild does not have that much Gold }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , bank ) >= $2 ) {
writeini guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini $($+(%,gname.,$nick),2) bank $calc( $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , bank ) - $2- )
writeini players\ $+ $nick $+ .ini gold $nick $calc( $readini( players\ $+ $nick $+ .ini , gold , $nick ) + $2- )
guildm $nick
}
}
elseif ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cOwner ) == $nick ) {
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , bank ) < $2 ) { .msg =$nick 10The Guild does not have that much Gold }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , bank ) >= $2 ) {
writeini guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini $($+(%,gname.,$nick),2) bank $calc( $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , bank ) - $2- )
writeini players\ $+ $nick $+ .ini gold $nick $calc( $readini( players\ $+ $nick $+ .ini , gold , $nick ) + $2- )
guildm $nick
}
}
}
}
}
}
alias guildm {
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) == yes ) {
msg =$nick -
msg =$nick 10[3 $+ $($+(%,gname.,$nick),2) $+ 10]
msg =$nick -
msg =$nick 10Guild Messege of the day:3 $readini( Guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , motd )
msg =$nick -
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) { msg =$nick 3[Ptco]:10 To promote someone to co-owner }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) { msg =$nick 3[Ptco2]:10 To promote someone to co-owner2 }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) { msg =$nick 3[kick]:10 To kick someone out of the Guild }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) { msg =$nick 3[jmoney]:10 To change the amount of Gold a player needs to pay to join the guild }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , Owner ) == $nick ) { msg =$nick 3[take]:10 To take money of the guild }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cowner2 ) == $nick ) { msg =$nick 3[kick]:10 To kick someone out of the Guild }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cowner ) == $nick ) { msg =$nick 3[jmoney]:10 To change the amount of Gold a player needs to pay to join the guild }
if ($readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , cowner ) == $nick ) { msg =$nick 3[take]:10 To take money of the guild }
msg =$nick -
msg =$nick 3[Info]:10 To see information on the Guild
msg =$nick 3[members]:10 For the list on all current members and their guild ranks
msg =$nick 3[donate <x>]:10 To donate Gold to the Guild ( Syntax: donate 50 )
msg =$nick 3[leave]:10 To leave the guild
msg =$nick -
msg =$nick 3[x]:10 To go back
halt
}
if ($readini( players\ $+ $nick $+ .ini , inguild , $nick ) != yes ) {
msg =$nick -
msg =$nick 3[10Create of Join a Guild3]
msg =$nick -
msg =$nick 10You are not currently in a guild. So you may either join one, or create one yourself
msg =$nick -
set %cgc $calc( %guild_cost - ($readini( players\ $+ $nick $+ .ini , gold , $nick )) )
if ( %cgc <= 0 ) { .msg =$nick 10You need3 0 7GOLD10 to create a new Guild }
if ( %cgc > 0 ) { .msg =$nick 10You need3 %cgc 7GOLD10 to create a new Guild }
msg =$nick -
msg =$nick 3[Create <x>]:10 To create your Guild ( Syntax: Create The_avangers ) (Your guild name must be one word!)
msg =$nick -
msg =$nick 3[Join <x>]:10 To join an existing Guild ( Syntax: join The_avangers ) (The guild name must be one word!)
msg =$nick -
msg =$nick 3[x]:10 To go back
msg =$nick -
halt
}
}
alias guild_info {
msg =$nick -
msg =$nick 3[10INFO ON7 $($+(%,gname.,$nick),2) 3]
msg =$nick -
msg =$nick 10NAME:3 $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , name )
msg =$nick 10GOLD IN BANK:3 $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , bank )
msg =$nick 10TOTAL MEMBERS:3 $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , totalmem )
msg =$nick 10TOTAL WINS:3 $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , totwin )
msg =$nick 10TOTAL LOSSES:3 $readini( guilds\ $+ $($+(%,gname.,$nick),2) $+ .ini , $($+(%,gname.,$nick),2) , totloss )
msg =$nick -
msg =$nick 3[x]:10 back
msg =$nick -
halt
}
alias Guildc {
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick )) - %guild_cost )
writeini guilds\ $+ %gc $+ .ini %gc name %gc
writeini guilds\ $+ %gc $+ .ini %gc bank 0
set $+(%,gtot.,%gc) 0
inc $+(%,gtot.,%gc) 1
inc $+(%,gtotm.,%gc) 1
set $+(%,gname.,$nick) %gc
writeini players\ $+ $nick $+ .ini guildnom $nick $($+(%,gtot.,%gc),2)
writeini guilds\ $+ %gc $+ .ini %gc totalmem $($+(%,gtot.,%gc),2)
writeini guilds\ $+ %gc $+ .ini %gc owner $nick
writeini guilds\ $+ %gc $+ .ini %gc cowner -
writeini guilds\ $+ %gc $+ .ini %gc cowner2 -
writeini guilds\ $+ %gc $+ .ini %gc jmoney 0
writeini guilds\ $+ %gc $+ .ini %gc totwin 0
writeini guilds\ $+ %gc $+ .ini %gc totloss 0
writeini guilds\ $+ %gc $+ .ini %gc motd -
writeini guilds\ $+ %gc $+ .ini %gc mem $+ $($+(%,gtot.,%gc),2) $nick
writeini players\ $+ $nick $+ .ini guildnum $nick $readini( guilds\ $+ %gc $+ .ini , %gc , totalmem )
writeini players\ $+ $nick $+ .ini inguild $nick yes
aamsg 10[7GUILD10] 10New guild10(7 $+ $($+(%,gname.,$nick),2) $+ 10) 10Created by3 $nick
set $+(%,title.,$nick) Representing
aamsg 10[7TITLE10]:3 $nick 10has earned a new title,7 $($+(%,title.,$nick),2)
msg =$nick -
guildm $nick
}
alias Guild_members1 {
set %gmem $($+(%,gname.,$nick),2)
inc %count_gmem 1
if ($readini( guilds\ $+ %gmem $+ .ini , %gmem , totalmem ) <= %count_gmem ) { .msg =$nick 3 $+ $readini( guilds\ $+ %gmem $+ .ini , %gmem , mem $+ $($+(%,gtot.,%gmem),2) ) | halt }
if ($readini( guilds\ $+ %gmem $+ .ini , %gmem , totalmem ) > %count_gmem ) { .msg =$nick 3 $+ $readini( guilds\ $+ %gmem $+ .ini , %gmem , mem $+ %count_gmem ) }
Guild_members2 $nick
}
alias Guild_members2 {
set %gmem $($+(%,gname.,$nick),2)
inc %count_gmem 1
if ($readini( guilds\ $+ %gmem $+ .ini , %gmem , totalmem ) <= %count_gmem ) { .msg =$nick 3 $+ $readini( guilds\ $+ %gmem $+ .ini , %gmem , mem $+ $($+(%,gtot.,%gmem),2) ) | halt }
if ($readini( guilds\ $+ %gmem $+ .ini , %gmem , totalmem ) > %count_gmem ) { .msg =$nick 3 $+ $readini( guilds\ $+ %gmem $+ .ini , %gmem , mem $+ %count_gmem ) }
Guild_members1 $nick
}
alias guildj {
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick )) - ($readini( guilds\ $+ %gc $+ .ini , %gc , jmoney )) )
inc $+(%,gtot.,%gc) 1
inc $+(%,gtotm.,%gc) 1
writeini players\ $+ $nick $+ .ini guildnom $nick $($+(%,gtot.,%gc),2)
writeini guilds\ $+ %gc $+ .ini %gc totalmem $($+(%,gtot.,%gc),2)
writeini guilds\ $+ %gc $+ .ini %gc mem $+ $($+(%,gtot.,%gc),2) $nick
writeini players\ $+ $nick $+ .ini inguild $nick yes
set $+(%,gname.,$nick) %gc
guildm $nick
}
####################
END OF FILE
####################
FILE NAME: ICF
####################
on 1:chat:IC *:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
if ( $2 == equipt ) {
if ( $3 == hand1 ) {
inc %itemmax 1
writeini items.ini id $+ %itemmax type1 $2
writeini items.ini id $+ %itemmax usage use
writeini items.ini id $+ %itemmax part $3
writeini items.ini id $+ %itemmax stats $4
writeini items.ini id $+ %itemmax name $5-
writeini items.ini id $+ %itemmax discrip Increases your Attack by $readini( items.ini , id $+ %itemmax , stats )
msg =$nick 10ITEM:3 %itemmax 10has been created successfully: (NAME:3 $readini( items.ini , id $+ %itemmax , name ) 10) ( DISCRIPTION:3 $readini( items.ini , id $+ %itemmax , discrip ) 10)
aamsg 3This Just in: 10New Item created ( ITEM:3 %itemmax 10) (NAME:3 $readini( items.ini , id $+ %itemmax , name ) 10) ( DISCRIPTION:3 $readini( items.ini , id $+ %itemmax , discrip ) 10)
halt
}
elseif ( $3 == hand2 ) {
inc %itemmax 1
writeini items.ini id $+ %itemmax type1 $2
writeini items.ini id $+ %itemmax usage use
writeini items.ini id $+ %itemmax part $3
writeini items.ini id $+ %itemmax stats $4
writeini items.ini id $+ %itemmax name $5-
writeini items.ini id $+ %itemmax discrip Increases your Attack by $readini( items.ini , id $+ %itemmax , stats )
msg =$nick 10ITEM:3 %itemmax 10has been created successfully: (NAME:3 $readini( items.ini , id $+ %itemmax , name ) 10) ( DISCRIPTION:3 $readini( items.ini , id $+ %itemmax , discrip ) 10)
aamsg 3This Just in: 10New Item created ( ITEM:3 %itemmax 10) (NAME:3 $readini( items.ini , id $+ %itemmax , name ) 10) ( DISCRIPTION:3 $readini( items.ini , id $+ %itemmax , discrip ) 10)
halt
}
inc %itemmax 1
writeini items.ini id $+ %itemmax type1 $2
writeini items.ini id $+ %itemmax usage use
writeini items.ini id $+ %itemmax part $3
writeini items.ini id $+ %itemmax stats $4
writeini items.ini id $+ %itemmax name $5-
writeini items.ini id $+ %itemmax discrip Increases your Defence by $readini( items.ini , id $+ %itemmax , stats )
msg =$nick 10ITEM:3 %itemmax 10has been created successfully: (NAME:3 $readini( items.ini , id $+ %itemmax , name ) 10) ( DISCRIPTION:3 $readini( items.ini , id $+ %itemmax , discrip ) 10)
aamsg 3This Just in: 10New Item created ( ITEM:3 %itemmax 10) (NAME:3 $readini( items.ini , id $+ %itemmax , name ) 10) ( DISCRIPTION:3 $readini( items.ini , id $+ %itemmax , discrip ) 10)
}
elseif ( $2 != equipt ) {
inc %itemmax 1
writeini items.ini id $+ %itemmax type1 $2
writeini items.ini id $+ %itemmax usage use
writeini items.ini id $+ %itemmax part $3
writeini items.ini id $+ %itemmax stats $4
writeini items.ini id $+ %itemmax name $5-
writeini items.ini id $+ %itemmax discrip Increases your $readini( items.ini , id $+ %itemmax , type1 ) by $readini( items.ini , id $+ %itemmax , stats )
msg =$nick 10ITEM:3 %itemmax 10has been created successfully: (NAME:3 $readini( items.ini , id $+ %itemmax , name ) 10) ( DISCRIPTION:3 $readini( items.ini , id $+ %itemmax , discrip ) 10)
aamsg 3This Just in: 10New Item created ( ITEM:3 %itemmax 10) (NAME:3 $readini( items.ini , id $+ %itemmax , name ) 10) ( DISCRIPTION:3 $readini( items.ini , id $+ %itemmax , discrip ) 10)
}
}
elseif ($readini( players\ $+ $nick $+ .ini , admin , $nick ) != loggedin ) {
msg =$nick 10You do not have the needed access to perform this command...
}
}
on 1:CHAT:ICF:{
ICF $nick
}
alias ICF {
msg =$nick -
msg =$nick 3[ITEM CREATE INFO]
msg =$nick -
msg =$nick 3[NOTE]:10 Make lots of weak items first before you make a strong one.
msg =$nick 10Try and make 1 strong item for every 15 weak ones. This will allow
msg =$nick 10a lower possibility of a level 1 player to pick up an epic weapon
msg =$nick -
msg =$nick 10Okay, You need to focus now, should you 3fuck10 this up, I will remove your account and
msg =$nick 10place a perm ban on you.
msg =$nick -
msg =$nick 10To create the item you need to type:3 ic 10<3health10/3mana10/3equipt10> <3head10/3chest10/3arms10/3legs10/3feet10/3hand110(this is for left hand)10/3hand210(This is used for right hand)10 or if this is a potion use "3NONE10" > <3any number10 for the 3stats10(how much should increase whatever by> <3and the name10>
msg =$nick -
msg =$nick 4DO NOT USE THE >, < OR " LEAVE THEM THE FUCK OUT!!!
msg =$nick -
msg =$nick 3Example1:10 IC mana - 20 Mana potion
msg =$nick 3Example2:10 IC health - 40 Health potion
msg =$nick 3Example3:10 IC equipt chest 121 Simple Leather Vest
msg =$nick -
}
alias showitems1 {
inc $+(%,show.,$nick) 1
if ( $($+(%,show.,$nick),2) >= %itemmax ) { msg =$nick 10ITEM3 $($+(%,show.,$nick),2) $+ 10 ( NAME:3 $readini( items.ini , ID $+ $($+(%,show.,$nick),2) , name ) 10) 10( DISCRIPTION:3 $readini( items.ini , ID $+ $($+(%,show.,$nick),2) , discrip ) 10) ( PART:3 $readini( items.ini , id $+ $($+(%,show.,$nick),2) , part ) 10) | msg =$nick 10End of list | halt }
if ( $($+(%,show.,$nick),2) < %itemmax ) {
msg =$nick -
msg =$nick 10ITEM3 $($+(%,show.,$nick),2) $+ 10 ( NAME:3 $readini( items.ini , ID $+ $($+(%,show.,$nick),2) , name ) 10) 10( DISCRIPTION:3 $readini( items.ini , ID $+ $($+(%,show.,$nick),2) , discrip ) 10) ( PART:3 $readini( items.ini , id $+ $($+(%,show.,$nick),2) , part ) 10)
showitems2 $nick
}
}
alias showitems2 {
inc $+(%,show.,$nick) 1
if ( $($+(%,show.,$nick),2) >= %itemmax ) { msg =$nick 10ITEM3 $($+(%,show.,$nick),2) $+ 10 ( NAME:3 $readini( items.ini , ID $+ $($+(%,show.,$nick),2) , name ) 10) 10( DISCRIPTION:3 $readini( items.ini , ID $+ $($+(%,show.,$nick),2) , discrip ) 10) ( PART:3 $readini( items.ini , id $+ $($+(%,show.,$nick),2) , part ) 10) | msg =$nick 10End of list | halt }
if ( $($+(%,show.,$nick),2) < %itemmax ) {
msg =$nick -
msg =$nick 10ITEM3 $($+(%,show.,$nick),2) $+ 10 ( NAME:3 $readini( items.ini , ID $+ $($+(%,show.,$nick),2) , name ) 10) 10( DISCRIPTION:3 $readini( items.ini , ID $+ $($+(%,show.,$nick),2) , discrip ) 10) ( PART:3 $readini( items.ini , id $+ $($+(%,show.,$nick),2) , part ) 10)
showitems1 $nick
}
}
#############
END OF FILE
#############
FILE NAME:ITEM USE
#############
alias IU1 {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) != - ) {
if ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , usage ) == use ) {
if ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , type1 ) == health ) {
inc $+(%,hp.,$nick) $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , stats ) {
if ( $($+(%,hp.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxhp , $nick ) ) {
writeini players\ $+ $nick $+ .ini hp $nick $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
set $+(%,hp.,$nick) $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini life $nick alive
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxhp , $nick ) > $($+(%,hp.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
writeini players\ $+ $nick $+ .ini life $nick alive
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , type1 ) == mana ) {
inc $+(%,mana.,$nick) $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , stats ) {
if ( $($+(%,mana.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) ) {
writeini players\ $+ $nick $+ .ini mana $nick $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
set $+(%,mana.,$nick) $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxmana , $nick ) > $($+(%,mana.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini mana $nick $($+(%,mana.,$nick),2)
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , type1 ) == equipt ) {
if ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , part ) == head ) {
if ($readini( players\ $+ $nick $+ .ini , head , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , name )
set $+(%,head.,$nick) $($+(%,bli1.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , head , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , head , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , name )
set $+(%,heade.,$nick) $($+(%,bli1.,$nick),2)
set $+(%,bli1.,$nick) $($+(%,head.,$nick),2)
set $+(%,head.,$nick) $($+(%,heade.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , head , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot1 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , part ) == chest ) {
if ($readini( players\ $+ $nick $+ .ini , chest , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , name )
set $+(%,chest.,$nick) $($+(%,bli1.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , chest , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , chest , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , name )
set $+(%,cheste.,$nick) $($+(%,bli1.,$nick),2)
set $+(%,bli1.,$nick) $($+(%,chest.,$nick),2)
set $+(%,chest.,$nick) $($+(%,cheste.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , chest , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot1 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , part ) == arms ) {
if ($readini( players\ $+ $nick $+ .ini , arms , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , name )
set $+(%,arms.,$nick) $($+(%,bli1.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , arms , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , arms , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , name )
set $+(%,armse.,$nick) $($+(%,bli1.,$nick),2)
set $+(%,bli1.,$nick) $($+(%,arms.,$nick),2)
set $+(%,arms.,$nick) $($+(%,armse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , arms , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot1 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , part ) == legs ) {
if ($readini( players\ $+ $nick $+ .ini , legs , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , name )
set $+(%,legs.,$nick) $($+(%,bli1.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , legs , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , legs , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , name )
set $+(%,legse.,$nick) $($+(%,bli1.,$nick),2)
set $+(%,bli1.,$nick) $($+(%,legs.,$nick),2)
set $+(%,feet.,$nick) $($+(%,legse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , legs , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot1 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , part ) == feet ) {
if ($readini( players\ $+ $nick $+ .ini , feet , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , name )
set $+(%,feet.,$nick) $($+(%,bli1.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , feet , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , feet , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , name )
set $+(%,feete.,$nick) $($+(%,bli1.,$nick),2)
set $+(%,bli1.,$nick) $($+(%,feet.,$nick),2)
set $+(%,feet.,$nick) $($+(%,feete.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , feet , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot1 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , part ) == hand1 ) {
if ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , name )
set $+(%,hand1.,$nick) $($+(%,bli1.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , name )
set $+(%,hand1e.,$nick) $($+(%,bli1.,$nick),2)
set $+(%,bli1.,$nick) $($+(%,hand1.,$nick),2)
set $+(%,hand1.,$nick) $($+(%,hand1e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , part ) == hand2 ) {
if ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , name )
set $+(%,hand2.,$nick) $($+(%,bli1.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , ID $+ $($+(%,bli1.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , name )
set $+(%,hand2e.,$nick) $($+(%,bli1.,$nick),2)
set $+(%,bli1.,$nick) $($+(%,hand2.,$nick),2)
set $+(%,hand1.,$nick) $($+(%,hand2e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
halt
}
}
}
}
}
}
elseif ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) == - ) {
msg =$nick You do not have an item in that slot
halt
}
}
alias IU2 {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) != - ) {
if ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , usage ) == use ) {
if ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , type1 ) == health ) {
inc $+(%,hp.,$nick) $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , stats ) {
if ( $($+(%,hp.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxhp , $nick ) ) {
writeini players\ $+ $nick $+ .ini hp $nick $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
set $+(%,hp.,$nick) $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini life $nick alive
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxhp , $nick ) > $($+(%,hp.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
writeini players\ $+ $nick $+ .ini life $nick alive
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , type1 ) == mana ) {
inc $+(%,mana.,$nick) $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , stats ) {
if ( $($+(%,mana.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) ) {
writeini players\ $+ $nick $+ .ini mana $nick $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
set $+(%,mana.,$nick) $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxmana , $nick ) > $($+(%,mana.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini mana $nick $($+(%,mana.,$nick),2)
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , type1 ) == equipt ) {
if ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , part ) == head ) {
if ($readini( players\ $+ $nick $+ .ini , head , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , name )
set $+(%,head.,$nick) $($+(%,bli2.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , head , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , head , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , name )
set $+(%,heade.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,head.,$nick),2)
set $+(%,head.,$nick) $($+(%,heade.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , head , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot2 , $nick ) (which has been placed in your bag)
halt
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , part ) == chest ) {
if ($readini( players\ $+ $nick $+ .ini , chest , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , name )
set $+(%,chest.,$nick) $($+(%,bli2.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , chest , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , chest , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , name )
set $+(%,cheste.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,chest.,$nick),2)
set $+(%,chest.,$nick) $($+(%,cheste.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , chest , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot2 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , part ) == arms ) {
if ($readini( players\ $+ $nick $+ .ini , arms , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , name )
set $+(%,arms.,$nick) $($+(%,bli2.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , arms , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , arms , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , name )
set $+(%,armse.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,arms.,$nick),2)
set $+(%,arms.,$nick) $($+(%,armse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , arms , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot2 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , part ) == legs ) {
if ($readini( players\ $+ $nick $+ .ini , legs , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , name )
set $+(%,legs.,$nick) $($+(%,bli2.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , legs , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , legs , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , name )
set $+(%,legse.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,legs.,$nick),2)
set $+(%,feet.,$nick) $($+(%,legse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , legs , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot2 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , part ) == feet ) {
if ($readini( players\ $+ $nick $+ .ini , feet , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , name )
set $+(%,feet.,$nick) $($+(%,bli2.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , feet , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , feet , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , name )
set $+(%,feete.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,feet.,$nick),2)
set $+(%,feet.,$nick) $($+(%,feete.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , feet , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot2 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , part ) == hand1 ) {
if ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , name )
set $+(%,hand1.,$nick) $($+(%,bli2.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , name )
set $+(%,hand1e.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,hand1.,$nick),2)
set $+(%,hand1.,$nick) $($+(%,hand1e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , part ) == hand2 ) {
if ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , name )
set $+(%,hand2.,$nick) $($+(%,bli2.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , ID $+ $($+(%,bli2.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , name )
set $+(%,hand2e.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,hand2.,$nick),2)
set $+(%,hand2.,$nick) $($+(%,hand2e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
halt
}
}
}
}
}
}
elseif ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) == - ) {
msg =$nick You do not have an item in that slot
halt
}
}
alias IU3 {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) != - ) {
if ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , usage ) == use ) {
if ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , type1 ) == health ) {
inc $+(%,hp.,$nick) $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , stats ) {
if ( $($+(%,hp.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxhp , $nick ) ) {
writeini players\ $+ $nick $+ .ini hp $nick $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
set $+(%,hp.,$nick) $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini life $nick alive
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxhp , $nick ) > $($+(%,hp.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
writeini players\ $+ $nick $+ .ini life $nick alive
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , type1 ) == mana ) {
inc $+(%,mana.,$nick) $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , stats ) {
if ( $($+(%,mana.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) ) {
writeini players\ $+ $nick $+ .ini mana $nick $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
set $+(%,mana.,$nick) $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxmana , $nick ) > $($+(%,mana.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini mana $nick $($+(%,mana.,$nick),2)
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , type1 ) == equipt ) {
if ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , part ) == head ) {
if ($readini( players\ $+ $nick $+ .ini , head , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , name )
set $+(%,head.,$nick) $($+(%,bli3.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , head , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , head , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , name )
set $+(%,heade.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,head.,$nick),2)
set $+(%,head.,$nick) $($+(%,heade.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , head , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot3 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , part ) == chest ) {
if ($readini( players\ $+ $nick $+ .ini , chest , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , name )
set $+(%,chest.,$nick) $($+(%,bli3.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , chest , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , chest , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , name )
set $+(%,cheste.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,chest.,$nick),2)
set $+(%,chest.,$nick) $($+(%,cheste.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , chest , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot3 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , part ) == arms ) {
if ($readini( players\ $+ $nick $+ .ini , arms , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , name )
set $+(%,arms.,$nick) $($+(%,bli3.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , arms , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , arms , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , name )
set $+(%,armse.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,arms.,$nick),2)
set $+(%,arms.,$nick) $($+(%,armse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , arms , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot3 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , part ) == legs ) {
if ($readini( players\ $+ $nick $+ .ini , legs , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , name )
set $+(%,legs.,$nick) $($+(%,bli3.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , legs , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , legs , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , name )
set $+(%,legse.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,legs.,$nick),2)
set $+(%,feet.,$nick) $($+(%,legse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , legs , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot3 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , part ) == feet ) {
if ($readini( players\ $+ $nick $+ .ini , feet , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , name )
set $+(%,feet.,$nick) $($+(%,bli3.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , feet , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , feet , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , name )
set $+(%,feete.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,feet.,$nick),2)
set $+(%,feet.,$nick) $($+(%,feete.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , feet , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot3 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , part ) == hand1 ) {
if ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , name )
set $+(%,hand1.,$nick) $($+(%,bli3.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , name )
set $+(%,hand1e.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,hand1.,$nick),2)
set $+(%,hand1.,$nick) $($+(%,hand1e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , part ) == hand2 ) {
if ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , name )
set $+(%,hand2.,$nick) $($+(%,bli3.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , ID $+ $($+(%,bli3.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , name )
set $+(%,hand2e.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,hand2.,$nick),2)
set $+(%,hand2.,$nick) $($+(%,hand2e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
halt
}
}
}
}
}
}
elseif ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) == - ) {
msg =$nick You do not have an item in that slot
halt
}
}
alias IU4 {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) != - ) {
if ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , usage ) == use ) {
if ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , type1 ) == health ) {
inc $+(%,hp.,$nick) $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , stats ) {
if ( $($+(%,hp.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxhp , $nick ) ) {
writeini players\ $+ $nick $+ .ini hp $nick $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
set $+(%,hp.,$nick) $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini life $nick alive
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxhp , $nick ) > $($+(%,hp.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
writeini players\ $+ $nick $+ .ini life $nick alive
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , type1 ) == mana ) {
inc $+(%,mana.,$nick) $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , stats ) {
if ( $($+(%,mana.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) ) {
writeini players\ $+ $nick $+ .ini mana $nick $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
set $+(%,mana.,$nick) $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxmana , $nick ) > $($+(%,mana.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini mana $nick $($+(%,mana.,$nick),2)
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , type1 ) == equipt ) {
if ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , part ) == head ) {
if ($readini( players\ $+ $nick $+ .ini , head , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , name )
set $+(%,head.,$nick) $($+(%,bli4.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , head , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , head , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , name )
set $+(%,heade.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,head.,$nick),2)
set $+(%,head.,$nick) $($+(%,heade.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , head , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot4 , $nick ) (which has been placed in your bag)
halt
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , part ) == chest ) {
if ($readini( players\ $+ $nick $+ .ini , chest , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , name )
set $+(%,chest.,$nick) $($+(%,bli4.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , chest , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , chest , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , name )
set $+(%,cheste.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,chest.,$nick),2)
set $+(%,chest.,$nick) $($+(%,cheste.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , chest , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot4 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , part ) == arms ) {
if ($readini( players\ $+ $nick $+ .ini , arms , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , name )
set $+(%,arms.,$nick) $($+(%,bli4.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , arms , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , arms , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , name )
set $+(%,armse.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,arms.,$nick),2)
set $+(%,arms.,$nick) $($+(%,armse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , arms , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot4 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , part ) == legs ) {
if ($readini( players\ $+ $nick $+ .ini , legs , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , name )
set $+(%,legs.,$nick) $($+(%,bli4.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , legs , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , legs , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , name )
set $+(%,legse.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,legs.,$nick),2)
set $+(%,feet.,$nick) $($+(%,legse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , legs , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot4 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , part ) == feet ) {
if ($readini( players\ $+ $nick $+ .ini , feet , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , name )
set $+(%,feet.,$nick) $($+(%,bli4.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , feet , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , feet , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , name )
set $+(%,feete.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,feet.,$nick),2)
set $+(%,feet.,$nick) $($+(%,feete.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , feet , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot4 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , part ) == hand1 ) {
if ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , name )
set $+(%,hand1.,$nick) $($+(%,bli4.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , name )
set $+(%,hand1e.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,hand1.,$nick),2)
set $+(%,hand1.,$nick) $($+(%,hand1e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , part ) == hand2 ) {
if ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , name )
set $+(%,hand2.,$nick) $($+(%,bli4.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , ID $+ $($+(%,bli4.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , name )
set $+(%,hand2e.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,hand2.,$nick),2)
set $+(%,hand2.,$nick) $($+(%,hand2e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
halt
}
}
}
}
}
}
elseif ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) == - ) {
msg =$nick You do not have an item in that slot
halt
}
}
alias IU5 {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot5 , $nick ) != - ) {
if ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , usage ) == use ) {
if ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , type1 ) == health ) {
inc $+(%,hp.,$nick) $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , stats ) {
if ( $($+(%,hp.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxhp , $nick ) ) {
writeini players\ $+ $nick $+ .ini hp $nick $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
set $+(%,hp.,$nick) $readini( players\ $+ $nick $+ .ini , mxhp , $nick )
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini life $nick alive
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxhp , $nick ) > $($+(%,hp.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini hp $nick $($+(%,hp.,$nick),2)
msg =$nick Your health was healed by $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
writeini players\ $+ $nick $+ .ini life $nick alive
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , type1 ) == mana ) {
inc $+(%,mana.,$nick) $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , stats ) {
if ( $($+(%,mana.,$nick),2) >= $readini( players\ $+ $nick $+ .ini , mxmana , $nick ) ) {
writeini players\ $+ $nick $+ .ini mana $nick $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
set $+(%,mana.,$nick) $readini( players\ $+ $nick $+ .ini , mxmana , $nick )
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , mxmana , $nick ) > $($+(%,mana.,$nick),2) ) {
writeini players\ $+ $nick $+ .ini mana $nick $($+(%,mana.,$nick),2)
msg =$nick Your mana was restored by $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , type1 ) == equipt ) {
if ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , part ) == head ) {
if ($readini( players\ $+ $nick $+ .ini , head , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , name )
set $+(%,head.,$nick) $($+(%,bli5.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , head , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,head.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , head , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini head $nick $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , ID $+ $($+(%,head.,$nick),2) , name )
set $+(%,heade.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,head.,$nick),2)
set $+(%,head.,$nick) $($+(%,heade.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , head , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot5 , $nick ) (which has been placed in your bag)
halt
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , part ) == chest ) {
if ($readini( players\ $+ $nick $+ .ini , chest , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , name )
set $+(%,chest.,$nick) $($+(%,bli5.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , chest , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,chest.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , chest , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini chest $nick $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , ID $+ $($+(%,chest.,$nick),2) , name )
set $+(%,cheste.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,chest.,$nick),2)
set $+(%,chest.,$nick) $($+(%,cheste.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , chest , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot5 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , part ) == arms ) {
if ($readini( players\ $+ $nick $+ .ini , arms , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , name )
set $+(%,arms.,$nick) $($+(%,bli5.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , arms , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,arms.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , arms , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini arms $nick $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , ID $+ $($+(%,arms.,$nick),2) , name )
set $+(%,armse.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,arms.,$nick),2)
set $+(%,arms.,$nick) $($+(%,armse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , arms , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot5 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , part ) == legs ) {
if ($readini( players\ $+ $nick $+ .ini , legs , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , name )
set $+(%,legs.,$nick) $($+(%,bli5.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , legs , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,legs.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , legs , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini legs $nick $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , ID $+ $($+(%,legs.,$nick),2) , name )
set $+(%,legse.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,legs.,$nick),2)
set $+(%,feet.,$nick) $($+(%,legse.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , legs , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot5 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , part ) == feet ) {
if ($readini( players\ $+ $nick $+ .ini , feet , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , name )
set $+(%,feet.,$nick) $($+(%,bli5.,$nick),2)
inc $+(%,armor.,$nick) $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
msg =$nick 10You have equited3 $readini( players\ $+ $nick $+ .ini , feet , $nick ) 10and increased your armor by3 $readini( items.ini , id $+ $($+(%,feet.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , feet , $nick ) != - ) {
dec $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , stats )
inc $+(%,armor.,$nick) $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini armor $nick $($+(%,armor.,$nick),2)
writeini players\ $+ $nick $+ .ini feet $nick $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , ID $+ $($+(%,feet.,$nick),2) , name )
set $+(%,feete.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,feet.,$nick),2)
set $+(%,feet.,$nick) $($+(%,feete.,$nick),2)
msg =$nick 7You have equipted $readini( players\ $+ $nick $+ .ini , feet , $nick ) and replaced it with $readini( players\ $+ $nick $+ .ini , slot5 , $nick ) (which has been placed in your bag)
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , part ) == hand1 ) {
if ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , name )
set $+(%,hand1.,$nick) $($+(%,bli5.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand1 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand1 $nick $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , ID $+ $($+(%,hand1.,$nick),2) , name )
set $+(%,hand1e.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,hand1.,$nick),2)
set $+(%,hand1.,$nick) $($+(%,hand1e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand1 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand1.,$nick),2) , stats )
halt
}
}
elseif ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , part ) == hand2 ) {
if ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , name )
set $+(%,hand2.,$nick) $($+(%,bli5.,$nick),2)
inc $+(%,attack.,$nick) $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
bag $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , hand2 , $nick ) != - ) {
dec $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , stats )
inc $+(%,attack.,$nick) $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , stats )
writeini players\ $+ $nick $+ .ini attack $nick $($+(%,attack.,$nick),2)
writeini players\ $+ $nick $+ .ini hand2 $nick $readini( items.ini , ID $+ $($+(%,bli5.,$nick),2) , name )
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , ID $+ $($+(%,hand2.,$nick),2) , name )
set $+(%,hand2e.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,hand2.,$nick),2)
set $+(%,hand2.,$nick) $($+(%,hand2e.,$nick),2)
msg =$nick 10You have equipted3 $readini( players\ $+ $nick $+ .ini , hand2 , $nick ) 10and increased your attack by3 $readini( items.ini , id $+ $($+(%,hand2.,$nick),2) , stats )
halt
}
}
}
}
}
}
elseif ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) == - ) {
msg =$nick You do not have an item in that slot
halt
}
}
on 1:chat:*:{
if ( $1 == drop1 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) != - ) {
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
msg =$nick 7Your Item has been dropped
bag $nick
}
}
}
if ( $1 == drop2 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) != - ) {
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
msg =$nick 7Your Item has been dropped
bag $nick
msg =$nick 10Your Item ahs been dropped
}
}
}
if ( $1 == drop3 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) != - ) {
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
msg =$nick 7Your Item has been dropped
bag $nick
msg =$nick 10Your Item ahs been dropped
}
}
}
if ( $1 == drop4 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) != - ) {
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
msg =$nick 7Your Item has been dropped
bag $nick
msg =$nick 10Your Item ahs been dropped
}
}
}
if ( $1 == drop5 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == b ) {
if ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) != - ) {
writeini players\ $+ $nick $+ .ini life $nick alive
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
msg =$nick 7Your Item has been dropped
bag $nick
msg =$nick 10Your Item ahs been dropped
}
}
}
if ( $1 == sell1 ) {
if ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) != - ) {
writeini items.ini id $+ $($+(%,bli1.,$nick),2) sell $calc( ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , stats ) / %ISR ) )
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick )) + ($readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , sell )) )
msg =$nick 10You have sold3 $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , name ) 10for3 $readini( items.ini , id $+ $($+(%,bli1.,$nick),2) , sell ) Gold
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( players\ $+ $nick $+ .ini , slot2 , $nick )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli1.,$nick) $($+(%,bli2.,$nick),2)
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
}
}
if ( $1 == sell2 ) {
if ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) != - ) {
writeini items.ini id $+ $($+(%,bli2.,$nick),2) sell $calc( ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , stats ) / %ISR ) )
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick )) + ($readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , sell )) )
msg =$nick 10You have sold3 $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , name ) 10for3 $readini( items.ini , id $+ $($+(%,bli2.,$nick),2) , sell ) Gold
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( players\ $+ $nick $+ .ini , slot3 , $nick )
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli2.,$nick) $($+(%,bli3.,$nick),2)
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
}
}
if ( $1 == sell3 ) {
if ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) != - ) {
writeini items.ini id $+ $($+(%,bli3.,$nick),2) sell $calc( ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , stats ) / %ISR ) )
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick )) + ($readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , sell )) )
msg =$nick 10You have sold3 $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , name ) 10for3 $readini( items.ini , id $+ $($+(%,bli3.,$nick),2) , sell ) Gold
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( players\ $+ $nick $+ .ini , slot4 , $nick )
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli3.,$nick) $($+(%,bli4.,$nick),2)
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
}
}
if ( $1 == sell4 ) {
if ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) != - ) {
writeini items.ini id $+ $($+(%,bli4.,$nick),2) sell $calc( ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , stats ) / %ISR ) )
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick )) + ($readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , sell )) )
msg =$nick 10You have sold3 $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , name ) 10for3 $readini( items.ini , id $+ $($+(%,bli4.,$nick),2) , sell ) Gold
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( players\ $+ $nick $+ .ini , slot5 , $nick )
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli4.,$nick) $($+(%,bli5.,$nick),2)
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
}
}
if ( $1 == sell5 ) {
if ($readini( players\ $+ $nick $+ .ini , slot5 , $nick ) != - ) {
writeini items.ini id $+ $($+(%,bli5.,$nick),2) sell $calc( ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , stats ) / %ISR ) )
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick )) + ($readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , sell )) )
msg =$nick 10You have sold3 $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , name ) 10for3 $readini( items.ini , id $+ $($+(%,bli5.,$nick),2) , sell ) Gold
writeini players\ $+ $nick $+ .ini slot5 $nick -
set $+(%,bli5.,$nick) $($+(%,bli.,$nick),2)
}
}
}
on 1:load:{
//echo Script loaded
}
###################
END OF FILE
##########
FILE NAME: LOCALSHOP
##########
on 1:Chat:ES *:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
set %shop $+ $2 $3
msg =$nick 10ITEM:3 $3 10has been placed in shop slot3 $2 $+ 10.
aamsg 3This just in:10Local Shop has been Edited ( ITEM:3 $3 10) ( NAME:3 $readini( items.ini , id $+ $3 , name ) 10) has been Added to Local Shop slot number3 $2 $+ 10.
halt
}
}
on 1:chat:esi:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
esi $nick
}
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) != loggedin ) {
msg =$nick Smart ass...
}
}
on 1:chat:*:{
if ( $1 == 7 ) {
if ($readini( players\ $+ $nick $+ .ini , menu , $nick ) == main ) {
sh $nick
}
}
}
alias sh {
msg =$nick -
msg =$nick 3[10Local shop3]
msg =$nick 10You have entered your local shop
msg =$nick -
msg =$nick 10"Good dey there lad'eh! Yeh lookin to buy some of ma famous goods yeh?"
/msg =$nick 10You have3 $readini( players\ $+ $nick $+ .ini , gold , $nick ) 10gold in your wallet
writeini items.ini id $+ %shop1 cost $calc( ($readini( items.ini , id $+ %shop1 , stats ) * %LSR ) )
writeini items.ini id $+ %shop2 cost $calc( ($readini( items.ini , id $+ %shop2 , stats ) * %LSR ) )
writeini items.ini id $+ %shop3 cost $calc( ($readini( items.ini , id $+ %shop3 , stats ) * %LSR ) )
writeini items.ini id $+ %shop4 cost $calc( ($readini( items.ini , id $+ %shop4 , stats ) * %LSR ) )
writeini items.ini id $+ %shop5 cost $calc( ($readini( items.ini , id $+ %shop5 , stats ) * %LSR ) )
writeini items.ini id $+ %shop6 cost $calc( ($readini( items.ini , id $+ %shop6 , stats ) * %LSR ) )
writeini items.ini id $+ %shop7 cost $calc( ($readini( items.ini , id $+ %shop7 , stats ) * %LSR ) )
writeini items.ini id $+ %shop8 cost $calc( ($readini( items.ini , id $+ %shop8 , stats ) * %LSR ) )
writeini items.ini id $+ %shop9 cost $calc( ($readini( items.ini , id $+ %shop9 , stats ) * %LSR ) )
writeini items.ini id $+ %shop10 cost $calc( ($readini( items.ini , id $+ %shop10 , stats ) * %LSR ) )
writeini items.ini id $+ %shop11 cost $calc( ($readini( items.ini , id $+ %shop11 , stats ) * %LSR ) )
writeini items.ini id $+ %shop12 cost $calc( ($readini( items.ini , id $+ %shop12 , stats ) * %LSR ) )
writeini items.ini id $+ %shop13 cost $calc( ($readini( items.ini , id $+ %shop13 , stats ) * %LSR ) )
writeini items.ini id $+ %shop14 cost $calc( ($readini( items.ini , id $+ %shop14 , stats ) * %LSR ) )
msg =$nick -
msg =$nick 3[1]10:3 $readini( items.ini , id $+ %shop1 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop1 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop1 , cost ) 10)
msg =$nick -
msg =$nick 3[2]10:3 $readini( items.ini , id $+ %shop2 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop2 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop2 , cost ) 10)
msg =$nick -
msg =$nick 3[3]10:3 $readini( items.ini , id $+ %shop3 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop3 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop3 , cost ) 10)
msg =$nick -
msg =$nick 3[4]10:3 $readini( items.ini , id $+ %shop4 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop4 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop4 , cost ) 10)
msg =$nick -
msg =$nick 3[5]10:3 $readini( items.ini , id $+ %shop5 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop5 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop5 , cost ) 10)
msg =$nick -
msg =$nick 3[6]10:3 $readini( items.ini , id $+ %shop6 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop6 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop6 , cost ) 10)
msg =$nick -
msg =$nick 3[7]10:3 $readini( items.ini , id $+ %shop7 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop7 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop7 , cost ) 10)
msg =$nick -
msg =$nick 3[8]10:3 $readini( items.ini , id $+ %shop8 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop8 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop8 , cost ) 10)
msg =$nick -
msg =$nick 3[9]10:3 $readini( items.ini , id $+ %shop9 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop9 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop9 , cost ) 10)
msg =$nick -
msg =$nick 3[10]10:3 $readini( items.ini , id $+ %shop10 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop10 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop10 , cost ) 10)
msg =$nick -
msg =$nick 3[11]10:3 $readini( items.ini , id $+ %shop11 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop11 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop11 , cost ) 10)
msg =$nick -
msg =$nick 3[12]10:3 $readini( items.ini , id $+ %shop12 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop12 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop12 , cost ) 10)
msg =$nick -
msg =$nick 3[13]10:3 $readini( items.ini , id $+ %shop13 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop13 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop13 , cost ) 10)
msg =$nick -
msg =$nick 3[14]10:3 $readini( items.ini , id $+ %shop14 , name ) 10( Discription:3 $readini( items.ini , id $+ %shop14 , discrip ) 10) ( COST:3 $readini( items.ini , id $+ %shop14 , cost ) 10)
msg =$nick -
msg =$nick 3[x]10: back
msg =$nick -
writeini players\ $+ $nick $+ .ini menu $nick sh
if ( $readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) { msg =$nick 3[esi]:10 To Edit Shop Items | halt }
halt
}
alias buy1 {
if ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick ) - ($readini( items.ini , id $+ $($+(%,buy.,$nick),2) , cost ) ) ) )
writeini players\ $+ $nick $+ .ini slot1 $nick $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,bli1.,$nick) $($+(%,buy.,$nick),2)
msg =$nick 10Your have bought3 $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,buy.,$nick) 0
sh $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) != - ) {
buy2 $nick
}
}
alias buy2 {
if ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick ) - ($readini( items.ini , id $+ $($+(%,buy.,$nick),2) , cost ) ) ) )
writeini players\ $+ $nick $+ .ini slot2 $nick $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,bli2.,$nick) $($+(%,buy.,$nick),2)
msg =$nick 10Your have bought3 $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,buy.,$nick) 0
sh $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) != - ) {
buy3 $nick
}
}
alias buy3 {
if ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini slot3 $nick $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,bli3.,$nick) $($+(%,buy.,$nick),2)
msg =$nick 10Your have bought3 $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,buy.,$nick) 0
sh $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) != - ) {
buy4 $nick
}
}
alias buy4 {
if ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini slot4 $nick $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,bli4.,$nick) $($+(%,buy.,$nick),2)
msg =$nick 10Your have bought3 $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,buy.,$nick) 0
sh $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) != - ) {
buy5 $nick
}
}
alias buy5 {
if ($readini( players\ $+ $nick $+ .ini , slot5 , $nick ) == - ) {
writeini players\ $+ $nick $+ .ini slot5 $nick $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,bli5.,$nick) $($+(%,buy.,$nick),2)
msg =$nick 10Your have bought3 $readini( items.ini , id $+ $($+(%,buy.,$nick),2) , name )
set $+(%,buy.,$nick) 0
sh $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot5 , $nick ) != - ) {
msg =$nick Your bag is full
halt
}
}
alias esi {
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
msg =$nick 3[10Edit shop Items3]
msg =$nick -
msg =$nick 10NOTE: Be very sure of what you are doing here. I don't want ANY bugs in my SHOP. Got that?
msg =$nick -
msg =$nick 10Type 3ES <10the number of the in the shop you want to change, 1-143> < 10Item number 3>
msg =$nick -
msg =$nick 4NOTE DO NOT USE THE < ' > " OR ANY OF THAT, LEAVE THEM THE FUCK OUT!!!!!!!!!!!!!!
msg =$nick -
msg =$nick 10Examples:
msg =$nick 10ES 1 69
msg =$nick 10ES 4 38
msg =$nick 10ES 14 50
msg =$nick -
halt
}
}
############
END OF FILE
#########
FILE NAME:UPDATE
###########
on 1:TEXT:!update:%chan:{
if ($readini( players\ $+ $nick $+ .ini , update , $nick ) != %version ) {
update $nick
}
elseif ($readini( players\ $+ $nick $+ .ini , update , $nick ) == %version ) {
/notice $nick Your profile is currently up to date. No update requiered.
}
}
on 1:load:{
set %version 4.5.1
}
##############
END OF FILE
##############
FILE NAME:BAG
##############
on 1:CHAT:b:{
if ($readini(players\ $+ $nick $+ .ini , menu , $nick ) == 1 ) {
bag $nick
}
}
alias bag {
writeini players\ $+ $nick $+ .ini menu $nick b
/msg =$nick -
/msg =$nick 3[10YOUR BAG3]
msg =$nick 10You have opened your3 bag
/msg =$nick -
if ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) != - ) {
/msg =$nick 3Bag10 slot 1 contains:3 $readini( players\ $+ $nick $+ .ini , slot1 , $nick ) 10[3 $readini( Items.ini , id $+ $($+(%,bli1.,$nick),2) , discrip ) 10] 10[3 $readini( Items.ini , id $+ $($+(%,bli1.,$nick),2) , part ) 10]
}
elseif ($readini( players\ $+ $nick $+ .ini , slot1 , $nick ) == - ) {
/msg =$nick 10There are no more Items in you 3bag10. Bag capacity:3 5
/msg =$nick -
/msg =$nick 3[1013]:10 To use the item is the first slot
/msg =$nick 3[1023]:10 To use the item is the second slot
/msg =$nick 3[1033]:10 To use the item is the third slot
/msg =$nick 3[1043]:10 To use the item is the Forth slot
/msg =$nick 3[1053]:10 To use the item is the Fith slot
/msg =$nick -
/msg =$nick 3[drop1,2,3,4 or 53]:10 To drop the item in chosen number slot (do not use the ,) (Syntax: Drop1 or Drop4 )
/msg =$nick -
/msg =$nick 3[sell1,2,3,4 or 5] 10To sell the item in the selected slot (do not use the ,) (Syntax: sell1 or sell4 )
/msg =$nick -
/msg =$nick 3[10x3]:10 Back
halt
}
if ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) != - ) {
/msg =$nick 3Bag10 slot 2 contains:3 $readini( players\ $+ $nick $+ .ini , slot2 , $nick ) 10[3 $readini( Items.ini , id $+ $($+(%,bli2.,$nick),2) , discrip ) 10] 10[3 $readini( Items.ini , id $+ $($+(%,bli2.,$nick),2) , part ) 10]
}
elseif ($readini( players\ $+ $nick $+ .ini , slot2 , $nick ) == - ) {
/msg =$nick 10There are no more Items in you 3bag10. Bag capacity:3 5
/msg =$nick -
/msg =$nick 3[1013]:10 To use the item is the first slot
/msg =$nick 3[1023]:10 To use the item is the second slot
/msg =$nick 3[1033]:10 To use the item is the third slot
/msg =$nick 3[1043]:10 To use the item is the Forth slot
/msg =$nick 3[1053]:10 To use the item is the Fith slot
/msg =$nick -
/msg =$nick 3[drop1,2,3,4 or 53]:10 To drop the item in chosen number slot (do not use the ,) (Syntax: Drop1 or Drop4 )
/msg =$nick -
/msg =$nick 3[sell1,2,3,4 or 5] 10To sell the item in the selected slot (do not use the ,) (Syntax: sell1 or sell4 )
/msg =$nick -
/msg =$nick 3[10x3]:10 Back
halt
}
if ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) != - ) {
/msg =$nick 3Bag10 slot 3 contains:3 $readini( players\ $+ $nick $+ .ini , slot3 , $nick ) 10[3 $readini( Items.ini , id $+ $($+(%,bli3.,$nick),2) , discrip ) 10] 10[3 $readini( Items.ini , id $+ $($+(%,bli3.,$nick),2) , part ) 10]
}
elseif ($readini( players\ $+ $nick $+ .ini , slot3 , $nick ) == - ) {
/msg =$nick 10There are no more Items in you 3bag10. Bag capacity:3 5
/msg =$nick -
/msg =$nick 3[1013]:10 To use the item is the first slot
/msg =$nick 3[1023]:10 To use the item is the second slot
/msg =$nick 3[1033]:10 To use the item is the third slot
/msg =$nick 3[1043]:10 To use the item is the Forth slot
/msg =$nick 3[1053]:10 To use the item is the Fith slot
/msg =$nick -
/msg =$nick 3[drop1,2,3,4 or 53]:10 To drop the item in chosen number slot (do not use the ,) (Syntax: Drop1 or Drop4 )
/msg =$nick -
/msg =$nick 3[sell1,2,3,4 or 5] 10To sell the item in the selected slot (do not use the ,) (Syntax: sell1 or sell4 )
/msg =$nick -
/msg =$nick 3[10x3]:10 Back
halt
}
if ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) != - ) {
/msg =$nick 3Bag10 slot 4 contains:3 $readini( players\ $+ $nick $+ .ini , slot4 , $nick ) 10[3 $readini( Items.ini , id $+ $($+(%,bli4.,$nick),2) , discrip ) 10] 10[3 $readini( Items.ini , id $+ $($+(%,bli4.,$nick),2) , part ) 10]
}
elseif ($readini( players\ $+ $nick $+ .ini , slot4 , $nick ) == - ) {
/msg =$nick 10There are no more Items in you 3bag10. Bag capacity:3 5
/msg =$nick -
/msg =$nick 3[1013]:10 To use the item is the first slot
/msg =$nick 3[1023]:10 To use the item is the second slot
/msg =$nick 3[1033]:10 To use the item is the third slot
/msg =$nick 3[1043]:10 To use the item is the Forth slot
/msg =$nick 3[1053]:10 To use the item is the Fith slot
/msg =$nick -
/msg =$nick 3[drop1,2,3,4 or 53]:10 To drop the item in chosen number slot (do not use the ,) (Syntax: Drop1 or Drop4 )
/msg =$nick -
/msg =$nick 3[sell1,2,3,4 or 5] 10To sell the item in the selected slot (do not use the ,) (Syntax: sell1 or sell4 )
/msg =$nick -
/msg =$nick 3[10x3]:10 Back
halt
}
if ($readini( players\ $+ $nick $+ .ini , slot5 , $nick ) != - ) {
/msg =$nick 3Bag10 slot 5 contains:3 $readini( players\ $+ $nick $+ .ini , slot5 , $nick ) 10[3 $readini( Items.ini , id $+ $($+(%,bli5.,$nick),2) , discrip ) 10] 10[3 $readini( Items.ini , id $+ $($+(%,bli5.,$nick),2) , part ) 10]
/msg =$nick -
/msg =$nick 3[1013]:10 To use the item is the first slot
/msg =$nick 3[1023]:10 To use the item is the second slot
/msg =$nick 3[1033]:10 To use the item is the third slot
/msg =$nick 3[1043]:10 To use the item is the Forth slot
/msg =$nick 3[1053]:10 To use the item is the Fith slot
/msg =$nick -
/msg =$nick 3[drop1,2,3,4 or 53]:10 To drop the item in chosen number slot (do not use the ,) (Syntax: Drop1 or Drop4 )
/msg =$nick -
/msg =$nick 3[sell1,2,3,4 or 5] 10To sell the item in the selected slot (do not use the ,) (Syntax: sell1 or sell4 )
/msg =$nick -
/msg =$nick 3[10x3]:10 Back
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , slot5 , $nick ) == - ) {
/msg =$nick 10There are no more Items in you 3bag10. Bag capacity:3 5
/msg =$nick -
/msg =$nick 3[1013]:10 To use the item is the first slot
/msg =$nick 3[1023]:10 To use the item is the second slot
/msg =$nick 3[1033]:10 To use the item is the third slot
/msg =$nick 3[1043]:10 To use the item is the Forth slot
/msg =$nick 3[1053]:10 To use the item is the Fith slot
/msg =$nick -
/msg =$nick 3[drop1,2,3,4 or 53]:10 To drop the item in chosen number slot (do not use the ,) (Syntax: Drop1 or Drop4 )
/msg =$nick -
/msg =$nick 3[sell1,2,3,4 or 5] 10To sell the item in the selected slot (do not use the ,) (Syntax: sell1 or sell4 )
/msg =$nick -
/msg =$nick 3[10x3]:10 Back
halt
}
}
#######################
END OF FILE
#######################
FILE NAME: BANK
#######################
alias bank {
writeini players\ $+ $nick $+ .ini menu $nick 6
/msg =$nick -
/msg =$nick 3[BANK]
/msg =$nick -
/msg =$nick 3NOTE:10The bank will not allow you to have 30 10in your wallet.
/msg =$nick -
set $+(%,rgold.,$nick) $round($readini( players\ $+ $nick $+ .ini , gold , $nick ),1)
set $+(%,rbank.,$nick) $round($readini( players\ $+ $nick $+ .ini , bank , $nick ),1)
/msg =$nick 10You currently have3 $($+(%,rgold.,$nick),2) 10gold in your wallet. Do you wish to safely deposite it into the bank?
/msg =$nick 10You Currently have3 $($+(%,rbank.,$nick),2) 10gold in the bank.
/msg =$nick -
/msg =$nick 3[dep]: 10To deposite money into the bank
/msg =$nick 3[with]: 10To withdraw money from the bank to your wallet
/msg =$nick 10Example: dep 15 / with 15
/msg =$nick -
/msg =$nick 3[x]:10 To return to main menu
halt
}
on 1:CHAT:dep *:{
if ((- isin $1-) || (@ isin $1-) || (# isin $1-) || ($ isin $1-) || (% isin $1-) || (^ isin $1-) || (* isin $1-) || (+ isin $1-) || (- isin $1-) || (/ isin $1-) || (- isin $1-)) { aamsg 3 $+ $nick 4Has just tried cheating using mathimatical symbols in the game. < $+ $nick $+ > $1- | msg =$nick Are you fucking mad???? This is your warning for trying to hack me DB. In the attempt of this, EVERYONE has been notified of this. | close -c $nick | Halt }
if ($readini( players\ $+ $nick $+ .ini , gold , $nick ) >= $$2 ) {
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick ) - $$2 ) )
writeini players\ $+ $nick $+ .ini bank $nick $calc( ($readini( players\ $+ $nick $+ .ini , bank , $nick ) + $$2 ) )
set $+(%,rgold.,$nick) $round($readini( players\ $+ $nick $+ .ini , gold , $nick ),1)
set $+(%,rbank.,$nick) $round($readini( players\ $+ $nick $+ .ini , bank , $nick ),1)
/msg =$nick 10You have deposited3 $$2 10gold into your bank account.
/msg =$nick 10You Currently have3 $($+(%,rbank.,$nick),2) 10gold in the bank.
bank $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , gold , $nick ) < $$2 ) {
/msg =$nick 10You do not have enough 3gold 10in your wallet for this desposite.
halt
}
}
on 1:CHAT:with *:{
if ((- isin $1-) || (@ isin $1-) || (# isin $1-) || ($ isin $1-) || (% isin $1-) || (^ isin $1-) || (* isin $1-) || (+ isin $1-) || (- isin $1-) || (/ isin $1-) || (- isin $1-)) { aamsg 3 $+ $nick 4Has just tried cheating using mathimatical symbols in the game. < $+ $nick $+ > $1- | msg =$nick Are you fucking mad???? This is your warning for trying to hack me DB. In the attempt of this, EVERYONE has been notified of this. | close -c $nick | Halt }
if ($readini( players\ $+ $nick $+ .ini , bank , $nick ) >= $$2 ) {
writeini players\ $+ $nick $+ .ini gold $nick $calc( ($readini( players\ $+ $nick $+ .ini , gold , $nick ) + $$2 ) )
writeini players\ $+ $nick $+ .ini bank $nick $calc( ($readini( players\ $+ $nick $+ .ini , bank , $nick ) - $$2 ) )
set $+(%,rgold.,$nick) $round($readini( players\ $+ $nick $+ .ini , gold , $nick ),1)
set $+(%,rbank.,$nick) $round($readini( players\ $+ $nick $+ .ini , bank , $nick ),1)
/msg =$nick 10You withdrew3 $$2 10gold from your bank
/msg =$nick 10You Currently have3 $($+(%,rgold.,$nick),2) 10gold in your wallet.
bank $nick
halt
}
elseif ($readini( players\ $+ $nick $+ .ini , bank , $nick ) < $$2 ) {
/msg =$nick 10You do not have enough 3gold 10in your bank account for this withdrawl.
halt
}
}
##########################
END OF FILE
##########################
FILE NAME:Admin Tools
##########################
on 1:TEXT:!addnews *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
writeini news.ini news2 news $$2-
.msg $nick The news has been saved as $readini( news.ini , news2 , news )
aamsg 10The 3News10 has been updated, type 3!news10 to view it now
}
}
on 1:TEXT:!LSR *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
set %LSR $2
msg $nick Shop cost rate has been changed to %LSR
aamsg 3This just in10: Local Shop Cost rate has been changed to3 %LSR $+ 10. Happy buying :)
}
}
on 1:TEXT:!op *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/mode %chan +o $$2-
}
}
on 1:TEXT:!say *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
//msg %chan $2-
}
}
on 1:TEXT:!gcost *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
set %guild_cost $2
//msg %chan 10The cost to create a new 3Guild 10has been changed to3 $2
}
}
on 1:TEXT:!leave *:#:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/part $$2-
}
}
on 1:TEXT:!Level *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
writeini players\ $+ $2 $+ .ini level $2 $3
set $+(%,level.,$2) $3
aamsg 3Admin10 changed3 $2 $+ 's 10level to3 $3
}
}
on 1:TEXT:!inv *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/notice $$2- $nick has Invited you to join our channel. If you wish to join, simply type /join %chan
}
}
on 1:TEXT:!v *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/mode %chan +v $$2-
}
}
on 1:TEXT:!deop *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/mode %chan -o $$2-
}
}
on 1:TEXT:!dev *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/mode %chan -v $$2-
}
}
on 1:TEXT:!talk *:#AVH:{
if ( $nick == liquid_night ) {
set %talk $2-
.msg $chan Talking has been switched $2
}
}
on 1:TEXT:!manause *:?:{
set %manause $2
msg $nick mana useage changed
aamsg 3This just in:10 Mana Consumption has been changed to3 %manause 10plus player 3Level10. (Equation: LEVEL + %manause )
}
on 1:TEXT:!spass *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
writeini players\ $+ $2- $+ .ini spass $$2- no
/msg $nick $$2- should be able to reset their password now
}
}
on *:Text:!kick *:?: {
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
/cs kick %chan $$2- As instructed by Admin
}
}
on 1:text:!delete *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
writeini players\ $+ $2- $+ .ini seen $$2 -
writeini players\ $+ $2- $+ .ini side $$2 -
/aamsg 3 $+ $$2 $+ 's 10account has been deleted
msg $nick account deleted
}
}
on 1:TEXT:!news:%chan:{
/aamsg 3[NEWS]10 $readini( news.ini , news2 , news )
}
on 1:TEXT:!hcost *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
set %hcost $2
msg $nick Hospital cost rate has been changed to %hcost
aamsg 3This just in10: Hospital Cost rate has been changed to3 %hcost $+ 10. Happy healing :)
}
}
on 1:load:{
//echo Admin tools ahs been loaded.
.set %password $$?="What should the admin password be"
}
on 1:TEXT:!ISR *:?:{
if ($readini( players\ $+ $nick $+ .ini , admin , $nick ) == loggedin ) {
set %ISR $2
msg $nick Item sell rate has been changed to %ISR
aamsg 3This just in10: Item sell Rate rate has been changed to3 %ISR $+ 10. Happy selling :)
}
}
on 1:TEXT:!login *:?:{
if ( $$2 == %password ) {
writeini players\ $+ $nick $+ .ini admin $nick loggedin
/msg $nick You have logged in.
.msg $nick !commdands are :
.msg $nick !addnews <msg> to add the news
.msg $nick !kick <nick> : kick a user
.msg $nick !op <nick> : To op a person
.msg $nick !v <nick>
.msg $nick !deop <nick>
.msg $nick!inv !inv <nick> to invite someone to our channel
.msg $nick !dev <nick>
.msg $nick !say <text> to make the bot say what you want it to say
.msg $nick !level <player> <level>
.msg $nick !delete <nick>
.msg $nick !ISR <number> This is to set the item sell rate. The higher the number the less gold you get for your items and the the lower the number, the more money you get for it
.msg $nick !hcost <Number> This is to change the hospital cost rate
.msg $nick !gcost <number> This is to change how much it costs to create a guild
.msg $nick !manause <number> This is to change how much mana you use when you battle. Keep number below 10 unless instructed otherwise
.msg $nick !LSR <number> This is to change the Local shop cost rate. currently on %LSR
.msg $nick !spass <nick> To reset their password
.msg $nick /notice Commander !setupdate <Value from 1 - 255 >
}
elseif ( $$2 != %password ) {
/msg $nick Your attempt to log in has failed and has been recorded
}
}
on 1:CLOSE:=:{
/mode %chan -v $nick
writeini players\ $+ $nick $+ .ini status $nick OFFLINE
aamsg 3 $+ 3 $+ $nick 10Is now offline
}
alias aamsg {
var %a = 1
while $scon(%a) {
var %b = $ifmatch, %c = 1
scid %b
while $chan(%c) {
msg $chan(%c) $$1- $+
inc %c
}
inc %a
}
scid -r
}
on 1:Chat:*:{
if ( $1 == say ) {
msg = $+ $2 < $+ $nick $+ > $3-
msg =$nick 10Messege sent to3 $2
}
elseif ( $1 == showitems ) {
set $+(%,show.,$nick) 0
showitems1 $nick
}
}
on 1:TEXT:.viewupdate:%chan:{
/msg %chan 10The current update value is:3 %update
}
on 1:notice:!ver *:?:{
set %version $2
aamsg 10Game 3UPGRADED!!!! 10Now 3V. %version
/topic %chan 3[9ONLINE3] 3AVH 10V.3 $+ %Version 10 is currently active for playing. Type 3!play 10to start playing. Type 3`help10 for any further help. Type 3!update10 before playing to make sure your profile is up to date.
}
###########################
END OF FILE
###########################
###########################
###########################
####END OF SNIPPET ########
###########################
###########################
I understand where you guys are coming from, I do. But if you look closely it's not really duplicating anything. But my guess is that you are looking at the Item USE Template. I have left it as long as I did so that in future it will leave me with updates as I am far from being finished with it. Once I have finished the game I will reduce the code and tidy it up a little bit as by then I'll have other parts of the script correcting variables on it's own.
Thanks for the reply though
