mirror of
https://github.com/richardharrington/robotwar.git
synced 2024-07-15 01:29:06 +00:00
added default registers AIM, SPEEDX and SPEEDY
This commit is contained in:
parent
de7497691c
commit
a26092a481
@ -51,9 +51,16 @@
|
|||||||
(init-default-register reg-name robot-idx)))]
|
(init-default-register reg-name robot-idx)))]
|
||||||
(into storage-registers
|
(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 "INDEX" robot-idx)
|
||||||
|
(init-default-register "SPEEDX" robot-idx)
|
||||||
|
(init-default-register "SPEEDY" robot-idx)
|
||||||
|
|
||||||
; DATA
|
; DATA
|
||||||
(letfn [(target-register [world path-to-val]
|
(letfn [(target-register [world path-to-val]
|
||||||
(let [registers (get-registers world path-to-val)
|
(let [registers (get-registers world path-to-val)
|
||||||
|
Loading…
Reference in New Issue
Block a user