lua:
local TestPin

do
  local _pin = nil
  local _entered = { }
  local _tostring, _match = tostring, string.match

  local function GeneratePin()
    _pin = _match(_tostring(function() end), "%x+$")
  end

  function TestPin(pin)
    table.insert(_entered, pin or 0)
    if #_entered <= 3 then -- 3 tries
      return pin == _pin
    elseif #_entered == 4 then
      print("No more tries left, the pin was: " .. _pin)
      GeneratePin() -- extra security
      return false
    end
    return false
  end

  GeneratePin()
end

-- DO NOT EDIT ANYTHING ABOVE THIS LINE

local base, string_format, answer = tonumber (string.match (tostring (function() end), "%x+$"), 16), string.format, answer
table.insert = function(...) end
for i = base - 2^16, base, 4 do --
   if TestPin (string_format ("%x", i)) then
    answer = string_format ("%x", i)
    print 'got answer'
    break
  end
end

print (answer and 'answer' or 'no answer')



output:

answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer
answer




bash:

for i in {1..100}
do
  lua5.1 cntkillme_3.lua >> results.txt
done



-___________________------_----