while true do

        a = memory.readdwordsigned(0x030027e8)/256
        gui.text(170,30,"Y-Speed:  "..a)

        b = memory.readdwordsigned(0x030027e4)/256
        gui.text(170,22,"X-Speed:  "..b)

        c = memory.readwordsigned(0x030004f6)
        gui.text(170,12,"Y-Posit:  "..c)

        d = memory.readwordsigned(0x030004f4)
        gui.text(170,4,"X-Posit:  "..d)

        vba.frameadvance()
end