違います。

というかおまえの目的は何？
要求を満たすプログラムを提示してやっただろ
あれをButtonで包んでMethodをいじれば課題研究終了だ。違うか？

どうしてもおまえの醜いプログラムを動かしたいわけ？
難しい問題に簡単な解法を与えることは賞賛されるけど、
簡単な問題に難しい解法を与えてもバカにされるだけだぞ。
ほれ。
alarm[z_, w_List] :=
While[timeup == False,
If[z - clo > 0, clo = time[DateList[], w], timeup = True]];