带递增计数器的循环条件可以是类似 (< count desired-number) 这样的表达式：当 count 的值小于期望重复次数 desired-number 时返回真 t，当 count 大于或等于 desired-number 时返回假 nil。计数器递增的表达式可以用简单的 setq 实现，例如 (setq count (1+ count))，其中 1+ 是 Emacs Lisp 内置函数，作用是将参数加 1。（表达式 (1+ count) 与 (+ count 1) 结果相同，但更便于人类阅读。）
由递增计数器控制的 while 循环结构如下：
set-count-to-initial-value (while (< count desired-number) ; true-or-false-test body... (setq count (1+ count))) ; incrementer
注意需要为 count 设置初始值，通常初始化为 1。