[Услуги] Важно: готовые скрипты для L2.NET (ltwonet.com)

[¤S®ID€R¤]

WC/OL/SWS/BD High Rate buffer

/ Target based activation script for support classes
// v1.0 by d00d [07/06/08]
//
INCLUDE StdLib\player.l2c
SET_EVENT "<&SCRIPTEVENT_SELFTARGETED&>" look_buffer.l2s OBSERVE_BUFFS
SET_EVENT "<&SCRIPTEVENT_OTHERSKILLUSED&>" look_buffer.l2s OBSERVE_SUPPORT
// Set Group Master
DEFINE_GLOBAL STRING OWNER "d00d"


// Support Group Archtypes

DEFINE_GLOBAL STRING BLADE_DANCER "bladedancer"
DEFINE_GLOBAL STRING SWORD_SINGER "sws"
DEFINE_GLOBAL STRING PROPHET "prophet"
DEFINE_GLOBAL STRING SHILLEN_ELDER "SENAME"
DEFINE_GLOBAL STRING ELVEN_ELDER "EENAME"
DEFINE_GLOBAL STRING WARLOCK "warlock"
DEFINE_GLOBAL STRING BISHOP "bishop"
DEFINE_GLOBAL STRING WARCRYER "warcryer"
DEFINE_GLOBAL STRING ELEMENTAL_SUMMONER "ESNAME"
DEFINE_GLOBAL STRING OVERLORD "Overlord"

// Misc Variables
DEFINE_GLOBAL INT IN_PARTY 0

// Trigger skills

DEFINE_GLOBAL INT TRIGGER_POWER_STRIKE 3
DEFINE_GLOBAL INT TRIGGER_POWER_SMASH 255
DEFINE_GLOBAL INT TRIGGER_FATAL_STRIKE 190


// Blade Dancer Group Buffs
//
// Dance of the Warrior Skill ID 271 (Increase PATK)
// Dance of Inspiration Skill ID 272 (Increase Accuracy)
// Dance of the Mystic Skill ID 273 (Incrase MATK)
// Dance of Fire Skill ID 274 (Increase Crit Power)
// Dance of Fury Skill ID 275 (Increase Attack Speed)
// Dance of Concentration Skill ID 276 (Increase Casting Speed)
// Dance of Light Skill ID 277 (Holy Attribute on Physical Hits)
// Dance of Aqua Guard Skill ID 307 (Resist Water Attribute)
// Dance of Earth Guard Skill ID 309 (Resist Earth Attribute)
// Dance of the Vampire Skill ID 310 (Vampiric Rage)
// Dance of Protection Skill ID 311 (Reduces terrain damage)
//
// Spectral Dancer Group Buffs
//
// Dance of Blade Storm Skill ID 765 (Greatly reduce Archery Damage for 15s)
// Dance of Siren Skill ID 365 (Increase Magic Critical Rate)
// Dance of Shadow Skill ID 366 (Silent Walk)

DEFINE_GLOBAL ARRAYLIST BUFF_BD 0
BUFF_BD.ADD I275
BUFF_BD.ADD I310
BUFF_BD.ADD I274
BUFF_BD.ADD I271


// Sword Singer Group Buffs
//
// Song of Earth Skill ID 264 (Increase PDEF)
// Song of Life Skill ID 265 (Increase HP Regen Rate)
// Song of Water Skill ID 266 (Increase Evasion)
// Song of Warding Skill ID 267 (Increase MDEF)
// Song of Wind Skill ID 268 (Increase Run Speed)
// Song of Hunter Skill ID 269 (Increase Critical Rate)
// Song of Invocation Skill ID 270 (Resist Unholy Attribute)
// Song of Vitality Skill ID 304 (Increase Max HP)
// Song of Vengeance Skill ID 305 (Melee Damage Reflect)
// Song of Flame Guard Skill ID 306 (Resist Fire Attribute)
// Song of Storm Guard Skill ID 308 (Resist Wind Attribute)
//
// Sword Muse Group Buffs
//
// Song of Wind Storm Skill ID 764 (Resist Archery Attacks)
// Song of Renewal Skill ID 349 (General Reuse Delay Bonus + Reduce Physical Skill Cost)
// Song of Meditation Skill ID 363 (Increase MP Regen Rate + Reduce Magic skill cost)
// Song of Champion Skill ID 364 (Reduce Physical Skill Reuse Delay + Physical Skill Cost)


