[Florensia] Speedhack CE & Macros

-- Memory Adresses
PlayerHPadr = 0x00F86E18;
PlayerHPoff = 0x1D4;
TargetLockadr = 0x18DBD325;
-- Setup --
-- Sit When HP Reaches.. --
PlayerHPStop = 300;
-- Stand Up When HP Reaches.. --
PlayerHPSit = 630;
-- Enables Looting, increases the time between killing --
EnableLooting = 1;
-- Reviving Enabled? --
Revive = 1;
-- Mouse Coords of the Revive Button
ReviveX = 547;
ReviveY = 411;
-- End of Setup--

function GetTarget()
    TargetLock = memoryReadByte(proc, TargetLockadr);
    if( TargetLock == 1 and PlayerHP > PlayerHPStop and Sitting == 0) then
    keyboardPress( key.VK_1 );
    rest(20);
    keyboardPress( key.VK_7 );
    end
    if( TargetLock == 0 and PlayerHP > PlayerHPStop and Sitting == 0 ) then
	Loot();
	keyboardPress( key.VK_0 );
    rest(20);
    end
  rest(20);
end

function Heal()
    PlayerHP = memoryReadIntPtr(proc, PlayerHPadr, PlayerHPoff);
    if( PlayerHP <= PlayerHPStop and TargetLock == 0 and Sitting == 0 ) then
	rest(5000);
	keyboardPress( key.VK_8 );
	rest(4000);
	Sitting = 1;
    end
    if( PlayerHP >= PlayerHPSit and TargetLock == 0 and Sitting == 1 ) then
    keyboardPress( key.VK_8 );
	rest(4000);
	Sitting = 0;
    end
end

function DefeatAttacker()
    if( Sitting == 1 and TargetLock == 1 ) then
    keyboardPress( key.VK_S );
	rest(500);
	Sitting = 0;
	keyboardPress( key.VK_7 );
    end
end

function Loot()
    if( EnableLooting == 1 ) then
    keyboardPress( key.VK_X );
	rest(4000);
	end
end

function Reviving()
    if( Revive == 1 and PlayerHP == 0 ) then
    yrest(5000);
    mouseSet(ReviveX, ReviveY);
    yrest(500);
    mouseLClick();
	end
end

function main()
  attach( findWindow("Florensia") );
  proc = openProcess( findProcess("Florensia") );
  Sitting = 0;
  while(true) do
  Heal();
  DefeatAttacker();
  GetTarget();
  Reviving();
  rest(10);
  end
end

startMacro(main, true);

ReviveX = 547;
ReviveY = 411;

if( PlayerHP <= 80 )
keyboardPress( key.VK_1 );
rest(300);
end