Hello frands,

new script here for abbysal demons; fight and make money lvl up
keep loot window open and somewhere on the sides
keep an upgrade gem bag or gem bag/spring cleaner /charming imp / elven shard in inventory
replace the keypress z with war teleport keybind
replace the keypress n with aggression potion
replace the keypress c with elven shard
do not use the cursor on the screens while the script is on - might go bonkers.

you can follow the threads in forum how to setup simba64, and place the memory reading dll in plugin folder,
you can also refer to the memory reading threads for better understanding how to use it.

the link for memory reador .dll
//remove this --< github.com/pp9999/MemReading/releases/tag/0.1

the link to forum.
//remove this --<(/villavu.com/forum/showthread.php?t=116686
do not keep at night while you sleep, might die.

baby sit the script for a while till you are comfortable with it.


Code:
program Test;
{$loadlib MemoryError}


var
 x,y: Integer;

begin
wait(100);
SetupRSReading(True,'nameinput_here',-1,2);
 
repeat

//if (not CheckPAnim(100) )then

if  (IsPlayersAnimating('nameinput_here',100)=False) then
begin

 keypress('n');

WriteLn(GetSystemTime());
//abyssal demon
FindNPCs1([1615],4,15,1,6700,[0,0],10,0,'Attack');
 clickmaptile([3408+random(0,3),3547+random(0,3)])

end


if  (IsPlayersAnimating('nameinput_here',100)=true) then


begin


KeyPress(' ');
if (GetHP()<1000)then
begin
KeyPress('z');
 end

//infernal noting
if (InvItemcount(20268)>0) then
begin
repeat  ClickInv(30372,1);
wait(random(800,1200));
ClickInv(20268,1)   ;
wait(random(2500,1200));
until((InvItemcount(20268)=0));
end;

KeyPress(' ');
if (InvItemcount(385)>0) then
begin
repeat
KeyPress('p');
wait(random(500,800));
until((InvItemcount(385)=0));

if (InvItemcount(385)>0) then
begin
repeat
KeyPress('x');
wait(random(500,800));
 clickInv(385,0);
 wait(random(500,800));  wait(random(500,800));
until((InvItemcount(385)=0));

end;
if (GetPray ()<100)  then
begin
repeat
KeyPress('b');
wait(random(1200,2500));
KeyPress('c');
until(GetPray ()>650);
end


KeyPress(' ');


end
end
     until(false);

end.