Entwickler-Ecke :: Thema anzeigen - Mensch ärgere dich nicht

ich1506 - Sa 01.07.06 20:29
Titel: Mensch ärgere dich nicht

Hallo,

ich hab da mal was geschrieben und nun würd ich euch einfach mal bitten eure Meinung zu sagen!

Also Mensch ärgere dich nicht, das Brettspiel kennt wohl jeder.

Gewürfelt wird mit dem 'Würfeln'-Button und dann verschiebt man die Steine durch einen kurzen Klick oder durch verschieben (Mit der Maus festhalten und dann los lassen).

Sonst guckt mal unter Hilfe (im Menü)

eins noch im Vorraus: ein Pc als Gegenspieler ist leider noch nicht möglich.

Schüler - So 02.07.06 10:08

Ich finde es recht gut doch am anfang könnten ruhig mehr 6 falle habe mindestens 12 minuten dafür gabraucht. meistens gehts gut wenn du sowas machen würdest:
Randomize;
var a : integer;
a:=random(7)+1;
If a = 7 or 8 then
a :=6;
end;
Mfg Schüler(Lasse);

Fighter#1 - So 02.07.06 11:17

Hübsches Spiel.
Du solltest die geschwindigkeit ändern, mit der die Figuren laufen. (is Form.Doublebuffered:=True?)
Und die Spielfiguren auf die man läuft verschwinden schon wenn man losläuft.
Sonst schön.
Ach ja, ne KI is ja auch nicht zu schwer.
Kriegste bestimmt hin :-)
:zustimm:

ich1506 - So 02.07.06 11:47

Danke fürs Ausprobieren.

@Schüler: Ok, ich könnte diese "Würfelweise" machen, wenn alle noch drin sind, so kommt man auch schneller wieder in Spiel wenn man rausgeschmissen wurde :D

@Fighter: Die Steine bewegen sich so langsam, weil sie sonst unheimlich flackern würden, ich hab schon versucht es anders hin zu biegen, doch dann müsste ich einen großen Teil des Progs neu schreiben. Eine spätere Version soll vielleicht in OpenGL sein, dann ist das Problem nicht mehr.
Form1.Doublebuffered:=True war ein super Tipp! Danke :zustimm:
Nu läuft es auch flotter!

Die KI da werd ich mal ransetzten, eigentlich ist es nur:
1. würfeln
2. gucken ob jemand rausgeschmissen werden kann
3. rausschmeißen oder vordersten Stein weiter setzen

:wink:

GTA-Place - So 02.07.06 15:06

Es kam jetzt paar mal vor, dass ich eine 5 gewürfelt hatte und das Prog meldete, dass kein Zug möglich sei. Einmal hab ich direkt danach noch einmal eine 5 gewürfelt und es hat funktioniert.

fidionael - So 02.07.06 17:25

Hallo,

erstmal ein dickes Lob, das Spiel gefällt mir schon sehr gut :)

Ich würde es jedoch bevorzugen, wenn mir der Computer bereits die Arbeit abnimmt und ich tatsächlich nur noch Entscheidungen treffen muss. Damit meine ich, dass der Computer nach dem Würfeln zunächst überprüft, ob ich überhaupt eine Wahl habe, wie ich mich verhalten will und, falls dies nicht der Fall ist, selbst agiert.

Auch wäre es eventuell hübscher, wenn sich die Spielfiguren beim Zug an den Pfad des Spielfeldes halten, anstatt den kürzesten Weg zu wählen - es irritierte mich doch, als die Figur meines Gegners durch mein "Haus" wanderte.

Mfg

ich1506 - So 09.07.06 01:06

@GTA-Place

GTA-Place hat folgendes geschrieben:

das Prog meldete, dass kein Zug möglich sei. Einmal hab ich direkt danach noch einmal eine 5 gewürfelt und es hat funktioniert.

das bedeutet dass keiner von deinen Seinen bewegt werden kann, zB du brauchst eine 2 um deinen letzten Stein ins Endfeld zu bekommen und würfelst eine 4. Wenn du jetzt noch mal würfelst, ist der nächste Spieler dran und der darf ziehen.

@fidionael:
Danke für dein Lob! Dass mit der Bahn ist manchmal wirklich etwas iritierend, aber ich wollte es nicht (für mich und den Benutzer) "schwerer" machen als es ist.

