Der Händler

Jeden Tag fährt Hugo, der Händler, mit seinem Karren an Emmas Hof vorbei und kauft Pflanzen. Seine Preise ändern sich jeden Tag. Ist sein Karren leer, zahlt er für jede Pflanze 2 Münzen mehr als der Markt. Am nächsten Tag, wenn er halb voll ist, zahlt er 1 Münze mehr. Am dritten Tag ist er voll, und er zahlt nur, was der Markt zahlt. Dann bringt er alles in die Stadt, und es beginnt von vorn: 2, 1, 0, 2, 1, 0 …

Emmas Regel ist einfach: Wenn Hugo mehr zahlt als der Markt, verkauft sie ihm alles aus der Scheune. Sonst behält sie es, und am Ende der Saison geht es auf den Markt.

Hugos Tage sind ein Fall für eine Koroutine, wie in der Lektion über Koroutinen: eine Funktion, die jeden Tag ein Stück läuft und bei coroutine.yield pausiert. coroutine.wrap macht daraus eine Funktion, die sie fortsetzt: Jeder Aufruf führt sie bis zum nächsten yield aus und gibt den Wert zurück, den sie an yield übergeben hat. Zum Beispiel, was der Hund Rex den ganzen Tag macht:

local function rexSkript()
    while true do
        coroutine.yield("bewacht die Scheune")
        coroutine.yield("schläft am Brunnen")
    end
end

local rex = coroutine.wrap(rexSkript)
for tag = 1, 3 do
    print("Tag " .. tag .. ": Rex " .. rex())
end

Das gibt Folgendes aus:

Tag 1: Rex bewacht die Scheune
Tag 2: Rex schläft am Brunnen
Tag 3: Rex bewacht die Scheune

Die Schleife while true endet nie, aber das ist hier in Ordnung. Bei jedem yield pausiert die Koroutine, und das Programm läuft weiter. Sie läuft erst wieder, wenn sie aufgerufen wird, und macht dort weiter, wo sie aufgehört hat, hier mitten in ihrer Schleife. Hugos Skript wird genauso aussehen, nur mit einer for-Schleife darin, die von 2 abwärts bis 0 zählt. Vergiss ihre Schrittweite -1 nicht. Ohne sie läuft die for-Schleife nullmal, while true erreicht nie ein yield, und das Programm läuft, bis die Seite es nach 5 Sekunden abbricht.

Hugos Skript muss als Koroutine laufen, mit coroutine.wrap (oder coroutine.create und coroutine.resume). Rufst du hugoSkript() direkt auf, ist es keine Koroutine, und yield hat nichts, wohin es zurückkehren kann: attempt to yield from outside a coroutine (diesmal ohne Zeilennummer am Anfang). Und erstelle die Koroutine nur einmal, über der Schleife über die Tage. Würdest du sie innerhalb der Schleife erstellen, finge sie jeden Tag von vorn an, und Hugo würde immer 2 Münzen mehr zahlen.

Die Funktion verkaufe braucht zwei weitere Parameter: wer kauft (kaeufer) und wie viele Münzen mehr als der Markt er zahlt (aufschlag). Gib ihnen Standardwerte, wie in der Lektion über Funktionen: kaeufer = kaeufer or "Markt" und aufschlag = aufschlag or 0. Dann funktioniert der Aufruf verkaufe(scheune) am Ende der Saison wie zuvor.

verkaufe muss auch die Scheune leeren: scheune[name] = nil entfernt eine Pflanze, sobald sie verkauft ist. Ohne das würde Hugo an einem anderen Tag denselben Weizen noch einmal kaufen, der Markt am Ende noch einmal, und Emma beendete die Saison mit 390 Münzen. Das ist zu schön, um wahr zu sein. Die Schlüssel der Scheune innerhalb der Schleife zu entfernen ist in Ordnung, weil die Schleife die separate Liste aus sortierteNamen durchgeht.

Am ersten Tag zahlt Hugo 2 Münzen mehr, aber die Scheune ist noch leer, und verkaufe würde Hugo: = 0 ausgeben. Lass es seine Zeile also nur ausgeben, wenn die Summe größer als 0 ist.