started by Theo Verelst
Modern computers (except very rare quantum and analog ones) all work on the basis og binary logic, so lets see if with modern tachnology we can program some decent lofical circuitsm ion this case with the help of tcl, and bwise.
set fh [open COM1: RDWR] fconfigure $fh -blocking 0 -mode 115200,n,8,1 -translation binary -buffering full fileevent $fh readable { set w [read $fh] ; foreach c [split $w {}] {binary scan $c H* a; set v $a} } proc w h { global fh puts -nonewline $fh [binary format H* $h] ; flush $fh } fileevent stdin readable { w [gets stdin]; } while {1} { vwait v flush $fh puts -nonewline $v flush stdout }
o <= "0000000" & (i(1) or i(0)); 00 0001 0102 0103 0100 00