Edit: i found out how to upload files to the calculator, but i'm still wondering if there is/how to use a code editor in CEmu

]]>However, if you don't want to input coefficients and just use the Y= vars directly, then it gets a bit complicated. Still doable though! The first thing you need to do is evaluate Y2-Y1 at three points. For convenience, we'll do -1, 0, and 1. From these three points, we can construct the coefficients:

Evaluate the three points:

`Y1(⁻1)-Y2(⁻1→A Y1(0)-Y2(0→B Y1(1)-Y2(1→C`

Interpolate to get the coefficients:

`.5(C-A→D 2(Ans+A-B→A`

(The quadratic equation is AX²/2+DX+B)

Now we just do our standard quadratic solver, but we'll add some safety checks:

`If A:Then D²-2AB If Ans<0 Ans+0i √(Ans→B Disp (D-B)/A,(D+B)/A Else If D=0:Then If B=0:Then Disp "INTERCEPTS EVERYWHERE Else Disp "INTERCEPTS NOWHERE End Else Disp ⁻B/D End End`

**NOTE:** This only works if Y1 and Y2 are quadratic (i.e., ax²+bx+c, but a and/or b are allowed to be 0)

There may be easier ways on the newer calcs, I'm not sure, but this should work either way :)

]]>` ``ClrHome Output(3,2,"VALUE OF MONEY" Output(4,6,"Version 1" Output(6,3,"U.S. EDITION" Output(8,3,"PRESS ENTER" Pause //You don't need the If getKey after the Pause, which forces the user to press enter twice. ClrHome randInt(1,4->C sub("QUARTERDIME NICKEL PENNY ",7C-6,7) //7 characters per coin name Input "VALUE OF "+Ans+"?",A {25,10,5,1 If A=Ans(C:Then Disp "WELL DONE! Else Disp "WRONG! IT IS",Ans(C End`

The formatting might not be the same or as pretty, but this does shred the usage of bytes down by quite a bit.

]]>so thanks for remaking the program I needed some on to do it that was not me because I did not know how to do it. :) ]]>

On line 12, your `Goto Z` is inside the an If-Then check, and jumping to a label outside results in a memory leak.

I've taken the liberty to correct your code below:

` ``:randInt(1,5→A :ClrHome :Disp "WHAT NUMBER AM I :Disp "THINKING OF? :Disp "(1 TO 5) :Repeat A=B :Prompt B :End :Disp "CORRECT`

I've gotten rid of the Labels and changed it to a `Repeat` loop, which does the same thing of what you are wanting your program to do.

Hope this helps :3

:Lbl Z

:ClrHome

:Disp "WHAT NUMBER AM I

:Disp "THINKING OF?

:Disp "(1 TO 5)

:Prompt B

:If B=A

:Then

:Disp "CORRECT

:Else

:Goto Z

:End ]]>

` ``ClrDraw ClrHome Output(3,2,"VALUE OF MONEY" Output(4,6,"Version 1" Output(6,3,"U.S. EDITION" Output(8,3,"PRESS ENTER" Pause If getKey=105 Then ClrHome END randInt(1,4->C If C=1 ClrHome Input "VALUE OF QUARTER?",A If A=25 Then ClrHome Disp "WELL DONE!" END If A ≠ 25 Then ClrHome Disp "WRONG!, IT IS 25" END If C=2 ClrHome Input "VALUE OF DIME?",A If A=10 Then ClrHome Disp "WELL DONE!" END If A ≠ 10 Then ClrHome Disp "WRONG!, IT IS 10" END If C=3 ClrHome Input "VALUE OF NICKEL?",A If A=5 Then ClrHome Disp "WELL DONE!" END If A ≠ 5 Then ClrHome Disp "WRONG!, IT IS 5" END If C=4 ClrHome Input "VALUE OF PENNY?",A If A=1 Then ClrHome Disp "WELL DONE!" END If A ≠ 1 Then ClrHome Disp "WRONG!, IT IS 1" END`

` ``ClrDraw ClrHome Outpuy(3,2,"VALUE OF MONEY" Output(4,6,"V.0.1" Output(6,3,"PRESS ENTER" Output(8,3,"U.S EDDITION" Pause If getKey=105 Then ClrHome END ClrHome Input "VALUE OF QUARTER?",A If A=25 Then ClrHome Disp "WELL DONE!" END If A ≠ 25 Then ClrHome Disp "WRONG!, IT IS 25" END`

]]>
` ``fPart(E7√(.1+randInt(0,9999)+cumSum(binomcdf(dim(L1)-1,0→L₂ SortA(L₂,L₁ //this code assumes L₁ is already defined !`

on my ti83+, i measured it to be about .5 seconds faster on average

]]>Unless you want to have them reappear

then I don't know ]]>

For example: String 1 stores X and X is 1234. How would I make String 1 store 1234?

I can't just do 1234 store into String 1, as I want the string to be able to change during the program.

And I can't just do "expr(X) store into String 1", as that just doesn't work. What can I do?

EDIT: "expr(String 1) store into String 1" doesn't work either, before someone says that.

]]>