- 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.

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

` ``(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.

]]>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.

]]>` ``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. ]]>

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

]]>8→X

4→Y

Output(X,Y,"0

getKey→A

While 1

If A=25

Then

X-1→X

ClrHome

If X=1

Then 2→X

If A=34

Then

X+1→X

If X+8

ClrHome

Then

7→X

If A=24

Then

Y-1→Y

ClrHome

If Y=1

Then

2→Y

If A=26

Then

Y+1→Y

ClrHome

If Y=16

Then

15→Y

End

End

End

End

End

End

End

End

End

` ``ClrHome {1,1,1,-1,1,1,-1,-1,1,1,-1,1,1,1,-1,-1,1,-1,-1,-1,-1,1,-1,-1,1,1,1,-1,1,1,-1,-1,1,1,-1,1,1,1,-1,-1,1,-1,-1,-1,-1,1,-1,-1→L₁ 16.5→Xmax -Ans→Xmin 10.25→Ymax -Ans→Ymin ClrDraw GridOff AxesOff PlotsOff FnOff 0→θ Repeat getKey=45 startTmr→W cos(θ→P sin(θ [[P²+Ans³,-PAns,PAns²-PAns][PAns-PAns²,P²,-P²-Ans²][PAns,Ans,P²→[C] For(A,1,8 3A [C][[L₁(Ans-2)][L₁(Ans-1)][L₁(Ans→[B] 20/(4-Ans(3,1→C Ans[B](2,1→L₆(A C[B](1,1→L₅(A End ClrDraw For(A,1,4 1+remainder(A,4→U Line(L₅(A),L₆(A),L₅(Ans),L₆(Ans),BLACK,1 A+4→V U+4 Line(L₅(V),L₆(V),L₅(Ans),L₆(Ans),BLACK,1 Line(L₅(A),L₆(A),L₅(V),L₆(V),BLACK,1 End θ+π/16→θ End ClrDraw ClrHome`

There's also another thing… a 4D HyperCube simulation, just… if anyone's interested…

` ``ClrHome {1,1,1,1,-1,1,1,1,-1,-1,1,1,1,-1,1,1,1,1,-1,1,-1,1,-1,1,-1,-1,-1,1,1,-1,-1,1,1,1,1,-1,-1,1,1,-1,-1,-1,1,-1,1,-1,1,-1,1,1,-1,-1,-1,1,-1,-1,-1,-1,-1,-1,1,-1,-1,-1→L₁ -π/3→θ cos(Ans→D sin(θ→E 16.5→Xmax -Ans→Xmin 10.25→Ymax -Ans→Ymin ClrDraw GridOff AxesOff PlotsOff FnOff 0→θ Repeat getKey=45 startTmr→W cos(θ→P sin(θ [[P,-Ans,0,0][DAns,DP,-EP,EAns][EAns,EP,DP,-DAns][0,0,Ans,P→[C] For(A,1,16 4A [C][[L₁(Ans-3)][L₁(Ans-2)][L₁(Ans-1)][L₁(Ans→[B] 60/(4-Ans(4,1))/(4-Ans(3,1→C Ans[B](2,1→L₆(A C[B](1,1→L₅(A End ClrDraw For(B,0,8,8 For(A,1,4 A+B→V Ans+4 Line(L₅(V),L₆(V),L₅(Ans),L₆(Ans),BLACK,1 B+1+remainder(A,4→U V+4→V U+4 Line(L₅(V),L₆(V),L₅(Ans),L₆(Ans),BLACK,1 End End For(A,1,8 A+8 Line(L₅(A),L₆(A),L₅(Ans),L₆(Ans),BLACK,1 End θ+π/16→θ End ClrDraw ClrHome`

Thanks!

]]>Here is the TI-84 Plus version:

` ``ClrHome While 1 Input "",X Disp 4 End`

For the CE, you can add a line of dots to replicate the dotted line between each entry, although it doesn't look perfect.

