Pastey.net - lua paste bin

Language:

Lua Change language:

Pastebin:

98417

Author:

dwangoac

Subject:

Re: General purpose NES item finder

Created:

2008-10-16 02:52:10

Download and save
Toggle line numbers

1	-- Item finder luck manipulation / memory monitor script by dwangoac on 2008-10-09
2
3	--[[ General notes: This was written to find item drops in High Speed; the initial button mask reflects this. Most of the behavior of this script can be altered
4	by touching the variables below and this should be easily adaptable to other games. The script's default settings will find item drops in High Speed on the
5	main table. I'm still new to Lua scripting so some things may still be sub-optimal but the script has been fairly well tested. There are many variables that are
6	seperated into p1 and p2 variable names when they really don't need to be. TODO: break out a few things into functions.
7
8
9	How this script works and how to use it:
10
11	The script tries random input one frame at a time while monitoring the memory address specified by memoryToWatch until the current value matches a desired
12	value (or values) specified by targetMem. An undesirable memory address value (or values) can be specified with the variable avoidMemoryToWatch and if a
13	match is found the attempt is considered unsuccessful and a new attempt is started immediately.
14	The script will try random input for the number of frames specified by maxFrames and will start over from the initial savestate if the desired result is not found.
15	The script will keep trying new combinations of random input for the number of attemps specified by maxAttempts; if no desirable solution is found, it will
16	prompt to determine if it should try again for the same number of attempts. If a desirable solution is found, the script displays the number of frames required
17	and asks if the solution should be kept. If answered yes, the script ends and saves the game state in the slot defined by the variable userSaveSlot. If answered
18	no, the solution is considered unsuccessful and a new attempt is started immediately.
19
20	The buttons that can be randomized are highly configurable. The pxButtonMask tables define which buttons can be randomly pressed, while the
21	pxButtonOverride tables specify buttons that should always be held down while the randomization is taking place. This could be used for short segments
22	to ensure right is always pressed or the start button could be removed from the button mask to prevent the script from pausing the game, for instance.
23	It's possible to specify an override but also leave it in the buttonmask which reverses the logic and randomly releases the button instead (with the same net effect).
24
25	Other options:
26	- Currently, a bug in FCEUX prevents input from both player 1 and player 2 from being accepted on the same frame. The playerInput value specifies which
27	player's input to randomize.
28	- Setting debugText to 1 displays a large amount of information on the screen but significantly increases the CPU load per frame and is therefore disabled
29	to allow finding solutions as fast as possible.
30	- Calling movie.rerecordcounting(false) should prevent the rerecord count from being increased by the script but the rerecord count may be bumped sometimes
31	anyway; I need to investigate this further to see if there's a bug.
32	- Each variable has specific usage notes listed below.
33
34	More information:
35	There is limited Lua scripting documentation available for FCEUX at this time so please feel free to post in the Lua Discussion thread under the FCE Ultra
36	forum at tasvideos.org/forum. I'm on irc.freenode.net in #nesvideos as dwangoac and can answer questions on using the script. Please do let me know if you
37	are able to put this script to good use. Thanks! ]]
38
39
40	userSaveSlot = 10 -- Optional user save slot to save to; make this one higher than the slot number you want or set to nil to not use a slot
41
42	memoryToWatch = 0x064F -- The memory address to watch (only one address is monitored, but a for loop could be added to monitor more locations)
43	targetMem = { 64 } -- A list of desirable values we're looking for at the address specified by memoryToWatch
44
45	avoidMemoryCheckEnabled = true -- Set to false to disable undesirable match testing (see comments below)
46	avoidMemoryToWatch = 0x064F -- Watch this memory address for changes as well but...
47	avoidMem = { 66 } -- Treat this value as something undesirable that should be avoided; prematurely restart attempt if value matches
48
49	frameCount = 0 -- starting frameCounter value
50	maxFrames = 100 -- The mamximum number of frames to attempt random input before loading the savestate and trying again
51
52	attempts = 0 -- starting number of attempts value
53	maxAttempts = 100 -- The number of times to load a savestate and try random inputs again before giving up
54	promptMoreAttempts = true -- set to false to cause the "Try another x times?" message to not appear (useful with short attempt count runs)
55	showAttempts = true -- set to true to show number of attempts (not as CPU intensive as enabling debugText as it only updates when frameCount >= maxFrames)
56
57	playerInput = 1 -- Set to 1 to manipulate P1's input and set to 2 to manipulate P2's input; for whatever reason only one player's input is accepted per frame with joypad.set
58
59	p1Buttons = { "left", "down", "up", "right", "select", "start", "B", "A" } -- P1,
60	p2Buttons = { "left", "down", "up", "right", "select", "start", "B", "A" } -- p2 button map which defines the static button names to pass to joypad.set
61
62	p1ButtonMask = { "left", "down", "up", "right", ".", "start", ".", "A" } -- p1,
63	p2ButtonMask = { "left", "down", "up", "right", "select", "start", "B", "A" } -- p2 button mask which defines which buttons can be pressed; set to "." if you do not want a specific button to be used for random input
64
65	p1ButtonOverride = { ".", ".", ".", ".", ".", ".", ".", "." } -- p1,
66	p2ButtonOverride = { ".", ".", ".", ".", ".", ".", ".", "." } -- p2 button override which forces a specific button to be held down while other buttons are randomized; you;ll probably want to remove the corresponding button from the buttonmask
67
68	debugText = 0 -- Set to 1 for significantly more UI display; this may noticably slow down the emulation speed
69	movie.rerecordcounting(false) -- Avoids racking up the rerecord count; set to true to increment the rerecord count while using this script
70
71	-- Create empty tables for remaining variables
72	frameButtons = {}
73	buttonList = {}
74	matchFound = false
75
76	local startSave = savestate.create() -- Create a savestate object
77	savestate.save(startSave) -- Save the state of the game at the point where the script was run
78
79	while attempts < maxAttempts do
80	FCEU.speedmode("maximum") -- This can be changed to "normal" as needed
81	if debugText==1 then
82	gui.text(5,10, "Item search started")
83	end
84	savestate.load(startSave) -- load initial savestate
85	if showAttempts == true then
86	attemptsPrint = string.format("Attempt %s",attempts + 1) -- starts at attempt 0, so print one higher
87	gui.text(195,190,attemptsPrint);
88	end
89	math.randomseed( os.time() ) -- seed the randomizer with something fresh on every new attempt
90	for i = 1, maxFrames do
91	inp1 = {} -- Clears list of input every new frame
92	listpos = 1 -- this value ties all of the various tables together so things are always pointed to the same table position
93	for j,button1 in ipairs(p1Buttons) do
94	if button1 == p1ButtonOverride[listpos] then -- check to see if button should normally always be pressed
95	pressbutton1 = p1Buttons[listpos]
96	inp1[pressbutton1] = true
97	end
98	if button1 == p1ButtonMask[listpos] then -- find out if this button can be pressed; this can negate the buttonoverride table and proceed to randomize buttons anyway
99	randomizedButton1 = math.random(2) -- pick 1 or 2
100	if randomizedButton1 == 2 then -- add button press to P1's input list for this frame
101	pressbutton1 = p1Buttons[listpos]
102	inp1[pressbutton1] = true
103	end
104	end
105	listpos = listpos + 1
106	end
107	if debugText==1 then -- show all inputs for this frame
108	textRow = 110
109	gui.text(5,100,"p1 input");
110	for inpkey1, inpval1 in pairs(inp1) do
111	inpPrint1 = string.format("%s %s", inpkey1, tostring(inpval1))
112	gui.text(5,textRow,inpPrint1);
113	textRow = textRow + 10
114	end
115	end
116
117	-- player 2 input section; TODO: Break both P1 and P2 input out into a single function as this is a duplicate of P1's input section
118	inp2 = {}
119	listpos = 1
120	for k,button2 in ipairs(p2Buttons) do
121	if button2 == p2ButtonOverride[listpos] then -- check to see if button should normally always be pressed
122	pressbutton2 = p2Buttons[listpos]
123	inp2[pressbutton2] = true
124	end
125	if button2 == p2ButtonMask[listpos] then -- find out if this button can be pressed
126	randomizedButton2 = math.random(2) -- pick 1 or 2
127	if randomizedButton2 == 2 then -- add button press to P2's input list for this frame
128	pressbutton2 = p2Buttons[listpos]
129	inp2[pressbutton2] = true
130	end
131	end
132	listpos = listpos + 1
133	end
134	if debugText==1 then
135	textRow = 110
136	gui.text(200,100,"p2 input");
137	for inpkey2, inpval2 in pairs(inp2) do
138	inpPrint2 = string.format("%s %s", inpkey2, tostring(inpval2))
139	gui.text(200,textRow,inpPrint2);
140	textRow = textRow + 10
141	end
142	end
143
144	if playerInput == 1 then -- For some reason P1 and P2 can't be specified on the same frame, so this picks one... TODO: Investigate and file bug
145	joypad.set(1, inp1) -- insert player 1's input
146	else
147	joypad.set(2, inp2) -- insert player 2's input
148	end
149	FCEU.frameadvance()
150	frameCount = frameCount + 1
151	if debugText==1 then -- shows frameCount in realtime
152	frameCountPrint = string.format("Framecount = %s",frameCount)
153	gui.text(5,10,frameCountPrint);
154	end
155
156	watchMem = memory.readbyte(memoryToWatch) -- look to see if a memory value we are searching for has matched
157	avoidWatchMem = memory.readbyte(avoidMemoryToWatch) -- look to see if a memory value we are trying to avoid has matched
158	if debugText==1 then -- shows memory addresses in realtime
159	watchMemPrint = string.format("watchMem = %s",watchMem)
160	gui.text(180,10,watchMemPrint);
161	end
162	for l,avoidCheck in ipairs(avoidMem) do -- check for all undesirable memory address values
163	if avoidWatchMem == avoidCheck and avoidMemoryCheckEnabled == true then
164	avoidMatch = true -- Something undesirable happened - this is used below to trigger a break
165	else
166	for m,matchCheck in ipairs(targetMem) do -- check for all desirable memory address values
167	if matchFound == false and watchMem == matchCheck then
168	local foundSave = savestate.create(userSaveSlot) -- Saves in one higher slot than specified
169	savestate.save(foundSave)
170	matchFound = true
171	foundSolutionPrint = string.format("Match found in %s frames (value found = %s). Keep solution?", frameCount, watchMem)
172	response = gui.popup(foundSolutionPrint,"yesno") -- if answered Yes, the script exits so manual input can be resumed
173	if response == "yes" then
174	promptMoreAttempts = false
175	attempts = maxAttempts + 1 -- forces script exit
176	else -- if answered no, throw out the result and try again
177	savestate.load(startSave) -- load for another attempt
178	end
179	end
180	end
181	end
182	end
183	if attempts >= maxAttempts or avoidMatch == true then -- prevents an extra loop if a solution has been accepted or cancels the current loop if something undesirable happened
184	avoidMatch = false -- Reset for next iteration
185	break
186	end
187	end
188	frameCount = 0
189	attempts = attempts + 1
190	if promptMoreAttempts == true and attempts >= maxAttempts then
191	noSolutionPrint = string.format("No match found after %s attempts. Try another %s times?",maxAttempts, maxAttempts)
192	response = gui.popup(noSolutionPrint,"yesno") -- if answered Yes, reset attempts count and start over
193	if response == "yes" then
194	attempts = 1
195	end
196	end
197	end
198

