on 1:text:`start:#: {
  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? 4Help: `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? 3Types: Offensive Or Defensive 4Help: `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 is9 $2 
    Notice $nick Your Registration is Complete Type 9`Help8 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 too9 $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)
}
on *:text:`Enter:#: {
  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 }
  if ($readini($nick $+ .ini,$Nick,Hp) <= 0) { Notice $nick Please Heal | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { Notice $nick You are Already Battling! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Healing | halt }
  Writeini $nick $+ .ini $nick fighting yes
  Set %batlist %batlist $nick
  Msg %ChanSet $Name($nick) 3Enters The Battle Field!
}
on *:text:`Leave:#: {
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You Are Not Fighting | halt }
  if ($timer(Leave $+ $nick).secs != $null) { /notice $nick You Are Already Leaving | halt }
  TimerLeave $+ $nick 1 15 /leave $nick
  Msg %ChanSet $Name($nick) 3is Leaving The Battle Field in 15 Seconds!
}
on *:text:*`Inn:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == Yes) { /notice $nick You are Fighting! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Already Healing | halt }
  Notice $nick You will Heal In 30 Seconds!
  Timerheal $+ $nick 1 30 /Heal $nick
}
on 1:TEXT:`Atl:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,Attacking) != yes) { Notice $nick You Are Not Attacking! | halt }
  if ($timer(Attack $+ $nick).secs = $null) && ($readini($nick $+ .ini,$nick,Attacking) == yes) { notice $nick A Glitch was Found, It has Been Fixed! | Writeini $nick $+ .ini $nick Attacking No | Halt }
  Notice $nick Attack Time Left:7 $duration($timer(Attack $+ $nick).secs))
}
on 1:TEXT:`Punch*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,Punch,32) == $true) {
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 15 /Punch $nick $2
    Msg %ChanSet $Name($nick) 12Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`DragonFist*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,DragonFist,32) == $true) {
    if ($readini($nick $+ .ini,$nick,Stamina) < 6) { Notice $nick You dont have enough Stamina! | halt }
    writeini $nick $+ .ini $nick Stamina $calc($readini($nick $+ .ini,$Nick,Stamina) - 6)
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 25 /DragonFist $nick $2
    Msg %ChanSet $Name($nick) 12Clenches Fist & Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`HeavyFist*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,HeavyFist,32) == $true) {
    if ($readini($nick $+ .ini,$nick,Stamina) < 6) { Notice $nick You dont have enough Stamina! | halt }
    writeini $nick $+ .ini $nick Stamina $calc($readini($nick $+ .ini,$Nick,Stamina) - 6)
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 25 /HeavyFist $nick $2
    Msg %ChanSet $Name($nick) 12Clenches Fist & Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`Slash*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,Slash,32) == $true) {
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 20 /Slash $nick $2
    Msg %ChanSet $Name($nick) 12Dashes Towards $Name($2) $+ 12!
  }
}












Btw Create an Ini File Called Punch+Bag.Ini and like put the following in it:

[Punch+Bag]
Name=Punch+Bag
Type=Defensive
Money=0
Aura=15
BAura=1
Attack=0
MAttack=0
Defense=7
MDefense=7
Hp=200
MHp=200
Stamina=0
MStamina=0
Fighting=No
Level=5
Exp=0
ExpNeeded=1000000000000
motto=Touch My BAG!
attacking=no
wins=0
losses=0

[Register]
Name=Yes
Type=Yes
Complete=Yes

