[Release] Orb Walker Open Source

Page 1 of 2 1 2
03/25/2020 21:04 f00lish#1
Gallery
03/25/2020 23:05 kaiquim#2
hi man after the step Download and install Strawberry Perl
Open a cmd.exe as administrator and run cpan Win32::GuiTest

i save the script . pl but dont works, what i need ?
03/25/2020 23:40 f00lish#3
Quote:
Originally Posted by kaiquim View Post
hi man after the step Download and install Strawberry Perl
Open a cmd.exe as administrator and run cpan Win32::GuiTest

i save the script . pl but dont works, what i need ?
1. save the code as orb.pl
2. open cmd.exe as administrator
3. navigate to the script path and type perl orb.pl
03/25/2020 23:45 kaiquim#4
says: Illegal division by zero orb.pl line 23
03/25/2020 23:48 f00lish#5
Quote:
Originally Posted by kaiquim View Post
says: Illegal division by zero orb.pl line 23
You need to be in game to run the script.
03/26/2020 00:17 justRampage#6
I followed all the instructions, but once I was ingame the perl orb.pl command just loaded forever and nothing happened.

[Only registered and activated users can see links. Click Here To Register...]
03/26/2020 01:39 Argy#7
Quote:
Originally Posted by justRampage View Post
I followed all the instructions, but once I was ingame the perl orb.pl command just loaded forever and nothing happened.

[Only registered and activated users can see links. Click Here To Register...]
Are you blind to not see what it states in the cmd?
The program wont start until you go in game and even then it wont start until division by 0 is fixed.
03/26/2020 09:34 CirusEB#8
Works great :D
03/26/2020 11:31 MrBya#9
is this undetected?
03/26/2020 11:57 f00lish#10
Quote:
Originally Posted by MrBya View Post
is this undetected?
Yes
03/26/2020 12:45 Singleplayer™#11
nice to see some usefull releases here , sadly i have 0 knowledge in perl but for everyone who knows perl, its gud ;)
03/26/2020 13:22 Mistal#12
I made just a simple adaptation to use it as the traditional space bar (it can be improved ofc):

Code:
use strict;
use warnings;

use Win32::GuiTest qw(:ALL);
use Time::HiRes qw(usleep);
use LWP::UserAgent;


use constant HTKEY => 'a';
use constant START => VK_SPACE;

my $sleep = 1;
my $cond = 0;

while (1) {
    start() if $cond == 1;
    if (IsKeyPressed(START)) { $cond = 1 }
	else { $cond = 0 }

}

sub start {
    $sleep = 1000000 * (1/as())/2;
    SendKeys(HTKEY);
    usleep($sleep);
    SendMouse("{RIGHTCLICK}");
    usleep($sleep);
}

sub as {
    my $ua = LWP::UserAgent->new( ssl_opts => { verify_hostname => 0 }, protocols_allowed => ['https'] );
    my $req = HTTP::Request->new( 
        GET => 'https://127.0.0.1:2999/liveclientdata/allgamedata',
    );
    my $res = $ua->request($req);
    if ($res->content =~ /"attackSpeed": (\d+\.\d+),/) {
        return $1
    }
}
03/26/2020 13:35 f00lish#13
Quote:
Originally Posted by Mistal View Post
I made just a simple adaptation to use it as the traditional space bar (it can be improved ofc):

Code:
use strict;
use warnings;

use Win32::GuiTest qw(:ALL);
use Time::HiRes qw(usleep);
use LWP::UserAgent;


use constant HTKEY => 'a';
use constant START => VK_SPACE;

my $sleep = 1;
my $cond = 0;

while (1) {
    start() if $cond == 1;
    if (IsKeyPressed(START)) { $cond = 1 }
	else { $cond = 0 }

}

sub start {
    $sleep = 1000000 * (1/as())/2;
    SendKeys(HTKEY);
    usleep($sleep);
    SendMouse("{RIGHTCLICK}");
    usleep($sleep);
}

sub as {
    my $ua = LWP::UserAgent->new( ssl_opts => { verify_hostname => 0 }, protocols_allowed => ['https'] );
    my $req = HTTP::Request->new( 
        GET => 'https://127.0.0.1:2999/liveclientdata/allgamedata',
    );
    my $res = $ua->request($req);
    if ($res->content =~ /"attackSpeed": (\d+\.\d+),/) {
        return $1
    }
}
Very good switch - in fact, might be easier to use in game while holding/releasing space bar instead of using multiple other hotkeys!
03/26/2020 14:27 bravejumper#14
could you put it on the github?
03/26/2020 15:09 cadafi1979#15
you can edit when pess space key it will hit ?
Page 1 of 2 1 2