Ein schnelles Skript, mit dem man ein ungleichmäßiges Gitter in Context Free erstellen kann.
Hier ein Outcome bei dem der width Wert von ARCTO auf 1 steht (siehe Kommentar im Skript):
und hier eins mit width 5:
Und natürlich das Skript:
startshape anfang
rule anfang {
laby{}
}
// Die Werte der Schleifen (30) erhöhen um ein größes Feld zu bekommen.
rule laby {
30 * {x 1} {
rechteckv{y -1 r 90}
30 * {y 1} {
quadrat{}
}
}
// Wenn die obere Schleife größer ist, diese hier ebenfalls erhöhen und
// auch den Wert von x auf den Wert der Schleife setzen!
30 * {y 1} rechteckh{y -1 x 30 r 90}
}
rule quadrat{
welches{}
}
rule quadrat{
welches{flip 90 r 90}
}
rule welches{
rechteckh{}
rechteckv{}
}
/* den Wert r bei den ARCTO höher setzen um ein weniger gewölbtes Gitter zu erhalten.
den Wert bei width erhöhen um stärkere Striche zu erhalten */
path rechteckh{
ARCTO {x 1 r 1}
STROKE {p roundcap width 0.1}
}
path rechteckv{
ARCTO {y -1 r 1}
STROKE {p roundcap width 0.05}
}