Download and save
Toggle line numbers

Thread:

[97003] High Speed item finder by dwangoac at 2008-09-29 20:53:40 (diff)

[97004] Re: High Speed item finder by dwangoac at 2008-09-29 21:01:58 (diff)

[97648] Re: High Speed item finder by dwangoac at 2008-10-06 20:06:01 (diff)

[97912] Re: General purpose NES item finder by dwangoac at 2008-10-09 17:23:32 (diff)

[98417] Re: General purpose NES item finder by dwangoac at 2008-10-16 02:52:10

Tip: Click the line numbers to toggle highliting on that line.

Paste followup:

Language:
Author:
Subject:
Secure the url for this pastey.

-- Item finder luck manipulation / memory monitor script by dwangoac on 2008-10-09

--[[ General notes:  This was written to find item drops in High Speed; the initial button mask reflects this.  Most of the behavior of this script can be altered
by touching the variables  below and this should be easily adaptable to other games.  The script's default settings will find item drops in High Speed on the
main table.  I'm still new to Lua scripting so some things may still be sub-optimal but the script has been fairly well tested. There are many variables that are
seperated into p1 and p2 variable names when they really don't need to be.  TODO: break out a few things into functions.

How this script works and how to use it:

The script tries random input one frame at a time while monitoring the memory address specified by memoryToWatch until the current value matches a desired
value (or values) specified by targetMem.  An undesirable memory address value (or values) can be specified with the variable avoidMemoryToWatch and if a
match is found the attempt is considered unsuccessful and a new attempt is started immediately.
The script will try random input for the number of frames specified by maxFrames and will start over from the initial savestate if the desired result is not found.
The script will keep trying new combinations of random input for the number of attemps specified by maxAttempts; if no desirable solution is found, it will
prompt to determine if it should try again for the same number of attempts.  If a desirable solution is found, the script displays the number of frames required
and asks if the solution should be kept.  If answered yes, the script ends and saves the game state in the slot defined by the variable userSaveSlot.  If answered
no, the solution is considered unsuccessful and a new attempt is started immediately.

The buttons that can be randomized are highly configurable.  The pxButtonMask tables define which buttons can be randomly pressed, while the
pxButtonOverride tables specify buttons that should always be held down while the randomization is taking place.  This could be used for short segments
to ensure right is always pressed or the start button could be removed from the button mask to prevent the script from pausing the game, for instance.
It's possible to specify an override but also leave it in the buttonmask which reverses the logic and randomly releases the button instead (with the same net effect).

Other options:
- Currently, a bug in FCEUX prevents input from both player 1 and player 2 from being accepted on the same frame.  The playerInput value specifies which
player's input to randomize.
- Setting debugText to 1 displays a large amount of information on the screen but significantly increases the CPU load per frame and is therefore disabled
to allow finding solutions as fast as possible.
- Calling movie.rerecordcounting(false) should prevent the rerecord count from being increased by the script but the rerecord count may be bumped sometimes
anyway; I need to investigate this further to see if there's a bug.
- Each variable has specific usage notes listed below.

More information:
There is limited Lua scripting documentation available for FCEUX at this time so please feel free to post in the Lua Discussion thread under the FCE Ultra
forum at tasvideos.org/forum.  I'm on irc.freenode.net in #nesvideos as dwangoac and can answer questions on using the script.  Please do let me know if you
are able to put this script to good use.  Thanks!  ]]

