M src/assets.tal => src/assets.tal +10 -10
@@ 1,6 1,16 @@
(
@|tables )
+@styles-lut [
+ 02 ( 0 normal )
+ 01 ( 1 locked )
+ 01 ( 2 port-unlocked )
+ 04 ( 3 operator )
+ 03 ( 4 port-locked )
+ 0c ( 5 port-output )
+ 01 ( 6 selected )
+ 02 ( 7 comment ) ]
+
@docs-lut [
=op-a =op-b =op-c =op-d =op-e =op-f =op-g =op-h
=op-i =op-j =op-k =op-l =op-m =op-n =op-o =op-p
@@ 46,16 56,6 @@
6f 70 71 72 73 74 75 76
77 78 79 7a ]
-@cell-styles
- 02 ( 0 normal )
- 01 ( 1 locked )
- 01 ( 2 port-unlocked )
- 04 ( 3 operator )
- 03 ( 4 port-locked )
- 0c ( 5 port-output )
- 01 ( 6 selected )
- 02 ( 7 comment )
-
@op-ascii
( 20 _ ) =op-null
( 21 ! ) =op-null
M src/orca.tal => src/orca.tal +1 -1
@@ 777,7 777,7 @@ JMP2r
@get-color ( -- char type )
.head LDZ2 is-selected ?&selected
- #00 .head/addr LDZ2 read-type ;cell-styles ADD2 LDA JMP2r
+ #00 .head/addr LDZ2 read-type ;styles-lut ADD2 LDA JMP2r
&selected
#0c