Ti-84+CE Pong

Forum Attachments

Summary:

Issue with getKey

Ti-84+CE Pong

Xillin 25 Mar 2020 08:31

So I decided to try and make a single player pong program but ran into an issue. I'm using a repeat loop to have the ball move across the screen, which works fine, but when I try to move the line up and down (for the ball to bounce of off) it doesn't work. Is this because getKey gets reset when the loop ends, or is there some other issue I'm missing?

2→A         //height of the line
0→X         //X-coor of the ball
0→Y         //Y-coor of the ball
-1→S       //direction of the ball (left/right)
.1→T       //direction of the ball (up/down)
Line(-15, A, -15, A-4
Repeat X=-16
Pt-Off(X, Y, 3
X+S→X
Y+T→Y
Pt-On(X,Ans,3
Line(-15, A, -15, A-4, 20
min(10, max(-6, A+sum(ΔList(getKey={34, 25→A            //got the idea for this from the wiki's movement page, makes sure the line doesn't go off the screen
Line(-15, A, -15, A-4
If X=15 or X=-15 and Y≤A and Y≥A-4
-S→S
If Y=10 or Y=-10
-T→T
End
Text(10, 10, "YOU LOSE! :(

Re: TI-84+CE Pong

(account deleted) 25 Mar 2020 14:04

For simpler movement, you can use instead:

max(-6,min(10,A+(K=24)-(K=25→A

What is the graph screen setup? I don't see any initialization at the beginning of your code, so I assume you are using ZStandard?

I'll make my own code later, I'll help you a bit

---

Hewwo, my name is Achak Claw. I was formerly BioHazard.

Re: TI-84+CE Pong

Xillin 26 Mar 2020 00:12

Sorry, forgot to mention that. I used ZStandard then ZSquare

Re: TI-84+CE Pong

(account deleted) 26 Mar 2020 16:23

If you're using ZStandard, you have problems. The Xmin, Xmax, Ymin, and Ymax are -10 and 10, respectively. This line of code Line(-15, A, -15, A-4, 20 is set to show on -15 (x) when the Xmin is -10. So it won't show.
Be sure to organize your conditionals in parenthesis so the calculator can read your program correctly.

If you want, you can try out and experiment with my version of Pong:

ClrHome
AxesOff
ZStandard
2→Y:0→A:Ans→B:0→S        //Y is the paddle Y-coord, A and B are the ball coords.
1→O:0→P:.25→R                //O and P are the ball directions. For O, 1 is right and 0 is left. For P, 1 is up and 0 is down. R is how much the B-coord will advance. To make the game fun, it gets harder over time.
Line(Xmin,Y,Xmin,Y-4,1,BROWN,1
TextColor(GREEN   //Set Text color
Text(0,3,0

Repeat K=45 or (A=-10 and (B>Y or B<Y-4
Line(Xmin,Y,Xmin,Y-4,1,BROWN,1   //Paddle
Repeat Ans or (A=-10 and (B>Y or B<Y-4
Pt-Off(A,B,3    //Turn off Ball
A+(O)-(not(O→A
If max(Ans={Xmin,Xmax
not(O→O
B+R(P)-R(not(P→B
If Ans>=Ymax or Ans<=Ymin
not(P→P
Pt-On(A,B,3,RED    //Turn ball on
If A=Xmin and B<=Y and B>Y-4:Then
R+.02→R:S+1→S    //Increase score by one and make game slightly harder
Text(0,3,Ans
End
getKey
End:Ans→K
Line(Xmin,Y,Xmin,Y-4,0
max(-6,min(Ymax,Y+2(K=25)-2(K=34→Y    //Move paddle by two
End
ClrDraw:ClrHome
"SCORE: "+toString(S    //Display score

Ah, yes. My Zinogre brethren approves this program.

---

Hewwo, my name is Achak Claw. I was formerly BioHazard.

Last edited on 26 Mar 2020 16:50 by (account deleted) Show more

Re: TI-84+CE Pong

Xillin 27 Mar 2020 06:29

I used both ZStandard and ZSquare (EDIT: in that order). So the Xmin is -16 and the Xmax is 16.

Last edited on 27 Mar 2020 06:42 by Xillin Show more

Re: TI-84+CE Pong

Myles_Zadok 26 Mar 2020 16:58

We also have the Pong and my own Pong CE pages, if you want some examples. I believe I implemented motion by using specific variables for the start and end points of the line, then checked for input at the beginning of the loop, and then used conditionals to update the position of the line. I would just check to see if the variables you are using are being updated properly or not.