Whoops, too invisible! I fyixed it uwu
This commit is contained in:
parent
9ee7597772
commit
766f2dedee
|
@ -209,12 +209,6 @@
|
||||||
:face "=w=~"))))
|
:face "=w=~"))))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;;; ———————————————————————————————————
|
;;; ———————————————————————————————————
|
||||||
;;; Destitute Gambler arc
|
;;; Destitute Gambler arc
|
||||||
|
|
|
@ -62,21 +62,22 @@ character-scale world coordinates in plist form."
|
||||||
|
|
||||||
(defun tiled-object->entity (tiled-obj tiled-map)
|
(defun tiled-object->entity (tiled-obj tiled-map)
|
||||||
"Convert a Tiled object into an entity plist."
|
"Convert a Tiled object into an entity plist."
|
||||||
(let ((properties (cl-tiled:properties tiled-obj)))
|
(when (not (tiled-rectangle-p tiled-obj))
|
||||||
(when (not (tiled-rectangle-p tiled-obj))
|
(let ((properties (cl-tiled:properties tiled-obj)))
|
||||||
(list (intern (string-upcase (gethash "id" properties)))
|
(append
|
||||||
:coords (tiled-coords->world-coords (cl-tiled:object-x tiled-obj)
|
(list (intern (string-upcase (gethash "id" properties))))
|
||||||
(cl-tiled:object-y tiled-obj)
|
(loop for key being the hash-keys in properties
|
||||||
tiled-map)
|
for val being the hash-values in properties
|
||||||
:face (gethash "normal_face" properties)
|
collect (intern (string-upcase key) "KEYWORD")
|
||||||
:normal-face (gethash "normal_face" properties)
|
collect val)
|
||||||
:talking-face (gethash "talking_face" properties)
|
(list
|
||||||
:avatar (gethash "avatar" properties)
|
:face (gethash "normal-face" properties)
|
||||||
:interact (gethash "interact" properties)
|
:coords (tiled-coords->world-coords (cl-tiled:object-x tiled-obj)
|
||||||
:direction (if (gethash "facing_right" properties)
|
(cl-tiled:object-y tiled-obj)
|
||||||
'right
|
tiled-map)
|
||||||
'left)))))
|
:direction (if (gethash "facing-right" properties)
|
||||||
|
'right
|
||||||
|
'left))))))
|
||||||
|
|
||||||
|
|
||||||
(defun tiled-object->trigger (tiled-obj tiled-map)
|
(defun tiled-object->trigger (tiled-obj tiled-map)
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
<?xml version="1.0" encoding="UTF-8"?>
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
<map version="1.10" tiledversion="1.10.1" orientation="orthogonal" renderorder="left-down" width="72" height="41" tilewidth="17" tileheight="17" infinite="0" nextlayerid="7" nextobjectid="10">
|
<map version="1.10" tiledversion="1.10.1" orientation="orthogonal" renderorder="left-down" width="72" height="41" tilewidth="17" tileheight="17" infinite="0" nextlayerid="7" nextobjectid="11">
|
||||||
<tileset firstgid="1" source="font.tsx"/>
|
<tileset firstgid="1" source="font.tsx"/>
|
||||||
<layer id="4" name="Background" width="72" height="41">
|
<layer id="4" name="Background" width="72" height="41">
|
||||||
<data encoding="csv">
|
<data encoding="csv">
|
||||||
|
@ -145,66 +145,73 @@
|
||||||
<objectgroup id="3" name="Entities">
|
<objectgroup id="3" name="Entities">
|
||||||
<object id="1" name="Player" type="Person" x="604.788" y="657.818">
|
<object id="1" name="Player" type="Person" x="604.788" y="657.818">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="facing_right" type="bool" value="true"/>
|
<property name="facing-right" type="bool" value="true"/>
|
||||||
<property name="id" value="player"/>
|
<property name="id" value="player"/>
|
||||||
<property name="normal_face" value="^_^"/>
|
<property name="normal-face" value="^_^"/>
|
||||||
<property name="talking_face" value="^o^"/>
|
<property name="talking-face" value="^o^"/>
|
||||||
</properties>
|
</properties>
|
||||||
<point/>
|
<point/>
|
||||||
</object>
|
</object>
|
||||||
<object id="2" name="Boozy Bird" type="Person" x="230.833" y="49.3333">
|
<object id="2" name="Boozy Bird" type="Person" x="230.833" y="49.3333">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="facing_right" type="bool" value="false"/>
|
<property name="facing-right" type="bool" value="false"/>
|
||||||
<property name="id" value="boozy-lady"/>
|
<property name="id" value="boozy-lady"/>
|
||||||
<property name="interact" value="boozy-lady-interact"/>
|
<property name="interact" value="boozy-lady-interact"/>
|
||||||
<property name="normal_face" value="=///="/>
|
<property name="normal-face" value="=///="/>
|
||||||
<property name="talking_face" value="=///="/>
|
<property name="talking-face" value="=///="/>
|
||||||
</properties>
|
</properties>
|
||||||
<point/>
|
<point/>
|
||||||
</object>
|
</object>
|
||||||
<object id="3" name="Boozy Friend" type="Person" x="210" y="100">
|
<object id="3" name="Boozy Friend" type="Person" x="210" y="100">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="facing_right" type="bool" value="false"/>
|
<property name="facing-right" type="bool" value="false"/>
|
||||||
<property name="id" value="boozy-friend"/>
|
<property name="id" value="boozy-friend"/>
|
||||||
<property name="interact" value="boozy-friend-interact"/>
|
<property name="interact" value="boozy-friend-interact"/>
|
||||||
<property name="normal_face" value="<s<"/>
|
<property name="normal-face" value="<s<"/>
|
||||||
<property name="talking_face" value="<o<"/>
|
<property name="talking-face" value="<o<"/>
|
||||||
</properties>
|
</properties>
|
||||||
<point/>
|
<point/>
|
||||||
</object>
|
</object>
|
||||||
<object id="4" name="Bad Gambler" type="Person" x="211.333" y="181.333">
|
<object id="4" name="Bad Gambler" type="Person" x="213.175" y="219.086">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="facing_right" type="bool" value="false"/>
|
<property name="facing_right" type="bool" value="false"/>
|
||||||
<property name="id" value="bad-gambler"/>
|
<property name="id" value="bad-gambler"/>
|
||||||
<property name="interact" value="bad-gambler-interact"/>
|
<property name="interact" value="bad-gambler-interact"/>
|
||||||
<property name="normal_face" value=";~:"/>
|
<property name="normal-face" value=";~:"/>
|
||||||
<property name="talking_face" value=">o<"/>
|
<property name="talking-face" value=">o<"/>
|
||||||
</properties>
|
</properties>
|
||||||
<point/>
|
<point/>
|
||||||
</object>
|
</object>
|
||||||
<object id="5" name="Desk Attendant" type="Person" x="602" y="520.667">
|
<object id="5" name="Desk Attendant" type="Person" x="602" y="520.667">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="facing_right" type="bool" value="false"/>
|
<property name="facing-right" type="bool" value="false"/>
|
||||||
<property name="id" value="casino-attendant"/>
|
<property name="id" value="casino-attendant"/>
|
||||||
<property name="interact" value="casino-attendant-interact"/>
|
<property name="interact" value="casino-attendant-interact"/>
|
||||||
<property name="normal_face" value="^3^"/>
|
<property name="normal-face" value="^3^"/>
|
||||||
<property name="talking_face" value="^O^"/>
|
<property name="talking-face" value="^O^"/>
|
||||||
</properties>
|
</properties>
|
||||||
<point/>
|
<point/>
|
||||||
</object>
|
</object>
|
||||||
<object id="6" name="Bartender" type="Person" x="76" y="214">
|
<object id="6" name="Bartender" type="Person" x="75.9405" y="164.485">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="facing_right" type="bool" value="false"/>
|
<property name="facing-right" type="bool" value="false"/>
|
||||||
<property name="id" value="casino-bartender"/>
|
<property name="id" value="casino-bartender"/>
|
||||||
<property name="interact" value="casino-bartender-interact"/>
|
<property name="interact" value="casino-bartender-interact"/>
|
||||||
<property name="normal_face" value="uvu~"/>
|
<property name="normal-face" value="uvu~"/>
|
||||||
</properties>
|
</properties>
|
||||||
<point/>
|
<point/>
|
||||||
</object>
|
</object>
|
||||||
<object id="8" name="BRUH" type="Trigger" x="578.776" y="663.718" width="66.8802" height="14.6666">
|
<object id="8" name="Exit" type="Trigger" x="578.776" y="663.718" width="66.8802" height="14.6666">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="function" value="casino-exit-trigger"/>
|
<property name="function" value="casino-exit-trigger"/>
|
||||||
</properties>
|
</properties>
|
||||||
</object>
|
</object>
|
||||||
|
<object id="10" name="Ring" type="Entity" x="603.68" y="620.126">
|
||||||
|
<properties>
|
||||||
|
<property name="id" value="ring"/>
|
||||||
|
<property name="interact" value="ring-interact"/>
|
||||||
|
</properties>
|
||||||
|
<point/>
|
||||||
|
</object>
|
||||||
</objectgroup>
|
</objectgroup>
|
||||||
</map>
|
</map>
|
||||||
|
|
12
res/map.tmx
12
res/map.tmx
|
@ -239,20 +239,20 @@
|
||||||
<objectgroup id="7" name="Entities">
|
<objectgroup id="7" name="Entities">
|
||||||
<object id="2" name="Player" type="Person" x="465" y="306.667">
|
<object id="2" name="Player" type="Person" x="465" y="306.667">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="facing_right" type="bool" value="true"/>
|
<property name="facing-right" type="bool" value="true"/>
|
||||||
<property name="id" value="player"/>
|
<property name="id" value="player"/>
|
||||||
<property name="normal_face" value="^_^"/>
|
<property name="normal-face" value="^_^"/>
|
||||||
<property name="talking_face" value="^o^"/>
|
<property name="talking-face" value="^o^"/>
|
||||||
</properties>
|
</properties>
|
||||||
<point/>
|
<point/>
|
||||||
</object>
|
</object>
|
||||||
<object id="4" name="Sasha (Childhood friend)" type="Person" x="412.587" y="165.924">
|
<object id="4" name="Sasha (Childhood friend)" type="Person" x="412.587" y="165.924">
|
||||||
<properties>
|
<properties>
|
||||||
<property name="facing_right" type="bool" value="false"/>
|
<property name="facing-right" type="bool" value="false"/>
|
||||||
<property name="id" value="childhood-friend"/>
|
<property name="id" value="childhood-friend"/>
|
||||||
<property name="interact" value="childhood-friend-interact"/>
|
<property name="interact" value="childhood-friend-interact"/>
|
||||||
<property name="normal_face" value="=_="/>
|
<property name="normal-face" value="=_="/>
|
||||||
<property name="talking_face" value="=o="/>
|
<property name="talking-face" value="=o="/>
|
||||||
</properties>
|
</properties>
|
||||||
<point/>
|
<point/>
|
||||||
</object>
|
</object>
|
||||||
|
|
Ŝarĝante…
Reference in New Issue