Forum category: General Discussion / Open Topic

Forum thread: OS 2.71MP??? ]]>

TI: We released a new OS for the TI-84+/SE Family: 2.71MP

Us: Really? All right! A new OS!

Us: *calculator crashes a lot* *memory cleared* *apps/progs fail to execute* What the heck IS This?! Who do you guys think you are?!

TI: April Fools

I bet it would be cool to go back when the joke was around and see others' reactions :)

Forum category: General Discussion / Open Topic

Forum thread: OS 2.71MP??? ]]>

.

Forum category: General Discussion / Open Topic

Forum thread: OS 2.71MP??? ]]>

Forum category: General Discussion / Open Topic

Forum thread: OS 2.71MP??? ]]>

Forum category: General Discussion / Open Topic

Forum thread: OS 2.71MP??? ]]>

Forum category: General Discussion / Open Topic

Forum thread: OS 2.71MP??? ]]>

Bert: Dad? Am I going to miss summer?

Homer: Don't worry son. When you're like me, you miss every summer.

Forum category: General Discussion / Open Topic

Forum thread: Summer is about to end.... ]]>

Forum category: General Discussion / Open Topic

Forum thread: Summer is about to end.... ]]>

- What are your plans for the rest of summer?
- How are you going to prepare for school?
- What grade are you heading into?
- How was this past summer break?

If you're in college our out of school, that's fine. You can answer these differently.

*My responses:*

- My plans are to go to Fat Cats on July 4th, finish Stranger Things 3, get my learners permit (driving), go a family reunion, go on the priests quorum last backpacking trip, program a lot, , do yard work, help with others, and prepare for school.
- Go to Walmart and buy the appropriate materials. Buy some new folders, some basic materials, a TI-84 Plus CE, and re-adjust my sleeping schedule for school.
- I'm currently heading into my Junior year. I'm going to Cedar Valley High School in Eagle Mountain (http://cvhs.alpineschools.org)
- Did some more fun things with my family this summer, had pneumonia for a few weeks, went to a fair, Trek, and a backpacking trip. I wish my family could have done more fun things this summer however.

Forum category: General Discussion / Open Topic

Forum thread: Summer is about to end.... ]]>

Forum category: Forum 101 / Wiki Page Discussions

Forum thread: Token Finder+ / Buscador de fichas+ ]]>

Forum category: Forum 101 / Wiki Page Discussions

Forum thread: Token Finder+ / Buscador de fichas+ ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: Accessing System RAM ]]>

Forum category: General Discussion / Tech Support

Forum thread: List programming speed ]]>

Forum category: General Discussion / Tech Support

Forum thread: List programming speed ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: 3D cube ]]>

Also, I changed line:

` ``([J]*[A])-[D]->[B]`

to

` ``[J]*([A]-[D])->[B]`

which makes it do rotations better.

I think that one reason for its slowness is that it does a lot of matrix calcs, and draws 12 lines. Maybe statplot could be used to speed things up.

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: 3D cube ]]>

` ``ClrHome Disp "1)KILOMETERS","2)METERS","3)MILES","4)YARDS","5)FEET","6)INCHES" Input "Choice: ",C Input "Amount ",X (C=1)X+(C=2)X/1000+(C=3)1.609344X+(C=4)X/1093.613+(C=5)X/3280.84+(C=6)X/39370.079→A (C=1)1000X+(C=2)X+(C=3)1609.344X+(C=4)X/1.094+(C=5)X/3.281+(C=6)X/39.37→B (C=1)X0.621371+(C=2)X/1609.344+(C=3)X+(C=4)X/1760+(C=5)X/5280+(C=6)X/63360→D (C=1)X1093.613+(C=2)1.09361X+(C=3)1760X+(C=4)X+(C=5)X/3+(C=6)X/36→E (C=1)X3280.84+(C=2)3.281X+(C=3)5280X+(C=4)3X+(C=5)X+(C=6)X/12→F (C=1)39370.079X+(C=2)39.37X+(C=3)63360X+(C=4)36X+(C=5)12X+(C=6)X→G ClrHome Disp "1)Km","2)M","3)Mi","4)Yds","5)Ft","6)In" Output(1,7,A Output(2,7,B Output(3,7,D Output(4,7,E Output(5,7,F Output(6,7,G Stop`

Forum category: Forum 101 / Wiki Page Discussions

Forum thread: Right angle triangle solver Ultimate Edition ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: 3D cube ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: 3D cube ]]>

Forum category: Forum 101 / Wiki Page Discussions

Forum thread: TINT ]]>

