Die Suche hat 52 Ergebnisse ergeben.
Übersicht
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Fr, Feb 12, 2010 11:20 Antworten: 69 Aufrufe: 18551 |
|---|---|
|
So, die Formel zur Spaltenbeschriftung ist
For i = 65 To 72 Text Xpos,25,Chr$(i) Xpos = Xpos + 50 Next ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Mi, Feb 10, 2010 18:24 Antworten: 69 Aufrufe: 18551 |
OK, lass uns Hectics KI mit einbauen... aber langsam OK? es ist schon jetzt schwer am Ball zu bleiben, wenn da nicht die Familie wär.... 
also ich habe im letzten Beitrag den Code für Spi ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Mi, Feb 10, 2010 11:37 Antworten: 69 Aufrufe: 18551 |
|
@hectic - die KI von Othello ist doch etwas anders, aber mit dem anderen Wissen könntest du dein Spiel vielleicht fortsetzen.
1. Das Feld muß 8x8 groß sein 2. Schwarz fängt immer an, daher h ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Di, Feb 09, 2010 17:31 Antworten: 69 Aufrufe: 18551 |
|
Na gut.... "Es gibt nirgends eine Regel, die verbietet, dass in einem Thread nur zwei Leute aktiv mitmachen dürften."
Wir haben keine Regel, es dürfen Alle mitmachen. Also dann eben ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Di, Feb 09, 2010 16:53 Antworten: 69 Aufrufe: 18551 |
| OK, also ich werde dann den Code im ersten Posting eben immer ändern, er ist jetzt auf dem letzten Stand, die Funktion FindeAlleLeeren() ist noch nicht implementiert, bin mir aber fast sicher, daß d ... | |
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Di, Feb 09, 2010 14:57 Antworten: 69 Aufrufe: 18551 |
|
Hmm, kann ich ja nicht bestimmen, aber sollte der Woklog nicht gerade dazu dienen, die Flut von Postings einzugrenzen?
Dem wäre damit gedient, wenn Midimaster und ich an einem Code herumbasteln kö ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Di, Feb 09, 2010 14:42 Antworten: 69 Aufrufe: 18551 |
| OK, Worklog wurde erstellt, 2 Mitglieder, ich habe jetzt den Code geändert und er läuft, aus Versehen habe ich 2 Worklogs erstellt, den ersten würde ich gerne löschen "Reversi-KI", und d ... | |
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Di, Feb 09, 2010 13:33 Antworten: 69 Aufrufe: 18551 |
|
Der rote Kreis läuft mit, aber es dreht sich Nix um, auch wenn ich die Werte unter Methode ändere:
Graphics 640, 480, 16, 2 Dim Feld% (64,9,9) Dim Methode%(2) Methode(1 ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Di, Feb 09, 2010 11:13 Antworten: 69 Aufrufe: 18551 |
|
OK, das mit dem Worklog ist gut, bevor es jedoch weitergeht muß ich mein Spiel wieder zum Laufen bringen, das scheint im Moment irgendwo zu hängen. die Hauptschleife lautet nun:
Repeat SpielerS ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Mo, Feb 08, 2010 18:19 Antworten: 69 Aufrufe: 18551 |
|
Zum Letzteren, Zusammenfassen von Spieler und ComputerSetzen. Leider bleibt das Spiel hängen
Repeat Setzen() MaleSpielFeld() Until KeyHit(1) End F ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Mo, Feb 08, 2010 13:38 Antworten: 69 Aufrufe: 18551 |
|
So, Wochenende vorbei, habe wieder etwas mehr Zeit.
Kurz zur letzten Antwort, ich habe nur gesehen, daß der rote Kreis bei den meisten Zügen von links nach rechts (und von oben nach unten) durchl ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Fr, Feb 05, 2010 23:29 Antworten: 69 Aufrufe: 18551 |
|
Ich habe es hier eingebaut
Function ComputerSetzt() SeedRnd MilliSecs () MausX=Rnd(1,8) MausY=Rnd(1,8) If Feld(Ebene,MausX,MausY)=0 ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Fr, Feb 05, 2010 22:38 Antworten: 69 Aufrufe: 18551 |
|
Ok, habe ich gemacht, ich sehe die Kreise trotzdem und habe delay auf 125 gesetzt, damits etwas schhneller geht, interessant, daß die Reihenfolge der Abfrage immer gleich ist.
Müßte man nicht hi ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Fr, Feb 05, 2010 22:16 Antworten: 69 Aufrufe: 18551 |
| hab meine Antwort editiert, und sobald die RND Function geändert wurde, dürfte das Spiel sehr schnell werden, das wird wichtig bei der Vorausberechnung, die Möglichkeiten potenzieren sich sehr schn ... | |
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Fr, Feb 05, 2010 21:50 Antworten: 69 Aufrufe: 18551 |
| Sieht ja schon klasse aus, ich habe nur gleich am Anfang das Problem, daß die schwarzen Steine gar nicht gemalt werden, ich habe Alles schön getrennt, Hauptschleife von den Funktionen (die Reihenfog ... | |
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Fr, Feb 05, 2010 15:51 Antworten: 69 Aufrufe: 18551 |
|
OK
Function AllesDrehen%(X%,Y%,Ich%) Local Ergebnis%, Summe%, i%, j% If Feld(Ebene,X,Y)=0 Then For i=-1 To 1 For j=-1 To 1 DreheEineRichtung (X%, ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Fr, Feb 05, 2010 11:53 Antworten: 69 Aufrufe: 18551 |
|
Function DreheEineRichtung (X%, Y%, RichtungX%, RichtungY%, Ich%)
konnte deine Korrekturen sehr gut nachvollziehen, genial, was man alles weglassen kann. Bei meinem Ansatz damals gab es das Prob ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Fr, Feb 05, 2010 0:20 Antworten: 69 Aufrufe: 18551 |
|
Ich hoffe der Code läuft in BlitzPlus, ein anderes Programm habe ich nicht, außerdem vermisse ich deinen Nebensatz, "....sondern mit den Eigenheiten von BlitzMax, oder Blitz3D".
Othello ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Do, Feb 04, 2010 23:51 Antworten: 69 Aufrufe: 18551 |
|
OK, ich wills mal versuchen, da die Felder, die umgedreht werden müssen ja durch die Function ScanneEineRichtung schon feststehen müsste man jedes Feld, was <> Ich ist, zu Ich machen.
0 sch ... |
|
neoleinThema: Beginners-Corner - Reversi KIBetreff: Reversi KI |
Do, Feb 04, 2010 10:40 Antworten: 69 Aufrufe: 18551 |
| was ist FeldReset? macht reset Alles auf 0? Die Repeat Schleife im Header: Ist die für die ersten 4 Steine? Da sie ja 64 Ebenen groß ist, oder die Schleife für das setzen aller Steine für das ganz ... | |
Powered by phpBB © 2001 - 2006, phpBB Group