aUCBLogo Demos and Tests / scrolltest
to
scrolltest
cs
(
rbox
300
)
pu setpos
[-
400
-
300
]
pd
repeat
300
[
scroll
[
800 600
][
2 2
]
]
end
to scrolltest