` ``[[9]]→[A] Can be: [[9→[A] ----------------- Ans(2) Can be: Ans(2`

Doesn't really help with speed, but saves bytes.

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: 3D cube ]]>

prgmA3D

` ``Input "ROTATION ANGLE:",theta prgmthetaSSETUP prgmthetaPOINTS Repeat K=16 ClrDraw "DRAW SCREEN" [C]->[D] dim([A]) Ans(2) For(A,1,Ans-1) augment([D],[C]->[D] End [J]*([A]-[D])->[B] dim([B]) Ans(2) {1,4}->L1 prgmthetaDRWPT {1,2}->L1 prgmthetaDRWPT {2,3}->L1 prgmthetaDRWPT {3,4}->L1 prgmthetaDRWPT {1,5}->L1 prgmthetaDRWPT {2,6}->L1 prgmthetaDRWPT {4,8}->L1 prgmthetaDRWPT {3,7}->L1 prgmthetaDRWPT {5,6}->L1 prgmthetaDRWPT {6,7}->L1 prgmthetaDRWPT {7,8}->L1 prgmthetaDRWPT {8,5}->L1 prgmthetaDRWPT Repeat K getKey->K End If K=21 .5+[C](3,1)->[C](3,1) If K=31 ~.5+[C](3,1)->[C](3,1) If K=82 .5+[C](1,1)->[C](1,1) If K=84 ~.5+[C](1,1)->[C](1,1) If K=73 ~.5+[C](2,1)->[C](2,1) If K=93 .5+[C](2,1)->[C](2,1) If K=26 [J]*[[1,0,0][0,cos(theta),~sin(theta)][0,sin(theta),cos(theta)]]->[J] If K=24 [J]*[[1,0,0][0,cos(~theta),~sin(~theta)][0,sin(~theta),cos(~theta)]]->[J] If K=25 [J]*[[cos(theta),0,~sin(theta)][0,1,0][sin(theta),0,cos(theta)]]->[J] If K=34 [J]*[[cos(~theta),0,~sin(~theta)][0,1,0][sin(~theta),0,cos(~theta)]]->[J] If K=22 [J]*[[cos(theta),~sin(theta),0][sin(theta),cos(theta),0][0,0,1]]->[J] If K=23 [J]*[[cos(~theta),~sin(~theta),0][sin(~theta),cos(~theta),0][0,0,1]]->[J] End`

**Subprograms**

prgmthetaDRWPT

` ``Line(([B](1,L1(1)))S/([B](3,L1(1))),([B](2,L1(1)))S/([B](3,L1(1))),([B](1,L1(2)))S/([B](3,L1(2))),([B](2,L1(2)))S/([B](3,L1(2)))`

prgmthetaPOINTS

` ``"POINTS [[1,~1,~1,1,1,~1,~1,1,0][~1,~1,1,1,~1,~1,1,1,0][4,4,4,4,6,6,6,6,0]]->[A] "CAM ROTATION [[1,0,0][0,1,0][0,0,1]]->[J] "CAM TRANS [[0][0][0]]->[C] "SCREEN DIST 3->S`

prgmthetaSSETUP

` ``ClrDraw CoordOff RectGC GridOff AxesOff LabelOff ExprOff ZSquare`

For the input rotation angle, use a small angle such as 11.25. Also make sure you are in degree mode.

You can put the program into Chemetech's sourcecoder 3 and download it to try it out.

Info:

the camera starts out pointing straight up along the z axis, at the cube which floats above it.

moves:

2nd +z

alpha -z

8 +y

2 -y

4 -x

6 +x

mode - rot z

del +rot z

up +rot y

down -rot y

left -rot x

right +rot x

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: 3D cube ]]>

` ``(First Check) If pxl-Test(B,Ans-H) Then Text(27,34,"SCORE: ",θ Return End (2nd Check) If pxl-Test(Ans-V,A:Then Text(27,34,"SCORE: ",θ Return End The check to see if the user won: If θ=95:Then Text(27,34,"WIN. Return End`

From what I observed in the code, there are 9 If checks inside the program. I do know that having Labels inside Loops don't cause memory leaks, So, I put the Goto's after the `If H:Then` and the `If pxl-Test(B,A:Then` checks, and the quit label right before the last 3rd End at the end of the program. By doing all of this, it cut down speed a bit. Is there an alternative solution to this to make it faster with no memory leaks?

At the beginning of the code, I put an extra variable D and with the If checks to end the game, I set the variable D to 1 in the checks and at the end of the 2 main loops and If D is 1, it goes to the ending loop.

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: Nibbles Adjustment ]]>

