TI-83/84+ "CUBELAB" (scrambler, etc.)

[Swordsman Kirby]

I have a few questions:

1. Under "prgmSCRAMBLE"

15fPart(x/5)+1->Z

Where do you find a lowercase "x"?

2. Does it matter if you use the "X" from the "X,T,Θ,n" button or the "X" from the letters in ALPHA mode?

3. When I run "prgmSCRAMBLE", the scramble appears, and when all 25 moves are shown, the screen immediately shows an error message,

ERR:INVALID DIM

Upon selecting Goto, the cursor blinks over the second line in "prgmDISPTIME" which is

1-Var Stats

Besides the aforementioned problems, I have checked all the code and there does not seem to be anything wrong. How can I fix this, please?

whatsinacube:
"sigmax" refers to the lowercase Greek sigma letter (σx) in VARS->Statistics->XY. "sumx" refers to the uppercase one (Σx) in VARS->Statistics->Σ. Or at least I hope I got that right .

1. That should be an uppercase X.

2. Well, it doesn't matter, you can replace X with any variable.

3. How does SCRAMBLE go to DISPTIME?

 

[mchen]

3. How does SCRAMBLE go to DISPTIME?

After the error appears, I selected Goto and the error appeared in the program DISPTIME, second line. I'm not sure what else I can add.

 

[YourClone]

Too bad my teachers have everyone clear their calculators before a test.

 

[masterofthebass]

So just save it in your archived memory. When a teacher deletes what you have, just go into the MEM menu and unarchive everything...

 

[Swordsman Kirby]

So just save it in your archived memory. When a teacher deletes what you have, just go into the MEM menu and unarchive everything...

Heheheh, GROUP.

 

[xspamx]

8->A
8->B
8->C

where do i find the arrows in ti-84?

 

[TimMc]

8->A
8->B
8->C

where do i find the arrows in ti-84?

RTFM. There should be a [Sto->] button on it somewhere.

If not, an online manual from education.ti.com should have it

Tim.

 

[ezh]

I like my scrambling program better.

