gistfile1.txt

math.randomseed(os.time())

local keys = { "A", "B", "start", "select", "up", "down", "left", "right" }
function randkey()
  local key = keys[math.random(1,8)]
  local input = joypad.get(1)
  input[key] = true
  joypad.set(1, input)
end

vba.registerbefore(randkey)

I love it.