SRL Archive - Discussions and Debates

Eye of newt buyer.. Reflection , where should i stick that baby, all i need to do is add handledoor and its done basically. :)

Srl members or jr members

Junior members.

From: ian.
Junior members.

Reasoning?

members just because of what happened last time with gerchaurts and nicbaz's (i think) eye of newt buyers, the price dropped so much its wasnt worth having a script for it

From: Bonfield
members just because of what happened last time with gerchaurts and nicbaz's (i think) eye of newt buyers, the price dropped so much its wasnt worth having a script for it

Agree with Bonfield. Make it members only :)

Membârs.

Yeah Bonfield is right, stick with members :).

From: BobboHobbo
Yeah Bonfield is right, stick with members :).

Ok thanks guys, also , if anyone wouldn't mind showing me a pointer on how to open the door on msn? Thanks.:)

there my function for pass barrier at soulwar. it may give you some idea :)
wich.tile is a ttile(extended) ex: (100.5 , 100)

Function PassBarrier(wich:Ibarrier): boolean;
var
  tpI, p :tpoint;
  CTS, I: Integer;
  Tpa: TpointArray;
  Atpa: T2DPointArray;
begin
  while CharacterMoving do wait(300+random(600));
  if TileOnMSEx(wich.tile, random(5)) then
  begin
    tpI:=TileToMSEx(wich.tile,random(5));
    CTS := GetColorToleranceSpeed;
    SetColorSpeed3Modifiers(2);
    if not(FindColorsTolerance(TPA, wich.col, tpI.x-30, tpI.y-30, tpI.x+40, tpI.y+40, 25)) then
    begin
      Writeln('Failed to find barrier color');
      SetColorSpeed3Modifiers(4);
      ColorToleranceSpeed(CTS);
      Exit;
    end;

    SortTPAFrom(Tpa, Point(tpI.x, tpI.y));
    Atpa := SplitTPAEx(Tpa, 2, 2);

    for I:=0 to high(Atpa) do
    begin
      p:= MiddleTPA(Atpa[i]);
      result := MouseE(p.x, p.y, 1, 1,['Pass B','Pass R', 'oin-te']);
      if result then
      begin
        SetColorSpeed3Modifiers(3);
        ColorToleranceSpeed(CTS);
        exit;
      end;
    end;

    if I>= (high(atpa)+1) then

    begin
      Writeln('Failed to find barrier floor color');
      SetColorSpeed3Modifiers(4);
      ColorToleranceSpeed(CTS);
      Exit;
    end;
  end;
end;