Animation funktioniert nicht ?!?

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

 

YoAsakura

Betreff: Animation funktioniert nicht ?!?

BeitragSo, Jan 30, 2005 20:22
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi
Ich dachte eigentlich ich hätte mein Buch- und Tutorial-Wissen gut in das Programm eingebaut, doch als ich es startete musste ich feststellen, dass die Figur verschwindet anstatt animiert zu werden und ich habe einiges versucht, kann mir aber trotzdem nicht erklären wieso es nicht funzt.

Hier die Codeausschnitte zum Problem:
Code: [AUSKLAPPEN]

Dim anim(4,0)
anim(0,0) = 0   
anim(1,0) = 80   
anim(2,0) = 160   
anim(3,0) = 240
anim(4,0) = 320
-----------------------------------------------------------
  If KeyDown(203) = 1 And pfeile > 0 Then
  bereit = 1             ; Spannen des Bogen
  star = MilliSecs()
  If bereit = 1 Then
   If star + 140 < MilliSecs() Then                 ; Animation
    ani = ani + 1
    star = MilliSecs()
    If ani = 5 Then
     bereit = 0
     ani = 0
     kein = 1
    EndIf
   EndIf
   DrawImageRect roan,0,y,anim(ani,0),0,80,140
   EndIf
  EndIf
  If bereit = 0 Then DrawImageRect roan,0,y,0,0,80,140

Was nun Question

[moderiert=wunderkind] Code-Tag gesetzt. [/moderiert]

Hummelpups

BeitragSo, Jan 30, 2005 21:22
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich würde loadanimimage benutzen.

IMurDOOM
blucode - webdesign - Ressource - NetzwerkSim
BlitzBasic 2D - BlitzMax - MaxGUI - Monkey - BlitzPlus
 

YoAsakura

Betreff: Problem gelöst

BeitragSo, Jan 30, 2005 23:35
Antworten mit Zitat
Benutzer-Profile anzeigen
Ein Endif war grottenfalsch gesetzt.
(aber mit 2-Phasen Animation, wie ich es am Anfang hatte sah es wesentlich besser aus --> alles für´n A**** Crying or Very sad ; Schade; Aber immerhin gelöst.)

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group