DEFINE_GLOBAL ARRAYLIST BUFF_SWS 0

BUFF_SWS.ADD I364
BUFF_SWS.ADD I349
BUFF_SWS.ADD I363
BUFF_SWS.ADD I264
BUFF_SWS.ADD I269


// Prophet Buffs
//
// Invigor Skill ID 1032 (Resist Bleed Attribute)
// Resist Poison Skill ID 1033 (Resist Poison Attribute)
// Mental Shield Skill ID 1035 (Resist Derrangement, Sleep and Root Attributes)
// Magic Barrier Skill ID 1036 (Increase MDEF)
// Shield Skill ID 1040 (Increase PDEF)
// Holy Weapon Skill ID 1043 (Holy Attribute on Physical Hits)
// Regeneration Skill ID 1044 (Increase HP Regen Rate)
// Blessed Body Skill ID 1045 (Increase Max HP)
// Blessed Soul Skill ID 1048 (Increase Max MP)
// Berserker Spirit Skill ID 1062 (Increase attack stats/runspeed, decrease defense/evasion)
// Might Skill ID 1068 (Increase PATK)
// Kiss of Eva Skill ID 1073 (Increase Breath Gauge)
// Focus Skill ID 1077 (Increase Critical Rate)
// Concentration Skill ID 1078 (Resist Interruption of Spell Casting)
// Acumen Skill ID 1085 (Increase Casting Speed)
// Haste Skill ID 1086 (Increase Attack Speed)
// Resist Aqua Skill ID 1182 (Resist Water Attribute)
// Resist Wind Skill ID 1189 (Resist Wind Attribute)
// Resist Fire Skill ID 1191 (Resist Fire Attribute)
// Wind Walk Skill ID 1204 (Increase Run Speed)
// Guidance Skill ID 1240 (Increase Accuracy)
// Death Whisper Skill ID 1242 (Increase Critical Power)
// Bless Shield Skill ID 1243 (Increase Shield Block Rate)
// Greater Might Skill ID 1388 (Increase PATK - Overwrites Greater Shield/Earth Chant)
// Greater Shield Skill ID 1389 (Increase PDEF - Overwrites Greater Might/War Chant)
// Holy Resistance Skill ID 1392 (Resist Holy Attribute)
// Unholy Resistance Skill ID 1393 (Resist Dark Attribute)
//
// Heirophant Buffs
// Improved Condition Skill ID 1501 (Btb6 + Bts6 Combo Buff)
// Improved Combat Skill ID 1499 (Might3 + Shield3 Combo Buff)
// Elemental Protection Skill ID 1352 (Resist Earth, Wind, Fire Water Attribute)
// Prophecy of Fire Skill ID 1356 (300 second Increase physical attack stats, decrease runspeed)
// Mystic Immunity Skill ID 1411 (30 Second invulnerability to buffs and debuffs)

DEFINE_GLOBAL ARRAYLIST BUFF_PP 0

// BUFF_PP.ADD I1501


// 1500 1 a,Improved Magic a,Combines the power of Empower and Magic Barrier for improved effectiveness during combat. Effect 1. a,none a,none
// 1502 1 a,Improved Critical Attack a,Combines the power of Focus and Death Whisper for improved effectiveness during combat. Effect 1. a,none a,none
// 1503 1 a,Improved Shield Defense a,Combines the powers of Bless Shield and Advanced Block for improved effectiveness during combat. Effect 1. a,none a,none
// 1504 1 a,Improved Movement a,Combines the power of Wind Walk and Agility for improved effectiveness during combat. Effect 1. a,none a,none

