SMBX Equipo Estelar Foro

Código: Seleccionar todo

do
if char(1).status = 12 or char(1).status = 8 then
v(AquaForm) = 1
else
v(AquaForm) = 0
end if 
if v(AquaForm) = 1 and not keypress(-11) and not keypress(-12) and not keypress(-13) and not keypress(-14) and char(1).inwater = 1 then
char(1).xsp = 0
char(1).ysp = 0
end if
if v(AquaForm) = 1 and char(1).inwater = 1 and char(1).facing = 0 and keypress(-11) and char(1).stand = 0 then
char(1).xsp = 3.8
end if
if v(AquaForm) = 1 and char(1).inwater = 1 and char(1).facing = 1 and keypress(-12) and char(1).stand = 0 then
char(1).xsp = - 3.8
end if
if v(AquaForm) = 1 and char(1).inwater = 1  and keypress(-14) then
char(1).ysp = - 3.8
char(1).xsp = 0
end if
if v(AquaForm) = 1 and char(1).inwater = 1  and keypress(-13) then
char(1).ysp =  3.8
char(1).xsp = 0
end if
call sleep(1)
loop