SRL Archive - S.M.A.R.T. Questions and Answers.

S.M.A.R.T problems (i'm an idiot)


pokedude165

2008-11-07 23:58:37

Sup,

My S.M.A.R.T script ain't working because i screwed it up and saved it.
Can someone tell me the right S.M.A.R.T script cos i'm to much of an idiot to work it out myself. :duh: :duh: :duh:

{
smart.scar overwrites the SCAR procedures.
You should always include this before any other include, even SRL.scar
}

procedure MoveMouse(x, y: Integer);
begin
SmartMoveMouse(x, y);
end;

procedure HoldMouse(x, y: Integer; left: Boolean);
begin
SmartHoldMouse(x, y, left);
end;

procedure ReleaseMouse(x, y: Integer; left: Boolean);
begin
SmartReleaseMouse(x, y, left);
end;

procedure KeyUp(key: Byte);
begin
If Key = 13 Then
Key := 10;
SmartReleaseKey(key);
end;

procedure KeyDown(key: Byte);
begin
If Key = 13 Then
Key := 10;
SmartHoldKey(key);
end;

procedure SendKeys(S: String);
begin
SmartSendKeys(S);
end;

procedure GetMousePos(var x, y: Integer);
begin
SmartGetMousePos(x, y);
end;

function GetColor(x, y: Integer): Integer;
begin
result:= SmartGetColor(x, y);
end;

procedure SmartSetTarget;
var
Smart_Bitmap: Integer;
begin
Smart_Bitmap:= BitmapFromString(765,503,'');
GetBitmapCanvas(Smart_Bitmap).Handle:= SmartGetDC;
SetTargetBitmap(Smart_Bitmap);
FreeBitmap(Smart_Bitmap);
end;

function FindWindow(Title: String): Boolean;
begin
result:= true;
end;

procedure ActivateClient;
begin
end;

function FindWindowBySize(Width, Height: Integer): Boolean;
begin
result:= true;
end;

procedure SmartSetupWeb(World: Integer; Safe, Signed, HighDefinition: Boolean);
var
s: string;
begin
s := GetPage('http://www.timer.mgatesphoto.com/Output/Worlds.php?world=' + IntToStr(World));
SmartSetup(S, Safe, Signed, HighDefinition);
end;
begin
writeln('Invalid world number or corrupted world list. Please review your settings');
TerminateScript;
end;
SmartSetup(prefix, hiDetail, signed);
end;

Oh and P.S it needs to work on the new runescape

0wn 4 skill

2008-11-10 17:16:25

AHHHHHHHHHH! It burns… Pointless functions… :p Anyways, you need to include Smart as I shall do:


Program GetBossed; // Just an example
{.Include SRL\SRL.Scar}
{.Include SRL\SRL\Reflection\Reflection.Scar}

// Look above ^^^^^^ you have to include em at the top of your script below the program name

Your script has fairly good standards but… This has some pointless functions. Read a tutorial please.

pokedude165

2008-11-16 00:19:02

Look,
Can you just tell me a s.m.a.r.t script that actually works i suck to much ive been doin java programming not scar so can u just post it plz plz plz!!

Method

2008-11-16 00:22:55

You need to be a Junior Member (which requires 10 useful posts and a week of longevity) to access the newest SMART.scar file and plugin. When you're a Junior Member, just search for the thread SMART Fixes and you should be able to get it working.

kurupt916

2008-11-16 02:53:49

thnx alot

0wn 4 skill

2008-11-16 07:46:34

You asked for help which I gave you and yet you chose not to accept it? Fair enough but if your not willing to even try then go back to Java.