### Author Topic: prgmPLAT12: An Experiment in Visuals  (Read 1250 times)

0 Members and 1 Guest are viewing this topic.

#### Woodrow

• New User
• Join Date: Jan 2018
• Location: Miami, Florida
• Posts: 9
• Post Rating Ratio: +0/-0
• Jack of all trades, master of none.
• Gender:
##### prgmPLAT12: An Experiment in Visuals
« on: January 18, 2018, 09:58:28 pm »
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 prgms. 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 prgms 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)

Code: [Select]
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)

Code: [Select]
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]
« Last Edit: January 19, 2018, 06:00:33 pm by Woodrow »

• Calculators owned: TI-83+
• Consoles, mobile devices and vintage computers owned: TI-83+, iPhone, Nintendo Switch, iPad, Kindle

#### mazhat

• Full User
• Join Date: Mar 2017
• Location:
• Posts: 176
• Post Rating Ratio: +7/-0
• Edelweiss. Edelweiss.
• Gender:
##### Re: prgmPLAT12: An Experiment in Visuals
« Reply #1 on: January 18, 2018, 10:10:49 pm »
You can archive programs to your calculator:
Make a copy of an existing program by using RCL in a new program file.
Go to the memory management screen and select the new file to archive it (an asterisk will appear beside it).

Archived programs are stored in the flash memory and not the RAM.
• Calculators owned: TI-83Plus, TI-84Plus
• Consoles, mobile devices and vintage computers owned: Samsung TAB A (Cheap), DSI, Rasperry PI 3
The Mogami River.

#### Woodrow

• New User
• Join Date: Jan 2018
• Location: Miami, Florida
• Posts: 9
• Post Rating Ratio: +0/-0
• Jack of all trades, master of none.
• Gender:
##### Re: prgmPLAT12: An Experiment in Visuals
« Reply #2 on: January 18, 2018, 10:22:24 pm »
You can archive programs to your calculator:
Make a copy of an existing program by using RCL in a new program file.
Go to the memory management screen and select the new file to archive it (an asterisk will appear beside it).

Archived programs are stored in the flash memory and not the RAM.

o m g  t h a n k  y o u
• Calculators owned: TI-83+
• Consoles, mobile devices and vintage computers owned: TI-83+, iPhone, Nintendo Switch, iPad, Kindle

#### mazhat

• Full User
• Join Date: Mar 2017
• Location:
• Posts: 176
• Post Rating Ratio: +7/-0
• Edelweiss. Edelweiss.
• Gender:
##### Re: prgmPLAT12: An Experiment in Visuals
« Reply #3 on: January 18, 2018, 10:34:41 pm »
You're welcome.

I hope your program works out well.
• Calculators owned: TI-83Plus, TI-84Plus
• Consoles, mobile devices and vintage computers owned: Samsung TAB A (Cheap), DSI, Rasperry PI 3
The Mogami River.

#### _iPhoenix_

• Super User
• Join Date: Mar 2017
• Location:
• Posts: 618
• Post Rating Ratio: +14/-1
• █████ ▼ ♪ Best music ♫
• Gender:
##### Re: prgmPLAT12: An Experiment in Visuals
« Reply #4 on: January 19, 2018, 12:13:42 pm »
Here's something cool.

The sub( command lets you take a substring of a provided string.
The syntax is sub(string,starting character,length
We can compact prgmPLATMKR down to one line with this!

Code: [Select]
Disp sub("-------",1,randInt(1,7
• Calculators owned: A sentient TI-84+ CE, TI-85
• Consoles, mobile devices and vintage computers owned: TI-99/4a home computer