#!/bin/awk -f

BEGIN {
	dial=95
	pass=0
}

/^L/ {
	#printf $0 " " dial
	sub(/L/, "", $0)
	dial = dial - $0
	if (dial<0) {
		dial = dial + 100
	}
	if (dial==0) {
		pass=pass+1
	}
	print dial
}

/^R/ {
	#printf $0 " " dial
	sub(/R/, "", $0)
	dial = (dial + $0) % 100
	if (dial==0) {
		pass=pass+1
	}
	print dial
}

END {
	print "password: " pass
}