All right! :) Expect something within a week guy's XD
Ty R4ndom ;)
Edit/Update 14/9/2012 5:36AM:
Ok.. I've been toying around with Soul Split for a bit, I'm very bored and it seems stupid for me to even bother with atm..
I was planning on editing SPS to work with it but I think I will just continue working on RuneGlider stuff now.. seems like a better use of my time.
Lol…
program PSG;
{$i SRL/SRL.simba}
{$I SRL/SRL/misc/debug.simba}
{$i SPS/SPPS.simba}
{$i RunePSGlider/core.simba}
{ Private Server Glider by Sir Ducksworthy aka(Leetsxc)
Features:
- 100% Functional SPS compatibility
- Perfect Fighting
- Great Anti-Ban}
const
PlayerOrder = '0,1,2,3'; //Just Type in Which
//Players\\
P0 = 'Urachat:asdasd';
P1 = '';
P2 = '';
P3 = '';
/////BREAKING SETUP\\\\\
UseBreaks = True; // Do you want to take breaks?
SwitchWorld = True; // Do you want to switch worlds after the break?
BreakIn = 290; // How many minutes until you take a break?
BreakInRandom = 10; // How many minutes should the "BreakIn" time be varied by?
BreakFor = 7; // How many minutes will you break for?
BreakForRandom = 7; // How many minutes should the "BreakFor" time be varied by?
ChatLogs = True; // Record All Conversations - Coming soon
RuneGlide = True; // Automatic Decision Making and Leveling?
SoundAlarms = True; // Sound and Alarm when you are unable to Log in or something Goes wrong?
begin
//PSGSetup;
MouseSpeed := 20;
ActivateClient;
//SPS_Setup(RUNESCAPE_SURFACE, ['Lumbridge_0']);
//SPS_WalktoPos(Point(316, 213));
Sleep(2000);
repeat
if(not PLoggedIn)then
Login(P0);
until(false)
end.
N
Function PLoggedIn():Boolean;
begin
if(CountColorTolerance(1842523, 409, 482, 512, 501, 30)>1)then
Result:=True
else
Result:=False;
end;
Function Login(Player:string):Boolean;
var
StringData:TStringArray;
IntData:TIntegerArray;
begin
Setlength(IntData, 1);
while (CountcolorTolerance(2795199, 278, 336, 452, 355, 20)<10) and (IntData[0]<300) do
begin
Sleep(100);
IntData[0]:=IntData[0]+1;
end;
if(IntData[0]>299)then
begin
//SoundAlarm
writeln('RunePSGlider has not Detected anything to indicate the Login Screen is available to Login.. Terminating');
TerminateScript();
end;
//Login Screen is Loaded or Present
Mouse(296, 243, 3, 3, true);
// Sleep(1000);
SetLength(StringData, 2);
ExplodeWrap(':', Player, StringData);
Sendkeys(StringData[0], 10, 5);
//sleep(1000);
Mouse(296, 288, 3, 3, true);
// sleep(1000);
Sendkeys(StringData[1], 10, 5);
// sleep(1000);
Mouse(298, 346, 3, 3, true);
writeln('Attempting to Login... with: ' + Player);
IntData[0]:=0;
While (CountColorTolerance(1842523, 411, 480, 513, 502, 30)<1) do
begin
sleep(100);
IntData[0]:=IntData[0]+1;
if(IntData[0]>199)then
break;
end;
if(IntData[0]>199)then
begin
writeln('No detection of Report abuse button in 20 Seconds... Login Unsucessfull!');
Result:=true;
Exit;
end;
writeln('Login Successfull!');
Result:=true;
end;