yelbotV2.lua

local sf=string.format
local save=savestate.saveslot
local load=savestate.loadslot

local function set(s,b)
  local input = joypad.get()
  input[s]=b
  joypad.set(input)
end
local function wait(x)
  for i=1,x do emu.frameadvance() end
end
local function check(a,b,c,d)
  local b1 = mainmemory.read_u8(0x1358)
  local b2 = mainmemory.read_u8(0x1359)
  if b1==0x64 and (b2==0xCF or b2==0xD0 or b2==0xEA) then
    print(sf("%02X %02X %d %d %d %d",b1,b2,a,b,c,d))
  end
  --print(sf("%02X %02X",b1,b2))
end

local t = {
  {0,0,0,0},
  {0,0,0,1},{0,0,1,0},{0,1,0,0},{1,0,0,0},
  {0,0,0,2},{0,0,1,1},{0,0,2,0},{0,1,0,1},{0,1,1,0},{0,2,0,0},{1,0,0,1},{1,0,1,0},{1,1,0,0},{2,0,0,0},
  {0,0,0,3},{0,0,1,2},{0,0,2,1},{0,0,3,0},{0,1,0,2},{0,1,1,1},{0,1,2,0},{0,2,0,1},{0,2,1,0},{0,3,0,0},{1,0,0,2},{1,0,1,1},{1,0,2,0},{1,1,0,1},{1,1,1,0},{1,2,0,0},{2,0,0,1},{2,0,1,0},{2,1,0,0},{3,0,0,0},
  {0,0,0,4},{0,0,1,3},{0,0,2,2},{0,0,3,1},{0,0,4,0},{0,1,0,3},{0,1,1,2},{0,1,2,1},{0,1,3,0},{0,2,0,2},{0,2,1,1},{0,2,2,0},{0,3,0,1},{0,3,1,0},{0,4,0,0},{1,0,0,3},{1,0,1,2},{1,0,2,1},{1,0,3,0},{1,1,0,2},{1,1,1,1},{1,1,2,0},{1,2,0,1},{1,2,1,0},{1,3,0,0},{2,0,0,2},{2,0,1,1},{2,0,2,0},{2,1,0,1},{2,1,1,0},{2,2,0,0},{3,0,0,1},{3,0,1,0},{3,1,0,0},{4,0,0,0},
  {0,0,0,5},{0,0,1,4},{0,0,2,3},{0,0,3,2},{0,0,4,1},{0,0,5,0},{0,1,0,4},{0,1,1,3},{0,1,2,2},{0,1,3,1},{0,1,4,0},{0,2,0,3},{0,2,1,2},{0,2,2,1},{0,2,3,0},{0,3,0,2},{0,3,1,1},{0,3,2,0},{0,4,0,1},{0,4,1,0},{0,5,0,0},{1,0,0,4},{1,0,1,3},{1,0,2,2},{1,0,3,1},{1,0,4,0},{1,1,0,3},{1,1,1,2},{1,1,2,1},{1,1,3,0},{1,2,0,2},{1,2,1,1},{1,2,2,0},{1,3,0,1},{1,3,1,0},{1,4,0,0},{2,0,0,3},{2,0,1,2},{2,0,2,1},{2,0,3,0},{2,1,0,2},{2,1,1,1},{2,1,2,0},{2,2,0,1},{2,2,1,0},{2,3,0,0},{3,0,0,2},{3,0,1,1},{3,0,2,0},{3,1,0,1},{3,1,1,0},{3,2,0,0},{4,0,0,1},{4,0,1,0},{4,1,0,0},{5,0,0,0},
  {0,0,0,6},{0,0,1,5},{0,0,2,4},{0,0,3,3},{0,0,4,2},{0,0,5,1},{0,0,6,0},{0,1,0,5},{0,1,1,4},{0,1,2,3},{0,1,3,2},{0,1,4,1},{0,1,5,0},{0,2,0,4},{0,2,1,3},{0,2,2,2},{0,2,3,1},{0,2,4,0},{0,3,0,3},{0,3,1,2},{0,3,2,1},{0,3,3,0},{0,4,0,2},{0,4,1,1},{0,4,2,0},{0,5,0,1},{0,5,1,0},{0,6,0,0},{1,0,0,5},{1,0,1,4},{1,0,2,3},{1,0,3,2},{1,0,4,1},{1,0,5,0},{1,1,0,4},{1,1,1,3},{1,1,2,2},{1,1,3,1},{1,1,4,0},{1,2,0,3},{1,2,1,2},{1,2,2,1},{1,2,3,0},{1,3,0,2},{1,3,1,1},{1,3,2,0},{1,4,0,1},{1,4,1,0},{1,5,0,0},{2,0,0,4},{2,0,1,3},{2,0,2,2},{2,0,3,1},{2,0,4,0},{2,1,0,3},{2,1,1,2},{2,1,2,1},{2,1,3,0},{2,2,0,2},{2,2,1,1},{2,2,2,0},{2,3,0,1},{2,3,1,0},{2,4,0,0},{3,0,0,3},{3,0,1,2},{3,0,2,1},{3,0,3,0},{3,1,0,2},{3,1,1,1},{3,1,2,0},{3,2,0,1},{3,2,1,0},{3,3,0,0},{4,0,0,2},{4,0,1,1},{4,0,2,0},{4,1,0,1},{4,1,1,0},{4,2,0,0},{5,0,0,1},{5,0,1,0},{5,1,0,0},{6,0,0,0},
  {0,0,0,7},{0,0,1,6},{0,0,2,5},{0,0,3,4},{0,0,4,3},{0,0,5,2},{0,0,6,1},{0,0,7,0},{0,1,0,6},{0,1,1,5},{0,1,2,4},{0,1,3,3},{0,1,4,2},{0,1,5,1},{0,1,6,0},{0,2,0,5},{0,2,1,4},{0,2,2,3},{0,2,3,2},{0,2,4,1},{0,2,5,0},{0,3,0,4},{0,3,1,3},{0,3,2,2},{0,3,3,1},{0,3,4,0},{0,4,0,3},{0,4,1,2},{0,4,2,1},{0,4,3,0},{0,5,0,2},{0,5,1,1},{0,5,2,0},{0,6,0,1},{0,6,1,0},{0,7,0,0},{1,0,0,6},{1,0,1,5},{1,0,2,4},{1,0,3,3},{1,0,4,2},{1,0,5,1},{1,0,6,0},{1,1,0,5},{1,1,1,4},{1,1,2,3},{1,1,3,2},{1,1,4,1},{1,1,5,0},{1,2,0,4},{1,2,1,3},{1,2,2,2},{1,2,3,1},{1,2,4,0},{1,3,0,3},{1,3,1,2},{1,3,2,1},{1,3,3,0},{1,4,0,2},{1,4,1,1},{1,4,2,0},{1,5,0,1},{1,5,1,0},{1,6,0,0},{2,0,0,5},{2,0,1,4},{2,0,2,3},{2,0,3,2},{2,0,4,1},{2,0,5,0},{2,1,0,4},{2,1,1,3},{2,1,2,2},{2,1,3,1},{2,1,4,0},{2,2,0,3},{2,2,1,2},{2,2,2,1},{2,2,3,0},{2,3,0,2},{2,3,1,1},{2,3,2,0},{2,4,0,1},{2,4,1,0},{2,5,0,0},{3,0,0,4},{3,0,1,3},{3,0,2,2},{3,0,3,1},{3,0,4,0},{3,1,0,3},{3,1,1,2},{3,1,2,1},{3,1,3,0},{3,2,0,2},{3,2,1,1},{3,2,2,0},{3,3,0,1},{3,3,1,0},{3,4,0,0},{4,0,0,3},{4,0,1,2},{4,0,2,1},{4,0,3,0},{4,1,0,2},{4,1,1,1},{4,1,2,0},{4,2,0,1},{4,2,1,0},{4,3,0,0},{5,0,0,2},{5,0,1,1},{5,0,2,0},{5,1,0,1},{5,1,1,0},{5,2,0,0},{6,0,0,1},{6,0,1,0},{6,1,0,0},{7,0,0,0},
  {0,0,0,8},{0,0,1,7},{0,0,2,6},{0,0,3,5},{0,0,4,4},{0,0,5,3},{0,0,6,2},{0,0,7,1},{0,0,8,0},{0,1,0,7},{0,1,1,6},{0,1,2,5},{0,1,3,4},{0,1,4,3},{0,1,5,2},{0,1,6,1},{0,1,7,0},{0,2,0,6},{0,2,1,5},{0,2,2,4},{0,2,3,3},{0,2,4,2},{0,2,5,1},{0,2,6,0},{0,3,0,5},{0,3,1,4},{0,3,2,3},{0,3,3,2},{0,3,4,1},{0,3,5,0},{0,4,0,4},{0,4,1,3},{0,4,2,2},{0,4,3,1},{0,4,4,0},{0,5,0,3},{0,5,1,2},{0,5,2,1},{0,5,3,0},{0,6,0,2},{0,6,1,1},{0,6,2,0},{0,7,0,1},{0,7,1,0},{0,8,0,0},{1,0,0,7},{1,0,1,6},{1,0,2,5},{1,0,3,4},{1,0,4,3},{1,0,5,2},{1,0,6,1},{1,0,7,0},{1,1,0,6},{1,1,1,5},{1,1,2,4},{1,1,3,3},{1,1,4,2},{1,1,5,1},{1,1,6,0},{1,2,0,5},{1,2,1,4},{1,2,2,3},{1,2,3,2},{1,2,4,1},{1,2,5,0},{1,3,0,4},{1,3,1,3},{1,3,2,2},{1,3,3,1},{1,3,4,0},{1,4,0,3},{1,4,1,2},{1,4,2,1},{1,4,3,0},{1,5,0,2},{1,5,1,1},{1,5,2,0},{1,6,0,1},{1,6,1,0},{1,7,0,0},{2,0,0,6},{2,0,1,5},{2,0,2,4},{2,0,3,3},{2,0,4,2},{2,0,5,1},{2,0,6,0},{2,1,0,5},{2,1,1,4},{2,1,2,3},{2,1,3,2},{2,1,4,1},{2,1,5,0},{2,2,0,4},{2,2,1,3},{2,2,2,2},{2,2,3,1},{2,2,4,0},{2,3,0,3},{2,3,1,2},{2,3,2,1},{2,3,3,0},{2,4,0,2},{2,4,1,1},{2,4,2,0},{2,5,0,1},{2,5,1,0},{2,6,0,0},{3,0,0,5},{3,0,1,4},{3,0,2,3},{3,0,3,2},{3,0,4,1},{3,0,5,0},{3,1,0,4},{3,1,1,3},{3,1,2,2},{3,1,3,1},{3,1,4,0},{3,2,0,3},{3,2,1,2},{3,2,2,1},{3,2,3,0},{3,3,0,2},{3,3,1,1},{3,3,2,0},{3,4,0,1},{3,4,1,0},{3,5,0,0},{4,0,0,4},{4,0,1,3},{4,0,2,2},{4,0,3,1},{4,0,4,0},{4,1,0,3},{4,1,1,2},{4,1,2,1},{4,1,3,0},{4,2,0,2},{4,2,1,1},{4,2,2,0},{4,3,0,1},{4,3,1,0},{4,4,0,0},{5,0,0,3},{5,0,1,2},{5,0,2,1},{5,0,3,0},{5,1,0,2},{5,1,1,1},{5,1,2,0},{5,2,0,1},{5,2,1,0},{5,3,0,0},{6,0,0,2},{6,0,1,1},{6,0,2,0},{6,1,0,1},{6,1,1,0},{6,2,0,0},{7,0,0,1},{7,0,1,0},{7,1,0,0},{8,0,0,0},
  {0,0,0,9},{0,0,1,8},{0,0,2,7},{0,0,3,6},{0,0,4,5},{0,0,5,4},{0,0,6,3},{0,0,7,2},{0,0,8,1},{0,0,9,0},{0,1,0,8},{0,1,1,7},{0,1,2,6},{0,1,3,5},{0,1,4,4},{0,1,5,3},{0,1,6,2},{0,1,7,1},{0,1,8,0},{0,2,0,7},{0,2,1,6},{0,2,2,5},{0,2,3,4},{0,2,4,3},{0,2,5,2},{0,2,6,1},{0,2,7,0},{0,3,0,6},{0,3,1,5},{0,3,2,4},{0,3,3,3},{0,3,4,2},{0,3,5,1},{0,3,6,0},{0,4,0,5},{0,4,1,4},{0,4,2,3},{0,4,3,2},{0,4,4,1},{0,4,5,0},{0,5,0,4},{0,5,1,3},{0,5,2,2},{0,5,3,1},{0,5,4,0},{0,6,0,3},{0,6,1,2},{0,6,2,1},{0,6,3,0},{0,7,0,2},{0,7,1,1},{0,7,2,0},{0,8,0,1},{0,8,1,0},{0,9,0,0},{1,0,0,8},{1,0,1,7},{1,0,2,6},{1,0,3,5},{1,0,4,4},{1,0,5,3},{1,0,6,2},{1,0,7,1},{1,0,8,0},{1,1,0,7},{1,1,1,6},{1,1,2,5},{1,1,3,4},{1,1,4,3},{1,1,5,2},{1,1,6,1},{1,1,7,0},{1,2,0,6},{1,2,1,5},{1,2,2,4},{1,2,3,3},{1,2,4,2},{1,2,5,1},{1,2,6,0},{1,3,0,5},{1,3,1,4},{1,3,2,3},{1,3,3,2},{1,3,4,1},{1,3,5,0},{1,4,0,4},{1,4,1,3},{1,4,2,2},{1,4,3,1},{1,4,4,0},{1,5,0,3},{1,5,1,2},{1,5,2,1},{1,5,3,0},{1,6,0,2},{1,6,1,1},{1,6,2,0},{1,7,0,1},{1,7,1,0},{1,8,0,0},{2,0,0,7},{2,0,1,6},{2,0,2,5},{2,0,3,4},{2,0,4,3},{2,0,5,2},{2,0,6,1},{2,0,7,0},{2,1,0,6},{2,1,1,5},{2,1,2,4},{2,1,3,3},{2,1,4,2},{2,1,5,1},{2,1,6,0},{2,2,0,5},{2,2,1,4},{2,2,2,3},{2,2,3,2},{2,2,4,1},{2,2,5,0},{2,3,0,4},{2,3,1,3},{2,3,2,2},{2,3,3,1},{2,3,4,0},{2,4,0,3},{2,4,1,2},{2,4,2,1},{2,4,3,0},{2,5,0,2},{2,5,1,1},{2,5,2,0},{2,6,0,1},{2,6,1,0},{2,7,0,0},{3,0,0,6},{3,0,1,5},{3,0,2,4},{3,0,3,3},{3,0,4,2},{3,0,5,1},{3,0,6,0},{3,1,0,5},{3,1,1,4},{3,1,2,3},{3,1,3,2},{3,1,4,1},{3,1,5,0},{3,2,0,4},{3,2,1,3},{3,2,2,2},{3,2,3,1},{3,2,4,0},{3,3,0,3},{3,3,1,2},{3,3,2,1},{3,3,3,0},{3,4,0,2},{3,4,1,1},{3,4,2,0},{3,5,0,1},{3,5,1,0},{3,6,0,0},{4,0,0,5},{4,0,1,4},{4,0,2,3},{4,0,3,2},{4,0,4,1},{4,0,5,0},{4,1,0,4},{4,1,1,3},{4,1,2,2},{4,1,3,1},{4,1,4,0},{4,2,0,3},{4,2,1,2},{4,2,2,1},{4,2,3,0},{4,3,0,2},{4,3,1,1},{4,3,2,0},{4,4,0,1},{4,4,1,0},{4,5,0,0},{5,0,0,4},{5,0,1,3},{5,0,2,2},{5,0,3,1},{5,0,4,0},{5,1,0,3},{5,1,1,2},{5,1,2,1},{5,1,3,0},{5,2,0,2},{5,2,1,1},{5,2,2,0},{5,3,0,1},{5,3,1,0},{5,4,0,0},{6,0,0,3},{6,0,1,2},{6,0,2,1},{6,0,3,0},{6,1,0,2},{6,1,1,1},{6,1,2,0},{6,2,0,1},{6,2,1,0},{6,3,0,0},{7,0,0,2},{7,0,1,1},{7,0,2,0},{7,1,0,1},{7,1,1,0},{7,2,0,0},{8,0,0,1},{8,0,1,0},{8,1,0,0},{9,0,0,0},
}

--savestate 9 at frame 334

for i=1,#t do
  local a=t[i][1]
  local b=t[i][2]
  local c=t[i][3]
  local d=t[i][4]
  if b~=1 then
    load(9)
    wait(0+a)
    set("Start",true)
    wait(61+b)
    set("A",true)
    wait(157+c)
    set("Start",true)
    wait(110+d)
    set("A",true)
    wait(30)
    check(a,b,c,d)
  end
end

emu.frameadvance()
print("lua finished")