Mini Black Jack

[radiac]

Also danke eurer Hilfe ist mein Mini Black (deutsch: 17 und 4) Jack jetzt fertig :)

Ich musst es für die Schule anfertigen.Das heisst wir sollten uns etwas raussuchen und das erschien mir am einfachsten. Was es dann leider nicht immer war ;)

In dem Spiel geht es darum möglichst nahe an 21 Punkte ranzukommen ohne diese dabei zu überschreiten.Die Karten werden per Zufall (und auf Knopfdruck ;) ) ausgewählt. Ein Ass ist 11 Punkte, Sonstige Bildkarten 10 Punkte und Augenkarten sind eben die Augen wert (also Pik 7 sind 7 Punkte).

Überschreitet ihr 21 oder erhalten ihr einen Black Jack (genau 21 Punkte) gewinnt bzw. verliert ihr sofort. Je nach eurem Einsatz den ihr als beliebigen Integerwert eingeben könnt wird euch dann Geld zugerechnet bzw. abgezogen.

Wenn ihr denkt das ihr nahe genug an 21 Punkten dran seit könnt ihr auf Karten Halten klicken. Nun ist die Bank am Zug. Für sie gelten die selben regeln wie für euch. Wenn auch die Bank hält gewinnt der mit den meissten Punkten. Wenn ihr auf zurück zum Hauptmenü klickt werdet ihr benachrichtigt ob ihr es in die Highscore geschafft habt.

Ihr könnt im Hauptmenü auch noch euren Namen eingeben :)

Ich bitte euch nicht die Highscore zu faken :P

P.S. Auf anfrage gibt es auch cheats :D

Verbesserungsvorschläge wären nicht schlecht.

Danke.

Das Programm ist etwa 600kbyte groß.

Hier downloaden

[jim_raynor]

Mmh. Wozu hast du den Kartenordner mitgeschleift? Die werden doch nicht benutzt oder irre ich mich.

2. Der Computer könnte bissle Klüger sein. Wenn ich keine Karte gezogen habe, dann brauch er sich nicht ins verderben zu stürzen.

[edit]Vergiss das mit den Karten. Ich dachte du verwendest die cards.dll[/edit]

[radiac]

Ja das mit der KI muss ich noch etwas ausbauen :)
Is aber noch relativ kompliziert für mich weil auch erst mit Delphi dieses jahr im August angefangen hab. Vorher nur Pascal und so.

[jim_raynor]

Mmh. KI? Für soetwas. Da brauchst doch keine. Wenn du feststellst, dass der Computer mehr Punkte hat als du, dann aufhören. Ganz simple.

[radiac]

Ja ok das mit der KI war ja auch etwas ironisch gemeint ;)
Naja werd das aufjedenfall noch in angriff nehmen!

[mh166]

An sich ne feine Sache. Aber man sollte nich mehr spielen können, wenn man kein Geld mehr hat... Und außerdem isses komisch, dass man einmal einfahc nichts hat und bloß auf halten drücken brauch, damit die Bank loslegt...

Und noch was: lösche mal die Datei thumbs.db (standardmäßig versteckt) aus dem Karten-Ordner. Die bläht das Archiv unnütze um, ich glaube 200kb, auf!

mfg, mh166

[Luckie]

Da stimmt was nicht. Man kann aiuch noch spielen, wenn man pleite ist und wenn man dann gewinnt, bei einem Einsatz von 50€, gewinnt man 100€. :gruebel:

Warum hat das Spielfenster kein Kreuz zum Schließen in der Titelzeile? Und man kann das Menüfenster maximieren.

Einmal wurde eine Karte von der Bank nicht gelsöcht und blieb während des ganzen restlichem Spieles sichtbar.

[radiac]

So die "KI" ;) wurde jetzt behoben. Wenn ihr jetzt mit 0 Punkten haltet verliert ihr ;)

Das ihr mit Negativ werten weiter spielen könnt ist absicht.Wär sonst blöd immerwieder neu zu starten. Soll ja spass machen und nicht stressen :)

Man gewinnt immer die doppelte Menge des Einsatzes :) Wie bei Pferderennen oder so :) Man verliert also 1:1 aber man gewinnt 1:2.