:int(6rand→F
:For(I,1,5
:" →Str0
:For(J,1,5
:Repeat not(A and D=3
:randInt(1,5→D
:End
:Ans=3→A
:round(6fPart((F+D)/6→F
:Str0+" "+sub("URFDLB",1+F,1
:If int(3rand
:Ans+sub("2'",randInt(1,2),1
:Ans→Str0
:End
:Disp sub(Ans,3,length(Ans)-2
:End

By the way, how do I write superscripts? I could save a byte by using the [^-1] token on line 9.

 

[Athefre]

ezh, have you made a rolling average calculating program?

 

[linkmaster03]

I made a program that scrambles, times, and saves your times to a list. It also detects PBs and saves them, which you can view from a menu. It also graphs your last 12 solves, and displays the average. 8D

 

[Athefre]

I made a program that scrambles, times, and saves your times to a list. It also detects PBs and saves them, which you can view from a menu. It also graphs your last 12 solves, and displays the average. 8D

Do you have it online?

Because, no offense to SK, I'm tired of trying to split up CUBELAB and hope the parts I want will work by themselves. I already have ezh's scrambler and I don't want a timer so would your averaging program work by itself? If I was just going to do 12 solves, that's easy to do mentally. But if it was 100 solves I wouldn't feel like averaging all of the possible groups of 12 solves.

 

[Swordsman Kirby]

I made a program that scrambles, times, and saves your times to a list. It also detects PBs and saves them, which you can view from a menu. It also graphs your last 12 solves, and displays the average. 8D

Do you have it online?

Because, no offense to SK, I'm tired of trying to split up CUBELAB and hope the parts I want will work by themselves. I already have ezh's scrambler and I don't want a timer so would your averaging program work by itself? If I was just going to do 12 solves, that's easy to do mentally. But if it was 100 solves I wouldn't feel like averaging all of the possible groups of 12 solves.

You can combine ZADD and ADD.

 

[Athefre]

You can combine ZADD and ADD.

Do you mean ZADD and AVG? Of the separate programs from CUBELAB I have these in my calculator:

pgrmAVG

ClrHome
F+1->F
X->L1(F)
1-Var Stats
ClrHome
Disp "SOLVES:"
Output(1,9,n)
If n>2
Then
(sumx-maxX-minX)/(n-2)->E
Disp "AVERAGE:"
Output(2,10,round(E,2))
Disp "FASTEST:"
Output(3,10,minX)
Disp "SLOWEST:"
Output(4,10,maxX)
Disp "SDEV:"
Output(5,7,round(sigmax,2))
If n>12
prgmROLL
End
Pause
prgmCUBELAB (I took this line out if that makes any difference)

prgmROLL

1-Var Stats
n-12->X
For(Y,0,11,1)
L1(X+Y+1)->L2(Y+1)
End
1-Var Stats L2
Disp "RAVG:"
Output(6,6,round((sumx-minX-maxX)/10,2))
Disp "RFASTEST:"
Output(7,11,minX)
Disp "RSLOWEST:"
Output(8,11,maxX)

prgmZADD

ClrHome
Disp "ENTER TIME:"
Input X
prgmAVG

When I start the ZADD program it comes up with "ENTER TIME: ?" of course. Then I put "12" for example and press enter. Then it says ERR: INVALID DIM, I select "Goto" and the cursor is shown blinking on the ")" of line 3 of the AVG program.

I've checked the code many times and I don't see where I could have put in something wrong. For "sumx" I have the greek "Ex" and for "sigmax" I have the little greek "o" with a line on top of it thing

 

[linkmaster03]

No mine is not on the internet. Also mine will not do F F' (obvious), F B F' (still obvious), and other dumb things. It will always follow an F with a L, R, U, or D. Same for all other turns. THese work best when you make them yourself, because you have your own coding style, and you make it work exactly how you like. For instance, I don't like how Tim made like 20 different programs with a couple lines each. So I made mine all in 1 program, etc.

 

[Fobo911]

For some reason, when I get an error in executing the program, it usually highlights the 1 in "1-Var Stats"... Does anyone else have this problem?

 

[MistArts]

Sorry for the bump.

I've recently created a timer that is more accurate than Tim's by using Output instead of Disp.

:ClrHome
:0→A
:0→B
:While A=0
:getKey→A
:Output(4,4,round(B/35.9,2)
:B+1→B
:End
:ClrHome
:Output(4,4,round(B/35.9,2)

 

[Athefre]

Sorry for the bump.

I've recently created a timer that is more accurate than Tim's by using Output instead of Disp.

:ClrHome
:0→A
:0→B
:While A=0
:getKey→A
:Output(4,4,round(B/35.9,2)
:B+1→B
:End
:ClrHome
:Output(4,4,round(B/35.9,2)

It's a little fast on my TI-83 Plus.

 

[MistArts]

Sorry for the bump.

I've recently created a timer that is more accurate than Tim's by using Output instead of Disp.

:ClrHome
:0→A
:0→B
:While A=0
:getKey→A
:Output(4,4,round(B/35.9,2)
:B+1→B
:End
:ClrHome
:Output(4,4,round(B/35.9,2)

It's a little fast on my TI-83 Plus.

I have a TI-84 Plus. Adjust the 35.9 to something else to fit your calculator.

 

[Athefre]

I have a TI-84 Plus. Adjust the 35.9 to something else to fit your calculator.

Thanks, I adjusted and timed it along with a CD Player and 53.9 matched up with it best. I didn't try adjusting the .9 to something else.

 

[MistArts]

I made a 2x2 and 3x3 scrambler which I posted in my blog.

http://frozenmists.blogspot.com/2008/10/new-versions-of-my-scramblers-for-ti.html