MakeScreenPefect

Printable View

MakeScreenPefect

Ok well I made a few of them so plz try 'em out; Its nothing special using math or anything. All it does is find the matching pixels of the four corners of the compass if they are all the same, exits and results true. Nothing Fancy. Both of them work 5/6 times and the one they didnt work, they just kept rotating so that shouldnt be a problem

Why It Works

http://img339.imageshack.us/img339/126/compasszz4.png<----------Aligns the colors outlined in yellow by rotating compass

Couldnt Make the image bigger. Check your own compass at north to see why.

For Some reason the one below works everytime :cartman:. Don't know why. Got it 30/30 times for me

SCAR Code:

function MakeScreenPerfect : boolean;
var
  TurnTime : integer;
begin
result := false;
TurnTime := 0;
If(GetColor(565,18)=GetColor(580,20))and
  (GetColor(565,18)=GetColor(567,34))and
  (GetColor(565,18)=GetColor(553,21))then
    begin
      result := true;
      Exit;
    end;
KeyDown(VK_Left);
repeat
until(GetColor(565,18)=GetColor(580,20))and
  (GetColor(565,18)=GetColor(567,34))and
  (GetColor(565,18)=GetColor(553,21))and
  (GetColor(580,20)=GetColor(567,34))and
  (GetColor(580,20)=GetColor(553,21))and
  (GetColor(567,34)=GeTColor(553,21));
KeyUp(VK_Left);
wait(100);
KeyDown(VK_Right);
wait(50);
KeyUp(VK_Right);
Result := true;
end;

SCAR Code:

function MakeScreenPerfect : boolean;
begin
result := false;
HighestAngle;
KeyDown(VK_Up);
wait(2000);
KeyUp(VK_Up);
If(GetColor(565,18)=GetColor(580,20))and
  (GetColor(565,18)=GetColor(567,34))and
  (GetColor(565,18)=GetColor(553,21))and
  (GetColor(580,20)=GetColor(567,34))and
  (GetColor(580,20)=GetColor(553,21))and
  (GetColor(567,34)=GeTColor(553,21))then
    begin
      result := true;
      Exit;
    end;
KeyDown(VK_Left);
repeat
until(GetColor(565,18)=GetColor(580,20))and
  (GetColor(565,18)=GetColor(567,34))and
  (GetColor(565,18)=GetColor(553,21))and
  (GetColor(580,20)=GetColor(567,34))and
  (GetColor(580,20)=GetColor(553,21))and
  (GetColor(567,34)=GeTColor(553,21));
KeyUp(VK_Left);
wait(100);
KeyDown(VK_Right);
wait(50);
KeyUp(VK_Right);
Result := true;
end;

SCAR Code:

function MakeScreenPerfect : boolean;
begin
result := false;
HighestAngle;
KeyDown(VK_Up);
wait(2000);
KeyUp(VK_Up);
If(GetColor(565,18)=GetColor(580,20))and
  (GetColor(565,18)=GetColor(567,34))and
  (GetColor(565,18)=GetColor(553,21))and
  (GetColor(580,20)=GetColor(567,34))and
  (GetColor(580,20)=GetColor(553,21))and
  (GetColor(567,34)=GeTColor(553,21))then
    begin
      result := true;
      Exit;
    end;
KeyDown(VK_Left);
repeat
KeyUp(VK_Left);
wait(100);
until(GetColor(565,18)=GetColor(580,20))and
  (GetColor(565,18)=GetColor(567,34))and
  (GetColor(565,18)=GetColor(553,21))and
  (GetColor(580,20)=GetColor(567,34))and
  (GetColor(580,20)=GetColor(553,21))and
  (GetColor(567,34)=GeTColor(553,21));
KeyDown(VK_Right);
wait(50);
KeyUp(VK_Right);
Result := true;
end;

02-25-2007, 10:16 PM
XcanadamanX

so this is a make compass perfect? because your explaination says it gets colors of the compass which does not make the screen perfect. but anyway gj. i cant use them my comp is too laggy with all those getcolors.
02-25-2007, 11:04 PM
Infantry001

WOW!!! First one works nearly perfect every time! THe lines werent exactly straight, there was about a 3-5 degrees difference, but amazing it could work like that! Just put a Wait(5); inside the repeat, or else it wont let some computers refresh.
02-25-2007, 11:41 PM
WhiteShadow

Shietload of getcolors, but serves its purpose. good job :)

I might implement it into one of my scripts. :O
02-25-2007, 11:48 PM
Infantry001

Yea mind if i put into one of my scripts too?
02-26-2007, 12:04 AM
pwnaz0r

Quote:

Originally Posted by Infintry001

Yea mind if i put into one of my scripts too?

Nah Thats why I put them here :) And Here ill explain for whoever asked about getting compass colors at top
02-27-2007, 03:01 AM
syberium

wow pwnaz0r u impress me once again! just need to make like in the format (MakeScreenPerfect('N') =]
02-27-2007, 04:19 AM
Junior

This looks great, didnt test it thought. If its worthy enough I might use it, good job.
02-27-2007, 06:34 AM
ruler

This might be useful for ibot bc a direct getpixel with no buffering takes 0.0000002 seconds. rs screen paints lets say 60 frames a second. So therefore 0.01ms could be spent on checking colors and 16ms a wait. However i see this function is good for just getting the compass to perfect not minimap.

I am moving from any compass modifcation. I see compass modifcation depencies a dectability potential if a system/script/function becomes widly used/accepted.
02-27-2007, 04:06 PM
Wizzup?

I don't see the difference with MakeCompass? Makecompas always aligns compass perfectly at north, but rs randomness are the problem. You shouldn't look at the compass to get it perfectly north. :)
02-27-2007, 08:33 PM
pwnaz0r

yeah thats true well I have been grounded lately so I havent really been able to work on this. I am working with my advanced math book(lol) to try to make kind of a formula. I have a theory about the pixels in rs but havent been able to test to to groundativity so yeah maybe today. Im at school in computer class atm so if im not grounded today I will try it out. Also if i am grounded today, I will definatly post all my new functions/procedures ASAP. I have been working on a bunch, using bc i printed out the manual and stuff. Anyway I will be giving those back as sure as I can make sure they Work and compile.

@Wizzup The difference in mine and MakeCompass is that this does use Compass yes but it uses colors relative to itself instead of MakeCompass. It finds the Angle of the compass not by a DTM. (I don't really remember how MakeCompass found it since i do not have scar in front of me). Anyway, I think mine is more reliable just as if you were searching for rocks and you search for colors in relation to another color instead of a DTM. Also, I think of perfect North not as relative to the minimap, make a global North. We do not have to base "Perfect North" on the actual North of the minimap. It has become a refernce point for scripting. If we view it in this way, the randomizing of th RS compass should not throw us off because then we are in control of North, Not them.
03-15-2007, 09:50 PM
SonOfSheep

Quote:

Originally Posted by ruler

This might be useful for ibot bc a direct getpixel with no buffering takes 0.0000002 seconds. rs screen paints lets say 60 frames a second. So therefore 0.01ms could be spent on checking colors and 16ms a wait. However i see this function is good for just getting the compass to perfect not minimap.

I am moving from any compass modifcation. I see compass modifcation depencies a dectability potential if a system/script/function becomes widly used/accepted.

I find that making compass perfect north doesn't help much because it is detectable and the minimap and screen are horribly out of sync anyway. For my uses makecompass('N'); works fine, but this is crazy like the same type of crazy that makes my findbankbooth procedure work with a 30 point DTM of on screen colors.

oh and RS runs at like 7 fps i believe.