This is an archived, read-only copy of the United-TI subforum , including posts and topic from May 2003 to April 2012. If you would like to discuss any of the topics in this forum, you can visit Cemetech's TI-BASIC subforum. Some of these topics may also be directly-linked to active Cemetech topics. If you are a Cemetech member with a linked United-TI account, you can link United-TI topics here with your current Cemetech topics.

TI-Basic => TI-BASIC
Author Message
panyan

Member

Joined: 29 Dec 2007
Posts: 142

 Posted: 04 May 2008 09:49:14 am    Post subject: is there a way to make the calc give me the degrees in radians in tems of pie? E.G. Normal case: 360degrees = 6.283185 Wanted: 360degrees = 2pi this is only in the radians function, not degrees mode thanks alot - im still trying to get calc perfect!!!Last edited by Guest on 04 May 2008 09:49:37 am; edited 1 time in total
vuurrobin

Joined: 09 Aug 2006
Posts: 428

 Posted: 04 May 2008 10:20:35 am    Post subject: you can just divide the number with pi.
panyan

Member

Joined: 29 Dec 2007
Posts: 142

 Posted: 04 May 2008 11:48:48 am    Post subject: but i want it to display: 30degrees = pi/6
luby
I want to go back to Philmont!!

Calc Guru

Joined: 23 Apr 2006
Posts: 1477

 Posted: 04 May 2008 01:14:16 pm    Post subject: Well, that would take some advanced knowledge of ASM and Hooks, but It could be possible. Maybe. I would suggest memorizing them. Or if you want a program, there's this,
panyan

Member

Joined: 29 Dec 2007
Posts: 142

 Posted: 04 May 2008 01:37:48 pm    Post subject: luby wrote:Well, that would take some advanced knowledge of ASM and Hooks, but It could be possible.  Maybe.  I would suggest memorizing them.  Or if you want a program, there's this, [post="123204"]<{POST_SNAPBACK}>[/post] i think you need to check your link
cjgone
Aw3s0m3

Active Member

Joined: 24 May 2006
Posts: 693

 Posted: 04 May 2008 02:55:47 pm    Post subject: 30 degrees = 30\180 * pi..... so simplify 30\180, use the program (this could be done like 30 seconds) and now you get 1\6 1\6 * pi = pi\6... No there is no way on the calc, but its so easy, you just do (x\180)->fraction....then mutiply pi... 30 * (pi\180) = pi ( 1\6)...Last edited by Guest on 04 May 2008 02:57:35 pm; edited 1 time in total
Weregoose
Authentic INTJ

Super Elite (Last Title)

