FANDOM


Created by Taz.

Using "RC_Core.rcm"
; testingrc1 1.26
; Date/Time: 10:09:59 PM on 7/9/2009
; By Tazco on NADDAZ
; Mark of bears
 ;allow to be placed on target and player
Function Main()
Player% = Actor()
Target% = ContextActor()
Pname$ = Name(Player)
Prayerlvl% = Attribute(Player, "Prayer")
PlayerLevel% = ActorLevel(Player)
BuffLevel% = AbilityLevel(Player, "Buff mark of bears")
Buffamount% = Prayerlvl + PlayerLevel + Bufflevel * 4 / 27 ; buff amount seems to work just needs some tweaking

ScriptLog("Mark of bears running by " + Pname)

If (Prayerlvl <= 2)
    OutPut(Player, "You need to recharge your prayer, to use this buff, you need 2 prayer points.", 245, 123, 123)
    Return
 EndIf 
 
 Buffcost% = Attribute(Player, "Prayer") - 2
 SetAttribute(Player, "Prayer", Buffcost)  ; take 1 prayer from player for buff cost
 
 If (BuffAmount > 75) ;set max amount that buff can be
     Buffamount% = 75
EndIf   

Doevents(500)
If (Prayerlvl >= 5) ; set prayer level required to use ability
 
     AddActorEffect(Player, "Mark of bears + Str", "Strength", Buffamount, 3600, 246) ; add buff icon should last 1 hour
    OutPut(Player, "You have buffed yourself with mark of bears for " + BuffAmount, 110, 54, 43)

Else
OutPut(Player, "You need a prayer level of 5 to use this Prayer ability", 125, 32, 43)
Return
EndIf




End Function