Subversion Repositories Kolibri OS

Rev

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

Rev 40 Rev 41
Line 58... Line 58...
58
;;                                                                      ;;
58
;;                                                                      ;;
59
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
59
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 60... Line 60...
60
 
60
 
61
use16
61
use16
62
                  org   0x10000
-
 
63
macro diff16 title,l2
-
 
64
 {
-
 
65
  local s,d,l1
-
 
66
  s = l2
-
 
67
  display title,': 0x'
-
 
68
  repeat 8
-
 
69
   d = 48 + s shr ((8-%) shl 2) and $0F
-
 
70
   if d > 57
-
 
71
    d = d + 65-57-1
-
 
72
   end if
-
 
73
   display d
-
 
74
  end repeat
-
 
75
  display 13,10
-
 
76
 }      
62
                  org   0x10000
Line 77... Line 63...
77
                  jmp   start_of_code
63
                  jmp   start_of_code
78
 
64
 
79
; mike.dld {
65
; mike.dld {
Line 302... Line 288...
302
        mov   al,[0x2f0000+0x9000]        ; bpp
288
        mov   al,[0x2f0000+0x9000]        ; bpp
303
        mov   [0xFBF1],al
289
        mov   [0xFBF1],al
304
        movzx eax,word [0x2f0000+0x900A]  ; X max
290
        movzx eax,word [0x2f0000+0x900A]  ; X max
305
        dec   eax
291
        dec   eax
306
        mov   [0xfe00],eax
292
        mov   [0xfe00],eax
-
 
293
        mov   [screen_workarea.right],eax
307
        movzx eax,word [0x2f0000+0x900C]  ; Y max
294
        movzx eax,word [0x2f0000+0x900C]  ; Y max
308
        dec   eax
295
        dec   eax
309
        mov   [0xfe04],eax
296
        mov   [0xfe04],eax
-
 
297
        mov   [screen_workarea.bottom],eax
310
        movzx eax,word [0x2f0000+0x9008]  ; screen mode
298
        movzx eax,word [0x2f0000+0x9008]  ; screen mode
311
        mov   [0xFE0C],eax
299
        mov   [0xFE0C],eax
312
        mov   eax,[0x2f0000+0x9014]       ; Vesa 1.2 bnk sw add
300
        mov   eax,[0x2f0000+0x9014]       ; Vesa 1.2 bnk sw add
313
        mov   [0xE030],eax
301
        mov   [0xE030],eax
314
        mov   [0xfe08],word 640*4         ; Bytes PerScanLine
302
        mov   [0xfe08],word 640*4         ; Bytes PerScanLine
Line 2268... Line 2256...
2268
;     shl  eax,2
2256
;     shl  eax,2
2269
     ret
2257
     ret
2270
no_get_all_space:  
2258
no_get_all_space:
Line 2271... Line 2259...
2271
 
2259
 
-
 
2260
     ret
-
 
2261
uglobal
-
 
2262
;// mike.dld, 2006-29-01 [
-
 
2263
screen_workarea RECT
2272
     ret
2264
;// mike.dld, 2006-29-01 ]
2273
window_minimize db 0
2265
window_minimize db 0
2274
sound_flag      db 0
2266
sound_flag      db 0
2275
last_key_press  dd 0
2267
last_key_press  dd 0
-
 
2268
keyboard_mode_sys db 0
Line 2276... Line 2269...
2276
keyboard_mode_sys db 0
2269
endg
2277
 
2270
 
2278
iglobal 
2271
iglobal
2279
version_inf: 
2272
version_inf:
Line 4949... Line 4942...
4949
 
4942
 
4950
IncludeIGlobals
4943
IncludeIGlobals
4951
endofcode:
4944
endofcode:
4952
IncludeUGlobals
4945
IncludeUGlobals
4953
uglobals_size = $ - endofcode
4946
uglobals_size = $ - endofcode