SRL Archive - General

I was trying out FindDTMRotated when I discovered to my horror I couldnt find the Scar 2.03 Function List!

I had never copied it to my local-disc, never thought Kaitnieks would go down.
If anybody has it in his possesion, please post.

did you mean this??

procedure Writeln(s: string);export;
procedure Status(s: string);
function GetStatus: string;
function Readln(question: string): string;
function GetChatMsg: string;
function GetLastChatMsg: string;
function GetUpperMsg: string;
function GetLastUpperMsg: string;
function GetTextAt(x, y: Integer): string;
function GetTextAtEx(x, y: Integer; Tolerance: Integer; Chars: Integer; CheckShadow, CheckOutline: Boolean; MinSpacing, MaxSpacing: Integer; TextColor: Integer; TextLength: Integer; Strict: Boolean; Range: TCharRange): string;
function IsTextAt(x, y: Integer; S: String): Boolean;
function IsTextAt2(x, y: Integer; S: String; Tolerance: Integer): Boolean;
function IsTextAtEx(x, y: Integer; S: String; Tolerance: Integer; Chars: Integer; CheckShadow, CheckOutline: Boolean; MinSpacing, MaxSpacing: Integer; TextColor: Integer): Boolean;
function IsTextInArea(x1, y1, x2, y2: Integer; var x, y: Integer; S: String): Boolean;
function IsTextInAreaEx(x1, y1, x2, y2: Integer; var x, y: Integer; S: String; Tolerance: Integer; Chars: Integer; CheckShadow, CheckOutline: Boolean; MinSpacing, MaxSpacing: Integer; TextColor: Integer): Boolean;
procedure PlaySound(s: string);
procedure SaveScreenshot(s: string);
function AppPath: string;
function ScriptPath: string;
procedure GetMousePos(var x, y: Integer);
procedure MoveMouse(x,y: integer);
procedure MoveMouseSmooth(x,y: integer);
procedure MoveMouseSmoothEx(x,y: integer; minsleeptime, maxsleeptime, maxdistance, gravity, forces: Integer);
procedure MoveMouseSmoothFrom(x1, y1, x2, y2: integer);
procedure MoveMouseSmoothFromEx(x1, y1, x2, y2: integer; minsleeptime, maxsleeptime, maxdistance, gravity, forces: Integer);
procedure ClickMouse(x,y: integer; Left: boolean);
procedure HoldMouse(x,y: integer; Left: boolean);
procedure ReleaseMouse(x,y: integer; Left: boolean);
procedure SetMouseMode(Silent: boolean);
function Random(Range: Integer): Integer;
function ConvertColor(C: Integer): Integer;
function GetColor(x,y: Integer): Integer;
function GetFightMode: Integer;
function FindColor(var x,y: Integer; color, xs, ys, xe, ye: Integer): Boolean;
function FindColorSpiral(var x,y: Integer; color, xs, ys, xe, ye: Integer): Boolean;
function FindColorSpiral2(var x,y: Integer; color, xs, ys, xe, ye: Integer): Boolean;
function FindColorTolerance(var x,y: Integer; color, xs, ys, xe, ye: Integer; Tolerance: Integer): Boolean;
function FindColorSpiralTolerance(var x,y: Integer; color, xs, ys, xe, ye: Integer; Tolerance: Integer): Boolean;
function FindColoredAreaTolerance(var x,y: Integer; color, xs, ys, xe, ye: Integer; MinArea, Tolerance: Integer): Boolean;
procedure FindColorsTolerance(var Points: TPointArray; color, xs, ys, xe, ye: Integer; Tolerance: Integer);
function SpiralFindObj(var x,y: Integer; color, xs, ys, xe, ye: Integer; Step: Integer; Text: string; WaitTime, MaxTime: Integer): Boolean;
function SpiralFindObjs(var x,y: Integer; color, xs, ys, xe, ye: Integer; Step: Integer; CommaText: string; WaitTime, MaxTime: Integer): Boolean;
procedure Wait(ms: Integer);
procedure Sleep(ms: Integer);
function SetTimeout(secs: Cardinal; procname: string): Integer;
procedure ClearTimeouts;
procedure ClearTimeout(s: string);
procedure SendKeys(S: string);
procedure SendKeysVB(S: string; Wait: Boolean);
procedure SendKeysSilent(S: string);
procedure SendArrowSilent(a: Byte);
procedure SendArrowSilentWait(a: Byte; WaitTime: Integer);
function IsMouseButtonDown(LeftButton: Boolean): Boolean;
function IsFunctionKeyDown(Key: Byte): Boolean;
function IsFKeyDown(Num: Byte): Boolean;
function IsKeyDown(C: Char): Boolean;
function StartScreen: Boolean;
function LoginScreen: Boolean;
function CreateLandmark(W, H: Integer; Data: string): Integer;
function FindLandmark(LandMark: Integer; var x,y: Integer; var accuracy: Extended): Boolean;
procedure FindWindow(Title: string);
procedure ActivateClient;
function ProcessMap: Boolean;
function ProcessMapNoCompass: Boolean;
procedure FixMouse(var x,y: integer; slot: Integer);
procedure FixMouseEx(var x,y: integer; slot, maxshift, squaresx, squaresy, squaresize: Integer; minaccuracy: Extended);
procedure ClickMap(x,y: integer; Left: boolean);
function IsObjOnMap(x,y: integer): Boolean;
function IsWaterOnMap(x,y: integer): Boolean;
function CreatePath: Integer;
procedure AddLandmarkToPath(path, landmark, x, y: Integer);
function ProcessPath(path: Integer;var x, y: Integer; var r: Extended; Tolerance: Extended): Integer;
function LoadBitmap(path: string): Integer;
function CreateBitmapMaskFromText(Text: string; Chars: Integer): Integer;
procedure LoadDebugBitmap(path: string);
function BitmapFromString(Width, Height: Integer; str: string): Integer;
procedure SaveBitmap(bitmap: Integer; path: string);
procedure FreeBitmap(bitmap: Integer);
function GetBitmapCanvas(bitmap: Integer): TCanvas;
function FindBitmap(bitmap: Integer; var x, y: Integer): Boolean;
function FindBitmapIn(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer): Boolean;
function FindBitmapToleranceIn(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer; tolerance: Integer): Boolean;
function FindDeformedBitmapToleranceIn(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer; tolerance: Integer; Range: Integer; AllowPartialAccuracy: Boolean; var accuracy: Extended): Boolean;
function FindDeformedBitmapToleranceRotationIn(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer; tolerance: Integer; Range: Integer; var accuracy: Extended; AngleIntervals: Extended; MaxAngle: Extended; var angle: Extended): Boolean;
function RotateBitmap(bitmap: Integer; angle: Extended): Integer;
function FindBitmapSpiral(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer): Boolean;
function FindBitmapSpiralTolerance(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer; Tolerance: Integer): Boolean;
function FindBitmapMaskTolerance(mask: Integer; var x, y: Integer; x1, y1, x2, y2: Integer; Tolerance, ContourTolerance: Integer): Boolean;
function GetSystemTime: Integer;
function GetTickCount: Integer;
function GetSelf: TForm;
function GetClientCanvas: TCanvas;
function GetDebugCanvas: TCanvas;
function GetApplication: TApplication;
procedure CopyCanvas(Source, Dest: TCanvas; sxs, sys, sxe, sye, dxs, dys, dxe, dye: Integer);
procedure SaveSetting(section, setting, value: string);
function LoadSetting(section, setting : string) : string;
procedure ColorToleranceSpeed(x: integer);
function SimilarColors(col1, col2, tolerance: integer): Boolean;
procedure SendInterSCARMessage(id, message: string);
function ReadInterSCARMessage(id: string): string;
procedure ClearReport;
procedure AddToReport(s: string);
procedure DisplayDebugImgWindow(Width, Height: Integer);
procedure HideDebugImgWindow;
procedure LoadChars(path: string);
function LoadChars2(path: string): Integer;
function LoadCharsFromFont2(fontname: string; fontsize: Integer; fontbold, fontitalic, fontunderline, fontstrike: Boolean): Integer;
procedure FreeChars2(i: Integer);
function LoadDTM(FileName: string): Integer;
function DTMFromString(s: string): Integer;
procedure FreeDTM(DTM: Integer);
function FindDTM(DTM: Integer; var x, y: Integer; x1, y1, x2, y2: Integer): Boolean;
function GetPage(URL: string): string;
procedure OpenWebPage(URL: string);
function Pow(Base, Exponent: Extended): Extended;
function IntPow(Base: Extended; Exponent: Integer): Extended;
function Max(a, b: Integer): Integer;
function MaxE(a, b: Extended): Extended;
function Min(a, b: Integer): Integer;
function MinE(a, b: Extended): Extended;
function SameValue(A, B: Extended): Boolean;
procedure TerminateScript;
function GetClientWindowHandle: Integer;
procedure SetClientWindowHandle(H: Integer);
function IsFontSmoothingEnabled: Boolean;
procedure SetFontSmoothing(Enable: Boolean);
function ThreadSafeCall(ProcName: string; var V: TVariantArray): Variant;
function DetectRS2MinimapCompassAngle: Extended);
function DetectRS2MinimapAngle(var ByCompass: Boolean): Extended;
procedure SetTargetBitmap(bitmap: Integer);
procedure GetClientDimensions(var Width, Height: Integer);
procedure CopyClientToBitmap(bitmap: Integer; xs, ys, xe, ye: Integer);
procedure ChangeReportWidth(Width: Integer);
function LoadDFMForm(fname: string): TForm;
function CreateForm: TForm;
procedure FreeForm(Form: TForm);
function GetSCARVersion: Integer; 
procedure SetBitmapFastDrawTarget(bitmap: Integer);
procedure SetTransparentColor(bitmap, color: Integer);
procedure SetTransparencyFromBitmap(Bitmap, AlphaMaskBitmap: Integer);
procedure FastDrawTransparent(x, y: Integer; SourceBitmap, TargetBitmap: Integer);
procedure FastDrawSizeTransparent(x1, y1, x2, y2: Integer; sourcebitmap, targetbitmap: Integer);
procedure SafeDrawBitmap(Source: Integer; Dest: TCanvas; x, y: Integer);
procedure SafeCopyCanvas(Source, Dest: TCanvas; sx1, sy1, sx2, sy2, dx1, dy1, dx2, dy2: Integer);
function CreateMirroredBitmap(bitmap: Integer): Integer;
function Sqr(X: Extended): Extended;
FindWindowTitlePart', 'function FindWindowTitlePart(Title: string; CaseSensitive: Boolean): Boolean;
function FindWindowBySize(Width, Height: Integer): Boolean;
procedure PickColor(var Color: TColor; var X, Y: Integer);
function WriteFileByte(FileNum: Integer; b: Byte): Boolean;
function WriteFileInt(FileNum: Integer; i: Integer): Boolean;
function WriteFileString(FileNum: Integer; s: string): Boolean;
function ReadFileByte(FileNum: Integer; var b: Byte): Boolean;
function ReadFileInt(FileNum: Integer; var i: Integer): Boolean;
function ReadFileString(FileNum: Integer; var s: string; Length: Integer): Boolean;
procedure CloseFile(FileNum: Integer);
function EndOfFile(FileNum: Integer): Boolean;
function FileSize(FileNum: Integer): LongInt;
function OpenFile(Path: string; Shared: Boolean): Integer;
function RewriteFile(Path: string; Shared: Boolean): Integer;
function InitializeHTTPClient(HandleCookies, HandleRedirects: Boolean): Integer;
procedure FreeHTTPClient(i: Integer);
function GetHTTPPage(Client: Integer; URL: string): string;
procedure SetHTTPUserAgent(Client: Integer; Agent: string);
function PostHTTPPage(Client: Integer; Url: string; PostData: string): string;
function Between(s1, s2, s: string): string;
function PostHTTPPageEx(Client: Integer; Url: string): string;
procedure ClearPostData(Client: Integer);
procedure AddPostVariable(Client: Integer; VarName, VarValue: string);
function GetRawHeaders(Client: Integer): string;
function OpenConnection(Host: string; Port, TimeOut: Integer): Integer;
function ReadConnectionData(Connection: Integer; var s: string): Boolean;
function SendConnectionData(Connection: Integer; s: string): Boolean;
procedure FreeConnection(i: Integer);
function IsConnectionOpen(Connection: Integer): Boolean;  
procedure KeyDown(Key: Byte);
procedure KeyUp(Key: Byte);   
procedure KeyDownSilent(Key: Byte);
procedure KeyUpSilent(Key: Byte);
function GetKeyCode(Key: Char): Byte;

