Berücksichtigung von Topographie, Position, Eigenschaften (zb. Wasser, Gras, ...)
Jetzt zurück zu dem Gemäuer

Bitte eine Demo, bitte

Code: Alles auswählen
Procedure E_Open_Display_WIN_MAX(display_x,display_y,display_w,display_h,display_name.s)
Define ok.b=0
If e_fullscreen.b=#False
ProcedureReturn #False ;we set to fullscreen
EndIf
Select e_vsync
Case #True
v_display_id=OpenWindow(#ENGINE_WINDOW_ID,display_x,display_y,e_engine_internal_screen_w/DesktopResolutionX(),e_engine_internal_screen_h/DesktopResolutionY(),"Thorins Quest"+e_copy_right_text.s,#PB_Window_BorderLess)
v_display_id=WindowID(#ENGINE_WINDOW_ID)
v_screen_id=OpenWindowedScreen(v_display_id,display_x,display_y,e_engine_internal_screen_w,e_engine_internal_screen_h,#True,0,0,#PB_Screen_WaitSynchronization)
StickyWindow(#ENGINE_WINDOW_ID,#False)
ShowCursor_(#False) ;show mouse pointer if game is runing in window
Default
v_display_id=OpenWindow(#ENGINE_WINDOW_ID,display_x,display_y,e_engine_internal_screen_w/DesktopResolutionX(),e_engine_internal_screen_h/DesktopResolutionY(),"Thorins Quest"+e_copy_right_text.s,#PB_Window_BorderLess)
v_display_id=WindowID(#ENGINE_WINDOW_ID)
v_screen_id=OpenWindowedScreen(v_display_id,display_x,display_y,e_engine_internal_screen_w,e_engine_internal_screen_h,#True,0,0,#PB_Screen_NoSynchronization)
StickyWindow(#ENGINE_WINDOW_ID,#False)
ShowCursor_(#False) ;show mouse pointer if game is runing in window
EndSelect
ResizeWindow(#ENGINE_WINDOW_ID,0,0,DesktopWidth(0)/DesktopResolutionX(),DesktopHeight(0)/DesktopResolutionY())
EndProcedure