diff options
| author | Boutade <thegoofist@protonmail.com> | 2019-10-18 08:00:04 -0500 |
|---|---|---|
| committer | Boutade <thegoofist@protonmail.com> | 2019-10-18 08:00:04 -0500 |
| commit | f6fd48c3366de86e45bcc323b8800c907beb9688 (patch) | |
| tree | 855e9ad9aa34a99b901263f0a6ed3c82cbd820be /the-price-of-a-cup-of-coffee.lisp | |
| parent | b53e4eaaf1bf7d88f09e5cb0d28a0824b905e87a (diff) | |
speech bubble
Diffstat (limited to 'the-price-of-a-cup-of-coffee.lisp')
| -rw-r--r-- | the-price-of-a-cup-of-coffee.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/the-price-of-a-cup-of-coffee.lisp b/the-price-of-a-cup-of-coffee.lisp index 275fe45..487e3b9 100644 --- a/the-price-of-a-cup-of-coffee.lisp +++ b/the-price-of-a-cup-of-coffee.lisp @@ -194,6 +194,8 @@ :source-rect (get-frame-rect human)) (let-when (source-rect (and expression (get-expression expression))) (set-expression-rect human) + (sdl2:render-copy renderer *speech-bubble-texture* + :dest-rect *expression-rect*) (sdl2:render-copy renderer *expression-texture* :dest-rect *expression-rect* :source-rect source-rect)))) @@ -294,7 +296,6 @@ (setf (sdl2:rect-x (pos *nance*)) 292) (setf (sdl2:rect-y (pos *nance*)) 38) - (push *nance* *to-render-by-y*) ;; boot up initial pedestrians |