X-Git-Url: https://git.harvie.cz/?a=blobdiff_plain;f=c%2Fbeermeter%2Fbeermeter.sh;h=9aa26dfd7f01e924168301e8d73b147056a26820;hb=238a70320639c49bc44c74588fd94cd435dfa4c3;hp=e6c7e6a686ce9c49aa16c3650e8dc57fd019f1d0;hpb=1e697494e8ab6554b87982e15bd5abe3b5b8f67f;p=mirrors%2FPrograms.git

diff --git a/c/beermeter/beermeter.sh b/c/beermeter/beermeter.sh
index e6c7e6a..9aa26df 100755
--- a/c/beermeter/beermeter.sh
+++ b/c/beermeter/beermeter.sh
@@ -1,21 +1,53 @@
 #!/bin/sh
+pulses_per_liter='4380'
+beer_liters='0.5'
+beer_price='23'
+currency='Kč'
+
 title='Beer-O-Meter'
 accounts='./accounts'
+totals="$accounts/.totals"
 backend='./audio.sh'
 tmp="/tmp/beertmp-$$";
 dialog=$(which dialog);
 
+#set +bm #job controll messages were messing up dialog's output!!!
+
+rst() { echo -ne "\033[0;0H"; }
+
+calc() {
+	precise="$(echo 'scale=10; '"$@" | bc)"
+	echo 'scale=2; '"$precise/1" | bc
+}
+
+beer_calc() {
+	pulses="$1"
+	litres=$(calc "$pulses/$pulses_per_liter")
+	beers=$(calc "($pulses/$pulses_per_liter)/$beer_liters")
+	price=$(calc "(($pulses/$pulses_per_liter)/$beer_liters)*$beer_price")
+	echo $beers beers '('$price $currency, $litres l, $pulses pulses')'
+}
+
+beer_pulses() {
+	echo $(wc -c "$accounts/$1" | cut -d ' ' -f 1)
+}
+
 beer_stat() {
-	echo $(wc -c "$accounts/$1" | cut -d ' ' -f 1) piv
+	beer_calc "$(beer_pulses "$1")"
 }
 
 add_account() {
 	"$dialog" --inputbox "New account name" 0 0 2>"$tmp"
-	[ $? = 0 ] && touch "$accounts/$(cat "$tmp")";
+	stamgast=$(cat "$tmp")
+	[ $? = 0 ] && [ -n "$stamgast"] && touch "$accounts/$stamgast";
 }
 
 servis_menu() {
-	$dialog --menu "$title servis" 0 0 0 new "Novy stamgast" exit "Konec party" 2>"$tmp"
+	$dialog --menu "$title servis" 0 0 0 \
+		tap "Seznam stamgastu" \
+		new "Novy stamgast" \
+		exit "Konec party" \
+		2>"$tmp"
 	option="$(cat "$tmp")"
 
 	case $option in
@@ -23,27 +55,54 @@ servis_menu() {
 			add_account
 			;;
 		exit)
+			clear
+			echo "=== Totals ($totals) ==="
+			echo
+			cat "$totals"
+			echo
 			exit
 			;;
 	esac
 }
 
 beer_menu() {
-	echo -n > "$accounts/.totals"
+	echo -n > "$totals"
 	ls -1 --group-directories-first "$accounts" | while read i; do
 		echo -n "$i"; echo -ne "\x00";
 		echo -n $(beer_stat "$i");  echo -ne "\x00"
-		echo -e "$i\t$(beer_stat "$i")" >> "$accounts/.totals"
-	done | xargs -0 $dialog --menu "$title stamgasti" 0 0 0
+		echo -e "$i\t$(beer_stat "$i")" >> "$totals"
+	done | xargs -0 $dialog --menu "$title stamgasti" 0 0 0 2>"$1"
+}
+
+tap() {
+	stamgast="$1"
+
+	pulses_start=$(beer_pulses "$stamgast")
+	clear
+	"$backend" >> "$accounts/$stamgast" &
+	pid="$!"
+	while kill -0 "$pid" 2>/dev/null; do
+		#echo "$stamgast" > /tmp/testo
+		pulses_current=$(beer_pulses "$stamgast")
+		pulses_diff=$[ $pulses_current - $pulses_start ]
+
+		rst
+		echo == Cepuje stamgast "$stamgast", ukonci stisknutim [ENTER] ==
+		echo "CURRE: $(beer_calc $pulses_diff)        ";
+		echo "TOTAL: $(beer_calc $pulses_current)     ";
+		sleep 0.3;
+	done &
+	read -n 1
+	pkill -TERM -P "$pid" 2>/dev/null
+	kill -TERM "$pid" 2>/dev/null
+	(sleep 3; kill -KILL "$pid" 2>/dev/null) &
 }
 
 main_menu() {
 	while true; do
-		beer_menu 2>"$tmp"
+		beer_menu "$tmp"
 		[ "$?" = "0" ] && {
-			stamgast="$(cat "$tmp")"
-			echo == Cepuje stamgast $stamgast, ukonci ctrl+c ==
-			"$backend" | tee -a "$accounts/$stamgast"
+			tap "$(cat "$tmp")"
 			true
 		} || servis_menu
 	done