Re: A82: Basic Conversion


[Prev][Next][Index][Thread]

Re: A82: Basic Conversion




GeradS711 wrote:
> 
> Yeah, yeah I know this is the wrong place to send this to, but I wrote this
> program for rotating 2nd degree equations for my 82, and it soon became pretty
> popular in my math class, but I couldn't port it to the 85 for some reason
> dealing with the
> 'sto->' command, do you have to define vars in 85 basic? Anyway, could
> somebody port this for me.... Thanx
> I had to use long hand a lot because of the way the font doesn't support the
> signs on email.... also // is a comment.
> Thanks again,
> Gerad
> :ClrDraw
> :Degree
> :Func
> :StoreGDB GDB1
> :""-->Y1  //as in the Y= screen
> :""-->Y2
> :""-->Y3
> :""-->Y4
> :AxesOff
> :LabelOff
> :ZStandard
> :Prompt A,B,C,D,E,F
> :B/(A-C)

  :tan(^ -1) Ans  // This does not work!!

> :Ans/2-->Z

  :Text(1,1,"<Theta>=",Z  // There is no Text command on the TI-85

  :Acos Zcos Z+Bcos Zsin Z+Csin Zsin Z  // This does not work

  :Ans-->G  //it errors here  /// I didn't get this far!!

  :Text(8,1,"A'=",G  // There is no Text command on the TI-85

  :Asin Zsin Z-Bsin Zcos Z+Ccos Zcos Z  // This does not work

> :Ans-->H

  :Text(15,1,"C'=",H  // There is no Text command on the TI-85

  :Text(22,1,round(G,2),"X'(^2)+",round(H,2),"Y'(^2)=",-round(F,2)  //
There is no Text command on the TI-85

> :Pause

  :RecallGDB GDB1  // RcGDB GDB1

  :ClrDraw  // ClDrw

> :AxesOn

  :ClrHome  // ClLCD


Why don't you send the TI-82 file!  I tried to fix it but I don't know
what parts are soposed to be!!!

I have a solution:



:ClDrw
:Degree
:Func
:StGDB GDB1
:""->Y1
:""->Y2
:""->Y3
:""->Y4
:AxesOff
:LabelOff
:ZStd
:Prompt A,B,C,D,E,F
:B/(A-C)
:Ans/2->Z
:Disp "<Theta>=",Z
:Ans->G
:Disp "A'=",G
:Ans->H
:Disp "C'=",H
:Disp round(G,2),"X'(^2)+",round(H,2),"Y'(^2)=",-round(F,2)
:Pause 
:RcGDB GDB1
:ClDrw
:AxesOn
:ClLCD


this does not work properly (I think) so see what you want to change.


    ---   /------       /\         \     |
   /   \  |            /  \        |\    |      Name: Sean Creasy
   \      |           /    \       | \   |
    ---   |----      /      \      |  \  |      E-Mail: n3yne@usa.net
       \  |         / CREASY \     |   \ |
   \   /  |        |          |    |    \|
    ---   \------  |          |    |     \
        Webpage: http://members.tripod.com/~n3yne
          IRC: Chatnet #N3YNE and EFNet #N3YNE


References: