1w6 - Ein Würfel System - Einfach saubere, freie Rollenspiel-Regeln

±d6 in Guile Scheme

Bild von Drak

Just for fun: This implements the ±d6 in Guile Scheme, including critical rolls.

(define* (roll-1d6)
  (let* ((numbers '(-5 -3 -1 2 4 6))
         (rolld6
          (lambda () (list-ref
                      numbers
                      (random 6)))))
    (let rolling ((rolled
                   (cons (rolld6) '())))
      (cond
       ((and (= 1 (length rolled))
             (member
              (car rolled) '(-5 6)))
        (rolling (cons (rolld6) rolled)))
       ((and (< 1 (length rolled))
             (equal? (car rolled)
                     (car (cdr rolled))))
        (rolling (cons (rolld6) rolled)))
       ((= 1 (length rolled))
        (car rolled))
       (else
        (apply + (cdr rolled)))))))

Written for syncbot, an IRC bot for 8sync.

Dieser Text ist mir was wert: Flattr this ?

Kommentar hinzufügen

Der Inhalt dieses Feldes wird nicht öffentlich zugänglich angezeigt.
CAPTCHA
Bist du ein biologisches Wesen? (5 Zeichen, Groß- und Kleinschreibung zählt!)
Image CAPTCHA
Enter the characters shown in the image.
Inhalt abgleichen
Über 1w6
Downloads
GNU General Public License v3
GNU General Public License v3
Flattr this ?

Benutzeranmeldung

CAPTCHA
Bist du ein biologisches Wesen? (5 Zeichen, Groß- und Kleinschreibung zählt!)
Image CAPTCHA
Enter the characters shown in the image.

Kommentare



„Durch das fixe Regelsystem haben wir nur sehr wenig Zeit auf Regelebene verbracht und hatten mehr Muße, auf das Setting einzugehen.“
— PiHalbe: Mutant — Under­gångens Arvta­gare
    was Leute sagen…