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.
Code::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
Code::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.
Code::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!!!!!!![]()
Use: TO PLAY PONG!!!!![]()
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.![]()
![]()
Code::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 :







Reply With Quote




Nice, I like the pong
We all made very high grades. Heh, stupid nonsense graphing.



