mpj123

This is the updated version of the enchant script, this script adds a few new features and a different way to send the packets, also updated for l2.net 358 and over. www.ltwonet.com and read the login tutorials, note... this is for l2.net 358+ Credits to MeatWod for an important fix and Rocket666 for the actual script. NOTE. put anything you dont want to enchant in your warehouse for safety. If you have a +21 icarus bow and 20 +0 bows, it will enchant each item by the set amount. THIS IS NOT A SAFE ENCHANT SCRIPT! //made by rocket666 //edited and tweaked by mpj123 //testing, bug solutions and just being cool, MeatWod INCLUDE StdLib\inventory.l2c //Settings DEFINE STRING ITEMNAME "WEAPON or ARMOR HERE" //Item name, don't write the SA DEFINE STRING ITGRADE S //Item grade (s80=s) DEFINE STRING ENCHNAME "Scroll: Enchant Weapon (S)" //Enchant name DEFINE STRING ENCHANT 12 //Enchant amount wanted to every weapon in inventory DEFINE INT DELAY 1100 //Delay of all actions in MS, this may help dodge anti enchanting bans if there are any. Put at least 600. //Some definitions DEFINE INT CURENCHANT 0 DEFINE INT SUCCESSENCHANTED 0 DEFINE STRING CRYSTAL "Crystal: <&ITGRADE&> Grade" DEFINE INT CRYID 0 DEFINE INT CRYCOUNT 0 DEFINE INT CRYCOUNT2 0 ITEM_GET_ID CRYID "<&CRYSTAL&>" DEFINE STRING ITNAME 0 DEFINE INT ENCHID 0 DEFINE INT ENCHCOUNT 0 DEFINE INT ENCHUID 0 DEFINE STRING ENCHCODE 0 DEFINE STRING ITEM 0 DEFINE ARRAYLIST INVEN_AL 0 GET_INVENTORY INVEN_AL //Calc enchant unique id ITEM_GET_ID ENCHID "<&ENCHNAME&>" INVEN_GET_UID ENCHUID "<&ENCHID&>" ENCHCODE = ENCHUID.GET_HEX32 DEFINE STRING ENCH "19 <&ENCHCODE&> 00 00 00 00" //Start actions FOREACH I Inventory INVEN_AL ITNAME = INVEN_AL.I.NAME IF ITNAME == ITEMNAME CALLSUB ENCHANT PRINT_TEXT "<&ENCHCOUNT&> enchants remaining." CURENCHANT = ZERO ENDIF NEXTEACH PRINT_TEXT "<&SUCCESSENCHANTED&> are currently enchanted successfully to <&ENCHANT&>" PRINT_TEXT "Done" SCRIPT_END SUB ENCHANT DEFINE bytebuffer my_bb 256 my_bb.WRITE_BYTE #i95 my_bb.WRITE_INT32 INVEN_AL.I.ID my_bb.WRITE_INT32 #i0 WHILE ZERO == ZERO ITEM_COUNT CRYCOUNT "<&CRYID&>" IF CURENCHANT < ENCHANT ITEM_COUNT ENCHCOUNT "<&ENCHID&>" IF ENCHCOUNT > ONE CURENCHANT = CURENCHANT + ONE PRINT_TEXT "Your weapon is enchanting to <&CURENCHANT&>" INJECT "<&ENCH&>" SLEEP "<&DELAY&>" my_bb.TRIM_TO_INDEX injectbb my_bb SLEEP 300 ITEM_COUNT CRYCOUNT2 "<&CRYID&>" IF CRYCOUNT2 > CRYCOUNT DELETE my_bb RETURNSUB ELSE IF CURENCHANT == ENCHANT SUCCESSENCHANTED = SUCCESSENCHANTED + #i1 ENDIF ENDIF ELSE PRINT_TEXT "Enchant is over." PRINT_TEXT "<&SUCCESSENCHANTED&> are currently enchanted successfully to <&ENCHANT&>" SCRIPT_END ENDIF ELSE PRINT_TEXT "Successfully enchanted." DELETE my_bb RETURNSUB ENDIF WEND RETURNSUB

locking this post because its outdated

updated

read the messages and follow them.

