KI für Ping Pong

Übersicht

BlitzBasic

Allgemein

	Roggi Betreff: KI für Ping Pong	Sa, Nov 19, 2005 17:24 Antworten mit Zitat
Kann mir jemand für ein Ping Pong Klon machen. Denn davon habe ich keine Ahnung MFG TOM

Roggi

Betreff: KI für Ping Pong

Sa, Nov 19, 2005 17:24
Antworten mit Zitat

Kann mir jemand für ein Ping Pong Klon machen. Denn davon habe ich keine Ahnung Crying or Very sad

MFG TOM

	Smokie	Sa, Nov 19, 2005 17:36 Antworten mit Zitat
Also da kann man von selbst draufkommen Einfache möglichkeit Ballx mit computerschlaegerx vergleichen und den computerschlaegerx-wert entsprechend verändern Schwere Möglichkeit: Ballaufprallposition ausrechnen und den schlaeger entsprechend bewgen lassen, dabei kann man auch mehrere Schwierigskeitsgrade einbauen Gruß Smokie
M-Soft Studios Mit selbst gemachtem Forum!!! Unbequem lebt's sich schwer. Musik macht erst Spaß, wenn man sie mit 2,8 facher Geschwindigkeit hört Zuletzt bearbeitet von Smokie am Fr Jan 01, 1888 51:58 PM, insgesamt 1000-mal bearbeitet

Smokie

Sa, Nov 19, 2005 17:36
Antworten mit Zitat

Also da kann man von selbst draufkommen Rolling Eyes

Einfache möglichkeit

Ballx mit computerschlaegerx vergleichen und den computerschlaegerx-wert entsprechend verändern

Schwere Möglichkeit:

Ballaufprallposition ausrechnen und den schlaeger entsprechend bewgen lassen, dabei kann man auch mehrere Schwierigskeitsgrade einbauen

Gruß
Smokie

M-Soft Studios Mit selbst gemachtem Forum!!!
Unbequem lebt's sich schwer.
Musik macht erst Spaß, wenn man sie mit 2,8 facher Geschwindigkeit hört
Zuletzt bearbeitet von Smokie am Fr Jan 01, 1888 51:58 PM, insgesamt 1000-mal bearbeitet

	Plasma(alt) Betreff: also	Sa, Nov 19, 2005 18:28 Antworten mit Zitat
BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] Graphics 320,200,32,0 Global nochlauter = 100+Rand(MilliSecs()) Global knall = LoadSound(\"superknallnichtgehört.wav\") While 0ahnung< 1ahnung ping = pong+1 If ping >pong Then peng=1 lautknall = dollelaut+nochlauter If peng Then kopfschuss() Wend Function kopfschuss() nixblick =PlaySound knall ChannelVolume nixblick ,lautknall PlaySound EndFunction
DIV is dead !

Plasma(alt)

Betreff: also

Sa, Nov 19, 2005 18:28
Antworten mit Zitat

BlitzBasic: [AUSKLAPPEN]


Graphics 320,200,32,0
Global nochlauter = 100+Rand(MilliSecs())
Global knall = LoadSound(\"superknallnichtgehört.wav\")

While 0ahnung< 1ahnung

ping = pong+1
If ping >pong Then
 peng=1
lautknall = dollelaut+nochlauter
If peng Then  kopfschuss()
Wend

Function kopfschuss()

nixblick =PlaySound knall

ChannelVolume nixblick ,lautknall


PlaySound 
EndFunction

DIV is dead !