procgen  Check-in [5d470c919c]

Overview
Comment:add insult generator
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 5d470c919c17a72837f4becd037f5358fcd485371a7bb16d509391ead59818ec
User & Date: lexi on 2019-10-12 07:03:53
Other Links: manifest | tags
Context
2019-10-16
03:25
add insult vocab check-in: b48a343962 user: lexi tags: trunk
2019-10-12
07:03
add insult generator check-in: 5d470c919c user: lexi tags: trunk
2019-10-03
00:08
add vocab check-in: eee9fbeda0 user: lexi tags: trunk
Changes

Added beleidigung.scm version [ada33942ea].















































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
(include "lib/lisp-macro.scm")
(include "lib/bot.scm")

(bank modifier
	  "dumm" "arsch" "stink" "kotz" "rotz" "schweine" "weich" "piss"
	  "affen" "kack" "rosetten" "dreck" "rillen" "dammschweiß" "lumpen"
	  "anal" "spalten")

(bank noun
	  "arsch" "kopf" "stiefel" "kotz" "brocken" "hund" "gesicht"
	  "backe" "tüte" "trinker" "affe" "lecker" "tante" "scheißer"
	  "kind" "wichser" "sack" "kopp" "akrobat" "fotze" "schnüffler"
	  "kuh" "lutscher" "fresse" "vogel")

(rule (modifier-phrase)
	  ((modifier))
	  ((modifier) (modifier-phrase)))

(rule (insult)
	  ((modifier-phrase) (noun)))

(display (insult))
(display "\n")