animationen

Übersicht BlitzBasic Allgemein

Neue Antwort erstellen

 

Dohlä

Betreff: animationen

 BeitragSo, Apr 24, 2005 10:56
Antworten mit Zitat
Benutzer-Profile anzeigen
was habe ich ihr fasch gemacht das es mir die naimation nicht läd Question

BlitzBasic: [AUSKLAPPEN] 
Graphics 1250,960
SetBuffer BackBuffer()

player=LoadImage(\"graphics\hel.bmp\")
target=LoadImage(\"graphics\Werwolf.bmp\")
bullet=LoadImage(\"graphics\Kugel.bmp\")
comic=LoadFont(\"Arial\",30,True,False,False) 
kazap_sound=LoadSound( \"sounds\kazap.wav\" )
boom=LoadSound(\"sounds\boom.wav\")
explo=LoadAnimImage(\"graphics\kaboom.bmp\",48,60,0,6)


player_x=20
player_y=110

target_x=700
target_y=0
target_direction=2



score=0
While Not KeyDown(1)
If KeyDown(200)
player_y=player_y-10
If player_y<-250Then player_y=-250
EndIf


If KeyDown(208)
player_y=player_y+10
If player_y>420Then player_y=420
EndIf 


If KeyHit(57)
PlaySound kazap_sound 
bullet_x=player_x+300
bullet_y=player_y+250
bullet_fired=True
EndIf



target_y=target_y+target_direction
If target_y<2 Or target_y>600
target_direction=-target_direction
EndIf 	
If bullet_fired
bullet_x=bullet_x+7		
If bullet_y>0
If ImagesCollide( bullet,bullet_x,bullet_y,0,target,target_x,target_y,0)
PlaySound boom 



If MilliSecs() > explo + 100 Then
explo=MilliSecs()
explo=(explo + 1) Mod 3
End If
DrawImage explo,MouseX(),MouseY(),explo


score=score+100
target_y=0


target_direction=Abs(target_direction)
target_direction=target_direction+1
	
				
			


				bullet_fired=False
	
		EndIf 	
		
		Else



score=score-20
	
	bullet_fired=False
			


EndIf 

EndIf 



 
ClsColor 0,0,0 Cls 
DrawImage player,player_x,player_y
If bullet_fired Then DrawImage bullet,bullet_x,bullet_y
DrawImage target,target_x,target_y



SetFont COMIC 
Text 500,0,score,1

Flip

diGGa

GruppenKaspar

BeitragSo, Apr 24, 2005 10:58
Antworten mit Zitat
Benutzer-Profile anzeigen
explo is ne bildvariable ne zeit variable und ne frame variable
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward

Athlon 64 3000+ / Radeon 9600 / 1024mb ddram
 

Dohlä

 BeitragSo, Apr 24, 2005 11:00
Antworten mit Zitat
Benutzer-Profile anzeigen
könntes du mir bitttte den faschen teil ausbessern Question

diGGa

GruppenKaspar

BeitragSo, Apr 24, 2005 11:02
Antworten mit Zitat
Benutzer-Profile anzeigen
nein du könntest ja ruhig mal selbst nachdenken.

im übrigen würde ich diesen teil

If player_y>420Then player_y=420

nochmal überdenken respektive deine gesamte code strukturierung/formatierung
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward

Athlon 64 3000+ / Radeon 9600 / 1024mb ddram
 

Dohlä

 BeitragSo, Apr 24, 2005 11:27
Antworten mit Zitat
Benutzer-Profile anzeigen
ist mein code deinermeinung nach halbwegs (für einen anfänger) gut gelungen Question
 

FBI-blitz

 BeitragSo, Apr 24, 2005 11:28
Antworten mit Zitat
Benutzer-Profile anzeigen
Du kannst explo ja nicht 3 mal verschieden anwenden!
Du kannst schon, aber eine Variable kann immer nur eine Sache gleichzeitig speichern!
Wenn du einer Variable dann einen neuen Wert zuweist, dann wird der alte Wert überschrieben!
Computer 1: AMD Athlon64 3500+ | nVidia GF 7900GT | 1024 MB DDR-RAM | ASUS A8N-SLI Preimium | 250 GB SATA 2 || WindowsXP | Blitz3D | Blitz+
Computer 2: AMD AthlonXP 2400+ | ATI Radeon 9500 | 512 MB DDR-RAM | MSI K7N2 | 80 GB IDE | 160 GB IDE || WindowsXP | Blitz3D | Blitz+
Computer 3: Intel Pentium MMX | onBoard-Grafik | 32 MB RAM | 1 GB IDE || Windows 98 SE | Blitz+
 

Dohlä

 BeitragSo, Apr 24, 2005 11:31
Antworten mit Zitat
Benutzer-Profile anzeigen
und warum funktionirt dies nicht Question

BlitzBasic: [AUSKLAPPEN] 
Graphics 1250,960
SetBuffer BackBuffer()

player=LoadImage(\"graphics\hel.bmp\")
target=LoadImage(\"graphics\Werwolf.bmp\")
bullet=LoadImage(\"graphics\Kugel.bmp\")
comic=LoadFont(\"Arial\",30,True,False,False) 
kazap_sound=LoadSound( \"sounds\kazap.wav\" )
boom=LoadSound(\"sounds\boom.wav\")
explo=LoadAnimImage(\"graphics\kaboom.bmp\",48,60,0,6)


player_x=20
player_y=110

target_x=700
target_y=0
target_direction=2



score=0
While Not KeyDown(1)
If KeyDown(200)
player_y=player_y-10
If player_y<-250Then player_y=-250
EndIf


If KeyDown(208)
player_y=player_y+10
If player_y>420Then player_y=420
EndIf 


If KeyHit(57)
PlaySound kazap_sound 
		bullet_x=player_x+300
		bullet_y=player_y+250
		

		bullet_fired=True
	
	EndIf



target_y=target_y+target_direction
If target_y<2 Or target_y>600
target_direction=-target_direction
EndIf 	
If bullet_fired
bullet_x=bullet_x+7		
If bullet_y>0
If ImagesCollide( bullet,bullet_x,bullet_y,0,target,target_x,target_y,0)
PlaySound boom 

LoadImage explo,explo_x,explo_y 


score=score+100
target_y=0


target_direction=Abs(target_direction)
target_direction=target_direction+1
	
				
			


				bullet_fired=False
	
		EndIf 	
		
		Else



score=score-20
	
	bullet_fired=False
			


EndIf 

EndIf 



 
ClsColor 0,0,0 Cls 
DrawImage player,player_x,player_y
If bullet_fired Then DrawImage bullet,bullet_x,bullet_y
DrawImage target,target_x,target_y



SetFont COMIC 
Text 500,0,score,1

Flip
Wend
 

FBI-blitz

 BeitragSo, Apr 24, 2005 11:36
Antworten mit Zitat
Benutzer-Profile anzeigen
Was soll dfenn das:

BlitzBasic: [AUSKLAPPEN] 
LoadImage explo,explo_x,explo_y


Du hast es doch schon geladen!
Computer 1: AMD Athlon64 3500+ | nVidia GF 7900GT | 1024 MB DDR-RAM | ASUS A8N-SLI Preimium | 250 GB SATA 2 || WindowsXP | Blitz3D | Blitz+
Computer 2: AMD AthlonXP 2400+ | ATI Radeon 9500 | 512 MB DDR-RAM | MSI K7N2 | 80 GB IDE | 160 GB IDE || WindowsXP | Blitz3D | Blitz+
Computer 3: Intel Pentium MMX | onBoard-Grafik | 32 MB RAM | 1 GB IDE || Windows 98 SE | Blitz+

diGGa

GruppenKaspar

BeitragSo, Apr 24, 2005 11:36
Antworten mit Zitat
Benutzer-Profile anzeigen
weil du keine animatiomn drinne hast. junge mach erstmal was leichteres und lern die grundlagen wie variablen... ausserdem hast du immernoch sagen wie <60then drinne und da kann nix funzen...
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward

Athlon 64 3000+ / Radeon 9600 / 1024mb ddram

Hubsi

 BeitragSo, Apr 24, 2005 11:37
Antworten mit Zitat
Benutzer-Profile anzeigen
Zitat:
Ist jetzt keinesfalls persönlich gemeint, aber denkst Du nicht das programmieren vielleicht das falsche Hobby ist? Ich mein Du zeigst so wenig Eigeninitiative bzw. Interesse an der Materie, das mich einfach das Gefühl beschleicht das Du keinen rechten Spaß an der Sache hast? Grade das sollte ein Hobby doch in erster Linie machen Wink
Ich glaub das gilt auch für Dich Very Happy
Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...
 

Dohlä

 BeitragSo, Apr 24, 2005 11:41
Antworten mit Zitat
Benutzer-Profile anzeigen
Ops natürlich BlitzBasic: [AUSKLAPPEN] 
DrawImage explo...

Neue Antwort erstellen


Übersicht BlitzBasic Allgemein

Nach Oben

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group