crncpz - Mo 10.07.06 15:16

dein spiel is so ganz gut
hast du die steine mit images gemacht?
wenn ja kannst du das mal versuchen in die procedure TForm1.FormCreate zu schreiben

form1.DoubleBuffered:=true;

das müsste das flackern veringern dann kannst du die steine auch schneller bewegen lassen

GTA-Place - Fr 14.07.06 12:32

Fighter#1 hat folgendes geschrieben:

[...]
Du solltest die geschwindigkeit ändern, mit der die Figuren laufen. (is Form.Doublebuffered:=True?) [...]

ich1506 hat folgendes geschrieben:

[...] Form1.Doublebuffered:=True war ein super Tipp! Danke :zustimm: [...]

crncpz hat folgendes geschrieben:

[...] wenn ja kannst du das mal versuchen in die procedure TForm1.FormCreate zu schreiben

form1.DoubleBuffered:=true; [...]

Bissl spät der Tipp ;-)

klaus483 - Fr 09.02.07 09:05

Gut gemacht. Kann man getrost weitergeben.
Wem die Steine zu langsam laufen, der sollte sie mit der Maus fassen und selbst ziehen.
Wie beim "richtigen" Brettspiel.
Wenn Du den Button "Würfeln" quadratisch machst und nach dem Ausblenden der Caption, die gewürfelte Zahl als Caption erscheinen würde, sähe es einem echten Würfel ähnlicher.
Bei der nächsten Aufforderung "würfeln" verschwindet die Zahl wieder.
Eine Option "Noch mal spielen" ohne die Namen neu eintippen zu müssen würde mich auch freuen.
Aber eine gut gelungene Arbeit hast Du uns hier angeboten.
Mach weiter so.
Klaus483 :roll:
15.2.07 Leider einen Fehler gefunden:
Den letzten roten Stein mit einer "6" ins Ziel gebracht (den obersten von der vieren), danach kam die Aufforderung noch mal würfeln, das getan und konnte logischerweise nirgends ziehen. das Programm hängt sich auf. Wie gesagt, leider!!
Viel Erfolg klaus483

marvin521993 - Di 13.02.07 16:55

ich finds ganz gut aber wenn man am anfang aus dem häusschen kommt mit ner sechs, und dann nochmal ne 6 kommt dann stürzt er ab also macht nix mehr

Lg
Marvin

marvin521993 - Di 13.02.07 16:56

ich finds ganz gut aber wenn man am anfang aus dem häusschen kommt mit ner sechs, und dann nochmal ne 6 kommt dann stürzt er ab also macht nix mehr

Lg
Marvin

Saubäär - Di 13.02.07 20:46

Hallo,

schaut super aus das Spiel.
Schön wäre allerdings, dass man auswählen kann wenn man eine 6 würfelt ob ein neuer Stein ins Spielfeld gestzt wird oder ob ein anderer Stein weitergeschoben werden soll.

Gruß

Saubäär

hui1991 - Do 15.02.07 15:38

Hi,

halbe Minute an und schon der erste Bug.
Als ich den Roten kegel auf die falsche Stelle geschoben habe und dann konnte ich den einen KReis da verschieben.
Zu der stelle wo etz der Schwarze Kegel ist. Und etz fehlt der KReis.
Denke da haste irgendwo ein Fheler eingebaut.
Screen im anhang
Nochwas.. Rot hatte schon 3-mal 6 und Schwarz keinmal.

MfG
hui1991

jaenicke - Do 15.02.07 16:13

JayEff hat folgendes geschrieben:

Das zip archif ist und bleibt leer. nix drin. nada. gähnende leere. (Benutztes Programm: WinZip)

Also ich kanns sogar mit dem in Windows integrierten Entpacker auspacken bzw. als Ordner anklicken... :gruebel:

JayEff - Do 15.02.07 18:00

jaenicke hat folgendes geschrieben:

Also ich kanns sogar mit dem in Windows integrierten Entpacker auspacken bzw. als Ordner anklicken... :gruebel:

Mag sein, dass WinZip 9.0 es nicht mag :motz: Muss mal bei Gelegenheit versuchen, das neuere runter zu laden.

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!