[HELP] How to make a script anti afk to cheat this captcha:

Status
Not open for further replies.

bluuen

Active Member
Joined
May 12, 2019
Messages
28
Likes
2
Points
3
#1
Can someone help me to cheat this code?
Print:


I want to make a script that reads the captcha (which appears in the screen) of anti afk and answer them in the chat

Server Link: server4.loskatchorros.com.br:7777

Server Version: 0.3.7-R2
 

Attachments

Parazitas

Well-Known Member
Joined
Jan 2, 2017
Messages
1,312
Likes
139
Points
78
Location
Lithuania
Website
ugbase.eu
15
#7
NOT TESTED!
PHP:
{$CLEO .cs}
{$INCLUDE SF}
 
0000: NOP
 
0BE3: raknet setup_incoming_rpc_hook @IncomingRPC
[email protected] = 0
[email protected] = 0
[email protected] = 0

:main
wait 0
if and
key_down 49 // 1
key_down 74 // J
then
    if
    [email protected] == 0
    then
        [email protected] = 1
        0AF8: "{FFFFFF}Auto captcha: {00FF33}Enabled" 1
    else
        [email protected] = 0
        0AF8: "{FFFFFF}Auto captcha: {FF0000}Disabled" 1
    end
    wait 1000
end
if
[email protected] == 1
then
    if
    [email protected] == 1
    then
        wait 1000
        0AC8: [email protected] = allocate_memory_size 260
        0AF4: [email protected] = read_string_from_ini_file "cleo\GameText.ini" section "Game" key "Text"
        call @GetCode 1 WriteStringPointer [email protected] ReturnCode [email protected]
        call @DeleteLastChars 2 [email protected] 1
        say "%s" [email protected]
        [email protected] = 0
        [email protected] = 0
    else
        [email protected] = 0
        [email protected] = 0
    end
end
jump @main
 
 
 
:IncomingRPC
0BE5: raknet [email protected] = get_hook_param PARAM_PACKETID
if and
[email protected] == RPC_SCRDISPLAYGAMETEXT // GameText
[email protected] == 1
[email protected] == 0
then
    0BE5: raknet [email protected] = get_hook_param PARAM_BITSTREAM
    //ignore gamtext style and time (8bytes = 64bits)
    0BEB: raknet bit_stream [email protected] ignore_bits 64
    //read text length                                    
    0BE7: raknet [email protected] = bit_stream_read [email protected] type BS_TYPE_INT 
    //allocate text length + 1 for null terminating char   
    0A8E: [email protected] = [email protected] + 1 
    alloc [email protected] = [email protected] 
    //clear buffer, make sure last char is 0
    0C11: memset [email protected] value 0 size [email protected] 
    //read to buffer with size
    0BE8: raknet bit_stream [email protected] read_array [email protected] size [email protected] 
    //chatmsg "GameText: %s" -1 [email protected]
    if
    0C29: $NOT_USED = stristr string1 [email protected] string2 "/sairafk"
    then
        0AF5: write_string [email protected] to_ini_file "cleo\GameText.ini" section "Game" key "Text"
        [email protected] = 1
        [email protected] = 1
    end
    free [email protected]
end
0BE0: raknet hook_ret true

:GetCode
0C17: [email protected] = strlen [email protected]
[email protected] -= 1
    for [email protected] = 0 to [email protected]
    0A8D: [email protected] = read_memory [email protected] size 1 virtual_protect 1 
     
        if
        [email protected] == 91
        then
            [email protected]++  
            ret 1 [email protected]                                                        
        end    

    [email protected]++
    end
ret 0

:DeleteLastChars
var
[email protected]: int
[email protected]: int
[email protected]: int
end
0C17: [email protected] = strlen [email protected]
[email protected] -= [email protected]
[email protected] += [email protected]
0C11: memset destination [email protected] value [email protected] size 0x4
0AB2: ret 0
 
OP
OP
B

bluuen

Active Member
Joined
May 12, 2019
Messages
28
Likes
2
Points
3
#8
NOT TESTED!
PHP:
{$CLEO .cs}
{$INCLUDE SF}

0000: NOP

0BE3: raknet setup_incoming_rpc_hook @IncomingRPC
[email protected] = 0
[email protected] = 0
[email protected] = 0

:main
wait 0
if and
key_down 49 // 1
key_down 74 // J
then
    if
    [email protected] == 0
    then
        [email protected] = 1
        0AF8: "{FFFFFF}Auto captcha: {00FF33}Enabled" 1
    else
        [email protected] = 0
        0AF8: "{FFFFFF}Auto captcha: {FF0000}Disabled" 1
    end
    wait 1000
end
if
[email protected] == 1
then
    if
    [email protected] == 1
    then
        wait 1000
        0AC8: [email protected] = allocate_memory_size 260
        0AF4: [email protected] = read_string_from_ini_file "cleo\GameText.ini" section "Game" key "Text"
        call @GetCode 1 WriteStringPointer [email protected] ReturnCode [email protected]
        call @DeleteLastChars 2 [email protected] 1
        say "%s" [email protected]
        [email protected] = 0
        [email protected] = 0
    else
        [email protected] = 0
        [email protected] = 0
    end
end
jump @main



