Jump to content
Wanted

10/26/14 OSI Updated for SCARExt RS OCR. OSI OCR now works with SCAR 3.40+

Recommended Posts

https://github.com/OSI1/OfficialSCARInclude/commit/17a19959d01f333d25f98c2663327bbc3e268faf

 

Ported OSI with Slacky's SCARExt so rs_GetUpText is available in the the newer SCAR versions

 

ChooseOption/Uptext now work

 

If you're more interested in SCARExt etc. visit

 

http://forums.scar-divi.com/showthread.php?t=2464

 

discussion @ http://forums.scar-divi.com/showthread.php?t=2464&page=2

 

 

 

I think OSI for RS07 is in pretty good shape. Everything that I know of works. Granted I have not tested Login functions and some other stuff I will soon!

 

Update: https://github.com/OSI1/OfficialSCARInclude/commit/786bb52f3a0692504be98a8da5f1d886f55fa508

Login works.. just needed a minor addition (crazy how simple that was... surprised it worked in the pass without that tbh.)

Edited by Wanted
Link to comment
Share on other sites

Update2:

https://github.com/OSI1/OfficialSCARInclude/commit/7925bae345c42ffa857cc296e6a7e5d0a92f475d

 

New Timing functions

New MouseCurrentPos

New $DEFINE DebugIncluded

Minor typos corrected

 

You now have

 

{=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
procedure SetTimer(var Timer: LongInt; MinMS, MaxMS: Integer);
Contributors: Wanted
Description: Begins counting timer, will expire when the time is up set random 
            from Min/Max. Check by using CheckTimer(Timer).
Date Created: October 26th, 2014. By Wanted
Last Modified: October 26th, 2014. By Wanted
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=}

procedure SetTimer(var Timer: LongInt; MinMS, MaxMS: Integer);
begin
 Timer := GetSystemTime + RR(MinMS, MaxMS);
end;

{=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
function CheckTimer(Timer: LongInt): Boolean;
Contributors: Wanted
Description: Returns true if the amount of time has passed since SetTimer.
Date Created: October 26th, 2014. By Wanted
Last Modified: October 26th, 2014. By Wanted
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=}

function CheckTimer(Timer: LongInt): Boolean;
begin
 Result := (Timer < GetSystemTime);
end;

{=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
procedure MarkTime(var Marker: LongInt);
Contributors: Wanted
Description: Begins marking time.
Date Created: October 26th, 2014. By Wanted
Last Modified: October 26th, 2014. By Wanted
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=}

procedure MarkTime(var Marker: LongInt);
begin
 Marker := GetSystemTime;
end;

{=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
function TimeSinceMark(Marker: LongInt): LongInt;
Contributors: Wanted
Description: Returns amount of time that has passed since marker.
Date Created: October 26th, 2014. By Wanted
Last Modified: October 26th, 2014. By Wanted
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=}

function TimeSinceMark(Marker: LongInt): LongInt;
begin
 Result := GetSystemTime - Marker;
end;

 

Helps with easier coding/reading and backwards compatibility with scripts from long ago.

 

New MouseCurrentPos so you can just click where your mouse is currently without having to type GetMousePos again.

 

{$DEFINE DebugIncluded} if you include {$I OSI\Divi\Misc\Debug.scar}

that way you can put in wrappers so it's easier for your users to enable/disable debugging.

 

Going to release Chat.scar and Stats tab updates tomorrow

 

Looking into porting the latest SMART (8.3? I think)

 

- Cheers

Edited by Wanted
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



×
  • Create New...