10/06/20 17:02:17 LXkVW4kj
>>889
基本部はこんな感じ
Rem TPS CAMERA : set camera to follow
autocam off
make matrix 1,4000,4000,100,100
set matrix height 1,50,50,500
update matrix 1
make object box 1, 10,20,30
sync on : sync rate 60
while mouseclick()<>1
if upkey()=1 then move object 1,4
if downkey()=1 then move object 1,-4
if leftkey()=1 then ya#=ya#-2
if rightkey()=1 then ya#=ya#+2
if shiftkey()=1 then an#=an#+1
if controlkey()=1 then an#=an#-1
rotate object 1, 0,ya#,0
x#=object position x(1)
y#=object position y(1)
z#=object position z(1)
angle#=object angle y(1)+an#
distance#=200.0
height#=100.0
smooth#=12.0
set camera to follow x#,y#,z#,angle#,distance#,height#,smooth#,0
sync
endwhile
end