在 AutoLISP 語(yǔ)言中,可以使用 exit
或 return
關(guān)鍵字來(lái)中斷循環(huán)。
以下是一個(gè)示例,在循環(huán)中使用 exit
來(lái)中斷循環(huán)并顯示消息:
(defun test-loop ()
(setq i 0)
(repeat 10
(setq i (1+ i))
(if (= i 5)
(progn
(exit)
(princ "\nLoop interrupted at i = 5"))
(princ (strcat "\ni = " (itoa i))))))
在這個(gè)示例中,repeat
循環(huán)從 1 到 10,當(dāng) i
的值等于 5 時(shí),調(diào)用 exit
函數(shù)來(lái)中斷循環(huán),并顯示消息 “Loop interrupted at i = 5”。循環(huán)將被立即中斷,不再執(zhí)行后續(xù)的迭代。
請(qǐng)注意,exit
函數(shù)不僅可以用于中斷循環(huán),還可以用于中斷其他類(lèi)型的代碼塊(例如 while
循環(huán)或 foreach
循環(huán))。
另外,你還可以使用 return
關(guān)鍵字來(lái)中斷循環(huán),效果與 exit
相同。