il faut installer cette lib
http://www.purearea.net/pb/download/use ... riteEx.zip
Code : Tout sélectionner
; -- Substitu au SetRefreshRate()----
; -- Marcus.Zone --- Cederavic 27.02.2004
InitSprite()
OpenWindow(1,0,0,0,0,#PB_Window_ScreenCentered,"")
MonitorFreq=GetMonitorFreq()
CloseWindow(1)
ss.DEVMODE
ss\dmSize = SizeOf(DEVMODE)
ss\dmDisplayFrequency = 60 ; la frequence choisie
ss\DmFields = $400000
ChangeDisplaySettings_(ss, #CDS_UPDATEREGISTRY)
; --------------------Code du jeu sans SetRefreshRate() -----------------------------
; -------------------ne pas reutiliser InitSprite() déja lancé ----------------------
; -Pour restorer la sync par default il faut ajouter cela avant tout les end du code-
ss.DEVMODE
ss\dmSize = SizeOf(DEVMODE)
ss\dmDisplayFrequency = MonitorFreq
ss\DmFields = $400000
ChangeDisplaySettings_(ss, #CDS_UPDATEREGISTRY)
End
