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

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now



  • Posts

    • fuck off mate, I will not pay you after I asked for a work and I knew what the price was.
    • 9 out of 10 edits fail KYC. And it’s not about a “pretty image” ▪ Mustang Service – when approval matters more than blind testing. › We work with what systems actually check: → passing anti-fraud checkers: Onfido, Veriff, Sumsub, etc. → German-grade studio equipment → two-stage control + metadata cleaning before submission → ELA analysis bypass → data structure and logical consistency ▪ While this post is still live – a private bonus is available. › Message us – we’ll break down your case. › TG: @mustang_service ( https:// t.me/ mustang_service ) › Канал: Mustang Service ( https:// t.me/ +JPpJCETg-xM1NjNl ) #documents #kyc #photoshop #editing #graphics
    • I dont see me insisting anywhere. I understood your confusion and did what you were feeling like. I cannot control the internet and how searches work. Replaced customer's work and fixed what caused you feel that way. On the other hand you cannot call me out for recycling, that's funny. LOL.  You specifically asked for no drastic changes, my clients know me and how I work. And I didnt tell you the work is done until you agreed with all the work. You have seen everthing on chat before telling you that we are done. And you agreed when the work was done. That's funny, isn't it? Every single line of that html is written at the spot. Have fun but dont get angry when people call you out. "i didn't see that" is not an answer. Acknowledge your actions and words, and stand for what you say. It would be more honest to say, fuck off mate, I will not pay you after I asked for a work and I knew what the price was. That shows honesty at least.
    • 13 EURO (~15 usd) per page of simple html that could not have taken over 15 min to do in addition to recycled design is insanity and nobody in their right mind would be paying this. i understood it as 5-7.5$ per page which is even considered high but i found it ok since we have worked in the past and offered you a more than fair price. also stole my AI Waifu backgrounds and uses it on another banner shocker       stolen waifu uwu:     maybe you need report for stealing my gpt waifus?
    • I agree with you, scammers should be banned from the community forever. And those who make accusations without any proof should be banned too. That's called unfair competition. 🙂  
  • 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..