Post by Deleted on Apr 10, 2017 0:54:57 GMT -6
Use the arrow keys to move the object beyond the screen limits to make it re-appear on the opposite side of the screen. ESC to exit.
There is probably a more efficient way of coding this but no one can accuse me of being efficient... lol
Hope this helps.
J
'
' Wrap-around-demo
'
WindowOpen(0,"Wrap Around Demo",0,0,640,480,0)
CanvasOpen(0,640,480,0,0,640,480,0)
hidemouse()
blue = rgb(0,0,255)
ballx = 300
bally = 220
setColor(blue)
while key(k_escape) = 0
ClearCanvas()
if key(k_left) then
ballx = ballx - 5
if ballx < -40 then
ballx = 640
end if
end if
if key(k_right) then
ballx = ballx + 5
if ballx > 640 then
ballx = -40
end if
end if
if key(k_up) then
bally = bally - 5
if bally < -40 then
bally = 480
end if
end if
if key(k_down) then
bally = bally + 5
if bally > 480 then
bally = -40
end if
end if
circleFill(ballx,bally,20)
update()
wait(10)
wendThere is probably a more efficient way of coding this but no one can accuse me of being efficient... lol
Hope this helps.
J
