Jump to content

Recommended Posts

Posted

Just wanted to let everyone know out there that my script still works on RPG-CLUB. (After being casted aside from the WPF script...)

 

I honestly haven't tested it, some users report it broken (probably retarded), but others report it working 100%(the smart ones who can follow instructions).

 

I don't really plan on updating anything. The script was made for the previous chronicle, but should work on the current. The code is all there, feel free to update it as needed.

 

 

L2.NET only. Although you could replicate something similar in WPF or something.

//credit to obce for half the code :P
//finished by mpj123
//v1.2
Define_Global int step 0
Define_Global int ok 0
////////////////////////////////

define_global int pak_tar 0
define_global int pak_atk 0
define_global int move 0
define_global int validate 0
define_global int use_it 0
define_global int open_inv 0
define_global int save_inv2 0
define_global int save_inv1 0
define_global int open_skill 0
define_global int open_skill2 0
define_global int use_skill 0
//
for a 0 255 1
SET_EVENT "<&SCRIPTEVENT_CLIENTPACKET&>" "<&SYSTEM_CURRENTFILE&>" opc "<&a&>"
SET_EVENT "<&SCRIPTEVENT_CLIENTPACKETEX&>" "<&SYSTEM_CURRENTFILE&>" opc "<&a&>"
next

step = 1
print_text "Target something ..."
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Target something ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 2

print_text "Move ..."
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Move ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 3

print_text "Move again ..."
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Move again ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 4

print_text "Use any item ... "
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Use any item ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 5

print_text "Open inventory ... "
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Open inventory ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 6

print_text "Open skills ..."
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Open skills ..."
do
sleep 1000
loop ok != 1
ok = 0
step = 7

print_text "Use a skill ... (any one of them, even if you cant use it)"
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Use a skill ... (any one of them, even if you cant use it)"
do
sleep 1000
loop ok != 1
ok = 0
step = 8

print_text "FORCE attack something using the CONTROL key!"
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "FORCE attack something using the CONTROL key!"
do
sleep 1000
loop ok != 1
ok = 0


print_text "Stop attacking and stay still somewhere to finish the last step, waiting 3 seconds"
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Stop attacking and stay still somewhere to finish the last step, waiting  3 seconds"
sleep 3000
step = 9

print_text "Close inventory ... "
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Close inventory ... "
do
sleep 1000
loop ok == 0

call block_packets
step = 10

print_text " rdy - target <&pak_tar&>"
print_text " rdy - target <&pak_atk&>"
print_text " rdy - move <&move&> i validate <&validate&>"
print_text " rdy - use _it <&use_it&>"
print_text " rdy  - open inv <&open_inv&>"
print_text " rdy  - save_inv2 <&save_inv2&>"
print_text " rdy  - open_skill <&open_skill&>"
print_text " rdy  - open_skill2 <&open_skill2&>"
print_text " rdy  - use_skill <&use_skill&>"
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "All Ready!"

for a 0 255 1
SET_EVENT "<&SCRIPTEVENT_SELFPACKET&>" "<&SYSTEM_CURRENTFILE&>" opc "<&a&>"
SET_EVENT "<&SCRIPTEVENT_SELFPACKETEX&>" "<&SYSTEM_CURRENTFILE&>" opc "<&a&>"
next

do
sleep 10000
loop 1 == 1
END_SCRIPT






function opc
lock opc
define int temp_ex 0
define int pak 0
//print_text " pakiet dlugosc <&packet.LENGTH&>"
if step == 1
     if packet.LENGTH == 18
        packet.read_byte pak_tar
        Print_text " id stored <&pak_tar&>"
        ok = 1
        unlock opc
        return void
    endif

endif

if step == 2
     if packet.LENGTH == 29
        packet.read_byte move
        Print_text " id stored <&move&>"
        ok = 1
        unlock opc
        return void
    endif   

endif

