Jump to content

RPG-CLUB working bot with script


mpj123

Recommended Posts

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

Link to comment
Share on other sites

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

Link to comment
Share on other sites

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.

Link to comment
Share on other sites

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

Link to comment
Share on other sites

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

    • Thank you for your reply. I have removed it from the L2Server.exe file, but the L2Server still crashes. It doesn't crash if I don't start l2npc, otherwise it will crash within a few days at the latest.
    • Welcome to my store :  https://topestore.mysellix.io/fr/ 2015-2022 Aged Discord Account 2015 Discord Account : 50.99 $ 2016 Discord Account : 10$ 2017 Discord Account :3.99 $ 2018 Discord Account : 3.50$ 2019 Discord Account : 2.70 $ 2020 Discord Account :1.50$ 2021 Discord Account :0.99$ 2022 Discord Account :0.70$ Warranty :Lifetime Payment Methods : Crypto/ PayPal Contact Me On Discord Or Telegram Discord : @ultrasstore11 Telegram : https://t.me/ultrastore1 Welcome to my store :  https://topestore.mysellix.io/fr/ 2015-2022 Aged Discord Account 2015 Discord Account : 50.99 $ 2016 Discord Account : 10$ 2017 Discord Account :3.99 $ 2018 Discord Account : 3.50$ 2019 Discord Account : 2.70 $ 2020 Discord Account :1.50$ 2021 Discord Account :0.99$ 2022 Discord Account :0.70$ Warranty :Lifetime Payment Methods : Crypto/ PayPal Contact Me On Discord Or Telegram Discord : @ultrasstore11
    • L2 ArenaWar: Low Rate PvP Server with Free Buffs & Autofarm [PVP]⚔️ [Free]🆓 Classic Interlude with  3x XP rates! Free starter pack(no grade) to kickstart your adventure! Autofarm for convenient grinding! Free buffs to keep you fighting fit! (2 job buffs) No experience loss on death! (Except with Karma) Clear Karma system to keep things fair! ⚖️ Active community of 800-1k players! Join our Discord to learn more! >> Discord <<     Server website: https://l2arenawar.com/en/    
    • This is dedication! 2 years working on a problem. Congratulations!
    • You indeed have to save player position over Enterworld to properly clean it up later (if you don't, even trying to delete packet content would eventually keep it up), that's what we do with debug packet (which is a reusable Map of ExServerPrimitive packets) on aCis.   It doesn't solve the FPS stuttering - more you draw/delete lines, more your client becomes laggy. It's like if client wasn't deleting drawn points/lines properly, but instead simply hide them and redrawn content above.   If you got a solution, I would happy to integrate it.   You should check aCis#Player _debug packet integration, it allows very big amount of lines/points to be drawn, it is also reusable.   https://gitlab.com/Tryskell/acis_public/-/blob/master/aCis_gameserver/java/net/sf/l2j/gameserver/model/actor/Player.java?ref_type=heads https://gitlab.com/Tryskell/acis_public/-/blob/master/aCis_gameserver/java/net/sf/l2j/gameserver/network/clientpackets/EnterWorld.java?ref_type=heads  
  • Topics

×
×
  • Create New...