This is the Ranks module for MegaRPG.
Updated to work with NPC Module.
alias UpdateModule.Ranks {
if (!$readini(Players.ini,$1,Rank)) {
writeini Players.ini $1 Rank PleaseWait
if ($readini(Players.ini,$1,Level) < 10) { writeini Players.ini $1 Rank Noob }
if ($readini(Players.ini,$1,Level) >= 10) { writeini Players.ini $1 Rank Private }
if ($readini(Players.ini,$1,Level) >= 20) { writeini Players.ini $1 Rank Corporal }
if ($readini(Players.ini,$1,Level) >= 50) { writeini Players.ini $1 Rank Major }
if ($readini(Players.ini,$1,Level) >= 100) { writeini Players.ini $1 Rank Colonel }
if ($readini(Players.ini,$1,Level) >= 150) { writeini Players.ini $1 Rank Geneal }
if ($readini(Players.ini,$1,Level) >= 200) { writeini Players.ini $1 Rank Retired Soldier }
if ($readini(Players.ini,$1,Level) >= 500) { writeini Players.ini $1 Rank Adventurer }
if ($readini(Players.ini,$1,Level) >= 1000) { writeini Players.ini $1 Rank Immortal Slave }
if ($readini(Players.ini,$1,Level) >= 2000) { writeini Players.ini $1 Rank Immortal Being }
if ($readini(Players.ini,$1,Level) >= 5000) { writeini Players.ini $1 Rank Immortal Lord }
if ($readini(Players.ini,$1,Level) >= 10000) { writeini Players.ini $1 Rank Slayer }
if ($readini(Players.ini,$1,Level) >= 20000) { writeini Players.ini $1 Rank Troll Slayer }
if ($readini(Players.ini,$1,Level) >= 50000) { writeini Players.ini $1 Rank Dragon Slayer }
if ($readini(Players.ini,$1,Level) >= 100000) { writeini Players.ini $1 Rank Master Slayer }
if ($readini(Players.ini,$1,Level) >= 200000) { writeini Players.ini $1 Rank God }
if ($readini(Players.ini,$1,Level) >= 500000) { writeini Players.ini $1 Rank Super God }
if ($readini(Players.ini,$1,Level) >= 1000000) { writeini Players.ini $1 Rank Mega God }
if ($readini(Players.ini,$1,Level) >= 5000000) { writeini Players.ini $1 Rank God of Gods }
if ($readini(Players.ini,$1,Level) >= 10000000) { writeini Players.ini $1 Rank Immortal God of Gods }
AddNewMoves $1
}
levelcheck $1
}
alias AddNewMoves {
writeini Attacks.ini $1 Strike No
writeini Attacks.ini $1 LightningStrike No
writeini Attacks.ini $1 Tornado No
writeini Attacks.ini $1 TidalWave No
writeini Attacks.ini $1 GodStrike No
writeini Attacks.ini $1 BoltStrike No
writeini Attacks.ini $1 Smite No
if ($readini(Players.ini,$1,Level) >= 10) { writeini Attacks.ini $1 Strike Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) Strike }
if ($readini(Players.ini,$1,Level) >= 50) { writeini Attacks.ini $1 LightningStrike Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) LightningStrike }
if ($readini(Players.ini,$1,Level) >= 500) { writeini Attacks.ini $1 Tornado Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) Tornado }
if ($readini(Players.ini,$1,Level) >= 2000) { writeini Attacks.ini $1 TidalWave Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) TidalWave }
if ($readini(Players.ini,$1,Level) >= 200000) { writeini Attacks.ini $1 GodStrike Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) GodStrike }
if ($readini(Players.ini,$1,Level) >= 5000000) { writeini Attacks.ini $1 BoltStrike Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) BoltStrike }
if ($readini(Players.ini,$1,Level) >= 10000000) { writeini Attacks.ini $1 Smite Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) Smite }
notice $1 $Left Your account has Been Updated, Type `Stats to see your Rank and `Attacks to see any new attacks you have aquired $Right
}
alias RankCheck {
writeini Players.ini $1 Rank PleaseWait
if ($readini(Players.ini,$1,Level) < 10) { writeini Players.ini $1 Rank Noob }
if ($readini(Players.ini,$1,Level) >= 10) { writeini Players.ini $1 Rank Private }
if ($readini(Players.ini,$1,Level) >= 20) { writeini Players.ini $1 Rank Corporal }
if ($readini(Players.ini,$1,Level) >= 50) { writeini Players.ini $1 Rank Major }
if ($readini(Players.ini,$1,Level) >= 100) { writeini Players.ini $1 Rank Colonel }
if ($readini(Players.ini,$1,Level) >= 150) { writeini Players.ini $1 Rank Geneal }
if ($readini(Players.ini,$1,Level) >= 200) { writeini Players.ini $1 Rank Retired Soldier }
if ($readini(Players.ini,$1,Level) >= 500) { writeini Players.ini $1 Rank Adventurer }
if ($readini(Players.ini,$1,Level) >= 1000) { writeini Players.ini $1 Rank Immortal Slave }
if ($readini(Players.ini,$1,Level) >= 2000) { writeini Players.ini $1 Rank Immortal Being }
if ($readini(Players.ini,$1,Level) >= 5000) { writeini Players.ini $1 Rank Immortal Lord }
if ($readini(Players.ini,$1,Level) >= 10000) { writeini Players.ini $1 Rank Slayer }
if ($readini(Players.ini,$1,Level) >= 20000) { writeini Players.ini $1 Rank Troll Slayer }
if ($readini(Players.ini,$1,Level) >= 50000) { writeini Players.ini $1 Rank Dragon Slayer }
if ($readini(Players.ini,$1,Level) >= 100000) { writeini Players.ini $1 Rank Master Slayer }
if ($readini(Players.ini,$1,Level) >= 200000) { writeini Players.ini $1 Rank God }
if ($readini(Players.ini,$1,Level) >= 500000) { writeini Players.ini $1 Rank Super God }
if ($readini(Players.ini,$1,Level) >= 1000000) { writeini Players.ini $1 Rank Mega God }
if ($readini(Players.ini,$1,Level) >= 5000000) { writeini Players.ini $1 Rank God of Gods }
if ($readini(Players.ini,$1,Level) >= 10000000) { writeini Players.ini $1 Rank Immortal God of Gods }
NewMoves $1
levelcheck $1
}
alias NewMoves {
if ($readini(Players.ini,$1,Level) = 10) { writeini Attacks.ini $1 Strike Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) Strike }
if ($readini(Players.ini,$1,Level) = 50) { writeini Attacks.ini $1 LightningStrike Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) LightningStrike }
if ($readini(Players.ini,$1,Level) = 500) { writeini Attacks.ini $1 Tornado Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) Tornado }
if ($readini(Players.ini,$1,Level) = 2000) { writeini Attacks.ini $1 TidalWave Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) TidalWave }
if ($readini(Players.ini,$1,Level) = 200000) { writeini Attacks.ini $1 GodStrike Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) GodStrike }
if ($readini(Players.ini,$1,Level) = 5000000) { writeini Attacks.ini $1 BoltStrike Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) BoltStrike }
if ($readini(Players.ini,$1,Level) = 10000000) { writeini Attacks.ini $1 Smite Yes | writeini Attacks.ini $1 Attacks $readini(Attacks.ini,$1,Attacks) Smite }
notice $1 $Left Your account has Been Updated, Type `Attacks to see any new attacks you have aquired $Right
}
on *:TEXT:`Strike *:%MainChannel:{
if (!$readini(Players.ini,$nick,Registered)) { notice $Nick $left You need to Register. $right | halt }
if ($readini(Players.ini,$nick,LoggedIn) == No) { notice $nick $Left You must login first. $right | halt }
if ($readini(Players.ini,$nick,Class) == -) { notice $nick $left You have to select a class first. Type `ClassList to see classes $right | halt }
if ($readini(Players.ini,$nick,Fighting) != Yes) { notice $Nick $Left You are not Currently Fighting $Right | halt }
if ($readini(Attacks.ini,$Nick,Strike) == No) { Notice $nick $Left You cannot use this Attack! | halt }
if ($readini(Players.ini,$nick,SP) < 20) { notice $Nick $Left You do Not have Enough SP $Right | halt }
if (!$istok($strip(%BattleArena),$2,32)) { notice $nick $Left $2 is not Fighting. Try `entered $Right | halt }
if ($2 == $Nick) { notice $Nick $Left You can't attack yourself $Nick $+ ! $Right | halt }
if (!$istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15Strike $Right }
if ($istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 14with 15Strike $Right }
timerAttack $+ $Nick 1 20 Strike $nick $2
}
alias Strike {
if (!$istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(Players.ini,$2,Defence)) * 3 ))
set %EXPGained $rand(1,30)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15Strike14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini Players.ini $2 HP $calc($readini(Players.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 20)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
DeathCheck $2 $1
}
if ($istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(NPC.ini,$2,Defence)) * 3 ))
set %EXPGained $rand(1,30)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 14with 15Strike14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini NPC.ini $2 HP $calc($readini(NPC.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 20)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
NPCDeathCheck $2 $1
}
}
on *:TEXT:`LightningStrike *:%MainChannel:{
if (!$readini(Players.ini,$nick,Registered)) { notice $Nick $left You need to Register. $right | halt }
if ($readini(Players.ini,$nick,LoggedIn) == No) { notice $nick $Left You must login first. $right | halt }
if ($readini(Players.ini,$nick,Class) == -) { notice $nick $left You have to select a class first. Type `ClassList to see classes $right | halt }
if ($readini(Players.ini,$nick,Fighting) == No) { notice $Nick $Left You are not Currently Fighting $Right | halt }
if ($readini(Attacks.ini,$Nick,LightningStrike) == No) { Notice $nick $Left You cannot use this Attack! | halt }
if ($readini(Players.ini,$nick,SP) < 30) { notice $Nick $Left You do Not have Enough SP $Right | halt }
if (!$istok($strip(%BattleArena),$2,32)) { notice $nick $Left $2 is not Fighting. Try `entered $Right | halt }
if ($2 == $Nick) { notice $Nick $Left You can't attack yourself $Nick $+ ! $Right | halt }
if (!$istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15LightningStrike $Right }
if ($istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 14with 15LightningStrike $Right }
timerAttack $+ $Nick 1 25 LightningStrike $nick $2
}
alias LightningStrike {
if (!$istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(Players.ini,$2,Defence)) * 4 ))
set %EXPGained $rand(1,45)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15LightningStrike14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini Players.ini $2 HP $calc($readini(Players.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 30)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
DeathCheck $2 $1
}
if ($istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(NPC.ini,$2,Defence)) * 4 ))
set %EXPGained $rand(1,45)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 14with 15LightningStrike14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini NPC.ini $2 HP $calc($readini(NPC.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 30)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
NPCDeathCheck $2 $1
}
}
on *:TEXT:`Tornado *:%MainChannel:{
if (!$readini(Players.ini,$nick,Registered)) { notice $Nick $left You need to Register. $right | halt }
if ($readini(Players.ini,$nick,LoggedIn) == No) { notice $nick $Left You must login first. $right | halt }
if ($readini(Players.ini,$nick,Class) == -) { notice $nick $left You have to select a class first. Type `ClassList to see classes $right | halt }
if ($readini(Players.ini,$nick,Fighting) == No) { notice $Nick $Left You are not Currently Fighting $Right | halt }
if ($readini(Attacks.ini,$Nick,Tornado) == No) { Notice $nick $Left You cannot use this Attack! | halt }
if ($readini(Players.ini,$nick,SP) < 70) { notice $Nick $Left You do Not have Enough SP $Right | halt }
if (!$istok($strip(%BattleArena),$2,32)) { notice $nick $Left $2 is not Fighting. Try `entered $Right | halt }
if ($2 == $Nick) { notice $Nick $Left You can't attack yourself $Nick $+ ! $Right | halt }
if (!$istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15Tornado $Right }
if ($istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 14with 15Tornado $Right }
timerAttack $+ $Nick 1 25 Tornado $nick $2
}
alias Tornado {
if (!$istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(Players.ini,$2,Defence)) * 6 ))
set %EXPGained $rand(1,100)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15Tornado14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini Players.ini $2 HP $calc($readini(Players.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 70)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
DeathCheck $2 $1
}
if ($istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(NPC.ini,$2,Defence)) * 6 ))
set %EXPGained $rand(1,100)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 14with 15Tornado14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini NPC.ini $2 HP $calc($readini(NPC.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 70)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
NPCDeathCheck $2 $1
}
}
on *:TEXT:`Tidalwave *:%MainChannel:{
if (!$readini(Players.ini,$nick,Registered)) { notice $Nick $left You need to Register. $right | halt }
if ($readini(Players.ini,$nick,LoggedIn) == No) { notice $nick $Left You must login first. $right | halt }
if ($readini(Players.ini,$nick,Class) == -) { notice $nick $left You have to select a class first. Type `ClassList to see classes $right | halt }
if ($readini(Players.ini,$nick,Fighting) == No) { notice $Nick $Left You are not Currently Fighting $Right | halt }
if ($readini(Attacks.ini,$Nick,TidalWave) == No) { Notice $nick $Left You cannot use this Attack! | halt }
if ($readini(Players.ini,$nick,SP) < 80) { notice $Nick $Left You do Not have Enough SP $Right | halt }
if (!$istok($strip(%BattleArena),$2,32)) { notice $nick $Left $2 is not Fighting. Try `entered $Right | halt }
if ($2 == $Nick) { notice $Nick $Left You can't attack yourself $Nick $+ ! $Right | halt }
if (!$istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15TidalWave $Right }
if ($istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 14with 15TidalWave $Right }
timerAttack $+ $Nick 1 25 TidalWave $nick $2
}
alias TidalWave {
if (!$istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(Players.ini,$2,Defence)) * 7 ))
set %EXPGained $rand(1,200)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15TidalWave14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini Players.ini $2 HP $calc($readini(Players.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 80)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
DeathCheck $2 $1
}
if ($istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(NPC.ini,$2,Defence)) * 7 ))
set %EXPGained $rand(1,200)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 14with 15TidalWave14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini NPC.ini $2 HP $calc($readini(NPC.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 80)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
NPCDeathCheck $2 $1
}
}
on *:TEXT:`GodStrike *:%MainChannel:{
if (!$readini(Players.ini,$nick,Registered)) { notice $Nick $left You need to Register. $right | halt }
if ($readini(Players.ini,$nick,LoggedIn) == No) { notice $nick $Left You must login first. $right | halt }
if ($readini(Players.ini,$nick,Class) == -) { notice $nick $left You have to select a class first. Type `ClassList to see classes $right | halt }
if ($readini(Players.ini,$nick,Fighting) == No) { notice $Nick $Left You are not Currently Fighting $Right | halt }
if ($readini(Attacks.ini,$Nick,GodStrike) == No) { Notice $nick $Left You cannot use this Attack! | halt }
if ($readini(Players.ini,$nick,SP) < 100) { notice $Nick $Left You do Not have Enough SP $Right | halt }
if (!$istok($strip(%BattleArena),$2,32)) { notice $nick $Left $2 is not Fighting. Try `entered $Right | halt }
if ($2 == $Nick) { notice $Nick $Left You can't attack yourself $Nick $+ ! $Right | halt }
if (!$istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15GodStrike $Right }
if ($istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 14with 15GodStrike $Right }
timerAttack $+ $Nick 1 30 GodStrike $nick $2
}
alias GodStrike {
if (!$istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(Players.ini,$2,Defence)) * 10 ))
set %EXPGained $rand(1,300)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15GodStrike14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini Players.ini $2 HP $calc($readini(Players.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 100)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
DeathCheck $2 $1
}
if ($istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(NPC.ini,$2,Defence)) * 10 ))
set %EXPGained $rand(1,300)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 14with 15GodStrike14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini NPC.ini $2 HP $calc($readini(NPC.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 100)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
NPCDeathCheck $2 $1
}
}
on *:TEXT:`BoltStrike *:%MainChannel:{
if (!$readini(Players.ini,$nick,Registered)) { notice $Nick $left You need to Register. $right | halt }
if ($readini(Players.ini,$nick,LoggedIn) == No) { notice $nick $Left You must login first. $right | halt }
if ($readini(Players.ini,$nick,Class) == -) { notice $nick $left You have to select a class first. Type `ClassList to see classes $right | halt }
if ($readini(Players.ini,$nick,Fighting) == No) { notice $Nick $Left You are not Currently Fighting $Right | halt }
if ($readini(Attacks.ini,$Nick,BoltStrike) == No) { Notice $nick $Left You cannot use this Attack! | halt }
if ($readini(Players.ini,$nick,SP) < 150) { notice $Nick $Left You do Not have Enough SP $Right | halt }
if (!$istok($strip(%BattleArena),$2,32)) { notice $nick $Left $2 is not Fighting. Try `entered $Right | halt }
if ($2 == $Nick) { notice $Nick $Left You can't attack yourself $Nick $+ ! $Right | halt }
if (!$istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15BoltStrike $Right }
if ($istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 14with 15BoltStrike $Right }
timerAttack $+ $Nick 1 45 BoltStrike $nick $2
}
alias BoltStrike {
if (!$istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(Players.ini,$2,Defence)) * 15 ))
set %EXPGained $rand(1,500)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15BoltStrike14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini Players.ini $2 HP $calc($readini(Players.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 150)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
DeathCheck $2 $1
}
if ($istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(NPC.ini,$2,Defence)) * 15 ))
set %EXPGained $rand(1,500)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 14with 15BoltStrike14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini NPC.ini $2 HP $calc($readini(NPC.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 150)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
NPCDeathCheck $2 $1
}
}
on *:TEXT:`Smite *:%MainChannel:{
if (!$readini(Players.ini,$nick,Registered)) { notice $Nick $left You need to Register. $right | halt }
if ($readini(Players.ini,$nick,LoggedIn) == No) { notice $nick $Left You must login first. $right | halt }
if ($readini(Players.ini,$nick,Class) == -) { notice $nick $left You have to select a class first. Type `ClassList to see classes $right | halt }
if ($readini(Players.ini,$nick,Fighting) == No) { notice $Nick $Left You are not Currently Fighting $Right | halt }
if ($readini(Attacks.ini,$Nick,Smite) == No) { Notice $nick $Left You cannot use this Attack! | halt }
if ($readini(Players.ini,$nick,SP) < 500) { notice $Nick $Left You do Not have Enough SP $Right | halt }
if (!$istok($strip(%BattleArena),$2,32)) { notice $nick $Left $2 is not Fighting. Try `entered $Right | halt }
if ($2 == $Nick) { notice $Nick $Left You can't attack yourself $Nick $+ ! $Right | halt }
if (!$istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15Smite $Right }
if ($istok(%NPC.Names,$2,32)) { msg %MainChannel $Left 15 $+ $Nick $+ 14(15 $+ $readini(Players.ini,$Nick,Character_Name) $+ 14) Is about to Attack15 $2 14with 15Smite $Right }
timerAttack $+ $Nick 1 60 Smite $nick $2
}
alias Smite {
if (!$istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(Players.ini,$2,Defence)) * 30 ))
set %EXPGained $rand(1,2000)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 $+ 14(15 $+ $readini(Players.ini,$2,Character_Name) $+ 14) with 15Smite14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini Players.ini $2 HP $calc($readini(Players.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 500)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
DeathCheck $2 $1
}
if ($istok(%NPC.Names,$2,32)) {
set %Damage $rand(1,$calc(($readini(Players.ini,$1,Attack) - $readini(NPC.ini,$2,Defence)) * 30 ))
set %EXPGained $rand(1,2000)
if (%Damage < 1) || (%Damage == $Null) { set %Damage 1 }
msg %MainChannel $Left 15 $+ $1 $+ 14(15 $+ $readini(Players.ini,$1,Character_Name) $+ 14) has Just Attacked15 $2 14with 15Smite14 for15 %Damage 14HP of Damage $Right
notice $1 $Left You gained15 %EXPGained 14Experience for That Hit! $Right
writeini NPC.ini $2 HP $calc($readini(NPC.ini,$2,HP) - %damage)
writeini Players.ini $1 SP $calc($readini(Players.ini,$1,SP) - 500)
writeini Players.ini $1 EXP $Calc($readini(Players.ini,$1,EXP) + %EXPGained)
LevelCheck $1
NPCDeathCheck $2 $1
}
}