SRL Archive - SRL Archives

The new chatbox isn't scrolled down by default. So i just made a function that scrolls it down. I hope the color stays static, otherwise this won't work. But for me it works. This should be in 3.81 since the chatfunctions still don't work without a chatbox scoller ^^.

EDIT: Make sure you call this AFTER runescape has loaded. Otherwise the Scrollbar is not loaded yet. Below my Isloading function.

Function IsLoading:Boolean;
Begin;
  If (GetColor(6, 35) = 16777215) and (GetColor(7,34) = 0) then Result:=true
  else Result:=False;
end;
 

program New;
{.include srl\srl.scar}

Function FixChatBox:boolean;
begin;
  if (GetColor(487, 417) = 1646629) then
  begin;
    Result:=true;
    MMouse(488, 426,5,5);
    GetMousePos(x,y);
    Holdmouse(x,y,True);
    While (GetColor(487, 417) = 1646629) do
      Wait(200);
    Wait(400+Random(200));
    ReleaseMouse(x,y,True);
  end;
end;

begin
  SetupSrl;
  //While IsLoading do
 //   Wait(50);
  FixChatBox;
end.

FixChat? :rolleyes:

AntiRandoms.scar:

procedure FixChat; // by WT-Fakawi
var
  ScrollX, ScrollY: Integer;
begin
  ScrollX := 485 + Random(4);
  ScrollY := 422 + Random(4);
  if (GetColor(486, 417) = 1646629) then
  begin
    MMouse(ScrollX, ScrollY, 0, 0)
      while (GetColor(486, 417) = 1646629) do
    begin
      HoldMouse(ScrollX, ScrollY, True);
      Wait(10);
    end;
    ReleaseMouse(ScrollX, ScrollY, True);
    Wait(100);
  end;
end;

Isn't fixchat broken after the engine update?

Fixed in SRL 3.81 :)

I just stick with 3.80, too lazy to update my modded srl :p

O, well sorry Nielsie. It was because i didn't install 3.81 yet ^^. I just fixed the text functions and FixChat wasn't working ^^. But we need to place it in LogIn; otherwise all chat functions will be rubbish.