ShuriZma
/
fceux
mirror of https://github.com/TASEmulators/fceux.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Hm I thought I updated this thing. Some small LuaBot improvements.

This commit is contained in:
qfox 2008-07-27 16:32:10 +00:00
parent c66da282ff
commit d7383158d5
1 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
documentation/luabot.lua
View File

@ -1,6 +1,6 @@
-- LuaBot, concept bot for FCEU and ZSnes and any other emu that has compatible Lua engine -- LuaBot, concept bot for FCEU and ZSnes and any other emu that has compatible Lua engine
-- qFox, 24 July 2008 -- qFox, 24 July 2008
-- version 1.01 -- version 1.03
local function realcount(t) -- accurately count the number of elements of a table, even if they contain nil values. not fast, but accurate. local function realcount(t) -- accurately count the number of elements of a table, even if they contain nil values. not fast, but accurate.
local n = 0; local n = 0;
@ -357,7 +357,7 @@ while (rand_if(isRunEnd())) do
-- press keys from bot -- press keys from bot
gui.text(10,10,"Attempt: "..attempt.." / "..maxattempts.."\nFrame: "..frame.." / "..maxframes); gui.text(10,10,"Attempt: "..attempt.." / "..maxattempts.."\nFrame: "..frame.." / "..maxframes);
if (segments[segment] and segments[segment].best and segments[segment].prev) then if (segments[segment] and segments[segment].best and segments[segment].prev) then
gui.text(10,30,"Last score: "..segments[segment].prev.score.." ok="..okattempts..", fails="..failattempts.."\nBest score: "..segments[segment].best.score); gui.text(10,30,"Last score: "..segments[segment].prev.score.." ok="..okattempts..", fail="..failattempts.."\nBest score: "..segments[segment].best.score);
elseif (segments[segment] and segments[segment].prev) then elseif (segments[segment] and segments[segment].prev) then
gui.text(10,30,"Last score: "..segments[segment].prev.score.."\nBest score: none, fails="..failattempts); gui.text(10,30,"Last score: "..segments[segment].prev.score.."\nBest score: none, fails="..failattempts);
end; end;
@ -388,8 +388,6 @@ while (rand_if(isRunEnd())) do
if (rand_if(pressKeySelect2())) then key2.select = 1; end; if (rand_if(pressKeySelect2())) then key2.select = 1; end;
if (rand_if(pressKeyStart2())) then key2.start = 1; end; if (rand_if(pressKeyStart2())) then key2.start = 1; end;
gui.text(50,70,"key1: "..realcount(key1)..", key2: "..realcount(key2).."\nlast1: "..realcount(lastkey1)..", last2: "..realcount(lastkey2));
onInputEnd(); onInputEnd();
lastkey1 = key1; lastkey1 = key1;
@ -401,7 +399,7 @@ while (rand_if(isRunEnd())) do
-- actually set the keys here. -- actually set the keys here.
joypad.set(1, key1); joypad.set(1, key1);
joypad.set(1, key2); joypad.set(2, key2);
-- next frame -- next frame
FCEU.frameadvance(); FCEU.frameadvance();