1 files changed, 38 insertions, 0 deletions
diff --git a/share/hackvr/examples/dungen/dunexplore.sh b/share/hackvr/examples/dungen/dunexplore.sh
new file mode 100755
index 0000000..389f477
--- /dev/null
+++ b/share/hackvr/examples/dungen/dunexplore.sh
@@ -0,0 +1,38 @@
+#!/usr/bin/env bash
+### run me with hackvr_coproc
+#the $USER triangle we add first is to give us some sort of avatar to see where the camera is.
+seed=1337
+echo $USER addshape 4 3  -1 0 -1  0 0 2  1 0 -1 ; echo $USER move 0 2 0
+./dungen $seed | ./dun2hackvr
+while read group action target;do
+  if [ $action = "action" ];then
+    if printf "%s\n" "${target}" | grep ^door_;then
+      printf "# clicked a door! %s\n" "${target}" >&2
+      if printf "%s\n" "${target}" | grep ^door_open;then
+        derp=$(printf "%s\n" "${target}" | sed 's/_open/_CLOSING/')
+        printf "%s renamegroup %s %s\n" ${target} ${target} ${tmp} | tee /dev/stderr
+        while true;do
+        for i in $(seq 1 5 90);do
+          printf "%s rotate 0 +5 0\n" ${tmp}
+          sleep .1
+        done
+        tmp2=$(printf "%s\n" "${target}" | sed 's/_open/_close/')
+        printf "%s renamegroup %s %s\n" ${tmp} ${tmp} ${tmp2} | tee /dev/stderr
+        break
+        done | tee /dev/stderr &
+      else
+        tmp=$(printf "%s\n" "${target}" | sed 's/_close/_OPENING/')
+        printf "%s renamegroup %s %s\n" ${target} ${target} ${tmp} | tee /dev/stderr
+        while true;do
+        for i in $(seq 1 5 90);do
+          printf "%s rotate 0 +-5 0\n" ${tmp}
+          sleep .1
+        done
+        tmp2=$(printf "%s\n" "${target}" | sed 's/_close/_open/')
+        printf "%s renamegroup %s %s\n" ${tmp} ${tmp} ${tmp2} | tee /dev/stderr
+        break
+        done | tee /dev/stderr &
+      fi
+    fi 
+  fi
+done