LoadSprite() not working, please help!

[tutiplain]

Hi all,

I am trying to load and display a simple sprite, but the LoadSprite() function always returns 0. Can anyone tell me what I'm doing wrong?

Code: Select all

;init code
InitSprite()
InitKeyboard()
UseJPEGImageDecoder()
UseJPEGImageEncoder()
UseJPEG2000ImageDecoder()
UseJPEG2000ImageEncoder()
;data section, binary includes
;DataSection
;  IncludeBinary "stick_figure.JPG"
;EndDataSection


;globals
Global x
Global y

;additional setup, load sprites
OpenScreen(800,600,16,"",#PB_Screen_SmartSynchronization)

stick = LoadSprite(#PB_Any,"stick_figure.JPG")
If stick=0
  MessageRequester("Error","Unable to load sprite")
  End
EndIf

ExamineKeyboard()
;main loop
While KeyboardInkey()<>Chr(27)
  ExamineKeyboard()
  
  StartDrawing(ScreenOutput())
  
  DisplaySprite(stick,x,y)
  
  StopDrawing()
  FlipBuffers()
Wend

The file exists in the same directory as the source file. Note: specifying full file path does not work, either.

Thanks for any info.

[Demivec]

What value does InitSprite() return?

[tutiplain]

It returns 1. Let me download/install DX, and see if it solves the problem.

[Comtois]

When you will be able to load your sprite, change your loop like this

Code: Select all

;main loop
While KeyboardInkey()<>Chr(27)
  ExamineKeyboard()

  DisplaySprite(stick,x,y)

  FlipBuffers()
Wend

[tutiplain]

Installing DirectX runtime didn't solve it. I also changed my code to use a hard-coded sprite number (0), instead of #PB_Any and letting PB assign one on its own. It still doesn't work. The error reported is "The specified #Sprite is not initialized", and it happens on the call to DrawSprite().

[Comtois]

i can test on my pc if you put your sprite on line.

[tutiplain]

Hi Comtois,

I made the changes you suggested. By removing the call to ExamineKeyboard() before the While, I got "ExamineKeyboard()" must be called before using this command" when the loop begins. After adding it again, I got "The specified #Sprite is not initialized", on the call to DrawSprite(). Any more suggestions?

[Comtois]

try another image.

[Nituvious]

Try using and image format .jpeg instead of .JPG

[Comtois]

Hi Comtois,

I made the changes you suggested. By removing the call to ExamineKeyboard() before the While, I got "ExamineKeyboard()" must be called before using this command" when the loop begins. After adding it again, I got "The specified #Sprite is not initialized", on the call to DrawSprite(). Any more suggestions?

i just suggest you to remove StartDrawing(ScreenOutput()) StopDrawing()

[tutiplain]

Tried another image. Didn't work either.

Could it have something to do with the PB version I'm using. I am using 4.51, under windows xp professional, SP3. The image is a stick figure drawn with Paint. I will try to upload to my site later, but I suppose any image you create in Paint should have the same problem. I also tried using a .bmp and had the same problem.

Comtois, I did remove the StartDrawing() and StopDrawing() calls. No effect, either.

[Comtois]

this code work on my pc , download PureBasic logo to test.

Code: Select all

;init code
InitSprite()
InitKeyboard()
UsePNGImageDecoder()

;globals
Global x
Global y

;additional setup, load sprites
OpenScreen(800,600,16,"",#PB_Screen_SmartSynchronization)

stick = LoadSprite(#PB_Any,"purebasic_logo.png")
If stick=0
  MessageRequester("Error","Unable to load sprite")
  End
EndIf


;main loop
Repeat 
  FlipBuffers()
  ClearScreen(0)
  ExamineKeyboard()
  DisplaySprite(stick,x,y)
Until KeyboardPushed(#PB_Key_Escape)

[netmaestro]

I've had similar problems using a screen depth of 16. Try 32 for better success.

[tutiplain]

Hi again, everyone.

Changing to 32-bit depth solved the issue. Also, downgrading to PB 4.41 seems to have made it work using 16-bit depth. Thanks to everyone who replied, and for all the advice.