;; Schlagwort: Leben eines Tieres
;; Autor: spaces zephyr
(defun tier lebenszyklus ()
"Erzeugt SVG-Diagramme und Beschreibungen des Lebenszyklus eines Tieres."
(lambda (subject)
(let* ((life-stage (get life-stage theme)))
(Wissenschaftsdaten (Holen Sie sich das Thema Wissenschaftsdaten))
(Hintergrundstile (Hintergründe gestalten Thema))
(Zeitleiste (Thema "Zeitleiste erstellen"))
(Bühnen-Emoji (Bühnen-Emoji-Thema auswählen))
(Dekorations-Emoji (Dekorations-Emoji-Thema auswählen))
(Untertitel (Untertitel-Thema Wissenschaftsdaten generieren))
(Optimiertes SVG-Diagramm erstellen Thema Lebensphase Wissenschaftliche Daten Hintergrundstil Zeitleiste Etappen-Emoji Dekorations-Emoji Untertitel ))))
(defun Get Lebensstadien (Thema)
"Ermittelt das Hauptlebensstadium des Themas."
(Fall Thema
(Zikaden '("Ei" "Aufwachphase (unterirdisch)" "Erwachsenenphase"))
(Wal '("Fötalstadium" "Jugendstadium" "Heranwachsendes Stadium" "Erwachsenenstadium" "Alter"))
(Giraffe '("Neugeborenenstadium" "Jugendstadium" "Jugendalter" "Erwachsenenalter" "Alter"))
(t '("frühe Jahre" "Erwachsenenalter" "Reife" "Seneszenz" ))))
(defun Get Science Data (Thema)
"Hole eine Liste von Wissenschaftsdaten für das Thema."
(case Thema
(Zikaden '(("Die Eier werden 6-10 Wochen lang in Zweigen ausgebrütet und können 200-600 Eier pro Gelege legen."
"Wakame leben viele Jahre lang unterirdisch und saugen den Saft von Baumwurzeln, um zu überleben."
"Wakame durchläuft fünf Häutungen und kann bis zu 20 Mal größer werden.
"Nach der letzten Häutung gräbt sie sich aus dem Boden und verwandelt sich in ein erwachsenes Tier.
"Das Erwachsenenstadium dauert nur 4-6 Wochen und konzentriert sich auf die Fortpflanzung und das Zirpen").
"Zikaden haben eine unterirdische Brutzeit von bis zu 17 Jahren, wobei die Erwachsenen nur 4-6 Wochen überleben und bis zu 120 Dezibel zirpen, was dem Lärm eines startenden Flugzeugs entspricht."))
(Wale '(("Blauwalföten nehmen pro Tag 90 Kilogramm zu, wiegen bei der Geburt 2,5 Tonnen und sind 7 Meter lang.")))
"Junge Wale trinken 380 Liter Milch pro Tag und nehmen in sieben Monaten 30 Tonnen zu."
"Junge Blauwale können 200 Meter tief tauchen und bis zu 40 Minuten lang die Luft anhalten.
"Erwachsene Blauwale sind 30 Meter lang, wiegen 190 Tonnen und fressen 4 Tonnen Krill pro Tag.
"Der am längsten lebende Blauwal kann bis zu 110 Jahre alt werden und kann in seinem Leben 13 Mal die Äquatorialdistanz der Erde durchschwimmen").
"Der Blauwal ist das größte Tier der Erde, mit einem 600 kg schweren Herz, einer Zunge so schwer wie ein Elefant und einem Ruf, der 1.600 Kilometer weit reichen kann."))
(t '(("Beschreibung der Daten aus Stufe 1"
"Datenbeschreibung für Stufe 2"
"Datenbeschreibung für Stufe 3"
"Datenbeschreibung für Etappe 4"
"Datenbeschreibung für Etappe 5")
"Interessante Datenbeschreibungen für generische Themen" ))))
(defun Hintergrund gestalten (Thema)
"Gestalten Sie einen geeigneten Kontext auf der Grundlage des Themas"
(Fall Thema
(Zikaden '(Gradient "E6F3FF" "B3E5FC" Land))
(Wale '(Farbverlauf "E3F2FD" "90CAF9" Meer))
(Giraffe '(Gradient "FFFF8E1" "FFE0B2" Grasland))
(t '(Gradient "F5F5F5" "E0E0E0" generisch ))))
(defun Zeitleiste erstellen (Thema)
"Erzeugt eine Zeitleiste des Lebenszyklus des Themas".
(case Thema
(Zikaden '("0 Jahre" "4 Jahre" "8 Jahre" "12 Jahre" "16 Jahre" "17 Jahre"))
(Wal '("0 Jahre" "10 Jahre" "25 Jahre" "50 Jahre" "75 Jahre" "100 Jahre"))
(Giraffe '("0 Monate" "6 Monate" "2 Jahre" "4 Jahre" "15 Jahre" "25 Jahre"))
(t '("Früh" "Wachsend" "Reifend" "Spät" "Seneszenz" ))))
(defun select stage emoji (Thema)
"Wählen Sie das mit einem Lebensabschnitt verbundene Emoji aus."
(Fall Thema
(Zikaden '("🥚" "🐛" "🦟" "🎵"))
(Wal '("🤰" "🍼" "🏊" "🐋" "👵"))
(giraffe '("👶" "🐕" "🏃" "🦒" "👵"))
(t '("🌱" "🌿" "🌳" "🍂" ))))
(defun Auswählen dekoriertes Emoji (Thema)
"Wählt ein dekoriertes Emoji aus, das dem Thema entspricht."
(case Thema
(Zikade '("🌳" "🍃" "🌿" "🍂"))
(Wal '("🌊" "🐠" "🦈" "🐙"))
(giraffe '("🌴" "🌿" "🦓" "🦁"))
(t '("🌱" "🌳" "🍃" "🌞" ))))
(defun Generate subtitle (Betreff: Kopp-Daten)
"Generiere Zwischenüberschriften basierend auf populärwissenschaftlichen Daten"
(format "Wussten Sie schon? %s" (zweites Element Kopp-Daten)))
(defun create optimiertes SVG-Diagramm (Thema Lebensphase Wissenschaftsdaten Hintergrund Stil Zeitleiste Phase Emoji Dekoration Emoji Untertitel))
"Optimierte Lebenszyklus-SVG-Diagramme erstellen"
(let ((svg-template
"
<defs
</linearGradient
</defs
{Hintergrunddekorationen)
{Thema}Das Leben</text
{untertitel_erste_zeile}
{Untertitel_zweite_Zeile}
</text
{Zeitstempel}
{Lebensabschnitts-Tag}
{datapoints and sci-fi information}
Legende:</text
Lebensabschnitte</text
Lebenslauf</text
{Legend emoji}
{Bottom Decoration Emoji}
"))
(fill optimierte SVG-Vorlage svg-template Thema Lebensphase Wissenschaft Daten Hintergrund Stil Zeitleiste Bühne Emoji Dekoration Emoji Untertitel)))
(defun start ()
(print "Bitte geben Sie das Lebensthema ein, über das Sie etwas lernen möchten (z.B. Zikade, Wal, Giraffe, etc.):")
(let ((Benutzereingabe (read))))
(Optimise Lifecycle Builder Benutzereingabe)))
;; Regeln ausführen
;; 1. die Funktion (start) beim Starten ausführen.
;; 2. generiert SVG-Diagramme und Beschreibungen des Lebenszyklus basierend auf den vom Benutzer eingegebenen Themen.
Die Ausgabe sollte optimierte SVG-Diagramme und relevante Textbeschreibungen enthalten, die wissenschaftliche Daten und interessante Fakten hervorheben.
