Code: Alles auswählen
InitSprite()
InitKeyboard()
If OpenScreen(640,480,32,"Game")
CreateSprite(0,20,20)
EndIf
LoadSprite(#0,"held1.bmp",0)
LoadSprite(#1,"hintergrund.bmp",0)
LoadSprite(#2,"held2.bmp",0)
Repeat
ExamineKeyboard()
DisplaySprite(#1,0,0)
DisplayTransparentSprite(#0,100,200)
If KeyboardPushed(#PB_Key_A)
CopySprite(2,0)
EndIf
FlipBuffers()
Until KeyboardPushed(1)
CloseScreen()
FÜR PB3.30
titel angepasst - durchgehend großgeschrieben und ein dutzend fragezeichen ist unnötig - Kaeru fecit