The following warnings occurred:
Warning [2] Use of undefined constant SAPI_NAME - assumed 'SAPI_NAME' (this will throw an Error in a future version of PHP) - Line: 3388 - File: inc/functions.php PHP 7.4.33-nmm7 (Linux)
File Line Function
/inc/functions.php 3388 errorHandler->error
/showthread.php 116 build_archive_link
Warning [2] Use of undefined constant IN_ARCHIVE - assumed 'IN_ARCHIVE' (this will throw an Error in a future version of PHP) - Line: 3331 - File: inc/functions.php PHP 7.4.33-nmm7 (Linux)
File Line Function
/inc/functions.php 3331 errorHandler->error
/inc/functions.php 3324 build_forum_breadcrumb
/showthread.php 195 build_forum_breadcrumb
Warning [2] Use of undefined constant IN_ARCHIVE - assumed 'IN_ARCHIVE' (this will throw an Error in a future version of PHP) - Line: 3331 - File: inc/functions.php PHP 7.4.33-nmm7 (Linux)
File Line Function
/inc/functions.php 3331 errorHandler->error
/showthread.php 195 build_forum_breadcrumb






Post Reply 
 
Thread Rating:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Share exp with party
Author Message
Joe Loop
Apprentice
*

Posts: 23
Likes Given: 0
Likes Received: 0 in 0 posts
Joined: Dec 2012
Reputation: 0



Post: #1
Share exp with party
Hi there i have made this script:


ON=@DEATH
sound=1110
sound=1237
src.act.sysmessage @00787 You have 20sec. to "claim" quest loot.
serv.newitem=i_quest_shrine
new.name Corpse of: <name>
new.drop
updatex
IF (<src.maxhits>>100000)
IF (<ATTACKER> > 0)
FOR x 0 <EVAL <ATTACKER>-1>
REF99=<ATTACKER.<LOCAL.X>> //REF99 is a reference to an attacker
REF99.SAYUA 0a0a,2,0,eng,-Did <ATTACKER.<EVAL <LOCAL.X>>.DAM> dmg-
IF (<REF99.FLAGS> & statf_pet)
REF99.say i have <ref99.hits> life left
REF99.tag0.petexp +=20
REF99.update 1
ENDIF
REF99.TAG0.WorldRep += 1000
REF99.sysmessage @051e You have gained an unbeliveable huge amount of world reputation....pretty epic: +1000
ENDFOR
REF100=<ATTACKER.MAX>
REF100.TAG0.WorldRep += 350
REF99.NEWITEM={ i_bottle_ichor 2 i_powdered_iron 2 i_relic_fragment 4 i_magical_residue 5 i_crushed_glass 7 i_potion_heal 1 },{5 10}
NEW.bounce
REF100.sysmessage @051e Most damage dealt bonus, additional world reputation: +350
ENDIF
ELSE
IF (<src.maxhits>>12000)
IF (<ATTACKER> > 0)
FOR x 0 <EVAL <ATTACKER>-1>
REF99=<ATTACKER.<LOCAL.X>> //REF99 is a reference to an attacker
REF99.SAYUA 0a0a,2,0,eng,-Did <ATTACKER.<EVAL <LOCAL.X>>.DAM> dmg-
IF (<REF99.FLAGS> & statf_pet)
REF99.say i have <ref99.hits> life left
REF99.tag0.petexp +=1
REF99.update 1
ENDIF
REF99.TAG0.WorldRep += 350
REF99.sysmessage @051e You have gained a huge amount of world reputation +350
ENDFOR
REF100=<ATTACKER.MAX>
REF100.TAG0.WorldRep += 150
REF99.NEWITEM={ i_bottle_ichor 2 i_powdered_iron 2 i_relic_fragment 4 i_magical_residue 5 i_crushed_glass 6 i_potion_heal 1 },{2 10}
NEW.bounce
REF100.sysmessage @051e Most damage dealt bonus, additional world reputation: +150
ENDIF
ELSE

and so on and so on all the way down to 1 hp....


Question is, how do i add a "world rep/exp" bonus to party members, eventhou they havent reallt done any dmg? i would really like that...

And also please correct the script if its wrong in any way.
(This post was last modified: 12-22-2012 09:06 AM by Joe Loop.)
12-22-2012 09:04 AM
Find all posts by this user Like Post Quote this message in a reply
RanXerox
Master
**

Posts: 550
Likes Given: 1
Likes Received: 12 in 9 posts
Joined: Dec 2010
Reputation: 19



Post: #2
RE: Share exp with party
This one only rewards them if they are in the same region...

Code:
...snip...
      IF (<REF99.ISINPARTY>)
         FOR 0 <EVAL <REF99.PARTY.MEMBERS>-1>
            IF (<REF99.PARTY.MEMBER.<LOCAL._FOR>.REGION.DEFNAME>==<REF99.REGION.DEFNAME>)
               REF101=<SRC.PARTY.MEMBER.<LOCAL._FOR>.UID>
               IF (<REF101>!=<REF99>)
                  REF101.SAYUA 0a0a,2,0,eng,I am in <REF99.NAME>'s party... yay!
               ENDIF
            ENDIF
         ENDFOR
      ENDIF
...snip...
12-22-2012 09:34 AM
Find all posts by this user Like Post Quote this message in a reply
Joe Loop
Apprentice
*

Posts: 23
Likes Given: 0
Likes Received: 0 in 0 posts
Joined: Dec 2012
Reputation: 0



Post: #3
RE: Share exp with party
Thanks a lot, i very much like the "...snips..."'s Big Grin

But yeah its perfect and works like a charm
12-22-2012 07:07 PM
Find all posts by this user Like Post Quote this message in a reply
Post Reply 


Forum Jump:


User(s) browsing this thread: 1 Guest(s)