1k bouncing ball
Posted: Sat Jan 05, 2019 11:59 am
Here's a 1k bouncing ball demo using some useful memory saving techniques.
In direct mode, enter
Regards,
Shaun.
Code: Select all
2 SAVE "B"
3 CLS
4 PLOT X,Y
5 LET X=X+A
6 LET Y=Y+B
7 IF Y>=CODE "F" OR NOT Y THEN LET B=-B
8 IF X>=CODE "Z" OR NOT X THEN LET A=-A
9 GOTO PI
Code: Select all
LET X=NOT PI
LET Y=X
LET A=NOT X
LET B=NOT Y
GOTO 2
Shaun.