SRL Archive - General

Here are some programs me and my friend made during math class, most of them he made but I helped made a few myself. Here are a few of them.

Important Things to Know:
1. The : in the code is automatically put there ever new line.
2. The Space between things like If F<3 are automatically put there, the only time you need to put spaces is in text which is enclosed by "".
3. Once you have finished typeing in the code press Quit(2nd + MODE) to save the program.

Legend:
(some code symbols in calc aren't on scar so this will tell you what to really type in when there are these symbols in the code)

(—) = negative, since minus and negatice are different keys and meanings on graphing calculators it makes a huge difference on which you use, when you see (—) in the code press the key that looks like this : (-) it is left of the enter key.


Key Decoder
Use: To get the assigned number for the keys on the calculator.
Things to know: To stop the program press the second key, it will also display its number when you do that, it is 21.

:ClrHome
:While 1
:getKey->A
:While A=0
:getKey->A
:End
:Disp A
:If A=21
:Stop
:End
:

Pythagerous
Use: Very quick way to go pythagerous equation.
Thing to know: You will be asked to input 3 valuse, A, B and C.
A is one of the sides.
B is the other side
C MUST be the hypontenuse.
Whichever you aren't useing declaire it as zero. So if you want to find the hypontenuse of a right angle triangle you would put in something like:
A: 24
B: 34
C: 0
If you have the hypontenuse and need one of the other sides you would put in something like:
A: 24
B: 0
C: 54

:Prompt A,B,C
:If C≤0
:Then
:√(A²+B²)->C
:Disp "UNKNOWN SIDE IS",C
:Else
:
:If B≤0
:Then
:√(C²-A²)->B
:Disp "UNKNOWN SIDE IS",B
:Else
:
:If A≤0
:Then
:√(C²-B²)->A
:Disp "UNKNOWN SIDE IS",A
:End
:

Guessing Game
Use: A fun game where you try guess a random number between 0 and the one you put in.

:Output(1,1,"WELCOME TO MY<3Spaces>GUESSING GAME")
:Pause
:ClrHome
:Input "LARGEST NUMBER?",A
:randInt(0,A)->B
:Lbl GG
:Input "GUESS?",C
:If C=B
:Then
:Disp "YAY YOU WIN"
:Stop
:Else
:Disp "WRONG"
:Goto GG
: 

PONG!!!!!!:spot:
Use: TO PLAY PONG!!!!:spot:
Things to know: This is a Beta version, we are working on it to make it 2 player if you have a link cord for the calculator….so currently you control both pattles, but its really fun anyway.:spot: :spot:

:Lbl PG
:0->Xmin
:94->Xmax
:0->Ymin
:62->Ymax
:0->B
:0->E
:ClrHome
:Input "PADDLE SIZE?",C
:C->H
:ClrHome
:30->F
:45->G
:1->I
:1->J
:ClrHome
:AxesOff
:ClrDraw
:Pxl-On(F,G)
:Repeat 0
:F->K
:G->L
:G+J->G
:If F>60 or G>93 or F<2 or G<3
:Then
:If F>60
:Then
:I*(---)1->I
:End
:If F<2
:Then
:I*(---)1->I
:End
:If G<3 or G>89
:Then
:If 0
:Then
:Lbl AA
:Stop
:End
:Menu("YOU LOSE","PLAY AGAIN",PG,"QUIT",AA)
:End
:End
:If pxl-Test(F,G)
:Then
:J*(---)1->J
:K+I->F
:L+J->G
:End
:getKey->D
:If D=25
:Then
:B->M
:C->N
:B+1->B
:C+1->C
:If C>62
:Then
:B-1->B
:C-1->C
:End
:End
:If D=34
:Then
:B->M
:C->N
:B-1->B
:C-1->C
:If B<0
:Then
:B+1->B
:C+1->C
:End
:End
:B->E
:C->H
:M->D
:N->R
:Pxl-Off(K,L)
:PxlOn(K,L)
:Line(9,M,N,0)
:Line(85,O,85,R,0)
:Line(9,B,9,C)
:Line(85,E,85,H)
:End
:

:p Nice, I like the pong

I'll type up the space invaders game that I made a while back…

I had pong and like 20 other things that I'd made, but some kid 'accidentally' erased them…

lol well we got other ones like the cosine law and junk like that…but after typing out pong…i was too lazy to do any more lol

:p Yes, it is very boring to type out programs…

My spaceinvaders program is 4 and a half pages written

lol…holy cow…did you program it yourself?

:p Every day, I spend 1 hour in a physics class with a retarded teacher

Heh, not much else for me to do…

I just gotta find the notebook I wrote it in, cause I really don't feel like typing 4 pages of stuff off of that eight line screen….

EDIT: Just realized how close I am to post #1k…which is gonna be my member's app, for which I need to perfect my powercutter, which might take a couple days…so I gotta save up me posts now…

lol someone who feels my pain!!! lol…when my sainity comes back i'll psot the other ones

I made some programs to use on my tests in PreCalc. Gave them to the whole class. :D We all made very high grades. Heh, stupid nonsense graphing.

I KNOW!!! liek come on…who really wants to right out the cosine law formula everytime when they dont even look at ur work on privinchal exams…its just a bubble sheet :)

Wow, you must've been really bored, lol, I hate programming my TI84, it's so boring -_-

lol if you knew my math teacher…programing on TI84 is very fun >.<

LOL Hobbit you acually posted our programs… of course now there is that bowling that i made :spot:

Oooo bowling

Now there's a good idea!

From: Erik the Red
LOL Hobbit you acually posted our programs… of course now there is that bowling that i made :spot:

1 month bump -.-
Oh well it's a good topic.

lol yes eric i did…i told you i did took forever to type it all out from the clac… but when im really bored again i will post our newest programs

From: Smartzkid
:p Every day, I spend 1 hour in a physics class with a retarded teacher

Heh, not much else for me to do…

I just gotta find the notebook I wrote it in, cause I really don't feel like typing 4 pages of stuff off of that eight line screen….

Lol yea, exactly the same for me in math class. We were started doing logs last week and stuff with matrices this week, both of which I already knew how to do. So basically I just sit there making space invaders. I'm thinking about stopping now though. It takes like 2 minutes just to scroll down to the section I need to add to.

just run the program and press on and instead of pressing quit press goto and let it goto the end of the coed for you…smartz do you know how to use the asembly code?

This is a pretty good tutorial where I started learning.
I noticed that the code samples he gives aren't always correct, but he explains most of the useful commands pretty well.

http://www.ticalc.org/programming/columns/83plus-bas/cherny/

Well I know how to program with normal Ti-83 code. But what I want to learn now is assembly. Assembly is the code that makes programs for the applications(apps) button.