Feel free to change the answer that the program displays. I personally like doing a random number, so that they don't catch on as quickly. I hope you like this silly program I made!

]]>So, in the past 6 months, my doctor has been giving me check-ups and all that, and she started to notice a condition I was starting to develop: Scoliosis. So, over time, it has gotten worse and worse. And she said that it's bad enough that I go in for surgery in about 12 days from now to get my back fixed. I've never really had this type of surgery before (the type I had was oral mouth, teeth removal and adjustments), and to be honest… I'm horrified. I don't know what's going to happen to me. I just hope that everything goes well and they don't screw this up. So, I'm not completely sure if I will be active or not on here, I'm sure I'll do nothing than playing Animal Crossing: New Leaf and Steel Diver: Sub Wars for the duration of my stay in the hospital. I'll lose about half my summer due to this; which I will be sad about, but this will be helpful so I'm not one of those igor-things from Halloween shows. But I do have some good things about this. You get a big awesome scar on my back to show off to others! You also get a load of gifts from people that care about you. You get to spend time with parents and family more. You also get a free pass to skip out on chores and responsibilities for a while. So I hope things go okay, I'm very scared of this. Is there anything I should know before this event that happens? I need all the advice I can get from anyone who had surgery in the past. Hope you all have a wonderful evening. :)

]]>I never put in 0 as an input in Q.

(TI-84+)

Input "x₁=",V

Input "σ₁=",U

Input "n₁=",T

Input "x₂=",S

Input "σ₂=",R

Input "n₂=",Q

Input "c=",P

invNorm(P,0,1)→W

W√((U²/T)+(R²/Q))→E

Disp V-S-E," <µ₁-µ₂<",V-S+E

Stop

(the x's are x bars)

]]>Some of these just take me to this link: http://tibasicdev.wikidot.com/archives

]]>` ``Text(5,58,"2[n][|d] TO DIG"`

what is the [n] and the [|d] i have a feeling they will come up again so what do i put for them?

]]>Overall, this program is more decent than BasicOS. Manager is simpler than BasicOS, more professional, a better UI, and more user-friendly. I'd give this a 8.12/10 rating. Some things I don't like about this program is that the speed isn't the fastest of them all. The main menu with the standard functions display can be kind of slow when loading. Another thing about this is that you have to select whether a program is BASIC or z80 assembly. I see that it is kind of hard to determine if a program is BASIC or not, so I'll put that disadvantage to the side for now. Thank you for uploading this program, this could be a help to other people :)

Some suggestions I do have for this program:

- Select a different method to parse for programs (All types, z80 assembly, Ion, Axe, MirageOS, etc.).
- Decrease in memory size. The size of the program is almost 8kB.
- Run most programs automatically without choosing whether it is BASIC or z80 Assembly.
- Prevent un-locking locked assembly programs to prevent them from being volatile.
- Add a small battery check icon. Not a menu to tell the user if it is low or not, but just show the level without it getting in the way.

If you or other users could add this, this would be terrific and useful.

I'm SO sorry for the huge post, I didn't realize that I posted that much. Hope this doesn't get deleted or removed… that would cause a lot of anger to me xD

]]>I have TI connect on my Windows10 computer.

So program copied on the harddisk, but how to print this on paper?

Regards

HermanD ]]>

A prisoner is told "If you tell a lie we will hang you; if you tell the truth we will shoot you." What can he say to save himself? ]]>

I guess there are a few things I am asking:

How should I go about making a usable raycasting program? (Examples of code please). How can I optimize programs to make them as fast as possible?

Below are the three codes I used to try to do raycasting, 2 made by iPhoenix and one made by Vaelus. I have been working on my own but i am fairly busy with school and

so it is slow.

