Apple-2-SW/robotwar
1
0
Fork 0
mirror of https://github.com/richardharrington/robotwar.git synced 2024-07-07 12:28:55 +00:00
Code Issues Projects Releases Wiki Activity

added default registers AIM, SPEEDX and SPEEDY

Browse Source
This commit is contained in:
Richard Harrington 2013-08-06 16:17:37 -04:00
parent de7497691c
commit a26092a481
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/robotwar/robot.clj
View File

@ -51,9 +51,16 @@
(init-default-register reg-name robot-idx)))]
(into storage-registers
[
; INDEX
; AIM, INDEX, SPEEDX and SPEEDY.
; AIM and INDEX's specialized behaviors are only when they're used by
; SHOT and DATA, respectively. In themselves, they're only default registers.
; Likewise, SPEEDX and SPEEDY are used later in step-robot to determine
; the appropriate acceleration, which may have to applied over several ticks.
(init-default-register "AIM" robot-idx)
(init-default-register "INDEX" robot-idx)
(init-default-register "SPEEDX" robot-idx)
(init-default-register "SPEEDY" robot-idx)
; DATA
(letfn [(target-register [world path-to-val]
(let [registers (get-registers world path-to-val)