spd = 1
skd = {{0, 0}, {1, 2}, {2, 4}}
Aon = 0

--*****************************************************************************
while true do
--*****************************************************************************
gui.text(1,1,"x")--�����p


if (memory.readbyte(0x0020) > 127) then
else

gui.text(210,220,"speed x"..spd - 1)


if (AND(memory.readbyte(0x0018), 4) == 4) then
  Aon = 1
end
if (AND(memory.readbyte(0x0018), 4) == 0 and Aon == 1) then
  Aon = 0
  spd = spd + 1
  if (spd > 3) then
    spd = 1
  end
end

if (AND(memory.readbyte(0x0018), 128) == 128) then
	memory.writebyte(0x006c, memory.readbyte(0x006c) + skd[spd][1])
end
if (AND(memory.readbyte(0x0018), 64) == 64) then
	memory.writebyte(0x006c, memory.readbyte(0x006c) - skd[spd][1])
end
if (AND(memory.readbyte(0x0018), 32) == 32) then
	memory.writebyte(0x006d, memory.readbyte(0x006d) + skd[spd][2])
end
if (AND(memory.readbyte(0x0018), 16) == 16) then
	memory.writebyte(0x006d, memory.readbyte(0x006d) - skd[spd][2])
end


if (memory.readbyte(0x006c) > 241) then
	memory.writebyte(0x006c, 241)
end
if (memory.readbyte(0x006c) < 14) then
	memory.writebyte(0x006c, 14)
end

if (memory.readbyte(0x006d) > 220) then
	memory.writebyte(0x006d, 220)
end
if (memory.readbyte(0x006d) < 46) then
	memory.writebyte(0x006d, 46)
end
end


    FCEU.frameadvance()


end