PureBasic Forums - English

Posted: **Fri Jan 06, 2006 3:01 am**

screen problem


InitPicture(0)
InitBitMap(0)
InitScreen(0)
InitPalette(0)

OpenScreen(0,640,256,8,0)

  res.l = LoadPicture(0,"backs/c3.iff")

  If res>0

   AllocateBitMap (0, 640, 256,8)
   PictureToBitMap(0, BitMapID())

   GetpicturePalette(0,pictureID())
   DisplayPalette(0, ScreenID())   ;

      DrawingOutput(screenRastPort())
      CopyBitMap(BitMapID(),0,0,0,0,640,256)

      MouseWait()

      FadeOut(0, ScreenID(), 5, 255)
      EndIf
End

my prog opens a screen and display the image, but only half of the picture. how can i switch the screenmode to hires?

and...i don't understand the screentags, have anybody a useful example code plz?

Posted: **Sun Jan 08, 2006 5:28 am**

Wow, someone's actually writing an Amiga program? Nice!

Haven't tried it yet (the Amiga version), but I'm suprised to see some Amiga-only commands in there...

Russell

Posted: **Tue Jan 10, 2006 4:21 am**

Hi xperience2003,

I had a quick try of your code and it seemed to work fine on my A4000, I even tried it with WinUAE and it worked but lock the computer on exit.

The only things I can think of is the size of picture you are trying to display or that the picture is corupted may have some thing to do with it.