Naruto NinjaRpg V1.0 (Alias)

By Darkkeeper on Apr 10, 2007

ok heres the aliases for the Narutorpg script

Heal {
  notice $1 You Have Fully Healed!
  writeini Ninja.ini $1 Hp $readini(Ninja.ini,$1,MHp)
  writeini Ninja.ini $1 Sp $readini(Ninja.ini,$1,MSp)
  writeini Ninja.ini $1 Cp $readini(Ninja.ini,$1,MCp)
}
Leave {
  if ($readini(Ninja.ini,$1,Fighting) != yes) { halt }
  Writeini Ninja.ini $1 fighting no
  Writeini Ninja.ini $1 attacking no
  Set %batlist $remtok(%batlist,$1,1,32)
  Msg %Chan $1 $+ ( $+ $readini(Ninja.ini,$1,Character) $+ ) Has Left The Battle Field!
}
LvLCheck {
  set %Exp [ $readini Ninja.ini $1 Exp ]
  set %NExp [ $readini Ninja.ini $1 NExp ]
  set %Level [ $readini Ninja.ini $1 Lvl ]
  If (%Exp >= %NExp) {
    Msg %Chan $1 $+ ( $+ $readini(Ninja.ini,$1,Character) $+ ) Grew a Level!
    if ($readini(Ninja.ini,$1,Gender) == Male) {
      Set %Taioff $Rand(2,3)
      Set %Genoff $Rand(2,3)
      Set %Ninoff $Rand(2,3)
      Set %Wepoff $Rand(2,3)
      Set %TaiDef $Rand(1,2)
      Set %GenDef $Rand(1,2)
      Set %NinDef $Rand(1,2)
      Set %WepDef $Rand(1,2)
      Set %Intell $Rand(1,4)
      Set %Strength $Rand(1,4)
      Set %MHp $Rand(10,20)
      Set %MSp $Rand(10,15)
      Set %MCp $Rand(10,15)
      writeini Ninja.ini $1 Lvl $calc($readini(Ninja.ini,$1,Lvl) + 1)
      writeini Ninja.ini $1 MSp $calc($readini(Ninja.ini,$1,MSp) + %MSp)
      writeini Ninja.ini $1 MCp $calc($readini(Ninja.ini,$1,MCp) + %MCp)
      writeini Ninja.ini $1 MHp $calc($readini(Ninja.ini,$1,MHp) + %MHp)
      writeini Ninja.ini $1 NExp $calc($readini(Ninja.ini,$1,NExp) + 200)
      writeini Ninja.ini $1 TaiOff $calc($readini(Ninja.ini,$1,TaiOff) + %TaiOff)
      writeini Ninja.ini $1 GenOff $calc($readini(Ninja.ini,$1,GenOff) + %GenOff)
      writeini Ninja.ini $1 NinOff $calc($readini(Ninja.ini,$1,NinOff) + %NinOff)
      writeini Ninja.ini $1 WepOff $calc($readini(Ninja.ini,$1,WepOff) + %WepOff)
      writeini Ninja.ini $1 TaiDef $calc($readini(Ninja.ini,$1,TaiDef) + %TaiDef)
      writeini Ninja.ini $1 GenDef $calc($readini(Ninja.ini,$1,GenDef) + %GenDef)
      writeini Ninja.ini $1 NinDef $calc($readini(Ninja.ini,$1,NinDef) + %NinDef)
      writeini Ninja.ini $1 WepDef $calc($readini(Ninja.ini,$1,WepDef) + %WepDef)
      writeini Ninja.ini $1 Strength $calc($readini(Ninja.ini,$1,Strength) + %Strength)
      writeini Ninja.ini $1 Intell $calc($readini(Ninja.ini,$1,Intell) + %Intell)
      Notice $1 You Gained %MHp Hp || %MCp Cp || %MSp Sp || %Strength Strength || %Intell Intell || Offences: Tai %TaiOff / Gen %GenOff / Nin %NinOff / Wep %WepOff || Defences:  Tai %TaiDef / Gen %GenDef / Nin %NinDef / Wep %WepDef 
      Heal $1
    }
    if ($readini(Ninja.ini,$1,Gender) == Female) {
      Set %Taioff $Rand(1,2)
      Set %Genoff $Rand(1,2)
      Set %Ninoff $Rand(1,2)
      Set %Wepoff $Rand(1,2)
      Set %TaiDef $Rand(1,4)
      Set %GenDef $Rand(1,4)
      Set %NinDef $Rand(1,4)
      Set %WepDef $Rand(1,4)
      Set %Intell $Rand(1,5)
      Set %Strength $Rand(1,5)
      Set %MHp $Rand(10,30)
      Set %MSp $Rand(10,25)
      Set %MCp $Rand(10,25)
      writeini Ninja.ini $1 Lvl $calc($readini(Ninja.ini,$1,Lvl) + 1)
      writeini Ninja.ini $1 MSp $calc($readini(Ninja.ini,$1,MSp) + %MSp)
      writeini Ninja.ini $1 MCp $calc($readini(Ninja.ini,$1,MCp) + %MCp)
      writeini Ninja.ini $1 MHp $calc($readini(Ninja.ini,$1,MHp) + %MHp)
      writeini Ninja.ini $1 NExp $calc($readini(Ninja.ini,$1,NExp) + 200)
      writeini Ninja.ini $1 TaiOff $calc($readini(Ninja.ini,$1,TaiOff) + %TaiOff)
      writeini Ninja.ini $1 GenOff $calc($readini(Ninja.ini,$1,GenOff) + %GenOff)
      writeini Ninja.ini $1 NinOff $calc($readini(Ninja.ini,$1,NinOff) + %NinOff)
      writeini Ninja.ini $1 WepOff $calc($readini(Ninja.ini,$1,WepOff) + %WepOff)
      writeini Ninja.ini $1 TaiDef $calc($readini(Ninja.ini,$1,TaiDef) + %TaiDef)
      writeini Ninja.ini $1 GenDef $calc($readini(Ninja.ini,$1,GenDef) + %GenDef)
      writeini Ninja.ini $1 NinDef $calc($readini(Ninja.ini,$1,NinDef) + %NinDef)
      writeini Ninja.ini $1 WepDef $calc($readini(Ninja.ini,$1,WepDef) + %WepDef)
      writeini Ninja.ini $1 Strength $calc($readini(Ninja.ini,$1,Strength) + %Strength)
      writeini Ninja.ini $1 Intell $calc($readini(Ninja.ini,$1,Intell) + %Intell)
      Notice $1 You Gained %MHp Hp || %MCp Cp || %MSp Sp || %Strength Strength || %Intell Intell || Offences: Tai %TaiOff / Gen %GenOff / Nin %NinOff / Wep %WepOff || Defences:  Tai %TaiDef / Gen %GenDef / Nin %NinDef / Wep %WepDef
      Heal $1
      RankCheck
    }
  }
}
DeadCheck {
  if ($readini(Ninja.ini,$2,Hp) <= 0) {
    if ($readini(Ninja.ini,$2,fighting) != yes) { halt }
    timerattack $+ $2 off
    set %Ryo $rand(30,40)
    set %Exp $calc(%ExpGain * 2)
    writeini Ninja.ini $1 Exp $calc($readini(Ninja.ini,$1,exp) + %Exp)
    writeini Ninja.ini $1 wins $calc($readini(Ninja.ini,$1,wins) + 1)  
    writeini Ninja.ini $2 Losses $calc($readini(Ninja.ini,$2,Losses) + 1) 
    writeini Ninja.ini $1 Ryo $calc($readini(Ninja.ini,$1,Ryo) + %Ryo) 
    writeini Ninja.ini $2 fighting no
    writeini Ninja.ini $2 Attacking no
    set %batlist $remtok(%batlist,$2,1,32)
    Msg %Chan $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) Defeated $2 $+ ( $+ $readini(Ninja.ini,$2,Character) $+ ) $+ ! $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) Gains %Ryo Ryo and %Exp Exp!
    LvLCheck $1
    RankCheck $1
    OutLaw
    Dragon
  }    
}

