PureBoard

Verfasst: **05.02.2006 22:46**

Ich war gestern auf einer Lan-Party, und bin jetzt ein bisschen geplättet.
Natürlich kann man das Problem auch am Code erkennen,
aber heute echt nicht mehr Bild

.
Morgen nach der Schule helfe ich dir. Übrigens, ich hab dir eine Mail geschrieben,
wo drinnensteht, dass du die Bilder im JPG Format komprimieren solltest,
dann verlieren sie enorm an Größe.

Verfasst: **10.02.2006 23:45**

Tut mir leid, dass es so lange gedauert hat

Code: Alles auswählen

If delay<50
  If move=1
    AniFrame+1
    If aniframe<minrange
    AniFrame=minrange 
    EndIf
    If AniFrame >maxrange
      AniFrame=minrange
    EndIf
    delay=60
  EndIf
Else
  delay-1
EndIf

(Aber jetzt bin ich wieder zu deiner Verfügung)

Verfasst: **10.02.2006 23:53**

Wenn er die Bilder teilweise transparent anzeigen will (sry, bin auch zu geplättet, um mir jetzt den ganzen Code da reinzuziehn...), sollte er möglichst kein JPG nehmen. Besser PNG... JPG ist ein verlustbehaftetes Format, will heißen, dass die Transparenz in 90% aller Fälle nicht korrekt angezeigt werden wird, weil JPG das Bild zu stark komprimiert...

Verfasst: **10.02.2006 23:55**

Ich meinte auch nur, dass er mir sie im JPG-Format schicken soll,
da´s dann etwas schneller geht.

Damit meinte ich nicht, das er auch im Spiel JPG verwenden soll.

Verfasst: **20.02.2006 23:53**

hey, macros.. keine 2 monate hier und schon anfängerstunden geben.. respekt..

Verfasst: **21.02.2006 16:24**

Ich hatte vorher schon 1.5 Jahre 3.30 Übung.
Dann kam das Internet mit 3.94 und dem Pureboard.
Also so großartig bin ich nun auch nicht.

(Ich geb sogar einen Programmierkurs an meiner Schule)

Verfasst: **27.02.2006 11:59**

So, bin mal wieder im Forum on. Danke, funktioniert jetzt alles, demnächste werden aber wohl wieder Probleme mit der Kollisionsabfrage auftauchen

.

Gruß,
Janiboy

Verfasst: **27.02.2006 12:08**

Gut, ok, direkt weiter mit der nächsten frage: wie kann man den sprite "spiegeln", also, wenn er nach links geht, dass man nicht extra en neues sprite braucht?

Danke im Vorraus,
Janiboy

Verfasst: **27.02.2006 14:26**

Ich bin wieder da,
wie ich sehe, werden die Fragen komplizierter
---> Dauert noch kurz

Verfasst: **27.02.2006 15:09**

Mit dieser Procedur:

Code: Alles auswählen

Procedure spiegle(sprite$,gespiegelt$) 

Image1Dc = CreateCompatibleDC_(0) 
Image1 = LoadImage_(0,sprite$,0,0,0,$2050) 
OldObject = SelectObject_(Image1DC,Image1) 
GetObject_(Image1,SizeOf(BITMAP),bmp.BITMAP) 

Image2Dc = CreateCompatibleDC_(0) 
Image2 = CreateCompatibleBitmap_(Image1DC,bmp\bmWidth,bmp\bmHeight) 
SelectObject_(Image2DC,Image2) 

For a=0 To bmp\bmHeight 
    For b=0 To bmp\bmWidth 
    BitBlt_(Image2DC,bmp\bmWidth-b,a,1,1,Image1DC,b,a,#SRCCOPY) 
     Next
  Next

CreateImage(999,bmp\bmWidth,bmp\bmHeight) 
Windc = StartDrawing(ImageOutput()) 
StretchBlt_(WinDC,0,0,bmp\bmWidth,bmp\bmHeight,Image2DC,0,0,bmp\bmWidth,bmp\bmHeight,#SRCCOPY) 
StopDrawing() 

ReleaseDC_(0,Image1DC) 
DeleteObject_(Image1) 
ReleaseDC_(0,Image2DC) 
DeleteObject_(Image2) 
SaveImage(999,gespiegelt$)
FreeImage(999)
EndProcedure 

spiegle("C:\sprite.bmp","C:\sprite.bmp")

kannst du das Bild im Programm spiegeln, dann musst du das Sprite neu laden, und es ist gespiegelt.
Jetzt hab ich was durch dich gelernt.

PureBoard

Anzeige des Sprites funktioniert nicht!