// Warcryer Group Buffs
//
// Flame Chant Skill ID 1002 (Increase Cast Speed)
// Chant of Fire Skill ID 1006 (Increase MDEF)
// Chant of Battle Skill ID 1007 (Increase PATK)
// Chant of Shielding Skill ID 1009 (Increase PDEF)
// Chant of Fury Skill ID 1251 (Increase Attack Speed)
// Chant of Evasion Skill ID 1252 (Increase Evasion)
// Chant of Rage Skill ID 1253 (Increase Critical Power)
// Chant of Predator Skill ID 1308 (Increase Critical Rate)
// Chant of Eagle Skill ID 1309 (Increase Accuracy)
// Chant of Vampire Skill ID 1310 (Vampiric Rage)
// War Chant Skill ID 1390 (Increase PATK - Overwrites Greater Shield/Greater Might)
// Earth Chant Skill ID 1391 (Increase PDEF - Overwrites Greater Might/War Chant)
//
// Doomcryer Group Buffs
// Chant of Combat Skill ID 1517 (Battle 3 + Shielding 3)
// Chant of Critical Attack Skill ID 1518 (Rage 3 + Predator 3)
// Chant of Blood Awakening Skill ID 1519 (Fury 2 + Vampire 4)
// Chant of Spirit Skill ID 1362 (Resist all debuffs + Cancel Resist)
// Chant of Victory Skill ID 1363 (300 seconds Increase Magical+Physical attack stats, greatly reduce run speed)
// Magnus' Chant Skill ID 1413 (300 seconds Greatly Increase Magical attack and defense stats)

DEFINE_GLOBAL ARRAYLIST BUFF_WC 0

// MATH BUFF_WC "i1002" ADD NULL
// MATH BUFF_WC "i1006" ADD NULL
// MATH BUFF_WC "i1517" ADD NULL
// MATH BUFF_WC "i1518" ADD NULL
// MATH BUFF_WC "i1519" ADD NULL

// BUFF_WC.ADD I1363

DEFINE_GLOBAL INT OWNER_ID 0
CHAR_GET_ID OWNER_ID "<&OWNER&>"
PRINT_TEXT "<&OWNER&> == <&OWNER_ID&>"

THREAD CHECK_PARTY

DO
SLEEP 1000
LOOP ZERO == ZERO

PRINT_TEXT "End of Script"
END_SCRIPT

FUNCTION OBSERVE_SUPPORT

IF USER_ID == OWNER_ID
SWITCH CHAR_NAME
CASE BLADE_DANCER
CALL ATTACK_TASK VOID 3 "$<&BLADE_DANCER&>" SKILL_ID TARGET_ID
BREAK 1
CASE SWORD_SINGER
CALL ATTACK_TASK VOID 3 "$<&SWORD_SINGER&>" SKILL_ID TARGET_ID
BREAK 1
CASE OVERLORD
CALL ATTACK_TASK VOID 3 "$<&OVERLORD&>" SKILL_ID TARGET_ID
BREAK 1
CASE BISHOP
CALL ATTACK_TASK VOID 3 "$<&OVERLORD&>" SKILL_ID TARGET_ID
BREAK 1
CASE PROPHET
CALL BUFF_TASK VOID 1 "$<&PROPHET&>"
BREAK 1
CASE SHILLEN_ELDER
CALL BUFF_TASK VOID 1 "$<&SHILLEN_ELDER&>"
BREAK 1
CASE WARLOCK
CALL BUFF_TASK VOID 1 "$<&WARLOCK&>"
BREAK 1
CASE WARCRYER
CALL BUFF_TASK VOID 1 "$<&WARCRYER&>"
BREAK 1
CASE ELEMENTAL_SUMMONER
CALL BUFF_TASK VOID 1 "$<&ELEMENTAL_SUMMONER&>"
ENDSWITCH
ENDIF

RETURN VOID

FUNCTION OBSERVE_BUFFS

IF TARGETER_NAME == OWNER
SWITCH CHAR_NAME
CASE BLADE_DANCER
CALL BUFF_TASK VOID 1 "$<&BLADE_DANCER&>"
BREAK 1
CASE SWORD_SINGER
CALL BUFF_TASK VOID 1 "$<&SWORD_SINGER&>"
BREAK 1
CASE PROPHET
CALL BUFF_TASK VOID 1 "$<&PROPHET&>"
BREAK 1
CASE SHILLEN_ELDER
CALL BUFF_TASK VOID 1 "$<&SHILLEN_ELDER&>"
BREAK 1
CASE WARLOCK
CALL BUFF_TASK VOID 1 "$<&WARLOCK&>"
BREAK 1
CASE WARCRYER
CALL BUFF_TASK VOID 1 "$<&WARCRYER&>"
BREAK 1
CASE ELEMENTAL_SUMMONER
CALL BUFF_TASK VOID 1 "$<&ELEMENTAL_SUMMONER&>"
ENDSWITCH
ENDIF

