SRL Archive - FAQ

What the title says ?

Is it possible for SIMBA to paint in MS Paint using an actual jpeg file

Mouse could draw each pixel maybe :P



E.g.

like dis video

http://www.youtube.com/watch?v=uk2sPl_Z7ZU

I guess it probably is possible… You'll just have to write something to do it. ;)

You want to convert a bitmap to brush strokes? o.O
That doesn't seem very easy to me. :/

Co-Ordinates?
Move mouse to Color Picker, move mouse to top left of image(X1,Y1) move mouse to top right of paint box (X,Y)
Click
Move mouse to Color Picker, move mouse to (X1 + 1, Y1) click to get colour. move mouse to (X +1, Y)
Click to paint.

And keep repeating no?
I may write something today to try this.
I will post results tomorrow probably.

Sorry for double post but I got here then confused my self.

program PaintAPicture;
var
X,Y,X1,Y1 : Integer;
Procedure SetCords;
Begin
X = 18;
Y = 165;
X1 = 467;
Y1 = 63;
End;
begin
SetCords;
Repeat
ClickMouse(418, 122, True);
ClickMouse(X, Y, True);
ClickMouse(X1, Y1, True);
if not X = 314 then
X = X+1;
X1 = X+1;
else
Begin
X = 18;
X1 = X1+1;
X1 = 467;
Y1 = Y1+1;
end.

If anyone would like to Fix/Help etc please do so :)
Info:

X and Y = Picture
X1 and Y1 = Paint

I would't do it like that. I'd save the image somewhere and load it into your script. Then use FastGetPixel to get the colours.
You'd like to scan the whole image colour per color, as you will need to use custom colors. And then draw pixel per pixel.

Though that's not what mister SubiN requested.

Color picker can't leave the paint window, therefore what you're asking is impossible to do (in paint) especially if you wanted to use brush strokes and not pixel placements.

Have you thought of using multiple clients? Alternating constantly by using the findClientTitle?

From: CX gamer
Have you thought of using multiple clients? Alternating constantly by using the findClientTitle?

Try it, that doesn't work.

You can easily do it in SCAR because of it's FindWindow implementations, no doubt about that.

itll be a very cool script if this is created, impress ur mates through team viewer or sumthing :P

I made a gradient maker for MS Paint with Scar before. Not exactly what you're looking to do, but it was a hell of a lot simpler. MS Paint's mouse points fail, the only way to fully do it is to be zoomed in 2X or higher, otherwise the mouse would freeze from what I can remember. I'm not sure how you would use Bitmap>String>Points, unless you use TPAs to get every color and then convert colors to RGB or something and then back to TPAs for mouse points? Not too sure. I'm just starting to learn all this stuff.

for x := 0 to Length(Picture.x) do
  for y := 0 to Length(Picture.y) do
  begin
    CurrentColor := GetColor(x, y);
    MakeColor(CurrentColor);//Input of color to rgb
    ClickMouse(x, y, True);
  end;

Something like that should work, right? (Of course it'd be a little more complex but I'm pretty sure it'd work.)

(Also, I realize that that wouldn't work. Just a basic idea. I might do something about this.)