if step == 3
     if packet.LENGTH == 21
        packet.read_byte validate
        Print_text " id stored <&validate&>"
        ok = 1
        unlock opc
        return void
    endif   

endif



if step == 4
    if packet.LENGTH == 9
        packet.read_byte use_it
        Print_text " id stored <&use_it&>"
        ok = 1
        unlock opc
        return void
    endif   

endif


if step == 5
    if packet.LENGTH == 1
        packet.read_byte open_inv
        Print_text " id stored <&open_inv&>"
        ok = 1
        unlock opc
        return void
    endif   

endif


if step == 6
    if ok == 0
        if packet.LENGTH == 1
            packet.read_byte open_skill
            Print_text " id stored <&open_skill&>"
            ok = 2
            unlock opc
            return void
        endif   
    endif

    if ok == 2
        if packet.LENGTH == 1
        packet.read_byte open_skill2
            if open_skill2 != open_inv
                if open_skill2 != open_skill
                    Print_text " id stored <&open_skill2&>"
                    ok = 1
                    unlock opc
                    return void
                endif
            endif
        endif
    endif

endif

if step == 7
     if packet.LENGTH == 10
        packet.read_byte use_skill
        Print_text " id stored <&use_skill&>"
        ok = 1
        unlock opc
        return void
    endif   

endif

if step == 8
    if packet.LENGTH == 18
        packet.read_byte pak_atk
        if pak_atk != pak_tar
            Print_text " id stored <&pak_atk&>"
            ok = 1
            unlock opc
            return void
        endif
    endif   

endif

if step == 9
    if packet.LENGTH != 15
        packet.read_byte save_inv1
        packet.read_int16 save_inv2
        if save_inv2 <= 0
            SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "You need to stop attacking to be able to capture the close inventory  packet!"
            print_text "You need to stop attacking to be able to capture the close inventory packet!"
            unlock opc
            return void
        endif
        if save_inv2 >= 257
            SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "You need to stop attacking to be able to capture the close inventory  packet!"
            print_text "You need to stop attacking to be able to capture the close inventory packet!"
            unlock opc
            return void
        endif
        Print_text " id stored <&save_inv1&> i 2 byte <&save_inv2&>"
        ok = 1
        unlock opc
        return void
    endif   

endif

if step == 10
packet.read_byte pak
    if pak == 31
        packet.RESET_INDEX
        packet.write_byte pak_tar
        injectbb packet
        unlock opc
        return void
    endif
    if pak == 1
        packet.RESET_INDEX
        packet.write_byte pak_atk
        injectbb packet
        unlock opc
        return void
    endif
    if pak == 15
        packet.RESET_INDEX
        packet.write_byte move
        injectbb packet
        unlock opc
        return void
    endif

    if pak == 89
        packet.RESET_INDEX
        packet.write_byte validate
        injectbb packet
        unlock opc
        return void
    endif

    if pak == 25
        packet.RESET_INDEX
        packet.write_byte use_it
        injectbb packet
        unlock opc
        return void
    endif
    if pak == 20
        packet.RESET_INDEX
        packet.write_byte open_inv
        injectbb packet
        unlock opc
        return void
    endif

    if pak == 80
        packet.RESET_INDEX
        packet.write_byte open_skill
        injectbb packet
        unlock opc
        return void
    endif

    if pak == 166
        packet.RESET_INDEX
        packet.write_byte open_skill2
        injectbb packet
        unlock opc
        return void
    endif

    if pak == 57
        packet.RESET_INDEX
        packet.write_byte use_skill
        injectbb packet
        unlock opc
        return void
    endif


    if pak == 208
        packet.read_int16 temp_ex
        if temp_ex == 36
            packet.RESET_INDEX
            packet.write_byte save_inv1
            packet.write_int16 save_inv2
            injectbb packet
            unlock opc
            return void
        endif
    endif

endif
unlock opc
return void

