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


change dobj to whatever energy ur level is at.



Code:
program Test;
{$loadlib MemoryError}

//25544,25543= brilliant energy
begin
wait(100);
SetupRSReading(True,'inputname here',-1,2);

repeat

//getjar
if(InvFreecount()>2)then
begin
clickmaptile([2229,9117]);


begin
repeat
until(IsPlayersMoving('inputname here')=False);

repeat
until(IsPlayersAnimating('inputname here',100)=True);
end
repeat
FindDobj([111374],10,20,0,True,0,'Take-from');
wait(random(2500,6500));
until(InvFreecount()=0);
end


//start collecting
if (InvItemcount(42898)=0) then
clickmaptile([2209,9115]);
repeat

begin
repeat

begin
Wait(1500);
Writeln('find energy');
if(FindNPCs1([25544,25543],2,50,0,1,[0,0],100,0,'Harvest'))=false then
begin
clickmaptile([2209,9115])
end
end



repeat
until(IsPlayersMoving('inputname here')=False);


wait(random(800,2500));
Writeln('moving to collecting');
until(IsPlayersAnimating('inputname here',100)=True);



repeat
wait(random(800,2500));
Writeln('collecting');
until(IsPlayersAnimating('inputname here',100)=false);
end

until(InvItemcount(42900)=27);

if (InvItemcount(42900)=27) then
writeln('done colecting');
begin
ClickMapTile([2208,9133]);
repeat
until(FindDobj([111375],10,5,0,True,3,'Offer-memory'));
FindDobj([111375],10,5,0,True,0,'Offer-memory');
repeat
until(InvItemcount(42900)=0);

end
until(False);
end.