nooo.

2.03 not 2.02 :rolleyes:

You mean to say dtms don't auto rotate? if that's so be expecting java dtm's sooner (did I say that out loud? :rolleyes:)

From: WT-Fakawi
I was trying out FindDTMRotated when I discovered to my horror I couldnt find the Scar 2.03 Function List!

I had never copied it to my local-disc, never thought Kaitnieks would go down.
If anybody has it in his possesion, please post.

Simple workaround for now:
in SCAR type:
(.
and it will give you a dropdown list of ALL functions, procedures, variables and constants. If you have SRL included I think you need to compile once and then it will give you all those as well. After the dropdown list appears you can type in the first few letters of the command, and it will filter with those few letters… very handy little trick.;) If anyone knows a better way to get the dropdown list to appear, please let me know.

file:///C:/Program%20Files/SCAR%202.03/Help/manual.htm#program
If you look at the help file, every function is explained in there. Organised very neatly too :)

When in scar, click F1. It's the Scar manual and has lot's of procedures and stuff.
Hope I helped.

go to the scar dir eg.

C:\Program Files\Scar 2.03

and in there there should be a txt file called

procedureparams.txt

check in there

From: timmyboy
When in scar, click F1. It's the Scar manual and has lot's of procedures and stuff.
Hope I helped.