userSaveSlot = 10 -- Optional user save slot to save to; make this one higher than the slot number you want or set to nil to not use a slot

memoryToWatch = 0x064F -- The memory address to watch (only one address is monitored, but a for loop could be added to monitor more locations)
targetMem = { 64 }  -- A list of desirable values we're looking for at the address specified by memoryToWatch

avoidMemoryCheckEnabled = true -- Set to false to disable undesirable match testing (see comments below)
avoidMemoryToWatch = 0x064F -- Watch this memory address for changes as well  but...
avoidMem = { 66 } -- Treat this value as something undesirable that should be avoided; prematurely restart attempt if value matches

frameCount = 0 -- starting frameCounter value
maxFrames = 100 -- The mamximum number of frames to attempt random input before loading the savestate and trying again

attempts = 0 -- starting number of attempts value
maxAttempts = 100 -- The number of times to load a savestate and try random inputs again before giving up
promptMoreAttempts = true -- set to false to cause the "Try another x times?" message to not appear (useful with short attempt count runs)
showAttempts = true -- set to true to show number of attempts (not as CPU intensive as enabling debugText as it only updates when frameCount >= maxFrames)

playerInput = 1 -- Set to 1 to manipulate P1's input and set to 2 to manipulate P2's input; for whatever reason only one player's input is accepted per frame with joypad.set

