Page 18 of 19 FirstFirst ... 816171819 LastLast
Results 426 to 450 of 464

Thread: SCAR Divi (3.0) official thread

  1. #426
    Join Date
    Feb 2006
    Location
    Belgium
    Posts
    3,137
    Mentioned
    3 Post(s)
    Quoted
    5 Post(s)

    Default

    I just did some more modifying to the SRL download in SCAR

  2. #427
    Join Date
    Mar 2007
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    Ummmm.... Freddy, this may sound really nooby, but my computer has problems with msi's, (maybe i need to reinstall the OS) and im sure im not the only one, but could you release a zip or rar file with just the files, no msi needed? thx

  3. #428
    Join Date
    Jun 2006
    Posts
    3,861
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    TwilightRook, try going to:
    Start > Run > Type in "services.msc" without the quotes. Then scroll down the list until you see Windows Installer. Right click on it and select Properties. In the drop down box (Startup Type), choose Automatic, if it's not already selected. Then click the button that says Start. If that doesn't work, you're probably gonna have to reinstall your OS.

    @Freddy: Why did you remove GetSelf and GetApplication in the first place? Was it a security issue or something?

  4. #429
    Join Date
    Feb 2006
    Location
    Belgium
    Posts
    3,137
    Mentioned
    3 Post(s)
    Quoted
    5 Post(s)

    Default

    Scar isn't an msi...
    And yes, there were some security issues with getself and getapplication...

  5. #430
    Join Date
    Aug 2006
    Location
    London
    Posts
    2,021
    Mentioned
    2 Post(s)
    Quoted
    0 Post(s)

    Default

    ridooz, there no need for posts like that, no spamming up freddy's thread, post deleted
    Join the Official SRL IRC channel. Learn how to Here.

  6. #431
    Join Date
    Feb 2006
    Posts
    582
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by petrock6 View Post
    Just imagine, tabs, multiple scripting, now, take all that and make silent mouse work again,
    BOOM!
    you've just made a 1337 macro
    You sir are the definition of "not awesome."
    Free File Hosting
    No download timers!

    Rifkwtf.com

  7. #432
    Join Date
    Mar 2007
    Posts
    69
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    When ever i try to use GetPage(); with any website i get this in the debug box :

    SCAR Code:
    Access to outgoing connection denied by user
    It used to work but it doesnt anymore, any help?

  8. #433
    Join Date
    Feb 2007
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    E Boan

  9. #434
    Join Date
    Aug 2006
    Location
    London
    Posts
    2,021
    Mentioned
    2 Post(s)
    Quoted
    0 Post(s)

    Default

    ridooz temporary banned for constant spamming
    use the 7 days to think about what you've done
    Join the Official SRL IRC channel. Learn how to Here.

  10. #435
    Join Date
    Jun 2006
    Posts
    25
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol long livw scar i hope the new is good

  11. #436
    Join Date
    Feb 2007
    Posts
    53
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I found this in an archive of your pictures...
    Click here!
    Now, thats going to be awesome, you can collapse the begin end stuff for when you don't want to see it (like loadbitmap procedures).
    And it says 3.10 >.<

  12. #437
    Join Date
    Jun 2006
    Posts
    3,861
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    Whoa nice find B4light. Are you really gonna add that Freddy?

  13. #438
    Join Date
    Feb 2006
    Location
    Belgium
    Posts
    3,137
    Mentioned
    3 Post(s)
    Quoted
    5 Post(s)

    Default

    Hmm, I thought I deleted that...
    No I'm not gonna add that, despite my efforts it's very unstable and I wouldn't be able to compeltely stabilise it...

  14. #439
    Join Date
    Dec 2006
    Location
    utah
    Posts
    1,427
    Mentioned
    2 Post(s)
    Quoted
    7 Post(s)

    Default

    just wondering why does SCAR 3.06 lagg bad, when i drag the crosshair to
    rs?

  15. #440
    Join Date
    Jun 2006
    Posts
    3,861
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    A bug like that was posted on Freddy's forums. It usually happens if you select something, then close what you selected, then try to select something else.

  16. #441
    Join Date
    Dec 2006
    Location
    utah
    Posts
    1,427
    Mentioned
    2 Post(s)
    Quoted
    7 Post(s)

    Default

    A bug like that was posted on Freddy's forums. It usually happens if you select something, then close what you selected, then try to select something else.
    sorry, but what do you mean by selecting?
    like open somthing new?
    or copy somthing....

  17. #442
    Join Date
    Feb 2006
    Location
    Belgium
    Posts
    3,137
    Mentioned
    3 Post(s)
    Quoted
    5 Post(s)

    Default

    Dragging the crosshair

  18. #443
    Join Date
    Dec 2006
    Location
    utah
    Posts
    1,427
    Mentioned
    2 Post(s)
    Quoted
    7 Post(s)

    Default

    Dragging the crosshair
    aww man do you think you can ever fix this....
    and maybe.. the new SCAR Div maybe clean

  19. #444
    Join Date
    Feb 2006
    Location
    Belgium
    Posts
    3,137
    Mentioned
    3 Post(s)
    Quoted
    5 Post(s)

    Default

    Quote Originally Posted by SKy Scripter View Post
    aww man do you think you can ever fix this....
    and maybe.. the new SCAR Div maybe clean
    As it says in the thread on my forums... I already fixed it...

  20. #445
    Join Date
    Oct 2006
    Posts
    174
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    tyvm dude

  21. #446
    Join Date
    Oct 2006
    Location
    I'm also from Michigan!
    Posts
    563
    Mentioned
    3 Post(s)
    Quoted
    0 Post(s)

    Default still no linux?

    first off, thank you for Divi. Its worked so good for me compared to the old Scar. I have a couple Windows computers that i use, but id really like to get it workin on my Knoppix/Debian. Im working on compiling it, ill post it if i get it working.

  22. #447
    Join Date
    Feb 2006
    Location
    Belgium
    Posts
    3,137
    Mentioned
    3 Post(s)
    Quoted
    5 Post(s)

    Default

    SCAR Divi 3.10 has been released!
    You can download it at: http://freddy1990.com/scar.php
    And I'll spare you the question:
    SCAR Code:
    procedure rs_FixMouse(var x,y: integer; slot: Integer);
    procedure rs_FixMouseEx(var x,y: integer; slot, maxshift, squaresx, squaresy, squaresize: Integer; minaccuracy: Extended);
    function rs_GetUpText: string;
    function rs_GetCompassAngleDegrees: Extended;
    function rs_GetCompassAngleRadians: Extended;
    function rs_ScanMiniMap(iFrom, iTo, Distance, Color: Integer): Integer;
    function rs_OnMinimap(x, y: Integer): Boolean;
    function rs_FindMMColors(Color: Integer): TIntegerArray;
    procedure rs_DeleteUID;
    function rs_DeleteUIDEx(Folder: string): Boolean;
    function rs_GetInvSlot(xx, yy: Integer): Integer;
    procedure rs_GetInvRC(xx, yy: Integer; var Row, Col: Integer);
    function rs_GetShopSlot(xx, yy: Integer): Integer;
    function rs_GetShopRC(xx, yy: Integer): Integer;
    function rs_ShopScreen: Boolean;
    function rs_FindShopColorSlot(var Slot: Integer; Color, Tolerance: Integer): Boolean;
    function rs_FindShopBitmapSlot(var Slot: Integer; Bitmap, Tolerance: Integer): Boolean;
    function rs_FindShopDTMSlot(var Slot: Integer; DTM: Integer): Boolean;
    function rs_FindShopColorRC(var Row, Col: Integer; Color, Tolerance: Integer): Boolean;
    function rs_FindShopBitmapRC(var Row, Col: Integer; Bitmap, Tolerance: Integer): Boolean;
    function rs_FindShopDTMRC(var Row, Col: Integer; DTM: Integer): Boolean;
    function rs_GetCurrentTab: Integer;
    function rs_FindInvColorSlot(var Slot: Integer; Color, Tolerance: Integer): Boolean;
    function rs_FindInvBitmapSlot(var Slot: Integer; Bitmap, Tolerance: Integer): Boolean;
    function rs_FindInvDTMSlot(var Slot: Integer; DTM: Integer): Boolean;
    function rs_FindInvColorRC(var Row, Col: Integer; Color, Tolerance: Integer): Boolean;
    function rs_FindInvBitmapRC(var Row, Col: Integer; Bitmap, Tolerance: Integer): Boolean;
    function rs_FindInvDTMRC(var Row, Col: Integer; DTM: Integer): Boolean;
    function rs_GetMinimapAngle: Extended;
    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 ClickMouseMid(x, y: Integer);
    procedure HoldMouseMid(x, y: Integer);
    procedure ReleaseMouseMid(x, y: Integer);
    procedure SetMouseMode(Silent: Boolean);
    procedure MoveMouseSpline(x, y, rx, ry: Integer);
    procedure MoveMouseSplineEx(x, y, rx, ry, mouseSpeed, ctrlSpacing, ctrlVariance: Integer);
    procedure MoveMouseSplineFrom(sx, sy, ex, ey, rx, ry: Integer);
    procedure MoveMouseSplineFromEx(sx, sy, ex, ey, rx, ry, mouseSpeed, ctrlSpacing, ctrlVariance: Integer);
    procedure ClickMouseSpline(x, y, rx, ry: Integer; left: Boolean);
    procedure MouseBox(x1, y1, x2, y2: Integer);
    procedure ClickMouseBox(x1, y1, x2, y2: Integer; left: Boolean);
    procedure MoveMouseCC(x, y, range, segments, pcount, delay: Integer);
    function SendInterSCARMessage(id, message: string): Boolean;
    function ReadInterSCARMessage(id: string): string;
    procedure SendInterSCARInteger(id: String; Int: Integer);
    function ReadInterSCARInteger(id: String): Integer;
    procedure SendInterSCARBoolean(id: String; Bool: Boolean);
    function ReadInterSCARBoolean(id: String): Boolean;
    procedure SendInterSCARExtended(id: String; Numb: Extended);
    function ReadInterSCARExtended(id: String): Extended;
    function ReadInterSCARInt64(id: String): Int64;
    procedure SendInterSCARInt64(id: String; Numb: Int64);
    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;
    procedure WriteINI(Section, KeyName, NewString, FileName: string);
    function ReadINI(Section, KeyName, FileName: string): string;
    function DirectoryExists(Directory: string): Boolean;
    function FileExists(FileName: string): Boolean;
    function ExtractFileName(FileName: string): string;
    function ExtractFilePath(FileName: string): string;
    function ExtractFileExt(FileName: string): string;
    function ExtractFileDrive(FileName: string): string;
    function GetFiles(Path, Ext: string): TStringArray;
    procedure SaveToFile(Sender: TObject; FileName: string);
    procedure LoadFromFile(Sender: TObject; FileName: string);
    function GetSystemTime: Integer;
    function GetTickCount: Integer;
    function GetTimeRunning: Integer;
    procedure ConvertTime(Ms: Integer; var H, M, S: Integer);
    function Left(Text: string; Count: Integer): string;
    function Right(Text: string; Count: Integer): string;
    function Replace(Text, FindStr, ReplaceStr: string): string;
    function GetNumbers(Text: string): string;
    function GetLetters(Text: string): string;
    function GetOthers(Text: string): string;
    function TrimNumbers(Text: string): string;
    function TrimLetters(Text: string): string;
    function TrimOthers(Text: string): string;
    function Capitalize(S: string): string;
    function InStrArr(Str: string; Arr: TStringArray; CaseSensitive: Boolean): Boolean;
    function PosEx(search, s: string; from: Integer): Integer;
    function LastPosEx(search, s: string; from: Integer): Integer;
    function LastPos(search, s: string): Integer;
    function StartsWith(prefix, s: string): Boolean;
    function EndsWith(suffix, s: string): Boolean;
    function TrimEx(delimiter, s: string): string;
    function RegexPos(Txt, Regex: string): Integer;
    function FindRegex(Txt, Regex: string): string;
    function ReplaceRegex(Txt, Regex, ReplaceStr: string): 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;
    function Degrees(Radians: Extended): Extended;
    function Radians(Degrees: Extended): Extended;
    function ArcCos(X: Extended): Extended;
    function ArcTan2(Y, X: Extended): Extended;
    function Tan(X: Extended): Extended;
    function ArcTan(X: Extended): Extended;
    function ArcSin(X: Extended): Extended;
    function Cotan(X: Extended): Extended;
    function Secant(X: Extended): Extended;
    function Cosecant(X: Extended): Extended;
    function Hypot(X, Y: Extended): Extended;
    function Cot(X: Extended): Extended;
    function Sec(X: Extended): Extended;
    function Csc(X: Extended): Extended;
    function Cosh(X: Extended): Extended;
    function Sinh(X: Extended): Extended;
    function Tanh(X: Extended): Extended;
    function CotH(X: Extended): Extended;
    function SecH(X: Extended): Extended;
    function CscH(X: Extended): Extended;
    function ArcCot(X: Extended): Extended;
    function ArcSec(X: Extended): Extended;
    function ArcCsc(X: Extended): Extended;
    function ArcCosh(X: Extended): Extended;
    function ArcSinh(X: Extended): Extended;
    function ArcTanh(X: Extended): Extended;
    function ArcCotH(X: Extended): Extended;
    function ArcSecH(X: Extended): Extended;
    function ArcCscH(X: Extended): Extended;
    function LnXP1(X: Extended): Extended;
    function Log10(X: Extended): Extended;
    function Log2(X: Extended): Extended;
    function LogN(Base, X: Extended): Extended;
    function Fract(number: Int64): Int64;
    function BinCoe(a, b: LongInt): Extended;
    function InRange(Value, Min, Max: Integer): Boolean;
    function Distance(x1, y1, x2, y2: Integer): Integer;
    function Sqr(X: Extended): Extended;
    function Exp(Number: Extended): Extended;
    function Rand: Extended;
    function Inversus(E: Extended): Extended;
    function Ceil(X: Extended): Integer;
    function Floor(X: Extended): Integer;
    function DecRet(E: Extended): Extended;
    function InCircle(x, y, mx, my, r: Integer): Boolean;
    procedure Inc(var Number: Integer);
    procedure IncEx(var Number: Integer; nInc: Integer);
    function Hypot(X, Y: Extended): Extended;
    function InTriangle(x, y, x1, y1, x2, y2, x3, y3: Integer): Boolean;
    function FixD(Degrees: Extended): Extended;
    function AdjustD(Angle, Adjustment: Extended): Extended;
    function FixR(Radians: Extended): Extended;
    function AdjustR(Angle, Adjustment: Extended): Extended;
    function AMax(Data: TIntegerArray): Integer;
    function AMaxE(Data: TExtendedArray): Extended;
    function iAbs(Number: Integer): Integer;
    function ToCart(Point: PPoint): TPoint;
    function ToCartOffset(Point: PPoint; offset: TPoint): TPoint;
    function ToPolar(Point: TPoint): PPoint;
    function ToPolarOffset(Point, offset: TPoint): PPoint;
    procedure Swap(var A, B: Integer);
    procedure BubbleSort(var Values: TIntegerArray);
    procedure Dec(var Number: Integer);
    procedure DecEx(var Number: Integer; nDec: Integer);
    function GetPage(URL: string): string;
    procedure OpenWebPage(URL: string);
    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 Writeln(s: string);
    procedure ClearDebug;
    procedure DeleteDebugLine(Line: Integer);
    function GetDebugLineCount: Integer;
    function GetDebugText: String;
    procedure Status(s: string);
    function GetStatus: string;
    function Readln(question: string): 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 IsTextAtEx(x, y: Integer; S: String; Tolerance: Integer; Chars: Integer; CheckShadow, CheckOutline: Boolean; MinSpacing, MaxSpacing: Integer; TextColor: Integer): 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;
    function Random(Range: Integer): Integer;
    function RandomRange(aFrom, aTo: Integer): Integer;
    function RBool: Boolean;
    function RBoolEx(Chance: Integer): Boolean;
    function GetColor(x,y: Integer): 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);
    procedure ColorToleranceSpeed(x: integer);
    function SimilarColors(col1, col2, tolerance: integer): Boolean;
    procedure FindColorsSpiralTolerance(x, y: Integer; var Points: TPointArray; color, xs, ys, xe, ye: Integer; Tolerance: Integer);
    function FastGetPixel(bitmap: Integer; x, y: Integer): TColor;
    procedure FastSetPixel(bitmap: Integer; x, y: Integer; c : TColor);
    procedure SetColorspeed2Modifiers(huemodifier, saturationmodifier: Extended);
    procedure PickColor(var Color: TColor; var X, Y: Integer);
    function FindColorSkipBox(var x, y: Integer; color, x1, y1, x2, y2: Integer; SkipBox: TBox): Boolean;
    function FindColorSkipBoxTolerance(var x, y: Integer; color, x1, y1, x2, y2, Tolerance: Integer; SkipBox: TBox): Boolean;
    function FindColorSkipBoxArray(var x, y: Integer; color, x1, y1, x2, y2: Integer; SkipBoxes: TBoxArray): Boolean;
    function FindColorSkipBoxArrayTolerance(var x, y: Integer; color, x1, y1, x2, y2, Tolerance: Integer; SkipBoxes: TBoxArray): Boolean;
    function FindHue(var x, y: Integer; Hue: Extended; x1, y1, x2, y2: Integer): Boolean;
    function FindHueTolerance(var x, y: Integer; Hue: Extended; x1, y1, x2, y2: Integer; Tolerance: Extended): Boolean;
    function FindSaturation(var x, y: Integer; Sat: Extended; x1, y1, x2, y2: Integer): Boolean;
    function FindSaturationTolerance(var x, y: Integer; Sat: Extended; x1, y1, x2, y2: Integer; Tolerance: Extended): Boolean;
    function FindLuminance(var x, y: Integer; Lum: Extended; x1, y1, x2, y2: Integer): Boolean;
    function FindLuminanceTolerance(var x, y: Integer; Lum: Extended; x1, y1, x2, y2: Integer; Tolerance: Extended): Boolean;
    function CountColor(Color, x1, y1, x2, y2: Integer): Integer;
    function CountColorTolerance(Color, x1, y1, x2, y2, Tolerance: Integer): Integer;
    function FindColorSkipCoords(var x, y: Integer; color, x1, y1, x2, y2: Integer; const SkipCoords: TPointArray): Boolean;
    function FindColorSkipCoordsTolerance(var x, y: Integer; color, x1, y1, x2, y2, Tolerance: Integer; const SkipCoords: TPointArray): Boolean;
    function FindColorCircle(var x, y: Integer; color, mx, my, r: Integer): Boolean;
    function FindColorCircleTolerance(var x, y: Integer; color, mx, my, r, Tolerance: Integer): Boolean;
    function GetColors(Coords: TPointArray): TIntegerArray;
    function FindColorTriangle(var x, y: Integer; color, x1, y1, x2, y2, x3, y3: Integer): Boolean;
    function FindColorTriangleTolerance(var x, y: Integer; color, x1, y1, x2, y2, x3, y3, Tolerance: Integer): Boolean;
    function GetBitmapAreaColors(xs, ys, xe, ye: Integer): T2DIntArray;
    function GetColorToleranceSpeed: Integer;
    procedure ColortoHSL(C: TColor; var H, S, L: Extended);
    function HSLtoColor(H, S, L: Extended): TColor;
    procedure RGBtoHSL(R, G, B: Integer; var H, S, L: Extended);
    procedure HSLtoRGB(H, S, L: Extended; var R, G, B: Integer);
    function RGBtoColor(R, G, B: Integer): TColor;
    procedure ColortoRGB(Color: TColor; var R, G, B: Integer);
    procedure RGBtoXYZ(R, G, B: Integer; var X, Y, Z: Extended);
    procedure XYZtoRGB(X, Y, Z: Extended; var R, G, B: Integer);
    procedure ColortoXYZ(Color: TColor; var X, Y, Z: Extended);
    function XYZtoColor(X, Y, Z: Extended): TColor;
    procedure HSLtoXYZ(H, S, L: Extended; var X, Y, Z: Extended);
    procedure XYZtoHSL(X, Y, Z: Extended; var H, S, L: Extended);
    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 KeyDown(Key: Byte);
    procedure KeyUp(Key: Byte);
    procedure KeyDownSilent(Key: Byte);
    procedure KeyUpSilent(Key: Byte);
    function GetKeyCode(Key: Char): Byte;
    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 IsArrowDown(Num: Byte): Boolean;
    function IsKeyDown(C: Char): Boolean;
    procedure SendKeysWait(Text: String; tWait, tRandom: Integer);
    procedure SendArrow(Key: Byte);
    procedure SendArrowWait(Key: Byte; WaitTime: Integer);
    function IsNumpadKeyDown(Key: Byte): Boolean;
    function FindWindow(Title: string): Boolean;
    function FindWindowTitlePart(Title: string; CaseSensitive: Boolean): Boolean;
    function FindWindowBySize(Width, Height: Integer): Boolean;
    procedure ActivateClient;
    function GetClientWindowHandle: Integer;
    procedure SetClientWindowHandle(H: 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; StartAngle, 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;
    procedure CopyCanvas(Source, Dest: TCanvas; sxs, sys, sxe, sye, dxs, dys, dxe, dye: Integer);
    procedure SafeCopyCanvas(Source, Dest: TCanvas; sx1, sy1, sx2, sy2, dx1, dy1, dx2, dy2: Integer);
    function CreateMirroredBitmap(bitmap: Integer): Integer;
    function FindBitmapRotated(bitmap: Integer; var x, y, Angle: Integer; x1, y1, x2, y2: Integer): Boolean;
    procedure GetBitmapSize(Bitmap: Integer; var Width, Height: Integer);
    function BitmapFromString2(Validate: Boolean; str: string): Integer;
    function GetBitmapName(bmp: Integer): string;
    procedure SetBitmapName(bmp: Integer; Name: string);
    function GetBitmapFileName(bmp: Integer): string;
    procedure SetBitmapFileName(bmp: Integer; FileName: string);
    function GetClientCanvas: TCanvas;
    function GetDebugCanvas: TCanvas;
    function GetSelf: TScar;
    function GetApplication: TScarApp;
    procedure SaveSetting(section, setting, value: string);
    function LoadSetting(section, setting : string) : string;
    procedure ClearReport;
    procedure AddToReport(s: string);
    procedure DisplayDebugImgWindow(Width, Height: Integer);
    procedure HideDebugImgWindow;
    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 FindDTMRotated(DTM: Integer; var x, y: Integer; x1, y1, x2, y2: Integer; StartAngle, EndAngle, AngleStep: Extended; var Angle: Extended): Boolean;
     function AddDTM(DTM: TDTM): Integer;
    function CreateForm: TForm;
    procedure FreeForm(Form: TForm);
    function GetSCARVersion: Integer;
    procedure TerminateScript;
    function IsFontSmoothingEnabled: Boolean;
    procedure SetFontSmoothing(Enable: Boolean);
    function ThreadSafeCall(ProcName: string; var V: TVariantArray): Variant;
    procedure SetTargetBitmap(bitmap: Integer);
    procedure GetClientDimensions(var Width, Height: Integer);
    procedure CopyClientToBitmap(bitmap: Integer; xs, ys, xe, ye: Integer);
    procedure ChangeReportWidth(Width: Integer);
    procedure SetBitmapFastDrawTarget(bitmap: Integer);
    procedure SetTransparentColor(bitmap, color: Integer);
    procedure SetTransparencyFromBitmap(Bitmap, AlphaMaskBitmap: Integer);
    procedure Disguise(Caption: string);
    procedure MoveToTray;
    procedure SetClientPos(OnTop: Boolean);
    function GetSoundDuration(FileName: string): Integer;
    procedure MakeWindowTransparent(Window, Transparancy: Integer);
    function PointInBox(Point: TPoint; Box: TBox): Boolean;
    function IntInBox(x, y: Integer; Box: TBox): Boolean;
    procedure SetTargetDc(Dc: Integer);
    procedure ResetDc;
    procedure FastDrawTransparent(x, y: Integer; SourceBitmap, TargetBitmap: Integer);
    procedure FastDrawSizeTransparent(x1, y1, x2, y2: Integer; sourcebitmap, targetbitmap: Integer);
    procedure FastDrawClear(bitmap: Integer; Color: TColor);
    procedure SafeDrawBitmap(Source: Integer; Dest: TCanvas; x, y: Integer);
    function IntToPoint(x, y: Integer): TPoint;
    function Point(x, y: Integer): TPoint;
    function BoolToStr(Bool: Boolean): String;
    function StrToBool(Str: String): Boolean;
    function PointToBox(p1, p2: TPoint): TBox;
    function IntToBox(x1, y1, x2, y2: Integer): TBox;
    function StrToFloatDef(s: string; def: Extended): Extended;
    function StrToBoolDef(s: string; def: Boolean): Boolean;

  23. #448
    Join Date
    Jan 2007
    Location
    Skaville, Jamaica
    Posts
    1,117
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    FIRST POST FOR DIVI 3.10!

    Sick! Funny enough, I was just looking for a new version earlier!

    Thanks Freddy

    ERROR:

    I was setting up SRL. (SetupSRL.scar)

    [Runtime Error] : Exception: Filepaths can not contain any of these characters: / : * ? " < > | in line 138 in script C:\Program Files\SCAR 3.10\includes\SRL\SRL.Scar
    Quote Originally Posted by Line 137-9
    LoadSRLBitMaps;

    TheFile := RewriteFile(AppPath + 'ChatLog.txt', False);

  24. #449
    Join Date
    Jun 2007
    Location
    Hell Stream
    Posts
    584
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ME SECOND for Scar DIVI 3.10i'm having the same problem also, but disable the declare on all line start after procedure setupsrl; until LoadSRLConfig;

    IT STILL WON'T WORK!!!!!!!!!!!!!!!!!!

    but i do appreciate scar for the fun of scripting.

    thanks Scar and SRL Team.

  25. #450
    Join Date
    Feb 2006
    Location
    Helsinki, Finland
    Posts
    1,395
    Mentioned
    30 Post(s)
    Quoted
    107 Post(s)

    Default

    Weeeeh, thanks Freddy!! Appreciated.

Page 18 of 19 FirstFirst ... 816171819 LastLast

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Official CS 1.6 Download Thread!
    By yanix in forum Gaming
    Replies: 0
    Last Post: 12-26-2007, 11:28 AM
  2. My Official Stats Thread
    By mark9510 in forum News and General
    Replies: 1
    Last Post: 10-08-2007, 03:57 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •