git @ Cat's Eye Technologies Decoy / master eg / test-cosmos-boulders.scm
master

Tree @master (Download .tar.gz)

test-cosmos-boulders.scm @masterraw · history · blame

; SPDX-FileCopyrightText: Chris Pressey, the original author of this work, has dedicated it to the public domain.
; For more information, please refer to <https://unlicense.org/>
; SPDX-License-Identifier: Unlicense

;(import-from "maps" (new-map set get update))

(import-from "cosmos-boulders" (
    make-action
    make-player update-player
    make-missile update-missile
))

(make-player)
(make-missile 200 100 3 5)
;(update-missile (make-missile 200 100 3 5) (make-action "EXPLODE"))
;(update-missile (make-missile 200 100 3 5) (set "action" "STEP" (new-map)))