Jump to content
  • Sky
  • Blueberry
  • Slate
  • Blackcurrant
  • Watermelon
  • Strawberry
  • Orange
  • Banana
  • Apple
  • Emerald
  • Chocolate
  • Charcoal

Leaderboard


Popular Content

Showing content with the highest reputation on 11/09/12 in all areas

  1. 1 point
    Yes but change the color in the FindColor function. e.g. FindColor(X, Y, 1529539, 0, 0, CBox.X2, CBox.Y2) to: FindColor(X, Y, Whatever color here, 0, 0, CBox.X2, CBox.Y2) Also by "Selecting" a client I mean this in SCAR: So for instance here is full code for multiple colors second color i added was (16777215): [scar] program AutoSelectNPC; var CBox: TBox; procedure SetupClient; begin GetClient.Activate; CBox := GetClient.ImageArea; end; procedure MainLoop; var X, Y: Integer; begin repeat if FindColor(X, Y, 1529539, 0, 0, CBox.X2, CBox.Y2) then begin ClickMouse(X, Y, mbLeft); ClickMouse(X, Y, mbLeft); end; if FindColor(X, Y, 16777215, 0, 0, CBox.X2, CBox.Y2) then begin ClickMouse(X, Y, mbLeft); ClickMouse(X, Y, mbLeft); end; wait(5000); until False; end; begin SetupClient; MainLoop; end.[/scar]
  2. 1 point
    Yep, what LJ said: //By turner850 program RSCCaptchaSolver; var captchaBmp: TSCARBitmap; begin captchaBmp := GetClient.CaptureEx(128, 229, 384, 270); try CaptchaBmp.SaveToBmp(ScreenPath + 'captcha.bmp'); finally CaptchaBmp.Free; end; end. Wiki is not yet updated to TSCARBitmap. -Jani
×
×
  • Create New...