DKC General lua script

while true do

-- X and Y Speeds

  Vehicle1 = memory.readbyte(0x7E08B0)
  Vehicle2 = memory.readbyte(0x7E091E)
  Tobog = memory.readbyte(0x7E0931)
  CID = memory.readbyte(0x7E05B3)
  Dx = memory.readwordsigned(0x7E08A2)
  Dy = memory.readwordsigned(0x7E08A6)
  Kx = memory.readwordsigned(0x7E0910)
  Ky = memory.readwordsigned(0x7E0914)
  Tx1 = memory.readwordsigned(0x7E0A60)
  Ty1 = memory.readwordsigned(0x7E0A5E)
  Tx2 = memory.readwordsigned(0x7E09EC)
  Ty2 = memory.readwordsigned(0x7E09F0)
  Vx = memory.readwordsigned(0x7E0C80)
  Vy = memory.readwordsigned(0x7E0C84)

  if Tobog == 0x07 then
    if Tx1 < 200 then
      gui.text(10,43, "Toboggan")
      gui.text(10,55, "X spd: " .. Tx2)
      gui.text(10,65, "Y spd: " .. Ty2)
    else
      gui.text(10,43, "Toboggan")
      gui.text(10,55, "X spd: " .. Tx1)
      gui.text(10,65, "Y spd: " .. Ty1)
    end
  else
    if CID == 1 then
      if Vehicle1 == 0x09 then
        gui.text(10,43, "Vehicle")
        gui.text(10,55, "X spd: " .. Vx)
        gui.text(10,65, "Y spd: " .. Vy)
      else
        gui.text(10,43, "Dixie")
        gui.text(10,55, "X spd: " .. Dx)
        if Dy == 768 then
          gui.text(10,65, "Y spd: 0")
        elseif Dy == 880 then
          gui.text(10,65, "Y spd: 0")
        else
          gui.text(10,65, "Y spd: " .. Dy)
        end
      end
    end
    if CID == 2 then
      if Vehicle2 == 0x09 then
        gui.text(10,43, "Vehicle")
        gui.text(10,55, "X spd: " .. Vx)
        gui.text(10,65, "Y spd: " .. Vy)
      else
        gui.text(10,43, "Kiddie")
        gui.text(10,55, "X spd: " .. Kx)
        if Ky == 768 then
          gui.text(10,65, "Y spd: 0")
        elseif Ky == 880 then
          gui.text(10,65, "Y spd: 0")
        else
          gui.text(10,65, "Y spd: " .. Ky)
        end
      end
    end
  end


-- Team Throw OK?

  TT = memory.readbyte(0x7E08B0)

  if CID == 2 then
    if TT == 62 then
      gui.text(10,75, "Throw?")
      gui.text(38,75, "NO", "red")
    elseif TT == 64 then
      gui.text(10,75, "Throw?")
      gui.text(38,75, "OK", "green")
    end
  end

  emu.frameadvance()
end