Das im Spielfenster kein x zum schliessen ist ist absicht. Wenn du auf Spiel beginnen drückst wird die erste TForm nur unsichtbar und nicht geschlossen da sonst das ganze Programm schliessen würde ;) Wenn du aber das Spielfenster schliesst dann kommst du nicht zum Hauptmenü zurück :) Aber kann das ja noch versuchen hinzubasteln.

@Luckie: Das mit der Karte hatte ich noch nicht.Werd mal ne Zeit lang spielen und kontrollieren.

Ich danke euch!

€: Die neue Version ist schon online. Einfach den alten Link nehmen.

€2: Ok hab jetzt nochmal ne endgültig Bugfreie hochgeladen ;) Wenn ihr dennoch was findet bitte bescheid sagen danke!

[Luckie]

Zitat:

Zitat von radiac

Wenn du aber das Spielfenster schliesst dann kommst du nicht zum Hauptmenü zurück :) Aber kann das ja noch versuchen hinzubasteln.

Wieso dass denn? Mach doch das Hauptfurmular im OnClose des zweiten Formulares wieder sichtbar.

Und bitte nimm doch endlich mal die fette 250KB große Thumbs.db aus dem Kartenordner.

Man kann übrigens mehr setzten, als man auf dem Konto hat. ;)

[leddl]

Sieht ganz nett aus und is dir gut gelungen. Ein paar Kleinigkeiten würd ich aber noch einbauen.

• Grad hatte ich 18 Punkte. Der Computer kam nur auf 17 und hat dann aufgehört. Das macht für mich nicht wirklich Sinn. Immerhin gäbe es ja noch die Möglichkeit, daß er eine Karte zwischen 2 und 4 zieht und damit gewinnt. Ob er jetzt mit mehr als 21 oder mit weniger als ich verliert kann dem PC ja wurscht sein...
• Und außerdem ist meines Wissens das Ass je nach Situation auch als eine 1 zu werten. Siehe hier
  Damit ergeben sich teilweise ganz neue Möglichkeiten! ;)
• Ich würde bei der Spielernamen-Eingabe vorziehen, wenn ich auch mit Enter bestätigen könnte.
• Und dem Form würde ich auch einen aussagegräftigen Namen geben. Form2 (bzw Project2 für die exe) sieht schon arg dahingeschustert aus! ;)
• Wär auch schön, wenn für die Bank auch so ein Fenster mit den aktuellen Punkten wäre, dann kann man besser mitfiebern, ohne immer mitzählen zu müssen!
• In "Sie haben leider Verloren" schreibt man "Verloren" klein! ;)
• Wenn man das Fenster schon verkleinern kann, würde ich eine minimale Breite bzw Höhe einstellen, damit immer trotzdem alles sichtbar bleibt.
• Ises gewollt, daß man seinen Einsatz auch noch nach dem ersten Ziehen ändern kann? Weiß grad net, ob das laut den Regeln so geht. Dadurch kann man bei einem guten Blatt seinen Gewinn erheblich steigern, bzw bei einem schlechten den Verlust gering halten. Is irgendwie fast wie betrügen...
  Und 0 sollte man übrigens auch nicht einsetzen können
• Grade hab ich bei nem Kontostand von 7400 alles gesetzt, gewonnen, und plötzlich werden mir nur noch 2220 angezeigt. Scheint wohl ein Problem mit der Anzeige zu geben.
• Man sollte nicht mehr setzen dürfen, als man auf dem Konto hat!
• Negative Geldbeträge sind meiner Meinung nach auch nicht gut, dann schon lieber einfach einen Button "Neues Spiel" oder eine Menuleiste, in der das möglich ist. Oder per Hotkey... (F2 zB)
• Ansonsten würde ich hauptsächlich noch etwas am Design arbeiten. Das ist noch arg verbesserungswürdig, damit das Spiel zu nem Dauerbrenner wird. Auch diese lästigen Popups finde ich ziemlich nervig! Da hab ich schon lieber einfache Textmitteilungen.

Sieht jetzt irgendwie total nach nem Verriss aus! ;) Is aber nich so gemeint. Ich find das Teil klasse, und wenn du ein bißle was änderst, wird das ein kleiner Lückenfüller für mich werden! :mrgreen: Man kommt jetzt schon kaum davon los! Mein Highscore bisher 9600€!!! :mrgreen:

