Advertisement
lilggamegenuis

Display Sound Chip info

Dec 7th, 2015
149
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.44 KB | None | 0 0
  1. local rectSize = 10
  2. local size = 0.6
  3. local screenSize = 320
  4.  
  5.  
  6. while true do
  7.     local Length = {memory.readbyte(0xFCAC), memory.readbyte(0xFCD8), memory.readbyte(0xFD04), memory.readbyte(0xFD30), memory.readbyte(0xFD5C), memory.readbyte(0xFC80), memory.readbyte(0xFDB4), memory.readbyte(0xFDE0), memory.readbyte(0xFE0C)}
  8.    
  9.     local SetLength = {memory.readbyte(0xFCAD), memory.readbyte(0xFCD9), memory.readbyte(0xFD05), memory.readbyte(0xFD31), memory.readbyte(0xFD5D), memory.readbyte(0xFC81), memory.readbyte(0xFDB5), memory.readbyte(0xFDE1), memory.readbyte(0xFE0D)}
  10.    
  11.     local Pitch = {memory.readbyte(0xFCAE), memory.readbyte(0xFCDA), memory.readbyte(0xFD06)*size, memory.readbyte(0xFD32), memory.readbyte(0xFD5E), (memory.readbyte(0xFC82)-0x80), memory.readbyte(0xFDB7), memory.readbyte(0xFDE3), memory.readbyte(0xFE0F)}
  12.  
  13.     i = 0
  14.     repeat
  15.         gui.drawRectangle(0, rectSize*i, Length[i+1]*size, rectSize)
  16.        
  17.         gui.drawRectangle(0, rectSize*i, SetLength[1+i]*size, rectSize)
  18.        
  19.         gui.drawRectangle(screenSize - (Pitch[i+1]*size), rectSize * i,     Pitch[i+1], rectSize)
  20.         i = i+1
  21.     until i==6
  22.    
  23.     gui.text(Pitch[i], rectSize * i, bizstring.hex(Pitch[i]+0x80), rectSize)
  24.    
  25.     i = 7
  26.     repeat
  27.         gui.drawRectangle(0, rectSize*i, Length[i]*size, rectSize)
  28.        
  29.         gui.drawRectangle(0, rectSize*i, SetLength[i]*size, rectSize)
  30.        
  31.         gui.drawRectangle(screenSize - (Pitch[i]*size), rectSize * i,   Pitch[i]*size, rectSize)
  32.         i = i+1
  33.     until i==10
  34.     emu.frameadvance()
  35. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement