sav=savestate.create(3)
savestate.save(sav)random = math.random(12)
if random == 1 then joypad.set(1,{A=1})
elseif random == 2 then joypad.set(1,{A=1})
elseif random == 3 and z == 1 then joypad.set(1,{down=1})
elseif random == 4 then joypad.set(1,{down=1})
elseif random == 5 then joypad.set(1,{down=1})
elseif random == 6 then joypad.set(1,{B=1})
elseif random == 7 then joypad.set(1,{B=1})
elseif random == 8 then joypad.set(1,{right=1})
elseif random == 9 then joypad.set(1,{right=1})
elseif random == 10 then joypad.set(1,{left=1})
elseif random > 10 then joypad.set(1,{A=0}) end
local t={}
r1=math.random(2)
r2=math.random(2)
if r1==1 then t.right=1 end
if r2==1 then t.down=1 end
joypad.set(1,t)Something like this you want, maybe? :) However if you want multiple keys to be set at random, then maybe something like:Language: Lualocal key_table = {} local randint = math.random(12) if randint == 1 then key_table["A"] = true; key_table["B"] = true; end if randint == 2 then key_table["right"] = true end -- etc.. joypad.set(1, key_table)
Sorry if I misunderstand. Both scripts are untested but the idea is there. :pLanguage: Lualocal key_table = { ["A"] = false, ["B"] = false } -- etc.. for k, v in pairs(key_table) do local set = math.random(2) if set == 2 then key_table[k] = true end end joypad.set(1, key_table)
I need some lua help. How can I make a lag counter based off my character's speed or position addresses? So that I can count how many times my addresses haven't updated Thanks in advance
Though something less simple might be needed, depending on how your game calculates positions.Language: luawhile true do scroll=memory.readbyte(0x00A3) if scroll == oldscroll then gui.text(120,100,"!!!!!!!!!!!!!!!!!","red") bleh=bleh+1 gui.text(0,8,"" .. bleh) end emu.frameadvance() oldscroll=scroll end
Language: luaoldcount = 0 oldscroll = 0 while true do gui.opacity(0.59) gui.drawbox(84,6,156,19, "black","black") gui.opacity(0.9) framecount = vba.framecount() scroll=memory.readwordsigned(0x02038730)+memory.readwordsigned(0x02038750)+memory.readwordsigned(0x02038824) if scroll == oldscroll then gui.text(90,8,"***** *****","red") lag=lag+1 end gui.text(117,10,"" .. lag) if framecount < oldcount then lag = lag - lag end vba.frameadvance() oldscroll=scroll oldcount = framecount end
I appreciate your help. If there's no solution maybe I'll handle each enemy slot on its own. But that would mean not being able to display stuff properly in order (from top to bottom).Language: Luafor i = 0xDF00, 0xDFFF, 16 do if memory.readbyte(i+0) ~= 0 then local inv = memory.readbyte(i+10) local hp = memory.readbyte(i+11) local x = memory.readbyte(i+13) local y = memory.readbyte(i+14) gui.text(x - 16, y - 24, "hp: " .. hp) gui.text(x - 16, y - 16, "inv: " .. inv) end end
Make slotnumber a local starting at 0 initialized outside of the for loop, and add 1 to it every pass through the for loop.
if a == b AND c == d then gui.text(10,10,"true") end
I have suggested one way to define slotnumber, and a way to pull an address out of it. I recall that the logical keywords overtakes comparison operators, so use parentheses around every desired condition to fight this order of operation. Lua has some tricky syntax at times.Language: luafor slotnumber = 0 , 15 do -- or pick some other values local address = 0xDF00 + 16*slotnumber -- insert stuff relating to what you're doing end --Multiple conditions if if (a == b) and (c == d) then --code end
Is it possible to write an external .txt file with lua in VBA?
Language: LUAlocal function watch_file() io.output("Final Fantasy V (P).wch") local index = 0x80 local address = 0x7E2200 local size = "b" local Type = "h" local zero = 0 local notes = "" for i=0, index-1 do io.write( string.format( "%5X %6X %s %s %i %s\n", i, address+i, size, Type, zero, notes) ) end io.close() end
This works when inputting buttons to the emulator manually. But it does not work with pre-recorded movies. Is there a way to make it work? Otherwise, is there a way to convert my movie file to the information I need?Language: Lua(...) keytable = joypad.get(1) if keytable.left then left = "true" else left = "false" end if keytable.right then right = "true" else right = "false" end if keytable.down then down = "true" else down = "false" end if keytable.up then up = "true" else up = "false" end if keytable.start then start = "true" else start = "false" end if keytable.select then select = "true" else select = "false" end if keytable.a then a = "true" else a = "false" end if keytable.b then b = "true" else b = "false" end (...) if lagcount ~= vba.lagcount() or leftbefore ~= left or rightbefore ~= right or upbefore ~= up or downbefore ~= down or startbefore ~= start or selectbefore ~= select or abefore ~= a or bbefore ~= b then (...) io.write( 'FINAL'..changes..' = vid5.trim('.. framecount_last_valchange..','.. frames..') .Part('.. lagcount..','.. left ..','..right..','.. up..','.. down..','.. a..','.. b..','.. start..','..select..')\n') (...)
Looks like this is what I wanted although it's reaaally slow.Language: luafunction hex(num,dig) local dig = dig or 4 --assume 4 digits if not given local hexstr = '0123456789ABCDEF' local s = '' --while num > 0 do while dig > 0 do -- use digit instead so there is padding local mod = math.fmod(num, 16) s = string.sub(hexstr, mod+1, mod+1) .. s num = math.floor(num / 16) dig = dig - 1 end if s == '' then s = '0' end return s end while true do t="" for i=0xC000,0xCFFF,0x0001 do memory.registerexec(i, function () vba.print(hex(i).." executed!") t = t .. hex(i) .. " executed\n" end) end gui.text(2,0,t,"orange") emu.frameadvance() end
Language: luamemory.registerexec(0xC000, 0x0FFF, function () --stuff end)