` ``AxesOff 4→Xmin 24*4+3→Xmax -1→Ymin 1→Ymax 1.5→S 1.5→T dim([A])→L₁ L₁(1)→H L₁(2)→W seq((I-12.5)*4°+45°,I,1,24)→L₁ 1→R While R For(I,1,24) 0→C S→U T→V 0→D While C=0 and 1≤int(U) and int(U)≤W and 1≤int(V) and int(V)≤H L₁(I)→A If A>0°:Then If A>90°:Then -int(-U-1)→P int(V+1)→Q Else int(U+1)→P int(V+1)→Q End Else If A>-90°:Then int(U+1)→P -int(-V-1)→Q Else -int(-U-1)→P -int(-V-1)→Q End End If abs((P-U)/cos(A))<abs((Q-V)/sin(A)):Then D+abs((P-U)/cos(A))→D V+(P-U)*tan(A)→V P→U Else D+abs((Q-V)/sin(A))→D U+(Q-V)/tan(A)→U Q→V End If int(U)≥1 and int(U)≤W and int(V)≥1 and int(V)≤H:Then If [A](int(U),int(V)) 1→C End If -int(-U+1)≥1 and -int(-U+1)≤W and -int(-V+1)≥1 and -int(-V+1)≤H:Then If [A](-int(-U+1),-int(-V+1)) 1→C End End I*4→N Line(N,1,N,-1,0) Line(N+1,1,N+1,-1,0) Line(N+2,1,N+2,-1,0) Line(N+3,1,N+3,-1,0) If C:Then tan⁻¹(([A](int(U),int(V))+[A](-int(-U+1),-int(-V+1)))/D)/32°→Z Line(N,Z,N,-Z) Line(N+1,Z,N+1,-Z) Line(N+2,Z,N+2,-Z) Line(N+3,Z,N+3,-Z) End End getKey→K (L₁(12)+L₁(13))/2→F If K=25:Then S+0.1*cos(F)→S T+0.1*sin(F)→T End If K=34:Then S-0.1*cos(F)→S T-0.1*sin(F)→T End If K=24:Then L₁+2°→L₁ End If K=26:Then L₁-2°→L₁ End If K=45 0→R End`

` ``Degree 0→Xmin {BLACK,DARKGRAY,GRAY,MEDGRAY,LTGRAY,WHITE,WHITE→L₁ 70→Xmax -20→Ymin 20→Ymax 90→θ 310→R 119→S 219→T For(A,1,51,-1 For(B,1,100,50 Pxl-On(163-A,263-B,GRAY Pxl-On(163-B,263-A,GRAY Pxl-On(164-A,264-B,GRAY Pxl-On(110+A,210+B,MEDGRAY Pxl-On(110+B,210+A,MEDGRAY Pxl-On(109+B,209+A,MEDGRAY Pxl-On(109+A,209+B,MEDGRAY End End For(A,1,10 For(B,1,10 If [A](A,B Then For(C,1,5 For(D,1,5 Pxl-On(110+(5A-4+C),210+(5B-4+D),BLACK End End End End End Repeat Ans For(A,6,13.5,.45 Line(Xmin,A,Xmax,A,WHITE End DelVar N Pxl-Off(S,T For(A,70-R,1-R,-1 N+1→N DelVar C cos(A→P sin(A→Q Repeat K=45 or C>20 C+1→C pxl-Test(int(S+CP),int(T+CQ End If C<20:Then int(C/3→V int(40/C)/2→W If W>4 4→W For(B,-W,W For(D,1,2 Pt-On(N,B,D,L₁(V End End End End Pxl-On(S,T Repeat Ans getKey End Pxl-Off(S,T Ans→K If K=24 R-45→R If K=26 R+45→R R-220→θ If K=25 Then int(S-3cos(θ→S int(T+3sin(θ→T Else If K=34 Then int(S+3cos(θ→S int(T-3sin(θ→T End End Pxl-On(S,T Pause End`

` ``StoreGDB 0 ZStandard ZSquare GridOff AxesOff LabelOff BorderColor 4 BackgroundOff {Black,DarkGray,Gray,MedGray,LtGray->L1 For(A,1,10 For(B,1,10 If [A](A,B Then For(C,1,5 For(D,1,5 Pxl-On(115+5A-C,5B-D,Black End End End End End 122->A 5->B DelVar DRepeat K=45 For(theta,~3,3,.1 Line(12+theta,3,12+theta,10,0 End Circle(12,6,1.8,Black Line(10,6,14,6,1,Black,1 Line(12,4,12,8,1,Black,1 For(theta,~40+D,40+D If not(remainder(abs(theta-D),10 Line(12+2.5cos(theta-2D),6+2.5sin(theta-2D),12+2cos(theta-2D),6+2sin(theta-2D),1,Red+(theta=D),1 sin(theta->U cos(theta->V DelVar NRepeat Ans or N=10 N+1->N int(A+NU->I int(B+NV->J pxl-Test(I,Ans End (theta-D)/5 Line(Ans,5,Ans,~5,0 If N!=10 Line(Ans,(10-N)/2,Ans,~(10-N)/2,1,L1(1+min(int(N/2),dim(L1 End If not(pxl-Test(A,B Pxl-On(A,B,Red getKey Repeat Ans getKey End Ans->K Pxl-Off(A,B D-5(K=11->D D+5(K=15->D D-2(K=12->D D+2(K=14->D int(A+(K=13)2sin(D)+(K=23)5sin(D->A int(B+(K=13)2cos(D)+(K=23)5cos(D->B End RecallGDB 0`