PS: Und nachdem ich es mit den unfairen Tricks, die ich gefunden habe, weitergespielt habe, bin ich inzwischen sogar bei 226.640 angekommen! Vielleicht sollte ich doch mal ins Kasino gehen! ;)

[Yadon]

Habe eben mal ein wenig gespielt und ohne eine Karte gezogen zu haben, mal gewonnen und mal verloren, wenn ich auf "Halten" gedrückt habe. Aber merkwürdig finde ich, daß danach das Programm etwas durcheinander ist, wenn ich mich entschließe, wieder mal eine Karte zu ziehen. Ansonsten schließe ich mich im Großen und Ganzen leddl an.

[Yadon]

Kann nicht schlafen und habe soeben einen weiteren Fehler gefunden. Mehr als fünf Karten bekommt man ja nicht auf den Tisch, klicke ich aber trotzdem auf "Nächste Karte", so wird der Wert der letzten Karte solange addiert, bis ich auf Halten drücke und dann natürlich verliere. :shock:

Das passiert natürlich nur bei lauter niedrigen Kartenwerten. Aber immerhin.

[Yadon]

Bevor ich nun etwas "nützliches und vernünftiges" tue, noch ein Fehler, der mir passiert ist. Kann aber nicht genau sagen, wie er entstanden ist. Bin nur mit der Tabtaste rumgewandert, war im Feld "Punkte" und plötzlich war auf dem Platz der Bank die Pik Drei. Um nie mehr zu verschwinden. :roll:
Ja, und beim neuen Spiel liegt sie dann immer schon auf dem Bankplatz. Wahrscheinlich als Untersetzer für die Drinks? :)


Die Karte verschwindet auch nicht, wenn ich mal zurück ins Hauptmenü gehe, und dann wieder spiele. Also höre ich jetzt auf. :?

[jim_raynor]

Vielleicht kannst du ja auch auf die cards.dll umsteigen. Dann sparst du dir die Grafiken mitzuschicken ;) Dazu gab es erst vor kurzem ein Thema hier.

[MrSpock]

Hallo radiac,

kannst du das Programm auch als ZIP Archiv zum download anbieten?

[leddl]

Zitat:

Zitat von radiac

Also danke eurer Hilfe ist mein Mini Black (deutsch: 17 und 4) Jack jetzt fertig

Ich hoffe wirklich nicht, daß das schon fertig is. Weil allerzumindest würd ich mal die Form-Captions anpassen. Mir is nämlich grade aufgefallen, daß die Caption bei der Highschore "ome" ist. Was auch immer das bedeutet! :mrgreen:

PS: Mein Highscore ist 56.440.100! :mrgreen: Dann hatte ich keinen Bock mehr! ;)

Ach ja, wie wärs denn, wenn du den Benutzernamen speicherst? Hab irgendwie keine Lust, den bei jedem Start wieder neu einzugeben...

[radiac]

Mhh ok hab ja noch viel zu machen :)

Also das die Karte liegenb bleibt war ein Fehler von mir. Hab statt Image10 löschen zweimal die 9 gelöscht :)

Das mit dem Setzen werd ich noch verbessern. Also so das man Mindestens 1€ setzen muss.
Dann werde ich noch die Anzeige vergrößern damit auch größere Beträge angezeigt werden.
Die Bank wird des weiteren auch eine Punktanzeige bekommen.
Das mit ome :) ist mir passiert also ich ausbersehen irgendwann zwischen Kaffee und mitternacht auf die Tastatur getippt habe ohne zufinden wo ich es etwas reingeschrieben habe.
Benutzernamen speichern werde ich auch noch machen. Brauch ich dann aber noch txt datei oder?

Das mit den cards.dll is ne klasse idee! Danke! Werd mich mal ransetzen.

Achja und dieses thumbsteil zeigts bei mir nich an auch wenn ich "alle dateien anzeigen" an habe.
Ich sehe die Thumbs nur im Archiv und kann sie von dort aus nicht mehr löschen.

Sobald diese Veränderungen fertig sind werde ich das Spiel als rar und zip reinstellen weil auch das gefragt wurde. Ich denk mal ne stunde werd ich schon brauchen.

Aber gut das es euch sonst gefällt.

[leddl]