**Program Release Information:** (This will possibly be the Read Me) The Celtic III game Snake Arcade will be released for the TI-84 Plus Family around July 4th, 2019. This game is like no other; because of the 4 built-in game modes, which are:

**Normal snake:**A simple snake game on the home screen where you have to eat the *'s and the snake grows longer and longer. You may go past the wall boundries, the only way you die is by pressing CLEAR or running into yourself.*Original author: burr, edited by Weregoose, James Kanjo, and Timothy Foster.*

**Demented Snake:**Similar to the game above, but the snake display is very… glitched and you constantly have to change your direction to keep the snake moving fast.*Original author: burr, edited by Weregoose, and James Kanjo.*

**Space Snake:**You are in space and you have to guide the snake to fly inside the astroids (= signs) to get points. Crash into a pixel and it's game over.*Original author: 12Me21*

**Nibbles:**A very graphical, and fast snake game. Guide your snake to get all pieces of food that appears around the screen. The 3 ways you can die is crashing either into a wall, or yourself, or by pressing CLEAR.*Original author: Edward H*

Description:

Ideas and suggestions are appreciated!

Forum category: General Discussion / Tech Support

Forum thread: Group Recovery ]]>

Forum category: General Discussion / Tech Support

Forum thread: Group Recovery ]]>

Forum category: General Discussion / Tech Support

Forum thread: Group Recovery ]]>

I don’t know if the page address counts, I’ve never had to use calcsys

Forum category: General Discussion / Tech Support

Forum thread: Group Recovery ]]>

EDIT: Sorry for the delayed reply Trenly, I had a 4-day backpacking trip and I had no service

EDIT 2: Also, does the page address matter for the largest memory address?

Forum category: General Discussion / Tech Support

Forum thread: Group Recovery ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Based on what youre describing, you will likely be unable to recover the information at all. If by some chance the information is somewhere in your archive, its likely corrupted anyways and would require some work to patch. The more corrupt it is, the harder it is to patch.

Forum category: General Discussion / Tech Support

Forum thread: Group Recovery ]]>

So now, I'm really upset that the game I've been working on is gone. I've been working on this game for 6 days, and now all my planning and programming I did for this project I was excited to share with all of you, for nothing. Is there any way at all to recover some group I backed up in the VAT? I haven't garbage collected and I'm not even going to touch my calculator until I try to sort this dilemma out. I'd be really appreciated if any of you can spend the time to find a solution for this problem.

Forum category: General Discussion / Tech Support

Forum thread: Group Recovery ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Forum category: Forum 101 / Site Feedback

Forum thread: Search Results Show 68k Pages First ]]>

Forum category: Forum 101 / Site Feedback

Forum thread: Search Results Show 68k Pages First ]]>

Forum category: Forum 101 / Site Feedback

Forum thread: Search Results Show 68k Pages First ]]>

Forum category: Forum 101 / Site Feedback

Forum thread: Search Results Show 68k Pages First ]]>

- Clear Screen

`real(0,Update_LCD`

- Draw Sprite

`real(1,x,y,w,h,Pic#,PicX,PicY,Logic,Flip,Update_LCD`

- Draw Tile Map

`real(2,Matrix_Name,x_offset,y_offset,Width,Height,SStartX,SEndX,SStartY,SEndY,Pic#,Logic,Tile_Size,Update_LCD`

- Recall Picture

{{real(3,Pic#,Logic,Update_LCD

- Scroll Screen

`real(4,direction,step,update_LCD`

- Change Contrast

`real(5,function,value`

- Update LCD

`real(6`

- Run indicator

`real(7,value`

- Get Key

`real(8`

- Create Pic

`real(9,function,pic#`

- Executive Archived Program

`"Program Name real(10,function,temp_program_number prgmxTEMP0XX or Asm(prgmXTEMP0XX`

- Get Calc/Model Version

`real(11`

- Draw Shape

`real(12,shape_type,x1,y1,x2,y2,update_LCD`

- Text Mode

`real(13,function,[character]`

- Check RAM

`real(14`

I'm not sure if all or most of these are the actuall same as xLib's commands, so someone will have to correct me if any of those are wrong.

Forum category: Forum 101 / Wiki Page Discussions

Forum thread: File Manager ]]>

Also, in response to kg583's post, x and s are changed, not allowing for a repeat of the same if statement.

Is there a way to hack my calculator to get me to be able to put in a matrix with more than 200 entries?

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Forum category: General Discussion / Tech Support

Forum thread: List programming speed ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Forum category: Forum 101 / Wiki Page Discussions

Forum thread: File Manager ]]>

Also, is either one more size efficient?

