[编程交流] 有趣的“Lisp程序”

(alert "Druk op ok om door te gaan!")
(alert "Weet u het zeker?")
(alert "Weet u het echt zeker?")
(alert "Er is nog een weg terug.\ als je echt wilt druk dan maar op OK.")
(alert "Eigenlijk weet ik het niet zeker meer/ Maar druk maar op OK dan.")
(alert "**** hij werkt denk niet meer./ probeer nog maar keer.")
(alert "Nou ja hij doet het nog steeds niet. Druk maar op OK om terug tegaan.")
(alert "Druk op ok om door te gaan!")
(alert "Weet u het zeker?")
(alert "Weet u het echt zeker?")
(alert "Druk op OK om af te tellen naar van 20")
(alert "20")
(alert "19")
(alert "18")
(alert "17")
(alert "16")
(alert "15")
(alert "14")
(alert "13")
(alert "12")
(alert "11")
(alert "20")
(alert "**** dat was 20 nou ja dan nog maar keer.")
(alert "20")
(alert "19")
(alert "18")
(alert "17")
(alert "16")
(alert "15")
(alert "14")
(alert "13")
(alert "12")
(alert "11")
(alert "10")
(alert "9")
(alert "8")
(alert "7")
(alert "6")
(alert "5")
(alert "4")
(alert "3")
(alert "2")
(alert "1")
(alert "0")
(alert "Nou goed dan stop ik maar")
(alert "Nog een prettige dag verder")