This is my code for a Cookie Clicker game with support for a TI-83+ OS 1.19 (and possibly other platforms).

`DelVar L₁ClrHome`

SetUpEditor CLICK

10→dim(∟CLICK

∟CLICK→L₁

9→dim(L₁

Output(3,5,"=----------- OO !CURSOR OO*O!PRICE: O*OO! O*OO!OWNED: OO !

∟CLICK(10→C

"CURSOR GRANDMA FARM FACTORY MINE SHIPMENT PORTAL TIMEMACHINEANTIMATTER →Str1

DelVar S1→B

{15,E2,500,3E3,E4,4E4,1666666,123456789,4E9-1→L₂

For(X,1,9

int(L₂(X)1.15^L₁(X→L₄(X

End

{.1,.5,4,10,40,E2,6666,98765,E6-1→L₃

Output(6,6,L₄(1

Output(8,6,L₁(1

Repeat K=45

getKey→K

If K=105

Then

Output(1,1," "

C+1→C

Output(1,1,int(C

End

B+(K=26)-(K=24

Ans-9(Ans=10)+9not(Ans→B

Output(4,6,sub(Str1,11B-10,11

If sum(K={24,26

Then

Output(6,6," "

Output(6,6,L₄(B

Output(8,6," "

Output(8,6,L₁(B

End

L₁(B)-(K=85 and L₁(B))+(K=95 and C≥L₄(B→L₁(B

If K=95 and C≥L₄(B

Then

int(L₂(B)1.15^L₁(B→L₄(B

Output(6,6," "

Output(6,6,L₄(B

Output(8,6," "

Output(8,6,L₁(B

Output(1,1," "

Output(1,1,int(C

End

If K=85

Then

int(L₂(B)1.15^L₁(B→L₄(B

Output(6,6," "

Output(6,6,L₄(B

Output(8,6," "

Output(8,6,L₁(B

End

If not(S

Then

C+sum(L₁L₃→C

Output(1,1,int(Ans

End

Output(2,1," "

Output(2,1,int(sum(L₁L₃

S+1-4(S=3→S

End

C→L₁(10

L₁→∟CLICK

ClrHome

What do you think?