| Author |
Message |
|
tyskis
Member
Joined: 20 Nov 2003
Posts: 238
|
 Posted: 21 Nov 2003 01:31:12 am Post subject: |
|
|
Hello, what about an algebraiv equation solver on the TI-83 Plus. It would be very useful...
But of course, very timeconsuming to program!
 |
|
| Back to top |
|
|
NETWizz
Byte by bit
Bandwidth Hog
Joined: 20 May 2003
Posts: 2369
|
| Posted: 21 Nov 2003 01:42:48 am Post subject: |
|
|
It would take one or two days.
I know; I have written one.
You can use the solver, and strings.
I will post mine if I ever remember. |
|
| Back to top |
|
|
Darth Android
DragonOS Dev Team
Bandwidth Hog
Joined: 31 May 2003
Posts: 2104
|
| Posted: 21 Nov 2003 02:10:03 am Post subject: |
|
|
you mean with vars?
[math]
[0] |
|
| Back to top |
|
|
Jedd
1980 Pong World Champion
Elite
Joined: 18 Nov 2003
Posts: 823
|
| Posted: 21 Nov 2003 02:43:39 am Post subject: |
|
|
| I've been looking into making one for my 83+. I'm not the greatest at playing with strings but that's obviously how you would do it, so I'll give it a shot next week over break, it'll give me a chance to learn to use strings.... |
|
| Back to top |
|
|
Darth Android
DragonOS Dev Team
Bandwidth Hog
Joined: 31 May 2003
Posts: 2104
|
| Posted: 21 Nov 2003 12:50:40 pm Post subject: |
|
|
if you are just solving for variables then use the solver built into the OS
[math] then [0] |
|
| Back to top |
|
|
Jedd
1980 Pong World Champion
Elite
Joined: 18 Nov 2003
Posts: 823
|
| Posted: 21 Nov 2003 06:31:07 pm Post subject: |
|
|
| yeah i didnt even know about that. theres times in the past when it could have helped me. thanks |
|
| Back to top |
|
|
Arcane Wizard
`semi-hippie`
Super Elite (Last Title)
Joined: 02 Jun 2003
Posts: 8993
|
| Posted: 22 Nov 2003 07:57:59 am Post subject: |
|
|
| There's also a bunch of functions (one for each type of function) on the calc that'll generate a function after inputting smoe x and y values. You can find them in STAT->CALC |
|
| Back to top |
|
|
DarkerLine
ceci n'est pas une |
Super Elite (Last Title)
Joined: 04 Nov 2003
Posts: 8328
|
| Posted: 22 Nov 2003 02:36:05 pm Post subject: |
|
|
Very time-consuming to program?
Code:
:Input "f(X)=",Str1
:Input "f'(X)=",Str2
:Input "Guess? ",X
:X
:Repeat X=Ans
:Ans -> X
:Ans - expr(Str1)/expr(Str2
:End
:Ans
I think it is very easy to program... |
|
| Back to top |
|
|
Arcane Wizard
`semi-hippie`
Super Elite (Last Title)
Joined: 02 Jun 2003
Posts: 8993
|
| Posted: 04 Dec 2003 12:46:33 pm Post subject: |
|
|
f ' for any function:
(Y1(X+D)-Y1(X))/D
D is something like .01 or .001 (or pretty much anything) depending on how accurate you want it to be. |
|
| Back to top |
|
|
tyskis
Member
Joined: 20 Nov 2003
Posts: 238
|
| Posted: 09 Dec 2003 11:10:10 am Post subject: |
|
|
i meant something like:
you input: "2x=23x^y-2"
(and say you want y)
and it outputs: "y=log(2x)/log(23x)-log(2)"
that is, with more than one variable, and you want one variable "taken out".
An easier example would be input: x=y/t output: y=xt...
or something like that!
that was my thougt, that there is an numerical equationsolver on [MATH][0], i did already know... but thanks anyway!   |
|
| Back to top |
|
|
Matt
Member
Joined: 11 Jun 2003
Posts: 169
|
| Posted: 09 Dec 2003 05:02:29 pm Post subject: |
|
|
ok well . . .here is the script to my first program ever!:
I decided I will release the source . . .YAY
Code:
Lbl 0
ClrHome
Menu(" SOLVING ","X SOLVER",1,"CREDITS",ME,"EXIT",99
Lbl 1
Input "Equ: ",Str1
Input "Guess? ",G:ClrHome
Output(4,2,"Calculating...")
0üA:0üB
inString(Str1,">"üA
If Aø0:Goto A
inString(Str1,"ù"üA
If Aø0:Goto A
inString(Str1,"<"üA
If Aø0:Goto A
inString(Str1,"÷"üA
If Aø0:Goto A
inString(Str1,"="üA:1üB
Lbl A
sub(Str1,1,A-1)üY
sub(Str1,A+1,length(Str1)-A)üY‚
solve(Y-Y‚,X,G)üX
0üC:0üD
If B=1:Then
Goto AB:End
If expr(Str1)=1:Then:1üC:End
X+1üX
If expr(Str1)=1:Then:1üD:End
X-2üX
If expr(Str1)=1:Then:2üD:End
1+XüX
Lbl AB:ClrHome
If C=1 and D=1
Disp "Xù"
If C=1 and D=2
Disp "X÷"
If C=0 and D=1
Disp "X>"
If C=0 and D=2
Disp "X<"
If C=0 and D=0
Disp "X="
Disp X,(X)åFrac
Pause :Goto 0
Lbl ME
Disp "By: Matt Furr"
Disp "UnlimitedTI "
Disp "United TI"
Goto 0
Or you could just go here: http://www.ticalc.org/archives/files/fileinfo/284/28430.html
I'm still updatein' it so you can graph the equ. and view it rounded and in fraction form. I will update it later
Last edited by Guest on 09 Dec 2003 05:03:12 pm; edited 1 time in total |
|
| Back to top |
|
|
|
Project Ideas/Start New Projects => Your Projects