Joined: 25 Nov 2004
Posts: 3976

 Posted: 04 May 2008 02:57:47 pm    Post subject: luby wrote:Well, that would take some advanced knowledge of ASM and Hooks, but It could be possible. Maybe. I would suggest memorizing them. Or if you want a program, there's this,There's also this: Ans[font="times new roman"]°/[font="times new roman"]π[font="verdana"]r→A {1,0→A abs(A→B 0 Repeat not(A-Ans‾¹round(AnsA,0 {Ans,Ansint(B)+[font="arial"]LA(1→A If fPart(B 1/fPart(B→B max([font="arial"]LA End round(AnsA+{0,Ans→L2 {0,1→L1 LinReg(ax+b) Y1 Equ►String(Y1,Str1 3+int(log(a // [VARS] [5] [►] [►] [2] sub(Str1,Ans+1,length(Str1)-Ans)+"[font="times new roman"]π/"+sub(Str1,1,Ans-2 75:prgmRADIANS would return 5[font="times new roman"]π/12, for example. But seriously, 75[font="times new roman"]°/[font="times new roman"]π[font="verdana"]r►Frac really ought to be enough. [EDIT] – Combined two lines.Last edited by Guest on 11 Jul 2010 03:24:13 pm; edited 1 time in total
luby
I want to go back to Philmont!!

Calc Guru

Joined: 23 Apr 2006
Posts: 1477

 Posted: 04 May 2008 03:00:09 pm    Post subject: The degree and radians symbol are found by 2nd +apps.
Weregoose
Authentic INTJ

Super Elite (Last Title)

Joined: 25 Nov 2004
Posts: 3976

 Posted: 04 May 2008 07:32:53 pm    Post subject: panyan wrote: luby wrote:Well, that would take some advanced knowledge of ASM and Hooks, but It could be possible. Maybe. I would suggest memorizing them. Or if you want a program, there's this, [post="123204"]<{POST_SNAPBACK}>[/post] i think you need to check your linkActually, you're not missing much... Two-thirds of the code in that program goes into the title screen, while the functional part looks like this: Lbl 1 Input "",A Disp A►Frac Disp A►Dec Goto 1 Last edited by Guest on 11 Jul 2010 03:25:54 pm; edited 1 time in total
panyan

Member

Joined: 29 Dec 2007
Posts: 142

 Posted: 05 May 2008 10:27:20 am    Post subject: Weregoose wrote: luby wrote:Well, that would take some advanced knowledge of ASM and Hooks, but It could be possible. Maybe. I would suggest memorizing them. Or if you want a program, there's this,There's also this: Ans[font="times new roman"]°/[font="times new roman"]π[font="verdana"]r→A {1,0→A abs(A→B 0 Repeat not(A-Ans‾¹round(AnsA,0 {Ans,Ansint(B)+[font="arial"]LA(1→A If fPart(B 1/fPart(B→B max([font="arial"]LA End round(AnsA+{0,Ans→L2 {0,1→L1 LinReg(ax+b) Y1 Equ►String(Y1,Str1 3+int(log(a // [VARS] [5] [►] [►] [2] sub(Str1,Ans+1,length(Str1)-Ans)+"[font="times new roman"]π/"+sub(Str1,1,Ans-2 75:prgmRADIANS would return 5[font="times new roman"]π/12, for example. But seriously, 75[font="times new roman"]°/[font="times new roman"]π[font="verdana"]r►Frac really ought to be enough. [EDIT] – Combined two lines. [post="123211"]<{POST_SNAPBACK}>[/post] and how do i make that into a prgm?Last edited by Guest on 11 Jul 2010 03:29:58 pm; edited 1 time in total
Weregoose
Authentic INTJ

Super Elite (Last Title)

Joined: 25 Nov 2004
Posts: 3976

 Posted: 05 May 2008 11:36:03 am    Post subject: panyan wrote:and how do i make that into a prgm?From the home screen, press [PRGM], highlight NEW, select 1:Create New, and start putting things together. If you have trouble locating a command, then refer to the CATALOG ([2nd] [0]). I'm wanting you to try this at least once; if it doesn't pan out, then I'll convert it so you can just send it over.
panyan

Member

Joined: 29 Dec 2007
Posts: 142

 Posted: 08 May 2008 02:08:39 pm    Post subject: ^fair enough - when my exams are over ill devote alot of time to it - thanks for your help p.s. isnt it easier to copy paste into notepad and then change extension to 8xk? UPDATE: it is pretty easy when you get started, with the limited time i had i got up to here, i didnt really understand your previous posts, so i tried to write both, but i really hope it yields 30degrees = pi/6Last edited by Guest on 08 May 2008 02:21:03 pm; edited 1 time in total
Weregoose
Authentic INTJ

Super Elite (Last Title)

Joined: 25 Nov 2004
Posts: 3976

 Posted: 08 May 2008 03:07:27 pm    Post subject: Looks like you're having trouble (getting commands confused, etc.), so you may just download it here instead.
panyan

Member

Joined: 29 Dec 2007
Posts: 142

 Posted: 09 May 2008 10:34:32 am    Post subject: Weregoose wrote:Looks like you're having trouble (getting commands confused, etc.), so you may just download it here instead. [post="123412"]<{POST_SNAPBACK}>[/post] instead of just using your verison, im gonna have a look at it to see if mine can be salvaged so i can atleast learn something - thanks
panyan

Member

Joined: 29 Dec 2007
Posts: 142

 Posted: 11 May 2008 08:52:48 am    Post subject: ok, i;ve had a look, but then i use the program, it says that 30degrees is 747867pi/25709533 - how can this be foxed so that it says 30degrees = pi/6? thanks for you helpLast edited by Guest on 11 May 2008 08:53:07 am; edited 1 time in total
Weregoose
Authentic INTJ

Super Elite (Last Title)

Joined: 25 Nov 2004
Posts: 3976

 Posted: 11 May 2008 11:26:15 am    Post subject: Don't write the degrees symbol in front of your input – I thought having it like that would make it easier. If you do want to keep writing °, though, then remove the ° after Ans at the beginning of the program. Last edited by Guest on 11 Jul 2010 03:30:35 pm; edited 1 time in total
panyan

Member

Joined: 29 Dec 2007
Posts: 142

 Posted: 12 May 2008 12:48:32 pm    Post subject: thanks for all your help, can i ask how i'd be able to make it into an actual prgm which would say: 1) angle in degrees? 2) in terms of pi? 3) answer! or something along those lines?
Weregoose
Authentic INTJ

Super Elite (Last Title)

Joined: 25 Nov 2004
Posts: 3976

 Posted: 26 May 2009 05:01:27 am    Post subject: Going back over this, I thought I'd remake it for those who aren't working with fractions of degrees: If fPart(Ans 180Ans/[font="times new roman"]π gcd(Ans,180)‾¹(180+{0,Ans→L2 {0,1→L1 DelVar Y1LinReg(ax+b) Y1 Equ►String(Y1,Str1 1+int(log(a sub(Str1,1,Ans)+"[font="times new roman"]π/"+sub(Str1,Ans+3,1+int(log(b Again, a and b are the EQ VARS that get updated by the regression. It should work regardless of mode or whether the degree symbol is suffixed to the input. [EDIT] ...Except for when the regression yields funky results, as in the case of θ=72°. [EDIT×2] For some strange reason, this program threw a domain error at me whenever Y1 was occupied at the start of the program. The above code has been edited to prevent that.Last edited by Guest on 11 Jul 2010 03:20:01 pm; edited 1 time in total
 Display posts from previous: All Posts Oldest FirstNewest First
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

»
 Page 1 of 1 » All times are UTC - 5 Hours