SRL Archive - OSR Help

Freeing DtM oldschool 07 help


pcap

2013-03-01 20:40:58

hey i m almost finished with a little script ive been working on but i m not sure about free dtm i would love some help


program Cow_Killer;

{$I SRL/SRL.Simba}
{$I SRL/SRL/Misc/Debug.Simba}
{$I P07Include.Simba}



var
x, y: Integer;
Test: Tstringarray;


procedure DeclarePlayers;
Begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;

Players[0].Name :='';
Players[0].Pass :='';
Players[0].Nick :='';
Players[0].Active:=True;
End;

procedure Kill_Cow;
Begin
repeat
//If P07_FindObjCustom (x,y, ['ow'], [1848381, 11975615],3) then
ClickMouse2(Mouse_left);
Wait(4500)
until(HPPercent <10);
End;

Procedure Eat_Food;
Begin
Repeat
If (HPPercent <10) then
if P07_FindObjcustom(x,y, ['rout'], [7238283], 2) then
Clickmouse2(mouse_left);
until(HPPercent > 50)
End;

begin
ClearDebug;
SetupP07Include;
DeclarePlayers;
P07_LoginPlayer;
Repeat
Kill_Cow;
Eat_Food;
Until(false);

end.

Sjoe

2013-03-01 20:44:01

The script doesn't have DTM's, no need for it :)

What you see is within the SRL Include, just ignore that.

pcap

2013-03-01 20:47:28

when i compile it works but then says Error: Exception: The bitmap[0] does not exist at line 664
The following DTMs were not freed: [0, 1, 2, 3]

Sjoe

2013-03-01 20:50:33

From: pcap
when i compile it works but then says Error: Exception: The bitmap[0] does not exist at line 664
The following DTMs were not freed: [0, 1, 2, 3]


Your error is the first line.

The second line is just a message.

Don't know why u got the bitmap error though.

pcap

2013-03-01 20:54:05

o what could possibly make a bit map problem occur?