OutLaw {
  if ($readini(Ninja.ini,OutLaw,fighting) != yes) {
    Heal OutLaw
    Writeini Ninja.ini OutLaw Fighting Yes
    set %batlist %batList OutLaw
    Msg %Chan OutLaw Enters The Battle Field!
  }
}
Dragon {
  if ($readini(Ninja.ini,Dragon,fighting) != yes) {
    Heal Dragon
    Writeini Ninja.ini Dragon Fighting Yes
    set %batlist %batList Dragon
    Msg %Chan Dragon Enters The Battle Field!
  }
}

RankCheck {
  if ($readini(Ninja.ini,$1,Rank) == Student) {
    if ($readini(Ninja.ini,$1,LvL) >= 9) {
      Msg %Chan Congrats $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) $+ , You are now Genin!
      Writeini Ninja.ini $1 Rank Genin
      Writeini Ninja.ini $1 LvL 1
      Writeini Ninja.ini $1 MHp $Calc($readini(Ninja.ini,$1,MHp) + 200)
      Writeini Ninja.ini $1 MSp $Calc($readini(Ninja.ini,$1,MSp) + 200)
      Writeini Ninja.ini $1 MCp $Calc($readini(Ninja.ini,$1,MCp) + 200)
      Writeini Ninja.ini $1 Ryo $Calc($readini(Ninja.ini,$1,Ryo) + 1000)
      Writeini Ninja.ini $1 TaiOff $Calc($readini(Ninja.ini,$1,TaiOff) + 100)
      Writeini Ninja.ini $1 NinOff $Calc($readini(Ninja.ini,$1,NinOff) + 100) 
      Writeini Ninja.ini $1 GenOff $Calc($readini(Ninja.ini,$1,GenOff) + 100) 
      Writeini Ninja.ini $1 WepOff $Calc($readini(Ninja.ini,$1,WepOff) + 100)
      Writeini Ninja.ini $1 TaiDef $Calc($readini(Ninja.ini,$1,TaiDef) + 100)
      Writeini Ninja.ini $1 NinDef $Calc($readini(Ninja.ini,$1,NinDef) + 100)
      Writeini Ninja.ini $1 GenDef $Calc($readini(Ninja.ini,$1,GenDef) + 100)
      Writeini Ninja.ini $1 WepDef $Calc($readini(Ninja.ini,$1,WepDef) + 100)
      Writeini Ninja.ini $1 Intell $Calc($readini(Ninja.ini,$1,Intell) + 100)
      Writeini Ninja.ini $1 Strength $Calc($readini(Ninja.ini,$1,Strength) + 100)
      Heal $1
    }
  }
  if ($readini(Ninja.ini,$1,Rank) == Genin) {
    if ($readini(Ninja.ini,$1,LvL) >= 9) {
      Msg %Chan Congrats $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) $+ , You are now Chuunin!
      Writeini Ninja.ini $1 Rank Chuunin
      Writeini Ninja.ini $1 LvL 1
      Writeini Ninja.ini $1 MHp $Calc($readini(Ninja.ini,$1,MHp) + 500)
      Writeini Ninja.ini $1 MSp $Calc($readini(Ninja.ini,$1,MSp) + 500)
      Writeini Ninja.ini $1 MCp $Calc($readini(Ninja.ini,$1,MCp) + 500)
      Writeini Ninja.ini $1 Ryo $Calc($readini(Ninja.ini,$1,Ryo) + 3000)
      Writeini Ninja.ini $1 TaiOff $Calc($readini(Ninja.ini,$1,TaiOff) + 300)
      Writeini Ninja.ini $1 NinOff $Calc($readini(Ninja.ini,$1,NinOff) + 300) 
      Writeini Ninja.ini $1 GenOff $Calc($readini(Ninja.ini,$1,GenOff) + 300) 
      Writeini Ninja.ini $1 WepOff $Calc($readini(Ninja.ini,$1,WepOff) + 300)
      Writeini Ninja.ini $1 TaiDef $Calc($readini(Ninja.ini,$1,TaiDef) + 300)
      Writeini Ninja.ini $1 NinDef $Calc($readini(Ninja.ini,$1,NinDef) + 300)
      Writeini Ninja.ini $1 GenDef $Calc($readini(Ninja.ini,$1,GenDef) + 300)
      Writeini Ninja.ini $1 WepDef $Calc($readini(Ninja.ini,$1,WepDef) + 300)
      Writeini Ninja.ini $1 Intell $Calc($readini(Ninja.ini,$1,Intell) + 300)
      Writeini Ninja.ini $1 Strength $Calc($readini(Ninja.ini,$1,Strength) + 300)
      Heal $1
    }
  }
  if ($readini(Ninja.ini,$1,Rank) == Chuunin) {
    if ($readini(Ninja.ini,$1,LvL) >= 9) {
      Msg %Chan Congrats $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) $+ , You are now Jounin!
      Writeini Ninja.ini $1 Rank Jounin
      Writeini Ninja.ini $1 LvL 1
      Writeini Ninja.ini $1 MHp $Calc($readini(Ninja.ini,$1,MHp) + 1000)
      Writeini Ninja.ini $1 MSp $Calc($readini(Ninja.ini,$1,MSp) + 1000)
      Writeini Ninja.ini $1 MCp $Calc($readini(Ninja.ini,$1,MCp) + 1000)
      Writeini Ninja.ini $1 Ryo $Calc($readini(Ninja.ini,$1,Ryo) + 7000)
      Writeini Ninja.ini $1 TaiOff $Calc($readini(Ninja.ini,$1,TaiOff) + 700)
      Writeini Ninja.ini $1 NinOff $Calc($readini(Ninja.ini,$1,NinOff) + 700) 
      Writeini Ninja.ini $1 GenOff $Calc($readini(Ninja.ini,$1,GenOff) + 700) 
      Writeini Ninja.ini $1 WepOff $Calc($readini(Ninja.ini,$1,WepOff) + 700)
      Writeini Ninja.ini $1 TaiDef $Calc($readini(Ninja.ini,$1,TaiDef) + 700)
      Writeini Ninja.ini $1 NinDef $Calc($readini(Ninja.ini,$1,NinDef) + 700)
      Writeini Ninja.ini $1 GenDef $Calc($readini(Ninja.ini,$1,GenDef) + 700)
      Writeini Ninja.ini $1 WepDef $Calc($readini(Ninja.ini,$1,WepDef) + 700)
      Writeini Ninja.ini $1 Intell $Calc($readini(Ninja.ini,$1,Intell) + 700)
      Writeini Ninja.ini $1 Strength $Calc($readini(Ninja.ini,$1,Strength) + 700)
      Heal $1
    }
  }
  if ($readini(Ninja.ini,$1,Rank) == Jounin) {
    if ($readini(Ninja.ini,$1,LvL) >= 9) {
      Msg %Chan Congrats $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) $+ , You are now Special Jounin!
      Writeini Ninja.ini $1 Rank Special Jounin
      Writeini Ninja.ini $1 LvL 1
      Writeini Ninja.ini $1 MHp $Calc($readini(Ninja.ini,$1,MHp) + 5000)
      Writeini Ninja.ini $1 MSp $Calc($readini(Ninja.ini,$1,MSp) + 5000)
      Writeini Ninja.ini $1 MCp $Calc($readini(Ninja.ini,$1,MCp) + 5000)
      Writeini Ninja.ini $1 Ryo $Calc($readini(Ninja.ini,$1,Ryo) + 15000)
      Writeini Ninja.ini $1 TaiOff $Calc($readini(Ninja.ini,$1,TaiOff) + 1500)
      Writeini Ninja.ini $1 NinOff $Calc($readini(Ninja.ini,$1,NinOff) + 1500) 
      Writeini Ninja.ini $1 GenOff $Calc($readini(Ninja.ini,$1,GenOff) + 1500) 
      Writeini Ninja.ini $1 WepOff $Calc($readini(Ninja.ini,$1,WepOff) + 1500)
      Writeini Ninja.ini $1 TaiDef $Calc($readini(Ninja.ini,$1,TaiDef) + 1500)
      Writeini Ninja.ini $1 NinDef $Calc($readini(Ninja.ini,$1,NinDef) + 1500)
      Writeini Ninja.ini $1 GenDef $Calc($readini(Ninja.ini,$1,GenDef) + 1500)
      Writeini Ninja.ini $1 WepDef $Calc($readini(Ninja.ini,$1,WepDef) + 1500)
      Writeini Ninja.ini $1 Intell $Calc($readini(Ninja.ini,$1,Intell) + 1500)
      Writeini Ninja.ini $1 Strength $Calc($readini(Ninja.ini,$1,Strength) + 1500)
      Heal $1
    }
  }
  if ($readini(Ninja.ini,$1,Rank) == Special Jounin) {
    if ($readini(Ninja.ini,$1,LvL) >= 49) {
      Msg %Chan Congrats $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) $+ , You are now Sennin!
      Writeini Ninja.ini $1 Rank Sennin
      Writeini Ninja.ini $1 MHp $Calc($readini(Ninja.ini,$1,MHp) + 8000)
      Writeini Ninja.ini $1 MSp $Calc($readini(Ninja.ini,$1,MSp) + 8000)
      Writeini Ninja.ini $1 MCp $Calc($readini(Ninja.ini,$1,MCp) + 8000)
      Writeini Ninja.ini $1 Ryo $Calc($readini(Ninja.ini,$1,Ryo) + 40000)
      Writeini Ninja.ini $1 TaiOff $Calc($readini(Ninja.ini,$1,TaiOff) + 4000)
      Writeini Ninja.ini $1 NinOff $Calc($readini(Ninja.ini,$1,NinOff) + 4000) 
      Writeini Ninja.ini $1 GenOff $Calc($readini(Ninja.ini,$1,GenOff) + 4000) 
      Writeini Ninja.ini $1 WepOff $Calc($readini(Ninja.ini,$1,WepOff) + 4000)
      Writeini Ninja.ini $1 TaiDef $Calc($readini(Ninja.ini,$1,TaiDef) + 4000)
      Writeini Ninja.ini $1 NinDef $Calc($readini(Ninja.ini,$1,NinDef) + 4000)
      Writeini Ninja.ini $1 GenDef $Calc($readini(Ninja.ini,$1,GenDef) + 4000)
      Writeini Ninja.ini $1 WepDef $Calc($readini(Ninja.ini,$1,WepDef) + 4000)
      Writeini Ninja.ini $1 Intell $Calc($readini(Ninja.ini,$1,Intell) + 4000)
      Writeini Ninja.ini $1 Strength $Calc($readini(Ninja.ini,$1,Strength) + 4000)
      Heal $1
    }
  }
  if ($readini(Ninja.ini,$1,Rank) == Sennin) {
    if ($readini(Ninja.ini,$1,LvL) >= 100) {
      Msg %Chan Congrats $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) $+ , You are now Kage!
      Writeini Ninja.ini $1 Rank Kage
      Writeini Ninja.ini $1 MHp $Calc($readini(Ninja.ini,$1,MHp) + 20000)
      Writeini Ninja.ini $1 MSp $Calc($readini(Ninja.ini,$1,MSp) + 20000)
      Writeini Ninja.ini $1 MCp $Calc($readini(Ninja.ini,$1,MCp) + 20000)
      Writeini Ninja.ini $1 Ryo $Calc($readini(Ninja.ini,$1,Ryo) + 100000)
      Writeini Ninja.ini $1 TaiOff $Calc($readini(Ninja.ini,$1,TaiOff) + 10000)
      Writeini Ninja.ini $1 NinOff $Calc($readini(Ninja.ini,$1,NinOff) + 10000) 
      Writeini Ninja.ini $1 GenOff $Calc($readini(Ninja.ini,$1,GenOff) + 10000) 
      Writeini Ninja.ini $1 WepOff $Calc($readini(Ninja.ini,$1,WepOff) + 10000)
      Writeini Ninja.ini $1 TaiDef $Calc($readini(Ninja.ini,$1,TaiDef) + 10000)
      Writeini Ninja.ini $1 NinDef $Calc($readini(Ninja.ini,$1,NinDef) + 10000)
      Writeini Ninja.ini $1 GenDef $Calc($readini(Ninja.ini,$1,GenDef) + 10000)
      Writeini Ninja.ini $1 WepDef $Calc($readini(Ninja.ini,$1,WepDef) + 10000)
      Writeini Ninja.ini $1 Intell $Calc($readini(Ninja.ini,$1,Intell) + 10000)
      Writeini Ninja.ini $1 Strength $Calc($readini(Ninja.ini,$1,Strength) + 10000)
      Heal $1
    }
  }
  if ($readini(Ninja.ini,$1,Rank) == Kage) {
    if ($readini(Ninja.ini,$1,LvL) >= 1000) {
      Msg %Chan Congrats $Nick $+ ( $+ $readini(Ninja.ini,$Nick,Character) $+ ) $+ , You are now God!
      Writeini Ninja.ini $1 Rank God
      Writeini Ninja.ini $1 MHp $Calc($readini(Ninja.ini,$1,MHp) + 500000)
      Writeini Ninja.ini $1 MSp $Calc($readini(Ninja.ini,$1,MSp) + 500000)
      Writeini Ninja.ini $1 MCp $Calc($readini(Ninja.ini,$1,MCp) + 500000)
      Writeini Ninja.ini $1 Ryo $Calc($readini(Ninja.ini,$1,Ryo) + 1000000)
      Writeini Ninja.ini $1 TaiOff $Calc($readini(Ninja.ini,$1,TaiOff) + 100000)
      Writeini Ninja.ini $1 NinOff $Calc($readini(Ninja.ini,$1,NinOff) + 100000) 
      Writeini Ninja.ini $1 GenOff $Calc($readini(Ninja.ini,$1,GenOff) + 100000) 
      Writeini Ninja.ini $1 WepOff $Calc($readini(Ninja.ini,$1,WepOff) + 100000)
      Writeini Ninja.ini $1 TaiDef $Calc($readini(Ninja.ini,$1,TaiDef) + 100000)
      Writeini Ninja.ini $1 NinDef $Calc($readini(Ninja.ini,$1,NinDef) + 100000)
      Writeini Ninja.ini $1 GenDef $Calc($readini(Ninja.ini,$1,GenDef) + 100000)
      Writeini Ninja.ini $1 WepDef $Calc($readini(Ninja.ini,$1,WepDef) + 100000)
      Writeini Ninja.ini $1 Intell $Calc($readini(Ninja.ini,$1,Intell) + 100000)
      Writeini Ninja.ini $1 Strength $Calc($readini(Ninja.ini,$1,Strength) + 100000)
      Heal $1
    }
  }
}

Comments

Sign in to comment.
ChunkieMonkey   -  Jul 08, 2008

Hate to bring up old stuff, but why would you need instructions when you can see the script? Simple enough...

 Respond  
CYber_Mewthree   -  Jul 23, 2007

Um can i ask my when i attack it doesnt show ? plz anwser me when u get ur chonce

 Respond  
DaNzO   -  Jun 15, 2007

maybe some instructions -.-

 Respond  
WhiteRaVeN   -  May 07, 2007

hey - thanks for the aliases,
did the obvious ones like heal manually into the original release,
still trying to figute out why the !buy doesnt work eish

 Respond  
Darkkeeper   -  Apr 10, 2007

lol did under the other one

 Respond  
Sasuke   -  Apr 10, 2007

:D Better write down, \"Erase everything from Heal } down in the first part.\"

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.