SWS script SET_EVENT "<&SCRIPTEVENT_CHAT&>" Buffers/BufferSWS.l2s parsechat //************************************************************************************* //************************************************************************************* //************************************************************************************* //********************************SWS****************************************** //********************************Script********************************************** //************************************************************************************* //************************************************************************************* //************************************************************************************* DEFINE_GLOBAL INT THREE 3 DEFINE_GLOBAL INT XPLUS ZERO DEFINE_GLOBAL INT YPLUS ZERO DEFINE_GLOBAL INT XMINUS ZERO DEFINE_GLOBAL INT YMINUS ZERO DEFINE_GLOBAL INT LOCOK ZERO DEFINE_GLOBAL INT XYAR ZERO DEFINE_GLOBAL INT YYAR ZERO DEFINE_GLOBAL INT ZYAR ZERO DEFINE_GLOBAL INT XYAR2 ZERO DEFINE_GLOBAL INT YYAR2 ZERO DEFINE_GLOBAL INT EYE ZERO DEFINE_GLOBAL INT Hundred 50 DEFINE_GLOBAL INT FOUR 4 THREAD DontMoveFar SLEEP 70000000000 PRINT_TEXT "end script" END_SCRIPT FUNCTION parsechat LOCK parsechat DEFINE STRING MSG_FIGHTER "fighter" DEFINE STRING MSG_MAGE "mage" DEFINE STRING MSG_SIT "sit" DEFINE STRING MSG_INVITE "invite" DEFINE STRING MSG_LEADER "setmeleader" IF MESSAGETYPE == CHANNEL_PARTY IF MESSAGE == MSG_FIGHTER PRINT_TEXT "Buffing fighter buffs..." COMMAND "/target <&SenderName&>" SLEEP 1500 USE_SKILL 264 CALLSUB POTS SLEEP 1500 USE_SKILL 265 CALLSUB POTS SLEEP 1500 USE_SKILL 266 CALLSUB POTS SLEEP 1500 USE_SKILL 267 CALLSUB POTS SLEEP 1500 USE_SKILL 268 CALLSUB POTS SLEEP 1500 USE_SKILL 269 CALLSUB POTS SLEEP 1500 USE_SKILL 304 CALLSUB POTS SLEEP 1500 USE_SKILL 270 CALLSUB POTS SLEEP 1500 USE_SKILL 270 CALLSUB POTS SLEEP 1500 USE_SKILL 306 CALLSUB POTS SLEEP 1500 USE_SKILL 308 CALLSUB POTS SLEEP 1500 USE_SKILL 349 CALLSUB POTS SLEEP 1500 USE_SKILL 364 CALLSUB POTS SLEEP 1500 USE_SKILL 529 CALLSUB POTS SLEEP 1500 USE_SKILL 764 CALLSUB POTS SLEEP 3000 SAY_TEXT "#SWS DONE" CALLSUB POTS ENDIF IF MESSAGE == MSG_MAGE PRINT_TEXT "Buffing mage buffs..." COMMAND "/target <&SenderName&>" SLEEP 1500 USE_SKILL 264 CALLSUB POTS SLEEP 1500 USE_SKILL 266 CALLSUB POTS SLEEP 1500 USE_SKILL 267 CALLSUB POTS SLEEP 1500 USE_SKILL 268 CALLSUB POTS SLEEP 1500 USE_SKILL 270 CALLSUB POTS SLEEP 1500 USE_SKILL 304 CALLSUB POTS SLEEP 1500 USE_SKILL 305 CALLSUB POTS SLEEP 1500 USE_SKILL 306 CALLSUB POTS SLEEP 1500 USE_SKILL 308 CALLSUB POTS SLEEP 3000 USE_SKILL 349 CALLSUB POTS SLEEP 3000 USE_SKILL 529 CALLSUB POTS SLEEP 3000 USE_SKILL 764 SLEEP 3000 SAY_TEXT "#SWS DONE" CALLSUB POTS ENDIF IF MESSAGE == MSG_SIT PRINT_TEXT "sitting down..." COMMAND "/sit" ENDIF IF MESSAGE == MSG_INVITE PRINT_TEXT "inviting <&SenderName&>..." COMMAND "/invite <&SenderName&>" ENDIF IF MESSAGE == MSG_LEADER PRINT_TEXT "changing leader to <&SenderName&>..." COMMAND "/changepartyleader <&SenderName&>" ENDIF ENDIF UNLOCK parsechat RETURN VOID SUB POTS SLEEP 1500 WHILE CHAR_CUR_MP < CHAR_MAX_MP SLEEP 1500 USE_ITEM 728 WEND RETURNSUB FUNCTION DontMoveFar XYAR = "<&char_X&>" YYAR = "<&char_Y&>" ZYAR = "<&char_Z&>" WHILE ZERO == ZERO //Add the X and Y of the position where you soe //PRINT_TEXT "<&XYAR&> and <&YYAR&> and <&ZYAR&>" CALLSUB WhereAmI //If we are in range of the four locations, proceed, else skip IF EYE == FOUR //PRINT_TEXT "Were OK" SLEEP "5000" ELSE PRINT_TEXT "Were NOT OK, moving back to starting location" CALLSUB MOVEBACKTOPOSITION SLEEP "1000" ENDIF WEND RETURN VOID SUB WhereAmI // we just need X and Y to find where we are... allowing 100 square arround your position for randomizing. XPLUS = XYAR + Hundred YPLUS = YYAR + Hundred XMINUS = XYAR - Hundred YMINUS = YYAR - Hundred //PRINT_TEXT "These four following are the calculated values" //PRINT_TEXT "<&XPLUS&>" //PRINT_TEXT "<&YPLUS&>" //PRINT_TEXT "<&XMINUS&>" //PRINT_TEXT "<&YMINUS&>" EYE = ZERO IF CHAR_X < XPLUS //PRINT_TEXT "First ok" MATH EYE EYE ADD ONE ENDIF IF CHAR_X > XMINUS //PRINT_TEXT "second ok" EYE = EYE + ONE ENDIF IF CHAR_Y < YPLUS //PRINT_TEXT "third ok" EYE = EYE + ONE ENDIF IF CHAR_Y > YMINUS //PRINT_TEXT "fourth ok" EYE = EYE + ONE ENDIF //PRINT_TEXT "<&EYE&>" RETURNSUB SUB MOVEBACKTOPOSITION LOCK parsechat PRINT_TEXT "BACK IN POSITION SOLDIER!" MOVE_TO "<&XYAR&>" "<&YYAR&>" "<&ZYAR&>" SLEEP 1000 UNLOCK parsechat RETURNSUB WC script SET_EVENT "<&SCRIPTEVENT_CHAT&>" Buffers/BufferWC.l2s parsechat //************************************************************************************* //************************************************************************************* //************************************************************************************* //********************************WarCryer****************************************** //********************************Script********************************************** //************************************************************************************* //************************************************************************************* //************************************************************************************* DEFINE_GLOBAL INT THREE 3 DEFINE_GLOBAL INT XPLUS ZERO DEFINE_GLOBAL INT YPLUS ZERO DEFINE_GLOBAL INT XMINUS ZERO DEFINE_GLOBAL INT YMINUS ZERO DEFINE_GLOBAL INT LOCOK ZERO DEFINE_GLOBAL INT XYAR ZERO DEFINE_GLOBAL INT YYAR ZERO DEFINE_GLOBAL INT ZYAR ZERO DEFINE_GLOBAL INT XYAR2 ZERO DEFINE_GLOBAL INT YYAR2 ZERO DEFINE_GLOBAL INT EYE ZERO DEFINE_GLOBAL INT Hundred 50 DEFINE_GLOBAL INT FOUR 4 THREAD DontMoveFar SLEEP 70000000000 PRINT_TEXT "end script" END_SCRIPT FUNCTION parsechat LOCK parsechat DEFINE STRING MSG_FIGHTER "fighter" DEFINE STRING MSG_MAGE "mage" DEFINE STRING MSG_SIT "sit" DEFINE STRING MSG_INVITE "invite" DEFINE STRING MSG_LEADER "setmeleader" DEFINE STRING MSG_COV "cov" DEFINE STRING MSG_MAGNUS "mag" IF MESSAGETYPE == CHANNEL_PARTY IF MESSAGE == MSG_MAGNUS COMMAND "/target <&SenderName&>" SLEEP 1500 USE_SKILL 1413 SLEEP 3000 COMMAND "/leave" ENDIF IF MESSAGE == MSG_COV SLEEP 1500 USE_SKILL 1363 SLEEP 3000 COMMAND "/leave" ENDIF IF MESSAGE == MSG_FIGHTER PRINT_TEXT "Buffing fighter buffs..." COMMAND "/target <&SenderName&>" SLEEP 1500 USE_SKILL 1006 SLEEP 1500 USE_SKILL 1007 SLEEP 1500 USE_SKILL 1009 SLEEP 1500 USE_SKILL 1251 SLEEP 1500 USE_SKILL 1252 SLEEP 1500 USE_SKILL 1253 SLEEP 1500 USE_SKILL 1284 SLEEP 1500 USE_SKILL 1308 SLEEP 1500 USE_SKILL 1309 SLEEP 1500 USE_SKILL 1310 SLEEP 1500 USE_SKILL 1363 SLEEP 1500 USE_SKILL 1390 SLEEP 1500 USE_SKILL 1461 SLEEP 1500 USE_SKILL 1362 SLEEP 3000 CALLSUB POTS ENDIF IF MESSAGE == MSG_MAGE PRINT_TEXT "Buffing mage buffs..." COMMAND "/target <&SenderName&>" SLEEP 1500 USE_SKILL 1002 SLEEP 1500 USE_SKILL 1006 SLEEP 1500 USE_SKILL 1009 SLEEP 1500 USE_SKILL 1253 SLEEP 1500 USE_SKILL 1284 SLEEP 1500 USE_SKILL 1363 SLEEP 1500 USE_SKILL 1391 SLEEP 1500 USE_SKILL 1362 SLEEP 1500 USE_SKILL 1461 SLEEP 3000 CALLSUB POTS ENDIF IF MESSAGE == MSG_SIT PRINT_TEXT "sitting down..." COMMAND "/sit" ENDIF IF MESSAGE == MSG_INVITE PRINT_TEXT "inviting <&SenderName&>..." COMMAND "/invite <&SenderName&>" ENDIF IF MESSAGE == MSG_LEADER PRINT_TEXT "changing leader to <&SenderName&>..." COMMAND "/changepartyleader <&SenderName&>" ENDIF ENDIF IF MESSAGETYPE == CHANNEL_PRIVATE IF MESSAGE == MSG_INVITE PRINT_TEXT "inviting <&SenderName&>..." COMMAND "/invite <&SenderName&>" ENDIF ENDIF UNLOCK parsechat RETURN VOID SUB POTS SLEEP 1000 USE_ITEM 728 SLEEP 1000 USE_ITEM 728 SLEEP 1000 USE_ITEM 728 SLEEP 1000 USE_ITEM 728 SLEEP 1000 USE_ITEM 728 SLEEP 1000 USE_ITEM 728 RETURNSUB FUNCTION DontMoveFar XYAR = "<&char_X&>" YYAR = "<&char_Y&>" ZYAR = "<&char_Z&>" WHILE ZERO == ZERO //Add the X and Y of the position where you soe //PRINT_TEXT "<&XYAR&> and <&YYAR&> and <&ZYAR&>" CALLSUB WhereAmI //If we are in range of the four locations, proceed, else skip IF EYE == FOUR //PRINT_TEXT "Were OK" SLEEP "5000" ELSE PRINT_TEXT "Were NOT OK, moving back to starting location" CALLSUB MOVEBACKTOPOSITION SLEEP "1000" ENDIF WEND RETURN VOID SUB WhereAmI // we just need X and Y to find where we are... allowing 100 square arround your position for randomizing. XPLUS = XYAR + Hundred YPLUS = YYAR + Hundred XMINUS = XYAR - Hundred YMINUS = YYAR - Hundred //PRINT_TEXT "These four following are the calculated values" //PRINT_TEXT "<&XPLUS&>" //PRINT_TEXT "<&YPLUS&>" //PRINT_TEXT "<&XMINUS&>" //PRINT_TEXT "<&YMINUS&>" EYE = ZERO IF CHAR_X < XPLUS //PRINT_TEXT "First ok" MATH EYE EYE ADD ONE ENDIF IF CHAR_X > XMINUS //PRINT_TEXT "second ok" EYE = EYE + ONE ENDIF IF CHAR_Y < YPLUS //PRINT_TEXT "third ok" EYE = EYE + ONE ENDIF IF CHAR_Y > YMINUS //PRINT_TEXT "fourth ok" EYE = EYE + ONE ENDIF //PRINT_TEXT "<&EYE&>" RETURNSUB SUB MOVEBACKTOPOSITION LOCK parsechat PRINT_TEXT "BACK IN POSITION SOLDIER!" MOVE_TO "<&XYAR&>" "<&YYAR&>" "<&ZYAR&>" SLEEP 1000 UNLOCK parsechat RETURNSUB

