Mam prośbę jeszcze czy potrafisz dodać do tego skryptu że jak kogoś widiz na ekranie to wypierdala
{
Lovely runemaker v1.0
Add to Protector -> Refill left hand this ID: 2260
Left open all backpacks with blank runes
Profit!
}
const
spell='adura vita';
mana=100;
id=2273;
//DONT EDIT LINES BELOW
CONTAINER_BEGIN = $005CEDD8;
procedure letmefeelyourlove;
var adr,i,volume,amount:integer;
p: array [0..16] of byte;
begin
if getmp>=mana then begin
if memreadinteger($005CEDA0-4)=2260 then begin
say(spell);
wait(1000);
for i:=0 to 10 do
begin
adr:=CONTAINER_BEGIN+(i*492);
volume:=memreadinteger(adr+48);
amount:=memreadinteger(adr+56);
if (volume=0) or (volume>40) or (amount>40) then continue;
if volume=amount then continue;
p[0]:=$79;
p[1]:=$ff;
p[2]:=$ff;
p[3]:=6;
p[4]:=0;
p[5]:=0;
p[6]:=longtobyte(id,1);
p[7]:=longtobyte(id,2);
p[8]:=0;
p[9]:=$ff;
p[10]:=$ff;
p[11]:=i+64;
p[12]:=0;
p[13]:=0;
p[14]:=1;
packet(p,15);
break;
end;
end;
end;
end;
//HERE YOU CAN EDIT
BEGIN
letmefeelyourlove(); //DONT REMOVE IT
END.
próbowałem ten skrypt z tym połączyć żeby doszła opcja auto log jak kogoś widzi na ekranie ale mi nie idzie nie iwem czy to jest nie możliwe czy ja coś pierdole ciągle
procedure dontkillme;
var i,adr,bl,bl_offset:integer;
begin
bl:=$005C68B4;
bl_offset:=156;
for i:=0 to 250 do
begin
adr:=bl+(i*bl_offset);
if memreadinteger(adr-4)=memreadinteger($5C684C) then continue;
if memreadinteger(adr+40)=playerz then
if (abs(memreadinteger(adr+32)-playerx)<7) and (abs(memreadinteger(adr+36)-playery)<7) then
if memreadinteger(adr+136)=1 then begin
//White lista
if memreadstring(adr)='' then continue;
if memreadstring(adr)='' then continue;
if memreadstring(adr)='Nick 3' then continue;
if memreadstring(adr)='Nick 4' then continue;
//Mozna dodawac potwory
//Koniec white listy
alarm; logout;
end;
end;
end;
begin
if getmp>220 then say('adori vita vis');
dontkillme;
end.
Zakładki