Thank you for your time, support, advice and tips.

Thanks for any help 😊

Here is my code if that helps

Lbl EL Disp “X Input X Disp “B Input B Disp “Y Input Y “logBASE(“+toString(Y)+”,”+toString(B)+”)”->Y1 Equ>String(Y1,Str1) Disp Str1+”=“+toString(x) Pause Goto T

(Note, this is in SourceCoder3 format) Here's the code:

For(I,4,~1+int(1.59154943092*pi End I+BROWN/int([e]->I% not(Ans->|N Goto E Lbl C If |N=2MedGray+1 Goto E If sum(|N={DarkGray,25,2Magenta,2Navy,2MedGray+1 Then Output(I,I%," " I+(|N=2Navy)(I<Blue)-(|N=Gray+2)(I>1->I I%+(|N=2Magenta)(I%<2Magenta)-(|N=DarkGray)(I%>1->I% End Lbl S Output(I,I%,"X" For(theta,int(~|E9rand),0 getKey->|N If Ans 1->theta End Goto C Lbl E ClrHome If not(|N Goto S

Much of the community here is comprised of BASIC programmers, so you won't be as affected. However, many popular games and utilities are assembly programs, so you and other calculator owners won't be able to play/use them on the new OS (and presumably subsequent ones).

On the bright side, this does mean that there will be more demand for BASIC games, and we might see more people who need our help.

Stay safe everyone!

AxesOff PlotsOff GridOff FnOff 0→Xscl 0→Yscl Lbl 0 Menu(" ACT Ver. 7a R² "," DIST./PYTHAG.",A," QUAD FORMULA",B," SYSTEM OF EQ.",C," TRIANGLES",D," NUMBER THEORY",I," FORMULAS/GRFS",L," QUIT (10/01)",Z) Lbl A Menu(" OPTIONS "," DIST./SLOPE",1," PYTHAG.",2," MAIN MENU",0) Lbl 1:ClrHome Disp "(x₁,y₁) (x₂,y₂)","" Input "x₁ = ",A Input "y₁ = ",B Input "x₂ = ",C Input "y₂ = ",D 2→dim(L₁) (A+C)/2→L₁(1) (B+D)/2→L₁(2) √((A-C)²+(B-D)²)→E ClrHome:Disp "DIST.=" Output(1,8,"√("):Output(1,9,E²) Disp E Output(2,3,"OR") If C-A=0:Then Disp "",A:Output(4,1,"EQN. IS X = ") Else Disp "",L₁Frac Output(3,1,"MIDPT=") (D-B)/(C-A)→M M*­A+B→Y Output(5,1,"EQUATION: Y=MX+B") Disp "",MFrac,YFrac Output(6,3,"M =") Output(7,3,"B =") End Pause :Goto A Lbl 2 Menu(" WHAT IS KNOWN? "," LEG-HYP",3," 2 LEGS",4) Lbl 3:ClrHome Input "LEG = ",B Input "HYP = ",A If (A²-B²)<0:Then Disp "NOT A TRIANGLE" Pause :Goto A End Output(4,1,"HYP = √(") Output(4,9,A²-B²) Disp "","","",√(A²-B²) Output(6,1,"OR") Pause :Goto A Lbl 4:ClrHome Input "LEG 1 = ",B Input "LEG 2 = ",C Output(4,1,"HYP = √(") Output(4,9,B²+C²) Disp "","","",√(B²+C²) Output(6,1,"OR") Pause :Goto A Lbl B:ClrHome FnOff Disp "AX²+BX+C = 0" Lbl G:Input "A (≠0) ",A If A=0:Goto G Input "B = ",B Input "C = ",C B²-4AC→D ­B/(2A)→L₆(1) AL₆(1)²+BL₆(1)+C→L₆(2) ClrDraw Text(1,1,"DISCRIMINANT =") Text(1,55,D) Text(8,1,"ZEROS:") Text(15,1,"---------------------------------------") If D>0:Goto J If D<0:Goto H Text(24,1,"DOUBLE ZERO =") Text(24,50,­B/(2A)) Text(57,67,"<ENTER>") Text(47,1,"VERTEX = (",L₆(1),", ",L₆(2),")") Pause :Goto 0 Lbl J (­B+√(D))/(2A)→X (­B-√(D))/(2A)→Y Text(24,1,"REAL ZEROS =") Text(24,47,X) Text(31,47,Y) Text(57,67,"<ENTER>") Text(47,1,"VERTEX = (",L₆(1),", ",L₆(2),")") Pause :Goto 0 Lbl H ­B/(2A)→L₅(1) √(­D)/(2A)→L₅(2) round(L₅,5)→L₅ Text(24,1,"COMPLEX ZEROS") Text(31,10,L₅(1)) Text(31,39,"+") Text(31,44,L₅(2)) Text(31,72,"") Text(38,10,L₅(1)) Text(38,39,"-") Text(38,44,L₅(2)) Text(38,72,"") Text(57,67,"<ENTER>") Text(47,1,"VERTEX = (",L₆(1),", ",L₆(2),")") Pause :Goto 0 Lbl C:ClrHome Input "WHAT SIZE? ",N Lbl N:ClrHome {N,N}→dim([A]):{N,1}→dim([B]) For(θ,1,N) ClrHome Output(1,1,"EQN:"):Output(1,6,θ) Disp "" If N=2:Disp "AX + BY = C" If N=3:Disp "AX + BY + CZ = D" Input "A = ",X X→[A](θ,1) Input "B = ",X X→[A](θ,2) If N=2:Then Input "C = ",X X→[B](θ,1) End If N=3:Then Input "C = ",X X→[A](θ,3) Input "D = ",X X→[B](θ,1) End End If det([A])=0 Then:ClrHome:Disp "NO SOLUTION" Disp "DETERMINANT = 0" Pause :Goto 0 End ClrHome If [B](1,1)*[A](2,1)-[B](2,1)*[A](1,1)=0 Then:Disp "INF. SOLUTIONS" Pause :Goto 0 End [A][B]→[C]:N→dim(L₁) For(θ,1,N) [C](θ,1)→L₁(θ):[C](θ,1)→L₁(θ) End If N=2:Then Disp "(X,Y) =" Disp L₁ Pause L₁Frac:End If N=3:Then Disp "(X,Y,Z) = " Disp L₁ Pause L₁Frac:End Goto 0 Lbl D:ClrHome:Degree Menu(" GIVEN INFO "," ASA",5," AAS",6," SAS",7," SSS",8," MAIN MENU",0) Lbl 5:ClrHome Input "ANGLE = ",A Input "SIDE = ",E Input "ANGLE = ",C 180-A-C→B:Esin(A)/sin(B)→D Esin(C)/sin(B)→F:Goto E Lbl 6:ClrHome Input "ANGLE = ",A Input "ANGLE = ",B Input "SIDE = ",D 180-A-B→C:Dsin(B)/sin(A)→E Dsin(C)/sin(A)→F:Goto E Lbl 7:ClrHome Input "SIDE = ",E Input "ANGLE = ",A Input "SIDE = ",F (E²+F²-2EFcos(A)→Q If Q≤0:Goto U √(Q→D:((E²-D²-F²)/(­2DF))→Q If abs(Q)>1:Goto U cos(Q)→B:180-A-B→C:Goto E Lbl 8:ClrHome Input "SIDE = ",D Input "SIDE = ",E Input "SIDE = ",F If D+E≤F or E+F≤D or D+F≤E:Goto U cos((D²-E²-F²)/(­2EF))→A cos((E²-D²-F²)/(­2DF))→B 180-A-B→C:Goto E Lbl U:ClrHome Disp "NO TRIANGLE" Pause :Goto D Lbl Y:ClrHome 90→C:√((F²-D²)→E 90-A→B:Goto 6 Lbl 9:ClrHome sin(Fsin(A)/D)→C 180-A-C→B Dsin(B)/sin(A)→E:Goto 6 Lbl E:AxesOff:FnOff :ClrDraw Text(5,5,"ANGLE"):Text(5,60,"SIDE") Text(12,5,"-----"):Text(12,60,"----") Text(18,5,"1= ",A) Text(18,60,"1= ",D) Text(25,5,"2= ",B) Text(25,60,"2= ",E) Text(32,5,"3= ",C) Text(32,60,"3= ",F) .5EFsin(A)→Z Text(45,5,"AREA =",Z) Text(55,5,"HIT <ENTER> FOR MENU") Pause :AxesOn :ClrDraw FnOn :Goto D Lbl I:Menu(" NUMBER THEORY "," FACTORIAL",S," LCM / GCD",T," PERM./COMB.",V," PRIME FACTORS",W," MAIN MENU",0) Lbl S:ClrHome Disp "FACTORIAL N!" Disp "----------------" Disp "ENTER N" Input "(N<70) -> ",N Disp "",N! Output(6,1,N) Output(6,3,"!=") Pause :Goto I Lbl T:ClrHome Disp "LCM / GCD" Disp "----------------" Input "1ST NUM -> ",N Input "2ND NUM -> ",M lcm(N,M)→A:gcd(N,M)→B Disp "",A,B:Output(6,1,"LCM =") Output(7,1,"GCD ="):Pause :Goto I Lbl V:ClrHome Disp "PERM./COMB." Input "N = ",N Input "R = ",R N nPr R→A:N nCr R→B Disp "",A,"",B Output(4,1,"nPr =") Output(6,1,"nCr =") Pause :Goto I Lbl W:ClrHome 20→dim(⌊PR):Fill(0,⌊PR) Disp "PRIME FACTORS:" Disp "----------------" 1→I:2→Q Input "NUMBER ",N ClrHome Disp "PRIME FACTORS OF","" Disp "----------------" Output(2,3,N):Output(2,10,"ARE:") Lbl M If fPart(N/Q)=0:Then Q→⌊PR(I):I+1→I:N/Q→N Else:Q+1→Q:End If Q≤N:Goto M If N≠1:N→⌊PR(I) For(J,1,20) If ⌊PR(J)=0:Goto X End Lbl X:J-1→dim(⌊PR) If dim(⌊PR)=1:Disp "PRIME" Disp ⌊PR:Pause :Goto I Lbl L:AxesOff:FnOff Menu(" FORMULAS "," ALG/GEO/SEQ.",P," CONICS",Q," TRIG./TRI.",R," CONVERSIONS",θ," PARENT GRAPHS",O," MAIN MENU",0) Lbl P:ClrDraw Text(1,1,"SLOPE: M = (y₂-y₁)/(x₂-x₁)") Text(8,1,"MIDPT: (x₁+x₂)/2, (y₁+y₂)/2") Text(15,1,"LINES: Y = MX + B AX + BY = C") Text(22,25,"Y - y₁ = M(X - x₁)") Text(29,1,"QUAD: Y = AX²+BX+C") Text(36,25,"Y = A(X-H)²+K") Text(42,1,"FOR:X=[­B+/-√(B²-4AC)]/2A") Text(49,1,"VERTEX: X=­B/2A F(­B/2A)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"D = RT (AB)²=A²B²") Text(10,1,"X²X=X (X²)=X") Text(8,25,"5"):Text(8,63,"6") Text(19,1,"I=PRT A=Pe") Text(28,1,"A=P(1+R/N)") Text(17,54,"RT"):Text(26,39,"NT") Text(35,1,"X =1/X 1/X = X") Text(42,1,"DOMAIN = ALL REALS EXCEPT:") Text(49,1,"1-DIVISION BY 0") Text(56,1,"2-EVEN RTS OF NEG.") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"SPECIAL FACTORS") Text(7,1,"--------------------------------") Text(13,1,"X²-(A+B)X+AB = (X-A)(X-B)") Text(20,1,"A²-B² = (A+B)(A-B)") Text(27,1,"A-B = (A-B)(A²+AB+B²)") Text(34,1,"A+B = (A+B)(A²-AB+B²)") Text(42,1,"A - B = (A²+B²)(A+B)(A-B)") Text(40,5,"4") Text(40,18,"4") Text(49,1,"A²+B² = NONE") Text(57,1,"A + B = NONE") Text(55,5,"4") Text(55,18,"4") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"IMAGINARY POWERS") Text(10,1,"=√(­1) ²=­1") Text(20,1,"=­  =1") Text(18,34,"4") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"ARITHMETIC SEQ./SERIES") Text(8,4,"A = A + (N-1)D") Text(11,8,"N") Text(17,4,"S = (N/2)[2A + (N-1)D]") Text(20,8,"N") Text(27,1,"GEOMETRIC SEQ./SERIES") Text(35,4,"A = AR") Text(37,8,"N") Text(33,26,"N-1") Text(43,4,"S = A(1 - R )/(1 - R)") Text(41,39,"N-1") Text(45,8,"N") Text(52,4,"S = A/(1 - R) ­1<R<1") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"FACTORIAL") Text(9,1,"n! = n(n - 1)(n - 2) . . . (2)(1)") Text(20,1,"COMBINATION") Text(34,1," nCr = -------") Text(28,32,"n!") Text(40,22,"r!(n-r)!") Text(20,51,"PERMUTATION") Text(34,51," nPr = ------") Text(28,80,"n!") Text(40,72,"(n - r)!") Text(48,10,"NO ORDER") Text(48,65,"ORDER") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"PASCAL'S") Text(1,60,"TRIANGLE") Text(1,45,"1") Text(7,41,"1 1") Text(13,37,"1 2 1") Text(19,33,"1 3 3 1") Text(25,29,"1 4 6 4 1") Text(31,25,"1 5 10 10 5 1") Text(37,21,"1 6 15 20 15 6 1") Text(43,17,"1 7 21 35 35 21 7 1") Text(49,13,"1 8 28 56 70 56 28 8 1") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"GEOMETRY FORMULAS - PG. 1") Text(9,1,"CIRCLE: A = πR²") Text(16,1,"CIRCLE: C = 2πR = πD") Text(23,1,"SPHERE: V = (4/3)πR") Text(30,1,"SPHERE: SA = 4πR²") Text(37,1,"CYLINDER: V = πR²H") Text(44,1,"CYLINDER: SA = 2πRH + 2πR²") Text(51,1,"CONE: V = (1/3)πR²H") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"GEOMETRY FORMULAS - PG. 2") Text(9,1,"RECT.: A = L*W P = 2L + 2W") Text(16,1,"SQR.: A = S² P = 4S") Text(23,1,"TRAP.: A = 0.5H(B1 + B2)") Text(30,1,"RHOMBUS: A = B*H = B²sin(θ)") Text(37,1,"PARALLELOGRAM: A = B*H") Text(44,35,"A = S1*S2*sin(θ)") Text(57,67,"<ENTER>") Pause :Goto L Lbl O:AxesOn Thick ­4.7→Xmin:4.7→Xmax:1→Xscl ­3.1→Ymin:3.1→Ymax:1→Yscl DispGraph Text(50,8,"Y = X") DrawF X Text(5,10,"Y = X²") DrawF X² Text(18,62,"Y = log(X)") DrawF log(X) Text(57,67,"<ENTER>") Pause :ClrDraw DispGraph Text(5,5,"Y = abs(X)") DrawF abs(X) Text(19,72,"Y = 1/X") Text(37,1,"Y = 1/X") DrawF 1/X Text(57,13,"Y = X") DrawF X Text(57,67,"<ENTER>") Pause :ClrDraw ­1→Ymin DispGraph Text(1,25,"Y = ^(X)") DrawF ^(X) Text(1,68,"Y = 2^X") DrawF 2^X Text(33,62,"Y = ^(­X)") DrawF ^(­X) Text(57,67,"<ENTER>") Pause :ClrDraw ­3.1→Ymin:Dot-Thick Text(1,12,"Y = [X]") DrawF int(X) Text(9,6,"GREATEST") Text(16,6,"INTEGER") Text(23,6,"FUNCTION") Text(34,49,"CLOSED - LEFT") Text(41,52,"OPEN - RIGHT") Text(57,67,"<ENTER>") Pause :ClrDraw Radian 0→Xmin:2π→Xmax:π/2→Xscl ­2→Ymin:2→Ymax:1→Yscl Text(23,85,"2π") Text(23,47,"π") Text(48,2,"AMPLITUDE = 1 PERIOD = 2π") Text(9,10,"Y = sin(X)") DrawF sin(X) Text(9,63,"Y = cos(X)") DrawF cos(X) Text(57,67,"<ENTER>") Pause :Degree:Thick AxesOff:Goto L Lbl Q:ClrDraw Text(1,10,"AX² + BY² + CX + DY + E = 0") Text(7,1,"-------------------------------" Text(13,1,"If A=B ...........................") Text(13,62," CIRCLE") Text(20,1,"If A≠B, = SIGNS ...............") Text(20,62," ELLIPSE") Text(27,1,"If A, B DIFFERENT SIGNS .........") Text(34,58,"HYPERBOLA") Text(41,1,"If 1 SQR. TERM ...................") Text(41,60," PARABOLA") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"CIRCLE") Text(1,33,"(X-H)²+(Y-K)²=R²") Text(8,1,"ELLIPSE - HORIZONTAL") Text(15,1,"(X-H)² (Y-K)²") Text(21,1,"----- + ----- = 1 (A > B)") Text(27,9,"A²"):Text(27,37,"B²") Text(34,1,"VERTICAL") Text(34,57,"A² = B² + C²") Text(41,1,"(X-H)² (Y-K)²") Text(47,1,"----- + ----- = 1 (A > B)") Text(53,9,"B²") Text(53,37,"A²") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"PARABOLA - VERTICAL") Text(7,1,"(X-H)² = 4A(Y-K) AT (H, K)") Text(13,7,"X² = 4AY AT (0, 0)") Text(19,7,"DIRECTRIX: Y = ­A") Text(25,7,"FOCUS = (0,A)") Text(32,1,"PARABOLA - HORIZONTAL") Text(38,1,"(Y-K)² = 4A(X-H) AT (H, K)") Text(44,7,"Y² = 4AX AT (0, 0)") Text(50,7,"DIRECTRIX: X = ­A") Text(56,7,"FOCUS = (A, 0)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"HYPERBOLA - HORIZONTAL") Text(8,1,"(X-H)² (Y-K)²") Text(14,1,"----- - ----- = 1") Text(20,9,"A²"):Text(20,37,"B²") Text(30,1,"VERTICAL") Text(30,58,"C² = A² + B²") Text(37,1,"(Y-K)² (X-H)²") Text(43,1,"----- - ----- = 1") Text(49,9,"A²") Text(49,37,"B²") Text(57,67,"<ENTER>") Pause :Goto L Lbl R:ClrDraw 0→Xmin:1→Xmax:0→Xscl 0→Ymin:1→Ymax:0→Yscl Text(1,1,"SPECIAL RT. TRIANGLES") Text(8,10,"30-60-90 45-45-90") Text(15,10,"1-√(3)-2 1-1-√(2)") Line(.05,.25,.45,.25) Line(.45,.25,.45,.55) Line(.45,.55,.05,.25) Line(.40,.25,.40,.30) Line(.40,.30,.45,.30) Text(48,18,"√(3)") Text(35,46,"1") Text(27,24,"2") Line(.65,.25,.9,.25) Line(.9,.25,.9,.6) Line(.9,.6,.65,.25) Line(.86,.25,.86,.30) Line(.86,.30,.9,.30) Text(48,73,"1") Text(33,88,"1") Text(28,62,"√(2)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"MORE RIGHT TRIANGLES") Text(10,10,"3-4-5") Text(10,50,"5-12-13") Text(17,10,"7-24-25") Text(17,50,"8-15-17") Text(24,10,"9-40-41") Text(24,50,"11-60-61") Text(31,10,"12-35-37") Text(31,50,"13-84-85") Text(38,10,"16-63-65") Text(38,50,"20-21-29") Text(48,23,"+ MULTIPLES") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"CIRCULAR DEFINITIONS:") Text(15,1,"SIN(X) = Y / R") Text(23,1,"COS(X) = X / R") Text(31,1,"TAN(X) = Y / X") Text(15,50,"CSC(X) = R / Y") Text(23,50,"SEC(X) = R / X") Text(31,50,"COT(X) = X / Y") Text(57,67,"<ENTER>") Pause :ClrDraw Text(2,1,"SIN(X) = OPP/HYP") Text(2,68,"CHIEF") Text(9,1,"COS(X) = ADJ/HYP SOHCAHTOA") Text(16,1,"TAN(X) = OPP/ADJ") Text(23,1,"TAN(X) = SIN(X)/COS(X)") Text(30,1,"CSC(X) = 1/SIN(X)") Text(37,1,"SEC(X) = 1/COS(X)") Text(44,1,"COT(X) = COS(X)/SIN(X)") Text(51,1,"COT(X) = 1/TAN(X)") Text(57,67,"<ENTER>") Pause :AxesOn :ClrDraw ­1→Xmin:1→Xmax:0→Xscl ­1→Ymin:1→Ymax:0→Yscl Text(8,10,"SIN(X)") Text(15,10,"CSC(X)") Text(40,10,"TAN(X)") Text(47,10,"COT(X)") Text(40,60,"COS(X)") Text(47,60,"SEC(X)") Text(12,56,"ALL ARE +") Text(23,53,"I") Text(23,35,"II") Text(33,32,"III") Text(33,51,"IV") Text(57,67,"<ENTER>") Pause 0→Xmin:14.58064516→Xmax:0→Xscl 0→Ymin:10→Ymax:0→Yscl Circle(0,0,8):Line(0,0,6.900961,4.0322581) Line(0,0,5.7391901,5.483871):Line(0,0,3.8778312,6.9354839) Text(2,4,"QUADRANT I") Text(2,46,"(cos(X),sin(X))") Text(42,39,"3O") Text(33,50,"(√(3)/2,1/2)" Text(25,25,"45") Text(22,41,"(√(2)/2,√(2)/2)") Text(19,14,"60") Text(12,29,"(1/2,√(3)/2)") Text(41,60,"60 = π/3") Text(48,60,"45 = π/4") Text(55,60,"30 = π/6") Text(55,22,"<ENTER>") Pause :ClrDraw ­15.16129032→Xmin:15.16129032→Xmax:0→Xscl ­10→Ymin:10→Ymax:0→Yscl:Circle(0,0,5) Line(0,­5,0,5):Line(­5,0,5,0) Text(23,70,"O"):Text(33,65,"(1,O)") Text(1,34,"9O = π/2"):Text(8,40,"(O,1)") Text(23,7,"18O = π"):Text(33,10,"(­1,O)") Text(48,30,"27O = 3π/2") Text(55,38,"(O,­1)") Text(57,67,"<ENTER>") Pause :ClrDraw:AxesOff Text(1,1,"DEG. - RAD.") Text(1,38,"(cos(X),sin(X))") Text(10,5,"30=π/6") Text(16,5,"45=π/4") Text(22,5,"60=π/3") Text(28,5,"90=π/2") Text(34,1,"120=2π/3") Text(40,1,"135=3π/4") Text(46,1,"150=5π/6") Text(52,1,"180=π") Text(10,38,"(√(3)/2,1/2)") Text(16,38,"(√(2)/2,√(2)/2)") Text(22,38,"(1/2,√(3)/2)") Text(28,38,"(0,1)") Text(34,38,"(­1/2,√(3)/2)") Text(40,38,"(­√(2)/2,√(2)/2)") Text(46,38,"(­√(3)/2,1/2)") Text(52,38,"(­1,0)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"DEG. - RAD.") Text(1,38,"(cos(X),sin(X))") Text(10,1,"210=7π/6") Text(16,1,"225=5π/4") Text(22,1,"240=4π/3") Text(28,1,"270=3π/2") Text(34,1,"300=5π/3") Text(40,1,"315=7π/4") Text(46,1,"330=11π/6") Text(52,1,"360=2π") Text(10,38,"(­√(3)/2,­1/2)") Text(16,36,"(­√(2)/2,­√(2)/2)") Text(22,38,"(­1/2,­√(3)/2)") Text(28,38,"(0,­1)") Text(34,38,"(1/2,­√(3)/2)") Text(40,38,"(√(2)/2,­√(2)/2)") Text(46,42,"(√(3)/2,­1/2)") Text(52,42,"(1,0)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"FUNC. PER. DOM. RNG.") Text(10,1,"SIN(X) 2π R ­1 ≤ Y ≤ 1") Text(17,1,"COS(X) 2π R ­1 ≤ Y ≤ 1") Text(24,1,"TAN(X) π * R") Text(33,5,"* = R EXCEPT ODD MULT.") Text(40,25,"OF π/2") Text(57,67,"<ENTER>") Pause :ClrDraw ­1→Xmin:1→Xmax:0→Xscl ­1→Ymin:1→Ymax:0→Yscl Text(1,1,"SIN²(X) + COS²(X) = 1") Text(8,1,"TAN²(X) + 1 = SEC²(X)") Text(15,1,"1 + COT²(X) = CSC²(X)") Text(25,1,"PYTHAGOREAN THEOREM") Text(33,7,"A² + B² = C²") Line(­.1,­.6,.6,­.6) Line(.6,­.6,.6,­.1) Line(.6,­.1,­.1,­.6) Line(.5,­.6,.5,­.5) Line(.5,­.5,.6,­.5) Text(38,78,"A") Text(52,60,"B") Text(34,56,"C") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"DOUBLE-ANGLE FORMULAS") Text(10,1,"SIN(2X) = 2SIN(X) COS(X)") Text(17,1,"COS(2X) = COS²(X) - SIN²(X)") Text(25,1,"COS(2X) = 2 COS²(X) - 1") Text(32,1,"COS(2X) = 1 - 2 SIN²(X)") Text(39,40,"2TAN(X)") Text(45,1,"TAN(2X) =") Text(45,35,"--------") Text(51,35,"1-TAN²(X)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"HALF-ANGLE FORMULAS") Text(10,1,"SIN(X/2) = √((1-COS(X))/2)") Text(17,1,"COS(X/2) = √((1+COS(X))/2)") Text(30,1,"TAN(X/2) = ----------------") Text(25,38,"√((1-COS(X))/2)") Text(36,38,"√((1+COS(X))/2)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"SUM AND DIFFERENCE") Text(8,1,"sin(X + Y) =") Text(14,8,"sin(X)cos(Y) + cos(X)sin(Y)") Text(20,1,"sin(X - Y) =") Text(26,8,"sin(X)cos(Y) - cos(X)sin(Y)") Text(32,1,"cos(X + Y) =") Text(38,8,"cos(X)cos(Y) - sin(X)sin(Y)") Text(44,1,"cos(X - Y) =") Text(50,8,"cos(X)cos(Y) + sin(X)sin(Y)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"SUM AND DIFFERENCE") Text(9,1,"tan(X + Y) =") Text(16,8,"tan(X) + tan(Y)") Text(22,8,"-------------") Text(28,8,"1 - tan(X)tan(Y)") Text(38,1,"tan(X - Y) =") Text(45,8,"tan(X) - tan(Y)") Text(51,8,"-------------") Text(57,8,"1 + tan(X)tan(Y)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"LAW OF SINES") Text(9,1," sin(A) sin(B) sin(C)") Text(15,1," ----- = ----- = -----") Text(20,13,"a b c") Text(29,1,"LAW OF COSINES") Text(36,1," c² = a² + b² - 2ab*cos(C)") Text(43,1," b² = a² + c² - 2ac*cos(B)") Text(50,1," a² = b² + c² - 2bc*cos(A)") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"TRIANGLE AREAS") Text(10,1,"A = (1/2)BH" Text(17,1,"A = (1/2)ab*sin(C)" Text(24,33,"a²*sin(B)*sin(C)") Text(30,1,"A = (1/2)---------------") Text(36,50,"sin(A)") Text(43,1,"HERON'S FORMULA") Text(50,5,"A = √(S(S-a)(S-b)(S-c))") Text(57,5,"S = (a + b + c)/2") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"INVERSE TRIG. FUNCTIONS") Text(10,1,"FUNC.") Text(10,25,"DEF. ANGLES") Text(10,75,"QUAD.") Text(19,1,"SIN") Text(19,20,"­π/2 ≤ θ ≤ π/2") Text(19,78,"4, 1") Text(27,1,"TAN") Text(27,20,"­π/2 ≤ θ ≤ π/2") Text(27,78,"4, 1") Text(35,1,"COS") Text(35,25,"0 ≤ θ ≤ π") Text(35,78,"1, 2") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"POLAR COORDINATES") Text(10,1,"X = R cos(θ)") Text(10,53,"Y = R sin(θ)") Text(20,1,"R = √(X² + Y²)") Text(20,53,"R² = X² + Y²") Text(27,1,"θ = tan(Y/X)") Text(36,1,"COMPLEX FORM = A + B") Text(43,1,"POLAR FORM = R CIS θ") Text(50,27,"= R(cos(θ) + sin(θ))") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"POLAR GRAPHS") Text(10,1,"R = A + B sin(θ), R = A + B cos(θ)") Text(20,1,"!A! = !B! CARDIOID") Text(27,1,"!A! > !B! LIMACON W/O LOOP") Text(34,1,"!A! < !B! LIMACON W/LOOP") Text(42,1,"R² = A sin(2θ), R² = A cos(2θ)") Text(49,30,"LEMNISCATE") Text(57,67,"<ENTER>") Pause :Goto L Lbl θ ClrDraw Text(1,1,"LENGTH") Text(10,1,"1 FT = 12 IN") Text(16,1,"1 YD = 3 FT") Text(22,1,"1 MI = 1760 YD") Text(28,1,"1 MI = 5280 FT") Text(34,1,"1 N.MI = 1.15 MI") Text(40,1,"1 LEAGUE = 3 MI") Text(46,1,"1 FATHOM = 6 FT") Text(52,1,"1 ROD = 16.5 FT") Text(10,49,"1 IN = 2.54 CM") Text(16,49,"1 M = 39.37 IN") Text(22,53,"1 KM = .62 MI") Text(28,51,"1 MI = 1.58 KM") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"AREA - PG. 1") Text(10,1,"1 SQ FT = 144 SQ IN") Text(17,1,"1 SQ YD = 9 SQ FT") Text(24,1,"1 ACRE = 4840 SQ YD") Text(31,1,"1 ACRE = 43,560 SQ FT") Text(38,1,"1 SQ MI = 27,878,400 SQ FT") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"AREA - PG. 2") Text(10,1,"1 SQ IN = 6.4516 SQ CM") Text(17,1,"1 SQ METER = 10,000 SQ CM") Text(24,1,"1 SQ METER = 1.196 SQ YD") Text(31,1,"1 SQ YD = .836 SQ METER") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"VOLUME - PG. 1") Text(10,1,"1 T = 3 t") Text(17,1,"1 CUP = 16 T") Text(24,1,"1 PT = 2 CUP") Text(31,1,"1 QT = 2 PT") Text(38,1,"1 GAL = 4 QT") Text(45,1,"1 QT = 0.946 LITER") Text(52,1,"1 LITER = 1000 ML") Text(10,34,"1 BUSHEL = 4 PECKS") Text(17,46,"1 PECK = 8 QTS") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"VOLUME - PG. 2") Text(10,1,"1 CU FT = 1728 CU IN") Text(17,1,"1 CU YD = 27 CU FT") Text(24,1,"1 CU YD = 46,656 CU IN") Text(31,1,"1 CU IN = 16.387 CU CM") Text(57,67,"<ENTER>") Pause :ClrDraw Text(1,1,"WEIGHT") Text(10,1,"1 OZ = 28.35 GM") Text(17,1,"1 LB = 16 OZ") Text(24,1,"1 TON = 2000 LB") Text(31,1,"1 METRIC TON = 2200 LB") Text(38,1,"1 KG = 2.2 LB") Text(45,1,"1 LB = .45 KG") Text(52,1,"1 LB = 453.6 GM") Pause :ClrDraw Text(1,1,"TEMPERATURE") Text(10,1,"C = (5/9)(F - 32)") Text(17,1,"F = (9/5)C + 32") Text(26,1,"KELVIN = C + 273") Text(57,67,"<ENTER>") Pause :ClrDraw Goto L Lbl Z ClrHome AxesOn Output(1,1,"CREATED BY RYAN MCCLAIN **2003** CLASS OF *2006* P.V.H.S")

:"piecewise(Y1, X≤0, Y2,X>0)”→Y3
:DispGraph

works fine but I would like to replace the "X≤0" and "X>0" with string inputs. However this results in a data type error. Any suggestions?

Also, first thread of the section :D