This is one of the first things I made on my calculator, and after going through it and optimizing it myself, I was wondering if it could be any smaller and do the same thing, so, here it is
*side note* This is meant for a ti-83+! This code will run perfectly on it and it only, ti-84(or newer) will run the buffer For( loops too fast(and ti-83 and older will run it too slow), and on any digital display, the game will not stretch to fit the screen. I do not have any time commands at my fingertips.
ClrHome Disp "1-6 Repeat K getKey→K End If K=92:Then "1-3→Str1 3→D End If K=93:Then 5→D "1-5→Str1 End If K=94:Then "1-10→Str1 10→D End if K=82:Then "1-50→Str1 50→D End If K=84:Then 1000→D "1-1000→Str1 End randInt(1,D→E ForC,1,3 ClrHome Disp Str1 Input A ClrHome Disp"---------------- //16 - signs For(B,1,12 If B=1:Then Output(5,9,"θ Output(2,8,"º //a little square-thing End If B=6:Then Output(2,8," //one space Output(4,8,"º Output(5,8,"- End If B=12:then Output(4,8," //one space Output(5,8," //one space Output(4,10,"/ If A>E Output(8,10,"º If A<E Output(8,6,"º If A=E Output(1,8,"º End End For(B,1,100 End ClrHome If A≠E and C=1 Disp " STRIKE ONE! If A≠E and C=2 disp" STRIKE TWO! If A≠E and C=3:Then Disp " STRIKE THREE! For(B,1,125 End ClrHome Output(1,4,"YOU'RE OUT! Stop End If A=E:Then Output(1,4,"HOME RUN! Stop End For(B,1,125 End End