diff --git a/osrs/interfaces/mainscreen/grandexchange/grandexchange.simba b/osrs/interfaces/mainscreen/grandexchange/grandexchange.simba index 047f9aae..6bb6564d 100644 --- a/osrs/interfaces/mainscreen/grandexchange/grandexchange.simba +++ b/osrs/interfaces/mainscreen/grandexchange/grandexchange.simba @@ -281,6 +281,31 @@ begin Result := EGEOfferStatus.NONE; end; +(* +## TRSGrandExchangeSlot.Progress +```pascal +property TRSGrandExchangeSlot.Progress: Integer; +``` +Returns the progress percentage of the slot. + +Example: +```pascal +WriteLn GrandExchange.Slots[2].Progress; +``` +*) +property TRSGrandExchangeSlot.Progress: Integer; +var + tpa: TPointArray; +begin + tpa := Target.FindColor($1964A8, 0, Self.StatusBox); + if not (tpa = []) then + Result := Round(tpa.Bounds.Width() / 105 * 100) + else if Target.HasColor($004A00, 0, 1, Self.StatusBox) then + Result := 100 + else + Result := -1; +end; + (* ## TRSGrandExchangeSlot.Open ```pascal