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:
Oh and P.S it needs to work on the new runescape
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