Threaded Mode | Linear Mode

***Ben*** · 03-25-2014 09:20 AM

Code:

[FUNCTION CHECK]

WHILE (<TAG0.EXP> >= <TAG0.EXPNEEDED>)

    IF (<TAG0.LEVEL> >= 250)

    TAG.EXPNEEDED += 30000

    ELSEIF (<TAG0.LEVEL> >= 200)

    TAG.EXPNEEDED += 27500

    ELSEIF (<TAG0.LEVEL> >= 175)

    TAG.EXPNEEDED += 25000

    ELSEIF (<TAG0.LEVEL> >= 150)

    TAG.EXPNEEDED += 22500

    ELSEIF (<TAG0.LEVEL> >= 125)

    TAG.EXPNEEDED += 20000

    ELSEIF (<TAG0.LEVEL> >= 100)

    TAG.EXPNEEDED += 15000

    ELSEIF (<TAG0.LEVEL> >= 75)

    TAG.EXPNEEDED += 12500

    ELSEIF (<TAG0.LEVEL> >= 50)

    TAG.EXPNEEDED += 11000

    ELSEIF (<TAG0.LEVEL> >= 30)

    TAG.EXPNEEDED += 10000

    ELSEIF (<TAG0.LEVEL> >= 25)

    TAG.EXPNEEDED += 9000

    ELSEIF (<TAG0.LEVEL> >= 20)

    TAG.EXPNEEDED += 8000

    ELSEIF (<TAG0.LEVEL> >= 15)

    TAG.EXPNEEDED += 7000

    ELSEIF (<TAG0.LEVEL> >= 10)

    TAG.EXPNEEDED += 6000

    ELSEIF (<TAG0.LEVEL> >= 5)

    TAG.EXPNEEDED += 5000

    ELSE

    TAG.EXPNEEDED += 2500

    ENDIF

  LEVELUP

ENDWHILE

[FUNCTION levelup]

EFFECT=3,i_fx_sparkle,15,15,1

SOUND=snd_SPELL_LIGHTNING

TAG0.LEVEL += 1

SYSMESSAGE @91 You have just gained a level! You are at level <dTAG0.LEVEL>.

IF (<FINDID.i_experience_skill_points.UID>)

    IF (<FINDID.i_experience_skill_points.MORE1> > <EVAL 2*60*60>) //2 hours

    local.X=<EVAL {3 6}>

    ELSEIF (<FINDID.i_experience_skill_points.MORE1> > <EVAL 1*60*60>) //1 hour

    local.X=<EVAL {4 7}>

    ELSEIF (<FINDID.i_experience_skill_points.MORE1> > <EVAL 1*60*15>) //30 mins

    local.X=<EVAL {5 8}>

    ELSE

    local.X=<EVAL {6 9}>

    ENDIF

    IF (STRMATCH(<ACCOUNT>,Silver)) || (STRMATCH(<ACCOUNT>,julie)) || (STRMATCH(<ACCOUNT>,darkomen99)) || (STRMATCH(<ACCOUNT>,Spandex)) || (STRMATCH(<ACCOUNT>,ZestyMonkey))

    local.X *= 2

    ENDIF

    FINDID.i_experience_skill_points.MORE1=0

ELSE

    local.X=<EVAL {4 7}>

    SERV.NEWITEM=i_experience_skill_points

    NEW.EQUIP

ENDIF

TAG.POINTS += <local.X>

SYSMESSAGE @91 You have earned <dlocal.X> skill points.

IF (<EVAL <OSTR>+<OINT>+<ODEX>> < 1500)

    local.y=1

    IF !(RAND(3))

    local.y += <EVAL {1 4}>

    ENDIF

    IF !(RAND(4))

    local.y += <EVAL {1 3}>

    ENDIF

    IF !(RAND(5))

    local.y += <EVAL {1 2}>

    ENDIF

    TAG0.POINTS_STATS += <local.y>

    SYSMESSAGE @91 You gain <dlocal.y> stat points!

ENDIF

This should do the trick... with a lot of the syntax updated to 56c

Threaded Mode \| Linear Mode need explain...
Author	Message