you will need to download l2.net, look at the stickied thread for it. (you may also want to look for the enchant script :P) www.ltwonet.com These are the complete scripts to farm in l2inc be able to buff automatically, go hunting, die, get buffed, go hunting.... Do as you wish with them, all you need to do it set your SH/SPS.... w/e the class to use his skills. You can also use this script for fighters as long as you change what the script communicates to the buffers. I've ran these scripts for over 2 weeks straight.... most likely because: 1: gms dont think people bot 2: gms dont think bots can attack their special mobs (seen as players)... which is the case for other bots 3: gms dont care because no matter what you do, you wont be able to beat the donators.... +30 skills, +30 weapons, +30 armor. Unless you were in a skilled clan which were smarter then the donators. To anybody else that plays this server and the clan I was in... sorry but I dont play that server anymore, the pvp is boring and gms gave out more then +25 weapons and amor even though they claim to have +25 as a cap. I personally made +20 armor sets and +25 weapons "legit" with enchant scripts and such, but really, I cant imagine how complete legit players do it. Just a money scramble in my opinion. Enjoy the power of l2.net. I will not leak my name until all my clan mates leave that server or they allow me to anyways. if you run mages, you need the following buffers: BD,SWS,WC NOTE //I have blocked off two threads, one to check if you are gaining any //exp, and the other to say something when people attack you, such //as "lol", which was my case //You will need to change the location of the buffers, and change the //script's pathing to your buffers. Main script: //I have blocked off two threads, one to check if you are gaining any //exp, and the other to say something when people attack you, such //as "lol", which was my case //You will need to change the location of the buffers, and change the //script's pathing to your buffers. SET_TARGETING TYPE TWO SET_TARGETING ALIVE ZERO SET_TARGETING INBOX ZERO SET_TARGETING COMBAT TWO DEFINE_GLOBAL INT TDIST 0 DEFINE_GLOBAL INT MAXMOVES 0 DEFINE_GLOBAL INT NeedMoving 0 DEFINE_GLOBAL INT THREE 3 DEFINE_GLOBAL INT FOUR 4 DEFINE_GLOBAL INT FIVE 5 DEFINE_GLOBAL INT FIFTY 50 DEFINE_GLOBAL INT TWENTYFIVE 25 DEFINE_GLOBAL INT FIGHT ZERO DEFINE_GLOBAL INT HOW_GAY_IS_MPJ 20 DEFINE_GLOBAL INT MAXDEATH 0 DEFINE_GLOBAL INT ADENAAMOUNT 0 DEFINE_GLOBAL INT id2 0 DEFINE_GLOBAL INT FA " " DEFINE_GLOBAL INT FA2 " " DEFINE INT RANGE 0 DEFINE INT x 0 DEFINE INT y 0 DEFINE INT z 0 DEFINE_GLOBAL INT Adena 0 SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" AdenaCount 98 SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" cancel_trade 112 SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" cancel_party 57 SET_EVENT "<&SCRIPTEVENT_SERVERPACKET&>" "<&SYSTEM_CURRENTFILE&>" cancel_clan 44 DEFINE STRING itemname2 "Festival Adena" ITEM_GET_ID id2 "<&itemname2&>" PRINT_TEXT "<&id2&>" //THREAD XPCHECK //THREAD CPCHECK IF CHAR_CUR_HP <= ZERO TAP_TO TOWN SLEEP 6000 ENDIF PRINT_TEXT "MAKE SURE YOU LOADED MY SET!" x = #i-84665 y = #i244294 z = #i-3730 DISTANCE RANGE X Y Z CHAR_X CHAR_Y CHAR_Z IF RANGE <= #i2000 PRINT_TEXT "we are in talking island" CALLSUB TALKINGISLANDTOZONE CALLSUB HuntersVillage CALLSUB INFINITLOOP ENDIF x = #i-11936 y = #i236619 z = #i-3252 DISTANCE RANGE X Y Z CHAR_X CHAR_Y CHAR_Z IF RANGE <= #i5000 PRINT_TEXT "we are in Hellbound 2" x = #i-16107 y = #i237673 z = #i-3361 CALL MPJ_IS_A_HOMO VOID 3 X Y Z FIGHT = #i0 INJECT "39 51 01 00 00 00 00 00 00 00" INJECT "59 D4 C2 FF FF 01 A4 03 00 26 F3 FF FF B1 B6 00 00 00 00 00 00" CALLSUB INFINITLOOP ENDIF x = #i117128 y = #i76891 z = #i-2690 DISTANCE RANGE X Y Z CHAR_X CHAR_Y CHAR_Z IF RANGE <= #i3000 PRINT_TEXT "we are in Hunters Village" CALLSUB HuntersVillage CALLSUB INFINITLOOP ENDIF PRINT_TEXT "you are in an unknown location, script is terminating, please start in hunters, talking island or in the hellbound area." SCRIPT_END SUB INFINITLOOP DO CALLSUB AUTOFIGHTER CALLSUB TALKINGISLANDTOZONE CALLSUB HuntersVillage LOOP ZERO == ZERO SCRIPT_END RETURNSUB SUB TALKINGISLANDTOZONE FIGHT = #i1 FIGHT = FIGHT + #i1 INJECT "14" INJECT "19 F6 2B 16 10 00 00 00 00" SLEEP 1000 NPC_DIALOG "bypass -h pc_magic_chat" SLEEP 1000 NPC_DIALOG "bypass -h pc_magic_pre 0" x = #i-84783 y = #i243289 z = #i-3729 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i-85188 y = #i244031 z = #i-3729 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i-84246 y = #i244677 z = #i-3729 CALL MPJ_IS_A_HOMO VOID 3 X Y Z TARGET_NEAREST_NAME "Teleporter" SLEEP 1000 TALK_TARGET SLEEP 1000 NPC_DIALOG "bypass -h pc_tele_chat 21" SLEEP 1000 NPC_DIALOG "bypass -h pc_tele_chat 3" SLEEP 1000 NPC_DIALOG "bypass -h pc_teleport 2811" SLEEP 1000 RETURNSUB SUB HuntersVillage command "/leave" FIGHT = #i1 FIGHT = FIGHT + #i1 x = #i117409 y = #i76371 z = #i-2698 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i117942 y = #i76705 z = #i-2599 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i117833 y = #i76784 z = #i-2589 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i117616 y = #i77101 z = #i-2588 CALL MPJ_IS_A_HOMO VOID 3 X Y Z SAY_TEXT "<&CHANNEL_PRIVATE&>" "invite" "clam" SLEEP 5000 SAY_TEXT "<&CHANNEL_PARTY&>" "mage" SLEEP 1000 USE_SKILL 1457 SLEEP 60000 command "/leave" x = #i117616 y = #i77101 z = #i-2588 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i117833 y = #i76784 z = #i-2589 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i117942 y = #i76705 z = #i-2599 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i117409 y = #i76371 z = #i-2698 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i117081 y = #i76901 z = #i-2698 CALL MPJ_IS_A_HOMO VOID 3 X Y Z TARGET_NEAREST_NAME "Teleporter" SLEEP 1000 TALK_TARGET SLEEP 1000 NPC_DIALOG "bypass -h pc_tele_chat 28" SLEEP 1000 NPC_DIALOG "bypass -h pc_teleport 6010" SLEEP 3000 x = #i-13608 y = #i236934 z = #i-3266 CALL MPJ_IS_A_HOMO VOID 3 X Y Z x = #i-16107 y = #i237673 z = #i-3361 CALL MPJ_IS_A_HOMO VOID 3 X Y Z FIGHT = #i0 INJECT "39 51 01 00 00 00 00 00 00 00" INJECT "59 D4 C2 FF FF 01 A4 03 00 26 F3 FF FF B1 B6 00 00 00 00 00 00" RETURNSUB _<&TARGET_ID&>_ x = #i y = #i z = #i CALL MPJ_IS_A_HOMO VOID 3 X Y Z //lets make a variable to store the hp to rest when we drop below //we make it equal to half our max SUB AUTOFIGHTER WHILE FIGHT == ZERO //lets make sure we start with decent hp CALLSUB Target SLEEP 1000 //if we got a target WHILE TARGET_CUR_HP > ZERO //lets kill it IF CHAR_CUR_HP == ZERO FIGHT = #i0 TAP_TO TOWN SLEEP 10000 RETURNSUB ENDIF CALLSUB KillTarget WEND WEND RETURNSUB END_SCRIPT ////////SUBS////////// SUB Target TARGET_NEAREST_NAME "L2InC" SLEEP 750 RETURNSUB SUB KillTarget SLEEP 200 IF CHAR_CUR_HP == ZERO FIGHT = #i0 ENDIF //PRINT_TEXT "killtarget sub finished" RETURNSUB FUNCTION MPJ_IS_A_HOMO 3 X Y Z MAXMOVES = #i0 PRINT_TEXT "TDIST = <&tdist&>" DISTANCE TDIST X Y Z CHAR_X CHAR_Y CHAR_Z WHILE TDIST > HOW_GAY_IS_MPJ MAXMOVES = MAXMOVES + #i1 MOVE_TO "<&X&>" "<&Y&>" "<&Z&>" SLEEP 500 DISTANCE TDIST X Y Z CHAR_X CHAR_Y CHAR_Z PRINT_TEXT "TDIST = <&tdist&>" IF MAXMOVES >= #i60 //30 seconds until antistuck kicks in IF tdist <= #i500 PRINT_TEXT "Unstuck mode ON" RETURN VOID ELSE PRINT_TEXT "seems like our distance to tdist is greater then 500... TDIST" PRINT_TEXT "= <&tdist&>" //PRINT_TEXT "I do not want to screw up this whole script, you will need to move" //PRINT_TEXT "your char close to the point manually." SLEEP 5000 ENDIF ENDIF WEND RETURN VOID FUNCTION CPCHECK WHILE ZERO == ZERO IF CHAR_CUR_CP < CHAR_MAX_CP SAY_TEXT "<&CHANNEL_ALL&>" "lol" SLEEP 120000 ENDIF SLEEP 2000 WEND RETURNVOID FUNCTION AdenaCount DEFINE INT messageid 0 DEFINE INT size 0 DEFINE INT type 0 DEFINE INT AdenaCount 0 PACKET.READ_BYTE NULL PACKET.READ_INT32 messageid PACKET.READ_INT32 size FOR x 0 "<&size&>" 1 PACKET.READ_INT32 type IF type == #i1 IF messageid == #i52 PACKET.READ_INT32 AdenaCount Adena = adena + adenacount WHILE Adena > #i500000000 SLEEP 500 SAY_TEXT "<&CHANNEL_ALL&>" ".deposit" Print_text "got jew a gold bar nig <&adena&>" Adena = adena - #i500000000 WEND ENDIF ENDIF NEXT RETURN VOID FUNCTION cancel_trade PRINT_TEXT "received trade invite... sleeping 2 seconds" SLEEP 2000 PRINT_TEXT "canceling trade invite" INJECT "55 00 00 00 00" SLEEP 1000 RETURN VOID FUNCTION cancel_party PRINT_TEXT "received party invite... sleeping 2 seconds" SLEEP 2000 PRINT_TEXT "canceling party invite" INJECT "43 00 00 00 00" SLEEP 1000 RETURN VOID FUNCTION cancel_clan PRINT_TEXT "received clan invite... sleeping 2 seconds" SLEEP 2000 PRINT_TEXT "canceling clan invite" INJECT "27 00 00 00 00" SLEEP 1000 RETURN VOID FUNCTION XPCHECK WHILE ZERO == ZERO ITEM_COUNT FA 6673 PRINT_TEXT "<&FA&>" SLEEP 300000 //5 minutes ITEM_COUNT FA2 6673 PRINT_TEXT "<&FA&>" IF FA2 == FA PRINT_TEXT "WE ARE NOT LEVELING! SOMETHING IS WRONG!" IF CHAR_CUR_HP <= ZERO TAP_TO TOWN SLEEP 9000 ENDIF FIGHT = #i1 INJECT "14" INJECT "19 F6 2B 16 10 00 00 00 00" SLEEP 1000 NPC_DIALOG "bypass -h pc_magic_chat" SLEEP 1000 NPC_DIALOG "bypass -h pc_magic_pre 0" SLEEP 1000 TARGET_NEAREST_NAME "Teleporter" SLEEP 1000 TALK_TARGET SLEEP 1000 NPC_DIALOG "bypass -h pc_tele_chat 21" SLEEP 1000 NPC_DIALOG "bypass -h pc_tele_chat 3" SLEEP 1000 NPC_DIALOG "bypass -h pc_teleport 2811" SLEEP 1000 CALLSUB HuntersVillage FIGHT = #i0 ELSE PRINT_TEXT "Everything checked out ok." ENDIF WEND RETURN VOID BD SET_EVENT "<&SCRIPTEVENT_CHAT&>" Buffers/BufferBD.l2s parsechat //************************************************************************************* //************************************************************************************* //************************************************************************************* //********************************BD****************************************** //********************************Script********************************************** //************************************************************************************* //************************************************************************************* //************************************************************************************* DEFINE_GLOBAL INT THREE 3 DEFINE_GLOBAL INT XPLUS ZERO DEFINE_GLOBAL INT YPLUS ZERO DEFINE_GLOBAL INT XMINUS ZERO DEFINE_GLOBAL INT YMINUS ZERO DEFINE_GLOBAL INT LOCOK ZERO DEFINE_GLOBAL INT XYAR ZERO DEFINE_GLOBAL INT YYAR ZERO DEFINE_GLOBAL INT ZYAR ZERO DEFINE_GLOBAL INT XYAR2 ZERO DEFINE_GLOBAL INT YYAR2 ZERO DEFINE_GLOBAL INT EYE ZERO DEFINE_GLOBAL INT Hundred 50 DEFINE_GLOBAL INT FOUR 4 THREAD DontMoveFar SLEEP 70000000000 PRINT_TEXT "end script" END_SCRIPT FUNCTION parsechat LOCK parsechat DEFINE STRING MSG_FIGHTER "fighter" DEFINE STRING MSG_MAGE "mage" DEFINE STRING MSG_SIT "sit" DEFINE STRING MSG_INVITE "invite" DEFINE STRING MSG_LEADER "setmeleader" IF MESSAGETYPE == CHANNEL_PARTY IF MESSAGE == MSG_FIGHTER PRINT_TEXT "Buffing fighter buffs..." COMMAND "/target <&SenderName&>" SLEEP 2500 CALLSUB POTS USE_SKILL 271 SLEEP 2500 CALLSUB POTS USE_SKILL 272 SLEEP 2500 CALLSUB POTS USE_SKILL 274 SLEEP 2500 CALLSUB POTS USE_SKILL 275 SLEEP 2500 CALLSUB POTS USE_SKILL 277 SLEEP 2500 CALLSUB POTS USE_SKILL 307 SLEEP 2500 CALLSUB POTS USE_SKILL 309 SLEEP 2500 CALLSUB POTS USE_SKILL 311 SLEEP 2500 CALLSUB POTS USE_SKILL 310 SLEEP 2500 CALLSUB POTS USE_SKILL 530 SLEEP 2500 CALLSUB POTS USE_SKILL 307 SLEEP 3000 CALLSUB POTS SAY_TEXT "#BD DONE" ENDIF IF MESSAGE == MSG_MAGE PRINT_TEXT "Buffing mage buffs..." COMMAND "/target <&SenderName&>" SLEEP 2500 USE_SKILL 273 SLEEP 1000 SLEEP 2500 USE_SKILL 276 SLEEP 1000 CALLSUB POTS SLEEP 2500 USE_SKILL 307 SLEEP 1000 SLEEP 2500 USE_SKILL 277 SLEEP 1000 CALLSUB POTS SLEEP 2500 USE_SKILL 307 SLEEP 1000 SLEEP 2500 USE_SKILL 309 CALLSUB POTS SLEEP 2500 USE_SKILL 311 SLEEP 1000 SLEEP 2500 USE_SKILL 310 SLEEP 1000 CALLSUB POTS SLEEP 2500 USE_SKILL 365 SLEEP 1000 SLEEP 2500 USE_SKILL 530 SLEEP 3000 CALLSUB POTS SAY_TEXT "#BD DONE" ENDIF IF MESSAGE == MSG_SIT PRINT_TEXT "sitting down..." COMMAND "/sit" ENDIF IF MESSAGE == MSG_INVITE PRINT_TEXT "inviting <&SenderName&>..." COMMAND "/invite <&SenderName&>" ENDIF IF MESSAGE == MSG_LEADER PRINT_TEXT "changing leader to <&SenderName&>..." COMMAND "/changepartyleader <&SenderName&>" ENDIF ENDIF UNLOCK parsechat RETURN VOID SUB POTS SLEEP 1500 WHILE CHAR_CUR_MP < CHAR_MAX_MP SLEEP 1500 USE_ITEM 728 WEND RETURNSUB FUNCTION DontMoveFar XYAR = "<&char_X&>" YYAR = "<&char_Y&>" ZYAR = "<&char_Z&>" WHILE ZERO == ZERO //Add the X and Y of the position where you soe //PRINT_TEXT "<&XYAR&> and <&YYAR&> and <&ZYAR&>" CALLSUB WhereAmI //If we are in range of the four locations, proceed, else skip IF EYE == FOUR //PRINT_TEXT "Were OK" SLEEP "5000" ELSE PRINT_TEXT "Were NOT OK, moving back to starting location" CALLSUB MOVEBACKTOPOSITION SLEEP "1000" ENDIF WEND RETURN VOID SUB WhereAmI // we just need X and Y to find where we are... allowing 100 square arround your position for randomizing. XPLUS = XYAR + Hundred YPLUS = YYAR + Hundred XMINUS = XYAR - Hundred YMINUS = YYAR - Hundred //PRINT_TEXT "These four following are the calculated values" //PRINT_TEXT "<&XPLUS&>" //PRINT_TEXT "<&YPLUS&>" //PRINT_TEXT "<&XMINUS&>" //PRINT_TEXT "<&YMINUS&>" EYE = ZERO IF CHAR_X < XPLUS //PRINT_TEXT "First ok" MATH EYE EYE ADD ONE ENDIF IF CHAR_X > XMINUS //PRINT_TEXT "second ok" EYE = EYE + ONE ENDIF IF CHAR_Y < YPLUS //PRINT_TEXT "third ok" EYE = EYE + ONE ENDIF IF CHAR_Y > YMINUS //PRINT_TEXT "fourth ok" EYE = EYE + ONE ENDIF //PRINT_TEXT "<&EYE&>" RETURNSUB SUB MOVEBACKTOPOSITION LOCK parsechat PRINT_TEXT "BACK IN POSITION SOLDIER!" MOVE_TO "<&XYAR&>" "<&YYAR&>" "<&ZYAR&>" SLEEP 1000 UNLOCK parsechat RETURNSUB

