Demo progress bar

2 files changed, 5 insertions, 1 deletions

diff --git a/APLDemo b/APLDemo
index 1247140..3480bac 100755
--- a/APLDemo
+++ b/APLDemo
@@ -3,6 +3,7 @@
 winid=`{grep -e '-apl' /mnt/acme/index | awk '{print $1}' }
 if(~ $#winid 0){
 	kill apl | rc
+	echo 0 `{cat $1 | wc -l} >> /mnt/apldemo/data
 	win apl &
 	sleep 1
 	winid=`{grep -e '-apl' /mnt/acme/index | awk '{print $1}' }
@@ -20,4 +21,4 @@ next=`{echo $current + 1 | hoc}
 echo $next > $state
 
 cat $1 | awk 'NR=='$current > /mnt/acme/$winid/body
-
+echo $current `{cat $1 | wc -l} >> /mnt/apldemo/data
diff --git a/demos/demo b/demos/demo
index d128b17..2e72da2 100755
--- a/demos/demo
+++ b/demos/demo
@@ -1,5 +1,8 @@
 #!/bin/rc
 
+bind '#|' /mnt/apldemo
 font=/lib/font/bit/APL386/28/font
+@{while(test -x /mnt/apldemo/data1){cat /mnt/apldemo/data1}}| aux/statusbar -w 1682,750,1920,859 'demo' &
 acme -c1 -f$font -F$font demos
 kill apl | rc
+kill statusbar | rc