Then

If L₁(R)=1 and L₁(R+6)=1 and L₁(R+12)=1 and L₁(R+18)=1 and L₁(R+24)=1 and L₁(R+30)=1

0→I

While I<83

Line(1+I,V,1+I,V+8,0)

I+1→I

End

End

End

I have Highlighted where 'Goto' brings me

This is part of a much larger program

Can someone please help me figure out why there is a syntax error?

**THIS POST HAS BEEN RESOLVED**

53->[recursiven]

Lbl P

randInt(1,4->S

randInt(2,14->T

If (S=A and T=B) or (S=C and T=D) or (S=E and T=F) or (S=G and T=H) or (S=I and T=J) or (S=M and T=N) or (S=O and T=P) or (S=Q and T=R) or (S=X and T=U) or (S=V and T=W

Goto P

[recursiven]+1->[recursiven]

Line([recursiven],4,[recursiven],2

If K=1

what is the recursiven or what should i put for it if i am programing on a ti 84 plus? ]]>

` ``:ClrHome :Disp “PASSWORD” :Input “1=”,A :Input “2=”,B :Input “3=”,C :Input “4=”,D ((A+B)*C)*D￫P :If P=18 :Then :Disp “Right” :Else :Disp “Wrong” :End`

]]>
` ``:ClrHome :Menu(“SOLVE FOR”,”PRISM”,1,” CONE”,2,”CYLINDER”,3,”Sphere”,4, ”ABOUT”,10,”QUIT”,11 :Lbl 1 :Input “L”,L :Input “W”,W :Input “H”,H LxWxH→V :GOTO 7 :Lbl 2 :Input “R”,R :Input “H:,H 3.14xR2x(H/3)→V :Goto 7 :Lbl 3 :Input “R”,R :Input “H”,H 3.14xR2xH→V :Goto 7 :Lbl 4 :Menu(“FULL OR HALF”,”FULL”,6,”HALF”,7 :Lbl 6 :Input “R”,R ((4/3)x3.14xR3)→V :Goto 7 :Lbl 7 :Input “R”,R (((4/3)x3.14xR3)/2)→V :Goto 7 :Lbl 7 :Disp “Answer”,V :Stop :Lbl 10 :Output(3,2,”CALCULATOR V3.1” :Output(4,3,”BY TANNER A.” :Output(5,3,”VIST WIKIDOT” :Pause “PRESS ENTER” :Stop :Lbl 11 :Stop`

]]>
Its when ever I try using my Sphere in the first menu

EDIT: I found the issue on the menu 2 i forgot to add a " to the question also changed it on the code below

:ClrHome

:Menu(“SOLVE FOR”,”PRISM”,1,”

CONE”,2,”CYLINDER”,3,”Sphere”,4

:Lbl 1

:Input “L”,L

:Input “W”,W

:Input “H”,H

LxWxH→V

:GOTO 7

:Lbl 2

:Input “R”,R

:Input “H":,H

3.14xR2x(H/3)→V

:Goto 7

:Lbl 3

:Input “R”,R

:Input “H”,H

3.14xR2xH→V

:Goto 7

:Lbl 4

:Menu(“FULL OR HALF”,”FULL”,6,”HALF”,7

:Lbl 6

:Input “R”,R

((4/3)x3.14xR3)→V

:Goto 7

:Lbl 7

:Input “R”,R

(((4/3)x3.14xR3)/2)→V

:Goto 7

:Lbl 7

:Disp “Answer”,V

:Stop

Edit: I think I would need to make an asm library to do this but I'm not sure how to do this. I've looked into making asm programs a little bit but I could find much info. Could someone link me to a guide for asm programing for ez80 or just a guide on how to make libraries?

]]>The final game will have instructions at the beginning, I just haven't written them up yet. In case you've never played Mastermind, one player makes a secret combination of 4 colored pegs (there are six colors). Then the other person makes a guess of what the combo is. The first player tells them how many pegs are the right color in the right place, and how many are the right color but in the wrong place. Then the second player guesses again, up to 10 times until they guess correctly. In my calculator version, the player types in a list of 4 numbers (1-6), such as "{1,2,3,4}". Then the calculator gives 'P', the amount which are correct, and 'C', the amount which are included in the combo but in the wrong place.

