Code I made when I was bored

[Floofyboy]

This code generates random coordinates and a random number from 1 to 9 then pastes it in a random location on the home screen, eventually filling almost the entire thing. The only way to stop is to hit ON. This only works on a TI-83+ or with a calculator that has the same screen size.

Code: Select all

PROGRAM: EYYYY
:ClrHome
:While 1
:randInt(1,8)->A
:randInt(1,16)->B
:randInt(1,9)->C
:Output(A,B,C)
:End

[Sumde]

Nice! It would be nice for the program to detect placements that have not been taken, and place them only in the untaken spots but ehh, it's basic after all.

[NovemberXmas]

Ah lovely, I hope you had fun coding!

[Sumde]

To add to this, I also made a CE version (with colour, and assuming zoom is standard).

Code: Select all

:ClrDraw
:While 1
:randInt(0,9)->A
:randInt(1,31)->B
:randInt(1,9)->C
:randInt(10,24)->D
:TextColor(D)
:Text(A*16,B*8,C)
:End