Calculator Programs

[Dreamt_in_a_Nightmare]

In our school we get TI-83 graphing calculators for our trigonometry class. I just program everything into my calculator so i don't have to do the work. I just thought I'd share a few with everyone and hopefully help them out. Plus if anyone has some new programs or even easier ways to do it, I'd appreciate it.

Area

: ClrHome
: Disp “1=SQUARE”,“2=CIRCLE”,“3=TRIANGLE”,“4=CUBE”,“5=SPHERE”,
“6=CYLINDER”,“7=CONE”
: Input X
: If X=1
: Then
: Prompt B,H
: B*H→X
: Disp X
: Else
: If X=2
: Then
: Prompt R
: πR²→X
: Disp X
: Else
: If X=3
: Then
: Prompt B,H
: 1/2BH→X
: Disp X
: Else
: If X=4
: Then
: Prompt H,L,W
: 2HW+2HL+2WL→X
: Disp X
: Else
: If X=5
: Then
: Prompt R
: 4πR²→X
: Disp X
: Else
: If X=6
: Then
: Prompt H,R
: 2πRH+2πR²→X
: Disp X
: Else
: If X=7
: Then
: Prompt R,S
: πR²+πRS→X
: Disp X


Autoquad (Quadratic Functions)

: ClrHome
: Disp “AX²+BX+C”
: Prompt A,B,C
: (A*C)→C
: (-B-√(B²-4C))/2→X
: If X<0
: Disp “X-”,X
: If X>0
: Disp “X-”,X
: (-B+√(B²-4C))/2→Y
: If Y<0
: Disp “X+”,-Y
: If Y>0
: Disp “X-”,Y




Distance (of a line)

: ClrHome
: Disp “X1=A”,“Y1=B”,“X2=C”,“Y2=D”
: Prompt A,B,C,D
: √((C-A)²+(D-B)²)→X
: Disp “DISTANCE=”,X
: ((A+C)2)→Y
: ((B+D)2)→Z
: Disp “MIDPOINT=”,Y,Z




Any questions or tips, feel free to explain. Hope it helps.

[LLaMaSaUceYup]

HAHA, You really did it.

[EI_Tizzy]

Man, I haven't messed around with one fo these in a while...

I used to make games all the time. My best was a working Wheel of Fortune... it had animated wheel, animated letter board... but that program was lost.

I think I still have my Lights Out program. I even coded in a solver! Whatever position you were stuck in, you would just hit F5 and it would show you the minimal solution in less than 3 seconds! Perhaps I can find the source code...

Also, your codes look nice... not my style to use prompt, but meh to each his own. You should collab all those into one program and use the "Menu(" function to create a little menu (hur) that would allow access to all 3.

edit: it would look like this:

: ClrHome
: Menu("TRIG SHORTCUTS","AREA FORMULAS",A,"AUTO-QUADRATIC",B,"DISTANCE FRM",C)
: End
: Lbl A
: Disp “1=SQUARE”,“2=CIRCLE”,“3=TRIANGLE”,“4=CUBE”,“5=SPH ERE”,
“6=CYLINDER”,“7=CONE”
: Input X
: If X=1
: Then
: Prompt B,H
: B*H→X
: Disp X
: Else
: If X=2
: Then
: Prompt R
: πR²→X
: Disp X
: Else
: If X=3
: Then
: Prompt B,H
: 1/2BH→X
: Disp X
: Else
: If X=4
: Then
: Prompt H,L,W
: 2HW+2HL+2WL→X
: Disp X
: Else
: If X=5
: Then
: Prompt R
: 4πR²→X
: Disp X
: Else
: If X=6
: Then
: Prompt H,R
: 2πRH+2πR²→X
: Disp X
: Else
: If X=7
: Then
: Prompt R,S
: πR²+πRS→X
: Disp X
:End:End:End:End:End:End:End
:Lbl B
: ClrHome
: Disp “AX²+BX+C”
: Prompt A,B,C
: (A*C)→C
: (-B-√(B²-4C))/2→X
: If X<0
: Disp “X-”,X
: If X>0
: Disp “X-”,X
: (-B+√(B²-4C))/2→Y
: If Y<0
: Disp “X+”,-Y
: If Y>0
: Disp “X-”,Y
: End
: Lbl C
: Disp “X1=A”,“Y1=B”,“X2=C”,“Y2=D”
: Prompt A,B,C,D
: √((C-A)²+(D-B)²)→X
: Disp “DISTANCE=”,X
: ((A+C)2)→Y
: ((B+D)2)→Z
: Disp “MIDPOINT=”,Y,Z

[Dreamt_in_a_Nightmare]

cool thanks man. i have a lot more but i really don't feel like typing them all right now. i only started because my teacher keeps deleting my calculator so i can't use them for homework.


P.S.-I'd definately be interested in those games if you could send them to me.

[Sh4d0wD3v1L]

I have an amazing quadratic formula program on my calculator....Found the source on the internet. If I find the link, I'll post it.

Took me 45 minutes to program it in, though, so do yourself a favor and use the computer cable.

[Dreamt_in_a_Nightmare]

i don't have a cable. school doesn't give us those. i've been looking for a password program to lock the calculator if anyone knows of one