Here is the code:

` ``ClrHome SetUpEditor MM1,MM2 randInt(1,6,4→⌊MM1 For(T,1,10 DelVar CDelVar P Input ":",⌊MM2 sum(⌊MM1=⌊MM2→P For(Y,1,4 For(X,1,4 If ⌊MM2(Y)=⌊MM1(X Then ⁻⌊MM1(X→⌊MM1(X C+1→C 4→X End End End C-P→C abs(⌊MM1→⌊MM1 Output(T,19,"P:" Output(T,21,P Output(T,24,"C:" Output(T,26,C If 4=sum(⌊MM2=⌊MM1 10→T End ClrHome If 4≠sum(⌊MM2=⌊MM1 Then Disp "FAIL... Else Disp "CORRECT! End Pause SetUpEditor ClrHome`

This code is written for a TI 84 Plus CE, but it will work on other calculators by changing where P and C are displayed to fit on a smaller screen.

I hope you like the game! I can answer any questions you have and I will gladly take all feedback to improve it!

]]>Thanks for being such a helpful site for all my programming needs! I am excited to join in!

]]>` ``ClrHome 1→dim(L₁ 1→dim(L₂ For(Y,0,164 For(X,0,264 If pxl-Test(Y,X Then augment(L₁,{X→L₁ augment(L₂,{Y→L₂ End End End ClrDraw For(X,2,dim(L₁ Pxl-On(L₂(X),L₁(X),BLACK End`

I found a thread that discussed this same topic (t-1188128) but I don't know anything about programming for the TI. One of the comments suggested a string for taking in multiple values which would be ideal.

Some help with quickly picking up the syntax on the TI would be appreciated. I plan to write more programs after this one so with these basics I should be able to develop with more ease.

]]>You may download it here:

https://education.ti.com/en/software/details/en/CA9C74CAD02440A69FDC7189D7E1B6C2/swticonnectcesoftware

EDIT: I'll add some screenshots later, I just need to get my hands on a computer with the previous version of it

EDIT 2: Here is a link to the new update: https://education.ti.com/en/product-resources/whats-new-84-ce

EDIT 3: Here are some comparisons of the versions.

The Newer version:

The Older version:

]]>The partial thromboplastin time or activated partial thromboplastin time is a blood test that characterizes coagulation of the blood. A historical name for this measure is the kaolin-cephalin clotting time, reflecting kaolin and cephalin as materials historically used in the test.

But I do not think that is the correct definition for it because I'm talking about calculators, not blood clots :P

Is the PTT LED used to prevent cheating and/or invalid use on exams and such in areas that use the Premium CE?

` ``toString(Ans)→Str1 10→X While not(inString(Str1,"/") X-1→X Fix X expr(Str1)▶Frac toString(Ans)→Str1 End Disp Ans Float`

]]>
` ``Line(0,Ymax,0,Ymin) For(Y,1,164) For(X,1,132) If pxl-Test(Y,X) Pxl-On(Y,264-X) End End`

]]>
I personally think that TI-Connect is better than TI-Connect CE, in certain respects.

(I know, some of these are super obvious. I'm just stating the facts.)

- This version can send certain files that CE can't. Depending on the file, CE will say: "One or more files was invalid and cannot be sent to the calculator(s)." You can send them easily with the original.
- You can send files that contain invalid tokens. CE will say "bad token!" If you try to send those files. With the original, no problem.
- You can send some CSE and CE apps to an 84+. (I've tried it, it worked with DCSE8)
- You can change clock settings with the original, and send them to the calculators.
- The original can look at any battery level on your calculator. The CE will only tell you if they are low.

- It takes longer to send files on this version than the CE, the original takes 3x longer than CE.
- Sometimes, the original can freeze up before transfers and device searches. CE is better when you're in a dash.
- You can't edit programs on this version; only with CE.
- It's more complicated with the original. CE is simpler and easier to use.

What do you guys think? You can add/edit more bullets to my post, just bold them when they are new. I'm just curious. Don't judge me.

**Oh and another question:** Does sending and receiving files on the calculator use battery juice/power more? Because I know that the calculator is sending currents of electricity, which could come from the batteries.