| @@ -1,4 +1,62 @@ | |||||
| ;; lobo: Logo Bolo | |||||
| ;; (c) Ben Kurtovic, 2011 | |||||
| ;; | |||||
| ;; Logo Bolo is a rewrite of the classic tank game by Stuart Cheshire in NetLogo. | |||||
| ;; | |||||
| globals [ | |||||
| max-tank-speed | |||||
| player | |||||
| player-turn-speed | |||||
| ] | |||||
| breed [tanks tank] | |||||
| tanks-own [ | |||||
| speed | |||||
| ] | |||||
| to setup | |||||
| ca | |||||
| set max-tank-speed 20 | |||||
| set player-turn-speed 10 | |||||
| create-tanks 1 [ | |||||
| set player who | |||||
| set size 2 | |||||
| set speed 0 | |||||
| ] | |||||
| end | |||||
| to go | |||||
| end | |||||
| to go-forward | |||||
| ask tank player [ | |||||
| if speed < max-tank-speed [ | |||||
| set speed speed + 1 | |||||
| ] | |||||
| ] | |||||
| end | |||||
| to slow-down | |||||
| ask tank player [ | |||||
| if speed > 0 [ | |||||
| set speed speed - 1 | |||||
| ] | |||||
| ] | |||||
| end | |||||
| to turn-left | |||||
| ask tank player [ | |||||
| lt player-turn-speed | |||||
| ] | |||||
| end | |||||
| to turn-right | |||||
| ask tank player [ | |||||
| rt player-turn-speed | |||||
| ] | |||||
| end | |||||
| @#$#@#$#@ | @#$#@#$#@ | ||||
| GRAPHICS-WINDOW | GRAPHICS-WINDOW | ||||
| 475 | 475 | ||||
| @@ -26,6 +84,113 @@ GRAPHICS-WINDOW | |||||
| 1 | 1 | ||||
| ticks | ticks | ||||
| BUTTON | |||||
| 85 | |||||
| 91 | |||||
| 159 | |||||
| 124 | |||||
| Setup | |||||
| setup | |||||
| NIL | |||||
| 1 | |||||
| T | |||||
| OBSERVER | |||||
| NIL | |||||
| R | |||||
| NIL | |||||
| NIL | |||||
| BUTTON | |||||
| 89 | |||||
| 151 | |||||
| 152 | |||||
| 184 | |||||
| Go | |||||
| go | |||||
| T | |||||
| 1 | |||||
| T | |||||
| OBSERVER | |||||
| NIL | |||||
| G | |||||
| NIL | |||||
| NIL | |||||
| BUTTON | |||||
| 270 | |||||
| 216 | |||||
| 359 | |||||
| 249 | |||||
| Forward | |||||
| go-forward | |||||
| NIL | |||||
| 1 | |||||
| T | |||||
| OBSERVER | |||||
| NIL | |||||
| W | |||||
| NIL | |||||
| NIL | |||||
| BUTTON | |||||
| 220 | |||||
| 278 | |||||
| 283 | |||||
| 311 | |||||
| Left | |||||
| turn-left | |||||
| NIL | |||||
| 1 | |||||
| T | |||||
| OBSERVER | |||||
| NIL | |||||
| A | |||||
| NIL | |||||
| NIL | |||||
| BUTTON | |||||
| 327 | |||||
| 277 | |||||
| 396 | |||||
| 310 | |||||
| Right | |||||
| turn-right | |||||
| NIL | |||||
| 1 | |||||
| T | |||||
| OBSERVER | |||||
| NIL | |||||
| D | |||||
| NIL | |||||
| NIL | |||||
| BUTTON | |||||
| 256 | |||||
| 337 | |||||
| 364 | |||||
| 370 | |||||
| Slow Down | |||||
| slow-down | |||||
| NIL | |||||
| 1 | |||||
| T | |||||
| OBSERVER | |||||
| NIL | |||||
| S | |||||
| NIL | |||||
| NIL | |||||
| MONITOR | |||||
| 52 | |||||
| 303 | |||||
| 152 | |||||
| 348 | |||||
| Player Speed | |||||
| [speed] of tank player | |||||
| 17 | |||||
| 1 | |||||
| 11 | |||||
| @#$#@#$#@ | @#$#@#$#@ | ||||
| WHAT IS IT? | WHAT IS IT? | ||||
| ----------- | ----------- | ||||