I am an AP Stats student with a TI-83+, and need some help inputting a program for LinRegTInt program called LNREGINT. I am unable to, due to my lack of understanding of how to input it, and would appreciate someone helping me input it, as a lot hinges on me passing this. The program is as follows, when translated using SourceCoder from this sight, using TI-83+/TI-84+ TI BASIC.

Apologies for any trouble.

**Code:**```
```

Prompt L1,L2,C

LinReg(a+bx) L1,L2,{Y1}

[|a]->Z

[|b]->Y

[r]->R

dim(L1)->N

N-2->D

2-Var StatsL1,L2

sqrt(([Sigmay^2]-Z*[Sigmay]-Y*[Sigmaxy])/D)->S

(1-C)/2->A

solve(A-tcdf(~1|E99,X,D),X,{~1|E99,1|E99})->T

abs(T)->T

T*S/sqrt([Sigmax^2]-([Sigmax])^^2/N)->E

ClrHome

Output(1,3,"LINREGTINT")

Output(2,1,"Y=[|a]+[|b]X")

Output(3,1,"(")

Fix 4

Y-E->L

Output(3,2,L)

Y+E->U

Output(3,8,",")

Output(3,9,U)

Output(3,16,")")

Output(4,1,"[|b]=")

Float

Output(4,3,Y)

Output(5,1,"[df]=")

Output(5,4,D)

Output(6,1,"[s]=")

Output(6,3,S)

Output(7,1,"[|a]=")

Output(7,3,Z)

Pause

ClrHome

Output(1,1,"[r^2]=")

Output(1,4,R^^2)

Output(2,1,"[r]=")

Output(2,3,R)

Pause

ClrHome

Output(1,2,"CI FOR CONSTANT")

TSsqrt(1/N+[xbar]^^2/([Sigmax^2]-([Sigmax])^^2/N))->E

Z-E->L

Z+E->U

Fix 4

Output(2,1,"(")

Output(2,2,L)

Output(2,7,",")

Output(2,9,U)

Output(2,14,")")

Pause

ClrHome

Apologies for any trouble.