Ayuda con script de auto Augment

06:28:56 a.m. :[=====================================
06:28:56 a.m. :[== and give feedback.
06:28:56 a.m. :[== Please visit ltwonet.org forum
06:28:56 a.m. :[
06:28:56 a.m. :[The targeted NPC and the dialog options does not match.
06:28:55 a.m. :[Log ALogEvt_RvoxxD_[05.12][06.28].txt created
06:28:55 a.m. :[Checking for NPC target. Please wait...
06:28:55 a.m. :[Loading and checking augmentation data and settings started.



yo juego 2 servidores freya uno es pvp y el otro 7x resulta que en el servidor 7x no me funciona el script me da ese error revise los dialogos de los 2 npc a ver si cambiaban pero no son exactamente iguales luna podrias ayudarme?

Código:


/////////////////////////////////////////////////////////////////////////////////////
INCLUDE Include/AutoAugEngine.l2c
INCLUDE StdLib/player.l2c
DEFINE_GLOBAL AugEngine AA_ScrObj 0
/////////////////////////////////////////////////////////////////////////////////////




// CHANGE THE WEAPON NAME WITH THE EXACT NAME OF YOURS
AA_ScrObj.WRK_ITEM.NAME = "#$Icarus Sawsword - Destruction"

// CHANGE THE LIFE STONE NAME WITH THE EXACT NAME OF YOURS
AA_ScrObj.WRK_LS.NAME = "#$Life Stone: level 80"


// CHANGE FOR WHAT AUGMENT CONFIGURATION YOU WANT
// #i1 - just skills ; #i2 - just base stat
// #i3 - skills or base stat
// #i4 - skills and base stat <- THIS COULD NEVER HAPPEN
AA_ScrObj.AUG_TYPE = #i1


// ADD THE SKILL ID THAT ARE YOU LOOKING FOR(if you don't want just the base stat)
AA_ScrObj.CHOSE_SKILL.ADD #i3240
// ...YOU CAND ADD MORE OR REMOVE AND KEEP JUST ONE


// #$STR - for STR+1
// #$CON - for CON+1
// #$MEN - for MEN+1
// #$INT - for INT+1
// CHANGE BELOW FOR WHAT BASE STAT YOU WANT(if you don't want just the skills)
AA_ScrObj.BASE_STAT = #$STR   




// CHANGE TO "TRUE" TO ADD THE 2 SECONDS DELAY, LIKE INGAME,
// WHEN ADDING OR REMOVING AUGMENTATION
AA_ScrObj.PROTECT_DELAY = FALSE

// CHANGE TO "FALSE" IF YOU DON'T WANT TO SAVE LOGS
AA_ScrObj.SAVE_LOG = TRUE
// NUMBER OF LOG LINES PER FILE
AA_ScrObj.LOG_LINES = #i2000


// NPC DIALOG STRINGS, NEED TO CHNAGE ONLY IF THEY DIFFER (FOR RETAIL THIS IS A MUST)
AA_ScrObj.NPC_DIAG11 = "#$bypass -h npc_<&TARGET_ID&>_Link common/augmentation_01.htm"
AA_ScrObj.NPC_DIAG12 = "#$bypass -h npc_<&TARGET_ID&>_Augment 1"
AA_ScrObj.NPC_DIAG21 = "#$bypass -h npc_<&TARGET_ID&>_Link common/augmentation_02.htm"
AA_ScrObj.NPC_DIAG22 = "#$bypass -h npc_<&TARGET_ID&>_Augment 2"





// DON'T CHANGE NOTHING BELOW (ONLY IF YOU KNOW WHAT ARE YOU DOING)
/////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////

//for event anti stuck
DEFINE_GLOBAL STRING EVT_LABEL ""
THREAD EVT_ANTI_STUCK
LOCK ASTK
IF AA_ScrObj.SAVE_LOG == TRUE
    THREAD LOG_N_PROTECT
ENDIF
AA_ScrObj.LOAD_AND_CHECK

PRINT_TEXT "====================================="
PRINT_TEXT "== Gemstone grade and count will be verified on augmentation process."
PRINT_TEXT "====================================="
PRINT_TEXT "== '<&AA_ScrObj.WRK_LS.NAME&>' x <&AA_ScrObj.LS_COUNT&>"
PRINT_TEXT "== 'Adena' x <&AA_ScrObj.ADENA_COUNT&>"
PRINT_TEXT "== "
PRINT_TEXT "== '<&AA_ScrObj.WRK_ITEM.NAME&>' +<&AA_ScrObj.WRK_ITEM.ENCHANT&>"
AA_ScrObj.PRINT_AUGMENT
PRINT_TEXT "====================================="
PRINT_TEXT "= You have 15 seconds to stop the script if something it's wrong."
PRINT_TEXT "====================================="
SLEEP 15000

DO
    IF AA_ScrObj.HAS_AUG == FALSE
          ADD_AUGMENT
    ELSE
          REMOVE_AUGMENT
    ENDIF
LOOP ONE == ONE

AA_ScrObj.SCRIPT_END

FUNCTION CHECK_DIAG 0
    UNLOCK ASTK
    EVT_SET VOID 2 #$_subdchk1 #i25
    AA_ScrObj.S_RAND_500
    TALK_TARGET
    SLEEP 500
    LOCK DIAG_EVT_CHK
    SLEEP 50
    UNLOCK DIAG_EVT_CHK
RETURN VOID

FUNCTION _subdchk1 0
    UNSET_EVENT VOID 1 #i25
    DEFINE STRING _html 0
    PACKET.READ_BYTE NULL
    PACKET.READ_INT32 NULL
    PACKET.READ_STRING _html
    IF "_html.CONTAINS AA_ScrObj.NPC_DIAG11" == FALSE
          AA_ScrObj.NPC_DIAG_NOMATCH
    ELSE
          EVT_SET VOID 2 #$_subdchk2 #i25
          AA_ScrObj.S_RAND_500
          NPC_DIALOG "<&AA_ScrObj.NPC_DIAG11&>"
    ENDIF
    SLEEP 300
RETURN VOID

FUNCTION _subdchk2 0
    UNSET_EVENT VOID 1 #i25
    DEFINE STRING _html 0
    PACKET.READ_BYTE NULL
    PACKET.READ_INT32 NULL
    PACKET.READ_STRING _html
    IF "_html.CONTAINS AA_ScrObj.NPC_DIAG12" == FALSE
          AA_ScrObj.NPC_DIAG_NOMATCH
    ELSE
          EVT_SET VOID 2 #$_subdchk3 #i25
          AA_ScrObj.S_RAND_500
          TALK_TARGET
    ENDIF
    SLEEP 300
RETURN VOID

FUNCTION _subdchk3 0
    UNSET_EVENT VOID 1 #i25
    DEFINE STRING _html 0
    PACKET.READ_BYTE NULL
    PACKET.READ_INT32 NULL
    PACKET.READ_STRING _html
    IF "_html.CONTAINS AA_ScrObj.NPC_DIAG21" == FALSE
          AA_ScrObj.NPC_DIAG_NOMATCH
    ELSE
          EVT_SET VOID 2 #$_subdchk4 #i25
          AA_ScrObj.S_RAND_500
          NPC_DIALOG "<&AA_ScrObj.NPC_DIAG21&>"
    ENDIF
    SLEEP 300
RETURN VOID

FUNCTION _subdchk4 0
    UNSET_EVENT VOID 1 #i25
    DEFINE STRING _html 0
    PACKET.READ_BYTE NULL
    PACKET.READ_INT32 NULL
    PACKET.READ_STRING _html
    IF "_html.CONTAINS AA_ScrObj.NPC_DIAG22" == FALSE
          AA_ScrObj.NPC_DIAG_NOMATCH
    ENDIF
    SLEEP 100
    LOCK ASTK
    UNLOCK DIAG_EVT_CHK
RETURN VOID


FUNCTION ADD_AUGMENT
    UNLOCK ASTK
    AA_ScrObj.CHK_STOK
    PRINT_TEXT "== Augmenting item..."
    PRINT_TEXT "====================================="
    EVT_SET VOID 2 #$_add_interogate #i25
    AA_ScrObj.S_RAND_300
    TALK_TARGET
    SLEEP 500
    LOCK ADMAG
    SLEEP 50
    UNLOCK ADMAG
RETURN VOID

FUNCTION _add_interogate
//    LOCK ADMAG
    UNSET_EVENT VOID 1 #i25
    EVT_SET VOID 2 #$_add_navdiag11 #i25
    AA_ScrObj.S_RAND_300
    NPC_DIALOG "<&AA_ScrObj.NPC_DIAG11&>"
RETURN VOID

FUNCTION _add_navdiag11
    UNSET_EVENT VOID 1 #i25
    EVTEX_SET VOID 2 #$_add_navdiag12 #i81
    AA_ScrObj.S_RAND_300
    NPC_DIALOG "<&AA_ScrObj.NPC_DIAG12&>"
RETURN VOID

FUNCTION _add_navdiag12
    UNSET_EVENTEX VOID 1 #i81
    EVTEX_SET VOID 2 #$_add_insitem #i83
    AA_ScrObj.ADD_ITEM
RETURN VOID

FUNCTION _add_insitem
    UNSET_EVENTEX VOID 1 #i83
    EVTEX_SET VOID 2 #$_add_insls #i84
    AA_ScrObj.ADD_LS
RETURN VOID

FUNCTION _add_insls
    UNSET_EVENTEX VOID 1 #i84
    IF AA_ScrObj.AUG_TIMES < ONE
          PACKET.READ_BYTE NULL
          PACKET.READ_INT16 NULL
          PACKET.READ_INT32 NULL
          PACKET.READ_INT32 NULL
          PACKET.READ_INT32 AA_ScrObj.WRK_GEM.ITEM_ID
          PACKET.READ_INT32 AA_ScrObj.GEMS_REQ
          AA_ScrObj.LOAD_GEMINF
          IF AA_ScrObj.GEMS_COUNT <= AA_ScrObj.GEMS_REQ
              PRINT_TEXT "Not enough Gemstones for augmentation."
              AA_ScrObj.SCRIPT_END
          ENDIF
    ENDIF
    EVTEX_SET VOID 2 #$_add_insgems #i85
    AA_ScrObj.ADD_GEMS
RETURN VOID

FUNCTION _add_insgems
    UNSET_EVENTEX VOID 1 #i85
    EVTEX_SET VOID 2 #$_add_confirm #i86
    AA_ScrObj.CONFIRM_AUG
RETURN VOID

FUNCTION _add_confirm
    UNSET_EVENTEX VOID 1 #i86
    PACKET.READ_BYTE NULL
    PACKET.READ_INT16 NULL
    AA_ScrObj.AUG_DATA.CLEAN
    PACKET.READ_INT32 AA_ScrObj.AUG_DATA.LVAL
    PACKET.READ_INT32 AA_ScrObj.AUG_DATA.RVAL
    AA_ScrObj.COMPARE
    LOCK ASTK
    UNLOCK ADMAG
RETURN VOID

FUNCTION REMOVE_AUGMENT
    UNLOCK ASTK
    PRINT_TEXT "== Removing augmentation..."
    PRINT_TEXT "====================================="
    EVT_SET VOID 2 #$_rem_interogate #i25
    AA_ScrObj.S_RAND_300
    TALK_TARGET
    SLEEP 500
    LOCK RVMAG
    SLEEP 50
    UNLOCK RVMAG
RETURN VOID

FUNCTION _rem_interogate
    //LOCK RVMAG
    UNSET_EVENT VOID 1 #i25
    EVT_SET VOID 2 #$_rem_navdiag21 #i25
    AA_ScrObj.S_RAND_300
    NPC_DIALOG "<&AA_ScrObj.NPC_DIAG21&>"
RETURN VOID

FUNCTION _rem_navdiag21
    UNSET_EVENT VOID 1 #i25
    EVTEX_SET VOID 2 #$_rem_navdiag22 #i82
    AA_ScrObj.S_RAND_300
    NPC_DIALOG "<&AA_ScrObj.NPC_DIAG22&>"
RETURN VOID

FUNCTION _rem_navdiag22
    UNSET_EVENTEX VOID 1 #i82
    EVTEX_SET VOID 2 #$_rem_insitem #i87   
    AA_ScrObj.ARM_ITEM
RETURN VOID

FUNCTION _rem_insitem
    UNSET_EVENTEX VOID 1 #i87
    IF AA_ScrObj.ADENA_REQ == ZERO
          PACKET.READ_BYTE NULL
          PACKET.READ_INT16 NULL
          PACKET.READ_INT64 NULL
          PACKET.READ_INT64 NULL
          PACKET.READ_INT64 AA_ScrObj.ADENA_REQ
    ENDIF
    AA_ScrObj.CHK_ADENA
    EVTEX_SET VOID 2 #$_rem_confirm #i88
    AA_ScrObj.ARM_CONFIRM
RETURN VOID

FUNCTION _rem_confirm
    UNSET_EVENTEX VOID 1 #i88
    AA_ScrObj.HAS_AUG = FALSE
    PRINT_TEXT "====================================="
    PRINT_TEXT "== Augmentation removed successfully."
    PRINT_TEXT "== Proceeding to re-augmenting."
    PRINT_TEXT "====================================="
    LOCK ASTK
    UNLOCK RVMAG
RETURN VOID

FUNCTION LOG_WFILE
    DEFINE INT _fcnt 1
    DEFINE STRING _temptime ""
    AA_ScrObj.TObj.LTIMER_START
    AA_ScrObj.TObj.PGET_TIME _temptime
    _temptime = "#$Auto augmentation started at <&_temptime&>, with:"
    AA_ScrObj._logaug.PUSH _temptime
    DO
          IF AA_ScrObj._logaug.LENGTH >= AA_ScrObj.LOG_LINES
              SLEEP 100
              LOCK FLWRT
              AA_ScrObj.TObj.SFN_DateTime AA_ScrObj._logfname
              AA_ScrObj._logfname = "#$ALogAug_<&CHAR_NAME&>_<&_fcnt&>_<&AA_ScrObj._logfname&>"
              PRINT_TEXT "writing augment logs to file..."
              CALL_EXTERN "Include/Utils.l2s" WRITE_FILE VOID 3 AA_ScrObj._logfname AA_ScrObj._logaug #$w
    //          WRITE_LOG
              PRINT_TEXT "logs saved under <&AA_ScrObj._logfname&>.txt"
              _fcnt = _fcnt + ONE
              SLEEP 50
              UNLOCK FLWRT
          ENDIF
          SLEEP 500
    LOOP ONE == ONE
RETURN VOID

FUNCTION WRITE_LOG
    PRINT_TEXT "writing augment logs to file..."
    DEFINE FILEWRITER _fwopened "<&AA_ScrObj._logfname&>"
    WHILE AA_ScrObj._logaug.LENGTH > ZERO
          _fwopened.WRITE AA_ScrObj._logaug.POP
    WEND
    _fwopened.FLUSH
    _fwopened.CLOSE
    PRINT_TEXT "logs saved under <&AA_ScrObj._logfname&>.txt"
RETURN VOID

FUNCTION EVTEX_SET 2 _evt_func _evt_id
    SET_EVENT "<&SCRIPTEVENT_SERVERPACKETEX&>" "<&SYSTEM_CURRENTFILE&>" "<&_evt_func&>" "<&_evt_id&>"
    AA_ScrObj.S_RAND_300
    EVT_LABEL = "#$<&_evt_func&>"
RETURN VOID

FUNCTION EVT_SET 2 _evt_func _evt_id
    SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" "<&_evt_func&>" "<&_evt_id&>"
    AA_ScrObj.S_RAND_300
    EVT_LABEL = "#$<&_evt_func&>"
    IF #$_add_interogate == "#$<&_evt_func&>"
          LOCK ADMAG
    ENDIF
    IF #$_rem_interogate == "#$<&_evt_func&>"
          LOCK RVMAG
    ENDIF
    IF #$_subdchk1 == "#$<&_evt_func&>"
          LOCK DIAG_EVT_CHK
    ENDIF
RETURN VOID

FUNCTION UNSET_EVENT 1 _evtid
    SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" _nof "<&_evtid&>"
    AA_ScrObj.S_RAND_100
    EVT_LABEL = #$none
RETURN VOID

FUNCTION UNSET_EVENTEX 1 _evtid
    SET_EVENT "<&SCRIPTEVENT_SERVERPACKETEX&>" "<&SYSTEM_CURRENTFILE&>" _nof "<&_evtid&>"
    AA_ScrObj.S_RAND_100
    EVT_LABEL = #$none
RETURN VOID

FUNCTION _nof
    SLEEP 50
RETURN VOID

FUNCTION EVT_ANTI_STUCK
    DEFINE STRING _chkstuk ""
    WHILE ONE == ONE
          _chkstuk = EVT_LABEL
          SLEEP 3000
          LOCK ASTK
          SLEEP 50
          UNLOCK ASTK
          IF ( _chkstuk == EVT_LABEL ) && ( EVT_LABEL != #$none )
              PRINT_TEXT "anti stuck action..."
              SWITCH EVT_LABEL
                    CASE #$_add_interogate
                    CASE #$_rem_interogate
                    CASE #$_subdchk1
                    CASE #$_subdchk3
                        TALK_TARGET
                        BREAK 1
                    CASE #$_add_navdiag11
                    CASE #$_subdchk2
                        NPC_DIALOG "<&AA_ScrObj.NPC_DIAG11&>"
                        BREAK 1
                    CASE #$_add_navdiag12
                        NPC_DIALOG "<&AA_ScrObj.NPC_DIAG12&>"
                        BREAK 1
                    CASE #$_add_insitem
                        AA_ScrObj.ADD_ITEM
                        BREAK 1
                    CASE #$_add_insls
                        AA_ScrObj.ADD_LS
                        BREAK 1
                    CASE #$_add_insgems
                        AA_ScrObj.ADD_GEMS
                        BREAK 1
                    CASE #$_add_confirm
                        AA_ScrObj.CONFIRM_AUG
                        BREAK 1
                    CASE #$_rem_navdiag21
                    CASE #$_subdchk4
                        NPC_DIALOG "<&AA_ScrObj.NPC_DIAG21&>"
                        BREAK 1
                    CASE #$_rem_navdiag22
                        NPC_DIALOG "<&AA_ScrObj.NPC_DIAG22&>"
                        BREAK 1
                    CASE #$_rem_insitem
                        AA_ScrObj.ARM_ITEM
                        BREAK 1
                    CASE #$_rem_confirm
                        AA_ScrObj.ARM_CONFIRM
                        BREAK 1
              ENDSWITCH
          ENDIF
    WEND
RETURN VOID

FUNCTION LOG_N_PROTECT
    THREAD LOG_WFILE
    AA_ScrObj.TObj.SFN_DateTime AA_ScrObj._evtlogfn
    AA_ScrObj._evtlogfn = "#$ALogEvt_<&CHAR_NAME&>_<&AA_ScrObj._evtlogfn&>"
    CALL_EXTERN "Include/Utils.l2s" WRITE_FILE VOID 3 AA_ScrObj._evtlogfn "#$" #$w
    PRINT_TEXT "Log <&AA_ScrObj._evtlogfn&>.txt created"
    SET_EVENT "<&SCRIPTEVENT_CHAT&>" "<&SYSTEM_CURRENTFILE&>" _chatter
    SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" _ptinv 57
    SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" _traderq 112
    SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" _claninv 44
    THREAD LOG_WRITER
RETURN VOID

PUBLIC LOG_WRITER
    WHILE ONE == ONE
          SLEEP 300000
          AA_ScrObj.EVT_LOGS_WR
    WEND
RETURN VOID

FUNCTION _chatter
    IF MESSAGETYPE == TWO
          AA_ScrObj.ADD_LMEM VOID 4 SENDERNAME MESSAGETYPE MESSAGE NULL
    ELSE
          IF "MESSAGE.CONTAINS CHAR_NAME" == TRUE
              AA_ScrObj.ADD_LMEM VOID 4 SENDERNAME MESSAGETYPE MESSAGE TRUE
              THREAD _allchtlog
              SET_EVENT "<&SCRIPTEVENT_CHAT&>" "<&SYSTEM_CURRENTFILE&>" _logallchat
              PRINT_TEXT "Your name was mentioned, logging all chat for 3 minutes..."
          ENDIF
    ENDIF
RETURN VOID

FUNCTION _allchtlog
    SLEEP 180000
    SET_EVENT "<&SCRIPTEVENT_CHAT&>" "<&SYSTEM_CURRENTFILE&>" _chatter
    PRINT_TEXT "Logging all chat stopped."
RETURN VOID

FUNCTION _logallchat
    AA_ScrObj.ADD_LMEM VOID 4 SENDERNAME MESSAGETYPE MESSAGE TRUE
RETURN VOID

FUNCTION _ptinv
    DEFINE STRING _crtime 0
    AA_ScrObj.TObj.PGET_TIME _crtime
    PACKET.READ_BYTE NULL
    DEFINE STRING _tmppers ""
    PACKET.READ_STRING _tmppers
    AA_ScrObj._evtlogs.PUSH "#$    [<&_crtime&>]: Party invitation by <&_tmppers&>"
    AA_ScrObj.S_RANDL_1500
    INJECT "43 00 00 00 00" // reject party
RETURN VOID

FUNCTION _traderq
    DEFINE STRING _crtime 0
    AA_ScrObj.TObj.PGET_TIME _crtime
    DEFINE INT _astobj 0
    PACKET.READ_BYTE NULL
    PACKET.READ_INT32 _astobj
    DEFINE STRING _tmppers ""
    DEFINE ARRAYLIST _playersc 0
    GET_PLAYERS _playersc
    FOREACH _ixs Player _playersc
          IF _playersc._ixs.ID == _astobj
              _tmppers = "#$<&_playersc._ixs.NAME&>"
              BREAK 2
          ENDIF
    NEXTEACH
    AA_ScrObj._evtlogs.PUSH "#$    [<&_crtime&>]: Trade requeste by <&_tmppers&>"
    AA_ScrObj.S_RANDL_1500
    INJECT "55 00 00 00 00" // reject trade
RETURN VOID

FUNCTION _claninv
    DEFINE STRING _crtime 0
    AA_ScrObj.TObj.PGET_TIME _crtime
    DEFINE INT _astobj 0
    PACKET.READ_BYTE NULL
    PACKET.READ_INT32 _astobj
    DEFINE STRING _tmppers ""
    DEFINE ARRAYLIST _playersc 0
    GET_PLAYERS _playersc
    FOREACH _ixs Player _playersc
          IF _playersc._ixs.ID == _astobj
              _tmppers = "#$<&_playersc._ixs.NAME&>"
              BREAK 2
          ENDIF
    NEXTEACH
    AA_ScrObj._evtlogs.PUSH "#$    [<&_crtime&>]: Clan invitation by <&_tmppers&>"
    AA_ScrObj.S_RANDL_1500
    INJECT "27 00 00 00 00" // reject clan
RETURN VOID