Commit 29dc0778 authored by Bernd Paysan's avatar Bernd Paysan

light/dark-mode

parent f40c97e5
......@@ -39,7 +39,7 @@ FORTHLIB = ed25519-donna.fs keccak.fs threefish.fs bdelta.fs
SOURCES = 64bit.fs base64.fs base85.fs crypto-api.fs debugging.fs \
hash-table.fs keccak-small.fs kregion.fs n2o.fs addr.fs classes.fs \
cmd.fs connected.fs connect.fs crypt.fs dht.fs err.fs file.fs \
gui.fs gui-night.fs net2o.fs ip.fs helper.fs keys.fs log.fs msg.fs \
gui.fs gui-dark.fs net2o.fs ip.fs helper.fs keys.fs log.fs msg.fs \
notify.fs qr.fs socks.fs squid.fs tools.fs vault.fs rng.fs xtype.fs \
$(TESTS) $(FORTHLIB) ed25519-donnalib.fs keccaklib.fs \
threefishlib.fs startn2o.fs doc/net2o-logo.png version.fs.in \
......
......@@ -54,9 +54,9 @@ tex: 36c3-logo
' }}i18n-text is }}text'
day-mode
light-gui
$005555FF text-color: author#
night-mode
dark-gui
$44FFFFFF re-color author#
{{
......@@ -407,7 +407,7 @@ also opengl
previous
night-mode
dark-gui
script? [IF]
next-arg s" time" str= [IF] +db time( \ ) [THEN]
......
doc/qr-code-inv.png

4.64 KB | W: | H:

doc/qr-code-inv.png

4.78 KB | W: | H:

doc/qr-code-inv.png
doc/qr-code-inv.png
doc/qr-code-inv.png
doc/qr-code-inv.png
  • 2-up
  • Swipe
  • Onion skin
\ GUI night mode style
\ GUI dark mode style
\ Copyright © 2019 Bernd Paysan
......@@ -16,7 +16,7 @@
\ along with this program. If not, see <http://www.gnu.org/licenses/>.
1 new-theme
night-mode
dark-gui
$FFFFFFFF re-text-color blackish
$FFFFBBFF re-text-color dark-blue
$000000FF re-text-color whitish
......@@ -57,4 +57,4 @@ $33EE33FF
imports#rgb-fg [I] sfloats + sf@ floor f>s to color,#
text-color, fdrop
[LOOP]
night-mode
dark-gui
......@@ -1450,7 +1450,7 @@ Variable invitation-stack
' net2o-gui is run-gui
include gui-night.fs
include gui-dark.fs
previous
......
......@@ -957,7 +957,7 @@ here scanned-x - cell/ constant scanned-max#
$Variable lastscan$
: lastscan? ( addr u tag -- flag )
>r $make { w^ just$ } r> just$ c$+!
>r $10 + $make { w^ just$ } r> just$ c$+!
just$ $@ lastscan$ $@ str=
just$ @ lastscan$ $!buf ;
: scan-result ( addr u tag -- flag )
......
......@@ -524,7 +524,7 @@ previous
I 3 and to strip+x
I 2 rshift to strip+y
scan-legit? IF
guessecc $10 + c@
guesstag c@
msg( dup 2over rot debug-scan-result )
scan-result dup to scanned?
qr( ." took: " .time cr )
......
# Commands #
Version 0.9.5-20191226.
Version 0.9.5-20200102.
net2o separates data and commands. Data is passed through to higher
layers, commands are interpreted when they arrive. For connection
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment