;; timer.txt
;;
;; David Kauchak
;;
;; A few examples using the built-in timer
;;

menu 1 [check-timer]
menu 2 [count-timer]
menu 3 [backup]

to check-timer
	loop[
		print timer
		wait 1
	]
end

to count-timer
	resett

	loop[
		print timer
		wait 1
	]
end

to backup
	ab, on thatway
	resett
	waituntil [or (switch 8) (timer > 2000)]
	ab, off
end