SRL Archive - SRL Bugs

LoadSymbolBitmapColor

Wyn

2012-03-27 21:01:42

The Dungeon bitmap wasn't working, so I made a new one…

    'dungeon':
      begin
        SymbolBitmap :=BitmapFromString(8, 9, 'meJw7cAAEFiz4ExDwBYi0tD4wMMSw' +
        '5vwDCs6cORMoApHCKg4URBOHiBAUl3b9CxGHG8LPPx8oDkRg50Clg' +
        'ILp6a+BbEYGhgMwMBMJHEACEKOAJIQLAAEpc48=');
        Result := 2698232;
      end;

Tested at Edge Dungeon symbol by the two yews….

program new;
{$i SRL/SRL.Simba}
     var x, y : integer;
begin
SetupSRL;
ActivateClient;
if Findsymbol(x, y, 'dungeon') then
writeln('sdfsdf');
end.

Coh3n

2012-04-01 23:12:24

Fixed for the next version.