RETURN VOID

FUNCTION MOVING 4 X Y Z MIN_RANGE
DEFINE INT TDIST 1
DEFINE INT O_TDIST 0
DEFINE INT IS_STUCK 0
PRINT_TEXT "TDIST = <&TDIST&>"
DISTANCE TDIST X Y Z CHAR_X CHAR_Y CHAR_Z
WHILE TDIST > MIN_RANGE
MOVE_TO "<&X&>" "<&Y&>" "<&Z&>"
SLEEP 500
DISTANCE TDIST X Y Z CHAR_X CHAR_Y CHAR_Z
IF TDIST == O_TDIST
MATH IS_STUCK IS_STUCK ADD ONE
ENDIF
IF IS_STUCK == I10
PRINT_TEXT "Got stuck..."
SET TDIST ZERO
BREAK 2
ENDIF

PRINT_TEXT "TDIST = <&TDIST&>"

IF TDIST < "i10"
BREAK 2
ENDIF
SET O_TDIST "<&TDIST&>"
WEND
RETURN VOID

FUNCTION ATTACK_TASK 3 CLASS_TYPE TRIGGER DESTINATION

SET_TARGETING TYPE TWO
SET_TARGETING ALIVE TWO
SET_TARGETING COMBAT TWO
SET_TARGETING ATTACKABLE TWO

DEFINE INT DELAY 0
DEFINE INT OLD_X 0
DEFINE INT OLD_Y 0
DEFINE INT OLD_Z 0

SET OLD_X "<&CHAR_X&>"
SET OLD_Y "<&CHAR_Y&>"
SET OLD_Z "<&CHAR_Z&>"