Kannst den letzten Benutzer ja auch in der Highscore-Datei speichern. Brauchst ja net extra wegen einem Namen ne neue Datei erstellen.
Solltest vielleicht auch überprüfen, ob die Highscore-Datei vorhanden ist, und falls nicht, selbige erstellen. Dann brauchst du die auch nicht unbedingt mitliefern. Die bringt ja schon einige Fehler, wenn sie nicht vorhanden ist...

[radiac]

Wie geht das mit dem F2 neustarten? Muss ich auf der Form2 ne onclick prozedur schreiben?

[leddl]

Einfach nen Shortcut definieren. Wenn du en Mainmenu machst (was garantiert nix schaden könnte) kannst du das da zB auch ganz einfach angeben. Geht aber auch ohne Menu. Da fragste mit mir aber den falschen. Müßte das dann auch erst per Suche oder OH finden.

[radiac]

Ok also das mit den Shortcuts versteh ich absolut net :)

Ansonsten habe ich jetzt das Geld setzen optimiert und wenn man kein Geld mehr hat muss man neu starten. Des weiteren wird der Benutzername jetzt gespeichert.

Nur das mit der Cards.dll krieg ich absolut net hin!

Achso und der Fehler mit der Liegen gebliebenen Karte wurede behoben. Ausserdem habe ich noch jeweils ein weiteres Image Feld angefügt.

€: Ok da mein I-Net jetzt wieder geht stell ich mal die neuen Versionen on. Was ich nicht gemacht habe ist die Karten aus der cards.ddl zu nehmnen (war mir einfach zu schwer) und nen shortcut erstellen (F2 bei neustart geht also leider nicht muss man noch oben im Menü drücken ;) ).

Der Nickname wird jetzt mit dem Highscore in ner .txt gespeichert allerdings kann es da noch Fehler geben obwohl ich denke alle möglichen Versionen durchgetestet habe.

Hier zum .rar File
Hier zum .zip File

P.S. ich hab es endlich geschafft dieses thumbs ding zu entfernen ;)

[leddl]

Ähm ja, was mir als allererstes immer noch auffällt ist der Name des Projekts: Project1!
Wie wärs, wenn du das zB in BlackJack umbenennst? Sieht eindeutig besser aus! ;)
Dann würd ich, um die Highscore am Anfang etwas attraktiver zu gestalten, als Standardwerte nicht 5mal "Anonymous" und 100 zu nehmen, sondern 5 fiktive Werte mit verschiedenen Zahlen. Sieht auch besser aus! ;)
Wenn man ein neues Spiel startet wird der Wert der vorher gezogenen Karten nicht zurückgesetzt. Das Spiel is also nur "halb neu" ;)
Im Menu passiert bei Beenden irgendwie gar nix... Und warum das mit F2 nich funzt versteh ich net. Per Klick auf "Neu starten" tuts ja. Wirklich seltsam.
Mein Name wird irgendwie nicht gespeichert... Nur, wenn ich direkt nach der Eingabe das Spiel beende.
Und ich würds immer noch vorziehen, die Eingabe meines Namens auch mit Enter zu bestätigen.
Und "Verloren" schreibt man immer noch klein! Und das "Beenden" in "Spiel Beenden" auch! ;)

Nach dieser "kurzen" ;) Kritik will ich aber trotzdem noch sagen, daß es tierisch Spaß macht! ;)

PS: Was is eigentlich mit meinem Einwand mit dem Ass? Müßtest dann halt die Punktezählung etwas abändern. ZB die Asse extra zählen und je nachdem, was für Karten sonst da sind, das/die Ass/e entsprechend zählen.

[radiac]

Ok hab jetzt alle Bugs behoben.

Das einzige was noch nicht funktioniert ist wie möglichkeit das das Ass als nur 1 zählt und das bei F2 das Spiel neu startet. Ich krieg das mit den Hotkeys net hin :(

Wenn das fertig ist stell ich nochmal neu online.

€: Ich hab jetzt organisiert das wenn der Spieler über 10 Punkte hat, das Ass nur als 1 Punkt zählt da man ja sonst verlieren würde. Hoffe mal das das den internationalen Regeln entspricht :)

€2: Auch die Rechtschreibfehler wurden behoben ;)

[leddl]

