Jump to content
MaxCheaters Official Group on X
MaxCheaters Official Group on Discord
ad: Lineage II Einhovant x1 - Improve Classic 1.0

[SHARE]Automatic enchant script L2.NET ct2.3

mpj123

By mpj123
in Botting [English]

 Share

Recommended Posts

mpj123 Newbie

mpj123

Posted
Posted

http://ltwonet.com/showthread.php?t=1846

 

This is rocket666's script, fixed and edited by me, and re-fixed and edited by trixy.

 

 

 

This is rocket666's enchant script now fixed for CT 2.3 (Gracia Final)

Special thanks to mpj123 for helping me to better understand the bytebuffer function!

 

Please post problems, suggestions, bugs. Thanks

 

(NOT auto detect S Grade)

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

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

//Some definitions
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
DEFINE bytebuffer new_bb 256

my_bb.WRITE_BYTE #i95
my_bb.WRITE_INT32 INVEN_AL.I.ID
my_bb.WRITE_INT32 #i0

new_bb.WRITE_BYTE #i208
new_bb.WRITE_BYTE #i76
new_bb.WRITE_BYTE #i0
new_bb.WRITE_INT32 INVEN_AL.I.ID

WHILE ZERO == ZERO
ITEM_COUNT CRYCOUNT "<&CRYID&>"
IF CURENCHANT < ENCHANT
    ITEM_COUNT ENCHCOUNT "<&ENCHID&>"
    IF ENCHCOUNT > ZERO
        CURENCHANT = CURENCHANT + ONE
        PRINT_TEXT "Your item is enchanting to <&CURENCHANT&>"
        INJECT "<&ENCH&>"
        SLEEP "<&DELAY&>"
        new_bb.TRIM_TO_INDEX
        injectbb new_bb
        SLEEP 1000
        my_bb.TRIM_TO_INDEX
        injectbb my_bb
        SLEEP 300
        ITEM_COUNT CRYCOUNT2 "<&CRYID&>"
        IF CRYCOUNT2 > CRYCOUNT
            DELETE new_bb
            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 new_bb
    DELETE my_bb
    RETURNSUB
ENDIF
WEND
RETURNSUB

EDIT: Ok So I went and changed a few things, I made it so it will now auto detect if you are enchanting S grade or not.

Just Remember to change the DEFINE STRING ITGRADE "S" line, to whatever you need.

 

Also I adjusted the placement of the Definable DELAY. It was after using the enchant scroll, now it's after clicking "ENCHANT".

The slower I ran this script with this DEFINE INT DELAY 4000 (4 seconds delay after clicking enchant button) the more accurate it was.

Had a little lag on the server while waiting for crystals or successful enchant.

 

Use either one you want, hope it works for ya, worked fine for me for an hour.

 

(AUTO detect S Grade)

//made by rocket666
//edited and tweaked by mpj123
//testing, bug solutions and just being cool, MeatWod
//new_bb & S-Grade Auto Detection - trixy
INCLUDE StdLib\inventory.l2c

//Settings
DEFINE STRING ITEMNAME "WEAPON OR ARMOR NAME"            //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 "14"                          //Max enchant (# to stop at)
DEFINE INT CURENCHANT 0                           //Current enchant,change lines 44 & 48 ALSO!!!
DEFINE INT DELAY 4000                                  //Delay of all actions in MS
DEFINE INT SUCCESSENCHANTED 0

//Some definitions
DEFINE STRING CRYSTAL "Crystal: <&ITGRADE&> Grade"
DEFINE STRING CRYSTAL2 "Crystal: <&ITGRADE&>-Grade"
DEFINE INT CRYID 0
DEFINE INT CRYID2 0
DEFINE INT CRYCOUNT 0
DEFINE INT CRYCOUNT2 0
ITEM_GET_ID CRYID "<&CRYSTAL&>"
ITEM_GET_ID CRYID2 "<&CRYSTAL2&>"
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
       IF ITGRADE != #$S
            CURENCHANT = #i0
            CALLSUB ENCHANT_OTHER
            PRINT_TEXT "<&ENCHCOUNT&> enchants remaining."
       ELSE
            CURENCHANT = #i0
            CALLSUB ENCHANT_SGRADE
            PRINT_TEXT "<&ENCHCOUNT&> enchants remaining."
       ENDIF
  ENDIF
NEXTEACH
PRINT_TEXT "<&SUCCESSENCHANTED&> are currently enchanted successfully to <&ENCHANT&>"
PRINT_TEXT "Done"
SCRIPT_END

SUB ENCHANT_OTHER
DEFINE bytebuffer my_bb 256
DEFINE bytebuffer new_bb 256

my_bb.WRITE_BYTE #i95
my_bb.WRITE_INT32 INVEN_AL.I.ID
my_bb.WRITE_INT32 #i0

new_bb.WRITE_BYTE #i208
new_bb.WRITE_BYTE #i76
new_bb.WRITE_BYTE #i0
new_bb.WRITE_INT32 INVEN_AL.I.ID

