sprite3d transparency

diGGa · Post by **diGGa** » Fri Jan 13, 2006 12:28 pm

hey
why doesnt work my code?

; ###########################
;
; Projekt Titel: Mouse Avoider
; Autor: Jaap 'Thoniel.NET' Groeneveld
; Beginn: 10.1.06
; Idee: http://www.actionflash.com/mouseavoider2.php
;
; ###########################

;{/ ----- Initialisieren -----
InitSprite()
InitSprite3D()
InitMouse()
InitKeyboard()
UsePNGImageDecoder()

OpenWindow(#PB_Any, 10, 10, 640, 480, #PB_Window_ScreenCentered|#PB_Window_SystemMenu, "Mouse Avoider by Thoniel.NET /minigames")
OpenWindowedScreen(WindowID(),0,0,640,480, 1,0,0)
; OpenScreen(640,480,32,"Mouse Avoider")
;} ----- Initialisieren -----

;{/ ----- Variablen -----
; ----- Variablen Deklarieren -----
Global mx.f,my.f, Event
Global imgPlayer
; ----- Variablen Laden -----
#cfgPlayerTailLength = 4
Enumeration
        #imgPlayer
EndEnumeration

;} ----- Variablen Ende -----

;{/ ----- Strukturen -----
Structure player
        x.f
        y.f
        oldx.f
        oldy.f
EndStructure
Global spieler.player\x, spieler.player\y

Structure playertail Extends player
        remains.w
EndStructure
Dim tail.playertail(#cfgPlayerTailLength)


;} ----- Strukturen Ende -----

;{/ ----- Prozeduren -----
Procedure UpdateEngines()
        FlipBuffers()
       
        ;maus
        If GetFocus_() = WindowID()
                If WindowMouseX()>0 And WindowMouseX()<640-1 And WindowMouseY()>0 And WindowMouseY()<480-1
                        ExamineMouse()   
                        If captured = 0
                                ReleaseMouse(0)
                                captured = 1
                                MouseLocate(WindowMouseX(),WindowMouseY())
                        EndIf
                Else
                        ReleaseMouse(1)
                        captured = 0
                EndIf
        Else
                ReleaseMouse(1)
                captured = 0
        EndIf
        ; /maus     
        ExamineKeyboard()
        ClearScreen(0,0,0)   
       
        Event = WindowEvent()         
        mx=WindowMouseX()
        my=WindowMouseY() 
EndProcedure

Procedure UpdatePlayerPosition()
        spieler.player\oldx = spieler.player\x
        spieler.player\oldy = spieler.player\y
        spieler.player\x = mx
        spieler.player\y = my
EndProcedure

Procedure UpdatePlayerTail()
        Shared spieler.player\oldx, spieler.player\oldy
        For i=0 To #cfgPlayerTailLength
                tail.playertail(i)\oldx = tail.playertail(i)\x
                tail.playertail(i)\oldy = tail.playertail(i)\y
        Next
       
       
        tail.playertail(0)\x = spieler.player\oldx
        tail.playertail(0)\y = spieler.player\oldy
       
        For i = 1 To #cfgPlayerTailLength
                tail.playertail(i)\x = tail.playertail(i-1)\oldx
                tail.playertail(i)\y = tail.playertail(i-1)\oldy
        Next
EndProcedure

Procedure DrawPlayer()
        DisplaySprite3D(#imgPlayer, spieler.player\x, spieler.player\y)
EndProcedure

Procedure DrawPlayerTail()
        transparency.w = 100
        faktor.w = #cfgPlayerTailLength/100
        For i = 0 To #cfgPlayerTailLength
                transparency = transparency - faktor
                DisplaySprite3D(#imgPlayer, tail.playertail(i)\x, tail.playertail(i)\y, transparency)
        Next
EndProcedure
;} ----- Prozeduren Ende -----

;{/ ----- Start Prozeduren -----

;} ----- Start Prozeduren Ende -----

;{/ ----- Mediendaten Laden -----

LoadSprite(#imgPlayer, "player.png", #PB_Sprite_Texture)
CreateSprite3D(#imgPlayer, #imgPlayer)
TransparentSpriteColor(#imgPlayer, 255, 0, 255)

;} ----- Mediendaten Laden Ende -----

;{/ ----- Hauptschleife -----
Repeat
        UpdateEngines()

        UpdatePlayerPosition()
        UpdatePlayerTail()
       
        Start3D()
        DrawPlayerTail()
        DrawPlayer()
        Stop3D()
Until KeyboardPushed(#PB_Key_Escape) Or Event = #PB_Event_CloseWindow
End
;} ----- Hauptschleife Ende -----

the problem is that the mousesprite/mousetailsprite is not transparent. the 255,0,255 is still on my screen...
why is that?

thanx for help

netmaestro · Post by **netmaestro** » Fri Jan 13, 2006 4:22 pm

Seems fine here.

Truth_Seeker · Post by **Truth_Seeker** » Fri Jan 13, 2006 6:27 pm

Program works fine for me also. You might be seeing pink if the part you want to be not transparent on your image is anti-aliased. To get rid of all the pink you need to have non anti-aliased for the object you want displayed. When a object anti-aliased is used it smooths the edges by blending the background and the your object. Therefore the color you want transparent would not only be pink but the many variations between your object's color and the background. Which if you set all of those transparent you would end up with a non smooth edged object.

So until we have alphablending through png files (which I think is going to be in purebasic 4). We can not really do anything with anti-alias. So just remove the smoothing or anti-alias, whatever your program calls it, from the object and your program should work fine.

netmaestro · Post by **netmaestro** » Fri Jan 13, 2006 7:31 pm

There is probably something wrong with your image, as it should work. If The image is compressed, the transparent color won't be perfect. It must be perfect to work right.

diGGa · Post by **diGGa** » Fri Jan 13, 2006 7:46 pm

the problem is when im not using sprite3d ive my transparency so it cant go with the image...
i will upload my image so you can test it.

http://web484.servana.de/temp/player.png

//edit
ok you're right but i dont know why my image was fucked up... i made a new one and it worked (beside this anti alias stuff)... so thx for your help...

//edit2
now im totaly confused... i made again a new "cursor" and this time it didnt work again... a 5x5 pixel one workd a 16x16 and 32x32 didnt work.

netmaestro · Post by **netmaestro** » Fri Jan 13, 2006 8:02 pm

Little tip: For an image that size a .png file is going to be no smaller than a .bmp and the bmp is better quality and does not require the overhead of a decoder. Even when I'm already using a decoder for larger images in my projects, I leave the little ones .bmp for the quality.

diGGa · Post by **diGGa** » Fri Jan 13, 2006 8:09 pm

now im totaly confused... i made again a new "cursor" and this time it didnt work again... a 5x5 pixel one workd a 16x16 and 32x32 didnt work.

Max. · Post by **Max.** » Fri Jan 13, 2006 8:10 pm

Void.

diGGa · Post by **diGGa** » Fri Jan 13, 2006 8:14 pm

well... bmp doesnt even compress if im right

netmaestro · Post by **netmaestro** » Fri Jan 13, 2006 8:22 pm

That's right, BMP's are uncompressed. But at small image sizes their filesize rivals that of the compressed formats. It's just the bigger images where you see a huge difference.

diGGa · Post by **diGGa** » Fri Jan 13, 2006 8:25 pm

doesnt works... i dont unterstand this...

ive got this code

Code: Select all

TransparentSpriteColor(#PB_Any, 255, 0, 255) 
LoadSprite(#imgPlayer, "player.png", #PB_Sprite_Texture)
CreateSprite3D(#imgPlayer, #imgPlayer)


LoadSprite(#imgTileset,"tileset.png") : CreateAnimSprite(Tileset.AnimSprite,#imgTileset,32,32)

my tileseit is transparent but my cursor remains pink.

netmaestro · Post by **netmaestro** » Fri Jan 13, 2006 9:39 pm

You can't use #PB_Any to set TransparentSpriteColor. It must be set to a specific sprite.

diGGa · Post by **diGGa** » Fri Jan 13, 2006 10:07 pm

so then why is my tileset transparent?

Post by **Fred** » Fri Jan 13, 2006 10:07 pm

sprite3() size should be square multiple of 2 to work (almost) everywhere. So, if you need a 5x5 sprite, do a 8x8 one with the remaining pixels as transparent (it's documented in the sprite3D doc IIRC).

dagcrack · Post by **dagcrack** » Tue Mar 21, 2006 7:31 pm

BMP does handle RLE as well, Its just never been widely supported.
"Never say never".

PNG is lossless as said. The encoding is pretty much slow (on high compression settings of course), the decoding however is pretty fast (although PB implementation -is pnglib?- Is actually pretty slow).

If you want to save space (both in disk and memory).. and your sprites has limited amounts of color, best thing is to save them in 8bpp. (Just make sure, in the case that you've got a transparent color, for example: R=255,G=0,B=255, that you save this color in the indexed table, because if you let your program generate the index table by itself, it might only give you an approximate of said color, hence, you will have trouble with the transparency since the color is not 255,0,255 anymore in RGB, So, it is wise to lock this color on index 1 if you can).

8 bits per pixel means a byte per pixel- A pixel can have therefore one of 255 different colors which are stored in an indexing list (usualy at the header of the image file format).

I can't tell how PB handles different bpp ... However my advice is that you shouldnt mix this (ie: have some tiles with 24bpp and some others with 8bpp or less, just to prevent compatibility issues. But then again, I don't know how PB handles this internally).

If you're feeling adventurous, you can always design your own image format among with your own color space system, etc.

If HDD space is an issue for you, PM me for some tips regarding image compression (both lossy and lossless).

As said, theres always a tradeoff between speed, size, etc. So choose wisely!.

(Sorry for the ugly formatting of the text, I'm just in a hurry!).