Pastey.net - lua paste bin

Language:

Lua Change language:

Pastebin:

93187

Author:

Dammit

Subject:

FCEU emulator info display for Snake's Revenge game

Created:

2008-08-06 02:17:09

Download and save
Toggle line numbers

1	--lua script for fceu 0.98-28 (and later)
2	--purpose: display enemy HP, bomb timers, and hostage count for Snake's Revenge NES game
3	--written by Dammit 7/24/2008; last edited 8/4/2008
4
5	ynudge = 24
6	xnudge = 8
7	gui.transparency(1)
8
9	while true do
10
11	-- define hostage properties
12	rescues = memory.readbyte(0x6e)
13	hostage = memory.readbyte(0x438)
14
15	-- define bomb properties
16	sidescrl = memory.readbyte(0x40)
17	bomblaid = memory.readbyte(0x42d)
18	bombxpos = memory.readbyte(0x485)
19	bombypos = memory.readbyte(0x46f)
20	bombtime = memory.readbyte(0x574)
21
22	-- define the enemy coordinates
23	e1ypos = memory.readbyte(0x47a)
24	e2ypos = memory.readbyte(0x47b)
25	e3ypos = memory.readbyte(0x47c)
26	e4ypos = memory.readbyte(0x47d)
27	e5ypos = memory.readbyte(0x47e)
28
29	e1xpos = memory.readbyte(0x490)
30	e2xpos = memory.readbyte(0x491)
31	e3xpos = memory.readbyte(0x492)
32	e4xpos = memory.readbyte(0x493)
33	e5xpos = memory.readbyte(0x494)
34
35	-- offset the drawn text, but only if it will stay in bounds
36	if e1ypos>=ynudge then e1ypos = e1ypos-ynudge end
37	if e2ypos>=ynudge then e2ypos = e2ypos-ynudge end
38	if e3ypos>=ynudge then e3ypos = e3ypos-ynudge end
39	if e4ypos>=ynudge then e4ypos = e4ypos-ynudge end
40	if e5ypos>=ynudge then e5ypos = e5ypos-ynudge end
41
42	if e1xpos>=xnudge then e1xpos = e1xpos-xnudge end
43	if e2xpos>=xnudge then e2xpos = e2xpos-xnudge end
44	if e3xpos>=xnudge then e3xpos = e3xpos-xnudge end
45	if e4xpos>=xnudge then e4xpos = e4xpos-xnudge end
46	if e5xpos>=xnudge then e5xpos = e5xpos-xnudge end
47
48	-- define enemy HP
49	e1hp = memory.readbyte(0x5cd)
50	e2hp = memory.readbyte(0x5ce)
51	e3hp = memory.readbyte(0x5cf)
52	e4hp = memory.readbyte(0x5d0)
53	e5hp = memory.readbyte(0x5d1)
54
55	-- checks if the enemy is alive
56	e1alive = memory.readbyte(0x40c)
57	e2alive = memory.readbyte(0x40d)
58	e3alive = memory.readbyte(0x40e)
59	e4alive = memory.readbyte(0x40f)
60	e5alive = memory.readbyte(0x410)
61
62	nocontrol = memory.readbyte(0x36)
63
64	local function drawdata()
65
66	--for some reason, at least one thing (like this pixel) must be drawn every frame
67	gui.drawpixel(0,0,"black")
68
69	-- draw HP only during the action
70	if nocontrol==0 then
71
72	if hostage==204 or hostage==222 then
73	gui.text(e1xpos-24,e1ypos,"HOSTAGES:")
74	gui.text(e1xpos+22,e1ypos,rescues)
75	end
76
77	-- draw bomb time only if there's a bomb
78	if sidescrl==0 and bomblaid==14 then gui.text(bombxpos,bombypos,bombtime) end
79	if sidescrl==2 and bomblaid==8 then gui.text(bombxpos,bombypos,bombtime) end
80
81	-- draw HP only if the enemy is alive
82	if e1alive~=0 and e1hp>0 then gui.text(e1xpos,e1ypos,e1hp) end
83	if e2alive~=0 and e2hp>0 then gui.text(e2xpos,e2ypos,e2hp) end
84	if e3alive~=0 and e3hp>0 then gui.text(e3xpos,e3ypos,e3hp) end
85	if e4alive~=0 and e4hp>0 then gui.text(e4xpos,e4ypos,e4hp) end
86	if e5alive~=0 and e5hp>0 then gui.text(e5xpos,e5ypos,e5hp) end
87
88	end
89
90	end
91
92	gui.register(drawdata)
93	FCEU.frameadvance()
94	end

