There were 2 errors.
if downkey()=1 then p1mvu=1
should have been
if downkey()=1 then p1mvd=1
and this ...
position object 1,x#,y#,z#
position object 1,x2#,y2#,z2#
should have been this
position object 1,x#,y#,z#
position object 2,x2#,y2#,z2#
Full new code is
Rem Project: pong
Rem Created: 2005-03-04 22:28:44
Rem ***** Main Source File *****
rem settings
sync on
sync rate 70
rem make lights
make camera 1 : position camera 1,0,0,-50 : color backdrop 1,RGB(0,0,0)
rem make level
load object "media\models\test.3ds",4 : position object 4,0,25,0 : color object 4,RGB(0,0,255) : scale object 4,20,20,20 : rotate object 4,0,90,0
load object "media\models\test.3ds",5 : position object 5,0,-25,0 : color object 5,RGB(0,0,255) : scale object 5,20,20,20 : rotate object 5,180,90,0
rem load players
load object "media\models\hover.3ds",1 : color object 1,RGB(0,0,255) : position object 1,-32,0,0 : scale object 1,20,20,20 : rotate object 1,160,0,90
load object "media\models\hover.3ds",2 : color object 2,RGB(0,0,255) : position object 2,32,0,0 : scale object 2,20,20,20 : rotate object 2,340,180,90
rem variabels
inc p1mvu
inc p1mvd
inc p2mvu
inc p2mvd
do
p1mvu=0
p1mvd=0
p2mvu=0
p2mvd=0
if upkey()=1 then p1mvu=1
if downkey()=1 then p1mvd=1
if keystate(17)=1 then p2mvu=1
if keystate(31)=1 then p2mvd=1
x#=object position x(1)
y#=object position y(1)
z#=object position z(1)
x2#=object position x(2)
y2#=object position y(2)
z2#=object position z(2)
if p1mvu=1
y#=y#+0.5
endif
if p1mvd=1
y#=y#-0.5
endif
if p2mvu=1
y2#=y2#+0.5
endif
if p2mvd=1
y2#=y2#-0.5
endif
position object 1,x#,y#,z#
position object 2,x2#,y2#,z2#
sync
loop
return
And why is that return at the bottom of the code?