diff options
author | Boutade <thegoofist@protonmail.com> | 2019-10-19 09:59:37 -0500 |
---|---|---|
committer | Boutade <thegoofist@protonmail.com> | 2019-10-19 09:59:37 -0500 |
commit | 78f5f0496da67c9321f7de5854512002c677057d (patch) | |
tree | 1ec843fcca13c07c63a8bf931effc28ca2053fd2 /assets.lisp | |
parent | 4c68f1131a55c39c4bcb940ef8429f322d859170 (diff) |
added punker
Diffstat (limited to 'assets.lisp')
-rw-r--r-- | assets.lisp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/assets.lisp b/assets.lisp index b375c5b..53d0c91 100644 --- a/assets.lisp +++ b/assets.lisp @@ -97,6 +97,7 @@ (defparameter +suit-sheet-image+ #P"assets/Suit.png") (defparameter +nomry-sheet-image+ #P"assets/Normy.png") (defparameter +kid-sheet-image+ #P"assets/KidSheet.png") +(defparameter +punker-sheet-image+ #P"assets/Punker.png") (defparameter +things-look-up-track-path+ #P"assets/thingslookup.mp3") (defparameter +cold-day-track-path+ #P"assets/coldday.mp3") (defparameter +emoji-sheet-image+ #P"assets/emoji.png") @@ -109,6 +110,7 @@ (defvar *suit-texture*) (defvar *normy-texture*) (defvar *kid-texture*) +(defvar *punker-texture*) (defvar *expression-texture*) (defvar *backdrop-texture*) (defvar *sliding-door-texture*) @@ -137,6 +139,8 @@ (setf *kid-texture* (make-texture-from-file renderer +kid-sheet-image+)) + (setf *punker-texture* (make-texture-from-file renderer +punker-sheet-image+)) + (setf *expression-texture* (make-texture-from-file renderer +emoji-sheet-image+)) (setf *sliding-door-texture* (make-texture-from-file renderer +sliding-door-image+)) |