Dear visitors and members, with the staff having moved on to other life interests and as a result of changes in people's internet usage habits, the CodeWalrus community have migrated almost entirely to Discord, IRC and WalrusIRC and is now essentially a place where to hang out, chat about gaming, programming, music, anime, and chill. As a result, even though the CW forums will remain open for posting, for faster TI, Casio or HP calculator help and news we recommend using the bilingual TI-Planet forums instead.

We encourage everyone to join our Discord server now.

* WalrusIRC

You need to have 5 posts and not be part of restricted usergroups in order to use the WalrusIRC embedded shoutbox. However, you can also access our IRC channel called #CodeWalrus via EFnet.

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

0 Members and 1 Guest are viewing this topic.

Offline Woodrow

  • New User
  • Join Date: Jan 2018
  • Location: Miami, Florida
  • Posts: 9
  • Post Rating Ratio: +0/-0
  • Jack of all trades, master of none.
    • @@TheTreeOfComedy
    • eyeoftheaxolotl.tumblr.com
  • Gender: Female
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

Offline mazhat

  • Full User
  • Join Date: Mar 2017
  • Location:
  • Posts: 176
  • Post Rating Ratio: +7/-0
  • Edelweiss. Edelweiss.
    • /u/Mazhat
    • Mazhat
    • @Mazhat
    • MOS
  • Gender: Male
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.

Offline Woodrow

  • New User
  • Join Date: Jan 2018
  • Location: Miami, Florida
  • Posts: 9
  • Post Rating Ratio: +0/-0
  • Jack of all trades, master of none.
    • @@TheTreeOfComedy
    • eyeoftheaxolotl.tumblr.com
  • Gender: Female
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

Offline mazhat

  • Full User
  • Join Date: Mar 2017
  • Location:
  • Posts: 176
  • Post Rating Ratio: +7/-0
  • Edelweiss. Edelweiss.
    • /u/Mazhat
    • Mazhat
    • @Mazhat
    • MOS
  • Gender: Male
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.

Offline _iPhoenix_

  • Super User
  • Join Date: Mar 2017
  • Location:
  • Posts: 576
  • Post Rating Ratio: +12/-1
  • █████ ▼ ♪ Best music ♫
    • @dj_iPhoenix
    • @UCytgMNPxAMDsxjimvxHf01w
    • @the-legend-of-iphoenix
  • Gender: Male
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
Please spam here: https://legend-of-iphoenix.github.io/spam/

"walruses are better than tuxedo chickens, all hail the great :walrii:" ~ me

 


You can also use the following HTML or bulletin board code to share it on your page or forum signature!


Also do not forget to check our affiliates below.
Planet Casio TI-Planet Calc.news BroniesQC BosaikNet Velocity Games