#!/bin/awk -f BEGIN { dial=50 pass=0 } /^L/ { sub(/L/, "", $0) dial = (dial - int($0)) % 100 if (dial==0) { pass = pass + 1 } print dial } /^R/ { sub(/R/, "", $0) dial = (dial + int($0)) % 100 if (dial==0) { pass = pass + 1 } print dial } END { print "password: " pass }