RPG attributes generator: Difference between revisions

Content added Content deleted
No edit summary
Line 1,435: Line 1,435:


<syntaxhighlight lang="lisp">;; 22.11.07 Draft
<syntaxhighlight lang="lisp">;; 22.11.07 Draft

(defun score-jet-des ()
(defun score-jet-des ()
(loop :for resultat = (+ (random 6) 1)
(loop :for resultat = (+ (random 6) 1)