Taz's Level Up Script

Created by Taz.

Using "RC_Core.rcm"
; Test
 ; Date/Time: 3:10:47 PM on 10/7/2010
; By Naddaz on TAZCO
;basic Level up
 Function Main()
 
 	Player = Actor()
 
 	XP = ActorXP(Player)
 	Lvl = ActorLevel(Player)
     HP4Lvl% = MaxAttribute(Player, "Health") + 55
    MP4Lvl% = MaxAttribute(PLayer, "Mana") + 25
    Str4Lvl% = Attribute(Player, "Strength") + 1
    Dex4Lvl% = Attribute(Player, "Dextarity") + 2
    Mag4Lvl% = Attribute(Player, "Magic") + 1
    Tou4Lvl% = Attribute(Player, "Toughness") + 1
    
 
 	; Player gets a level-up
     ;Incress basic stats.
	If (XP > Lvl * 1000)
		Lvl = Lvl + 1
        SetMaxAttribute(Player, "Health", HP4Lvl) ;increase hp by 55 on level up
        SetAttribute(Player, "Health", HP4Lvl) ;increase hp by 55 on level up
        SetMaxAttribute(Player, "Mana", MP4Lvl) ;increase mp by 25 on level up
        SetAttribute(Player, "Mana", MP4Lvl) ;increase mp by 25 on level up
        SetMaxAttribute(Player, "Strength", Str4Lvl) ;increase str by 1 on level up
        SetAttribute(Player, "Strength", Str4Lvl) ;increase str by 1 on level up
        SetMaxAttribute(Player, "Dextarity", Dex4Lvl) ;increase dex by 2 on level up
        SetAttribute(Player, "Dextarity", Dex4Lvl) ;increase dex by 2 on level up
        SetMaxAttribute(Player, "Magic", Mag4Lvl) ;increase mag by 1 on level up
        SetAttribute(Player, "Magic", Mag4Lvl) ;increase mag by 1 on level up
        
 		SetActorLevel(Player, Lvl)
 		Output(Player, "You advanced to level " + Lvl)
 	EndIf
 
 	
 
 
 
 End Function