3
|
1 /* $Id: input.c,v 1.1.1.1 1997/12/06 05:41:29 darius Exp $ */
|
|
2
|
|
3 /*
|
|
4 * input.c
|
|
5 *
|
|
6 * Modified to work as client in socket based protocol
|
|
7 */
|
|
8 #include "copyright.h"
|
|
9
|
|
10 #include <stdio.h>
|
|
11 #include <math.h>
|
|
12 #include <sys/types.h>
|
|
13 #ifdef RS6K
|
|
14 #include <sys/select.h>
|
|
15 #endif
|
|
16 #ifdef hpux
|
|
17 #include <time.h>
|
|
18 #else /* hpux */
|
|
19 #include <sys/time.h>
|
|
20 #endif /* hpux */
|
|
21 #include <signal.h>
|
|
22 #include <errno.h>
|
|
23 #include "Wlib.h"
|
|
24 #include "defs.h"
|
|
25 #include "struct.h"
|
|
26 #include "data.h"
|
|
27 #include "packets.h"
|
|
28 #include "proto.h"
|
|
29 #ifdef SOUND
|
|
30 #include "Slib.h"
|
|
31 #endif
|
|
32
|
|
33 #define control(x) (x)+128
|
|
34
|
|
35 /* Prototypes */
|
|
36 static void buttonaction P((W_Event * data));
|
|
37 static void keyaction P((W_Event * data));
|
|
38 static void scan P((W_Window w, int x, int y));
|
|
39 /*static void selectblkbozo P((W_Event *data));*/
|
|
40
|
|
41 static int tmodeChange = 0; /* handles first change of tmode; including */
|
|
42 /* when a play first joins a tmode game */
|
|
43
|
|
44 void
|
|
45 initinput()
|
|
46 {
|
|
47 /* Nothing doing... */
|
|
48 }
|
|
49
|
|
50 void
|
|
51 dispatch_W_key_event(evt)
|
|
52 W_Event *evt;
|
|
53 {
|
|
54 int i;
|
|
55
|
|
56 /* try to speed up response -JR */
|
|
57 if (!messageon && (evt->Window == w || evt->Window == mapw)) {
|
|
58 keyaction(evt);
|
|
59 return;
|
|
60 }
|
|
61 for (i = 0; i < WNUM; i++) {
|
|
62 if (evt->Window == messWin[i].window) {
|
|
63 messageWinEvent(evt);
|
|
64 return;
|
|
65 }
|
|
66 }
|
|
67 if (evt->Window == optionWin)
|
|
68 optionaction(evt);
|
|
69 else if (
|
|
70 #ifdef NOWARP
|
|
71 messageon ||
|
|
72 #endif
|
|
73 evt->Window == messagew ||
|
|
74 evt->Window == tstatw ||
|
|
75 evt->Window == warnw) {
|
|
76 smessage(evt->key);
|
|
77 #ifdef SHORT_PACKETS
|
|
78 } else if (evt->Window == spWin) {
|
|
79 spaction(evt);
|
|
80 #endif
|
|
81 } else if (evt->Window == motdWin) {
|
|
82 motdWinEvent(evt->key);
|
|
83 } else if (evt->Window == playerw) {
|
|
84 playerwEvent(evt);
|
|
85 } else if (evt->Window == defWin && evt->key == ' ') {
|
|
86 W_UnmapWindow(defWin);
|
|
87 #ifdef SOUND
|
|
88 } else if (evt->Window == soundWin) {
|
|
89 soundaction(evt);
|
|
90 #endif
|
|
91 #ifdef TOOLS
|
|
92 } else if (evt->Window == toolsWin) {
|
|
93 smessage_ahead('!', evt->key);
|
|
94 #endif
|
|
95 } else {
|
|
96 keyaction(evt);
|
|
97 }
|
|
98 }
|
|
99
|
|
100 void
|
|
101 dispatch_W_button_event(evt)
|
|
102 W_Event *evt;
|
|
103 {
|
|
104 int i;
|
|
105
|
|
106 if (evt->Window == w || evt->Window == mapw) {
|
|
107 buttonaction(evt);
|
|
108 return;
|
|
109 }
|
|
110 for (i = 0; i < WNUM; i++) {
|
|
111 if (evt->Window == messWin[i].window) {
|
|
112 messageWinEvent(evt);
|
|
113 return;
|
|
114 }
|
|
115 }
|
|
116 if (evt->Window == war)
|
|
117 waraction(evt);
|
|
118 else if (evt->Window == optionWin)
|
|
119 optionaction(evt);
|
|
120 #ifdef ATM
|
|
121 else if (evt->Window == udpWin)
|
|
122 udpaction(evt); /* UDP */
|
|
123 #endif /* ATM */
|
|
124 #ifdef SHORT_PACKETS
|
|
125 else if (evt->Window == spWin)
|
|
126 spaction(evt);
|
|
127 #endif
|
|
128 #ifdef SOUND
|
|
129 else if (evt->Window == soundWin)
|
|
130 soundaction(evt);
|
|
131 #endif
|
|
132 else if (evt->Window == playerw)
|
|
133 selectblkbozo(evt);
|
|
134 #ifdef MACROS
|
|
135 else if (evt->Window == macroWin)
|
|
136 switchmacros();
|
|
137 #endif
|
|
138 #ifdef XTREKRC_HELP
|
|
139 else if (evt->Window == defWin)
|
|
140 def_action(evt);
|
|
141 #endif
|
|
142 else
|
|
143 buttonaction(evt);
|
|
144 }
|
|
145
|
|
146 void
|
|
147 dispatch_W_expose_event(evt)
|
|
148 W_Event *evt;
|
|
149 {
|
|
150 /*
|
|
151 if anything but the iconWin is refreshed, turn off the iconified flag.
|
|
152 [BDyess]
|
|
153 */
|
|
154 if (evt->Window != iconWin)
|
|
155 iconified = 0;
|
|
156 if (evt->Window == statwin)
|
|
157 redrawStats();
|
|
158 else if (evt->Window == tstatw)
|
|
159 redrawTstats();
|
|
160 else if (evt->Window == mapw)
|
|
161 redrawall = 1;
|
|
162 else if (evt->Window == iconWin)
|
|
163 drawIcon();
|
|
164 else if (evt->Window == helpWin)
|
|
165 fillhelp();
|
|
166 else if (evt->Window == macroWin)
|
|
167 fillmacro();
|
|
168 else if (evt->Window == playerw)
|
|
169 playerlist();
|
|
170 else if (evt->Window == planetw)
|
|
171 planetlist();
|
|
172 else if (evt->Window == planetw2)
|
|
173 planetlist();
|
|
174 else if (evt->Window == rankw)
|
|
175 ranklist();
|
|
176 else if (evt->Window == warnw)
|
|
177 W_ClearWindow(warnw);
|
|
178 else if (evt->Window == messagew)
|
|
179 message_expose();
|
|
180 else if (evt->Window == motdWin)
|
|
181 motdWinEvent('r'); /* 'r' is refresh */
|
|
182 /*
|
|
183 lag meter? maybe later - RF else if (evt->Window == lMeter)
|
|
184 redrawLMeter();
|
|
185 */
|
|
186 else if (evt->Window == pStats)
|
|
187 redrawPStats();
|
|
188 #ifdef XTREKRC_HELP
|
|
189 else if (defWin && (evt->Window == defWin))
|
|
190 showdef();
|
|
191 #endif
|
|
192 }
|
|
193
|
|
194 void
|
|
195 dispatch_W_event(evt)
|
|
196 W_Event *evt;
|
|
197 {
|
|
198 switch ((int) evt->type) {
|
|
199 case W_EV_KEY:
|
|
200 dispatch_W_key_event(evt);
|
|
201 break;
|
|
202 #ifdef AUTOKEY
|
|
203 case W_EV_KEY_OFF:
|
|
204 if (autoKey)
|
|
205 autoKeyOff(evt);
|
|
206 break;
|
|
207 #endif /* AUTOKEY */
|
|
208 case W_EV_BUTTON:
|
|
209 dispatch_W_button_event(evt);
|
|
210 break;
|
|
211 case W_EV_EXPOSE:
|
|
212 dispatch_W_expose_event(evt);
|
|
213 break;
|
|
214 default:
|
|
215 break;
|
|
216 }
|
|
217 }
|
|
218
|
|
219 /* this figures out what to set war dec's */
|
|
220 void autoWarDecl(scheme)
|
|
221 int scheme;
|
|
222 {
|
|
223 extern int number_of_teams;
|
|
224 int i, j, k, *team, enemymask = 0;
|
|
225 struct player *pptr;
|
|
226
|
|
227 if((team = (int *)malloc(number_of_teams * sizeof(int))) == NULL) {
|
|
228 perror("autoWarDecl: malloc error\n");
|
|
229 return;
|
|
230 }
|
|
231 memset(team, 0, sizeof(int)*number_of_teams);
|
|
232 for(i=0, pptr=&players[i]; i < nplayers; i++, pptr++)
|
|
233 if(pptr->p_status != PFREE && !(pptr->p_status == POUTFIT &&
|
|
234 pptr->p_teami < 0)) {
|
|
235 team[pptr->p_teami]++;
|
|
236 }
|
|
237 switch(scheme) {
|
|
238 case 1:
|
|
239 /* war with all non-zero member team */
|
|
240 /* peace with teams with 0 players */
|
|
241 for(i=0; i < number_of_teams; i++) {
|
|
242 if(i != me->p_teami)
|
|
243 enemymask ^= team[i] ? (1<<i) : 0;
|
|
244 /*printf("team: %i, #: %i\n", i, team[i]);
|
|
245 */
|
|
246 }
|
|
247 /*printf("mask: %i\n", enemymask);
|
|
248 */
|
|
249 break;
|
|
250 case 2:
|
|
251 /* war with only the largest enemy */
|
|
252 /* team; peace with everyone else*/
|
|
253 for(i=0; i < number_of_teams; i++) {
|
|
254 if ((i != me->p_teami) && (j < team[i])) {
|
|
255 j = team[i];
|
|
256 k = i;
|
|
257 }
|
|
258 }
|
|
259 enemymask = 0 | (1 << k);
|
|
260 break;
|
|
261 }
|
|
262 sendWarReq(enemymask);
|
|
263 free(team);
|
|
264 } /* end of autoWarDecl */
|
|
265
|
|
266
|
|
267 /* this new event loop allows more flexibility in state transitions */
|
|
268 void
|
|
269 input()
|
|
270 {
|
|
271 W_Event data;
|
|
272 fd_set readfds;
|
|
273 int wsock = W_Socket();
|
|
274 int old_tourn = paradise ? status2->tourn : status->tourn, new_tourn;
|
|
275
|
|
276 #ifdef AUTOKEY
|
|
277 struct timeval timeout;
|
|
278
|
|
279 timeout.tv_sec = 0;
|
|
280 timeout.tv_usec = 100000;
|
|
281 #endif /* AUTOKEY */
|
|
282
|
|
283 #ifdef RECORDER
|
|
284 if (playback) {
|
|
285 pb_input(); /* recorder.c */
|
|
286 return;
|
|
287 }
|
|
288 #endif
|
|
289 while (me->p_status == PALIVE ||
|
|
290 me->p_status == PEXPLODE ||
|
|
291 me->p_status == PDEAD ||
|
|
292 me->p_status == POBSERVE) {
|
|
293
|
|
294 #ifdef TIMELORD
|
|
295 /* we're playing. Count the seconds */
|
|
296 update_timelord(0);
|
|
297 #endif
|
|
298
|
|
299 if (keepInfo > 0) {
|
|
300 if (infowin_up >= 0 &&
|
|
301 --infowin_up == -1 &&
|
|
302 infomapped) {
|
|
303 destroyInfo();
|
|
304 infowin_up = -2;
|
|
305 }
|
|
306 }
|
|
307 exitInputLoop = 0;
|
|
308 while (W_EventsPending() && !exitInputLoop) {
|
|
309 fastQuit = 0; /* any event cancel fastquit */
|
|
310 W_NextEvent(&data);
|
|
311 dispatch_W_event(&data);
|
|
312 }
|
|
313
|
|
314 #if 0
|
|
315 /*
|
|
316 Do some enforcement of non-paradise feature disabling. The options
|
|
317 menu doesn't deal with this too well.
|
|
318 */
|
|
319 if (!paradise) {
|
|
320 blk_zoom = 0;
|
|
321 blk_showStars = 0;
|
|
322 }
|
|
323 #endif
|
|
324 #ifndef AMIGA
|
|
325 FD_ZERO(&readfds);
|
|
326 FD_SET(wsock, &readfds);
|
|
327 FD_SET(sock, &readfds);
|
|
328 if (udpSock >= 0)
|
|
329 FD_SET(udpSock, &readfds);
|
|
330 #ifdef AUTOKEY
|
|
331 if (autoKey) {
|
|
332 doAutoKey();
|
|
333 if (select(32, &readfds, (fd_set *) 0, (fd_set *) 0, &timeout) == 0) /* timeout */
|
|
334 continue;
|
|
335 } else
|
|
336 #endif
|
|
337 select(32, &readfds, (fd_set *) 0, (fd_set *) 0, 0);
|
|
338 #else /* AMIGA */
|
|
339 #ifdef DNET
|
|
340 sigsPending = Wait(wsock | sockMask | udpSockMask | SIGBREAKF_CTRL_C);
|
|
341 #else
|
|
342 /* insert code here for Amiga with TCP/IP... */
|
|
343 #endif /* DNET */
|
|
344 if (sigsPending & SIGBREAKF_CTRL_C) {
|
|
345 printf("User break, Ctrl-C, exiting!\n");
|
|
346 exit(0);
|
|
347 }
|
|
348 /* note: for DNET, FD_ISSET is faked, see amigadefs.h -JR */
|
|
349 #endif /* AMIGA */
|
|
350 if (FD_ISSET(sock, &readfds) ||
|
|
351 (udpSock >= 0 && FD_ISSET(udpSock, &readfds))) {
|
|
352
|
|
353 #ifdef HANDLER_TIMES
|
|
354 start_log();
|
|
355 #endif
|
|
356 intrupt();
|
|
357 #ifdef HANDLER_TIMES
|
|
358 stop_log(64);
|
|
359 #endif
|
|
360 if (isServerDead()) {
|
|
361 printf("Whoops! We've been ghostbusted!\n");
|
|
362 printf("Pray for a miracle!\n");
|
|
363
|
|
364 /* UDP fail-safe */
|
|
365 commMode = commModeReq = COMM_TCP;
|
|
366 commSwitchTimeout = 0;
|
|
367 if (udpSock >= 0)
|
|
368 closeUdpConn();
|
|
369 if (udpWin) {
|
|
370 udprefresh(UDP_CURRENT);
|
|
371 udprefresh(UDP_STATUS);
|
|
372 }
|
|
373 connectToServer(nextSocket);
|
|
374 printf("Yea! We've been resurrected!\n");
|
|
375 }
|
|
376 /*
|
|
377 beep if tmode status changes. Idea from Roger Books. [BDyess]
|
|
378 */
|
|
379 new_tourn = paradise ? status2->tourn : status->tourn;
|
|
380
|
|
381 /* change war dec's at transitions to */
|
|
382 /* positive tmode */
|
|
383 if (!tmodeChange && new_tourn) {
|
|
384 autoWarDecl(autoSetWar);
|
|
385 tmodeChange = 1;
|
|
386 }
|
|
387
|
|
388 if (old_tourn != new_tourn) {
|
|
389 #ifndef SOUND
|
|
390 W_Beep();
|
|
391 #else
|
|
392 S_PlaySound(S_TMODE);
|
|
393 #endif
|
|
394 old_tourn = new_tourn;
|
|
395 }
|
|
396 continue;
|
|
397 }
|
|
398 }
|
|
399 }
|
|
400
|
|
401
|
|
402 static void
|
|
403 keyaction(data)
|
|
404 W_Event *data;
|
|
405 {
|
|
406 unsigned char course;
|
|
407 struct obtype *target;
|
|
408 int key = data->key;
|
|
409 struct shiplist *temp;
|
|
410
|
|
411 if (data->Window != mapw && data->Window != w
|
|
412 && data->Window != planetw && data->Window != planetw2
|
|
413 && data->Window != rankw
|
|
414 #ifdef ATM
|
|
415 && data->Window != scanw
|
|
416 #endif /* ATM */
|
|
417 )
|
|
418 return;
|
|
419
|
|
420 #ifdef RECORDER
|
|
421 if (playback)
|
|
422 pb_dokey(data);
|
|
423 #endif
|
|
424 if (localflags & PFREFIT) {
|
|
425 temp = shiptypes;
|
|
426 while (temp) {
|
|
427 if (temp->ship->s_letter == key) {
|
|
428 do_refit(temp->ship->s_type);
|
|
429 return;
|
|
430 }
|
|
431 temp = temp->next;
|
|
432 }
|
|
433 } else {
|
|
434 key = doKeymap(data);
|
|
435 if (key == -1)
|
|
436 return;
|
|
437 }
|
|
438
|
|
439 switch (key) {
|
|
440 case '0':
|
|
441 case '1':
|
|
442 case '2':
|
|
443 case '3':
|
|
444 case '4':
|
|
445 case '5':
|
|
446 case '6':
|
|
447 case '7':
|
|
448 case '8':
|
|
449 case '9':
|
|
450 set_speed(key - '0');
|
|
451 localflags &= ~(PFREFIT);
|
|
452 break;
|
|
453 case 'e': /* Turn off docking permission, eject docked
|
|
454 vessels. */
|
|
455 sendDockingReq(!(me->p_flags & PFDOCKOK));
|
|
456 break;
|
|
457 case 'r':
|
|
458 localflags |= PFREFIT;
|
|
459 warning(blk_refitstring);
|
|
460 break;
|
|
461 case control('0'): /* ctrl 0-9, speed 10-19 */
|
|
462 case control('1'):
|
|
463 case control('2'):
|
|
464 case control('3'):
|
|
465 case control('4'):
|
|
466 case control('5'):
|
|
467 case control('6'):
|
|
468 case control('7'):
|
|
469 case control('8'):
|
|
470 case control('9'):
|
|
471 set_speed(10 + key - control('0'));
|
|
472 localflags &= ~(PFREFIT);
|
|
473 break;
|
|
474 case control(')'): /* ctrl-shift 0-9, speed 20-29 */
|
|
475 set_speed(20);
|
|
476 localflags &= ~(PFREFIT);
|
|
477 break;
|
|
478 case control('!'): /* ctrl-shift-1, speed 21 */
|
|
479 set_speed(21);
|
|
480 localflags &= ~(PFREFIT);
|
|
481 break;
|
|
482 case control('@'): /* ctrl-shift-2, speed 22 */
|
|
483 set_speed(22);
|
|
484 localflags &= ~(PFREFIT);
|
|
485 break;
|
|
486 case control('#'): /* ctrl-shift-3, speed 23 */
|
|
487 set_speed(23);
|
|
488 localflags &= ~(PFREFIT);
|
|
489 break;
|
|
490 case control('$'): /* ctrl-shift-4, speed 24 */
|
|
491 set_speed(24);
|
|
492 localflags &= ~(PFREFIT);
|
|
493 break;
|
|
494 case control('%'): /* ctrl-shift-5, speed 25 */
|
|
495 set_speed(25);
|
|
496 localflags &= ~(PFREFIT);
|
|
497 break;
|
|
498 case control('^'): /* ctrl-shift-6, speed 26 */
|
|
499 set_speed(26);
|
|
500 localflags &= ~(PFREFIT);
|
|
501 break;
|
|
502 case control('&'): /* ctrl-shift-7, speed 27 */
|
|
503 set_speed(27);
|
|
504 localflags &= ~(PFREFIT);
|
|
505 break;
|
|
506 case control('*'): /* ctrl-shift-8, speed 28 */
|
|
507 set_speed(28);
|
|
508 localflags &= ~(PFREFIT);
|
|
509 break;
|
|
510 case control('('): /* ctrl-shift-9, speed 29 */
|
|
511 set_speed(29);
|
|
512 localflags &= ~(PFREFIT);
|
|
513 break;
|
|
514 case '`': /* afterburners */
|
|
515 set_speed(98);
|
|
516 localflags &= ~(PFREFIT);
|
|
517 break;
|
|
518 case '-':
|
|
519 set_speed(99); /* warp! */
|
|
520 localflags &= ~(PFREFIT);
|
|
521 break;
|
|
522 case control('-'): /* suspend warp toggle [BDyess] */
|
|
523 if (me->p_flags & PFWPSUSPENDED)
|
|
524 set_speed(96); /* unsuspend */
|
|
525 else
|
|
526 set_speed(97); /* suspend */
|
|
527 localflags &= ~(PFREFIT);
|
|
528 break;
|
|
529 case '%': /* max impulse */
|
|
530 set_speed(me->p_ship->s_maxspeed);
|
|
531 localflags &= ~(PFREFIT);
|
|
532 break;
|
|
533 case '<': /* speed -= 1 */
|
|
534 set_speed(me->p_speed - 1);
|
|
535 localflags &= ~(PFREFIT);
|
|
536 break;
|
|
537 case '>': /* speed += 1 */
|
|
538 set_speed(me->p_speed + 1);
|
|
539 localflags &= ~(PFREFIT);
|
|
540 break;
|
|
541 case '#': /* halfimpulse */
|
|
542 set_speed((me->p_ship->s_maxspeed + 1) / 2);
|
|
543 localflags &= ~(PFREFIT);
|
|
544 break;
|
|
545 case ':': /* toggle message logging */
|
|
546 if (logmess)
|
|
547 warning("Message logging disabled");
|
|
548 else
|
|
549 warning("Message logging enabled");
|
|
550 logmess = !logmess;
|
|
551 break;
|
|
552 case '!':
|
|
553 #if 1
|
|
554 showKitchenSink = !showKitchenSink;
|
|
555 warning(showKitchenSink ?
|
|
556 "Kitchen Sink activated. Bad guys beware!" :
|
|
557 "Kitchen Sink deactivated.");
|
|
558 #else
|
|
559 if (blk_altbits) {
|
|
560 blk_altbits = 0;
|
|
561 warning("Switching to old bitmaps.");
|
|
562 } else {
|
|
563 blk_altbits = 1;
|
|
564 warning("Switching to new bitmaps.");
|
|
565 }
|
|
566 localflags &= ~(PFREFIT);
|
|
567 if (optionWin)
|
|
568 optionredrawoption(&blk_altbits);
|
|
569 #endif
|
|
570 break;
|
|
571 #ifdef TIMER
|
|
572 case '@':
|
|
573 timeBank[T_USR] = time(NULL);
|
|
574 timerType = T_USR;
|
|
575 break;
|
|
576 case control('t'):
|
|
577 timerType++;
|
|
578 if (timerType >= T_TOTAL)
|
|
579 timerType = 0;
|
|
580 break;
|
|
581 #endif /* TIMER */
|
|
582 #ifdef WIDE_PLIST
|
|
583 case 'K': /* cycle playerlist [BDyess] */
|
|
584 while (*playerList && *playerList != ',')
|
|
585 playerList++;
|
|
586 if (*playerList == ',')
|
|
587 playerList++;
|
|
588 else if (*playerList == 0)
|
|
589 playerList = playerListStart;
|
|
590 break;
|
|
591 #endif /* WIDE_PLIST */
|
|
592 case 'a':
|
|
593 #ifdef ATM
|
|
594 if (!W_IsMapped(scanwin)) {
|
|
595 scan(data->Window, data->x, data->y);
|
|
596 } else {
|
|
597 if (scanmapped)
|
|
598 W_UnmapWindow(scanwin);
|
|
599 scanmapped = 0;
|
|
600 }
|
|
601 #endif /* ATM */
|
|
602 break;
|
|
603 case 'm': /* new from galaxy -- works here too */
|
|
604 case '\'': /* ' starts message to 'T'eam */
|
|
605 #ifdef NOWARP
|
|
606 message_on();
|
|
607 #else
|
|
608 W_WarpPointer(messagew);
|
|
609 #endif
|
|
610 if((key == '\'') && (messpend==0)) {
|
|
611 smessage(lowercaset ? 't' : 'T');
|
|
612 }
|
|
613 break;
|
|
614 case 'k': /* k = set course */
|
|
615 course = getcourse(data->Window, data->x, data->y);
|
|
616 set_course(course);
|
|
617 me->p_flags &= ~(PFPLOCK | PFPLLOCK);
|
|
618 localflags &= ~(PFREFIT);
|
|
619 break;
|
|
620 case 'p': /* p = fire phasers */
|
|
621 #ifdef AUTOKEY
|
|
622 if (autoKey)
|
|
623 autoKeyPhaserReqOn();
|
|
624 else {
|
|
625 course = getcourse(data->Window, data->x, data->y);
|
|
626 sendPhaserReq(course);
|
|
627 }
|
|
628 #else
|
|
629 course = getcourse(data->Window, data->x, data->y);
|
|
630 sendPhaserReq(course);
|
|
631 #endif /* AUTOKEY */
|
|
632 break;
|
|
633 case 't': /* t = launch torps */
|
|
634 #ifdef AUTOKEY
|
|
635 if (autoKey)
|
|
636 autoKeyTorpReqOn();
|
|
637 else {
|
|
638 course = getcourse(data->Window, data->x, data->y);
|
|
639 sendTorpReq(course);
|
|
640 }
|
|
641 #else
|
|
642 course = getcourse(data->Window, data->x, data->y);
|
|
643 sendTorpReq(course);
|
|
644 #endif /* AUTOKEY */
|
|
645 break;
|
|
646 case 'f':
|
|
647 /* f = launch plasma torpedos */
|
|
648 #ifdef AUTOKEY
|
|
649 if (autoKey)
|
|
650 autoKeyPlasmaReqOn();
|
|
651 else {
|
|
652 course = getcourse(data->Window, data->x, data->y);
|
|
653 sendPlasmaReq(course);
|
|
654 }
|
|
655 #else
|
|
656 course = getcourse(data->Window, data->x, data->y);
|
|
657 sendPlasmaReq(course);
|
|
658 #endif /* AUTOKEY */
|
|
659 break;
|
|
660 case 'd': /* d = detonate other torps */
|
|
661 #ifdef AUTOKEY
|
|
662 if (autoKey)
|
|
663 autoKeyDetReqOn();
|
|
664 else
|
|
665 sendDetonateReq();
|
|
666 #else
|
|
667 sendDetonateReq();
|
|
668 #endif /* AUTOKEY */
|
|
669 break;
|
|
670 case 'D': /* D = detonate my torps */
|
|
671 detmine();
|
|
672 #ifdef AUTOKEY
|
|
673 if (autoKey)
|
|
674 autoKeyAllOff(); /* xx */
|
|
675 #endif
|
|
676 break;
|
|
677 case '[':
|
|
678 shield_down();
|
|
679 break;
|
|
680 case ']':
|
|
681 shield_up();
|
|
682 break;
|
|
683 case 'u': /* u = toggle shields */
|
|
684 shield_tog();
|
|
685 break;
|
|
686 case 's': /* For Serge */
|
|
687 shield_tog();
|
|
688 break;
|
|
689 case 'b': /* b = bomb planet */
|
|
690 #ifdef AUTOKEY
|
|
691 if (autoKey && !(localflags & PFREFIT))
|
|
692 autoKeyBombReqOn();
|
|
693 else
|
|
694 bomb_planet();
|
|
695 #else
|
|
696 bomb_planet();
|
|
697 #endif /* AUTOKEY */
|
|
698 break;
|
|
699 case 'z': /* z = beam up */
|
|
700 #ifdef AUTOKEY
|
|
701 if (autoKey)
|
|
702 autoKeyBeamUpReqOn();
|
|
703 else
|
|
704 #endif
|
|
705 beam_up();
|
|
706 break;
|
|
707 case 'x': /* x = beam down */
|
|
708 #ifdef AUTOKEY
|
|
709 if (autoKey)
|
|
710 autoKeyBeamDownReqOn();
|
|
711 else
|
|
712 #endif
|
|
713 beam_down();
|
|
714 break;
|
|
715 case 'X': /* X = enter macro mode */
|
|
716 macroState = 1;
|
|
717 warning("Macro mode");
|
|
718 break;
|
|
719 case 'R': /* R = Go into repair mode */
|
|
720 sendRepairReq(1);
|
|
721 break;
|
|
722 case 'y':
|
|
723 case 'T':
|
|
724 case '_': /* _ = turn on tractor beam */
|
|
725 case '^': /* ^ = turn on pressor beam */
|
|
726 if (me->p_flags & (PFTRACT | PFPRESS)) {
|
|
727 sendTractorReq(0, me->p_no);
|
|
728 if (key == 'T' || key == 'y')
|
|
729 break;
|
|
730 }
|
|
731 target = gettarget(data->Window, data->x, data->y, TARG_PLAYER);
|
|
732 me->p_tractor = target->o_num;
|
|
733 if (key == 'T' || key == '_') {
|
|
734 sendTractorReq(1, target->o_num);
|
|
735 } else {
|
|
736 sendRepressReq(1, target->o_num);
|
|
737 }
|
|
738 break;
|
|
739 case '$': /* turn off tractor/pressor beam */
|
|
740 sendTractorReq(0, me->p_no);
|
|
741 break;
|
|
742 case 'o': /* o = dock at nearby starbase or orbit
|
|
743 nearest planet */
|
|
744 #ifdef AUTOKEY
|
|
745 if (autoKey && !(localflags & PFREFIT))
|
|
746 autoKeyOrbitReqOn();
|
|
747 else
|
|
748 sendOrbitReq(1);
|
|
749 #else
|
|
750 sendOrbitReq(1);
|
|
751 #endif /* AUTOKEY */
|
|
752 break;
|
|
753 case 'O': /* O = options Window */
|
|
754 if (optionWin != NULL && W_IsMapped(optionWin))
|
|
755 optiondone();
|
|
756 else
|
|
757 optionwindow();
|
|
758 break;
|
|
759 case 'Q':
|
|
760 sendQuitReq();
|
|
761 break;
|
|
762 case 'q': /* fastquit */
|
|
763 fastQuit = 1;
|
|
764 sendQuitReq();
|
|
765 break;
|
|
766 case 'V':
|
|
767 {
|
|
768 /* configurable showlocal rotation sequence [BDyess] */
|
|
769 int i, len = strlen(showLocalSequence);
|
|
770 for (i = 0; i < len; i++) {
|
|
771 if (showLocalSequence[i] - '0' == showlocal) {
|
|
772 showlocal = showLocalSequence[(i + 1) % len] - '0';
|
|
773 break;
|
|
774 }
|
|
775 }
|
|
776 if (i == len)
|
|
777 showlocal = (*showLocalSequence) - '0';
|
|
778 if (showlocal > 4)
|
|
779 showlocal = 4;
|
|
780 else if (showlocal < 0)
|
|
781 showlocal = 0;
|
|
782 }
|
|
783 if (optionWin)
|
|
784 optionredrawoption(&showlocal);
|
|
785 break;
|
|
786 case 'B':
|
|
787 {
|
|
788 /* configurable showgalactic rotation sequence [BDyess] */
|
|
789 int i, len = strlen(showGalacticSequence);
|
|
790 for (i = 0; i < len; i++) {
|
|
791 if (showGalacticSequence[i] - '0' == showgalactic) {
|
|
792 showgalactic = showGalacticSequence[(i + 1) % len] - '0';
|
|
793 break;
|
|
794 }
|
|
795 }
|
|
796 if (i == len)
|
|
797 showgalactic = (*showGalacticSequence) - '0';
|
|
798 if (!paradise && showgalactic == 3)
|
|
799 showgalactic = 5; /* force scout ages -> MOO */
|
|
800 if (showgalactic > 5)
|
|
801 showgalactic = 5;
|
|
802 else if (showgalactic < 0)
|
|
803 showgalactic = 0;
|
|
804 }
|
|
805 redrawall = 1;
|
|
806 if (optionWin)
|
|
807 optionredrawoption(&showgalactic);
|
|
808 break;
|
|
809 case '?': /* ? = Redisplay all message windows */
|
|
810 if (!W_IsMapped(messWin[WREVIEW].window)) {
|
|
811 if (W_IsMapped(messWin[WALL].window)) {
|
|
812 int i;
|
|
813 for (i = 0; i < WNUM; i++) {
|
|
814 if (W_IsMapped(messWin[i].window))
|
|
815 W_UnmapWindow(messWin[i].window);
|
|
816 }
|
|
817 } else {
|
|
818 W_MapWindow(messWin[WREVIEW].window);
|
|
819 }
|
|
820 } else {
|
|
821 W_UnmapWindow(messWin[WREVIEW].window);
|
|
822 W_MapWindow(messWin[WALL].window);
|
|
823 W_MapWindow(messWin[WTEAM].window);
|
|
824 W_MapWindow(messWin[WINDIV].window);
|
|
825 W_MapWindow(messWin[WKILL].window);
|
|
826 W_MapWindow(messWin[WPHASER].window);
|
|
827 }
|
|
828 if (optionWin) {
|
|
829 optionredrawtarget(messWin[WREVIEW].window);
|
|
830 optionredrawtarget(messWin[WALL].window);
|
|
831 optionredrawtarget(messWin[WKILL].window);
|
|
832 optionredrawtarget(messWin[WTEAM].window);
|
|
833 optionredrawtarget(messWin[WINDIV].window);
|
|
834 optionredrawtarget(messWin[WPHASER].window);
|
|
835 }
|
|
836 break;
|
|
837 case 'c': /* c = cloak */
|
|
838 cloak();
|
|
839 break;
|
|
840 case '{': /* { = cloak, no toggle */
|
|
841 sendCloakReq(1);
|
|
842 break;
|
|
843 case '}': /* } = uncloak, no toggle */
|
|
844 sendCloakReq(0);
|
|
845 break;
|
|
846 case 'C': /* C = coups */
|
|
847 sendCoupReq();
|
|
848 break;
|
|
849 case ';': /* ; = lock onto planet/base */
|
|
850 target = gettarget(data->Window, data->x, data->y,
|
|
851 TARG_BASE | TARG_PLANET);
|
|
852 if (target->o_type == PLAYERTYPE) {
|
|
853 sendPlaylockReq(target->o_num); /* a base */
|
|
854 me->p_playerl = target->o_num;
|
|
855 } else { /* It's a planet */
|
|
856 sendPlanlockReq(target->o_num);
|
|
857 me->p_planet = target->o_num;
|
|
858 }
|
|
859 break;
|
|
860 case 'l': /* l = lock onto */
|
|
861 target = gettarget(data->Window, data->x, data->y,
|
|
862 TARG_PLAYER | TARG_ASTRAL);
|
|
863 if (target->o_type == PLAYERTYPE) {
|
|
864 sendPlaylockReq(target->o_num);
|
|
865 me->p_playerl = target->o_num;
|
|
866 } else { /* It's a planet */
|
|
867 sendPlanlockReq(target->o_num);
|
|
868 me->p_planet = target->o_num;
|
|
869 }
|
|
870 break;
|
|
871 case '/': /* toggle sorted player list */
|
|
872 sortPlayers = !sortPlayers;
|
|
873 break;
|
|
874 case '*': /* send in practice robot */
|
|
875 sendPractrReq();
|
|
876 break;
|
|
877 /* Start of display functions */
|
|
878 case ' ': /* ' ' = clear special windows */
|
|
879 W_UnmapWindow(planetw);
|
|
880 W_UnmapWindow(planetw2);
|
|
881 W_UnmapWindow(rankw);
|
|
882 if (infomapped)
|
|
883 destroyInfo();
|
|
884 W_UnmapWindow(helpWin);
|
|
885 W_UnmapWindow(war);
|
|
886 if (optionWin)
|
|
887 optiondone();
|
|
888 #ifdef ATM
|
|
889 if (scanmapped) {
|
|
890 W_UnmapWindow(scanwin);
|
|
891 scanmapped = 0;
|
|
892 }
|
|
893 if (udpWin)
|
|
894 udpdone();
|
|
895 #endif /* ATM */
|
|
896 #ifdef XTREKRC_HELP
|
|
897 if (defWin)
|
|
898 W_UnmapWindow(defWin);
|
|
899 #endif
|
|
900 break;
|
|
901 case 'E': /* E = send emergency call */
|
|
902 if (F_gen_distress)
|
|
903 rcd(generic, data);
|
|
904 else
|
|
905 emergency();
|
|
906 break;
|
|
907 case 'F': /* F = send carry report */
|
|
908 if (F_gen_distress)
|
|
909 rcd(carrying, data);
|
|
910 else
|
|
911 carry_report();
|
|
912 break;
|
|
913 case 'L': /* L = Player list */
|
|
914 if (W_IsMapped(playerw)) {
|
|
915 W_UnmapWindow(playerw);
|
|
916 } else {
|
|
917 W_MapWindow(playerw);
|
|
918 }
|
|
919 break;
|
|
920 case 'P': /* P = Planet list */
|
|
921 if (W_IsMapped(planetw)) {
|
|
922 W_UnmapWindow(planetw);
|
|
923 W_UnmapWindow(planetw2);
|
|
924 } else {
|
|
925 W_MapWindow(planetw);
|
|
926 W_MapWindow(planetw2);
|
|
927 }
|
|
928 break;
|
|
929 case 'U': /* U = Rank list */
|
|
930 if (W_IsMapped(rankw)) {
|
|
931 W_UnmapWindow(rankw);
|
|
932 } else {
|
|
933 W_MapWindow(rankw);
|
|
934 }
|
|
935 break;
|
|
936 case 'S': /* S = toggle stat mode */
|
|
937 if (W_IsMapped(statwin)) {
|
|
938 W_UnmapWindow(statwin);
|
|
939 } else {
|
|
940 W_MapWindow(statwin);
|
|
941 }
|
|
942 break;
|
|
943 #ifdef nodef /* people hit this by accident and think the
|
|
944 client crashed */
|
|
945 case 'M': /* M = Toggle Map mode */
|
|
946 mapmode = !mapmode;
|
|
947 if (optionWin)
|
|
948 optionredrawoption(&mapmode);
|
|
949 break;
|
|
950 #endif
|
|
951 case 'M': /* map the motd window */
|
|
952 showMotdWin();
|
|
953 break;
|
|
954 case 'N': /* N = Toggle Name mode */
|
|
955 namemode = !namemode;
|
|
956 if (optionWin)
|
|
957 optionredrawoption(&namemode);
|
|
958 break;
|
|
959 case 'i': /* i = get information */
|
|
960 case 'I': /* I = get extended information */
|
|
961 case control('i'): /* ^i = info on a planet [BDyess] */
|
|
962 if (!infomapped)
|
|
963 inform(data->Window, data->x, data->y, key);
|
|
964 else
|
|
965 destroyInfo();
|
|
966 break;
|
|
967 case 'h': /* h = Map help window */
|
|
968 if (W_IsMapped(helpWin)) {
|
|
969 W_UnmapWindow(helpWin);
|
|
970 } else {
|
|
971 W_MapWindow(helpWin);
|
|
972 }
|
|
973 if (optionWin)
|
|
974 optionredrawtarget(helpWin);
|
|
975 break;
|
|
976 case 'w': /* w = map war stuff */
|
|
977 if (W_IsMapped(war))
|
|
978 W_UnmapWindow(war);
|
|
979 else
|
|
980 warwindow();
|
|
981 break;
|
|
982 #ifdef ATM
|
|
983 case '+': /* UDP: pop up UDP control window */
|
|
984 if (udpWin != NULL && W_IsMapped(udpWin))
|
|
985 udpdone();
|
|
986 else {
|
|
987 char buf[80];
|
|
988 udpwindow();
|
|
989 sprintf(buf, "UDP client version %.1f",
|
|
990 (float) UDPVERSION / 10.0);
|
|
991 warning(buf);
|
|
992 }
|
|
993 if (optionWin)
|
|
994 optionredrawtarget(udpWin);
|
|
995 break;
|
|
996 case '=': /* UDP: request for full update */
|
|
997 sendUdpReq(COMM_UPDATE);
|
|
998 break;
|
|
999 #endif /* ATM */
|
|
1000
|
|
1001 case 9: /* tab */
|
|
1002 case control('m'): /* because you can't remap to tab */
|
|
1003 /* actually, you can, put a literal
|
|
1004 TAB in a ckeymap entry and it works.
|
|
1005 So should we keep this? -JR */
|
|
1006 if(paradise) {
|
|
1007 blk_zoom = !blk_zoom;
|
|
1008 redrawall = 1;
|
|
1009 auto_zoom_timer = udcounter+autoZoomOverride;
|
|
1010 if (optionWin)
|
|
1011 optionredrawoption(&blk_zoom);
|
|
1012 }
|
|
1013 break;
|
|
1014 #ifdef SHORT_PACKETS
|
|
1015 case '~':
|
|
1016 if (spWin != NULL && W_IsMapped(spWin))
|
|
1017 spdone();
|
|
1018 else
|
|
1019 spwindow();
|
|
1020 if (optionWin)
|
|
1021 optionredrawtarget(spWin);
|
|
1022 break;
|
|
1023 case '\\':
|
|
1024 sendShortReq(SPK_SALL);
|
|
1025 break;
|
|
1026 case '|':
|
|
1027 sendShortReq(SPK_ALL);
|
|
1028 break;
|
|
1029 #endif
|
|
1030 case ',':
|
|
1031 if (W_IsMapped(pStats)) {
|
|
1032 W_UnmapWindow(pStats);
|
|
1033 } else {
|
|
1034 W_MapWindow(pStats);
|
|
1035 redrawPStats();
|
|
1036 }
|
|
1037 if (optionWin)
|
|
1038 optionredrawtarget(pStats);
|
|
1039 break;
|
|
1040 case '&': /* reread defaults file */
|
|
1041 if (defaultsFile) {
|
|
1042 char buf[150];
|
|
1043 sprintf(buf, "Reading defaults from %s", defaultsFile);
|
|
1044 warning(buf);
|
|
1045 freeDefaults();
|
|
1046 defaultsFile = initDefaults(defaultsFile);
|
|
1047 resetDefaults();
|
|
1048 } else {
|
|
1049 warning("No defaults file to read from!");
|
|
1050 }
|
|
1051 break;
|
|
1052 #ifdef ROTATERACE
|
|
1053 case '(':
|
|
1054 rotate--;
|
|
1055 if (rotate < 0)
|
|
1056 rotate = 3;
|
|
1057 if (optionWin)
|
|
1058 optionredrawoption(&rotate);
|
|
1059 rotate_all();
|
|
1060 break;
|
|
1061 case ')':
|
|
1062 rotate++;
|
|
1063 if (rotate > 3)
|
|
1064 rotate = 0;
|
|
1065 if (optionWin)
|
|
1066 optionredrawoption(&rotate);
|
|
1067 rotate_all();
|
|
1068 break;
|
|
1069 #endif
|
|
1070
|
|
1071 #ifdef RECORDER
|
|
1072 case control('r'):
|
|
1073 stopRecorder();
|
|
1074 break;
|
|
1075 #endif
|
|
1076
|
|
1077 #ifdef SOUND
|
|
1078 case control('s'):
|
|
1079 S_SoundWindow();
|
|
1080 break;
|
|
1081 #endif
|
|
1082 #ifdef TOOLS
|
|
1083 case '\"':
|
|
1084 showToolsWin();
|
|
1085 break;
|
|
1086 #endif
|
|
1087 #ifdef AMIGA
|
|
1088 case 'A':
|
|
1089 {
|
|
1090 extern int flush_speech;
|
|
1091 flush_speech = 1;
|
|
1092 break;
|
|
1093 }
|
|
1094 #endif /* AMIGA */
|
|
1095 default:
|
|
1096 W_Beep();
|
|
1097 break;
|
|
1098 }
|
|
1099 }
|
|
1100
|
|
1101 static void
|
|
1102 buttonaction(data)
|
|
1103 W_Event *data;
|
|
1104 {
|
|
1105 unsigned char course;
|
|
1106
|
|
1107 #ifdef NOWARP
|
|
1108 if (messageon)
|
|
1109 message_off(); /* ATM */
|
|
1110 #endif
|
|
1111
|
|
1112 if (data->Window != w && data->Window != mapw
|
|
1113 #ifdef ATM
|
|
1114 && data->Window != scanwin
|
|
1115 #endif /* ATM */
|
|
1116 )
|
|
1117 return;
|
|
1118
|
|
1119 data->key--;
|
|
1120 if (data->key >= 0 && data->key < 12) {
|
|
1121 if (myship->s_buttonmap[data->key] != '\0') {
|
|
1122 data->key = myship->s_buttonmap[data->key];
|
|
1123 #if 0 /* do NOT bypass keymap */
|
|
1124 data->key += 256; /* simulate alt key so keymap is bypassed
|
|
1125 [BDyess] */
|
|
1126 #endif
|
|
1127 keyaction(data);
|
|
1128 return;
|
|
1129 } else
|
|
1130 data->key = data->key % 3;
|
|
1131 /* if alt key is pressed, do default */
|
|
1132 } if (data->key > 11)
|
|
1133 data->key -= 12;
|
|
1134 data->key++;
|
|
1135 if (data->key == W_RBUTTON) {
|
|
1136 course = getcourse(data->Window, data->x, data->y);
|
|
1137 set_course(course);
|
|
1138 } else if (data->key == W_LBUTTON) {
|
|
1139 course = getcourse(data->Window, data->x, data->y);
|
|
1140 sendTorpReq(course);
|
|
1141 } else if (data->key == W_MBUTTON) {
|
|
1142 course = getcourse(data->Window, data->x, data->y);
|
|
1143 sendPhaserReq(course);
|
|
1144 }
|
|
1145 }
|
|
1146
|
|
1147 /*
|
|
1148 * changed from unsigned char to irint() for precise rounding (from Leonard
|
|
1149 * Dickens)
|
|
1150 *
|
|
1151 * changed from irint (which ULTRIX doesn't have in its math.h header) to
|
|
1152 * floor(x+0.5) for portability.
|
|
1153 */
|
|
1154
|
|
1155
|
|
1156
|
|
1157 int
|
|
1158 getcourse(ww, x, y)
|
|
1159 W_Window ww;
|
|
1160 int x, y;
|
|
1161 {
|
|
1162 if (ww == mapw) {
|
|
1163 int me_x, me_y;
|
|
1164 register gwidth, offsetx, offsety;
|
|
1165
|
|
1166 if (blk_zoom) {
|
|
1167 gwidth = blk_gwidth / 2;
|
|
1168 offsetx = zoom_offset(me->p_x);
|
|
1169 offsety = zoom_offset(me->p_y);
|
|
1170 } else {
|
|
1171 gwidth = blk_gwidth;
|
|
1172 offsetx = 0;
|
|
1173 offsety = 0;
|
|
1174 }
|
|
1175 me_x = (me->p_x - offsetx) * WINSIDE / gwidth;
|
|
1176 me_y = (me->p_y - offsety) * WINSIDE / gwidth;
|
|
1177
|
|
1178 return (unsigned char)(int)
|
|
1179 floor(0.5 + atan2((double) (x - me_x),
|
|
1180 (double) (me_y - y))
|
|
1181 / 3.14159 * 128.);
|
|
1182
|
|
1183
|
|
1184 } else {
|
|
1185
|
|
1186 double result = atan2((double) (x - WINSIDE / 2),
|
|
1187 (double) (WINSIDE / 2 - y)) / 3.14159 * 128.;
|
|
1188
|
|
1189 return (unsigned char) (int) floor (result + 0.5);
|
|
1190 }
|
|
1191 }
|
|
1192 #ifdef ATM
|
|
1193 static void
|
|
1194 scan(w, x, y)
|
|
1195 W_Window w;
|
|
1196 int x, y;
|
|
1197 {
|
|
1198 }
|
|
1199 #endif /* ATM */
|