:IncomingRPC
0BE5: raknet [email protected] = get_hook_param PARAM_PACKETID
if and
[email protected] == RPC_SCRDISPLAYGAMETEXT // GameText
[email protected] == 1
[email protected] == 0
then
    0BE5: raknet [email protected] = get_hook_param PARAM_BITSTREAM
    //ignore gamtext style and time (8bytes = 64bits)
    0BEB: raknet bit_stream [email protected] ignore_bits 64
    //read text length                                   
    0BE7: raknet [email protected] = bit_stream_read [email protected] type BS_TYPE_INT
    //allocate text length + 1 for null terminating char  
    0A8E: [email protected] = [email protected] + 1
    alloc [email protected] = [email protected]
    //clear buffer, make sure last char is 0
    0C11: memset [email protected] value 0 size [email protected]
    //read to buffer with size
    0BE8: raknet bit_stream [email protected] read_array [email protected] size [email protected]
    //chatmsg "GameText: %s" -1 [email protected]
    if
    0C29: $NOT_USED = stristr string1 [email protected] string2 "/sairafk"
    then
        0AF5: write_string 4 @ to_ini_file "cleo \ GameText.ini" seção "Game" chave "Texto"
        30 @ = 1
        29 @ = 1
    fim
    grátis 4 @
fim
0BE0: raknet hook_ret true

:Obter código
0C17: 31 @ = strlen 0 @
31 @ - = 1
    para 30 @ = 0 a 31 @
    0A8D: 29 @ = read_memory 0 @ size 1 virtual_protect 1
    
        E se
        29 @ == 91
        então
            0 @ ++ 
            ret 1 0 @                                                       
        fim   

    0 @ ++
    fim
ret 0

: DeleteLastChars
var
0 @: int
1 @: int
2 @: int
fim
0C17: 2 @ = strlen 0 @
2 @ - = 1 @
0 @ + = 2 @
0C11: destino memset 0 @ valor 1 @ tamanho 0x4
0AB2: ret 0
[/ php] [/ QUOTE]

I do not have a bigger picture sorry, but I'll test this command yours
 
OP
OP
B

bluuen

Active Member
Joined
May 12, 2019
Messages
28
Likes
2
Points
3
#9
NOT TESTED!
PHP:
{$CLEO .cs}
{$INCLUDE SF}

0000: NOP

0BE3: raknet setup_incoming_rpc_hook @IncomingRPC
[email protected] = 0
[email protected] = 0
[email protected] = 0

:main
wait 0
if and
key_down 49 // 1
key_down 74 // J
then
    if
    [email protected] == 0
    then
        [email protected] = 1
        0AF8: "{FFFFFF}Auto captcha: {00FF33}Enabled" 1
    else
        [email protected] = 0
        0AF8: "{FFFFFF}Auto captcha: {FF0000}Disabled" 1
    end
    wait 1000
end
if
[email protected] == 1
then
    if
    [email protected] == 1
    then
        wait 1000
        0AC8: [email protected] = allocate_memory_size 260
        0AF4: [email protected] = read_string_from_ini_file "cleo\GameText.ini" section "Game" key "Text"
        call @GetCode 1 WriteStringPointer [email protected] ReturnCode [email protected]
        call @DeleteLastChars 2 [email protected] 1
        say "%s" [email protected]
        [email protected] = 0
        [email protected] = 0
    else
        [email protected] = 0
        [email protected] = 0
    end
end
jump @main



:IncomingRPC
0BE5: raknet [email protected] = get_hook_param PARAM_PACKETID
if and
[email protected] == RPC_SCRDISPLAYGAMETEXT // GameText
[email protected] == 1
[email protected] == 0
then
    0BE5: raknet [email protected] = get_hook_param PARAM_BITSTREAM
    //ignore gamtext style and time (8bytes = 64bits)
    0BEB: raknet bit_stream [email protected] ignore_bits 64
    //read text length                                   
    0BE7: raknet [email protected] = bit_stream_read [email protected] type BS_TYPE_INT
    //allocate text length + 1 for null terminating char  
    0A8E: [email protected] = [email protected] + 1
    alloc [email protected] = [email protected]
    //clear buffer, make sure last char is 0
    0C11: memset [email protected] value 0 size [email protected]
    //read to buffer with size
    0BE8: raknet bit_stream [email protected] read_array [email protected] size [email protected]
    //chatmsg "GameText: %s" -1 [email protected]
    if
    0C29: $NOT_USED = stristr string1 [email protected] string2 "/sairafk"
    then
        0AF5: write_string [email protected] to_ini_file "cleo\GameText.ini" section "Game" key "Text"
        [email protected] = 1
        [email protected] = 1
    end
    free [email protected]
end
0BE0: raknet hook_ret true

:GetCode
0C17: [email protected] = strlen [email protected]
[email protected] -= 1
    for [email protected] = 0 to [email protected]
    0A8D: [email protected] = read_memory [email protected] size 1 virtual_protect 1
    
        if
        [email protected] == 91
        then
            [email protected]++ 
            ret 1 [email protected]                                                       
        end   

    [email protected]++
    end
ret 0

:DeleteLastChars
var
[email protected]: int
[email protected]: int
[email protected]: int
end
0C17: [email protected] = strlen [email protected]
[email protected] -= [email protected]
[email protected] += [email protected]
0C11: memset destination [email protected] value [email protected] size 0x4
0AB2: ret 0
An error has occurred.
The code is being entered (flood), but without the prefix "/ sairafk".
 
Status
Not open for further replies.
Top