Aaaargh, die neue Version is ja schon draußen. Hatte mir damals gleich nachdem dus geschrieben hast, nochmal die Datei downgeloadet, da wars aber wohl noch die andere. Und jetzt hab ich immer gewartet, daß du nochmal was dazu schreibst. :mrgreen:
So, habs jetzt vor mir und es gefällt mir nochmal ein Stückle mehr. Störend finde ich allerdings, daß bei "Neues Spiel" jetzt 2mal F2 steht. Hast du eines davon in die Caption geschrieben oder wie kommt das?
Und warum heißt die Highscore-Datei "BetaScript.txt"? Das leuchtet mir nicht so ganz ein. :gruebel:

[Nicodius]

das .zip archiv existiert nicht meht

[Nicodius]

sh anhang

passiert beim normalen entpacken


ok ist in ordnung --> liegt am winarchiver habs mit meinerm winrar geschafft




nochwas zur KI ich habs selber mal programmeirt und wenn ich als spieler 20 habe und der pc 18 wird er nicht freiwillig aufhören sondern nochmal tippen!

.... immerhin könnte er ja nen dreier haben oder nen 2er und so noch ein patt rausholen - er verleirt sowieso nicht ;)

[Nicodius]

noch was


wenn man wenn man pleite ist nochmal halten drückt geht das geld ins minus ...

[leddl]

LOL, 3 Posts in 10 Minuten. Net schlecht! :mrgreen:

Zitat:

Zitat von Nicodius

nochwas zur KI ich habs selber mal programmeirt und wenn ich als spieler 20 habe und der pc 18 wird er nicht freiwillig aufhören sondern nochmal tippen!

.... immerhin könnte er ja nen dreier haben oder nen 2er und so noch ein patt rausholen - er verleirt sowieso nicht

Jupp, das hab ich schon ganz am Anfang bemängelt. Hatte nur keine Lust, dauerhaft auf sowas rumzureiten, sonst denkt der arme Radiac noch, das Progrämmchen wär nix. ;)

Zitat:

Zitat von Nicodius

wenn man wenn man pleite ist nochmal halten drückt geht das geld ins minus ...

Kann ich bestätigen. Is mir vorher nich aufgefallen. Aber: Ganz übel! :mrgreen:

Radiac, nachbessern! :mrgreen:

[radiac]

Ok mittlerweile ist das Programm nochmal überarbeitet leider war ich lange nicht mehr hier und liegt das Programm in meiner Zweitwohnung.Werde es dann am 2 WEihnachtsfeiertag schnell hochladen :)

bis dahin

Fröhliche Weihnachten

[Maa83]

hallo,

nicht schlecht das Ganze. Ein paar Dinge hätte ich noch:

1. Das "schliessen-x" im zweiten Fenster sollte wieder hin.
2. Man kann Halten ohne eine Karte gelegt zu haben.
3. Bei einem selber zählt das As manchmal als 11 und manchmal als 1. Beim Computer wird das As aber immer als 11 gezählt!
4. Enter bei der Nameseingabe wäre nicht schlecht. (einfach den Key auf VK_RETURN abfragen)

das wars auch schon :)

[Rick7221]

Ich weiß der Thread ist schon alt, aber der Code würde mich sehr interessieren!
Kann das vielleicht jemand nochmal hochschieben?

Gruß Rick

[Mackhack]

Zitat:

Zitat von leddl

Sieht ganz nett aus und is dir gut gelungen. Ein paar Kleinigkeiten würd ich aber noch einbauen.

• Grad hatte ich 18 Punkte. Der Computer kam nur auf 17 und hat dann aufgehört. Das macht für mich nicht wirklich Sinn. Immerhin gäbe es ja noch die Möglichkeit, daß er eine Karte zwischen 2 und 4 zieht und damit gewinnt. Ob er jetzt mit mehr als 21 oder mit weniger als ich verliert kann dem PC ja wurscht sein...

Dealer hits soft 17. Bei einer hard 17 (17 ohne ASS) bleibt sie stehen. Kennst wohl die Basic Strategy nicht? :lol:

[Balu der Bär]

Zitat:

Zitat von Rick7221

Ich weiß der Thread ist schon alt, aber der Code würde mich sehr interessieren!
Kann das vielleicht jemand nochmal hochschieben?

Gruß Rick

Hier ist der (schlechte) Code von meinem Black Jack Spiel, vlt. bringts dir was. ;)

Grüße