Since Hawkee wont up the Starter Bot i sent them, so now its a Snipptet ;/
In Variables put %ChanSet YOUR-CHANNEL-NAME Example %ChanSet #Fux
Put This Code in Remotes, This is the Registeration Part.
This code was made for People who are new to BATTLE BOTS scripting and needle something to look at :D
on 1:text:`Register:#: {
if ($chan != %ChanSet) { halt }
if ($readini($nick $+ .ini,Register,Complete) == Yes) { Notice $nick You already Made a Account! | halt }
Notice $nick What Is Your Characters Name? 4Help: `Name ChrName
}
on *:text:*`Name *:*:{
if ($readini($nick $+ .ini,Register,Complete) == Yes) { Notice $nick You already Made a Account! | halt }
if ($readini($nick $+ .ini,Register,Name) == Yes) { Notice $nick You already Made a Name! | halt }
if ($chan != %ChanSet) { halt }
if (Fuck isin $2-) { Notice $nick 4Please Reword It | halt }
if (/ isin $2-) { Notice $nick Please Reword it! | halt }
writeini $nick $+ .ini $nick Name $2-
writeini $nick $+ .ini Register Name Yes
Notice $nick What Type Of Character Do You Want? 3Types: Offensive Or Defensive 4Help: `Type Offensive Or Defensive
}
on 1:TEXT:`Type *:*:{
if ($chan != %ChanSet) { halt }
if ($readini($nick $+ .ini,Register,Complete) == Yes) { Notice $nick You already Made a Account! | halt }
if ($readini($nick $+ .ini,Register,Name) != Yes) { /notice $nick Please Choose a Name `Name (Name) | halt }
if ($readini($nick $+ .ini,Register,Type) == Yes) { /notice $nick You Already Chose Your Type! | halt }
if ($2 == Offensive) {
Writeini $nick $+ .ini Register Type Yes
Writeini $nick $+ .ini $nick Type $2
Writeini $nick $+ .ini $nick Money 50
Writeini $nick $+ .ini $nick Aura 1
Writeini $nick $+ .ini $nick BAura 4
Writeini $nick $+ .ini $nick Defense $Rand(5,10)
Writeini $nick $+ .ini $nick Attack $Rand(10,15)
Writeini $nick $+ .ini $nick MHp $Rand(90,110)
Writeini $nick $+ .ini $nick MStamina 7
writeini $nick $+ .ini $nick Level 1
writeini $nick $+ .ini $nick Exp 0
writeini $nick $+ .ini $nick ExpNeeded 10
writeini $nick $+ .ini $nick Move1 Punch
writeini $nick $+ .ini $nick Move2 None
writeini $nick $+ .ini $nick WeaponMove None
writeini $nick $+ .ini $nick SpecialMove DragonFist
Notice $Nick For Your Account Safety, PM $Me With `Password APass
}
if ($2 == Defensive) {
Writeini $nick $+ .ini Register Type Yes
Writeini $nick $+ .ini $nick Type $2
Writeini $nick $+ .ini $nick Money 50
Writeini $nick $+ .ini $nick Aura 1
Writeini $nick $+ .ini $nick BAura 4
Writeini $nick $+ .ini $nick Defense $Rand(10,15)
Writeini $nick $+ .ini $nick Attack $Rand(5,10)
Writeini $nick $+ .ini $nick MHp $Rand(100,120)
Writeini $nick $+ .ini $nick MStamina 5
writeini $nick $+ .ini $nick Level 1
writeini $nick $+ .ini $nick Exp 0
writeini $nick $+ .ini $nick ExpNeeded 10
writeini $nick $+ .ini $nick Move1 Punch
writeini $nick $+ .ini $nick Move2 None
writeini $nick $+ .ini $nick WeaponMove None
writeini $nick $+ .ini $nick SpecialMove HeavyFist
Notice $Nick For Your Account Safety, PM $Me With `Password APass
}
}
on *:text:*`Password *:?:{
if ($readini($nick $+ .ini,Register,Name) != Yes) { Notice $nick Please Choose a Name `Name (Name) | halt }
if ($readini($nick $+ .ini,Register,Type) != Yes) { Notice $nick Please Choose a Type `Type (Type) | halt }
if (/ isin $2) { Notice $nick Please Reword it! | halt }
if ($ isin $2) { Notice $nick Please Reword it! | halt }
if ($readini($nick $+ .ini,Pass,Pass) == $null) {
if ($2 == $Null) { Notice $nick Please Type `Password (Password) | halt }
Writeini $nick $+ .ini Pass Pass $2
Writeini $nick $+ .ini Register Complete Yes
Mode %Chanset +v $nick
Notice $nick 8Your Password is9 $2
Notice $nick Your Registration is Complete Type 9`Help8 To get Help! 13Enjoy!
writeini $nick $+ .ini Pass Logged Yes
Heal $Nick
Halt
}
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick Please Log in, By PMing $Me with `Login PassYouMade | halt }
if ($2 == $Null) { Notice $nick Please Type `Password (Password) | halt }
Writeini $nick $+ .ini Pass Pass $2
Mode %Chanset +v $nick
Notice $nick 8You Changed Your Password too9 $2
writeini $nick $+ .ini Pass Logged Yes
}
on *:text:*`Login *:?:{
if ($2 == $readini($nick $+ .ini,Pass,Pass)) {
Writeini $nick $+ .ini Pass Logged Yes
Notice $nick You have logged in!
Mode %Chanset +v $nick
Halt
}
}
on *:text:*`LogOut:*: {
writeini $nick $+ .ini Pass Logged No
notice $nick You have now logged out!
Mode %Chanset -v $nick
Halt
}
on *:join:#:{
if ($readini($nick $+ .ini,Register,Complete) != Yes) && (%ChanSet == $Chan) { Notice $nick Welcome to %ChanSet $+ ! You Have Not Registered, Type `Register | halt }
if ($readini($nick $+ .ini,Register,Complete) == Yes) && (%ChanSet == $Chan) { Notice $nick Welcome to %ChanSet $+ ! You are Registered Please Type `Help for Help! }
if ($readini($nick $+ .ini,Register,Complete) == Yes) {
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { halt }
writeini -n $nick $+ .ini Pass Logged No
}
}
on *:nick:{
if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { halt }
writeini -n $nick $+ .ini Pass Logged No
Mode %Chanset -v $nick
}
on *:part:#:{
if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { halt }
writeini -n $nick $+ .ini Pass Logged No
}
on *:Quit:{
if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { halt }
writeini -n $nick $+ .ini Pass Logged No
}
alias Name {
set %Aura $readini($1 $+ .ini,$1,Aura)
set %BAura $readini($1 $+ .ini,$1,BAura)
return $+ %Aura $+ , $+ %BAura $+ $readini($1 $+ .ini,$1,Name) $+
}
on *:text:`Stats:#: {
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick Login, By PMing $Me with `Login PassYouMade! | halt }
Notice $Nick Chr: $Name($Nick) 15-10 Hp $+ / $+ Max Hp:14 $Stat($nick,Hp) $+ / $+ $Stat($nick,MHP) 15-10 Stamina $+ / $+ Max Stamina:14 $Stat($nick,Stamina) $+ / $+ $Stat($nick,MStamina) 15-10 Attack:14 $Stat($nick,Attack) 15-10 Defense:14 $Stat($nick,Defense)
}
on 1:text:`Help:#:{
Notice $nick 3Help Topics:14 Register - Battle - Healing - Shop 3Type `Help (Topic)
}
on 1:text:`Help*:#: {
If ($2 == Register) { notice $nick Type `Register | halt }
If ($2 == Battle) { notice $nick Type `Moves Too see Your Moves `AttackName Person Too Attack! To Enter Battle field and Leave: `Enter & `Leave | halt }
If ($2 == Healing) { notice $nick To Heal Type `Inn | halt }
If ($2 == Shop) { notice $nick Type `Shop to see what Items are available. Type `Money To see how much money you have. To buy the command is `Buy (Item) | halt }
If ($2 == Items) { notice $nick Type `Items to see what You Have. Type `Use Potion To use Potion! Type `Equip Sword to equip it and `Unequip Sword To remove it | halt }
}
on 1:text:`Moves:#:{
if ($chan != %ChanSet) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick Login, By PMing $Me with `Login PassYouMade! | halt }
Unset %Moves
if ($readini($nick $+ .ini,$nick,Move1) != None) { Set %Moves %Moves $readini($nick $+ .ini,$nick,Move1) }
if ($readini($nick $+ .ini,$nick,Move2) != None) { Set %Moves %Moves $readini($nick $+ .ini,$nick,Move2) }
Notice $nick 10Attacks You Know:15 %Moves 10Weapon Move:15 $readini($nick $+ .ini,$nick,WeaponMove) 10Special Move:15 $readini($nick $+ .ini,$nick,SpecialMove)
Unset %Moves
}
on 1:text:`Money:#:{
if ($chan != %ChanSet) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick Please Register! `Register | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick Login, By PMing $Me with `Login PassYouMade! | halt }
Notice $nick Money:7 $Stat($nick,Money)
}
on 1:text:`Items:#:{
if ($chan != %ChanSet) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { /notice $nick Please Register! `Register | halt }
if ($readini($nick $+ .ini,Password,LoggedIn) != Yes) { /notice $nick Login! | halt }
Unset %Items
Unset %Weapon
if ($readini($nick $+ .ini,Items,Potion) >= 1) { //set %Items %Items $Item($nick,Potion) }
if ($readini($nick $+ .ini,Weapon,Sword) == Yes) { //set %Weapon %Weapon Sword }
if ($readini($nick $+ .ini,Weapon,Sword) == Equipped) { //set %Weapon %Weapon Sword(Equipped) }
Notice $nick 3Items:15 %Items 3Weapons:15 %Weapon
Unset %Items
Unset %Weapon
}
alias Item {
return $2 $+ ( $+ $readini($1 $+ .ini,Items,$2) $+ )
}
alias Stat {
return $readini($1 $+ .ini,$1,$2)
}