function block_packets
print_text " blocked"
BLOCK_SELF_ALL
BLOCKEX_SELF_ALL
block_SELF 31 // target
block_SELF 15 // move
block_SELF 89 // vaidate
block_SELF 25 // use item
block_SELF 20 // open inv
block_SELF 36 // save inv
block_SELF 80 // open skill1
block_SELF 166 // open skill2
block_SELF 1 // force attack
block_SELF 57 // force spell
return void

Posted

This works and I am 100% sure since I tested it. Botting works perfectly, except for buffing, which is delayed by some seconds.

Posted

Whoever was having trouble with the buffing, could you try this script?

//credit to obce for half the code :P
//finished by mpj123
//v1.2
Define_Global int step 0
Define_Global int ok 0
////////////////////////////////

define_global int pak_tar 0
define_global int pak_atk 0
define_global int move 0
define_global int validate 0
define_global int use_it 0
define_global int open_inv 0
define_global int save_inv2 0
define_global int save_inv1 0
define_global int open_skill 0
define_global int open_skill2 0
define_global int use_skill 0
//
for a 0 255 1
SET_EVENT "<&SCRIPTEVENT_CLIENTPACKET&>" "<&SYSTEM_CURRENTFILE&>" opc "<&a&>"
SET_EVENT "<&SCRIPTEVENT_CLIENTPACKETEX&>" "<&SYSTEM_CURRENTFILE&>" opc "<&a&>"
next

step = 1
print_text "Target something ..."
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Target something ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 2

print_text "Move ..."
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Move ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 3

print_text "Move again ..."
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Move again ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 4

print_text "Use any item ... "
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Use any item ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 5

print_text "Open inventory ... "
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Open inventory ..."
do
sleep 1000
loop ok == 0
ok = 0
step = 6

print_text "Open skills ..."
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Open skills ..."
do
sleep 1000
loop ok != 1
ok = 0
step = 7

print_text "Use a skill ... (any one of them, even if you cant use it)"
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Use a skill ... (any one of them, even if you cant use it)"
do
sleep 1000
loop ok != 1
ok = 0
step = 8

print_text "FORCE attack something using the CONTROL key!"
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "FORCE attack something using the CONTROL key!"
do
sleep 1000
loop ok != 1
ok = 0


print_text "Stop attacking and stay still somewhere to finish the last step, waiting 3 seconds"
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Stop attacking and stay still somewhere to finish the last step, waiting  3 seconds"
sleep 3000
step = 9

print_text "Close inventory ... "
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "Close inventory ... "
do
sleep 1000
loop ok == 0

call block_packets
step = 10

print_text " rdy - target <&pak_tar&>"
print_text " rdy - target <&pak_atk&>"
print_text " rdy - move <&move&> i validate <&validate&>"
print_text " rdy - use _it <&use_it&>"
print_text " rdy  - open inv <&open_inv&>"
print_text " rdy  - save_inv2 <&save_inv2&>"
print_text " rdy  - open_skill <&open_skill&>"
print_text " rdy  - open_skill2 <&open_skill2&>"
print_text " rdy  - use_skill <&use_skill&>"
SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "All Ready!"

for a 0 255 1
SET_EVENT "<&SCRIPTEVENT_SELFPACKET&>" "<&SYSTEM_CURRENTFILE&>" opc "<&a&>"
SET_EVENT "<&SCRIPTEVENT_SELFPACKETEX&>" "<&SYSTEM_CURRENTFILE&>" opc "<&a&>"
next

do
sleep 10000
loop 1 == 1
END_SCRIPT






function opc
define int temp_ex 0
define int pak 0
//print_text " pakiet dlugosc <&packet.LENGTH&>"
if step == 1
     if packet.LENGTH == 18
        packet.read_byte pak_tar
        Print_text " id stored <&pak_tar&>"
        ok = 1
        return void
    endif

endif

if step == 2
     if packet.LENGTH == 29
        packet.read_byte move
        Print_text " id stored <&move&>"
        ok = 1
        return void
    endif   