p1Buttons = { "left", "down", "up", "right", "select", "start", "B", "A" } -- P1,
p2Buttons = { "left", "down", "up", "right", "select", "start", "B", "A" } -- p2 button map which defines the static button names to pass to joypad.set

p1ButtonMask = { "left", "down", "up", "right", ".", "start", ".", "A" } -- p1,
p2ButtonMask = { "left", "down", "up", "right", "select", "start", "B", "A" } -- p2 button mask which defines which buttons can be pressed; set to "." if you do not want a specific button to be used for random input

p1ButtonOverride = { ".", ".", ".", ".", ".", ".", ".", "." } -- p1,
p2ButtonOverride = { ".", ".", ".", ".", ".", ".", ".", "." } -- p2 button override which forces a specific button to be held down while other buttons are randomized; you;ll probably want to remove the corresponding button from the buttonmask

debugText = 0 -- Set to 1 for significantly more UI display; this may noticably slow down the emulation speed
movie.rerecordcounting(false) --  Avoids racking up the rerecord count; set to true to increment the rerecord count while using this script

-- Create empty tables for remaining variables
frameButtons = {}
buttonList = {}
matchFound =  false

local startSave = savestate.create() -- Create a savestate object
savestate.save(startSave) -- Save the state of the game at the point where the script was run

