L2Net Scripts

[JaharakaL]

Aura Force Toggles - Awaken Classes

 

//*****Awakened Toggles*****//
DEFINE_GLOBAL THREAD THREADAURAEFFECT AURAEFFECT
DEFINE_GLOBAL SORTEDLIST AURAFORCES

THREADAURAEFFECT.START

DO
SLEEP 200000000000
LOOP ZERO == ZERO
END_SCRIPT
RETURN VOID

FUNCTION AURAEFFECT
DO
PRINT_TEXT "Check Toggles Initialized"
    GET_EFFECTS AURAFORCES "<&CHAR_ID&>"
CALL AURAFORCE
    SLEEP 1000
LOOP ZERO == ZERO
RETURN VOID


FUNCTION AURAFORCE
SWITCH CHAR_CLASS
    CASE 139
        IF ( ( "AURAFORCES.CONTAINS_KEY 1927" == FALSE ) && ( CHAR_CUR_HP != 0 ) )
            USE_SKILL_SMART 1927
        ENDIF
        BREAK 1
    CASE 140
        IF ( ( "AURAFORCES.CONTAINS_KEY 1929" == FALSE ) && ( CHAR_CUR_HP != 0 ) )
            USE_SKILL_SMART 1929
        ENDIF
        BREAK 1
    CASE 141
        IF ( ( "AURAFORCES.CONTAINS_KEY 1931" == FALSE ) && ( CHAR_CUR_HP != 0 ) )
            USE_SKILL_SMART 1931
        ENDIF
        BREAK 1    
    CASE 142
        IF ( ( "AURAFORCES.CONTAINS_KEY 1933" == FALSE ) && ( CHAR_CUR_HP != 0 ) )
            USE_SKILL_SMART 1933
        ENDIF
        BREAK 1
    CASE 143
        IF ( ( "AURAFORCES.CONTAINS_KEY 1935" == FALSE ) && ( CHAR_CUR_HP != 0 ) )
            USE_SKILL_SMART 1935
        ENDIF
        BREAK 1
    CASE 145
        IF ( ( "AURAFORCES.CONTAINS_KEY 1937" == FALSE ) && ( CHAR_CUR_HP != 0 ) )
            USE_SKILL_SMART 1937
        ENDIF
        BREAK 1
    CASE 146
        IF ( ( "AURAFORCES.CONTAINS_KEY 1939" == FALSE ) && ( CHAR_CUR_HP != 0 ) )
            USE_SKILL_SMART 1939
            GET_EFFECTS AURAFORCES "<&CHAR_ID&>"
        ENDIF
        BREAK 1
ENDSWITCH
RETURN VOID

 

Kill function with random skill rotation

 

The only thing you need to change its the ID of the skills.

 

FUNCTION Kill

DEFINE INT Num 1
DEFINE INT SKILL1 11513        //aoe
DEFINE INT SKILL2 11514        //aoe
DEFINE INT SKILL3 11509        //single
DEFINE INT SKILL4 11510        //single
DEFINE INT SKILL5 11511        //single
DEFINE INT TEMPSKILL 11513
DEFINE ARRAYLIST NPCLIST 0
DEFINE INT COUNT 0

WHILE 1 == 1
    COUNT = 0
    GET_NPCS NPCLIST
    FOREACH N NPC NPCLIST
        IF ( NPCLIST.N.ID IN_RANGE 800 ) && ( NPCLIST.N.ATTACKABLE == 1 ) && ( NPCLIST.N.LOOKS_DEAD == 0 )
        COUNT = COUNT + 1    
        ENDIF
    NEXTEACH
    SLEEP 200
    IF ( COUNT > 3 ) //if there are more than 3 mobs it will only use aoe skills to save MP
        WHILE TARGET_CUR_HP > 0
            GET_RAND Num 1 2
            TEMPSKILL = "SKILL<&Num&>"
            USE_SKILL_SMART "<&TEMPSKILL&>"
            SLEEP 1000
        WEND
    ENDIF

    IF ( COUNT <= 3 ) && ( COUNT > 0 ) //if there are 3 or less mobs it will use all defined skills
        WHILE TARGET_CUR_HP > 0
            GET_RAND Num 1 5
            TEMPSKILL = "SKILL<&Num&>"
            USE_SKILL_SMART "<&TEMPSKILL&>"
            SLEEP 400
        WEND
    ELSE
        PRINT_TEXT "No mobs... sleeping"
        SLEEP 1000
    ENDIF
WEND
RETURN VOID  

[Start/Pwned]

nice bro

[jarman]

man u have script of "egg delivery quest"?