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



„Eine interessante Denk­richtung, die sich für mich als altem DSA Spieler fast schon ungewohnt schlank anfühlt.“
— Philipp von Phönixbanner
    was Leute sagen…