I've been programming on my dad's old TI-83+ for about a year now. I've had some troubles. Case in point:

`prgmERMINE`, my chatbot and my personal favorite, got deleted at least six different times due to the calculator freezing up, forcing me to replace the battery, which clears the RAM for some reason. I don't have a link cable, so I can't back up my

`prgm`s. I've managed to code (for the second time, since the original got deleted) a

`prgm` that takes advantage of the way the

`Disp` command scrolls through its strings if it is used enough times in one

`prgm`. This took two separate

`prgm`s and about twenty minutes.

`"PLATINUM: "` is what the

`prgm` uses to ask you how many times you would like to "put up a stick". I suggest a number between 25 and 50.

`prgmPLATMKR` (needed to make

`prgmPLAT12` work) (do not run directly)

`randInt(1,7→R`

If R=1:Disp "-

If R=2:Disp "--

If R=3:Disp "---

If R=4:Disp "----

If R=5:Disp "-----

If R=6:Disp "------

If R=7:Disp "-------

`prgmPLAT12` (actual

`prgm`) (run directly)

`Input "Platinum: ",N`

N-1→K

For(N,1,K):prgmPLATMKR:End:prgmPLATMKR

Any suggestions? My main goals for improvement are:

Find a way to get this to work with only one prgm

~~Shorten the code in prgmPLATMKR~~ (Thanks, Phoenix!)[/list]

FacebookandTwitterFollow @Codewalr_us