A) pressing enter

B) using a colon

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

` ``:If K=26 and X=20 and S=1:Then :2→S :21→B :40→U :20→O :1→X :End :If K=26 and X=20 and S=1:Goto A`

The other option is to rework your program flow. For example, introduce a variable that allows your `Repeat` loop to exit:

` ``:0→E (or whatever var you like) :Repeat E game code :If K=26 and X=20 and S=1:Then :2→S :21→B :40→U :20→O :1→X :1→E :End end of loop :End :Goto A`

where you return to A once the loop is done.

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Also, I see you have a few Memory Leaks, specifically at the code section below:

` ``If K=26 and X=20 and S=1:Then 2→S 21→B 40→U 20→O 1→X Goto A <-- This line here End`

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

As for what it does: the snippet removes the `Then` and `Else` from your code by utilizing two tricks. Firstly, if you have only one line after an `If` statement, if doesn't need a `Then` or `End`. Secondly, instead of selectively storing values to variables, you can store a "default" value (in this case 1), then change it based on the condition. Effectively, the code changes the phrase, "If `H` does not equal 1, set `U` to this expression. Otherwise, set `U` to 1" into "Set `U` to 1. Then, if `H` does not equal 1, change `U` to this expression." They mean the same and work the same, but one is more efficient speed- and size-wise.

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

thanks!

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

` ``//22 tokens LD(I LX(I)-not(Ans)+not(not(Ans→LX(I`

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

` ``If H≠1:Then [A]((H-1),(G+O))→U Else 1→U End --can be -- 1→U If H≠1:[A]((H-1),(G+O))→U`

You can also use this optimization for a lot of the If statements in your Position Code

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

` ``If dim(LX)>0:Then Can be: If dim(LX:Then ------ If LD(I)=0:Then LX(I)+1→LX(I) Else LX(I)-1→LX(I) End Can be optimized to: LD(I) LX(I)+(Ans>0)-(not(Ans→LX(I`

Sorry for the poor examples, I used my 3DS xl to type all this by hand xD

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

Firstly, you can drop every closing parenthesis that occurs at the end of a line. E.g.,

` ``:Output(Y,X,"X") can be :Output(Y,X,"X" and even :Output(Y,X,"X`

Secondly, any time you test if a number is 0, it's smaller to use the `not(` command:

` ``:If D=0 and F≤0:Then can be :If F≤0 and not(D:Then`

I'll have to spend a bit more time looking through the code for larger-scale optimization, but these should get you started.

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

` ``If dim(⌊X)>0:Then For(I,1,dim(⌊X)) Output(⌊Y(I),⌊X(I)," ") End For(I,1,dim(⌊X)) If ⌊D(I)=0:Then ⌊X(I)+1→⌊X(I) Else ⌊X(I)-1→⌊X(I) End For(I,1,dim(⌊X)) 0→T ⌊X(I)→G ⌊Y(I)→H prgmPOSITION If ⌊D(I)=0:Then If R=1:Then If dim(⌊X)=I:Then (dim(⌊D)-1)→dim(⌊D) (dim(⌊T)-1)→dim(⌊T) (dim(⌊X)-1)→dim(⌊X) (dim(⌊Y)-1)→dim(⌊Y) 1→T End If I=1 and T=0:Then seq(⌊D(θ),θ,2,dim(⌊D))→⌊D seq(⌊T(θ),θ,2,dim(⌊T))→⌊T seq(⌊X(θ),θ,2,dim(⌊X))→⌊X seq(⌊Y(θ),θ,2,dim(⌊Y))→⌊Y 1→T End If T=0:Then augment(seq(⌊D(θ),θ,1,(I-1)),seq(⌊D(θ),θ,(I+1),dim(⌊D)))→⌊D augment(seq(⌊T(θ),θ,1,(I-1)),seq(⌊T(θ),θ,(I+1),dim(⌊T)))→⌊T augment(seq(⌊X(θ),θ,1,(I-1)),seq(⌊X(θ),θ,(I+1),dim(⌊X)))→⌊X augment(seq(⌊Y(θ),θ,1,(I-1)),seq(⌊Y(θ),θ,(I+1),dim(⌊Y)))→⌊Y End End Else If L=1:Then If dim(⌊X)=I:Then (dim(⌊D)-1)→dim(⌊D) (dim(⌊T)-1)→dim(⌊T) (dim(⌊X)-1)→dim(⌊X) (dim(⌊Y)-1)→dim(⌊Y) 1→T End If I=1 and T=0:Then seq(⌊D(θ),θ,2,dim(⌊D))→⌊D seq(⌊T(θ),θ,2,dim(⌊T))→⌊T seq(⌊X(θ),θ,2,dim(⌊X))→⌊X seq(⌊Y(θ),θ,2,dim(⌊Y))→⌊Y 1→T End If T=0:Then augment(seq(⌊D(θ),θ,1,(I-1)),seq(⌊D(θ),θ,(I+1),dim(⌊D)))→⌊D augment(seq(⌊T(θ),θ,1,(I-1)),seq(⌊T(θ),θ,(I+1),dim(⌊T)))→⌊T augment(seq(⌊X(θ),θ,1,(I-1)),seq(⌊X(θ),θ,(I+1),dim(⌊X)))→⌊X augment(seq(⌊Y(θ),θ,1,(I-1)),seq(⌊Y(θ),θ,(I+1),dim(⌊Y)))→⌊Y End End End End End For(I,1,dim(⌊X)) Output(⌊Y(I),(⌊X(I)-O),"-") End End`

