SRL Archive - SRL Archives

Hey, after a while of inactivity I decided to help SRL with random solvers.
Special thanks goes to Nauman, who gived me this idea :p
It may seems not much but I rewrite Leo_AnalyzeCoffin() and Leo_AnalyzeGravestone(), they now works :p Or, I can sey that they works for me ;) But the scar part must be fixed, or rewrited. I attached my work and I think that you guys (its for devs) will use this in the future updates.

Cheers

Iroki

These definitly work now?

They didn't really work last time heh.

From: Nava2
These definitly work now?

They didn't really work last time heh.

Great work Iroki, I never thought you would make it public. Great work man :).

@Nava2: Please be a bit more 'nice' towards him. He put in a lot of time into this. :crying:. Unless of course I mis-understood it, you did sound a bit hostile though :/

EDIT: If you need any help on the SCAR side, providing no developer already starts it, I would be more than glad to help :)

Wow! I hope it works and will be added to SRL :)

(L)

What a coincidence, I got an account stuck in the leo random today. If any admin wants to test out script on the account let me know.

Iroki, thanks for sticking with SRL mate :)
There have been some mean people, but a lot of the community respects you, regardless of the 'crimes' in the past :)

I'd just like to point out there was no intention at making fun or minimizing his work.

I was merely stating that the other solver didnt work.

:)

cheers Iroki :)

I see you use static points in analysing the gravestone, but are you sure the points are really static?

For example:

      if (j = 158) and (i = 179) then
        if (Line[i].R < 86) and (Line[i].G < 86) then IsAxe := True;

Yes, I'm sure.

From: nielsie95
I see you use static points in analysing the gravestone, but are you sure the points are really static?

For example:

      if (j = 158) and (i = 179) then
        if (Line[i].R < 86) and (Line[i].G < 86) then IsAxe := True;

where did you get that code from? has to be the .dll, no? how can I open a .dll? I am curious as to how the coding looks :) wanna see if I can understand some of this random solver, seems interesting to me.

From: Baked0420
where did you get that code from? has to be the .dll, no? how can I open a .dll? I am curious as to how the coding looks :) wanna see if I can understand some of this random solver, seems interesting to me.

LeoPlugin.dpr is where the source is found.
If you don't have a Delphi compiler, check my signature.

Do you download Leo.rar ?? there is source of this plugin:)

From: EvilChicken!
LeoPlugin.dpr is where the source is found.
If you don't have a Delphi compiler, check my signature.

thank you very much, I do not have a Delphi compiler, going to download now.

From: Iroki
Do you download Leo.rar ?? there is source of this plugin:)

I did not know that .dpr's were the source code, I saw it, but didn't know what it was. Now I know they are the source code, thanks :)

[off-topic]Lazarus is better imo :< [/off-topic]

Excellent work Iroki! Gonna try and get one of my autoers in a leo nao.

From: Baked0420
thank you very much, I do not have a Delphi compiler, going to download now.



I did not know that .dpr's were the source code, I saw it, but didn't know what it was. Now I know they are the source code, thanks :)

DPR is the standard Delphi project outline file from about Delphi 7 and below. In much recent Delphi versions, it is DPROJ. If the source is provided, you do not need a Delphi compiler to view it (since the source isn't contained in the DPR or DPROJ files), simply open up any of the PAS (this is where the source is) files in Notepad, or if you want syntax highlighting, open them up with either SCAR or Notepad++ ;)

So, if you don't want to learn and develop your Delphi skills, then I suggest not wasting your time downloading the complete thing ;)

meh, I don't mind, it looks very similar to Pascal, I'm sure I could learn it very easily and fast. I remember how hard it was to learn pascal, but since I understand programming in general now from learning it, it made learning C++ and Java in school a million times easier, and since Delphi looks so similar, I bet it'd be even easier to learn then C++ and Java (both very easy and fun).

but this solver, I couldn't understand most of the important stuff haha. Like, I understand it, just don't know how he got some of his numbers. I just don't understand RGB, I know it's the amount of red green and blue used to make up colors, but I wouldn't know how to use it, and it looks like there's arrays of arrays in there or something? like "X[336][161]" I don't get that, but for the most part I can comprehend the code, but would've never been able to make this. Nice work Iroki.

From: Baked0420
meh, I don't mind, it looks very similar to Pascal, I'm sure I could learn it very easily and fast. I remember how hard it was to learn pascal, but since I understand programming in general now from learning it, it made learning C++ and Java in school a million times easier, and since Delphi looks so similar, I bet it'd be even easier to learn then C++ and Java (both very easy and fun).

but this solver, I couldn't understand most of the important stuff haha. Like, I understand it, just don't know how he got some of his numbers. I just don't understand RGB, I know it's the amount of red green and blue used to make up colors, but I wouldn't know how to use it, and it looks like there's arrays of arrays in there or something? like "X[336][161]" I don't get that, but for the most part I can comprehend the code, but would've never been able to make this. Nice work Iroki.

Just realised that this was a DLL :p So, yer, no PAS files, and the DPR contains the source :p

Also, it isn't really that hard to understand, if you know the basics of SCAR and OCR (Object Colour Recognition) ;) You can also have multi-dimensional arrays in SCAR too (what do you think T2DPointArray is? :p)

And you will be able to understand it, in time ;)

I understood most of it, but I never used T2DArrays in SCAR, and yea, it looks very similiar to pascal. It's not really the basics of SCAR, that's just the compiler :p I think you meant the basics of pascal.

I'm gonna look for a tut on T2DArrays now, see how they're used and what for.

From: Baked0420
I understood most of it, but I never used T2DArrays in SCAR, and yea, it looks very similiar to pascal. It's not really the basics of SCAR, that's just the compiler :p I think you meant the basics of pascal.

I'm gonna look for a tut on T2DArrays now, see how they're used and what for.

T2DArrays are arrays of arrays of data type:

For example a T2DIntegerArray:

Var I : T2DIntArray;

Begin
  I := [TIntegerArray([0, 1]), TIntegerArray([2, 3])];
  WriteLn(I[0][1]);
End;

Then you have more common uses such as the ATPA (T2DPointArray) :).

Hope that cleared up some stuff.