[pass]
Pass=YouWillNeverKnowMyPasswordBecuzIpwnz
Logged=No
on *:text:`Shop:#: {
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { Notice $nick You are Battling! | halt }
  Notice $nick Potion(100) 0-9 Sword(1000)
}
on *:text:`Use Potion:#: {
  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 }
  if ($readini($nick $+ .ini,items,Potion) <= 0) { /notice $nick Not Enough Potions! | halt }
  Writeini $nick $+ .ini Items Potion $calc($readini($nick $+ .ini,Items,Potion) - 1)
  Writeini $nick $+ .ini $nick Hp $calc($readini($nick $+ .ini,$nick,Hp) + 50)
  set %Hp $readini($nick $+ .ini,$nick,Hp)
  set %MHp $readini($nick $+ .ini,$nick,MHp)
  if (%Hp > %MHp) { writeini $nick $+ .ini $nick Hp %MHp }
}
on *:text:*`buy*:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  if (Potion == $2) {
    set %Price 100
    if ($readini($nick $+ .ini,$nick,money) < %Price) { /notice $nick Not Enough Money! | halt }
    Writeini $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price)
    Writeini $nick $+ .ini items $2 $calc($readini($nick $+ .ini,items,$2) + 1)
    Notice $nick You Bought a $2 
  }
  if (Sword == $2) {
    if ($readini($nick $+ .ini,Weapon,$2) == Yes) { /notice $nick You Already have $2 | halt }
    if ($readini($nick $+ .ini,Weapon,$2) == Equipped) { /notice $nick You Already have $2 | halt }
    set %Price 1000
    if ($readini($nick $+ .ini,$nick,money) < %Price) { /notice $nick Not Enough Money! | halt }
    Writeini $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price)
    Writeini $nick $+ .ini Weapon $2 Yes
    Notice $nick You Bought a $2 
  }
}
on *:text:`Equip Sword:#: {
  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 }
  if ($readini($nick $+ .ini,Weapon,$2) != Yes) { /notice $nick You Dont have $2 | halt }
  if ($readini($nick $+ .ini,$nick,WeaponMove) != $Null) { /notice $nick Please UnEquip a Weapon! | halt }
  if ($readini($nick $+ .ini,$nick,Level) < 5) { /notice $nick You Cant Handle $2 $+ ! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  Writeini $nick $+ .ini Weapon $2 Equipped
  Notice $nick You Equipped a Sword!
  if ($readini($nick $+ .ini,$nick,WeaponMove) == None) { writeini $nick $+ .ini $nick WeaponMove Slash | Msg %ChanSet $Name($Nick) 10Learned 7"Slash" | halt }
}  
on *:text:`UnEquip Sword:#: {
  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 }
  if ($readini($nick $+ .ini,Weapon,Sword) != Equipped) { /notice $nick Your Not Equipped With A Sword | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  writeini $nick $+ .ini Weapon Sword Yes
  Notice $nick 4You UnEquip Sword
  if ($readini($nick $+ .ini,$nick,WeaponMove) == Slash) { writeini $nick $+ .ini $nick WeaponMove None | Msg %ChanSet $Name($Nick) 10Lost 7"Slash" | Halt }
}  
on *:text:`Enter:#: {
  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 }
  if ($readini($nick $+ .ini,$Nick,Hp) <= 0) { Notice $nick Please Heal | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { Notice $nick You are Already Battling! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Healing | halt }
  Writeini $nick $+ .ini $nick fighting yes
  Set %batlist %batlist $nick
  Msg %ChanSet $Name($nick) 3Enters The Battle Field!
}
on *:text:`Leave:#: {
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You Are Not Fighting | halt }
  if ($timer(Leave $+ $nick).secs != $null) { /notice $nick You Are Already Leaving | halt }
  TimerLeave $+ $nick 1 15 /leave $nick
  Msg %ChanSet $Name($nick) 3is Leaving The Battle Field in 15 Seconds!
}
on *:text:*`Inn:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == Yes) { /notice $nick You are Fighting! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Already Healing | halt }
  Notice $nick You will Heal In 30 Seconds!
  Timerheal $+ $nick 1 30 /Heal $nick
}
on 1:TEXT:`Atl:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,Attacking) != yes) { Notice $nick You Are Not Attacking! | halt }
  if ($timer(Attack $+ $nick).secs = $null) && ($readini($nick $+ .ini,$nick,Attacking) == yes) { notice $nick A Glitch was Found, It has Been Fixed! | Writeini $nick $+ .ini $nick Attacking No | Halt }
  Notice $nick Attack Time Left:7 $duration($timer(Attack $+ $nick).secs))
}
on 1:TEXT:`Punch*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,Punch,32) == $true) {
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 15 /Punch $nick $2
    Msg %ChanSet $Name($nick) 12Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`DragonFist*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,DragonFist,32) == $true) {
    if ($readini($nick $+ .ini,$nick,Stamina) < 6) { Notice $nick You dont have enough Stamina! | halt }
    writeini $nick $+ .ini $nick Stamina $calc($readini($nick $+ .ini,$Nick,Stamina) - 6)
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 25 /DragonFist $nick $2
    Msg %ChanSet $Name($nick) 12Clenches Fist & Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`HeavyFist*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,HeavyFist,32) == $true) {
    if ($readini($nick $+ .ini,$nick,Stamina) < 6) { Notice $nick You dont have enough Stamina! | halt }
    writeini $nick $+ .ini $nick Stamina $calc($readini($nick $+ .ini,$Nick,Stamina) - 6)
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 25 /HeavyFist $nick $2
    Msg %ChanSet $Name($nick) 12Clenches Fist & Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`Slash*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,Slash,32) == $true) {
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 20 /Slash $nick $2
    Msg %ChanSet $Name($nick) 12Dashes Towards $Name($2) $+ 12!
  }
}












Btw Create an Ini File Called Punch+Bag.Ini and like put the following in it:

[Punch+Bag]
Name=Punch+Bag
Type=Defensive
Money=0
Aura=15
BAura=1
Attack=0
MAttack=0
Defense=7
MDefense=7
Hp=200
MHp=200
Stamina=0
MStamina=0
Fighting=No
Level=5
Exp=0
ExpNeeded=1000000000000
motto=Touch My BAG!
attacking=no
wins=0
losses=0

[Register]
Name=Yes
Type=Yes
Complete=Yes

[pass]
Pass=YouWillNeverKnowMyPasswordBecuzIpwnz
Logged=No

on *:text:`Shop:#: {
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { Notice $nick You are Battling! | halt }
  Notice $nick Potion(100) 0-9 Sword(1000)
}
on *:text:`Use Potion:#: {
  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 }
  if ($readini($nick $+ .ini,items,Potion) <= 0) { /notice $nick Not Enough Potions! | halt }
  Writeini $nick $+ .ini Items Potion $calc($readini($nick $+ .ini,Items,Potion) - 1)
  Writeini $nick $+ .ini $nick Hp $calc($readini($nick $+ .ini,$nick,Hp) + 50)
  set %Hp $readini($nick $+ .ini,$nick,Hp)
  set %MHp $readini($nick $+ .ini,$nick,MHp)
  if (%Hp > %MHp) { writeini $nick $+ .ini $nick Hp %MHp }
}
on *:text:*`buy*:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  if (Potion == $2) {
    set %Price 100
    if ($readini($nick $+ .ini,$nick,money) < %Price) { /notice $nick Not Enough Money! | halt }
    Writeini $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price)
    Writeini $nick $+ .ini items $2 $calc($readini($nick $+ .ini,items,$2) + 1)
    Notice $nick You Bought a $2 
  }
  if (Sword == $2) {
    if ($readini($nick $+ .ini,Weapon,$2) == Yes) { /notice $nick You Already have $2 | halt }
    if ($readini($nick $+ .ini,Weapon,$2) == Equipped) { /notice $nick You Already have $2 | halt }
    set %Price 1000
    if ($readini($nick $+ .ini,$nick,money) < %Price) { /notice $nick Not Enough Money! | halt }
    Writeini $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price)
    Writeini $nick $+ .ini Weapon $2 Yes
    Notice $nick You Bought a $2 
  }
}
on *:text:`Equip Sword:#: {
  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 }
  if ($readini($nick $+ .ini,Weapon,$2) != Yes) { /notice $nick You Dont have $2 | halt }
  if ($readini($nick $+ .ini,$nick,WeaponMove) != $Null) { /notice $nick Please UnEquip a Weapon! | halt }
  if ($readini($nick $+ .ini,$nick,Level) < 5) { /notice $nick You Cant Handle $2 $+ ! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  Writeini $nick $+ .ini Weapon $2 Equipped
  Notice $nick You Equipped a Sword!
  if ($readini($nick $+ .ini,$nick,WeaponMove) == None) { writeini $nick $+ .ini $nick WeaponMove Slash | Msg %ChanSet $Name($Nick) 10Learned 7"Slash" | halt }
}  
on *:text:`UnEquip Sword:#: {
  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 }
  if ($readini($nick $+ .ini,Weapon,Sword) != Equipped) { /notice $nick Your Not Equipped With A Sword | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  writeini $nick $+ .ini Weapon Sword Yes
  Notice $nick 4You UnEquip Sword
  if ($readini($nick $+ .ini,$nick,WeaponMove) == Slash) { writeini $nick $+ .ini $nick WeaponMove None | Msg %ChanSet $Name($Nick) 10Lost 7"Slash" | Halt }
}
on *:text:`Shop:#: {
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { Notice $nick You are Battling! | halt }
  Notice $nick Potion(100) 0-9 Sword(1000)
}
on *:text:`Use Potion:#: {
  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 }
  if ($readini($nick $+ .ini,items,Potion) <= 0) { /notice $nick Not Enough Potions! | halt }
  Writeini $nick $+ .ini Items Potion $calc($readini($nick $+ .ini,Items,Potion) - 1)
  Writeini $nick $+ .ini $nick Hp $calc($readini($nick $+ .ini,$nick,Hp) + 50)
  set %Hp $readini($nick $+ .ini,$nick,Hp)
  set %MHp $readini($nick $+ .ini,$nick,MHp)
  if (%Hp > %MHp) { writeini $nick $+ .ini $nick Hp %MHp }
}
on *:text:*`buy*:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  if (Potion == $2) {
    set %Price 100
    if ($readini($nick $+ .ini,$nick,money) < %Price) { /notice $nick Not Enough Money! | halt }
    Writeini $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price)
    Writeini $nick $+ .ini items $2 $calc($readini($nick $+ .ini,items,$2) + 1)
    Notice $nick You Bought a $2 
  }
  if (Sword == $2) {
    if ($readini($nick $+ .ini,Weapon,$2) == Yes) { /notice $nick You Already have $2 | halt }
    if ($readini($nick $+ .ini,Weapon,$2) == Equipped) { /notice $nick You Already have $2 | halt }
    set %Price 1000
    if ($readini($nick $+ .ini,$nick,money) < %Price) { /notice $nick Not Enough Money! | halt }
    Writeini $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price)
    Writeini $nick $+ .ini Weapon $2 Yes
    Notice $nick You Bought a $2 
  }
}
on *:text:`Equip Sword:#: {
  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 }
  if ($readini($nick $+ .ini,Weapon,$2) != Yes) { /notice $nick You Dont have $2 | halt }
  if ($readini($nick $+ .ini,$nick,WeaponMove) != $Null) { /notice $nick Please UnEquip a Weapon! | halt }
  if ($readini($nick $+ .ini,$nick,Level) < 5) { /notice $nick You Cant Handle $2 $+ ! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  Writeini $nick $+ .ini Weapon $2 Equipped
  Notice $nick You Equipped a Sword!
  if ($readini($nick $+ .ini,$nick,WeaponMove) == None) { writeini $nick $+ .ini $nick WeaponMove Slash | Msg %ChanSet $Name($Nick) 10Learned 7"Slash" | halt }
}  
on *:text:`UnEquip Sword:#: {
  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 }
  if ($readini($nick $+ .ini,Weapon,Sword) != Equipped) { /notice $nick Your Not Equipped With A Sword | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  writeini $nick $+ .ini Weapon Sword Yes
  Notice $nick 4You UnEquip Sword
  if ($readini($nick $+ .ini,$nick,WeaponMove) == Slash) { writeini $nick $+ .ini $nick WeaponMove None | Msg %ChanSet $Name($Nick) 10Lost 7"Slash" | Halt }
}  
on *:text:`Enter:#: {
  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 }
  if ($readini($nick $+ .ini,$Nick,Hp) <= 0) { Notice $nick Please Heal | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { Notice $nick You are Already Battling! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Healing | halt }
  Writeini $nick $+ .ini $nick fighting yes
  Set %batlist %batlist $nick
  Msg %ChanSet $Name($nick) 3Enters The Battle Field!
}
on *:text:`Leave:#: {
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You Are Not Fighting | halt }
  if ($timer(Leave $+ $nick).secs != $null) { /notice $nick You Are Already Leaving | halt }
  TimerLeave $+ $nick 1 15 /leave $nick
  Msg %ChanSet $Name($nick) 3is Leaving The Battle Field in 15 Seconds!
}
on *:text:*`Inn:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == Yes) { /notice $nick You are Fighting! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Already Healing | halt }
  Notice $nick You will Heal In 30 Seconds!
  Timerheal $+ $nick 1 30 /Heal $nick
}
on 1:TEXT:`Atl:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,Attacking) != yes) { Notice $nick You Are Not Attacking! | halt }
  if ($timer(Attack $+ $nick).secs = $null) && ($readini($nick $+ .ini,$nick,Attacking) == yes) { notice $nick A Glitch was Found, It has Been Fixed! | Writeini $nick $+ .ini $nick Attacking No | Halt }
  Notice $nick Attack Time Left:7 $duration($timer(Attack $+ $nick).secs))
}
on 1:TEXT:`Punch*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,Punch,32) == $true) {
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 15 /Punch $nick $2
    Msg %ChanSet $Name($nick) 12Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`DragonFist*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,DragonFist,32) == $true) {
    if ($readini($nick $+ .ini,$nick,Stamina) < 6) { Notice $nick You dont have enough Stamina! | halt }
    writeini $nick $+ .ini $nick Stamina $calc($readini($nick $+ .ini,$Nick,Stamina) - 6)
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 25 /DragonFist $nick $2
    Msg %ChanSet $Name($nick) 12Clenches Fist & Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`HeavyFist*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,HeavyFist,32) == $true) {
    if ($readini($nick $+ .ini,$nick,Stamina) < 6) { Notice $nick You dont have enough Stamina! | halt }
    writeini $nick $+ .ini $nick Stamina $calc($readini($nick $+ .ini,$Nick,Stamina) - 6)
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 25 /HeavyFist $nick $2
    Msg %ChanSet $Name($nick) 12Clenches Fist & Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`Slash*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,Slash,32) == $true) {
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 20 /Slash $nick $2
    Msg %ChanSet $Name($nick) 12Dashes Towards $Name($2) $+ 12!
  }
}












Btw Create an Ini File Called Punch+Bag.Ini and like put the following in it:

[Punch+Bag]
Name=Punch+Bag
Type=Defensive
Money=0
Aura=15
BAura=1
Attack=0
MAttack=0
Defense=7
MDefense=7
Hp=200
MHp=200
Stamina=0
MStamina=0
Fighting=No
Level=5
Exp=0
ExpNeeded=1000000000000
motto=Touch My BAG!
attacking=no
wins=0
losses=0

[Register]
Name=Yes
Type=Yes
Complete=Yes

[pass]
Pass=YouWillNeverKnowMyPasswordBecuzIpwnz
Logged=No
on *:text:`Enter:#: {
  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 }
  if ($readini($nick $+ .ini,$Nick,Hp) <= 0) { Notice $nick Please Heal | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { Notice $nick You are Already Battling! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Healing | halt }
  Writeini $nick $+ .ini $nick fighting yes
  Set %batlist %batlist $nick
  Msg %ChanSet $Name($nick) 3Enters The Battle Field!
}
on *:text:`Leave:#: {
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You Are Not Fighting | halt }
  if ($timer(Leave $+ $nick).secs != $null) { /notice $nick You Are Already Leaving | halt }
  TimerLeave $+ $nick 1 15 /leave $nick
  Msg %ChanSet $Name($nick) 3is Leaving The Battle Field in 15 Seconds!
}
on *:text:*`Inn:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == Yes) { /notice $nick You are Fighting! | halt }
  if ($timer(Heal $+ $nick).secs != $null) { /notice $nick You Are Already Healing | halt }
  Notice $nick You will Heal In 30 Seconds!
  Timerheal $+ $nick 1 30 /Heal $nick
}
on 1:TEXT:`Atl:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,Attacking) != yes) { Notice $nick You Are Not Attacking! | halt }
  if ($timer(Attack $+ $nick).secs = $null) && ($readini($nick $+ .ini,$nick,Attacking) == yes) { notice $nick A Glitch was Found, It has Been Fixed! | Writeini $nick $+ .ini $nick Attacking No | Halt }
  Notice $nick Attack Time Left:7 $duration($timer(Attack $+ $nick).secs))
}
on 1:TEXT:`Punch*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,Punch,32) == $true) {
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 15 /Punch $nick $2
    Msg %ChanSet $Name($nick) 12Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`DragonFist*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,DragonFist,32) == $true) {
    if ($readini($nick $+ .ini,$nick,Stamina) < 6) { Notice $nick You dont have enough Stamina! | halt }
    writeini $nick $+ .ini $nick Stamina $calc($readini($nick $+ .ini,$Nick,Stamina) - 6)
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 25 /DragonFist $nick $2
    Msg %ChanSet $Name($nick) 12Clenches Fist & Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`HeavyFist*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,HeavyFist,32) == $true) {
    if ($readini($nick $+ .ini,$nick,Stamina) < 6) { Notice $nick You dont have enough Stamina! | halt }
    writeini $nick $+ .ini $nick Stamina $calc($readini($nick $+ .ini,$Nick,Stamina) - 6)
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 25 /HeavyFist $nick $2
    Msg %ChanSet $Name($nick) 12Clenches Fist & Dashes Towards $Name($2) $+ 12!
  }
}
on 1:TEXT:`Slash*:*:{
  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 }
  if ($nick == $2) { Notice $nick Don't Attack Yourself! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) != yes) { Notice $nick You are not Fighting! | halt }
  if ($readini($2 $+ .ini,$2,fighting) != yes) { Notice $nick $2 is not Fighting! | halt }
  if ($readini($nick $+ .ini,$nick,Attacking) == yes) { Notice $nick You are Attacking! | halt }
  Set %Attacks $readini($nick $+ .ini,$nick,move1) $readini($nick $+ .ini,$nick,move2) $readini($nick $+ .ini,$nick,WeaponMove) $readini($nick $+ .ini,$nick,SpecialMove)
  if ($istok(%attacks,Slash,32) == $true) {
    writeini $nick $+ .ini $nick Attacking Yes
    timerattack $+ $nick 1 20 /Slash $nick $2
    Msg %ChanSet $Name($nick) 12Dashes Towards $Name($2) $+ 12!
  }
}












Btw Create an Ini File Called Punch+Bag.Ini and like put the following in it:

[Punch+Bag]
Name=Punch+Bag
Type=Defensive
Money=0
Aura=15
BAura=1
Attack=0
MAttack=0
Defense=7
MDefense=7
Hp=200
MHp=200
Stamina=0
MStamina=0
Fighting=No
Level=5
Exp=0
ExpNeeded=1000000000000
motto=Touch My BAG!
attacking=no
wins=0
losses=0

[Register]
Name=Yes
Type=Yes
Complete=Yes

[pass]
Pass=YouWillNeverKnowMyPasswordBecuzIpwnz
Logged=No


on *:text:`Shop:#: {
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { Notice $nick You are Battling! | halt }
  Notice $nick Potion(100) 0-9 Sword(1000)
}
on *:text:`Use Potion:#: {
  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 }
  if ($readini($nick $+ .ini,items,Potion) <= 0) { /notice $nick Not Enough Potions! | halt }
  Writeini $nick $+ .ini Items Potion $calc($readini($nick $+ .ini,Items,Potion) - 1)
  Writeini $nick $+ .ini $nick Hp $calc($readini($nick $+ .ini,$nick,Hp) + 50)
  set %Hp $readini($nick $+ .ini,$nick,Hp)
  set %MHp $readini($nick $+ .ini,$nick,MHp)
  if (%Hp > %MHp) { writeini $nick $+ .ini $nick Hp %MHp }
}
on *:text:*`buy*:#:{
  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 }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  if (Potion == $2) {
    set %Price 100
    if ($readini($nick $+ .ini,$nick,money) < %Price) { /notice $nick Not Enough Money! | halt }
    Writeini $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price)
    Writeini $nick $+ .ini items $2 $calc($readini($nick $+ .ini,items,$2) + 1)
    Notice $nick You Bought a $2 
  }
  if (Sword == $2) {
    if ($readini($nick $+ .ini,Weapon,$2) == Yes) { /notice $nick You Already have $2 | halt }
    if ($readini($nick $+ .ini,Weapon,$2) == Equipped) { /notice $nick You Already have $2 | halt }
    set %Price 1000
    if ($readini($nick $+ .ini,$nick,money) < %Price) { /notice $nick Not Enough Money! | halt }
    Writeini $nick $+ .ini $nick money $calc($readini($nick $+ .ini,$nick,money) - %Price)
    Writeini $nick $+ .ini Weapon $2 Yes
    Notice $nick You Bought a $2 
  }
}
on *:text:`Equip Sword:#: {
  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 }
  if ($readini($nick $+ .ini,Weapon,$2) != Yes) { /notice $nick You Dont have $2 | halt }
  if ($readini($nick $+ .ini,$nick,WeaponMove) != $Null) { /notice $nick Please UnEquip a Weapon! | halt }
  if ($readini($nick $+ .ini,$nick,Level) < 5) { /notice $nick You Cant Handle $2 $+ ! | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  Writeini $nick $+ .ini Weapon $2 Equipped
  Notice $nick You Equipped a Sword!
  if ($readini($nick $+ .ini,$nick,WeaponMove) == None) { writeini $nick $+ .ini $nick WeaponMove Slash | Msg %ChanSet $Name($Nick) 10Learned 7"Slash" | halt }
}  
on *:text:`UnEquip Sword:#: {
  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 }
  if ($readini($nick $+ .ini,Weapon,Sword) != Equipped) { /notice $nick Your Not Equipped With A Sword | halt }
  if ($readini($nick $+ .ini,$nick,fighting) == yes) { /notice $nick You are in Battle! | halt }
  writeini $nick $+ .ini Weapon Sword Yes
  Notice $nick 4You UnEquip Sword
  if ($readini($nick $+ .ini,$nick,WeaponMove) == Slash) { writeini $nick $+ .ini $nick WeaponMove None | Msg %ChanSet $Name($Nick) 10Lost 7"Slash" | Halt }
}  