That hasn't been updated since 2.01 ;)

From: jagex_fagex
go to the scar dir eg.

C:\Program Files\Scar 2.03

and in there there should be a txt file called

procedureparams.txt

check in there

Nice. Is that all of them?

not, sure, but there is a fairly big list…

Thanks Driger for sending me the full list.
Note: this has also most of the PlugIn-Commands.

[FONT="Courier New"]Function Abs(e:Extended):Extended; 
Procedure ActivateClient; 
Procedure AddLandmarkToPath(path,landmark,x,y: Integer); 
Procedure AddPostVariable(Client: Integer;Varname,VarValue: String); 
Procedure AddToReport(s: string); 
Function AnsiLowercase(s:string):string; 
Function AnsiUppercase(s:string):string; 
Function AppPath:string; 
Function Assigned(I:LongInt):Boolean; 
Function Between(s1,s2,s:string): string; 
Function*BitmapFromString(Width,Height:*Integer; str:string):*Integer; 
Procedure ChangeReportWidth(Width: Integer); 
Procedure ClearDebug; 
Procedure ClearPostData(Client: Integer); 
Procedure ClearReport; 
Procedure ClearTimeout(s: string); 
Procedure ClearTimeouts; 
Procedure ClickMap(x,y: integer; Left: boolean); 
Procedure ClickMouse(x,y: integer; Left: boolean); 
Procedure CloseFile(FileNum: Integer); 
Procedure ColortoHSL(C:LongInt;var H:Extended;var S:Extended;var L:Extended); 
Procedure ColorToleranceSpeed(x: integer); 
Function ConvertColor(C:Integer): Integer; 
Function copy(s:string;ifrom:LongInt;icount:LongInt): string;
Procedure CopyCanvas(Source, Dest: TCanvas; sxs,sys,sxe,sye,dxs,dys,dxe,dye: Integer); 
Procedure CopyClientToBitmap(bitmap: Integer; xs,ys,xe,ye: Integer); 
Function Cos(e:Extended):Extended; 
Function CreateBitmapMaskFromText(Text: string; Chars: Integer): Integer; 
Function CreateForm: TFORM; 
Function CreateLandmark(W,H: Integer; Data: string): Integer; 
Function CreateMirroredBitmap(bitmap: Integer): Integer; 
Function Date: TDateTime; 
Function DateTimeToUnix(D:TDateTime):Int64; 
Function DateToStr(D:TDateTime):string; 
Function DayOfWeek(DateTime:TDateTime):Word; 
Procedure DecodeDate(DateTime:TDateTime;var Year:Word;var Month:Word;var Day:Word); 
Procedure DecodeTime(DateTime:TDateTime;var Hour:Word;var Min:Word;var Sec:Word;var MSec:Word); 
Procedure delete(var s:string;ifrom:LongInt;icount:LongInt); 
Function DetectRS2MinimapAngle(var ByCompass: Boolean): Extended; 
Function DetectRS2MinimapCompassAngle : Extended; 
Procedure DisplayDebugImgWindow(Width,Height: Integer); 
Procedure DRAWMENUITEM(MENUITEM:TMENUITEM;ACANVAS:TCANVAS;ARECT:TRect;STATE:TOwnerDrawState); 
Function DTMFromString(s: string): Integer; 
Function EncodeDate(Year:Word;Month:Word;Day:Word): TDateTime; 
Function EncodeTime(Hour:Word;Min:Word;Sec:Word;MSec:Word): TDateTime; 
Function EndOfFile(FileNum: Integer): Boolean; Function ExceptionParam: string; 
Function ExceptionPos: LongWord;
Function ExceptionProc: LongWord;
Function ExceptionToString(er:TIFException;Param:string):string; 
Function ExceptionType: TIFException;
Procedure FastDrawClear(bitmap:LongInt;Color:LongInt); 
Procedure FastDrawSizeTransparent(x1,y1,x2,y2: Integer; sourcebitmap,targetbitmap: Integer);
Procedure FastDrawTransparent(x,y: Integer; SourceBitmap,TargetBitmap: Integer); 
Function FastGetPixel(bitmap:LongInt;x:LongInt;y:LongInt):LongInt;
Procedure FastSetPixel(bitmap:LongInt;x:LongInt;y:LongInt;c:LongInt); 
Function FileSize(FileNum: Integer): LongInt;
Function FindBitmap(bitmap: Integer; var x, y: Integer): Boolean; 
Function FindBitmapIn(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer): Boolean;
Function FindBitmapSpiral(bitmap: Integer;var x,y: Integer; x1,y1,x2,y2: Integer): Boolean; 
Function FindBitmapSpiralTolerance(bitmap: Integer;var x,y: Integer; x1,y1,x2,y2: Integer; Tolerance: Integer): Boolean; 
Function FindBitmapToleranceIn(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer; tolerance: Integer): Boolean; 
Function FindColor(var x,y: Integer; color,xs,ys,xe,ye: Integer): Boolean;
Function FindColoredAreaTolerance(var x,y: Integer; color,xs,ys,xe,ye: Integer; MinArea, Tolerance: Integer): Boolean;
Function FindColorSpiral(var x,y: Integer; color,xs,ys,xe,ye: Integer): Boolean;
Function FindColorSpiral2(var x,y: Integer; color,xs,ys,xe,ye: Integer): Boolean;
Function FindColorSpiralTolerance(var x,y: Integer; color,xs,ys,xe,ye: Integer; Tolerance: Integer): Boolean;
Procedure FindColorsSpiralTolerance(x:LongInt;y:LongInt;var Points:TPointArray;color:LongInt;xs:LongInt;ys:LongInt;xe:LongInt;ye:LongInt;Tolerance:LongInt);
Procedure FindColorsTolerance(var Points: TPointArray; color,xs,ys,xe,ye: Integer; Tolerance: Integer);
Function FindColorTolerance(var x,y: Integer; color,xs,ys,xe,ye: Integer; Tolerance: Integer): Boolean;
Function FindDeformedBitmapToleranceIn(bitmap: Integer; var x,y: integer; x1,y1,x2,y2: Integer; Tolerance: Integer; Range: Integer; AllowPartialAccuracy: Boolean; var accuracy: Extended): Boolean;
Function FindDeformedBitmapToleranceRotationIn(bitmap: Integer; var x, y: Integer; x1, y1, x2, y2: Integer; tolerance: Integer; Range: Integer; var accuracy: Extended; AngleIntervals: Extended; StartAngle, MaxAngle: Extended; var angle: Extended): Boolean;
Function FindDTM(DTM: Integer; var x,y: Integer; x1,y1,x2,y2: Integer): Boolean;
Function FindDTMRotated(DTM:LongInt;var x:LongInt;var y:LongInt;x1:LongInt;y1:LongInt;x2:LongInt;y2:LongInt;StartAngle:Extended;EndAngle:Extended;AngleStep:Extended;var Angle:Extended):Boolean;
Function FindLandmark(LandMark: Integer; var x,y: Integer; var accuracy: extended): Boolean;
Procedure FindWindow(Title: string);
Function FindWindowBySize(Width,Height: Integer): Boolean;
Function FindWindowTitlePart(Title:string;CaseSensitive:Boolean):Boolean;
Procedure FixMouse(var x,y: Integer; slow: Integer);
Procedure FixMouseEx(var x,y: Integer; slot,maxshift,squaresx,squaresy,squaresize: Integer; minaccuracy: Extended);
Function FloatToStr(e:Extended):string;
Function FormatDateTime(fmt:string;D:TDateTime):string;
Procedure FreeBitmap(bitmap: Integer);
Procedure FreeChars2(i: Integer);
Procedure FreeConnection(i: Integer);
Procedure FreeDTM(DTM: Integer);
Procedure FreeForm(Form: TForm);
Procedure FreeHTTPClient(i: Integer);
Function GetApplication: TApplication;
Function getarraylength(var arr):LongInt;
Function GetBitmapCanvas(bitmap: Integer): TCanvas;
Function GetChatMsg: string;
Function GetClientCanvas: TCanvas
Procedure GetClientDimensions(var Width,Height: Integer);
Function GetClientWindowHandle: LongInt;
Function GetColor(x,y: Integer): Integer;
Function GetDebugCanvas: TCanvas;
Function GetFightMode: LongInt;
Function GetHTTPPage(Client: Integer; URL: string): string;
Function GetKeyCode(Key: Char): Byte;
Function GetLastChatMsg: string;
Function GetLastUpperMsg: string;
Procedure GetMousePos(var x,y: Integer);
Function GetPage(URL: string): String;
Function GetRawHeaders(Client: Integer): String;
Function GetSCARVersion: LongInt;
Function GetSelf: TForm;
Function GetStatus: string;
Function GetSystemTime: LongInt;
Function GetTextAt(x,y: Integer): string;
Function GetTextAtEx(x, y: Integer; Tolerance: Integer; Chars: Integer; CheckShadow, CheckOutline: Boolean; MinSpacing, MaxSpacing: Integer; TextColor: Integer; TextLength: Integer; Strict: Boolean; Range: TCharRange): String;
Function GetTickCount: LongInt;
Function GetUpperMsg: string;
Procedure HideDebugImgWindow;
Procedure HoldMouse(x,y: Integer; Left: Boolean);
Function IDispatchInvoke(Self: IDispatch; PropertySet: Boolean; Name: String; Par:!OPENARRAYOFVARIANT): Variant;
Function InitializeHTTPClient(HandleCookies,HandleRedirects: Boolean): Integer;
Procedure insert(s: string; var s2: string; ipos: LongInt);
Function Int(e: Extended): Extended;
Function Int64ToStr(i: Int64): string;
Function IntPow(Base: Extended; Exponent: Integer): Extended;
Function IntToStr(i: LongInt): String;
Function IsArrowDown(Num: Byte): Boolean;
Function IsConnectionOpen(Connection: Integer): Boolean;
Function IsFKeyDown(Num: Byte): Boolean;
Function IsFontSmoothingEnabled: Boolean;
Function IsFunctionKeyDown(Key: Byte): Boolean;
Function IsKeyDown(c: Char): Boolean;
Function IsMouseButtonDown(LeftButton: Boolean): Boolean;
Function IsObjOnMap(x,y: Integer): Boolean;
Function IsTextAt(x,y: Integer; S: String): Boolean;
Function IsTextAt2(x,y: Integer; S: String; Tolerance: Integer): Boolean;
Function IsTextAtEx(x,y: Integer; S: String; Tolerance, Chars: Integer; CheckShadow, CheckOutline: Boolean; MinSpacing, MaxSpacing, TextColor: Integer): Boolean;
Function IsTextInArea(x1,y1,x2,y2: Integer; var x,y: Integer; S: String): Boolean;
Function IsTextInAreaEx(x1,y1,x2,y2: Integer; var x,y: Integer; S: String; Tolerance,Chars: Integer; CheckShadow, CheckOutline: Booleanl MinSpacing, MaxSpacing: Integer; TextColor: Integer): Boolean;
Function IsWaterOnMap(x,y: Integer): Boolean;
Procedure KeyDown(Key: Byte);
Procedure KeyDownSilent(Key: Byte);
Procedure KeyUp(Key: Byte);
Procedure KeyUpSilent(Key: Byte);
Function Length(s: String): LongInt;
Function LoadBitmap(path: String): Integer;
Procedure LoadChars(path: String);
Function LoadChars2(path: String): Integer;
Function LoadCharsFromFont2(fontname: String; fontsize: Integer; fontbold, fontitalic, fontunderline, fontstrike: Boolean): Integer;
Procedure LoadDebugBitmap(path: String);
Function LoadDTM(FileName: String): Integer;
Function LoadSetting(section, setting: String): String;
Function LoggedInStatus(DC: LongWord): LongInt;
Function LoginScreen: Boolean;
Function Lowercase(s: String): String;
Procedure Main Proc;
Procedure MapLocation(var x,y: LongInt; DC: LongWord);
Function Max(a,b: Integer): Integer;
Function MaxE(a,b: Extended): Extended;
Function Min(a,b: Integer): Integer;
Function MinE(a,b: Extended): Extended;
Procedure MoveMouse(x,y: Integer);
Procedure MoveMouseSmooth(x,y: Integer);
Procedure MoveMouseSmoothEx(x,y: Integer; MinSleepTime,MaxSleepTime,MaxDistance,Gravity,Forces: Integer);
Procedure MoveMouseSmoothFrom(x1,y1,x2,y2: Integer);
Procedure MoveMouseSmoothFromEx(x1,y1,x2,y2: Integer; minsleeptime,maxsleeptime,maxdistance,gravity,forces: Integer);
Function NewItem(ACaption: String; AShortCut: Word; AChecked: Boolean; AEnabled: Boolean; AOnClick: TNotifyEvent; HCTX: Word; AName: String): TMenuItem;
Function NewLine: TMenuItem;
Function NewMenu(Owner: TComponent; AName: String; Items: !OpenArrayOfTObject): TMainMenu;
Function NewPopUpMenu(Owner: TComponent: AName: String; Alignment: TPopUpAlignment; AutoPopUp: Boolean; Items: !OpenArrayOfTObject): TPopUpMenu;
Function NewSubMenu(ACaption: String; HCTX: Word; AName: String; Items: !OpenArrayOfTObject; AEnabled: Boolean): TMenuItem;
Function Now: TDateTime;
Function Null: Variant;
Function OpenConnection(Host: String; Port, TimeOut: Integer): Integer;
Function OpenFile(Path: String; Shared: Boolean): Integer;
Procedure OpenWebPage(URL: String);
Function Padl(S: String; l: LongInt): String;
Function Padr(S: String; l: LongInt): String;
Function Padz(S: String; l: LongInt): String;
Function Pi: Extended;
Procedure PickColor(var Color: TColor; var x,y: Integer);
Procedure PlaySound(s: String);
Function pos(substr: String; s: String): LongInt;
Function PostHTTPPage(Client: Integer; URL: String; PostData: String): String;
Function PostHTTPPageEx(Client: Integer; URL: String): String;
Function Pow(Base, Exponent: Extended): Extended;
Function ProcessMap: Boolean;
Function ProcessMapNoCompass: Boolean;
Function ProcessPath(path: Integer; var x,y: Integer; var r: Extended; Tolerance: Extended): Integer;
Procedure RaiseException(ex: TIFException; Param: String);
Procedure RaiseLastException;
Procedure Random(Range: Integer): Integer;
Function ReadConnectionData(Connection: Integer; var s: String): Boolean;
Function ReadFileByte(FileNum: Integer; var b: Byte): Boolean;
Function ReadFileInt(FileNum: Integer; var i: Integer): Boolean;
Function ReadFileString(FileNum: Integer; var s: String; Length: Integer): Boolean;
Function ReadInterSCARMessage(id: String): String;
Function Readln(question: String): String;
Procedure ReleaseMouse(x,y: Integer; Left: Boolean);
Function Replicate(c: Char; l: LongInt): String;
Function RewriteFile(Path: String; Shared: Boolean): Integer;
Function RotateBitmap(bitmap: Integer; Angle: Extended): Integer;
Function Round(e: Extended): LongInt;
Procedure SafeCopyCanvas(Source, Dest: TCanvas; sx1,sy1,sx2,sy2,dx1,dy1,dx2,dy2: Integer);
Procedure SafeDrawBitmap(Source: Integer; Dest: TCanvas; x,y: Integer);
Function SameValue(A,B: Extended): Boolean;
Procedure SaveBitmap(bitmap: Integer; path: String);
Procedure SaveScreenshot(s: String);
Procedure SaveSetting(section, setting, value: String);
Function ScriptPath: String;
Procedure SendArrowSilent(a: Byte);
Procedure SendArrowSilentWait(a: Byte; WaitTime: Integer);
Function SendConnectionData(Connection: Integer; s: String): Boolean;
Procedure SendInterSCARMessage(id,message: String);
Procedure SendKeys(S: String);
Procedure SendKeysSilent(S: String);
Procedure SendKeysVB(S: String; Wait: Boolean);
Procedure setarraylength(var arr; count: LongInt);
Procedure SetBitmapFastDrawTarget(bitmap: Integer);
Procedure SetColorspeed2Modifiers(huemodifier: Extended; saturationmodifier: Extended);
Procedure SetFontSmoothing(Enable: Boolean);
Procedure SetHTTPUserAgent(Client: Integer; Agent: String);
Procedure SetLength(var S: String; L: LongInt);
Procedure SetMouseMode(Silent: Boolean);
Procedure SetTargetBitmap(bitmap: Integer);
Function SetTimeout(secs: Cardinal; procname: String): Integer;
Procedure SetTransparencyFromBitmap(Bitmap, AlphaMaskBitmap: Integer);
Procedure SetTransparentColor(bitmap, color: Integer);
Function SHORTCUT(Key: Word; Shift: TShiftState): Word;
Function SHORTCUTTOKEY(ShortCut: Word; var Key: Word; var Shift: TShiftState);
Function SHORTCUTTOTEXT(ShortCut: Word): String;
Function SimilarColors(col1,col2,tolerance: Integer): Boolean;
Function Sin(e: Extended): Extended;
Function SizeOf(Data): LongInt;
Procedure Sleep(ms: Integer);
Function Sqr(X: Extended): Extended;
Function Sqrt(e: Extended): Extended;
Procedure Status(s: String);
Function StrGet(var s: String; L: LongInt): Char;
Function StrGet2(S: String; L: LongInt): Char;
Function StringOfChar(c: Char; l: LongInt): String;
Procedure StrSet(c: Char; l: LongInt; var s: String);
Function StrToDate(s: String): TDateTime;
Function StrToFloat(s: String): Extended;
Function strtoint(s: String): LongInt;
Function StrToInt64(s: String): Int64;
Function strtointdef(s: String; def: LongInt): LongInt;
Procedure TerminateScript;
Function TextToShortCut(Text: String): Word;
Function ThreadSafeCall(ProcName: String; var V: TVariantArray): Variant;
Function Trim(s: String): String;
Function Trunc(e: Extended): LongInt;
Function TryEncodeDate(Year,Month,Day: Word; var Date: TDateTime): Boolean;
Function TryEncodeTime(Hour,Min,Sec,MSec: Word; var Time: TDateTime): Boolean;
Function Unassigned: Variant;
Function UnixToDateTime(U: Int64): TDateTime;
Function Uppercase(s: String): String;
Function VarIsEmpty(V: Variant): Boolean;
Function VarIsNull(V: Variant): Boolean;
Function VarType(V: Variant): Word;
Procedure Wait(ms: Integer);
Function WriteFileByte(FileNum: Integer; b: Byte): Boolean;
Function WriteFileInt(FileNum: Integer; i: Integer): Boolean;
Function WriteFileString(FileNum: Integer; S: String): Boolean;
Procedure Writeln(s: String); export;
[/FONT]

