/* 3dpong.c 3D Pong 0.2 by Bill Kendrick December 9, 1997 - December 15, 1997 */ #include #include #include #include #include #include #include #include #include #include "window.h" #include "connect.h" #include "hints.h" #include "visual.h" #include "gc.h" #include "color.h" #include "randnum.h" #include "text.h" #ifdef VMS #if __DECC_VER < 50200000 #define M_PI 3.1415926535897932385E0 /* pi */ #endif #endif /* Global X-Window Variables: */ GC colors[2][6]; char * colornames[6] = {"red", "blue", "green", "DarkRed", "DarkBlue", "DarkGreen"}; char server[2][512]; Display * display[2]; Colormap colormap[2]; Window window[2], root[2]; Pixmap backbuffer[2]; GC whitegc[2], blackgc[2]; GC redblue[2][2]; XFontStruct * font[2]; int fh[2]; /* Window size: */ #define WIDTH 580 #define HEIGHT 580 /* Arena size: */ #define X_WIDTH 100 #define Y_HEIGHT 100 #define Z_DEPTH 150 /* Shape sizes: */ #define PADDLE_WIDTH 25 #define PADDLE_HEIGHT 25 #define BALL_SIZE 15 /* 3D Controls: */ #define DISTANCE ((float) Z_DEPTH + 100.0) #define ASPECT 200 #define GLASS_OFFSET 3 /* Speed controls: */ #define FRAMERATE 100 #define EVENT_LOOP 40 #define SHIMMER_TIME 5 /* Debris controls: */ #define DEBRIS_TIME 50 #define DEBRIS_MIN 5 #define DEBRIS_MAX 10 #define DEBRIS_SPEED 2 /* Computer player controls: */ #define COMPUTER_SPEED 5 /* Handball controls: */ #define MIN_HANDBALL_GRAVITY 0.25 /* Ball controls: */ #define BALL_SPEED 15 #define ANGLE_DIVIDE 3 /* Data struct. sizes: */ #define QUEUE_SIZE 5 #define NUM_DEBRIS 50 /* Game modes: */ #define ONE_PLAYER 0 #define TWO_PLAYERS 1 #define HANDBALL 2 /* Typedefs: */ typedef struct debris_type { int exist, time; float x, y, z; float xm, ym, zm; } debris_type; /* Global game Variables: */ int toggle, high_score, got_high_score, final_score, ball_speed, debriscount, use_sound, net_height; int screen[2], black[2], white[2], has_color[2], glasses[2], score[2], view[2], shimmering[2], queue_position[2], noclick[2]; float x_queue[2][QUEUE_SIZE], y_queue[2][QUEUE_SIZE]; float player_x[2], player_y[2], cos_anglex[2], sin_anglex[2], anglex[2], cos_angley[2], sin_angley[2], angley[2]; float ball_x, ball_y, ball_z, ball_xm, ball_ym, ball_zm, ball_in_play, ball_waiting_for, gravity, net, game_mode, spin; debris_type debris[NUM_DEBRIS]; /* View mode names: */ char * viewnames[6] = {"Normal", "Bleachers", "Above", "FreeView", "Follow the Ball", "From The Paddle"}; /* Local function prototypes: */ void eventloop(void); void drawline(int pln, float x1, float y1, float z1, float x2, float y2, float z2, GC color); void setup(int argc, char * argv[]); void Xsetup(int pln); unsigned long MyAllocNamedColor(Display *display, Colormap colormap, char* colorname, unsigned long default_color, int has_color); void putballinplay(int pln); void recalculatetrig(int i); float total(float queue[]); void adddebris(void); void playsound(char * aufile); /* ---- MAIN FUNCTION ---- */ int main(int argc, char * argv[]) { /* Program setup: */ setup(argc, argv); randinit(); /* Connect to the X Server and draw the program's window: */ Xsetup(0); if (game_mode == TWO_PLAYERS) Xsetup(1); /* Run the main loop: */ eventloop(); } /* --- MAIN EVENT LOOP --- */ void eventloop(void) { int done, pln, e_loop, i, num_screens, j, crap_x, crap_z, crap_xm, crap_zm; int old_x[2], old_y[2]; unsigned int old_button[2]; char string[128]; XEvent event; char key[1024]; KeySym keysym; XComposeStatus composestatus; struct timeb now, then; float x, z, x_change, y_change; /* Init debris: */ for (i = 0; i < NUM_DEBRIS; i++) debris[i].exist = 0; debriscount = 0; /* Init player stuff: */ for (i = 0; i < 2; i++) { old_button[i] = -1; player_x[i] = 0; player_y[i] = 0; shimmering[i] = 0; glasses[i] = 0; view[i] = 0; score[i] = 0; anglex[i] = 5; angley[i] = 5; recalculatetrig(i); for (j = 0; j < QUEUE_SIZE; j++) { x_queue[i][j] = 0; y_queue[i][j] = 0; queue_position[i] = 0; } } /* Init. crap: */ crap_x = X_WIDTH; crap_z = Z_DEPTH; crap_xm = 1; crap_zm = 0; /* How many screens to draw on: */ num_screens = 1; if (game_mode == TWO_PLAYERS) num_screens = 2; /* Init. ball stuff: */ ball_in_play = 0; ball_waiting_for = 0; /* Init. high score (for handball): */ high_score = 0; final_score = -1; /* MAIN LOOP: */ done = False; toggle = 0; do { toggle = 1 - toggle; ftime(&then); for (e_loop = 0; e_loop < EVENT_LOOP; e_loop++) { for (pln = 0; pln < num_screens; pln++) { x_change = 0; y_change = 0; /* Get and handle events: */ strcpy(key, ""); if (XPending(display[pln])) { XNextEvent(display[pln], &event); if (event.type == KeyPress) { /* Get the key's name: */ XLookupString(&event.xkey, key, 1, &keysym, &composestatus); if (XKeysymToString(keysym) != NULL) { strcpy(key, XKeysymToString(keysym)); } } else if (event.type == ButtonPress) { /* They clicked! The beginning of a drag! */ old_button[pln] = event.xbutton.button; old_x[pln] = event.xbutton.x; old_y[pln] = event.xbutton.y; /* If the ball wasn't in play, this person launched it: */ if (ball_in_play == 0 && ball_waiting_for == pln && event.xbutton.button == Button3) putballinplay(pln); } else if (event.type == ButtonRelease) { /* They released! No more drag! */ old_button[pln] = -1; } else if (event.type == MotionNotify) { if (old_button[pln] == Button1 || noclick[pln]) { x_change = (event.xbutton.x - old_x[pln]); y_change = (event.xbutton.y - old_y[pln]); /* Add their moves to their queue: */ x_queue[pln][queue_position[pln]] = x_change; y_queue[pln][queue_position[pln]] = y_change; queue_position[pln] = ((queue_position[pln] + 1) % QUEUE_SIZE); /* Move Paddle: */ player_x[pln] = player_x[pln] + x_change; if (player_x[pln] < -X_WIDTH + PADDLE_WIDTH) player_x[pln] = -X_WIDTH + PADDLE_WIDTH; else if (player_x[pln] >= X_WIDTH - PADDLE_WIDTH) player_x[pln] = X_WIDTH - PADDLE_WIDTH; player_y[pln] = player_y[pln] + y_change; if (player_y[pln] < -Y_HEIGHT + PADDLE_HEIGHT) player_y[pln] = -Y_HEIGHT + PADDLE_HEIGHT; else if (player_y[pln] > Y_HEIGHT - PADDLE_HEIGHT) player_y[pln] = Y_HEIGHT - PADDLE_HEIGHT; old_x[pln] = event.xbutton.x; old_y[pln] = event.xbutton.y; } else if (old_button[pln] == Button2) { /* Rotate view: */ anglex[pln] = anglex[pln] + event.xbutton.x - old_x[pln]; if (anglex[pln] < 0) anglex[pln] = anglex[pln] + 360; if (anglex[pln] >= 360) anglex[pln] = anglex[pln] - 360; angley[pln] = angley[pln] + event.xbutton.y - old_y[pln]; if (angley[pln] < 0) angley[pln] = angley[pln] + 360; if (angley[pln] >= 360) angley[pln] = angley[pln] - 360; recalculatetrig(pln); old_x[pln] = event.xbutton.x; old_y[pln] = event.xbutton.y; } } } if (strcasecmp(key, "Q") == 0) { /* Q: Quit: */ done = True; } else if (strcasecmp(key, "3") == 0) { glasses[pln] = 1 - glasses[pln]; } else if (strcasecmp(key, "V") == 0) { view[pln] = (view[pln] + 1) % 6; } else if (strcasecmp(key, "C") == 0) { noclick[pln] = 1 - noclick[pln]; } } } /* Control computer player, if any: */ if (game_mode == ONE_PLAYER) { /* Remove their "ball hit paddle" effect: */ if (shimmering[1] != 0) shimmering[1]--; /* Move paddle to follow ball: */ if (ball_x > -player_x[1]) player_x[1] = player_x[1] - (COMPUTER_SPEED + randnum(2)); else if (ball_x < -player_x[1]) player_x[1] = player_x[1] + (COMPUTER_SPEED + randnum(2)); if (ball_y < player_y[1]) player_y[1] = player_y[1] - (COMPUTER_SPEED + randnum(2)); else if (ball_y > player_y[1]) player_y[1] = player_y[1] + (COMPUTER_SPEED + randnum(2)); /* Launch ball if it's our serve: */ if (ball_in_play == 0 && ball_waiting_for == 1 && randnum(10) < 1) { putballinplay(1); } } /* Move debris: */ for (i = 0; i < NUM_DEBRIS; i++) { if (debris[i].exist != 0) { /* Move debris: */ debris[i].x = debris[i].x + debris[i].xm; debris[i].y = debris[i].y + debris[i].ym; debris[i].z = debris[i].z + debris[i].zm; /* Add effect of gravity: */ if (game_mode != HANDBALL) debris[i].ym = debris[i].ym + gravity / 2; else debris[i].zm = debris[i].zm - gravity / 2; /* Count it down, remove if it's old: */ debris[i].time--; if (debris[i].time <= 0) debris[i].exist = 0; } } /* Move crap: */ crap_x = crap_x + crap_xm; crap_z = crap_z + crap_zm; if (crap_x < -X_WIDTH) { crap_x = -X_WIDTH; crap_xm = 0; crap_zm = 1; } else if (crap_x > X_WIDTH) { crap_x = X_WIDTH; crap_xm = 0; crap_zm = -1; } if (crap_z < -Z_DEPTH) { crap_z = -Z_DEPTH; crap_xm = -1; crap_zm = 0; } else if (crap_z > Z_DEPTH) { crap_z = Z_DEPTH; crap_xm = 1; crap_zm = 0; } /* Move ball: */ if (ball_in_play != 0) { /* Move it left/right: */ ball_x = ball_x + ball_xm; if (ball_x < -X_WIDTH + BALL_SIZE) { ball_x = -X_WIDTH + BALL_SIZE; ball_xm = -ball_xm; playsound("wall"); } else if (ball_x > X_WIDTH - BALL_SIZE) { ball_x = X_WIDTH - BALL_SIZE; ball_xm = -ball_xm; playsound("wall"); } /* Move it up/down: */ ball_y = ball_y + ball_ym; if (ball_y < -Y_HEIGHT + BALL_SIZE) { ball_y = -Y_HEIGHT + BALL_SIZE; ball_ym = -ball_ym; playsound("wall"); } else if (ball_y > Y_HEIGHT - BALL_SIZE) { ball_y = Y_HEIGHT - BALL_SIZE; ball_ym = -ball_ym; playsound("wall"); } /* Add the effect of gravity: */ if (game_mode != HANDBALL) { ball_ym = ball_ym + gravity; } else { ball_zm = ball_zm - gravity; } /* Move it in/out: */ ball_z = ball_z + ball_zm; /* It's at a goal!: */ if (ball_z < -Z_DEPTH + BALL_SIZE) { if (ball_x + BALL_SIZE >= player_x[0] - PADDLE_WIDTH && ball_x - BALL_SIZE <= player_x[0] + PADDLE_WIDTH && ball_y + BALL_SIZE >= player_y[0] - PADDLE_HEIGHT && ball_y - BALL_SIZE <= player_y[0] + PADDLE_HEIGHT) { /* They hit it! Bounce! */ adddebris(); playsound("hit"); ball_speed = ball_speed + 1; ball_z = -Z_DEPTH + BALL_SIZE; ball_zm = randnum(ball_speed / 2) + ball_speed / 2; adddebris(); if (spin == 0) { ball_xm = (ball_x - player_x[0]) / ANGLE_DIVIDE; ball_ym = (ball_y - player_y[0]) / ANGLE_DIVIDE; } else if (spin == 1) { ball_xm = total(x_queue[0]); ball_ym = total(y_queue[0]); } shimmering[0] = SHIMMER_TIME; /* A hit in handball mode means score: */ if (game_mode == HANDBALL) { score[0]++; final_score = score[0]; if (score[0] > high_score) high_score = score[0]; } } else if (ball_z <= -Z_DEPTH) { if (game_mode != HANDBALL) { /* They missed it! Score to player 2! */ playsound("score"); ball_in_play = 0; ball_waiting_for = 1; score[1]++; } else { /* They missed! Game over! */ final_score = score[0]; if (final_score >= high_score) got_high_score = 1; else got_high_score = 0; ball_in_play = 0; ball_waiting_for = 0; score[0] = 0; } } } else if (ball_z > Z_DEPTH - BALL_SIZE) { if (game_mode != HANDBALL) { if (ball_x + BALL_SIZE >= -player_x[1] - PADDLE_WIDTH && ball_x - BALL_SIZE <= -player_x[1] + PADDLE_WIDTH && ball_y + BALL_SIZE >= player_y[1] - PADDLE_HEIGHT && ball_y - BALL_SIZE <= player_y[1] + PADDLE_HEIGHT) { /* They hit it! Bounce! */ adddebris(); playsound("hit"); ball_speed = ball_speed + 1; ball_z = Z_DEPTH - BALL_SIZE; ball_zm = -randnum(ball_speed / 2) - ball_speed / 2; adddebris(); if (spin == 0) { ball_xm = (ball_x - player_x[1]) / ANGLE_DIVIDE; ball_ym = (ball_y - player_y[1]) / ANGLE_DIVIDE; } else if (spin == 1) { ball_xm = total(x_queue[1]); ball_ym = total(y_queue[1]); } shimmering[1] = SHIMMER_TIME; } else if (ball_z >= Z_DEPTH) { /* They missed it! Score to player 1! */ playsound("score"); ball_in_play = 0; ball_waiting_for = 0; score[0]++; } } else { ball_z = Z_DEPTH - BALL_SIZE; ball_zm = -ball_zm; playsound("wall"); } } /* Bounce ball off net: */ if (net_height != 0) { if (ball_z >= -BALL_SIZE && ball_z <= BALL_SIZE && ball_y >= net_height - BALL_SIZE) { playsound("wall"); ball_zm = -ball_zm; ball_z = ball_z + ball_zm; } } } for (pln = 0; pln < num_screens; pln++) { /* Draw screen: */ XFillRectangle(display[pln], backbuffer[pln], blackgc[pln], 0, 0, WIDTH, HEIGHT); /* Draw game arena: */ drawline(pln, -X_WIDTH, -Y_HEIGHT, -Z_DEPTH, -X_WIDTH, -Y_HEIGHT, Z_DEPTH, whitegc[pln]); drawline(pln, X_WIDTH, -Y_HEIGHT, -Z_DEPTH, X_WIDTH, -Y_HEIGHT, Z_DEPTH, whitegc[pln]); drawline(pln, -X_WIDTH, Y_HEIGHT, -Z_DEPTH, -X_WIDTH, Y_HEIGHT, Z_DEPTH, whitegc[pln]); drawline(pln, X_WIDTH, Y_HEIGHT, -Z_DEPTH, X_WIDTH, Y_HEIGHT, Z_DEPTH, whitegc[pln]); drawline(pln, -X_WIDTH, -Y_HEIGHT, -Z_DEPTH, X_WIDTH, -Y_HEIGHT, -Z_DEPTH, whitegc[pln]); drawline(pln, X_WIDTH, -Y_HEIGHT, -Z_DEPTH, X_WIDTH, Y_HEIGHT, -Z_DEPTH, whitegc[pln]); drawline(pln, X_WIDTH, Y_HEIGHT, -Z_DEPTH, -X_WIDTH, Y_HEIGHT, -Z_DEPTH, whitegc[pln]); drawline(pln, -X_WIDTH, Y_HEIGHT, -Z_DEPTH, -X_WIDTH, -Y_HEIGHT, -Z_DEPTH, whitegc[pln]); drawline(pln, -X_WIDTH, -Y_HEIGHT, Z_DEPTH, X_WIDTH, -Y_HEIGHT, Z_DEPTH, whitegc[pln]); drawline(pln, X_WIDTH, -Y_HEIGHT, Z_DEPTH, X_WIDTH, Y_HEIGHT, Z_DEPTH, whitegc[pln]); drawline(pln, X_WIDTH, Y_HEIGHT, Z_DEPTH, -X_WIDTH, Y_HEIGHT, Z_DEPTH, whitegc[pln]); drawline(pln, -X_WIDTH, Y_HEIGHT, Z_DEPTH, -X_WIDTH, -Y_HEIGHT, Z_DEPTH, whitegc[pln]); if (game_mode != HANDBALL) { /* Draw floor marker: */ drawline(pln, -X_WIDTH, Y_HEIGHT, 0, X_WIDTH, Y_HEIGHT, 0, whitegc[pln]); /* Draw net, if any: */ if (net != 0.0) { drawline(pln, -X_WIDTH, net_height, 0, X_WIDTH, net_height, 0, whitegc[pln]); drawline(pln, X_WIDTH, Y_HEIGHT, 0, X_WIDTH, net_height, 0, whitegc[pln]); drawline(pln, -X_WIDTH, net_height, 0, -X_WIDTH, Y_HEIGHT, 0, whitegc[pln]); } } /* Draw crap on walls: */ /* drawline(pln, crap_x, -Y_HEIGHT, crap_z, crap_x, -Y_HEIGHT - 10, crap_z, whitegc[pln]); */ if (game_mode != HANDBALL) { /* Draw opponent: */ drawline(pln, -player_x[1 - pln] + PADDLE_WIDTH, player_y[1 - pln] - PADDLE_HEIGHT, Z_DEPTH, -player_x[1 - pln] - PADDLE_WIDTH, player_y[1 - pln] - PADDLE_HEIGHT, Z_DEPTH, colors[pln][1 - pln + 3]); drawline(pln, -player_x[1 - pln] - PADDLE_WIDTH, player_y[1 - pln] - PADDLE_HEIGHT, Z_DEPTH, -player_x[1 - pln] - PADDLE_WIDTH, player_y[1 - pln] + PADDLE_HEIGHT, Z_DEPTH, colors[pln][1 - pln + 3]); drawline(pln, -player_x[1 - pln] - PADDLE_WIDTH, player_y[1 - pln] + PADDLE_HEIGHT, Z_DEPTH, -player_x[1 - pln] + PADDLE_WIDTH, player_y[1 - pln] + PADDLE_HEIGHT, Z_DEPTH, colors[pln][1 - pln + 3]); drawline(pln, -player_x[1 - pln] + PADDLE_WIDTH, player_y[1 - pln] + PADDLE_HEIGHT, Z_DEPTH, -player_x[1 - pln] + PADDLE_WIDTH, player_y[1 - pln] - PADDLE_HEIGHT, Z_DEPTH, colors[pln][1 - pln + 3]); /* Draw "paddle hit the ball" effect: */ if (shimmering[1 - pln] != 0) { drawline(pln, -player_x[1 - pln] - PADDLE_WIDTH, player_y[1 - pln] - PADDLE_HEIGHT, Z_DEPTH, -player_x[1 - pln] + PADDLE_WIDTH, player_y[1 - pln] + PADDLE_HEIGHT, Z_DEPTH, colors[pln][1 - pln + 3]); drawline(pln, -player_x[1 - pln] + PADDLE_WIDTH, player_y[1 - pln] - PADDLE_HEIGHT, Z_DEPTH, -player_x[1 - pln] - PADDLE_WIDTH, player_y[1 - pln] + PADDLE_HEIGHT, Z_DEPTH, colors[pln][1 - pln + 3]); } } if (ball_in_play == 1) { /* Draw ball: */ if (pln == 0) { x = ball_x; z = ball_z; } else { x = -ball_x; z = -ball_z; } drawline(pln, x - BALL_SIZE, ball_y, z - BALL_SIZE, x + BALL_SIZE, ball_y, z - BALL_SIZE, colors[pln][2]); drawline(pln, x + BALL_SIZE, ball_y, z - BALL_SIZE, x + BALL_SIZE, ball_y, z + BALL_SIZE, colors[pln][2]); drawline(pln, x + BALL_SIZE, ball_y, z + BALL_SIZE, x - BALL_SIZE, ball_y, z + BALL_SIZE, colors[pln][2]); drawline(pln, x - BALL_SIZE, ball_y, z + BALL_SIZE, x - BALL_SIZE, ball_y, z - BALL_SIZE, colors[pln][2]); drawline(pln, x - BALL_SIZE, ball_y, z - BALL_SIZE, x, ball_y - BALL_SIZE, z, colors[pln][2]); drawline(pln, x + BALL_SIZE, ball_y, z - BALL_SIZE, x, ball_y - BALL_SIZE, z, colors[pln][2]); drawline(pln, x + BALL_SIZE, ball_y, z + BALL_SIZE, x, ball_y - BALL_SIZE, z, colors[pln][2]); drawline(pln, x - BALL_SIZE, ball_y, z + BALL_SIZE, x, ball_y - BALL_SIZE, z, colors[pln][2]); drawline(pln, x - BALL_SIZE, ball_y, z - BALL_SIZE, x, ball_y + BALL_SIZE, z, colors[pln][2]); drawline(pln, x + BALL_SIZE, ball_y, z - BALL_SIZE, x, ball_y + BALL_SIZE, z, colors[pln][2]); drawline(pln, x + BALL_SIZE, ball_y, z + BALL_SIZE, x, ball_y + BALL_SIZE, z, colors[pln][2]); drawline(pln, x - BALL_SIZE, ball_y, z + BALL_SIZE, x, ball_y + BALL_SIZE, z, colors[pln][2]); /* Draw ball markers: */ drawline(pln, x - BALL_SIZE, -Y_HEIGHT, z, x + BALL_SIZE, -Y_HEIGHT, z, colors[pln][5]); drawline(pln, -X_WIDTH, ball_y - BALL_SIZE, z, -X_WIDTH, ball_y + BALL_SIZE, z, colors[pln][5]); } else { /* Ball isn't in play, waiting for someone... */ if (ball_waiting_for == pln) strcpy(string, "Your serve!"); else sprintf(string, "Player %d's serve", (1 - pln) + 1); drawtext(display[pln], backbuffer[pln], whitegc[pln], 50, HEIGHT / 2, string); /* Show final score (handball): */ if (game_mode == HANDBALL) { /* Only show it if they've actually played a round yet: */ if (final_score != -1) { sprintf(string, "Final score: %d", final_score); drawtext(display[0], backbuffer[0], whitegc[0], 50, HEIGHT / 2 + fh[0] * 2, string); } /* Show "got high score" if they got it (handball): */ if (got_high_score == 1) drawtext(display[0], backbuffer[0], whitegc[0], 50, HEIGHT / 2 + fh[0] * 3, "You beat the high score!"); } } /* Draw you: */ drawline(pln, player_x[pln] - PADDLE_WIDTH, player_y[pln] - PADDLE_HEIGHT, -Z_DEPTH, player_x[pln] + PADDLE_WIDTH, player_y[pln] - PADDLE_HEIGHT, -Z_DEPTH, colors[pln][pln]); drawline(pln, player_x[pln] + PADDLE_WIDTH, player_y[pln] - PADDLE_HEIGHT, -Z_DEPTH, player_x[pln] + PADDLE_WIDTH, player_y[pln] + PADDLE_HEIGHT, -Z_DEPTH, colors[pln][pln]); drawline(pln, player_x[pln] + PADDLE_WIDTH, player_y[pln] + PADDLE_HEIGHT, -Z_DEPTH, player_x[pln] - PADDLE_WIDTH, player_y[pln] + PADDLE_HEIGHT, -Z_DEPTH, colors[pln][pln]); drawline(pln, player_x[pln] - PADDLE_WIDTH, player_y[pln] + PADDLE_HEIGHT, -Z_DEPTH, player_x[pln] - PADDLE_WIDTH, player_y[pln] - PADDLE_HEIGHT, -Z_DEPTH, colors[pln][pln]); /* Draw "paddle hit the ball" effect: */ if (shimmering[pln] != 0) { shimmering[pln]--; drawline(pln, player_x[pln] - PADDLE_WIDTH, player_y[pln] - PADDLE_HEIGHT, -Z_DEPTH, player_x[pln] + PADDLE_WIDTH, player_y[pln] + PADDLE_HEIGHT, -Z_DEPTH, colors[pln][pln]); drawline(pln, player_x[pln] + PADDLE_WIDTH, player_y[pln] - PADDLE_HEIGHT, -Z_DEPTH, player_x[pln] - PADDLE_WIDTH, player_y[pln] + PADDLE_HEIGHT, -Z_DEPTH, colors[pln][pln]); } /* Draw debris: */ for (i = 0; i < NUM_DEBRIS; i++) { if (debris[i].exist != 0) { drawline(pln, debris[i].x, debris[i].y, debris[i].z, debris[i].x + debris[i].xm, debris[i].y + debris[i].ym, debris[i].z + debris[i].zm, colors[pln][randnum(3)]); } } /* Draw view mode: */ drawtext(display[pln], backbuffer[pln], colors[pln][2], 0, HEIGHT - fh[pln], viewnames[view[pln]]); if (view[pln] == 3) drawtext(display[pln], backbuffer[pln], colors[pln][5], 0, HEIGHT, "Middle-Click and drag to change view"); /* Draw scores: */ if (game_mode != HANDBALL) { /* Player 1 and 2 scores: */ for (i = 0; i < 2; i++) { sprintf(string, "Player %d: %d", i + 1, score[i]); drawtext(display[pln], backbuffer[pln], colors[pln][i], 0, fh[pln] * (i + 1), string); } } else { /* Score and high score for handball: */ sprintf(string, "Score: %d", score[0]); drawtext(display[0], backbuffer[0], colors[0][0], 0, fh[0], string); sprintf(string, "High: %d", high_score); drawtext(display[0], backbuffer[0], colors[0][0], 0, fh[0] * 2, string); } /* Update the window: */ XCopyArea(display[pln], backbuffer[pln], window[pln], whitegc[pln], 0, 0, WIDTH, HEIGHT, 0, 0); XFlush(display[pln]); } /* Keep framerate exact: */ do { ftime(&now); } while (now.time == then.time && now.millitm < then.millitm + FRAMERATE); } while (done == False); } /* Draw a line in 3D space: */ void drawline(int pln, float x1, float y1, float z1, float x2, float y2, float z2, GC color) { int i; float sx1, sy1, sx2, sy2, xoff, xx1, yy1, zz1, xx2, yy2, zz2, sinx, cosx; double anglex; for (i = 0; i < glasses[pln] + 1; i++) { if (glasses[pln] == 0) xoff = 0; else if (glasses[pln] == 1) { xoff = GLASS_OFFSET; if (i == 0) xoff = -xoff; if (toggle == 0) xoff = -xoff; } /* Alter perceived x/y/z depending on their view: */ if (view[pln] == 0) { /* Normal (behind your paddle): */ xx1 = x1; yy1 = y1; zz1 = z1; xx2 = x2; yy2 = y2; zz2 = z2; } else if (view[pln] == 1) { /* From the side: */ xx1 = z1; yy1 = y1; zz1 = x1; xx2 = z2; yy2 = y2; zz2 = x2; } else if (view[pln] == 2) { /* From above: */ xx1 = x1; yy1 = z1; zz1 = y1; xx2 = x2; yy2 = z2; zz2 = y2; } else if (view[pln] == 3) { /* Free view: */ xx1 = x1 * cos_anglex[pln] - z1 * sin_anglex[pln]; zz1 = x1 * sin_anglex[pln] + z1 * cos_anglex[pln]; yy1 = y1 * cos_angley[pln] - zz1 * sin_angley[pln]; zz1 = y1 * sin_angley[pln] + zz1 * cos_angley[pln]; xx2 = x2 * cos_anglex[pln] - z2 * sin_anglex[pln]; zz2 = x2 * sin_anglex[pln] + z2 * cos_anglex[pln]; yy2 = y2 * cos_angley[pln] - zz2 * sin_angley[pln]; zz2 = y2 * sin_angley[pln] + zz2 * cos_angley[pln]; } else if (view[pln] == 4) { /* Watch the ball: */ anglex = (ball_z - Z_DEPTH) / 10; if (anglex > 90) anglex = 90; else if (anglex < -90) anglex = -90; anglex = (anglex / 180.0) * M_PI; sinx = sin(anglex); cosx = cos(anglex); xx1 = x1 - (ball_x / 5); yy1 = (z1 - ball_z) * sinx + (y1 - ball_y) * cosx; zz1 = (z1 - ball_z) * cosx - (y1 - ball_y) * sinx + 30; xx2 = x2 - (ball_x / 5); yy2 = (z2 - ball_z) * sinx + (y2 - ball_y) * cosx; zz2 = (z2 - ball_z) * cosx - (y2 - ball_y) * sinx + 30; } else if (view[pln] == 5) { /* From your paddle: */ xx1 = x1 - player_x[pln]; yy1 = y1 - player_y[pln]; zz1 = z1; xx2 = x2 - player_x[pln]; yy2 = y2 - player_y[pln]; zz2 = z2; } if (zz1 > -DISTANCE && zz2 > -DISTANCE) { /* Convert (x,y,z) into (x,y) with a 3D look: */ sx1 = (xx1 + xoff) / ((zz1 + DISTANCE) / ASPECT); sy1 = yy1 / ((zz1 + DISTANCE) / ASPECT); sx2 = (xx2 + xoff) / ((zz2 + DISTANCE) / ASPECT); sy2 = yy2 / ((zz2 + DISTANCE) / ASPECT); /* Transpose (0,0) origin to the center of the window: */ sx1 = sx1 + WIDTH / 2; sy1 = sy1 + HEIGHT / 2; sx2 = sx2 + WIDTH / 2; sy2 = sy2 + HEIGHT / 2; /* Draw the line into the window: */ if (glasses[pln] == 0) XDrawLine(display[pln], backbuffer[pln], color, sx1, sy1, sx2, sy2); else { if ((i == 0 && toggle == 1) || (i == 1 && toggle == 0)) XDrawLine(display[pln], backbuffer[pln], redblue[pln][0], sx1, sy1, sx2, sy2); else XDrawLine(display[pln], backbuffer[pln], redblue[pln][1], sx1, sy1 + 1, sx2, sy2 + 1); } } } } /* Program set-up (check usage, load data, etc.): */ void setup(int argc, char * argv[]) { FILE * fi; char temp[512], color[512]; int which_end; float x, y, z; /* Get -noclick switches: */ noclick[1] = 0; if (argc > 2) { if (strcmp(argv[argc - 1], "-noclick2") == 0 || strcmp(argv[argc - 1], "-nc2") == 0) { printf("Player 2 set for 'noclick' mode\n"); noclick[1] = 1; argc = argc - 1; } } noclick[0] = 0; if (argc > 2) { if (strcmp(argv[argc - 1], "-noclick1") == 0 || strcmp(argv[argc - 1], "-nc1") == 0) { printf("Player 1 set for 'noclick' mode\n"); noclick[0] = 1; argc = argc - 1; } } /* Get -sound switch: */ use_sound = 0; if (argc > 2) { if (strcmp(argv[argc - 1], "-sound") == 0 || strcmp(argv[argc - 1], "-s") == 0) { use_sound = 1; argc = argc - 1; } } /* Get -spin switch: */ spin = 0; if (argc > 2) { if (strcmp(argv[argc - 1], "-spin") == 0) { spin = 1; argc = argc - 1; } } /* Get -net switch: */ net = 0; if (argc > 3) { if (strcmp(argv[argc - 2], "-net") == 0 || strcmp(argv[argc - 2], "-n") == 0) { net = atof(argv[argc - 1]); if (net < 0.0) net = -net; if (net > 0.75) net = 0.75; argc = argc - 2; } } net_height = Y_HEIGHT * (1.0 - net) / 2; /* Get -gravity switch: */ gravity = 0.0; if (argc > 3) { if (strcmp(argv[argc - 2], "-gravity") == 0 || strcmp(argv[argc - 2], "-g") == 0) { gravity = atof(argv[argc - 1]); argc = argc - 2; } } /* Check for "-version": */ if (argc == 2) { if (strcmp(argv[1], "-version") == 0 || strcmp(argv[1], "-v") == 0) { printf("\n3dpong version 0.2\n\n"); printf("by Bill Kendrick\n"); printf("kendrick@zippy.sonoma.edu\n"); printf("http://zippy.sonoma.edu/kendrick/nbs/unix/x/3dpong/\n\n"); exit(0); } } /* Check proper usage; get program arguments: */ if (argc == 2) { game_mode = HANDBALL; strcpy(server[0], argv[1]); /* Keep gravity fair: */ if (gravity < 0.0) gravity = -gravity; /* Make sure there IS gravity: */ if (gravity < MIN_HANDBALL_GRAVITY) gravity = MIN_HANDBALL_GRAVITY; } else if (argc == 3) { strcpy(server[0], argv[1]); if (strcmp(argv[2], "computer") == 0 || strcmp(argv[2], "-computer") == 0) { game_mode = ONE_PLAYER; } else { game_mode = TWO_PLAYERS; strcpy(server[1], argv[2]); } } else { fprintf(stderr, "\n"); fprintf(stderr, "Usage: %s ", argv[0]); fprintf(stderr, "server1 [server2 | -computer] [-gravity value]\n"); fprintf(stderr, " [-net value] [-sound] [-nockick1] "); fprintf(stderr, "[-noclick2]\n"); fprintf(stderr, "\n"); fprintf(stderr, "Controls:\n"); fprintf(stderr, " [V] - Change view\n"); fprintf(stderr, " [3] - Toggle 3D glasses mode\n"); fprintf(stderr, " [C] - Toggle \"noclick\" mode\n"); fprintf(stderr, " [Q] - Quit\n"); fprintf(stderr, "\n"); exit(1); } } /* Setup the application: */ void Xsetup(int pln) { int i, color, tempint, ret, tempwidth, tempheight; char title[1024], file[128]; int status, temp_depth; Visual * temp_visual = CopyFromParent; FILE * fi; /* Connect to display: */ display[pln] = ConnectToServer(server[pln], &screen[pln], &root[pln]); if (display[pln] == NULL) { perror(server[pln]); exit(1); } /* Load font: */ font[pln] = LoadFont(display[pln], "variable", "fixed"); fh[pln] = FontHeight(font[pln]); /* Get our primitve colors: */ black[pln] = BlackPixel(display[pln], screen[pln]); white[pln] = WhitePixel(display[pln], screen[pln]); /* Open window: */ window[pln] = OpenWindow(display[pln], root[pln], 10, 10, WIDTH, HEIGHT, CopyFromParent, black[pln], (KeyPressMask | ExposureMask | ButtonPressMask | ButtonMotionMask | PointerMotionMask | ButtonReleaseMask), (Visual *)CopyFromParent); sprintf(title, "3D Pong"); SetStandardHints(display[pln], window[pln], "3D Pong", title, 10, 10, WIDTH, HEIGHT); /* Set up visual: */ has_color[pln] = 0; if (SetUpVisual(display[pln], screen[pln], &temp_visual, &temp_depth)) { if (!SetUpColormap(display[pln], screen[pln], window[pln], temp_visual, &colormap[pln])) { fprintf(stderr, "Could not create a colormap!\n"); } else has_color[pln] = 1; } else { fprintf(stderr, "Could not find a PseudoColor visual!\n"); } /* Create GC's: */ for (i = 0; i < 6; i++) { colors[pln][i] = CreateGC(display[pln], window[pln], MyAllocNamedColor(display[pln], colormap[pln], colornames[i], (unsigned long) white[pln], has_color[pln]), black[pln]); } whitegc[pln] = CreateGC(display[pln], window[pln], white[pln], black[pln]); blackgc[pln] = CreateGC(display[pln], window[pln], black[pln], black[pln]); redblue[pln][0] = CreateGC(display[pln], window[pln], MyAllocNamedColor(display[pln], colormap[pln], "blue", (unsigned long) white[pln], has_color[pln]), black[pln]); redblue[pln][1] = CreateGC(display[pln], window[pln], MyAllocNamedColor(display[pln], colormap[pln], "red", (unsigned long) white[pln], has_color[pln]), black[pln]); /* Create a backbuffer: */ backbuffer[pln] = XCreatePixmap(display[pln], root[pln], WIDTH, HEIGHT, 8); /* Put us up!: */ XMapWindow(display[pln], window[pln]); XMapRaised(display[pln], window[pln]); XFlush(display[pln]); } /* Allocate a color (or white): */ unsigned long MyAllocNamedColor(Display *display, Colormap colormap, char* colorname, unsigned long default_color, int has_color) { if (has_color == 0) return(default_color); else return(AllocNamedColor(display, colormap, colorname, default_color)); } /* Puts ball in play (direction depends on who launched it): */ void putballinplay(int pln) { /* Remember that the ball is now in play: */ ball_in_play = 1; /* Pick a random starting position: */ ball_x = player_x[pln]; ball_y = player_y[pln]; ball_z = Z_DEPTH / 2;; if (pln == 0) { ball_x = -ball_x; ball_z = -ball_z; } /* Give it a random speed/direction: */ ball_speed = BALL_SPEED; ball_xm = randnum(ball_speed * 2) - ball_speed; ball_ym = randnum(ball_speed * 2) - ball_speed; do { ball_zm = randnum(BALL_SPEED * 3) / 2; } while (ball_zm == 0); if (pln == 1) ball_zm = -ball_zm; } /* Recalculate the player's trig. values: */ void recalculatetrig(int i) { cos_anglex[i] = cos(M_PI * anglex[i] / 180.0); sin_anglex[i] = sin(M_PI * anglex[i] / 180.0); cos_angley[i] = cos(M_PI * angley[i] / 180.0); sin_angley[i] = sin(M_PI * angley[i] / 180.0); } /* Returns the total of a queue (for spin mode): */ float total(float queue[]) { int i; float val; for (i = 0; i < QUEUE_SIZE; i++) val = val + queue[i]; val = val / QUEUE_SIZE; return(val); } /* Add sparkly stuff to game (when ball hits, etc.): */ void adddebris(void) { int i, num_to_add; /* Pick how many to add: */ num_to_add = randnum(DEBRIS_MAX - DEBRIS_MIN) + DEBRIS_MIN; for (i = 0; i < num_to_add; i++) { /* Make it exist: */ debris[debriscount].exist = 1; debris[debriscount].time = randnum(DEBRIS_TIME); /* Give it a position: */ debris[debriscount].x = ball_x + randnum(10) - 5; debris[debriscount].y = ball_y + randnum(10) - 5; debris[debriscount].z = ball_z + randnum(10) - 5; /* Give it a speed/direction: */ debris[debriscount].xm = (randnum(DEBRIS_SPEED * 2) - DEBRIS_SPEED + ball_xm / 2); debris[debriscount].ym = (randnum(DEBRIS_SPEED * 2) - DEBRIS_SPEED + ball_ym / 2); debris[debriscount].zm = (randnum(DEBRIS_SPEED * 2) - DEBRIS_SPEED + ball_zm / 2); /* Increment the debris counter: */ debriscount = (debriscount + 1) % NUM_DEBRIS; } } /* Play a sound (if we can): */ void playsound(char * aufile) { char cmd[1024]; #ifndef VMS if (use_sound == 1) { sprintf(cmd, "/bin/cat sounds/%s.au > /dev/audio &", aufile); system(cmd); } #endif }