endif

if step == 3
     if packet.LENGTH == 21
        packet.read_byte validate
        Print_text " id stored <&validate&>"
        ok = 1
        return void
    endif   

endif



if step == 4
    if packet.LENGTH == 9
        packet.read_byte use_it
        Print_text " id stored <&use_it&>"
        ok = 1

        return void
    endif   

endif


if step == 5
    if packet.LENGTH == 1
        packet.read_byte open_inv
        Print_text " id stored <&open_inv&>"
        ok = 1

        return void
    endif   

endif


if step == 6
    if ok == 0
        if packet.LENGTH == 1
            packet.read_byte open_skill
            Print_text " id stored <&open_skill&>"
            ok = 2

            return void
        endif   
    endif

    if ok == 2
        if packet.LENGTH == 1
        packet.read_byte open_skill2
            if open_skill2 != open_inv
                if open_skill2 != open_skill
                    Print_text " id stored <&open_skill2&>"
                    ok = 1

                    return void
                endif
            endif
        endif
    endif

endif

if step == 7
     if packet.LENGTH == 10
        packet.read_byte use_skill
        Print_text " id stored <&use_skill&>"
        ok = 1

        return void
    endif   

endif

if step == 8
    if packet.LENGTH == 18
        packet.read_byte pak_atk
        if pak_atk != pak_tar
            Print_text " id stored <&pak_atk&>"
            ok = 1

            return void
        endif
    endif   

endif

if step == 9
    if packet.LENGTH != 15
        packet.read_byte save_inv1
        packet.read_int16 save_inv2
        if save_inv2 <= 0
            SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "You need to stop attacking to be able to capture the close inventory  packet!"
            print_text "You need to stop attacking to be able to capture the close inventory packet!"
            return void
        endif
        if save_inv2 >= 257
            SAY_TO_CLIENT "<&CHANNEL_PRIVATE&>" "You need to stop attacking to be able to capture the close inventory  packet!"
            print_text "You need to stop attacking to be able to capture the close inventory packet!"
            return void
        endif
        Print_text " id stored <&save_inv1&> i 2 byte <&save_inv2&>"
        ok = 1
        return void
    endif   

endif

if step == 10
packet.read_byte pak
    if pak == 31
        packet.RESET_INDEX
        packet.write_byte pak_tar
        injectbb packet
        return void
    endif
    if pak == 1
        packet.RESET_INDEX
        packet.write_byte pak_atk
        injectbb packet
        return void
    endif
    if pak == 15
        packet.RESET_INDEX
        packet.write_byte move
        injectbb packet
        return void
    endif

    if pak == 89
        packet.RESET_INDEX
        packet.write_byte validate
        injectbb packet
        return void
    endif

    if pak == 25
        packet.RESET_INDEX
        packet.write_byte use_it
        injectbb packet
        return void
    endif
    if pak == 20
        packet.RESET_INDEX
        packet.write_byte open_inv
        injectbb packet
        return void
    endif

    if pak == 80
        packet.RESET_INDEX
        packet.write_byte open_skill
        injectbb packet
        return void
    endif

    if pak == 166
        packet.RESET_INDEX
        packet.write_byte open_skill2
        injectbb packet
        return void
    endif

    if pak == 57
        packet.RESET_INDEX
        packet.write_byte use_skill
        injectbb packet
        return void
    endif


    if pak == 208
        packet.read_int16 temp_ex
        if temp_ex == 36
            packet.RESET_INDEX
            packet.write_byte save_inv1
            packet.write_int16 save_inv2
            injectbb packet
            return void
        endif
    endif

endif
return void

function block_packets
print_text " blocked"
BLOCK_SELF_ALL
BLOCKEX_SELF_ALL
block_SELF 31 // target
block_SELF 15 // move
block_SELF 89 // vaidate
block_SELF 25 // use item
block_SELF 20 // open inv
block_SELF 36 // save inv
block_SELF 80 // open skill1
block_SELF 166 // open skill2
block_SELF 1 // force attack
block_SELF 57 // force spell
return void

