Jump to content

Recommended Posts

Posted

This is a script for high rate servers, it enchants lots of the same item.

Detect when the item broke and jumps to the next and when the enchant is over.

It will enchant all itens with the same name on your invnetory, if you have one you don't want to enchant put in your wh.

 

INCLUDE StdLib\inventory.l2c

//Settings
DEFINE STRING ITEMNAME "Icarus Spitter"            //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 20                //Max enchant
DEFINE INT CURENCHANT 0                    //Current enchant, change line 38 too
DEFINE INT DELAY 1000                    //Delay of all actions (ms)

//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 HEXCODE "00 00 00 00"
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&>"
MATH ENCHCODE ENCHUID GET_HEX
DEFINE STRING ENCH "19 <&ENCHCODE&> 00 00 00 00"

//Start actions
FOREACH I Inventory INVEN_AL
    SET ITNAME "<&INVEN_AL.I.NAME&>"
    IF ITNAME == ITEMNAME
        CALLSUB ENCHANT
        PRINT_TEXT "<&ENCHCOUNT&> enchants sobrando. "
        SET CURENCHANT 0
    ENDIF
NEXTEACH

PRINT_TEXT "Done"
SCRIPT_END

SUB ENCHANT

MATH HEXCODE "INVEN_AL.I.ID" GET_HEX

SET ITEM "5F <&HEXCODE&> 00 00 00 00"

WHILE ZERO == ZERO
ITEM_COUNT CRYCOUNT "<&CRYID&>"
IF CURENCHANT < ENCHANT
    ITEM_COUNT ENCHCOUNT "<&ENCHID&>"
    IF ENCHCOUNT > ZERO
        INJECT "<&ENCH&>"
        SLEEP "<&DELAY&>"
        INJECT "<&ITEM&>"
        SLEEP "<&DELAY&>"
        MATH CURENCHANT CURENCHANT ADD ONE

    ITEM_COUNT CRYCOUNT2 "<&CRYID&>"
    IF CRYCOUNT2 > CRYCOUNT
        RETURNSUB
    ENDIF
    ELSE
        PRINT_TEXT "Enchant is over."
        SCRIPT_END
    ENDIF
ELSE
    PRINT_TEXT "Successfully enchanted."
    RETURNSUB
ENDIF
WEND
RETURNSUB

 

Topic in L2.NET foum

Posted

nice I see you check for the crystal type as well. I was going to suggest counting all the crystal grades, but that works too :P

 

 

just wanted to point out, you dont need that ENDIF after your returnsub

 

    IF CRYCOUNT2 > CRYCOUNT

        RETURNSUB

    ENDIF

    ELSE

        PRINT_TEXT "Enchant is over."

        SCRIPT_END

    ENDIF

Posted

just saying, that may cause problems because it never gets to the Endif, just useless if anything, wont break your script or anything

 

never mind... your tabbing was confusing me :|

  • 4 weeks later...
Guest
This topic is now closed to further replies.


  • Posts

    • Hi, great work! Are there any bugs? And will it work with a high five?
    • For others that would like to understand in more details:   The login server also uses a protocol (sent by the server to the client in the very first packet). For instance, the C4 client (the one I'm developing my emulator for) expects the protocol number `50721` (or `0xc621`) which works as follow (from what I've gathered): Preamble: L2 packets are divided into two parts: size and payload; As mentioned, every packet starts with two bytes containing the whole packet size (thus including those two bytes, e.g. a packet of size 15 will have the number `15` written onto its first two bytes and a following payload of 13 bytes); For login server, first byte of the payload is the opcode (game server must deal with variable-sized opcodes); Next bytes are the packet content; Before sending the packet, its buffer size (minus the initial two bytes) is padded to 8 bytes (required by upcoming Blowfish encoding); A checksum of the packet is appended at the end, then the payload is again padded to 8 bytes; If the opcode is not `0` (also written as `0x00`), then the payload is encoded by Blowfish; Packet is sent over the network. You can have a look at my implementation (in C++) here (do note I'm assuming little-endian).   In this protocol, the auth packet (`0x00`) sent back by the client is RSA encrypted using the RSA modulus sent in the first server packet, inserted right after the protocol number.  
    • Hello guys I wanna buy some  Lessons for an L2J Developer
    • Let me give you something for inspiration and get you addicted to bot AI     And a siege 😛     What I have notice helps a lot the LLM to act real, is to give it a real-persons background. So for each LLM in the context beggining, besides the L2 facts, give it a real-life back story "You are a 67 years old retired nurse who plays Lineage 2 while her husband reads his newspaper, you are calm, collected but get mad if insulted". But that makes for a creative bot but its repetitive. So what you can also do, is pick random 20 news sites and for each bot every 2-3 days, initialize a context that is affected by the "news" the bot reads in the "real world".  So for example there's Iran - US war ok ? You take the news, put it in an LLM and ask it, extract the "abstract feelings" that this news piece invokes into you without mentioning anything related to the news. Then you take the result and inject it to the bots LLM prompt after its backstory.  This leads to some VERY human-like behavior from bots. 
  • Topics

×
×
  • Create New...

Important Information

This community uses essential cookies to function properly. Non-essential cookies and third-party services are used only with your consent. Read our Privacy Policy and We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue..