Jump to content

[Share] Auto-Enchant 100% working and more!


Recommended Posts

Posted

It work for me... I make u notice that if u wanna enchant an A grade item u have to put " - " in crystal definition

 

Like:

//Some definitions
DEFINE INT CURENCHANT 0                    
DEFINE INT SUCCESSENCHANTED 0 
DEFINE STRING CRYSTAL "Crystal: <&ITGRADE&>-Grade"

Posted

yea.... I just kinda thought that most people were enchanting S grade i guess :P

Posted

i using l2net  v361 and use script

 

//edited and tweaked by mpj123
//testing, bug solutions and just being cool, MeatWod
INCLUDE StdLib\inventory.l2c

//Settings
DEFINE STRING ITEMNAME "Icarus Disperser/ARMOR HERE"            //Item name, don't write the SA SA
DEFINE STRING ITGRADE S                    //Item grade (s80=s)
DEFINE STRING ENCHNAME "Scroll: Enchant Weapon (S)"    //Enchant name
DEFINE STRING ENCHANT 12              //Max enchant
DEFINE INT CURENCHANT 0                    //Current enchant, change line 38 too
DEFINE INT DELAY 1100                  //Delay of all actions in MS


//Some definitions
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

 

and result:

8:12:57 PM :[0 are currently enchanted successfully to 12

8:12:57 PM :[Done

              ???

Posted

OH MY GOD.

 

DEFINE STRING ITEMNAME "Icarus Disperser/ARMOR HERE" 

 

should be

 

DEFINE STRING ITEMNAME "Icarus Disperser" 

Posted

I HAVE DEFINE DEFINE STRING ITEMNAME "Icarus Disperser" 

AND RESULT

8:32:23 PM :[ERROR: SCRIPT ERROR : THREAD[14] LINE[39] : VARIABLE ITEMNAME IS UNDEFINED

8:32:23 PM :[0 are currently enchanted successfully to 4

8:32:23 PM :[Done

Posted

but what I don scriptu I go? Gimme scriptu you please try to complete echantez Icarus Disperser

 

//made by rocket666
//edited and tweaked by mpj123
//testing, bug solutions and just being cool, MeatWod
INCLUDE StdLib\inventory.l2c

//Settings
DEFINE STRING ITEMNAME "Icarus Disperser"             //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 4             //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

 

result

11:39:35 PM :[Enchant is over.

11:39:35 PM :[0 are currently enchanted successfully to 4

Posted

I was using it in l2inc, it works.

U can post your scripts for any icarus weapon in L2inc plz  and what i need in my inventory???

sorry for my english xD

Posted

you probably wrote the item name wrong or you don't have S enchants...?

Guest
This topic is now closed to further replies.



  • Posts

    • ElmoreLab Harbor - Eternal C1 x1: ✅ https://harbor.elmorelab.com ElmoreLab Harbor - Eternal C1 x1 - is an exclusive server of the Eternal C1 chronicles from the top project ElmoreLab Harbor.   A unique server of its kind, on which everyone will have maximum pleasure, such as oldschool players who dream of nostalgia and to feel the warmest and classic C1 chronicles, as well as experienced players who are tired of thousands unbalanced servers of late chronicles. Due to the professional corrections of the balance system and the HONEST gameplay system - on this server, EVERY player will feel like in their own, warm and cozy Harbor C1. Let's return to the origins of L2 - back to 2004 in C1! ❤️   ⭐ Server characteristics:   STRICTLY 1 window, NO BOXES Bans for RMT and bots/cheats No donations with benefits Unique and high-quality PTS-build from Master Toma Professional corrections and full class-balance Reworked economy and closed all abuses Improved animations and all aspects of the game Exclusive HD-client with high-quality textures Experienced administration and management Fixed all bugs, geodata, exploits and holes Maximum sociality due to the 1-box system Discovering, exploring and researching Big online International server Nostalgia and oldschool-feelings   Rates: x1 Server start: 14.02.2025   The server is at the final stages of development and preparation for release. Information on the server will be updated, soon the patchnotes and changes/edits will be posted. Don't miss the legendary and epic experience on the best server in the last 20 years! ❤️ Join our C1-forum with a lot of information about server and active discussions.   ⭐ Website: https://harbor.elmorelab.com   ✅ Forum: https://forum-harbor.elmorelab.com   💥 Telegram: https://t.me/l2harbor https://t.me/l2harbor_chat   ⚡ Discord: https://discord.gg/harborelmorelab
    • yeah ok, if you say what is fuctional 100% i can't say something different 😛  but if someone find hard to compile it or get vs and all that things i have here one more simple way here to put overlay in your own server or to change your window name with few money.
    • I've been using this for 2 years now with no issues from Discord. I don't use ogg.dll either. This one works with any l2.exe too; I don’t see any difference between them.
    • hmm.. ok i just see that, is different code first of all. My sources is totally different based in other way, with else libraries.  I have access to modify everything even to make the clock to stop show how many time users play in server. 1) so maybe keep some personal info more hide. 2) i dont use ogg.dll 3) i create it and give it ready + support to install it. Plus what is mine can working with what ever .exe you want not just l2 with same simple method. And i am sure if you try this source to compile it, after 3 hours discord will like shadowban your API too thats my source
  • Topics

×
×
  • Create New...