Node 710
This node converts tag values into red color component intensity of bright pixels. Intensity values are stored in a table.
Source code
710 red
00 yt 01 gt 02 yw 03 yh
04 gh 05 gw 06 yd 07 rw
08 gd 09 b, 0A b. 0B pac
0C eob 0D ww 0E ad 0F cw
200 d/a , 0 d/a , 200 d/a , 140 d/a ,
0 d/a , 0 d/a , 200 d/a , 200 d/a ,
0 d/a , 0 d/a , 0 d/a , 200 d/a ,
0 d/a , 200 d/a , 120 d/a , 0 d/a ,
go 10 @b dup F and a! @ left a! ! ! go ; 16
init right b! go ; 19
2 r 0 u 0 ether
00 yt 01 gt 02 yw 03 yh
04 gh 05 gw 06 yd 07 rw
08 gd 09 b, 0A b. 0B pac
0C eob 0D ww 0E ad 0F cw
200 d/a , 0 d/a , 200 d/a , 140 d/a ,
0 d/a , 0 d/a , 200 d/a , 200 d/a ,
0 d/a , 0 d/a , 0 d/a , 200 d/a ,
0 d/a , 200 d/a , 120 d/a , 0 d/a ,
go 10 @b dup F and a! @ left a! ! ! go ; 16
init right b! go ; 19
2 r 0 u 0 ether
Definitions
- go
- Fetch word with slice and tag from RIGHT, use bits 3-0 as an index to the color component table, and get the corresponding intensity value. Send the component intensity and slice bitmap LEFT, and repeat.
- init
- Set register B, and jump to go.
Description
This node receives a word from node 711 with the next character slice bitmap and tag value in the following format:
| - | s | s | s | s | s | - | - | - | - | - | - | - | - | t | t | t | t |
- sssss
- These bits represent five pixels of the current character slice.
- tttt
- Current tag value used as index into color component intensity table.
- -
- Not relevant.
Tag color bits are used as index into the red color component intensity table, and both character slice and color intensity are sent to node 709.