position

` ``If G≠1:Then [A](H,(G-1+O))→L Else 1→L End If G≠20:Then [A](H,(G+1+O))→R Else 1→R End If H≠1:Then [A]((H-1),(G+O))→U Else 1→U End If H≠10:Then [A]((H+1),(G+O))→D Else 0→D End`

gamehud

` ``For(C,21,26) For(B,1,10) Output(B,C,"*") End End`

gametext

` ``0→Q 1→X 1→S Lbl B 0→dim(⌊X) 0→dim(⌊Y) 0→dim(⌊D) 0→dim(⌊T) 0→O 1→B 20→U Lbl A ClrHome For(θ,1,10) For(Q,B,U) If [A](θ,Q)=1 Output(θ,(Q-O),"=") If [A](θ,Q)=2 Output(θ,(Q-O),"Y") End End prgmGAMEHUD 9→Y Repeat 0=1 X→G Y→H prgmPOSITION getKey→K If K=24 and L≠1 Then Output(Y,X," ") X-1→X 1→P End If K=26 and R≠1 Then Output(Y,X," ") X+1→X 0→P End F-1→F If K=25 and D=1:Then Output(Y,X," ") Y-1→Y 3→F End X→G Y→H prgmPOSITION If D=0 and F≤0:Then Output(Y,X," ") Y+1→Y End If K=21:Then X→⌊X(dim(⌊X)+1) Y→⌊Y(dim(⌊Y)+1) 1→⌊T(dim(⌊T)+1) P→⌊D(dim(⌊D)+1) End If K=24 and X=1 and S=2:Then 20→X 1→S Goto B End Output(Y,X,"X") If K=26 and X=20 and S=1:Then 2→S 21→B 40→U 20→O 1→X Goto A End prgmGAMEBLET End`

I have parentheses for now for clarity, but after development. other optimizations are helpful though.

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: TI84+CE game optomization ]]>

ERR:DOMAIN is thrown if any of the arguments are non-integers, or the date does not exist, such as the 42nd of February. However, the year does not matter (a date that takes place in the year 10000 is valid). However, there are exceptions, even if some dates do exist, this error may still occur. If you attempt to calculate the previous day of a week such as the previous day, the error may still occur.

Basically, there is no upper bound to the domain as all years are assumed to be valid above 0

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: No Limit? ]]>

EDIT: I did find a minimum limit; March 1st, 0.

Forum category: Programming & Design / TI-83/84 Programming

Forum thread: No Limit? ]]>

Forum category: Forum 101 / Community Introductions

Forum thread: Movement Controls not working HELP ]]>

Following the order of operations, it is evaluated like this:

(K=24 ; This evaluates to either 1 (True) or 0 (False) depending on the value of K

(K=26); This also is either a 1 or 0, depending on the value in K.

Therefore X+(K=26)-(K=24 is best represented by X+[-1,0,1]. This means X plus one of the numbers in the set will be the result. The next command is the min command. This will take the lowest value of the array it is evaluating. By doing min(26,X it is defining the Upper bound of 26. If X is ever greater than 26, the Min command will return 26. If X is lower than 26, it will return X. The max command sets the lower bound. By using max(1,Y it is ensured the result will always be greater than or equal to 1. If Y is greater than 1, Y will be the result. Otherwise, if Y is smaller than 1 the result of the statement will be 1.

By stringing all the parts together, it removes the need for If statements to check for the bounds of the screen.

Forum category: Forum 101 / Community Introductions

Forum thread: Movement Controls not working HELP ]]>

Forum category: Forum 101 / Community Introductions

Forum thread: Movement Controls not working HELP ]]>