Prevent Autopilot

{
  Author: Igromanru
  Description: Activate to prevent beeing autopiloted.
}
[ENABLE]
{$lua}
if syntaxcheck then return end

local PLAYER_NO_PTR = "[[BaseA]+10]+11"

function randomizePlayerNo()
  local playerNo = math.random(1,255)
  writeBytes(PLAYER_NO_PTR, playerNo)
end

randomizePlayerNo()
igroPreventAPTimer = createTimer(getMainForm())
igroPreventAPTimer.Interval = 1000
igroPreventAPTimer.OnTimer = function(timer)
  randomizePlayerNo()
end
igroPreventAPTimer.setEnabled(true)

[DISABLE]
{$lua}
if syntaxcheck then return end
if igroPreventAPTimer ~= nil then
  igroPreventAPTimer.setEnabled(false)
end