From: BenLand100
You mean to say dtms don't auto rotate? if that's so be expecting java dtm's sooner (did I say that out loud? :rolleyes:)

ooo me likey

Nicolette Sheridan Nude Video Clips
Nicollette Sheridan Nude:
Click here to see Nicollette Sheridan nipple slips
Removed….

Please, don't advertise ur granny here :D

you can just hist ctrl+space, and get a nice dropdown list of all the functions and procedures available for use (lists functions and procedures from includes, too!)

Umm… this is over a year old -.-

Some idiot just bumped it with pictures of his nude granny.

oh…oops; shoulda looked at the date before I posted

whats wrong with grannies? lmao.

Smartzkid, no harm done by posting that, you just tried to help ;)

Lol @ yeahright. :p

From: Aviliviastr
Nicolette Sheridan Nude Video Clips
Nicollette Sheridan Nude:
Click here to see Nicollette Sheridan nipple slips

Bye.

Omg… Edit By Wizzup?

Removed. Wizzup?

Right.. edit by wizzup

deleted

Edit by Wizzup?: Right, I am going to think about user permission now.

Wow. Someone must really like advertising in this thread. 5 in a row? Dang.

.

Banned. Deleted.

i thought porno was not allowed??? that should be a ban :mad:

lol well lets hope he doesn't post any more pics of his tranny granny lol

Why do you bump a 20 days old thread? -_-
This thread should've been burried long ago if it wasen't for that stupid spammer