This is the mail archive of the
xconq7@sources.redhat.com
mailing list for the Xconq project.
Swedis Place Name Generator
- To: xconq7 at sourceware dot cygnus dot com
- Subject: Swedis Place Name Generator
- From: Erik Sigra <freeciv at home dot se>
- Date: Sat, 30 Sep 2000 15:22:16 +0200
(game-module "citynames"
(title "Citynames")
(blurb "Game to test generation of random city names.")
(variants
(world-seen true) ;Desn't come true by default for some reason
(see-all true) ;Desn't come true by default for some reason
(world-size)
)
)
(unit-type city
(name "city")
(image-name "city20")
(help "A city")
(namer "swedish-place-names")
(acp-per-turn 1)
(vision-range 16)
(start-with 32)
)
(terrain-type default (image-name "black"))
(set sides-min 1)
(set sides-max 1)
(set country-radius-min 16)
(namer swedish-place-names
(grammar root 100
(root (or 15 name
1 (preword " " (capitalize name))
)
)
(preword (or svarta blåa gröna gula röda bruna vita
10 nya 10 gamla
10 norra 10 "Östra" 10 södra 10 västra
)
)
(name (or 4 (prefix suffix)
2 (both suffix)
2 (prefix both)
2 (both both)
(prefix both suffix)
(complete)
)
(reject "Åå"
"åå"
"älvälv" ;Quotation needed to avoid segfault
bergberg
borgborg
daldal
fältfält
forsfors
hemhem
hemlösa ;Means "homeless" (plural)
hemstad ;Means "homecity"
höghög
hultshult
hushus
kullakulla
laxlax
markmark
markamarka
sandsand
sjösjö
slättslätt
stensten
strömström
sundsund
vivi
vikvik
rrr ;Norrryd
ttt ;Slätttuna
) ;This doesn't work! (How do I use reject?)
)
(prefix (or ;Colors
svart blå grön gul röd brun vit
;Time
ny gammel
;Prepositions
"Över" neder
;Size
stor lill
;Directions
nord norr ost "Öst" "Öster" syd söder väst väster
vest ;Vestfjärd
;Personal firstnames
bengts everts fredriks oskars
"Å" "Älv"
back björne bjurs bjus brahe brunns
djurs
eke em
fågel fin finn fogd frö furu
gör göte glimminge gran gränges gryt
halls han horn hults
jön
karl karle karls ki kors krono kvarn kyrk
lek lin ling lule
malm marie mjöl mört munk
näck nåden
ockel om on
"Öre" ;Capitalized because automatic capitalization
;doesn't work for this letter.
ox oxel på pite
räfs råg rätt ronne ro run
såg salt side sig simris skattung solberg sollen ställ
stock svine
täll tammer tand töv tran
ule ulvs ume unn upp
våm var vår vikar vin ving vir
ytter
)
)
(suffix (or ;Quotations needed to avoid segfault
"å" "åker" "åkra" "älv" "ås"
björka bäck bäcka backe berga böle bro by byn dal dala
dalen fjärd fred gård gården gärde gärdet gårda haga
hamn hed heden hult hyttan kalix köping lösa mo myra
näs näset ö ryd sala sätra slott stad sund tjärn torp
tuna vattnet
)
)
(both (or berg
borg ;Borgholm
dal
fält
fors
hem
hög
hus ;Huskvarna
kulla
lax
mark
marka
sand
sjö
slätt
sten ;Stenungsund
ström
sund ;Sundsvall
vi
vik
)
)
(complete (or "Åbo" ;Quotation needed to avoid segfault
alfta
"Älvho" ;Quotation needed to avoid segfault
artsjö bäcka bomarsund borlänge falun floda föglö
gagnef glimminge gustavs hamra hede idre jakobstad
järna kalix kalmar kökar lappträsk lemland lima los
lund malung mora mörkret nora orsa sälen särna solv
sveg tuna vasa växjö vendel
)
)
)
)