procgen  Diff

Differences From Artifact [ada33942ea]:

• File beleidigung.scm — part of check-in [5d470c919c] at 2019-10-12 07:03:53 on branch trunk — add insult generator (user: lexi, size: 629) [annotate] [blame] [check-ins using]

To Artifact [7414b89676]:

• File beleidigung.scm — part of check-in [b48a343962] at 2019-10-16 03:25:00 on branch trunk — add insult vocab (user: lexi, size: 647) [annotate] [blame] [check-ins using]

     1      1   (include "lib/lisp-macro.scm")
     2      2   (include "lib/bot.scm")
     3      3   
     4      4   (bank modifier
     5      5   	  "dumm" "arsch" "stink" "kotz" "rotz" "schweine" "weich" "piss"
     6      6   	  "affen" "kack" "rosetten" "dreck" "rillen" "dammschweiß" "lumpen"
     7         -	  "anal" "spalten")
            7  +	  "anal" "spalten" "reichs")
     8      8   
     9      9   (bank noun
    10     10   	  "arsch" "kopf" "stiefel" "kotz" "brocken" "hund" "gesicht"
    11     11   	  "backe" "tüte" "trinker" "affe" "lecker" "tante" "scheißer"
    12     12   	  "kind" "wichser" "sack" "kopp" "akrobat" "fotze" "schnüffler"
    13         -	  "kuh" "lutscher" "fresse" "vogel")
           13  +	  "kuh" "lutscher" "fresse" "vogel" "hitler")
    14     14   
    15     15   (rule (modifier-phrase)
    16     16   	  ((modifier))
    17     17   	  ((modifier) (modifier-phrase)))
    18     18   
    19     19   (rule (insult)
    20     20   	  ((modifier-phrase) (noun)))
    21     21   
    22     22   (display (insult))
    23     23   (display "\n")