while attempts < maxAttempts do
	FCEU.speedmode("maximum") -- This can be changed to "normal" as needed
	if debugText==1 then
		gui.text(5,10, "Item search started")
	end
	savestate.load(startSave) -- load initial savestate
	if showAttempts == true then
		attemptsPrint = string.format("Attempt %s",attempts + 1) -- starts at attempt 0, so print one higher
		gui.text(195,190,attemptsPrint);
	end
	math.randomseed( os.time() ) -- seed the randomizer with something fresh on every new attempt
	for i = 1, maxFrames do
		inp1 = {} -- Clears list of input every new frame
		listpos = 1 -- this value ties all of the various tables together so things are always pointed to the same table position
		for j,button1 in ipairs(p1Buttons) do
			if  button1 == p1ButtonOverride[listpos] then -- check to see if button should normally always be pressed
				pressbutton1 = p1Buttons[listpos]
				inp1[pressbutton1] = true
			end
			if button1 == p1ButtonMask[listpos] then -- find out if this button can be pressed;  this can negate the buttonoverride table and proceed to randomize buttons anyway
				randomizedButton1 = math.random(2) -- pick 1 or 2
				if randomizedButton1 == 2 then -- add button press to P1's input list for this frame
					pressbutton1 = p1Buttons[listpos]
					inp1[pressbutton1] = true
				end
			end
		listpos = listpos + 1
		end
		if debugText==1 then -- show all inputs for this frame
			textRow = 110
			gui.text(5,100,"p1 input");
			for inpkey1, inpval1 in pairs(inp1) do
				inpPrint1 = string.format("%s %s", inpkey1, tostring(inpval1))
				gui.text(5,textRow,inpPrint1);
				textRow = textRow + 10
			end
		end
	
		-- player 2 input section; TODO: Break both P1 and P2 input out into a single function as this is a duplicate of P1's input section
		inp2 = {}
		listpos = 1
		for k,button2 in ipairs(p2Buttons) do
			if  button2 == p2ButtonOverride[listpos] then -- check to see if button should normally always be pressed
				pressbutton2 = p2Buttons[listpos]
				inp2[pressbutton2] = true
			end
			if button2 == p2ButtonMask[listpos] then -- find out if this button can be pressed
				randomizedButton2 = math.random(2) -- pick 1 or 2
				if randomizedButton2 == 2 then -- add button press to P2's input list for this frame
					pressbutton2 = p2Buttons[listpos]
					inp2[pressbutton2] = true
				end
			end
		listpos = listpos + 1
		end
		if debugText==1 then
			textRow = 110
			gui.text(200,100,"p2 input");
			for inpkey2, inpval2 in pairs(inp2) do
				inpPrint2 = string.format("%s %s", inpkey2, tostring(inpval2))
				gui.text(200,textRow,inpPrint2);
				textRow = textRow + 10
			end
		end