WHILE ZERO == ZERO
ITEM_COUNT CRYCOUNT "<&CRYID2&>"
IF CURENCHANT < ENCHANT
    ITEM_COUNT ENCHCOUNT "<&ENCHID&>"
    IF ENCHCOUNT > ZERO
        CURENCHANT = CURENCHANT + ONE
        PRINT_TEXT "Your <&ITEMNAME&> is enchanting to <&CURENCHANT&>"
        INJECT "<&ENCH&>"
        SLEEP 500
        new_bb.TRIM_TO_INDEX
        injectbb new_bb
        SLEEP 500
        my_bb.TRIM_TO_INDEX
        injectbb my_bb
        SLEEP "<&DELAY&>"
        ITEM_COUNT CRYCOUNT2 "<&CRYID2&>"
        IF CRYCOUNT2 > CRYCOUNT
            DELETE new_bb
            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 new_bb
    DELETE my_bb
    RETURNSUB
ENDIF
WEND
RETURNSUB


SUB ENCHANT_SGRADE
DEFINE bytebuffer my_bb 256
DEFINE bytebuffer new_bb 256

my_bb.WRITE_BYTE #i95
my_bb.WRITE_INT32 INVEN_AL.I.ID
my_bb.WRITE_INT32 #i0

new_bb.WRITE_BYTE #i208
new_bb.WRITE_BYTE #i76
new_bb.WRITE_BYTE #i0
new_bb.WRITE_INT32 INVEN_AL.I.ID

WHILE ZERO == ZERO
ITEM_COUNT CRYCOUNT "<&CRYID&>"
IF CURENCHANT < ENCHANT
    ITEM_COUNT ENCHCOUNT "<&ENCHID&>"
    IF ENCHCOUNT > ZERO
        CURENCHANT = CURENCHANT + ONE
        PRINT_TEXT "Your <&ITEMNAME&> is enchanting to <&CURENCHANT&>"
        INJECT "<&ENCH&>"
        SLEEP 500
        new_bb.TRIM_TO_INDEX
        injectbb new_bb
        SLEEP 500
        my_bb.TRIM_TO_INDEX
        injectbb my_bb
        SLEEP "<&DELAY&>"
        ITEM_COUNT CRYCOUNT2 "<&CRYID&>"
        IF CRYCOUNT2 > CRYCOUNT
            DELETE new_bb
            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 new_bb
    DELETE my_bb
    RETURNSUB
ENDIF
WEND
RETURNSUB

honi01 Newbie

honi01

Posted
Posted

er can u make the script enchant one by one like easy2k4 's script. his script doesnt work since l2 gracia ct2.3 have been updated!

i know this script very useful but when i enchant the weap to +5 and i have some weap still +4 when i want to enchant the weap still +4 to +5 but this script enchant my weap +5 frist, then +4 after and i get tons of cry :((

phear3d Newbie

phear3d

Posted
Posted

er can u make the script enchant one by one like easy2k4 's script. his script doesnt work since l2 gracia ct2.3 have been updated!

i know this script very useful but when i enchant the weap to +5 and i have some weap still +4 when i want to enchant the weap still +4 to +5 but this script enchant my weap +5 frist, then +4 after and i get tons of cry :((

 

Slow down your int delay, and it wont mess up. The other enchant scripts could be easily fixed using the "new_bb" bytebuffers and inject them..... I just dont have the time right now to go through all the old enchant scripts to fix them. I like this one most :)

 

Enjoy.. Thanks mpj

mpj123 Newbie

mpj123

Posted
  • Author
Posted

this is my favorite, I just set the enchant to 5, then run the script once with 1 enchant to each until they all break.

mpj123 Newbie

mpj123

Posted
  • Author
Posted

these enchant scripts were already made a while back, we just updated it to support ct2.3 packets now.

HarapALB Newbie

HarapALB

Posted
Posted

I play on L2Inc and this script is working for S grade , still , for A grade or lower it might have a problem or do i , when i try to enchant  something it show me that .... tallum armor is enchanted to 10 ,  i got cristals , and he don`t start another armor  it shows to me that he is enchanting to 11 ..... and all items are succeseful enchanted .... does anyone have any idea????

Guest
This topic is now closed to further replies.
 Share
Go to topic listing


  • Posts

    • HoldOnch1k
      [L2OFF] ElmoreLab - Harbor C1

      By HoldOnch1k · Posted

      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
    • Celestine
      L2server DiscordOverlay & WindowName (One Time & Permanent)

      By Celestine · Posted

      Understood Good luck with your sales buddy!
    • AntiVirus
      L2server DiscordOverlay & WindowName (One Time & Permanent)

      By AntiVirus · Posted

      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.
    • Celestine
      L2server DiscordOverlay & WindowName (One Time & Permanent)

      By Celestine · Posted

      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.
    • AntiVirus
      L2server DiscordOverlay & WindowName (One Time & Permanent)

      By AntiVirus · Posted

      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...