]> git.zerfleddert.de Git - micropolis/blob - src/sim/w_sim.c
re-add (disabled) air crash disaster
[micropolis] / src / sim / w_sim.c
1 /* w_sim.c
2 *
3 * Micropolis, Unix Version. This game was released for the Unix platform
4 * in or about 1990 and has been modified for inclusion in the One Laptop
5 * Per Child program. Copyright (C) 1989 - 2007 Electronic Arts Inc. If
6 * you need assistance with this program, you may contact:
7 * http://wiki.laptop.org/go/Micropolis or email micropolis@laptop.org.
8 *
9 * This program is free software: you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation, either version 3 of the License, or (at
12 * your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful, but
15 * WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * General Public License for more details. You should have received a
18 * copy of the GNU General Public License along with this program. If
19 * not, see <http://www.gnu.org/licenses/>.
20 *
21 * ADDITIONAL TERMS per GNU GPL Section 7
22 *
23 * No trademark or publicity rights are granted. This license does NOT
24 * give you any right, title or interest in the trademark SimCity or any
25 * other Electronic Arts trademark. You may not distribute any
26 * modification of this program using the trademark SimCity or claim any
27 * affliation or association with Electronic Arts Inc. or its employees.
28 *
29 * Any propagation or conveyance of this program must include this
30 * copyright notice and these terms.
31 *
32 * If you convey this program (or any modifications of it) and assume
33 * contractual liability for the program to recipients of it, you agree
34 * to indemnify Electronic Arts for any liability that those contractual
35 * assumptions impose on Electronic Arts.
36 *
37 * You may not misrepresent the origins of this program; modified
38 * versions of the program must be marked as such and not identified as
39 * the original program.
40 *
41 * This disclaimer supplements the one included in the General Public
42 * License. TO THE FULLEST EXTENT PERMISSIBLE UNDER APPLICABLE LAW, THIS
43 * PROGRAM IS PROVIDED TO YOU "AS IS," WITH ALL FAULTS, WITHOUT WARRANTY
44 * OF ANY KIND, AND YOUR USE IS AT YOUR SOLE RISK. THE ENTIRE RISK OF
45 * SATISFACTORY QUALITY AND PERFORMANCE RESIDES WITH YOU. ELECTRONIC ARTS
46 * DISCLAIMS ANY AND ALL EXPRESS, IMPLIED OR STATUTORY WARRANTIES,
47 * INCLUDING IMPLIED WARRANTIES OF MERCHANTABILITY, SATISFACTORY QUALITY,
48 * FITNESS FOR A PARTICULAR PURPOSE, NONINFRINGEMENT OF THIRD PARTY
49 * RIGHTS, AND WARRANTIES (IF ANY) ARISING FROM A COURSE OF DEALING,
50 * USAGE, OR TRADE PRACTICE. ELECTRONIC ARTS DOES NOT WARRANT AGAINST
51 * INTERFERENCE WITH YOUR ENJOYMENT OF THE PROGRAM; THAT THE PROGRAM WILL
52 * MEET YOUR REQUIREMENTS; THAT OPERATION OF THE PROGRAM WILL BE
53 * UNINTERRUPTED OR ERROR-FREE, OR THAT THE PROGRAM WILL BE COMPATIBLE
54 * WITH THIRD PARTY SOFTWARE OR THAT ANY ERRORS IN THE PROGRAM WILL BE
55 * CORRECTED. NO ORAL OR WRITTEN ADVICE PROVIDED BY ELECTRONIC ARTS OR
56 * ANY AUTHORIZED REPRESENTATIVE SHALL CREATE A WARRANTY. SOME
57 * JURISDICTIONS DO NOT ALLOW THE EXCLUSION OF OR LIMITATIONS ON IMPLIED
58 * WARRANTIES OR THE LIMITATIONS ON THE APPLICABLE STATUTORY RIGHTS OF A
59 * CONSUMER, SO SOME OR ALL OF THE ABOVE EXCLUSIONS AND LIMITATIONS MAY
60 * NOT APPLY TO YOU.
61 */
62 #include "sim.h"
63
64
65 Tcl_HashTable SimCmds;
66
67
68 #define SIMCMD_CALL(proc) \
69 int SimCmd##proc(ARGS) { proc(); return (TCL_OK); }
70
71 #define SIMCMD_CALL_KICK(proc) \
72 int SimCmd##proc(ARGS) { proc(); Kick(); return (TCL_OK); }
73
74 #define SIMCMD_CALL_INT(proc) \
75 int SimCmd##proc(ARGS) { \
76 int val; \
77 if (argc != 3) return (TCL_ERROR); \
78 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK)) return (TCL_ERROR); \
79 proc(val); \
80 return (TCL_OK); \
81 }
82
83 #define SIMCMD_CALL_STR(proc) \
84 int SimCmd##proc(ARGS) { \
85 if (argc != 3) return (TCL_ERROR); \
86 proc(argv[2]); \
87 return (TCL_OK); \
88 }
89
90 #define SIMCMD_CALL_TILEXY(proc) \
91 int SimCmd##proc(ARGS) { \
92 int x, y; \
93 if (argc != 4) return (TCL_ERROR); \
94 if ((Tcl_GetInt(interp, argv[2], &x) != TCL_OK) || \
95 (x < 0) || (x >= WORLD_X)) return (TCL_ERROR); \
96 if ((Tcl_GetInt(interp, argv[3], &y) != TCL_OK) || \
97 (y < 0) || (y >= WORLD_Y)) return (TCL_ERROR); \
98 proc(x, y); \
99 return (TCL_OK); \
100 }
101
102 #define SIMCMD_ACCESS_INT(var) \
103 int SimCmd##var(ARGS) { \
104 int val; \
105 if ((argc != 2) && (argc != 3)) return (TCL_ERROR); \
106 if (argc == 3) { \
107 if (Tcl_GetInt(interp, argv[2], &val) != TCL_OK) return (TCL_ERROR); \
108 var = val; \
109 } \
110 sprintf(interp->result, "%d", var); \
111 return (TCL_OK); \
112 }
113
114 #define SIMCMD_GET_INT(var) \
115 int SimCmd##var(ARGS) { \
116 sprintf(interp->result, "%d", var); \
117 return (TCL_OK); \
118 }
119
120 #define SIMCMD_GET_STR(var) \
121 int SimCmd##var(ARGS) { \
122 sprintf(interp->result, "%s", var); \
123 return (TCL_OK); \
124 }
125
126
127 SIMCMD_CALL_KICK(GameStarted)
128 SIMCMD_CALL_KICK(InitGame)
129 SIMCMD_CALL(SaveCity)
130 SIMCMD_CALL(ReallyQuit)
131 SIMCMD_CALL_KICK(UpdateHeads)
132 SIMCMD_CALL_KICK(UpdateMaps)
133 SIMCMD_CALL_KICK(UpdateEditors)
134 SIMCMD_CALL_KICK(RedrawMaps)
135 SIMCMD_CALL_KICK(RedrawEditors)
136 SIMCMD_CALL_KICK(UpdateGraphs)
137 SIMCMD_CALL_KICK(UpdateEvaluation)
138 SIMCMD_CALL_KICK(UpdateBudget)
139 SIMCMD_CALL_KICK(UpdateBudgetWindow)
140 SIMCMD_CALL_KICK(DoBudget)
141 SIMCMD_CALL_KICK(DoBudgetFromMenu)
142 SIMCMD_CALL_KICK(Pause)
143 SIMCMD_CALL_KICK(Resume)
144 SIMCMD_CALL(StartBulldozer)
145 SIMCMD_CALL(StopBulldozer)
146 SIMCMD_CALL(MakeFire)
147 SIMCMD_CALL(MakeFlood)
148 SIMCMD_CALL(MakeAirCrash)
149 SIMCMD_CALL(MakeTornado)
150 SIMCMD_CALL(MakeEarthquake)
151 SIMCMD_CALL(MakeMonster)
152 SIMCMD_CALL(MakeMeltdown)
153 SIMCMD_CALL(FireBomb)
154 SIMCMD_CALL(SoundOff)
155 SIMCMD_CALL(GenerateNewCity)
156 SIMCMD_CALL_INT(GenerateSomeCity)
157 SIMCMD_ACCESS_INT(LakeLevel)
158 SIMCMD_ACCESS_INT(TreeLevel)
159 SIMCMD_ACCESS_INT(CurveLevel)
160 SIMCMD_ACCESS_INT(CreateIsland)
161 SIMCMD_CALL_KICK(SmoothTrees)
162 SIMCMD_CALL_KICK(SmoothWater)
163 SIMCMD_CALL_KICK(SmoothRiver)
164 SIMCMD_CALL_KICK(ClearMap)
165 SIMCMD_CALL_KICK(ClearUnnatural)
166 SIMCMD_CALL_INT(LoadScenario)
167 SIMCMD_CALL_STR(LoadCity)
168 SIMCMD_CALL_STR(SaveCityAs)
169 SIMCMD_CALL_TILEXY(MakeExplosion)
170 SIMCMD_CALL(EraseOverlay)
171 SIMCMD_ACCESS_INT(OverRide)
172 SIMCMD_ACCESS_INT(Expensive)
173 SIMCMD_ACCESS_INT(Players)
174 SIMCMD_ACCESS_INT(Votes)
175 SIMCMD_ACCESS_INT(BobHeight)
176 SIMCMD_ACCESS_INT(PendingTool)
177 SIMCMD_ACCESS_INT(PendingX)
178 SIMCMD_ACCESS_INT(PendingY)
179 SIMCMD_GET_STR(Displays)
180
181
182 int SimCmdCityName(ARGS)
183 {
184 if ((argc != 2) && (argc != 3)) {
185 return (TCL_ERROR);
186 }
187
188 if (argc == 3) {
189 setCityName(argv[2]);
190 }
191
192 sprintf(interp->result, "%s", CityName);
193 return (TCL_OK);
194 }
195
196
197 int SimCmdCityFileName(ARGS)
198 {
199 if ((argc != 2) && (argc != 3)) {
200 return (TCL_ERROR);
201 }
202
203 if (argc == 3) {
204 if (CityFileName != NULL) {
205 ckfree(CityFileName);
206 CityFileName = NULL;
207 }
208 if (argv[2][0] != '\0') {
209 CityFileName = (char *)ckalloc(strlen(argv[0]) + 1);
210 strcpy(CityFileName, argv[2]);
211 }
212 }
213
214 sprintf(interp->result, "%s", CityFileName ? CityFileName : "");
215 return (TCL_OK);
216 }
217
218
219 int SimCmdGameLevel(ARGS)
220 {
221 int level;
222
223 if ((argc != 2) && (argc != 3)) {
224 return (TCL_ERROR);
225 }
226
227 if (argc == 3) {
228 if ((Tcl_GetInt(interp, argv[2], &level) != TCL_OK) ||
229 (level < 0) || (level > 2)) {
230 return (TCL_ERROR);
231 }
232 SetGameLevelFunds(level);
233 }
234
235 sprintf(interp->result, "%d", GameLevel);
236 return (TCL_OK);
237 }
238
239
240 int SimCmdSpeed(ARGS)
241 {
242 int speed;
243
244 if ((argc != 2) && (argc != 3)) {
245 return (TCL_ERROR);
246 }
247
248 if (argc == 3) {
249 if ((Tcl_GetInt(interp, argv[2], &speed) != TCL_OK) ||
250 (speed < 0) || (speed > 7)) {
251 return (TCL_ERROR);
252 }
253 setSpeed(speed); Kick();
254 }
255
256 sprintf(interp->result, "%d", SimSpeed);
257 return (TCL_OK);
258 }
259
260
261 int SimCmdSkips(ARGS)
262 {
263 int skips;
264
265 if ((argc != 2) && (argc != 3)) {
266 return (TCL_ERROR);
267 }
268
269 if (argc == 3) {
270 if ((Tcl_GetInt(interp, argv[2], &skips) != TCL_OK) ||
271 (skips < 0)) {
272 return (TCL_ERROR);
273 }
274 setSkips(skips); Kick();
275 }
276
277 sprintf(interp->result, "%d", sim_skips);
278
279 return (TCL_OK);
280 }
281
282
283 int SimCmdSkip(ARGS)
284 {
285 int skip;
286
287 if ((argc != 2) && (argc != 3)) {
288 return (TCL_ERROR);
289 }
290
291 if (argc == 3) {
292 if ((Tcl_GetInt(interp, argv[2], &skip) != TCL_OK) ||
293 (skip < 0)) {
294 return (TCL_ERROR);
295 }
296 sim_skip = skip;
297 }
298
299 sprintf(interp->result, "%d", sim_skip);
300
301 return (TCL_OK);
302 }
303
304
305 int SimCmdDelay(ARGS)
306 {
307 int delay;
308
309 if ((argc != 2) && (argc != 3)) {
310 return (TCL_ERROR);
311 }
312
313 if (argc == 3) {
314 if ((Tcl_GetInt(interp, argv[2], &delay) != TCL_OK) ||
315 (delay < 0)) {
316 return (TCL_ERROR);
317 }
318 sim_delay = delay; Kick();
319 }
320
321 sprintf(interp->result, "%d", sim_delay);
322 return (TCL_OK);
323 }
324
325
326 int SimCmdWorldX(ARGS)
327 {
328 int val;
329
330 if (argc != 2) {
331 return (TCL_ERROR);
332 }
333
334 sprintf(interp->result, "%d", WORLD_X);
335 return (TCL_OK);
336 }
337
338
339 int SimCmdWorldY(ARGS)
340 {
341 int val;
342
343 if (argc != 2) {
344 return (TCL_ERROR);
345 }
346
347 sprintf(interp->result, "%d", WORLD_Y);
348 return (TCL_OK);
349 }
350
351
352 int SimCmdHeatSteps(ARGS)
353 {
354 int steps;
355
356 if ((argc != 2) && (argc != 3)) {
357 return (TCL_ERROR);
358 }
359
360 if (argc == 3) {
361 if ((Tcl_GetInt(interp, argv[2], &steps) != TCL_OK) ||
362 (steps < 0)) {
363 return (TCL_ERROR);
364 }
365 heat_steps = steps; Kick();
366 }
367
368 sprintf(interp->result, "%d", heat_steps);
369 return (TCL_OK);
370 }
371
372
373 int SimCmdHeatFlow(ARGS)
374 {
375 int flow;
376
377 if ((argc != 2) && (argc != 3)) {
378 return (TCL_ERROR);
379 }
380
381 if (argc == 3) {
382 if (Tcl_GetInt(interp, argv[2], &flow) != TCL_OK) {
383 return (TCL_ERROR);
384 }
385 heat_flow = flow;
386 }
387
388 sprintf(interp->result, "%d", heat_flow);
389 return (TCL_OK);
390 }
391
392
393 int SimCmdHeatRule(ARGS)
394 {
395 int rule;
396
397 if ((argc != 2) && (argc != 3)) {
398 return (TCL_ERROR);
399 }
400
401 if (argc == 3) {
402 if (Tcl_GetInt(interp, argv[2], &rule) != TCL_OK) {
403 return (TCL_ERROR);
404 }
405 heat_rule = rule;
406 }
407
408 sprintf(interp->result, "%d", heat_rule);
409 return (TCL_OK);
410 }
411
412
413 #ifdef CAM
414
415 int SimCmdJustCam(ARGS)
416 {
417 int cam;
418
419 if ((argc != 2) && (argc != 3)) {
420 return (TCL_ERROR);
421 }
422
423 if (argc == 3) {
424 if (Tcl_GetInt(interp, argv[2], &cam) != TCL_OK) {
425 return (TCL_ERROR);
426 }
427 sim_just_cam = cam;
428 }
429
430 sprintf(interp->result, "%d", sim_just_cam);
431 return (TCL_OK);
432 }
433
434 #endif
435
436
437 #ifdef NET
438
439 int SimCmdListenTo(ARGS)
440 {
441 int port, sock;
442
443 if (argc != 3) {
444 return (TCL_ERROR);
445 }
446
447 if (Tcl_GetInt(interp, argv[2], &port) != TCL_OK) {
448 return (TCL_ERROR);
449 }
450
451 #ifdef NET
452 sock = udp_listen(port);
453 #endif
454
455 sprintf(interp->result, "%d", sock);
456
457 return (TCL_OK);
458 }
459
460
461 int SimCmdHearFrom(ARGS)
462 {
463 int sock;
464
465 if (argc != 3) {
466 return (TCL_ERROR);
467 }
468
469 if ((argv[2][0] != 'f') ||
470 (argv[2][1] != 'i') ||
471 (argv[2][2] != 'l') ||
472 (argv[2][3] != 'e') ||
473 (Tcl_GetInt(interp, argv[2] + 4, &sock) != TCL_OK)) {
474 return (TCL_ERROR);
475 }
476
477 #ifdef NET
478 udp_hear(sock);
479 #endif
480
481 return (TCL_OK);
482 }
483
484 #endif /* NET */
485
486
487 int SimCmdFunds(ARGS)
488 {
489 int funds;
490
491 if ((argc != 2) && (argc != 3)) {
492 return (TCL_ERROR);
493 }
494
495 if (argc == 3) {
496 if ((Tcl_GetInt(interp, argv[2], &funds) != TCL_OK) ||
497 (funds < 0)) {
498 return (TCL_ERROR);
499 }
500 TotalFunds = funds;
501 MustUpdateFunds = 1;
502 Kick();
503 }
504
505 sprintf(interp->result, "%d", TotalFunds);
506 return (TCL_OK);
507 }
508
509
510 int SimCmdTaxRate(ARGS)
511 {
512 int tax;
513
514 if ((argc != 2) && (argc != 3)) {
515 return (TCL_ERROR);
516 }
517
518 if (argc == 3) {
519 if ((Tcl_GetInt(interp, argv[2], &tax) != TCL_OK) ||
520 (tax < 0) || (tax > 20)) {
521 return (TCL_ERROR);
522 }
523 CityTax = tax;
524 drawBudgetWindow(); Kick();
525 }
526
527 sprintf(interp->result, "%d", CityTax);
528 return (TCL_OK);
529 }
530
531
532 int SimCmdFireFund(ARGS)
533 {
534 int percent;
535
536 if ((argc != 2) && (argc != 3)) {
537 return (TCL_ERROR);
538 }
539
540 if (argc == 3) {
541 if ((Tcl_GetInt(interp, argv[2], &percent) != TCL_OK) ||
542 (percent < 0) || (percent > 100)) {
543 return (TCL_ERROR);
544 }
545 firePercent = percent / 100.0;
546 FireSpend = (fireMaxValue * percent) / 100;
547 UpdateFundEffects(); Kick();
548 }
549
550 sprintf(interp->result, "%d", (int)(firePercent * 100.0));
551 return (TCL_OK);
552 }
553
554
555 int SimCmdPoliceFund(ARGS)
556 {
557 int percent;
558
559 if ((argc != 2) && (argc != 3)) {
560 return (TCL_ERROR);
561 }
562
563 if (argc == 3) {
564 if ((Tcl_GetInt(interp, argv[2], &percent) != TCL_OK) ||
565 (percent < 0) || (percent > 100)) {
566 return (TCL_ERROR);
567 }
568 policePercent = percent / 100.0;
569 PoliceSpend = (policeMaxValue * percent) / 100;
570 UpdateFundEffects(); Kick();
571 }
572
573 sprintf(interp->result, "%d", (int)(policePercent * 100.0));
574 return (TCL_OK);
575 }
576
577
578 int SimCmdRoadFund(ARGS)
579 {
580 int percent;
581
582 if ((argc != 2) && (argc != 3)) {
583 return (TCL_ERROR);
584 }
585
586 if (argc == 3) {
587 if ((Tcl_GetInt(interp, argv[2], &percent) != TCL_OK) ||
588 (percent < 0) || (percent > 100)) {
589 return (TCL_ERROR);
590 }
591 roadPercent = percent / 100.0;
592 RoadSpend = (roadMaxValue * percent) / 100;
593 UpdateFundEffects(); Kick();
594 }
595
596 sprintf(interp->result, "%d", (int)(roadPercent * 100.0));
597 return (TCL_OK);
598 }
599
600
601 int SimCmdYear(ARGS)
602 {
603 int year;
604
605 if ((argc != 2) && (argc != 3)) {
606 return (TCL_ERROR);
607 }
608
609 if (argc == 3) {
610 if ((Tcl_GetInt(interp, argv[2], &year) != TCL_OK)) {
611 return (TCL_ERROR);
612 }
613 SetYear(year);
614 }
615
616 sprintf(interp->result, "%d", CurrentYear());
617 return (TCL_OK);
618 }
619
620
621 int SimCmdAutoBudget(ARGS)
622 {
623 int val;
624
625 if ((argc != 2) && (argc != 3)) {
626 return (TCL_ERROR);
627 }
628
629 if (argc == 3) {
630 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK) ||
631 (val < 0) || (val > 1)) {
632 return (TCL_ERROR);
633 }
634 autoBudget = val;
635 MustUpdateOptions = 1; Kick();
636 UpdateBudget();
637 }
638
639 sprintf(interp->result, "%d", autoBudget);
640 return (TCL_OK);
641 }
642
643
644 int SimCmdAutoGoto(ARGS)
645 {
646 int val;
647
648 if ((argc != 2) && (argc != 3)) {
649 return (TCL_ERROR);
650 }
651
652 if (argc == 3) {
653 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK) ||
654 (val < 0) || (val > 1)) {
655 return (TCL_ERROR);
656 }
657 autoGo = val;
658 MustUpdateOptions = 1; Kick();
659 }
660
661 sprintf(interp->result, "%d", autoGo);
662 return (TCL_OK);
663 }
664
665
666 int SimCmdAutoBulldoze(ARGS)
667 {
668 int val;
669
670 if ((argc != 2) && (argc != 3)) {
671 return (TCL_ERROR);
672 }
673
674 if (argc == 3) {
675 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK) ||
676 (val < 0) || (val > 1)) {
677 return (TCL_ERROR);
678 }
679 autoBulldoze = val;
680 MustUpdateOptions = 1; Kick();
681 }
682
683 sprintf(interp->result, "%d", autoBulldoze);
684 return (TCL_OK);
685 }
686
687
688 int SimCmdDisasters(ARGS)
689 {
690 int val;
691
692 if ((argc != 2) && (argc != 3)) {
693 return (TCL_ERROR);
694 }
695
696 if (argc == 3) {
697 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK) ||
698 (val < 0) || (val > 1)) {
699 return (TCL_ERROR);
700 }
701 NoDisasters = val ? 0 : 1;
702 MustUpdateOptions = 1; Kick();
703 }
704
705 sprintf(interp->result, "%d", NoDisasters ? 0 : 1);
706 return (TCL_OK);
707 }
708
709
710 int SimCmdSound(ARGS)
711 {
712 int val;
713
714 if ((argc != 2) && (argc != 3)) {
715 return (TCL_ERROR);
716 }
717
718 if (argc == 3) {
719 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK) ||
720 (val < 0) || (val > 1)) {
721 return (TCL_ERROR);
722 }
723 UserSoundOn = val;
724 MustUpdateOptions = 1; Kick();
725 }
726
727 sprintf(interp->result, "%d", UserSoundOn);
728 return (TCL_OK);
729 }
730
731
732 int SimCmdFlush(ARGS)
733 {
734 int style;
735
736 if (argc != 2) {
737 return (TCL_ERROR);
738 }
739
740 return (TCL_OK);
741 }
742
743
744 int SimCmdFlushStyle(ARGS)
745 {
746 int style;
747
748 if ((argc != 2) && (argc != 3)) {
749 return (TCL_ERROR);
750 }
751
752 if (argc == 3) {
753 if ((Tcl_GetInt(interp, argv[2], &style) != TCL_OK) ||
754 (style < 0)) {
755 return (TCL_ERROR);
756 }
757 FlushStyle = style;
758 }
759
760 sprintf(interp->result, "%d", FlushStyle);
761 return (TCL_OK);
762 }
763
764
765 int SimCmdDonDither(ARGS)
766 {
767 int dd;
768
769 if ((argc != 2) && (argc != 3)) {
770 return (TCL_ERROR);
771 }
772
773 if (argc == 3) {
774 if ((Tcl_GetInt(interp, argv[2], &dd) != TCL_OK) ||
775 (dd < 0)) {
776 return (TCL_ERROR);
777 }
778 DonDither = dd;
779 }
780
781 sprintf(interp->result, "%d", DonDither);
782 return (TCL_OK);
783 }
784
785
786 int SimCmdDoOverlay(ARGS)
787 {
788 int dd;
789
790 if ((argc != 2) && (argc != 3)) {
791 return (TCL_ERROR);
792 }
793
794 if (argc == 3) {
795 if ((Tcl_GetInt(interp, argv[2], &dd) != TCL_OK) ||
796 (dd < 0)) {
797 return (TCL_ERROR);
798 }
799 DoOverlay = dd;
800 }
801
802 sprintf(interp->result, "%d", DoOverlay);
803 return (TCL_OK);
804 }
805
806
807 int SimCmdMonsterGoal(ARGS)
808 {
809 SimSprite *sprite;
810 int x, y;
811
812 if (argc != 4) {
813 return (TCL_ERROR);
814 }
815
816 if (Tcl_GetInt(interp, argv[2], &x) != TCL_OK) {
817 return (TCL_ERROR);
818 }
819 if (Tcl_GetInt(interp, argv[3], &y) != TCL_OK) {
820 return (TCL_ERROR);
821 }
822 if ((sprite = GetSprite(GOD)) == NULL) {
823 MakeMonster();
824 if ((sprite = GetSprite(GOD)) == NULL)
825 return (TCL_ERROR);
826 }
827 sprite->dest_x = x;
828 sprite->dest_y = y;
829 sprite->control = -2;
830 sprite->count = -1;
831
832 return (TCL_OK);
833 }
834
835
836 int SimCmdHelicopterGoal(ARGS)
837 {
838 int x, y;
839 SimSprite *sprite;
840
841 if (argc != 4) {
842 return (TCL_ERROR);
843 }
844
845 if (Tcl_GetInt(interp, argv[2], &x) != TCL_OK) {
846 return (TCL_ERROR);
847 }
848 if (Tcl_GetInt(interp, argv[3], &y) != TCL_OK) {
849 return (TCL_ERROR);
850 }
851
852 if ((sprite = GetSprite(COP)) == NULL) {
853 GenerateCopter(x, y);
854 if ((sprite = GetSprite(COP)) == NULL) {
855 return (TCL_ERROR);
856 }
857 }
858 sprite->dest_x = x;
859 sprite->dest_y = y;
860
861 return (TCL_OK);
862 }
863
864
865 int SimCmdMonsterDirection(ARGS)
866 {
867 int dir;
868 SimSprite *sprite;
869
870 if (argc != 3) {
871 return (TCL_ERROR);
872 }
873
874 if ((Tcl_GetInt(interp, argv[2], &dir) != TCL_OK) ||
875 (dir < -1) || (dir > 7)) {
876 return (TCL_ERROR);
877 }
878 if ((sprite = GetSprite(GOD)) == NULL) {
879 MakeMonster();
880 if ((sprite = GetSprite(GOD)) == NULL) {
881 return (TCL_ERROR);
882 }
883 }
884 sprite->control = dir;
885
886 return (TCL_OK);
887 }
888
889
890 int SimCmdTile(ARGS)
891 {
892 int x, y, tile;
893
894 if ((argc != 4) && (argc != 5)) {
895 return (TCL_ERROR);
896 }
897 if ((Tcl_GetInt(interp, argv[2], &x) != TCL_OK) ||
898 (x < 0) ||
899 (x >= WORLD_X) ||
900 (Tcl_GetInt(interp, argv[3], &y) != TCL_OK) ||
901 (y < 0) ||
902 (y >= WORLD_Y)) {
903 return (TCL_ERROR);
904 }
905 if (argc == 5) {
906 if (Tcl_GetInt(interp, argv[4], &tile) != TCL_OK) {
907 return (TCL_ERROR);
908 }
909 Map[x][y] = tile;
910 }
911 sprintf(interp->result, "%d", Map[x][y]);
912 return (TCL_OK);
913 }
914
915
916 int SimCmdFill(ARGS)
917 {
918 int tile, x, y;
919
920 if (argc != 3) {
921 return (TCL_ERROR);
922 }
923 if (Tcl_GetInt(interp, argv[2], &tile) != TCL_OK) {
924 return (TCL_ERROR);
925 }
926 for (x = 0; x < WORLD_X; x++) {
927 for (y = 0; y < WORLD_Y; y++) {
928 Map[x][y] = tile;
929 }
930 }
931 sprintf(interp->result, "%d", tile);
932 return (TCL_OK);
933 }
934
935
936 int SimCmdDynamicData(ARGS)
937 {
938 int index, val;
939
940 if ((argc != 3) && (argc != 4)) {
941 return (TCL_ERROR);
942 }
943
944 if ((Tcl_GetInt(interp, argv[2], &index) != TCL_OK) ||
945 (index < 0) ||
946 (index >= 32)) {
947 return (TCL_ERROR);
948 }
949
950 if (argc == 4) {
951 int val;
952
953 if (Tcl_GetInt(interp, argv[3], &val) != TCL_OK) {
954 return (TCL_ERROR);
955 }
956 DynamicData[index] = val;
957 NewMapFlags[DYMAP] = 1;
958 Kick();
959 }
960
961 sprintf(interp->result, "%d", DynamicData[index]);
962 return (TCL_OK);
963 }
964
965
966 int SimCmdResetDynamic(ARGS)
967 {
968 int i;
969
970 for (i = 0; i < 16; i++) {
971 DynamicData[i] = (i & 1) ? 99999 : -99999;
972 }
973 NewMapFlags[DYMAP] = 1;
974 Kick();
975 return (TCL_OK);
976 }
977
978
979 int SimCmdPerformance(ARGS)
980 {
981 SimView *view;
982
983 PerformanceTiming = 1;
984 FlushTime = 0.0;
985 for (view = sim->editor; view != NULL; view = view->next) {
986 view->updates = 0;
987 view->update_real = view->update_user = view->update_system = 0.0;
988 }
989 return (TCL_OK);
990 }
991
992
993 int SimCmdCollapseMotion(ARGS)
994 {
995 int val;
996
997 if ((argc != 2) && (argc != 3)) {
998 return (TCL_ERROR);
999 }
1000
1001 if (argc == 3) {
1002 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK)) {
1003 return (TCL_ERROR);
1004 }
1005 tkCollapseMotion = val;
1006 }
1007
1008 sprintf(interp->result, "%d", tkCollapseMotion);
1009 return (TCL_OK);
1010 }
1011
1012
1013 int SimCmdUpdate(ARGS)
1014 {
1015 sim_update();
1016 return (TCL_OK);
1017 }
1018
1019
1020 int SimCmdLandValue(ARGS)
1021 {
1022 int val;
1023
1024 if (argc != 2) {
1025 return (TCL_ERROR);
1026 }
1027
1028 sprintf(interp->result, "%d", LVAverage);
1029 return (TCL_OK);
1030 }
1031
1032
1033 int SimCmdTraffic(ARGS)
1034 {
1035 int val;
1036
1037 if (argc != 2) {
1038 return (TCL_ERROR);
1039 }
1040
1041 sprintf(interp->result, "%d", AverageTrf());
1042 return (TCL_OK);
1043 }
1044
1045
1046 int SimCmdCrime(ARGS)
1047 {
1048 int val;
1049
1050 if (argc != 2) {
1051 return (TCL_ERROR);
1052 }
1053
1054 sprintf(interp->result, "%d", CrimeAverage);
1055 return (TCL_OK);
1056 }
1057
1058
1059 int SimCmdUnemployment(ARGS)
1060 {
1061 int val;
1062
1063 if (argc != 2) {
1064 return (TCL_ERROR);
1065 }
1066
1067 sprintf(interp->result, "%d", GetUnemployment());
1068 return (TCL_OK);
1069 }
1070
1071
1072 int SimCmdFires(ARGS)
1073 {
1074 int val;
1075
1076 if (argc != 2) {
1077 return (TCL_ERROR);
1078 }
1079
1080 sprintf(interp->result, "%d", GetFire());
1081 return (TCL_OK);
1082 }
1083
1084
1085 int SimCmdPollution(ARGS)
1086 {
1087 int val;
1088
1089 if (argc != 2) {
1090 return (TCL_ERROR);
1091 }
1092
1093 sprintf(interp->result, "%d", PolluteAverage);
1094 return (TCL_OK);
1095 }
1096
1097
1098 int SimCmdPolMaxX(ARGS)
1099 {
1100 int val;
1101
1102 if (argc != 2) {
1103 return (TCL_ERROR);
1104 }
1105
1106 sprintf(interp->result, "%d", (PolMaxX <<4) + 8);
1107 return (TCL_OK);
1108 }
1109
1110
1111 int SimCmdPolMaxY(ARGS)
1112 {
1113 int val;
1114
1115 if (argc != 2) {
1116 return (TCL_ERROR);
1117 }
1118
1119 sprintf(interp->result, "%d", (PolMaxY <<4) + 8);
1120 return (TCL_OK);
1121 }
1122
1123
1124 int SimCmdTrafMaxX(ARGS)
1125 {
1126 int val;
1127
1128 if (argc != 2) {
1129 return (TCL_ERROR);
1130 }
1131
1132 sprintf(interp->result, "%d", TrafMaxX);
1133 return (TCL_OK);
1134 }
1135
1136
1137 int SimCmdTrafMaxY(ARGS)
1138 {
1139 int val;
1140
1141 if (argc != 2) {
1142 return (TCL_ERROR);
1143 }
1144
1145 sprintf(interp->result, "%d", TrafMaxY);
1146 return (TCL_OK);
1147 }
1148
1149
1150 int SimCmdMeltX(ARGS)
1151 {
1152 int val;
1153
1154 if (argc != 2) {
1155 return (TCL_ERROR);
1156 }
1157
1158 sprintf(interp->result, "%d", (MeltX <<4) + 8);
1159 return (TCL_OK);
1160 }
1161
1162
1163 int SimCmdMeltY(ARGS)
1164 {
1165 int val;
1166
1167 if (argc != 2) {
1168 return (TCL_ERROR);
1169 }
1170
1171 sprintf(interp->result, "%d", (MeltY <<4) + 8);
1172 return (TCL_OK);
1173 }
1174
1175
1176 int SimCmdCrimeMaxX(ARGS)
1177 {
1178 int val;
1179
1180 if (argc != 2) {
1181 return (TCL_ERROR);
1182 }
1183
1184 sprintf(interp->result, "%d", (CrimeMaxX <<4) + 8);
1185 return (TCL_OK);
1186 }
1187
1188
1189 int SimCmdCrimeMaxY(ARGS)
1190 {
1191 int val;
1192
1193 if (argc != 2) {
1194 return (TCL_ERROR);
1195 }
1196
1197 sprintf(interp->result, "%d", (CrimeMaxY <<4) + 8);
1198 return (TCL_OK);
1199 }
1200
1201
1202 int SimCmdCenterX(ARGS)
1203 {
1204 int val;
1205
1206 if (argc != 2) {
1207 return (TCL_ERROR);
1208 }
1209
1210 sprintf(interp->result, "%d", (CCx <<4) + 8);
1211 return (TCL_OK);
1212 }
1213
1214
1215 int SimCmdCenterY(ARGS)
1216 {
1217 int val;
1218
1219 if (argc != 2) {
1220 return (TCL_ERROR);
1221 }
1222
1223 sprintf(interp->result, "%d", (CCy <<4) + 8);
1224 return (TCL_OK);
1225 }
1226
1227
1228 int SimCmdFloodX(ARGS)
1229 {
1230 int val;
1231
1232 if (argc != 2) {
1233 return (TCL_ERROR);
1234 }
1235
1236 sprintf(interp->result, "%d", (FloodX <<4) + 8);
1237 return (TCL_OK);
1238 }
1239
1240
1241 int SimCmdFloodY(ARGS)
1242 {
1243 int val;
1244
1245 if (argc != 2) {
1246 return (TCL_ERROR);
1247 }
1248
1249 sprintf(interp->result, "%d", (FloodY <<4) + 8);
1250 return (TCL_OK);
1251 }
1252
1253
1254 int SimCmdCrashX(ARGS)
1255 {
1256 int val;
1257
1258 if (argc != 2) {
1259 return (TCL_ERROR);
1260 }
1261
1262 sprintf(interp->result, "%d", (CrashX <<4) + 8);
1263 return (TCL_OK);
1264 }
1265
1266
1267 int SimCmdCrashY(ARGS)
1268 {
1269 int val;
1270
1271 if (argc != 2) {
1272 return (TCL_ERROR);
1273 }
1274
1275 sprintf(interp->result, "%d", (CrashY <<4) + 8);
1276 return (TCL_OK);
1277 }
1278
1279
1280 int SimCmdDollars(ARGS)
1281 {
1282 int val;
1283
1284 if (argc != 2) {
1285 return (TCL_ERROR);
1286 }
1287
1288 makeDollarDecimalStr(argv[1], interp->result);
1289 return (TCL_OK);
1290 }
1291
1292
1293 int SimCmdDoAnimation(ARGS)
1294 {
1295 int val;
1296
1297 if ((argc != 2) && (argc != 3)) {
1298 return (TCL_ERROR);
1299 }
1300
1301 if (argc == 3) {
1302 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK)) {
1303 return (TCL_ERROR);
1304 }
1305 DoAnimation = val;
1306 MustUpdateOptions = 1; Kick();
1307 }
1308
1309 sprintf(interp->result, "%d", DoAnimation);
1310 return (TCL_OK);
1311 }
1312
1313
1314 int SimCmdDoMessages(ARGS)
1315 {
1316 int val;
1317
1318 if ((argc != 2) && (argc != 3)) {
1319 return (TCL_ERROR);
1320 }
1321
1322 if (argc == 3) {
1323 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK)) {
1324 return (TCL_ERROR);
1325 }
1326 DoMessages = val;
1327 MustUpdateOptions = 1; Kick();
1328 }
1329
1330 sprintf(interp->result, "%d", DoMessages);
1331 return (TCL_OK);
1332 }
1333
1334
1335 int SimCmdDoNotices(ARGS)
1336 {
1337 int val;
1338
1339 if ((argc != 2) && (argc != 3)) {
1340 return (TCL_ERROR);
1341 }
1342
1343 if (argc == 3) {
1344 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK)) {
1345 return (TCL_ERROR);
1346 }
1347 DoNotices = val;
1348 MustUpdateOptions = 1; Kick();
1349 }
1350
1351 sprintf(interp->result, "%d", DoNotices);
1352 return (TCL_OK);
1353 }
1354
1355
1356 int SimCmdRand(ARGS)
1357 {
1358 int val, r;
1359
1360 if ((argc != 2) && (argc != 3)) {
1361 return (TCL_ERROR);
1362 }
1363
1364 if (argc == 3) {
1365 if ((Tcl_GetInt(interp, argv[2], &val) != TCL_OK)) {
1366 return (TCL_ERROR);
1367 }
1368 r = Rand(val);
1369 } else {
1370 r = Rand16();
1371 }
1372
1373 sprintf(interp->result, "%d", r);
1374 return (TCL_OK);
1375 }
1376
1377
1378 int SimCmdPlatform(ARGS)
1379 {
1380
1381 #ifdef MSDOS
1382 sprintf(interp->result, "msdos");
1383 #else
1384 sprintf(interp->result, "unix");
1385 #endif
1386
1387 return (TCL_OK);
1388 }
1389
1390
1391 int SimCmdVersion(ARGS)
1392 {
1393 sprintf(interp->result, MicropolisVersion);
1394
1395 return (TCL_OK);
1396 }
1397
1398
1399 int SimCmdOpenWebBrowser(ARGS)
1400 {
1401 int result = 1;
1402 char buf[512];
1403
1404 if ((argc != 3) ||
1405 (strlen(argv[2]) > 255)) {
1406 return (TCL_ERROR);
1407 }
1408
1409 sprintf(buf,
1410 "netscape -no-about-splash '%s' &",
1411 argv[2]);
1412
1413 result = system(buf);
1414
1415 sprintf(interp->result, "%d", result);
1416
1417 return (TCL_OK);
1418 }
1419
1420
1421 int SimCmdQuoteURL(ARGS)
1422 {
1423 int result = 1;
1424 char buf[2048];
1425 char *from, *to;
1426 int ch;
1427 static char *hexDigits =
1428 "0123456789ABCDEF";
1429
1430 if ((argc != 3) ||
1431 (strlen(argv[2]) > 255)) {
1432 return (TCL_ERROR);
1433 }
1434
1435 from = argv[2];
1436 to = buf;
1437
1438 while ((ch = *(from++)) != '\0') {
1439 if ((ch < 32) ||
1440 (ch >= 128) ||
1441 (ch == '+') ||
1442 (ch == '%') ||
1443 (ch == '&') ||
1444 (ch == '<') ||
1445 (ch == '>') ||
1446 (ch == '"') ||
1447 (ch == '\'')) {
1448 *to++ = '%';
1449 *to++ = hexDigits[(ch >> 4) & 0x0f];
1450 *to++ = hexDigits[ch & 0x0f];
1451 } else if (ch == 32) {
1452 *to++ = '+';
1453 } else {
1454 *to++ = ch;
1455 } // if
1456 } // while
1457
1458 *to = '\0';
1459
1460 sprintf(interp->result, "%s", buf);
1461
1462 return (TCL_OK);
1463 }
1464
1465
1466 int SimCmdNeedRest(ARGS)
1467 {
1468 int needRest;
1469
1470 if ((argc != 2) && (argc != 3)) {
1471 return (TCL_ERROR);
1472 }
1473
1474 if (argc == 3) {
1475 if (Tcl_GetInt(interp, argv[2], &needRest) != TCL_OK) {
1476 return (TCL_ERROR);
1477 }
1478 NeedRest = needRest;
1479 }
1480
1481 sprintf(interp->result, "%d", NeedRest);
1482 return (TCL_OK);
1483 }
1484
1485
1486 int SimCmdMultiPlayerMode(ARGS)
1487 {
1488 /* This is read-only because it's specified on
1489 the command line and effects how the user
1490 interface is initialized. */
1491
1492 if (argc != 2) {
1493 return (TCL_ERROR);
1494 }
1495
1496 sprintf(interp->result, "%d", MultiPlayerMode);
1497 return (TCL_OK);
1498 }
1499
1500
1501 int SimCmdSugarMode(ARGS)
1502 {
1503 /* This is read-only because it's specified on
1504 the command line and effects how the user
1505 interface is initialized. */
1506
1507 if (argc != 2) {
1508 return (TCL_ERROR);
1509 }
1510
1511 sprintf(interp->result, "%d", SugarMode);
1512 return (TCL_OK);
1513 }
1514
1515 int SimCmdHasAirCrash(ARGS)
1516 {
1517 int aircrash = 0;
1518
1519 if (argc != 2) {
1520 return (TCL_ERROR);
1521 }
1522
1523 #ifndef NO_AIRCRASH
1524 aircrash = 1;
1525 #endif
1526
1527 sprintf(interp->result, "%d", aircrash);
1528 return (TCL_OK);
1529 }
1530
1531
1532 /************************************************************************/
1533
1534 int
1535 SimCmd(CLIENT_ARGS)
1536 {
1537 Tcl_HashEntry *ent;
1538 int result = TCL_OK;
1539 int (*cmd)();
1540
1541 if (argc < 2) {
1542 return TCL_ERROR;
1543 }
1544
1545 if (ent = Tcl_FindHashEntry(&SimCmds, argv[1])) {
1546 cmd = (int (*)())ent->clientData;
1547 result = cmd(interp, argc, argv);
1548 } else {
1549 result = TCL_ERROR;
1550 }
1551 return result;
1552 }
1553
1554
1555 sim_command_init()
1556 {
1557 int new;
1558
1559 Tcl_CreateCommand(tk_mainInterp, "sim", SimCmd,
1560 (ClientData)MainWindow, (void (*)()) NULL);
1561
1562 Tcl_InitHashTable(&SimCmds, TCL_STRING_KEYS);
1563
1564 #define SIM_CMD(name) HASHED_CMD(Sim, name)
1565
1566 SIM_CMD(GameStarted);
1567 SIM_CMD(InitGame);
1568 SIM_CMD(SaveCity);
1569 SIM_CMD(ReallyQuit);
1570 SIM_CMD(UpdateHeads);
1571 SIM_CMD(UpdateMaps);
1572 SIM_CMD(RedrawEditors);
1573 SIM_CMD(RedrawMaps);
1574 SIM_CMD(UpdateEditors);
1575 SIM_CMD(UpdateGraphs);
1576 SIM_CMD(UpdateEvaluation);
1577 SIM_CMD(UpdateBudget);
1578 SIM_CMD(UpdateBudgetWindow);
1579 SIM_CMD(DoBudget);
1580 SIM_CMD(DoBudgetFromMenu);
1581 SIM_CMD(Pause);
1582 SIM_CMD(Resume);
1583 SIM_CMD(StartBulldozer);
1584 SIM_CMD(StopBulldozer);
1585 SIM_CMD(MakeFire);
1586 SIM_CMD(MakeFlood);
1587 SIM_CMD(MakeAirCrash);
1588 SIM_CMD(MakeTornado);
1589 SIM_CMD(MakeEarthquake);
1590 SIM_CMD(MakeMonster);
1591 SIM_CMD(MakeMeltdown);
1592 SIM_CMD(FireBomb);
1593 SIM_CMD(SoundOff);
1594 SIM_CMD(GenerateNewCity);
1595 SIM_CMD(GenerateSomeCity);
1596 SIM_CMD(TreeLevel);
1597 SIM_CMD(LakeLevel);
1598 SIM_CMD(CurveLevel);
1599 SIM_CMD(CreateIsland);
1600 SIM_CMD(ClearMap);
1601 SIM_CMD(ClearUnnatural);
1602 SIM_CMD(SmoothTrees);
1603 SIM_CMD(SmoothWater);
1604 SIM_CMD(SmoothRiver);
1605 SIM_CMD(LoadScenario);
1606 SIM_CMD(LoadCity);
1607 SIM_CMD(SaveCityAs);
1608 SIM_CMD(MakeExplosion);
1609 SIM_CMD(CityName);
1610 SIM_CMD(CityFileName);
1611 SIM_CMD(GameLevel);
1612 SIM_CMD(Speed);
1613 SIM_CMD(Skips);
1614 SIM_CMD(Skip);
1615 SIM_CMD(WorldX);
1616 SIM_CMD(WorldY);
1617 SIM_CMD(Delay);
1618 SIM_CMD(HeatSteps);
1619 SIM_CMD(HeatFlow);
1620 SIM_CMD(HeatRule);
1621 #ifdef CAM
1622 SIM_CMD(JustCam);
1623 #endif
1624 #ifdef NET
1625 SIM_CMD(ListenTo);
1626 SIM_CMD(HearFrom);
1627 #endif
1628 SIM_CMD(Funds);
1629 SIM_CMD(TaxRate);
1630 SIM_CMD(FireFund);
1631 SIM_CMD(PoliceFund);
1632 SIM_CMD(RoadFund);
1633 SIM_CMD(Year);
1634 SIM_CMD(AutoBudget);
1635 SIM_CMD(AutoGoto);
1636 SIM_CMD(AutoBulldoze);
1637 SIM_CMD(Disasters);
1638 SIM_CMD(Sound);
1639 SIM_CMD(Flush);
1640 SIM_CMD(FlushStyle);
1641 SIM_CMD(DonDither);
1642 SIM_CMD(DoOverlay);
1643 SIM_CMD(MonsterGoal);
1644 SIM_CMD(HelicopterGoal);
1645 SIM_CMD(MonsterDirection);
1646 SIM_CMD(EraseOverlay);
1647 SIM_CMD(Tile);
1648 SIM_CMD(Fill);
1649 SIM_CMD(DynamicData);
1650 SIM_CMD(ResetDynamic);
1651 SIM_CMD(Performance);
1652 SIM_CMD(CollapseMotion);
1653 SIM_CMD(Update);
1654 SIM_CMD(OverRide);
1655 SIM_CMD(Expensive);
1656 SIM_CMD(Players);
1657 SIM_CMD(Votes);
1658 SIM_CMD(BobHeight);
1659 SIM_CMD(PendingTool);
1660 SIM_CMD(PendingX);
1661 SIM_CMD(PendingY);
1662 SIM_CMD(Displays);
1663 SIM_CMD(LandValue);
1664 SIM_CMD(Traffic);
1665 SIM_CMD(Crime);
1666 SIM_CMD(Unemployment);
1667 SIM_CMD(Fires);
1668 SIM_CMD(Pollution);
1669 SIM_CMD(PolMaxX);
1670 SIM_CMD(PolMaxY);
1671 SIM_CMD(TrafMaxX);
1672 SIM_CMD(TrafMaxY);
1673 SIM_CMD(MeltX);
1674 SIM_CMD(MeltY);
1675 SIM_CMD(CrimeMaxX);
1676 SIM_CMD(CrimeMaxY);
1677 SIM_CMD(CenterX);
1678 SIM_CMD(CenterY);
1679 SIM_CMD(FloodX);
1680 SIM_CMD(FloodY);
1681 SIM_CMD(CrashX);
1682 SIM_CMD(CrashY);
1683 SIM_CMD(Dollars);
1684 SIM_CMD(DoAnimation);
1685 SIM_CMD(DoMessages);
1686 SIM_CMD(DoNotices);
1687 SIM_CMD(Rand);
1688 SIM_CMD(Platform);
1689 SIM_CMD(Version);
1690 SIM_CMD(OpenWebBrowser);
1691 SIM_CMD(QuoteURL);
1692 SIM_CMD(NeedRest);
1693 SIM_CMD(MultiPlayerMode);
1694 SIM_CMD(SugarMode);
1695 SIM_CMD(HasAirCrash);
1696 }
Impressum, Datenschutz