if playerInput == 1 then -- For some reason P1 and P2 can't be specified on the same frame, so this picks one...  TODO: Investigate and file  bug
			joypad.set(1, inp1) -- insert player 1's input
		else
			joypad.set(2, inp2) -- insert player 2's input
		end
		FCEU.frameadvance()	
		frameCount = frameCount + 1
		if debugText==1 then -- shows frameCount in realtime
			frameCountPrint = string.format("Framecount = %s",frameCount)
			gui.text(5,10,frameCountPrint);
		end
		
		watchMem = memory.readbyte(memoryToWatch) -- look to see if a memory value we are searching for has matched
		avoidWatchMem = memory.readbyte(avoidMemoryToWatch) -- look to see if a memory value we are trying to avoid has matched
		if debugText==1 then -- shows memory addresses in realtime
			watchMemPrint = string.format("watchMem = %s",watchMem)
			gui.text(180,10,watchMemPrint);
		end
		for l,avoidCheck in ipairs(avoidMem) do -- check for all undesirable memory  address values
			if avoidWatchMem == avoidCheck and avoidMemoryCheckEnabled == true then
				avoidMatch = true -- Something undesirable happened - this is used  below to trigger a  break
			else
				for m,matchCheck in ipairs(targetMem) do -- check for all desirable memory  address values
					if matchFound == false and watchMem == matchCheck then
						local foundSave = savestate.create(userSaveSlot) -- Saves in one higher slot than specified
						savestate.save(foundSave)
						matchFound = true
						foundSolutionPrint = string.format("Match found in %s frames (value found = %s). Keep solution?", frameCount, watchMem)
						response = gui.popup(foundSolutionPrint,"yesno") -- if answered  Yes, the script exits so manual input can  be resumed
						if response == "yes" then
							promptMoreAttempts = false
							attempts = maxAttempts + 1 --  forces  script exit					
						else -- if answered no, throw  out the result and try again
							savestate.load(startSave) -- load for  another attempt
						end
					end
				end
			end
		end
		if attempts >= maxAttempts or avoidMatch == true then -- prevents an extra loop if a solution has been accepted or cancels the current loop if something undesirable happened
			avoidMatch = false -- Reset for  next iteration
			break
		end
	end
	frameCount = 0
	attempts = attempts + 1
	if promptMoreAttempts == true and attempts >= maxAttempts then
		noSolutionPrint = string.format("No match found after %s attempts.  Try another %s times?",maxAttempts, maxAttempts)
		response = gui.popup(noSolutionPrint,"yesno") -- if answered  Yes, reset attempts count and  start over
		if response == "yes" then
			attempts = 1
		end
	end
end

Tabstop: bigger biggest

Note: You can prefix a line with "@@@" to highlight it.