mình cũng cài cả 2 3 cái SlimDx lẫn xóa đi cài lại cả l2net đủ ver vẫn bị dính cái lỗi này. Mình xin Win7 pác nào biết nguyên nhân có thể chỉ giáo ko ? cảm ơn
Khanh ơi. Kiễm tra dum mình Sicript Auto Agu này.sao no chỉ thực hiện được 1 lần.Rồi báo lỗi "anti **** action..." ///////////////////////////////////////////////////////////////////////////////////// INCLUDE Include/AutoAugEngine.l2c INCLUDE StdLib/player.l2c DEFINE_GLOBAL AugEngine AA_ScrObj 0 ///////////////////////////////////////////////////////////////////////////////////// //nome da arma aqui... AA_ScrObj.WRK_ITEM.NAME = "#$Mamba Edge" //bota o nome da pedra aqui... AA_ScrObj.WRK_LS.NAME = "#$Top-Grade Life Stone - Level 76" // 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 = #i2 // ADD THE SKILL ID THAT ARE YOU LOOKING FOR(if you don't want just the base stat) AA_ScrObj.CHOSE_SKILL.ADD #i2 /* lista de augments 3132 - Active: Temporarily increases P. Atk.. 3133 - Active: Temporarily increases M. Atk.. 3134 - Active: Temporarily increases PvP P. Atk. 3135 - Active: Temporarily increases P. Def.. 3136 - Active: Temporarily increases M. Def.. 3138 - Active: Temporarily increases HP recovery magic power. 3139 - Active: Temporarily increase Evasion. 3140 - Active: Temporarily increases accuracy. 3141 - Active: Temporarily increases the probability of critical attack. 3142 - Active: Temporarily increases the critical rate of damage attack magic. 3148 - Active: Temporarily bestows the ability to recover some of the damage inflicted on the enemy as HP. Excludes damage by skill and long-range attacks. 3204 - Active: Temporarily bestows on yourself the ability to reflect some of the damage back to the enemy. Excludes damage caused by skills and long-range attack. 3238 - Passive: Increases HP recovery magic effect. 3239 - Passive: Increases the recovery rate when MP is being recovered by recharge. 3240 - Passive: Increases one's own P. Atk. 3241 - Passive: Increases one's own M. Atk. 3243 - Passive: Increases PvP P. Atk. 3244 - Passive: Increases one's own P. Def. 3245 - Passive: Increases one's own M. Def. 3246 - Passive: Increases HP recovery magic power. 3247 - Passive: Increases evasion. 3248 - Passive: Increases one's own accuracy. 3249 - Passive: Increases the rate of critical attacks. 3250 - Passive: Increases the critical rate of damage attack magic. 3259 - Passive: Bestows on yourself the ability to reflect some of the damage back to the enemy. Excludes damage caused by skills and long-range attack. 3192 - Active: Inflicts paralysis on the target by a fixed rate. */ // #$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&>_Chat 5" AA_ScrObj.NPC_DIAG12 = "#$bypass -h npc_<&TARGET_ID&>_Link common/augmentation_01.htm" AA_ScrObj.NPC_DIAG13 = "#$bypass -h npc_<&TARGET_ID&>_Augment 1" AA_ScrObj.NPC_DIAG21 = "#$bypass -h npc_<&TARGET_ID&>_Chat 5" AA_ScrObj.NPC_DIAG22 = "#$bypass -h npc_<&TARGET_ID&>_Link common/augmentation_02.htm" AA_ScrObj.NPC_DIAG23 = "#$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 500 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 _subdchk5 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_DIAG13" == FALSE AA_ScrObj.NPC_DIAG_NOMATCH ELSE EVT_SET VOID 2 #$_subdchk5 #i25 AA_ScrObj.S_RAND_500 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG13&>" ENDIF SLEEP 300 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 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_EVENT VOID 1 #i25 EVTEX_SET VOID 2 #$_add_navdiag13 #i81 AA_ScrObj.S_RAND_300 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG13&>" RETURN VOID FUNCTION _add_navdiag13 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_EVENT VOID 1 #i25 EVTEX_SET VOID 2 #$_rem_navdiag23 #i82 AA_ScrObj.S_RAND_300 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG23&>" RETURN VOID FUNCTION _rem_navdiag23 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 /****** * Destravar... *****/ 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 CASE #$_add_navdiag11 CASE #$_subdchk2 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG11&>" SLEEP 1000 CASE #$_add_navdiag12 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG12&>" SLEEP 1000 CASE #$_add_navdiag13 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG13&>" SLEEP 1000 CASE #$_add_insitem AA_ScrObj.ADD_ITEM CASE #$_add_insls AA_ScrObj.ADD_LS CASE #$_add_insgems AA_ScrObj.ADD_GEMS CASE #$_add_confirm AA_ScrObj.CONFIRM_AUG CASE #$_rem_navdiag21 CASE #$_subdchk4 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG21&>" SLEEP 1000 CASE #$_rem_navdiag22 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG22&>" SLEEP 1000 CASE #$_rem_navdiag23 NPC_DIALOG "<&AA_ScrObj.NPC_DIAG23&>" SLEEP 1000 CASE #$_rem_insitem AA_ScrObj.ARM_ITEM CASE #$_rem_confirm AA_ScrObj.ARM_CONFIRM ENDSWITCH ENDIF WEND RETURN VOID /******************************** * Prote誽o contra bloqueios de envio party/trade/clan e afins * * Em geral serve apenas para cancelamento, mas tem fun踥es aleat鏎ias * adicionadas implementadas sem o consentimento do usu嫫io. * Depois verificar *******************************/ 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
khanh ơi mình cài l2net , tất cả đều ok , nhưng kì lạ 1 chỗ cái l2net của mình chạy tầm hơn 30 phút thì nó dừng lại không đánh quái nũa . minh phai thoát hết vô lại mới được. bạn có cách nào giải quyết dùm với
bạn nhìn ô level của nó xem có bị đỏ ko...nếu bị đỏ thì Command => Toogle Botting là nó chạy tiếp ngay
Mình đã dùng tới chức năng tìm kiếm trên diễn đàn cũng như trên google về đoạn mã auto Augment cho Lineage Freya Final nhưng không sao tìm thấy được. Có rất nhiều đoạn mã ngắn dài đủ loại nhưng khi run nó trong l2net thì lúc bị báo lỗi thế này, khi thế nọ. Đặc biệt là lỗi không tìm thấy Top-Grade Life Stone - level 84 (trong server l2Crimson nó ghi ts 84 như vậy). Mặc dù mình đã đứng kế bên thằng thợ rèn Pushkin hỗ trợ up augment tại Giran. Cẩn thận trong việc chỉnh đúng tên vũ khí, Gemstone B số lượng 36. Vậy bạn nào hiện đang có đoạn script auto augment chạy ngon trên L2 Freya Final xin chia sẻ bản full của các bạn cho mình với. Mvif mình muốn làm một bản L2net hoàn chỉnh rồi up lên mediafire cho anh em trong clan cùng sử dụng. Hiện nay mình đang xài bản L2net version mới nhất. Xin cảm ơn
của bạn đây //////////////////////////////////////////////////////////////////////////////////// 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 = "#$Eternal Core Sword" => tên weapon muốn agu // CHANGE THE LIFE STONE NAME WITH THE EXACT NAME OF YOURS AA_ScrObj.WRK_LS.NAME = "#$Top-Grade Life Stone - level 86" => tên life stone (viết hoa đúng như tên hiển thị) // 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 #i3204 => Skills ID (trong file kèm theo, chỉ việc đổi 4 số sau chữ "i") // ...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 = #$CON // 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 lưu ý cần target NPC Pushkin hoặc NPC agu tùy server trước khi auto agu = l2net
trời chắc vậy rồi . mình thấy cái ô đó màu đỏ , hì cảm ơn bạn nhiều lắm . nhưng gio làm sao để nó không bị như vậy nữa bạn ?
cái đó thì mình chịu...có rất nhìu lý do...mình nghĩ là có thể do database bị đụng chạm, có thể do đường truyền của bạn, host có vấn đề,...vv...nhưng muốn chính xác thì đợi các cao nhân trả lời vậy ở thớt này thì bác khanh và bác ring mao chẳng hạn nhưng bạn đã bot thì phải chịu thôi , rãnh rãnh thì ngó wa nó 1 cái là dc
do bạn đụng vào nút toggle ON OFF bot của l2net thôi. Ô màu đỏ là OFF màu xanh là ON. Default nút đó trong l2net là nút ` bên trái số 1.
ai có thể giúp mình việc này được không ? là thế này . mình có 1 con ISS và 1 mage . mình muốn ISS tự động pt mage và buff . sau khi buff xong thì tự out party. bạn nào có thể làm được điều này thì giúp mình với nha . cảm ơn các bạn !!!
Ai có Scripts Anti-backstab kô cho mìh xin đi ---------- Post added at 05:52 ---------- Previous post was at 05:44 ---------- KingOfWolfer@ Cái chổ tên ls bạn bấm sai rồi...!!! Của nó là Top-Grade Life Stone: level 76
Lâu lắm rồi mói có time quay lại cái box này, mà ngay đúng vào ngày April Fool . Phím Toggle bot của L2net là phím "`" ( phím tận cùng bên trái dãy phím số ), để không bi tắt bot giữa chừng mọi người nên set nó về phím khác ít xài nhất , ví dụ mình hay set phím F12. Còn về script OOP Iss Enchanter, mình đã viết từ lâu cho clan, khi nào quay về SG mình sẽ up, hiện tại đang du hí dưới miền tây rồi ^^!