Subversion Repositories Kolibri OS

Rev

Rev 1861 | Rev 3015 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1861 Rev 2061
Line 10... Line 10...
10
include '../../../proc32.inc'
10
include '../../../proc32.inc'
11
include '../../../macros.inc'
11
include '../../../macros.inc'
12
include '../../../system/launch/trunk/mem.inc'
12
include '../../../system/launch/trunk/mem.inc'
13
include '../../../develop/libraries/libs-dev/.test/dll.inc'
13
include '../../../develop/libraries/libs-dev/.test/dll.inc'
14
include '../../../develop/libraries/box_lib/trunk/box_lib.mac'
14
include '../../../develop/libraries/box_lib/trunk/box_lib.mac'
15
include '../../../system/board/trunk/debug.inc'
15
;include '../../../system/board/trunk/debug.inc'
Line 16... Line 16...
16
 
16
 
Line 17... Line 17...
17
;;===Define_chapter============================================================================================================
17
;;===Define_chapter============================================================================================================
18
 
18
 
Line 186... Line 186...
186
      mcall     37,4,cursor_data,2                  ; load empty cursor (for "hiding" cursor while level_mode)
186
      mcall     37,4,cursor_data,2                  ; load empty cursor (for "hiding" cursor while level_mode)
187
    mov  [cursor_handle],   eax
187
    mov  [cursor_handle],   eax
Line 188... Line 188...
188
 
188
 
189
    mov  eax, WINDOW_MODE_WINDOWED
189
    mov  eax, WINDOW_MODE_WINDOWED
190
      call      Set_window_mode
190
      call      Set_window_mode
191
      mcall     0,0,0,0x51000000                    ; create empty window. Set_geometry will set all parameters
191
      mcall     0,0,0,[window_style_windowed]       ; create empty window. Set_geometry will set all parameters
192
      call      Set_geometry.by_hotkey
192
      call      Set_geometry.by_hotkey
Line 193... Line 193...
193
      mcall     71,1,window_title
193
      mcall     71,1,window_title
194
 
194
 
Line 247... Line 247...
247
 
247
 
248
    test [proc_info.wnd_state], 0x01
248
    test [proc_info.wnd_state], 0x01
Line 249... Line 249...
249
     jnz .by_hotkey
249
     jnz .by_hotkey
-
 
250
 
-
 
251
      mcall     9,proc_info,-1
-
 
252
    test [proc_info.wnd_state], 0x04		; is rolled up?
-
 
253
     jz  @f
-
 
254
    mov  eax, [proc_info.box.width]
-
 
255
    mov  [window_width], eax
-
 
256
    mov  eax, [proc_info.box.height]
-
 
257
    mov  [window_height], eax
250
 
258
     jmp .quit
251
      mcall     9,proc_info,-1
259
  @@:
252
    mov  eax, [proc_info.box.width]
260
    mov  eax, [proc_info.box.width]
253
    cmp  eax, [window_width]
261
    cmp  eax, [window_width]
254
     jne @f
262
     jne @f
Line 326... Line 334...
326
;     jmp .done
334
;     jmp .done
Line 327... Line 335...
327
 
335
 
328
  .by_hotkey:
336
  .by_hotkey:
329
      mcall     9,proc_info,-1
337
      mcall     9,proc_info,-1
-
 
338
    mov  [resized_by_hotkey],   0
-
 
339
    test [proc_info.wnd_state], 0x04		; is rolled up?
-
 
340
     jz  @f
-
 
341
    mov  eax, [proc_info.box.width]
-
 
342
    mov  [window_width], eax
-
 
343
    mov  eax, [proc_info.box.height]
-
 
344
    mov  [window_height], eax
330
    mov  [resized_by_hotkey],   0
345
     jmp .quit
331
 
346
  @@:
332
    mov  eax, [square_side_length]
347
    mov  eax, [square_side_length]
333
    inc  eax                                            ; space between squares
348
    inc  eax                                            ; space between squares
Line 334... Line 349...
334
    mov  [g_s],   eax
349
    mov  [g_s],   eax