SWITCH CLASS_TYPE
CASE BISHOP
SWITCH TRIGGER
CASE TRIGGER_POWER_STRIKE
COMMAND "/target <&OWNER&>"
COMMAND "/assist <&OWNER&>"
SLEEP 500
CALL MOVING VOID 4 TARGET_X TARGET_Y TARGET_Z "i600"
USE_SKILL 122 1 0 // 122 hex
CALL GET_USD DELAY 2 "I1" "I3000"
// PRINT_TEXT "Calculated delay is <&DELAY&> ms"
SLEEP "<&DELAY&>"
CANCEL_TARGET
CALL MOVING VOID 4 OLD_X OLD_Y OLD_Z "i0"
BREAK 1
CASE TRIGGER_FATAL_STRIKE
// PRINT_TEXT "I saw <&OWNER&> Fatal Strike"
COMMAND "/target <&OWNER&>"
SLEEP 500
PRINT_TEXT "moving to target's location"
CALL MOVING VOID 4 TARGET_X TARGET_Y TARGET_Z "i40"
// PRINT_TEXT "using skill Mass block shield"
USE_SKILL 1360 1 0
// PRINT_TEXT "Moving to old location"
CALL MOVING VOID 4 OLD_X OLD_Y OLD_Z "i0"
CANCEL_TARGET
BREAK 1
ENDSWITCH
BREAK 1
CASE BLADE_DANCER
SWITCH TRIGGER
CASE TRIGGER_POWER_STRIKE
COMMAND "/target <&OWNER&>"
COMMAND "/assist <&OWNER&>"
SLEEP 500
CALL MOVING VOID 4 TARGET_X TARGET_Y TARGET_Z "i600"
USE_SKILL 122 1 0 // 122 hex
CALL GET_USD DELAY 2 "I1" "I3000"
// PRINT_TEXT "Calculated delay is <&DELAY&> ms"
SLEEP "<&DELAY&>"
CANCEL_TARGET
CALL MOVING VOID 4 OLD_X OLD_Y OLD_Z "i0"
BREAK 1
CASE TRIGGER_FATAL_STRIKE
// PRINT_TEXT "I saw <&OWNER&> Fatal Strike"
COMMAND "/target <&OWNER&>"
SLEEP 500
PRINT_TEXT "moving to target's location"
CALL MOVING VOID 4 TARGET_X TARGET_Y TARGET_Z "i40"
// PRINT_TEXT "using skill"
USE_SKILL 408 0 0
// PRINT_TEXT "Moving to old location"
CALL MOVING VOID 4 OLD_X OLD_Y OLD_Z "i0"
CANCEL_TARGET
BREAK 1
ENDSWITCH
BREAK 1
CASE SWORD_SINGER
SWITCH TRIGGER
CASE TRIGGER_POWER_STRIKE
// PRINT_TEXT "I saw <&OWNER&> power strike"
COMMAND "/target <&OWNER&>"
COMMAND "/assist <&OWNER&>"
//USE_SKILL 16 1 0
BREAK 1
CASE TRIGGER_FATAL_STRIKE
// PRINT_TEXT "I saw <&OWNER&> Fatal Strike"
COMMAND "/target <&OWNER&>"
SLEEP 500
CALL MOVING VOID 4 TARGET_X TARGET_Y TARGET_Z "i40"
// PRINT_TEXT "moving to target's location"
// PRINT_TEXT "using skill"
USE_SKILL 407 1 0
// PRINT_TEXT "Moving to old location"
CALL MOVING VOID 4 OLD_X OLD_Y OLD_Z "i0"
CANCEL_TARGET
BREAK 1
ENDSWITCH
BREAK 1
CASE OVERLORD
SWITCH TRIGGER
CASE TRIGGER_POWER_STRIKE
COMMAND "/target <&OWNER&>"
COMMAND "/assist <&OWNER&>"
SLEEP 500
CALL MOVING VOID 4 TARGET_X TARGET_Y TARGET_Z "i600"
USE_SKILL 1256 1 0
CALL GET_USD DELAY 2 "I1" "I3000"
SLEEP "<&DELAY&>"
CANCEL_TARGET
BREAK 1
CASE TRIGGER_FATAL_STRIKE
PRINT_TEXT "I saw <&OWNER&> Fatal Strike"
COMMAND "/target <&OWNER&>"
SLEEP 1200
PRINT_TEXT "moving to target's location"
USE_SKILL 1283 0 0
CALL MOVING VOID 4 TARGET_X TARGET_Y TARGET_Z "i125"
PRINT_TEXT "using skill"
USE_SKILL 1102 1 0
CALL GET_USD DELAY 2 "I1" "I2000"
SLEEP "<&DELAY&>"
USE_SKILL 1248 1 0
CALL GET_USD DELAY 2 "I1" "I2000"
SLEEP "<&DELAY&>"
USE_SKILL 1208 1 0
CALL GET_USD DELAY 2 "I1" "I2000"
SLEEP "<&DELAY&>"
SLEEP 2000
PRINT_TEXT "Moving to old location"
CALL MOVING VOID 4 OLD_X OLD_Y OLD_Z "i0"
CANCEL_TARGET
USE_SKILL 1283 0 0
BREAK 1
ENDSWITCH
ENDSWITCH
RETURN VOID

FUNCTION BUFF_TASK 1 CLASS_TYPE
DEFINE INT BUFF_ID NULL
DEFINE INT BD_TIME 3000
DEFINE INT DELAY 0
SWITCH CLASS_TYPE
CASE BLADE_DANCER
FOREACH BUFF_ID INT BUFF_BD
IF IN_PARTY == ZERO
BREAK 2
ENDIF
USE_SKILL "<&BUFF_BD.BUFF_ID&>" 0 0
CALL GET_USD DELAY 2 ZERO BD_TIME
PRINT_TEXT "Calculated delay is <&DELAY&> ms"
SLEEP "<&DELAY&>"
NEXTEACH
COMMAND "/leave"
BREAK 1
CASE SWORD_SINGER
FOREACH BUFF_ID INT BUFF_SWS
IF IN_PARTY == ZERO
BREAK 2
ENDIF
USE_SKILL "<&BUFF_SWS.BUFF_ID&>" 0 0
CALL GET_USD DELAY 2 ZERO BD_TIME
PRINT_TEXT "Calculated delay is <&DELAY&>ms"
SLEEP "<&DELAY&>"
NEXTEACH
COMMAND "/leave"
BREAK 1
ENDSWITCH
RETURN VOID

