frog game lua

local AddrXWrap     = 0x0642;
local AddrXScreen   = 0x0658;
local AddrXSub      = 0x062C;
local AddrXSpd      = 0x06C6;
local AddrXSpdSub   = 0x06B0;
local AddrY         = 0x0684;
local AddrYSub      = 0x066E;
local AddrYSpd      = 0x06F2;
local AddrYSpdSub   = 0x06DC;

PrevX = 0
XDiff = 0
XSubDiff = 0

gui.defaultPixelFont("fceux")

while true do
    emu.frameadvance();
    --Position
    XWrap=memory.readbyte(AddrXWrap);
    XScreen=memory.readbyte(AddrXScreen);
    X=XScreen*256+XWrap;
    X=string.format("%04u",X);

    XSub=memory.readbyte(AddrXSub);

    XDiff = (X + (XSub/256)) - PrevX;
    PrevX = (X + (XSub/256));

    XSub=string.format("%03u",XSub/256*1000);

    if XWrap>=0x20 and XWrap<0x80 then
        BoostColor="green";
    else
        BoostColor="red";
    end;

    Y=memory.readbyte(AddrY);
    Y=string.format("%03u",Y);
    YSub=memory.readbyte(AddrYSub);
    YSub=string.format("%03u",YSub/256*1000);
    XWrap=string.format("%02x",XWrap);
    gui.pixelText(1,9,X.."."..XSub,"white",0);
    gui.pixelText(60,9,Y.."."..YSub,"white",0);
    gui.pixelText(1,33,XWrap,BoostColor,0);

    --Speed
    XSpd=memory.read_s8(AddrXSpd);
    if XSpd>=0 then
        XSpdTextX=19;
    else
        XSpdTextX=14;
    end;
    XSpdSub=memory.readbyte(AddrXSpdSub);
    if XSpd<0 then
        XSpdSub=256-XSpdSub;
        if XSpdSub~=0 then
            XSpd=XSpd+1;
        end;
        if XSpd==0 then
            XSpd="-"..YSpd;
        end;
    end;
    XSpdSub=string.format("%03u",XSpdSub/256*1000);
    if XSpd==0 then
        XSpdColor="red"
    else
        XSpdColor="white"
    end;

    YSpd=memory.read_s8(AddrYSpd);
    if YSpd>=0 then
        YSpdTextX=62;
    else
        YSpdTextX=57;
    end;
    YSpdSub=memory.readbyte(AddrYSpdSub);
    if YSpd<0 then
        YSpdSub=256-YSpdSub;
        if YSpdSub~=0 then
            YSpd=YSpd+1;
        end;
        if YSpd==0 then
            YSpd="-"..YSpd;
        end;
    end;
    YSpdSub=string.format("%03u",YSpdSub/256*1000);
    gui.pixelText(XSpdTextX,17,XSpd.."."..XSpdSub,XSpdColor,0);
    gui.pixelText(YSpdTextX,17,YSpd.."."..YSpdSub,"white",0);

    gui.pixelText(XSpdTextX+1,26,string.format("%.3f",XDiff),"black",0);
    gui.pixelText(XSpdTextX,25,string.format("%.3f",XDiff),XSpdColor,0);

end