JSE ChatBot - Socoder

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|667\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> JSE -> JSE ChatBot
Sun, 08 Oct 2023, 12:37
Jayenkai	JSE ChatBot I've been doing a lot of back&forthing with the Chatbots this week, and have finally got some kind of half-assed chatbot working, thanks to Poe.com It's got to the point where I can ask it for Pong... Can you code a version of Pong? Of course! I can help you code a version of Pong using the GotoJSE language. Here's an example code to get you started: // Pong Game Graphics 800, 600 // Set up the screen ScreenWidth = ScreenWidth() ScreenHeight = ScreenHeight() // Paddle variables PaddleWidth = 10 PaddleHeight = 80 PaddleSpeed = 4 // Ball variables BallSize = 10 BallSpeedX = 4 BallSpeedY = 2 // Paddle 1 Paddle1X = 10 Paddle1Y = ScreenHeight / 2 - PaddleHeight / 2 // Paddle 2 Paddle2X = ScreenWidth - PaddleWidth - 10 Paddle2Y = ScreenHeight / 2 - PaddleHeight / 2 // Ball BallX = ScreenWidth / 2 - BallSize / 2 BallY = ScreenHeight / 2 - BallSize / 2 // Score Player1Score = 0 Player2Score = 0 // Game loop Repeat CLS 0, 0, 0 // Draw paddles Rect Paddle1X, Paddle1Y, PaddleWidth, PaddleHeight, 1 Rect Paddle2X, Paddle2Y, PaddleWidth, PaddleHeight, 1 // Draw ball Rect BallX, BallY, BallSize, BallSize, 1 // Move paddles If GamePad(ButtonUp) > 0.5 And Paddle1Y > 0 Then Paddle1Y = Paddle1Y - PaddleSpeed EndIf If GamePad(ButtonDown) > 0.5 And Paddle1Y < ScreenHeight - PaddleHeight Then Paddle1Y = Paddle1Y + PaddleSpeed EndIf If GamePad(ButtonA) > 0.5 And Paddle2Y > 0 Then Paddle2Y = Paddle2Y - PaddleSpeed EndIf If GamePad(ButtonB) > 0.5 And Paddle2Y < ScreenHeight - PaddleHeight Then Paddle2Y = Paddle2Y + PaddleSpeed EndIf // Move ball BallX = BallX + BallSpeedX BallY = BallY + BallSpeedY // Check collision with paddles If BallX < Paddle1X + PaddleWidth And BallY + BallSize > Paddle1Y And BallY < Paddle1Y + PaddleHeight Then BallSpeedX = Abs(BallSpeedX) EndIf If BallX + BallSize > Paddle2X And BallY + BallSize > Paddle2Y And BallY < Paddle2Y + PaddleHeight Then BallSpeedX = -Abs(BallSpeedX) EndIf // Check collision with screen edges If BallY < 0 Or BallY + BallSize > ScreenHeight Then BallSpeedY = -BallSpeedY EndIf // Check if ball goes out of bounds If BallX < 0 Then Player2Score = Player2Score + 1 BallX = ScreenWidth / 2 - BallSize / 2 BallY = ScreenHeight / 2 - BallSize / 2 EndIf If BallX + BallSize > ScreenWidth Then Player1Score = Player1Score + 1 BallX = ScreenWidth / 2 - BallSize / 2 BallY = ScreenHeight / 2 - BallSize / 2 EndIf // Draw scores SetColor 255, 255, 255 SetFontSize 32 Text ScreenWidth / 2 - 40, 20, Player1Score, 1 Text ScreenWidth / 2 + 20, 20, Player2Score, 1 Flip Forever --v This code sets up the game screen, paddles, ball, and implements the game logic for moving the paddles, moving the ball, and checking for collisions. It also keeps track of the players' scores and displays them on the screen. Feel free to modify the code to add more features or customize the game to your liking. Let me know if you have any questions! It's not foolproof, of course. It often tries to predefine arrays and such, but for the most part it "almost" works!! ..and Almost is ok, right!?! You can Try out JSEChat here. Let me know how you get on. -=-=- ''Load, Next List!''
Sun, 08 Oct 2023, 12:58
spinal	Its a bit odd having the left controls move the right paddle and the right controls moe the left paddle -=-=- Check out my excellent homepage!
Sun, 08 Oct 2023, 13:06
Jayenkai	If you're playing in wasd/jkli mode it's the right way round. If you're playing with a gamepad, it's also the right way round. But, yeah, these are the kinds of annoying quirks you get when trying to write a single Gamepad() function to do everything!!!! -=-=- ''Load, Next List!''