Bubble Universe Demo

Author Message
JohnS
Guru

Joined: 18/11/2011
Location: United Kingdom
Posts: 4298
Posted: 08:31am 16 Nov 2022      

  Goksteroo said  Add this little bit of code to the above between the lines in bold:

t=t+.025
select case k
 ...
end select
page copy 1 to 0,B

... to add zoom with [A] and [Z] and move display with the arrow keys.

note: no error checking!!

Looks like k is never set. INKEY or some such?

John