Plan 9 from Bell Labs’s /usr/web/sources/contrib/nemo/octopus/port/live/R

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


#!/dis/sh.dis
# wm/sh

load std
p='/pc'
x=$p/usr/octopus/port/live
ftest -e /mnt/ports/send || { 
	o/ports -m /mnt/ports
	echo '.*' >/mnt/ports/all
	cat /mnt/ports/all &
}
o/mero -dm /mnt/ui
cd /mnt/ui
mkdir /mnt/ui/s0
o=(o/live -ETTP /mnt/ui s0)
echo $o
mkdir /mnt/ui/appl/text:t
echo copyto s0/row:wins/col:1 >/mnt/ui/appl/text:t/ctl
#cd /mnt/ui/appl/text:t
#sed 15q $x/numbers >data
mkdir appl/image:logo
echo tag >appl/image:logo/ctl
cp $p/usr/octopus/port/mero/image:logo/data appl/image:logo/data
echo copyto s0/row:stats >appl/image:logo/ctl
mkdir appl/draw:clock
cp $p/usr/octopus/port/mero/clock appl/draw:clock/data
echo copyto s0/row:stats >appl/draw:clock/ctl
mkdir appl/slider:vol
echo copyto s0/row:stats >appl/slider:vol/ctl
mkdir appl/gauge:vol
echo copyto s0/row:stats >appl/gauge:vol/ctl

mkdir appl/row:stats
echo copyto s0/row:stats >appl/row:stats/ctl
mkdir appl/row:stats/button:Alboran
mkdir appl/row:stats/button:Atlantis
; mkdir appl/col:ox
; cd appl/col:ox
; echo copyto s0/row:wins/col:1 >ctl
mkdir tag:tag
echo -n '/NOTICE Done Get    mk t' >tag:tag/data
mkdir text:body 
cp /usr/nemo/numbers text:body/data
cd text:body
echo sel 100 120 >ctl
cd $x ; ls >/tmp/lsout
cd /mnt/ui
; mkdir appl/col:ox2
; cd appl/col:ox2
; echo copyto s0/row:wins/col:2 >ctl
mkdir tag:tag
echo -n '/sys/src/cmd/ofs Done Get    mk t' >tag:tag/data
mkdir tbl:body 
cat /tmp/lsout > tbl:body/data
cd /mnt/ui
#echo 'copyto s0/row:wins/col:1' >s0/row:wins/col:2/col:ox2/ctl
echo o/live -EPTTW /mnt/ui s0

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to [email protected].