Code: Select all
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
and...i don't understand the screentags, have anybody a useful example code plz?