Comment fait-on pour revenir au déroulement normal de notre jeu avec mousebutton() et messagerequester() ?
Code : Tout sélectionner
#Window_main = 0
;{ init
If InitSprite() <> 0 : EndIf
If InitKeyboard() <> 0 : EndIf
If InitMouse() <> 0 : EndIf
;}
flag = #PB_Window_SystemMenu|#PB_Window_MinimizeGadget|#PB_Window_ScreenCentered|#PB_Window_MaximizeGadget|#PB_Window_SizeGadget
If OpenWindow(#Window_main,0,0,600,400, "menu jeu", Flag) <> 0
If OpenWindowedScreen(WindowID(0), 0,0,600,400) <> 0
EndIf
ShowCursor_(1)
EndIf
Repeat
Repeat
EventID = waitWindowEvent(1)
Select EventID
Case #PB_Event_CloseWindow
End
EndSelect
Until event = 0
ExamineKeyboard()
If KeyboardPushed(#PB_Key_Escape) = 1
End
EndIf
ExamineMouse()
If MouseButton(#PB_MouseButton_Left)
MessageRequester("test","test")
clic= 1
Else
clic = 0
EndIf
ClearScreen(RGB(200,200,200))
FlipBuffers()
Until Quit = 1