Cutting up monster bodies - Printable Version

Code:
IF (<ARGO.TYPE> == T_CORPSE) && (<IsWeapon>) // if this is a corpse and is being used a sharped weapon

    //If (<SRC.ISNEARTYPE <argo.type> 2>)    // if you target this body in 16 tiles distance but you have another body in 2 distance you'll pass this check

    if (<SRC.Distance <argo>> > 2)

        SRC.SysMessage=You must be near the corpse to carve it.

        return 1    // try to return executions ASAP.

    endif

    if (<argo.timestamp>==0)

        return 0

    endif

    //if (<argo.timestamp>)    // checking above the timestamp == 0 that you had under this code you stopped the code in this case, so you have now one less check.

    argo.timestamp=0

    f_skinning_try    // Skinning_try is executing no matter you have more than required skill or less, no need a check for it then

    if (<EVAL <DEF.SKIN_C_<SERV.CHARDEF.<eval <ARGO.MOREX>+<ARGO.MOREY>>.name.more1>>> >= <src.skinning>)    //Instead we call that check here just to see if we success or not, depending on the skill

        if (<r<EVAL <DEF.SKIN_C_<SERV.CHARDEF.<eval <ARGO.MOREX>+<ARGO.MOREY>>.name.more1>>>> > <src.skinning>)

            if (<R5> == 1)

                local.success=1    // and store the success to do not repeat the same code twice.

            endif

        endif

    elif (<EVAL <DEF.SKIN_C_<SERV.CHARDEF.<eval <ARGO.MOREX>+<ARGO.MOREY>>.name.more1>>> < <src.skinning>)

        if (<r<EVAL <DEF.SKIN_C_<SERV.CHARDEF.<eval <ARGO.MOREX>+<ARGO.MOREY>>.name.more1>>>> < <src.skinning>/5)

            local.success=1

        endif

    endif

    if (<local.success>==1)    // So we can call the success here once, if needed.

        f_skinning_success

        if (<src.skilltotal> < <src.skillclass.skillsum>)

            if (<src.skinning> < <src.skillclass.<serv.skill.skinning.key>>)

                if (<r<src.skinning>> <= 10) // gain skill chance

                    src.skinning += 1        // Can't remember now, but AFAIR .skillgain skinning (or something like that) can force an instant skillgain.

                    src.sysmessage @0120, Your skill in Skinning has increased by 0.1%. It is now <src.skinning>%

                endif

            endif

        endif

    else

        f_skinning_fail

    endif

else

    return 0

ENDIF