FUNCTION CHECK_PARTY
DEFINE ARRAYLIST PARTY_MEMBERS 0
DO
SET IN_PARTY 0
GET_PARTY PARTY_MEMBERS
FOREACH A PLAYER PARTY_MEMBERS
IF PARTY_MEMBERS.A.NAME == OWNER
SET IN_PARTY 1
ENDIF
NEXTEACH
SLEEP 200
LOOP ZERO == ZERO
RETURN VOID


FUNCTION ATTACK_SUPPORT 1 CLASS_TYPE
DEFINE INT SKILL_ID NULL
SWITCH CLASS_TYPE
CASE BLADE_DANCER
FOREACH SKILL_ID INT BUFF_BD
IF IN_PARTY == ZERO
BREAK 2
ENDIF
USE_SKILL "<&BUFF_BD.SKILL_ID&>" 0 0
GET_USD DELAY 2 0 BD_TIME
// PRINT_TEXT "Calculated delay is <&DELAY&> ms"
SLEEP DELAY
NEXTEACH
BREAK 1
CASE SWORD_SINGER
FOREACH SKILL_ID INT BUFF_SWS
IF IN_PARTY == ZERO
BREAK 2
ENDIF
USE_SKILL "<&BUFF_SWS.SKILL_ID&>" 0 0
GET_USD DELAY 2 0 BD_TIME
// PRINT_TEXT "Calculated delay is <&DELAY&>ms"
SLEEP DELAY
NEXTEACH
BREAK 1
ENDSWITCH
RETURN VOID

FUNCTION GET_USD 2 S_TYPE S_WINDUP
// PRINT_TEXT "GET_USD passed 2 arguements, <&S_TYPE&> and <&S_WINDUP&>"
// Get Use Skill Delay (int *S_TYPE, int *S_WINDUP)
//
// A function to return the time in MS required to
// execute a skill such as a buff, sance or song.
//
// S_TYPE denotes if this is an active skill (0) or
// a magic skill (1).
//
// S_WINDUP is the time required for the skill to
// execute.
//
// The following is a generalization taken from
// the C4 skill data:
//
// Songs WINDUP == 2500ms
// Dances WINDUP == 2500ms
// PP/EE/SE Buffs WINDUP == 4000ms
// WC/OL Buffs WINDUP == 2500ms
// Most Self Buffs WINDUP == 1800ms
//
// These windup times are based on 300 attack or
// cast speed.
//
// The equation to predict the actual time required
// to execute the skill is:
//
// WINDUP*300/relevant speed
//
// Eg. a Blade Dancer with 560 atkspd
//
// 2500*300/560 = 1339 MS
//
// Eg. a Prophet with 923 cast speed
// 4000*300/923 = 1300 MS
//
// * if you are crazy you can modify that result by
// -40% if you use sps to buff.
//
// Also remember to add your ping in latency to the
// WINDUP time.
//
// Eg if you are 114 ms to the server add +114 to the
// windup value.

// DEFINE INT S_WINDUP 0
DEFINE INT RESULT 0
DEFINE INT SPEED_CONSTANT 300

MATH RESULT S_WINDUP MULTIPLY SPEED_CONSTANT
// PRINT_TEXT "<&S_WINDUP&> * <&SPEED_CONSTANT&> = <&RESULT&>"
IF S_TYPE == ZERO
// PRINT_TEXT "atkspd = <&RESULT&> / <&CHAR_ATTACK_SPEED&>"
MATH RESULT RESULT DIVIDE CHAR_ATTACK_SPEED
// PRINT_TEXT "<&RESULT&>"
ELSE
// PRINT_TEXT "castspd = <&RESULT&> / <&CHAR_CAST_SPEED&>"
MATH RESULT RESULT DIVIDE CHAR_CAST_SPEED
// PRINT_TEXT "<&RESULT&>"
ENDIF

RETURN RESULT


Auto Accept Party Invite Script Command


Код:

SET_EVENT "<&SCRIPTEVENT_CHAT&>" myfilenamehere.l2s CheckChat

SLEEP 800000000000

Function CheckChat

INJECT "accept party packet" //<=== does this change?

RETURN VOID