spset 0:x=10:xv=1 @loop if x>=400 then xv=-1 if x<=0 then xv=1 x=x+vx spofs 0,x,100 vsync goto @loop まあ、一応ね(´ρ`)