notwa/mm
1
0
Fork 0
mirror of https://github.com/notwa/mm synced 2024-11-05 01:29:03 -08:00
Code Issues Releases Wiki Activity

more boilerplate

Browse source
This commit is contained in:
Connor Olding 2015-03-26 07:27:36 -07:00
parent c772b03fdf
commit 9a57ee1975
1 changed files with 28 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
Lua/boilerplate.lua
View file

@ -2,6 +2,8 @@
-- TODO: respect little endian consoles too -- TODO: respect little endian consoles too
local mm = mainmemory local mm = mainmemory
local m = memory
m.usememorydomain("ROM")
R1 = mm.readbyte R1 = mm.readbyte
R2 = mm.read_u16_be R2 = mm.read_u16_be
@ -15,6 +17,12 @@ W3 = mm.write_u24_be
W4 = mm.write_u32_be W4 = mm.write_u32_be
WF = function(addr, value) mm.writefloat(addr, value, true) end WF = function(addr, value) mm.writefloat(addr, value, true) end
X1 = m.readbyte
X2 = m.read_u16_be
X3 = m.read_u24_be
X4 = m.read_u32_be
XF = function(addr) return m.readfloat(addr, true) end
local readers = { local readers = {
[1] = R1, [1] = R1,
[2] = R2, [2] = R2,
@ -46,6 +54,26 @@ function A(addr, atype)
}, mt) }, mt)
end end
function printf(fmt, ...)
print(fmt:format(...))
end
function asciize(bytes)
local str = ""
local seq = false
for i, v in ipairs(bytes) do
local c = type(v) == 'number' and v or tonumber(v, 16)
if c == 9 or c == 10 or c == 13 or (c >= 32 and c < 127) then
str = str..string.char(c)
seq = false
elseif seq == false then
str = str..' '
seq = true
end
end
return str
end
--[[ --[[
-- now we can just write: -- now we can just write:
handle = A(0x123456, 1) handle = A(0x123456, 1)