Download and save
Toggle line numbers

Thread:

[93187] FCEU emulator info display for Snake's Revenge game by Dammit at 2008-08-06 02:17:09

[94480] Re: FCEU emulator info display for Snake's Revenge game by Dammit at 2008-08-22 20:06:16 (diff)

[94686] Re: FCEU emulator info display for Snake's Revenge game by Dammit at 2008-08-25 18:08:31 (diff)

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

Paste followup:

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

--lua script for fceu 0.98-28 (and later)
--purpose: display enemy HP, bomb timers, and hostage count for Snake's Revenge NES game
--written by Dammit 7/24/2008; last edited 8/4/2008

ynudge = 24
xnudge = 8
gui.transparency(1)

while true do

-- define hostage properties
rescues = memory.readbyte(0x6e)
hostage = memory.readbyte(0x438)

-- define bomb properties
sidescrl = memory.readbyte(0x40)
bomblaid = memory.readbyte(0x42d)
bombxpos = memory.readbyte(0x485)
bombypos = memory.readbyte(0x46f)
bombtime = memory.readbyte(0x574)

-- define the enemy coordinates
e1ypos = memory.readbyte(0x47a)
e2ypos = memory.readbyte(0x47b)
e3ypos = memory.readbyte(0x47c)
e4ypos = memory.readbyte(0x47d)
e5ypos = memory.readbyte(0x47e)

e1xpos = memory.readbyte(0x490)
e2xpos = memory.readbyte(0x491)
e3xpos = memory.readbyte(0x492)
e4xpos = memory.readbyte(0x493)
e5xpos = memory.readbyte(0x494)

-- offset the drawn text, but only if it will stay in bounds
if e1ypos>=ynudge then e1ypos = e1ypos-ynudge end
if e2ypos>=ynudge then e2ypos = e2ypos-ynudge end
if e3ypos>=ynudge then e3ypos = e3ypos-ynudge end
if e4ypos>=ynudge then e4ypos = e4ypos-ynudge end
if e5ypos>=ynudge then e5ypos = e5ypos-ynudge end

if e1xpos>=xnudge then e1xpos = e1xpos-xnudge end
if e2xpos>=xnudge then e2xpos = e2xpos-xnudge end
if e3xpos>=xnudge then e3xpos = e3xpos-xnudge end
if e4xpos>=xnudge then e4xpos = e4xpos-xnudge end
if e5xpos>=xnudge then e5xpos = e5xpos-xnudge end

-- define enemy HP
e1hp = memory.readbyte(0x5cd)
e2hp = memory.readbyte(0x5ce)
e3hp = memory.readbyte(0x5cf)
e4hp = memory.readbyte(0x5d0)
e5hp = memory.readbyte(0x5d1)

-- checks if the enemy is alive
e1alive = memory.readbyte(0x40c)
e2alive = memory.readbyte(0x40d)
e3alive = memory.readbyte(0x40e)
e4alive = memory.readbyte(0x40f)
e5alive = memory.readbyte(0x410)

nocontrol = memory.readbyte(0x36)

local function drawdata()

--for some reason, at least one thing (like this pixel) must be drawn every frame
gui.drawpixel(0,0,"black")

-- draw HP only during the action
if nocontrol==0 then

if hostage==204 or hostage==222 then
gui.text(e1xpos-24,e1ypos,"HOSTAGES:")
gui.text(e1xpos+22,e1ypos,rescues)
end

-- draw bomb time only if there's a bomb
if sidescrl==0 and bomblaid==14 then gui.text(bombxpos,bombypos,bombtime) end
if sidescrl==2 and bomblaid==8 then gui.text(bombxpos,bombypos,bombtime) end

-- draw HP only if the enemy is alive
if e1alive~=0 and e1hp>0 then gui.text(e1xpos,e1ypos,e1hp) end
if e2alive~=0 and e2hp>0 then gui.text(e2xpos,e2ypos,e2hp) end
if e3alive~=0 and e3hp>0 then gui.text(e3xpos,e3ypos,e3hp) end
if e4alive~=0 and e4hp>0 then gui.text(e4xpos,e4ypos,e4hp) end
if e5alive~=0 and e5hp>0 then gui.text(e5xpos,e5ypos,e5hp) end

end

gui.register(drawdata)
   FCEU.frameadvance()
end

Tabstop: bigger biggest

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