IF-Forum

» IF-Forum - Autorencafé - Schreiben! - Geld
AntwortenNeues ThemaNeue Umfrage

Geld

Geschrieben um 18:49 am 24.02.2004 | Zitat | Editieren | Löschen
Paycheck
Mitglied
Baby Gumby
Beiträge: 8

Wie implementiere ich am besten so etwas wie geld dessen menge abnehmen und zunehmen kann…

Bespielsweise der Spieler verkauft seine Jacke und bekommt dafür 30 Euro

Bei der nächsten Frittenbude kauft er sich für 2 Euro eine Portion Fritten. die ihm natürlich sofort abgezogen werden…

Gibt es dafür eine Möglichkeit ?

Vielen dank

Geschrieben um 11:07 am 25.02.2004 | Zitat | Editieren | Löschen
Martin
Avatar
Mitglied
Retired Gumby
Beiträge: 699
<td valign="top"><div class="post"><p>Zu diesem Problem gibt es verschiedene Lösungsansätze, von relativ einfach bis hin zu sehr komplex. Die Guru-Aufgabe, in der ein (zugegeben recht komplexes) System von Geld implementiert werden sollte, blieb ungelöst.</p> <p>Ich würde zunächst einen pragmatischen Ansatz wählen. Der Spieler hat ein Objekt <strong>Bargeld</strong>, das er mit sich herumträgt. Die Verben beschränken sich auf &#8216;kaufe dies&#8217; und &#8216;verkaufe jenes&#8217;, man kann nicht sagen &#8216;gib dem Junkie einen Euro&#8217;. Genausowenig ist es wichtig, wie das Geld zusammengesetzt ist, man kann nicht Pfennige als Schraubenzieherersatz hernehmen oder Geldscheine zu Kranichen falten.</p> <p>Achtung, Brainstorming, kein geprüfter Code, Korrektur und Erweiterung sind dem Autor überlassen:</p> <p>&#8220;`</p> <p>Integer Cash = 1287</p> <p>! Der Spieler fängt mit 12,87 Euro an</p> <p>Integer Preis</p> <p>Flagge Handel_erfolgreich</p> <p>! Hilfsvariablen</p> <p>Aktion zähle_Geld</p> <p>Ausf</p> <p>    lokal x</p> <p>    lösche x</p> <p>    wenn &#40;Cash > 99&#41; dann</p> <p>        sei Preis Cash</p> <p>        div Preis 100</p> <p>        setze x</p> <p>        wenn &#40;Preis > zwanzig&#41; dann</p> <p>            text &#8216;&#91;Preis&#93; Euro&#8217;</p> <p>        sonst</p> <p>            text &#8216;&#91;num Preis&#93; Euro&#8217;</p> <p>        Ende</p> <p>    Ende</p> <p>    sei Preis Cash</p> <p>    mod Preis 100</p> <p>    wenn &#40;Preis&#41; dann</p> <p>        wenn &#40;x&#41; text &#8217; und &#8216;</p> <p>        wenn &#40;Preis > zwanzig&#41; dann</p> <p>            text &#8216;&#91;Preis&#93; Cent&#8217;</p> <p>        sonst</p> <p>            text &#8216;&#91;num Preis&#93; Cent&#8217;</p> <p>        Ende</p> <p>    Ende</p> <p>EndeAusf</p> <p>Aktion kaufe</p> <p>Ausf</p> <p>    lösche Handel_erfolgreich</p> <p>    wenn &#40;Preis &lt; 0&#41; stop</p> <p>    wenn &#40;Preis > Cash&#41;</p> <p>        stop &#8216;Soviel Geld hast du nicht.&#8217;</p> <p>    dekr Cash Preis</p> <p>    wenn /&#40;Cash&#41; ObjNach Bargeld Nirwana</p> <p>    setze Handel_erfolgreich</p> <p>EndeAusf</p> <p>Aktion verkaufe</p> <p>Ausf</p> <p>    lösche Handel_erfolgreich</p> <p>    wenn &#40;Preis &lt; 0&#41; stop</p> <p>    inkr Cash Preis</p> <p>    wenn /&#40;Bargeld beimir&#41; ObjNach Bargeld beimir</p> <p>    setze Handel_erfolgreich</p> <p>EndeAusf</p> <p>Obj Bargeld</p> <p>Name Ausf</p> <p>    wenn &#40;aBef = Inventar&#41; dann</p> <p>        ObjGenus selbst n %eigenname</p> <p>        Text &#8216;&#91;zähle_Geld&#93; Bargeld&#8217;</p> <p>    sonst</p> <p>        ObjGenus selbst n</p> <p>        Text &#8216;Geld/&#8217;</p> <p>    Ende</p> <p>EndeAusf</p> <p>Ort Beimir</p> <p>Vor &#8216;bar&#8217; &#8216;klein&#8217; &#8216;hart&#8217;</p> <p>Subst &#8216;geld&#8217; n, &#8216;euro&#8217; m, &#8216;euro&#8217; p, &#8216;euros&#8217; p, &#8216;cent&#8217; m,</p> <p>    &#8216;cent&#8217; p, &#8216;cents&#8217; p, &#8216;cash&#8217; n, &#8216;knete&#8217; f</p> <p>Besch &#8216;Das ist das, was dir zum Leben bleibt&#58; &#91;zähle_Geld&#93;&#8217;</p> <p>VorAusf</p> <p>    &#40;zählen&#41;</p> <p>        Ausf untersuchen selbst</p> <p>    &#40;hinlegen hineinlegen darauflegen&#41;</p> <p>        stop &#8216;Nein, das Geld kannst du noch gut gebrauchen.&#8217;</p> <p>EndeAusf</p> <p>&#8220;`</p> <p>Nun kann man mit diesem Geld Handel treiben:</p> <p>&#8220;`</p> <p>    Obj fettige_Fritten</p> <p>    Name &#8216;fettig^ Fritten&#8217; p</p> <p>    Subst &#8216;pommes&#8217; p, &#8216;fritten&#8217; p, &#8216;frites&#8217; p</p> <p>    VorAusf</p> <p>        &#40;kaufen&#41;</p> <p>            sei Preis 230</p> <p>            Ausf kaufe</p> <p>            wenn &#40;Handel_erfolgreich&#41; dann</p> <p>                &#8216;Zwei Euro dreißig und ein Schälchen Fritten</p> <p>                wechseln den Besitzer.&#8217;</p> <p>                ObjNach selbst beimir</p> <p>            EndeAusf</p> <p>    EndeAusf</p> <p>   </p> <p>    &#8230;</p> <p>   </p> <p>    Obj Fünfziger</p> <p>    Name &#8216;50-Cent-Stück&#8217; n</p> <p>    Vor &#8216;50-cent&#8217;, &#8216;50&#8217;, &#8216;50er&#8217;, &#8216;cent&#8217;</p> <p>    Subst &#8216;münze&#8217; f, &#8216;stück&#8217; n, &#8216;geldstück&#8217; n,</p> <p>        &#8216;fünfziger&#8217; m</p> <p>    Erst &#8216;Auf dem Gehweg liegt ein 50-Cent-Stück.&#8217;</p> <p>    Ort Hauptstraße</p> <p>    VorAusf</p> <p>        &#40;nehmen&#41;</p> <p>            &#8216;Du hebst das 50-Cent-Stück auf und steckst</p> <p>            es ein.&#8217;</p> <p>            sei Preis 50</p> <p>            Ausf verkaufe</p> <p>    EndeAusf</p> <p>&#8220;`</p> <p>Du kannst natürlich auch dem Junkie Geld geben, die Menge ist aber immer vom Spiel festgelegt. (Das ist ntaürlich eine Bevormundung des Spielers, vielleicht könnte man einen Euro als Standard-Menge festlegen.)</p> <p><a href="http://www.edlbauer.de/textadventures/hirsch/hirsch.html">Unter Hirschen</a> benutzt übrigens ein Geldsystem, in dem man ganze Euros ausgeben und sogar der Dame an der Kasse ein Trinkgeld zukommen lassen kann.</p> </div></td>
AntwortenNeues ThemaNeue Umfrage
Powered by Spam Board SVN © 2007 - 2021
Impressum / Datenschutz