Results 1 to 7 of 7

Thread: Why doesn't this work?

  1. #1
    Join Date
    Mar 2007
    Posts
    3,116
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default Why doesn't this work?

    SCAR Code:
    Function FindLightestArea:Integer;
    var
      P:TPointArray;
      Ints:TIntegerArray;
      I:Integer;
      H, S, L, MaxI:Extended;
    begin
      FindColorsTolerance(P, 0, MMX1, MMY1, MMX2, MMY2, 400);
      FilterPointsPie(P, 0, 360, 1, 72, MMCY, MMCX);
      Ints:=GetColors(P);
      ClearSameIntegers(Ints);
      For I:=0 to high(Ints)do
      begin
        ColortoHSL(Ints[I], H, S, L);
        If MaxE(MaxI, L) = L then
        begin
          Result:=Ints[I];
          MaxI:=L;
        end;
      end;
    end;

    This doesn't find any colors on the map at all. It seems to fail at FilterPointsPie

  2. #2
    Join Date
    Feb 2007
    Location
    PA, USA
    Posts
    5,240
    Mentioned
    36 Post(s)
    Quoted
    496 Post(s)

    Default

    try starting at 1, and ending at 360. or starting at 0 and ending at 359

  3. #3
    Join Date
    Mar 2007
    Posts
    3,116
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    [offtopic]Your sig is beyond annoying...[/offtopic]

  4. #4
    Join Date
    Feb 2007
    Location
    PA, USA
    Posts
    5,240
    Mentioned
    36 Post(s)
    Quoted
    496 Post(s)

    Default

    i know
    i want people to see what it points to!!!

    google ftw gave me ddr arrows

  5. #5
    Join Date
    Aug 2007
    Location
    in a random little world
    Posts
    5,778
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

  6. #6
    Join Date
    Mar 2007
    Posts
    3,116
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Quote Originally Posted by Shuttleu View Post
    shouldnt
    SCAR Code:
    FilterPointsPie(P, 0, 360, 1, 72, MMCY, MMCX);
    be
    SCAR Code:
    FilterPointsPie(P, 0, 360, 1, 72, MMCX, MMCY);
    ?

    ~shut
    SHit... your right

    I just did this though
    SCAR Code:
    Function FindLightestArea:Integer;
    var
      P:TPointArray;
      Ints:TIntegerArray;
      I:Integer;
      H, S, L, MaxI:Extended;
    begin
      FindColorsTolerance(P, 0, MMX1, MMY1, MMX2, MMY2, 400);
      P:=RemoveDistTPointArray(MMCX, MMCY, 72, P, True);
      Ints:=GetColors(P);
      ClearSameIntegers(Ints);
      For I:=0 to high(Ints)do
      begin
        ColortoHSL(Ints[i], H, S, L);
        If MaxE(MaxI, L) = L then
        begin
          Result:=Ints[i];
          MaxI:=L;
        end;
      end;
    end;

  7. #7
    Join Date
    Jan 2008
    Location
    NC, USA.
    Posts
    4,429
    Mentioned
    0 Post(s)
    Quoted
    4 Post(s)

    Default

    FilterPointsPie( P : TPointArray; StartRadial, EndRadial, MinRadius, MaxRadius, MMCX, MMCY : Integer);
    I put little hints.
    Quote Originally Posted by irc
    [00:55:29] < Guest3097> I lol at how BenLand100 has become noidea
    [01:07:40] <@BenLand100> i'm not noidea i'm
    [01:07:44] -!- BenLand100 is now known as BenLand42-
    [01:07:46] <@BenLand42-> shit
    [01:07:49] -!- BenLand42- is now known as BenLand420
    [01:07:50] <@BenLand420> YEA

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •