Bouncing ball screensaver


1->A~D
While 1
ClrText
Locate A,B,”O”
A=1=>1->C
A=21=>-1->C
B=1=>1->D
B=7=>-1->D
A+C->A
B+D->B
WhileEnd


To home page

To the top