Posted

I tried the new script and I counted that delay of buffing is like 6 seconds.

 

I set in L2.Net to buff himself and he started buffing after 6 seconds after I have set it. So I think it's the same as the previous one.

Posted

I tried the new script and I counted that delay of buffing is like 6 seconds.

 

I set in L2.Net to buff himself and he started buffing after 6 seconds after I have set it. So I think it's the same as the previous one.

 

Confirm

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.




  • Posts

    • From Salvation onwards I think you need a patched nwindow.dll that allows such modifications, try to see if you get what you need here: https://drive.google.com/drive/u/1/folders/1LLbQFGf8KlR-O0Iv5umfF-pwZgrDh9bd
    • hello everyone! I am wanting to save the files (Ini. - Data - ) of the EP5 Client: Salvation... But they generate the error "corrupt files"... I tried several versions of L2FileEditor without good results. I need help! Thank you!
    • Opening December 6th at 19:00 (GMT +3)! Open Beta Test from November 30th!   https://l2soe.com/   🌟 Introducing L2 Saga of Eternia: A Revolution in Lineage 2 High Five! 🌟   Dear Lineage 2 enthusiasts, Prepare to witness the future of private servers! L2 Saga of Eternia is not just another High Five project—it’s a game-changing experience designed to compete with the giants of the Lineage 2 private server scene. Built for the community, by the community, we’re here to raise the bar in quality, innovation, and longevity. What Sets Us Apart? 💎 No Wipes, Ever Say goodbye to the fear of losing your progress. Our server is built to last and will never close. Stability and consistency are our promises to you. ⚔️ Weekly New Content Our dedicated development team ensures fresh challenges, events, and updates every week. From custom quests to exclusive features, there will always be something exciting to explore. 💰 No Pay-to-Win Skill and strategy matter most here. Enjoy a balanced gameplay environment where your achievements come from effort, not your wallet. 🌍 A Massive Community With 2000+ players expected, join a vibrant and active community of like-minded adventurers ready to conquer the world of Aden. 🏆 Fair and Competitive Gameplay Our systems are designed to promote healthy competition while avoiding abusive mechanics and exploits. 🔧 Professional Development From advanced bug fixes to carefully curated content, we pride ourselves on smooth performance, no lag, and unparalleled server quality. Key Features Chronicle: High Five with unique interface Rate: Dynamic x10 rates Class Balance: Carefully fine-tuned for a fair experience PvP Focused: PvP Ranking & aura display effect for 3 Top PvPers every week Custom Events: Seasonal and permanent events to keep you engaged Additional Features:   Custom Endgame Content: Introduce unique dungeons, raids, or zones unavailable in other servers. Player-Driven Economy: Implement a strong market system and avoid overinflated drops or rewards. Epic Siege Battles: Announce special large-scale sieges and PvP events. Incentives for Streamers and Clans: Attract influencers and big clans to boost server publicity. Roadmap Transparency: Share a public roadmap of planned updates to build trust and excitemen   Here you can read all the features: https://l2soe.com/features   Video preview: Join the Revolution! This is your chance to be part of something legendary. L2 Saga of Eternia is not just a server; it’s a movement to redefine what Lineage 2 can be. Whether you’re a seasoned veteran or a newcomer to the world of Aden, we invite you to experience Lineage 2 at its finest.   Official Launch Date: December 6th 2024 Website: https://l2soe.com/ Facebook: https://www.facebook.com/l2soe Discord: https://discord.com/invite/l2eternia   Let’s build the ultimate Lineage 2 experience together. See you in-game! 🎮
    • That's like a tutorial on how to run l2 on MacOS Xd but good job for the investigation. 
    • small update: dc robe set sold   wts adena 1kk = 1.5$ 
  • Topics

×
×
  • Create New...