Wanted Posted October 26, 2014 Share Posted October 26, 2014 (edited) 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 October 26, 2014 by Wanted Quote Link to comment Share on other sites More sharing options...
Wanted Posted October 27, 2014 Author Share Posted October 27, 2014 (edited) 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 October 27, 2014 by Wanted Quote Link to comment Share on other sites More sharing options...