M src/markl.tal => src/markl.tal +3 -6
@@ 155,7 155,7 @@
( | base spell )
( | empty spellbook )
<init-program>
- ( set-debug-state ) !start-lobby
+ ( set-debug-state ) !start-debug
@start-tutorial ( -- )
#0000 .program/size STZ2
@@ 175,12 175,9 @@
@start-debug ( -- )
#0100 .program/size STZ2
<unlock-all>
- ( | spells )
- #0c <pick-focus>
- ;move-left <pick-spell>
+
( | room )
- #0002 ;mirror-stage !<enter-room>
- #0606 ;lobby-stage !<enter-room>
+ #0106 ;w1-entrance !<enter-room>
@<enter-room> ( x y room* -- )
DUP2 <copy-room>
M src/world.tal => src/world.tal +5 -5
@@ 76,11 76,11 @@
@w1-entrance [ 0808 =&events =&tiles =&end ]
&tiles ( )
- ( ) [ 01 01 01 01 01 01 01 01 ]
- ( ) [ 01 01 01 01 01 01 01 01 ]
- ( ) [ 01 01 01 01 01 01 01 01 ]
- ( ) [ 01 01 01 01 01 01 02 01 ]
- ( ) [ 00 00 00 00 01 01 01 01 ]
+ ( ) [ 00 00 0a 00 00 00 00 00 ]
+ ( ) [ 00 00 01 00 00 00 00 00 ]
+ ( ) [ 00 00 01 00 00 00 00 00 ]
+ ( ) [ 00 00 02 06 00 06 02 00 ]
+ ( ) [ 00 00 00 00 00 00 01 01 ]
( ) [ 01 01 01 00 00 00 01 06 ]
( ) [ 01 0a 01 02 00 01 02 00 ]
( ) [ 01 01 01 00 00 00 00 00 ]