l2.net works there.

thanks for the info. sadly all those servers are interlude, which I dont play anymore :<

its just the way it is because you could have another file with all the events in there, I use that in my other scripts actually.

I put up a new version of this script for 358+ in the same thread on ltwonet.com

something along these lines. //note Buffers.l2s must be your script name and it MUST be in scripts folder. SET_EVENT "<&SCRIPTEVENT_CHAT&>" Buffers.l2s parsechat SLEEP 70000000000 SCRIPT_END FUNCTION parsechat DEFINE STRING MSG_buff "159753" IF MESSAGETYPE == CHANNEL_PARTY IF MESSAGE == MSG_buff USE_SKILL 1234 DELAY 2500 USE_SKILL 1234 DELAY 2500 USE_SKILL 1234 DELAY 2500 endif endif RETURN VOID

use an event for that, theres a few already made posted on ltwonet.com

I meant new.... you need an older version.

hack hack hack hack. locked.

your walker version is too old for it. use 10.7.4 or 10.6.4

its not that easy... lots of packet manipulation.

l2.net is an advanced bot. Its not meant to be as easy friendly like walker. 359 will work on alot of autofighter shit to fix it for good.

there! 358 is out. Biggest update in l2.net history! 359 will focus on autofighter and more GUI updates. Stay tuned!

for l2.net you need to make sure that 1. you have the correct ip 2. you have the correct chronicle ( if you can login up to the gameloop, its either your chronicle or protocol that is wrong) 3. you have the correct protocol 4. you have the correct token (usually not the problem) and it will work on ct1+ If you tried all of the above and still cannot connect, you can always post your server and I may come around to helping you connect, depends on my mood and if the info is there for me.

358 is in its 13th beta. Lots of underground things get tested before they are released to the public.

pots work, go under bot options and choose with items.

l2.net interlude versions will work.

I dont even think they are giving us the full files.

www.BigDog888.com tai bot :| maybe walker sold his shit to him? Seems to be an exact replica.

you need to put your skills on the hotbar and use em this way (with the bot options) example, page 1, skill 2, 5000 delay