forked from KolibriOS/kolibrios
gfx-revertion bugs liced
git-svn-id: svn://kolibrios.org@1929 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Artem Jerdev (art_zh)
parent
7413c9cd9d
commit
883ade9e49
@ -206,8 +206,8 @@ FDD_BUFF equ (OS_BASE+0x000D000)
|
||||
;unused ? only one reference
|
||||
;ENABLE_TASKSWITCH equ (OS_BASE+0x000E000)
|
||||
|
||||
;PUTPIXEL equ (OS_BASE+0x000E020)
|
||||
;GETPIXEL equ (OS_BASE+0x000E024)
|
||||
PUTPIXEL equ (OS_BASE+0x000E020)
|
||||
GETPIXEL equ (OS_BASE+0x000E024)
|
||||
|
||||
;unused ? only one reference
|
||||
; BANK_SWITCH equ (OS_BASE+0x000E030) ; VESA 1.2 - not used
|
||||
|
||||
@ -333,8 +333,8 @@ img_screen_x rd 1
|
||||
img_screen_y rd 1
|
||||
|
||||
align 64
|
||||
_WinMapWidth rd 1
|
||||
_WinMapHeight rd 1
|
||||
;_WinMapWidth rd 1
|
||||
;_WinMapHeight rd 1
|
||||
_WinMapAddress rd 1
|
||||
_WinMapSize rd 1
|
||||
|
||||
@ -413,9 +413,9 @@ MouseTickCounter rd 1
|
||||
|
||||
;* end code - Mario79
|
||||
|
||||
;img_background rd 1
|
||||
;mem_BACKGROUND rd 1
|
||||
;static_background_data rd 1
|
||||
img_background rd 1
|
||||
mem_BACKGROUND rd 1
|
||||
static_background_data rd 1
|
||||
|
||||
cache_ide0:
|
||||
cache_ide0_pointer rd 1
|
||||
|
||||
@ -71,14 +71,14 @@ dtext: ; Text String Output (rw by Johnny_B[john@kolibrios.org])
|
||||
shr dl, 1
|
||||
jz .pixloop1end
|
||||
jnc .nopix
|
||||
call _putpixel
|
||||
call [putpixel]
|
||||
jmp .pixloop1cont
|
||||
.nopix:
|
||||
test ecx, 0x40000000
|
||||
jz .pixloop1cont
|
||||
push ecx
|
||||
mov ecx, [esp+4+20h+20h] ; original eax?
|
||||
call _putpixel
|
||||
call [putpixel]
|
||||
pop ecx
|
||||
.pixloop1cont:
|
||||
inc eax
|
||||
@ -103,14 +103,14 @@ dtext: ; Text String Output (rw by Johnny_B[john@kolibrios.org])
|
||||
.pixloop2:
|
||||
shr dl, 1
|
||||
jnc .nopix2
|
||||
call _putpixel
|
||||
call [putpixel]
|
||||
jmp .pixloop2cont
|
||||
.nopix2:
|
||||
test ecx, 0x40000000
|
||||
jz .pixloop2cont
|
||||
push ecx
|
||||
mov ecx, [esp+12+20h+20h]
|
||||
call _putpixel
|
||||
call [putpixel]
|
||||
pop ecx
|
||||
.pixloop2cont:
|
||||
inc eax
|
||||
|
||||
@ -378,11 +378,9 @@ mouse._.move_handler: ;////////////////////////////////////////////////////////
|
||||
|
||||
mov eax, [mouse.state.pos.x]
|
||||
sub eax, [mouse.active_sys_window.delta.x]
|
||||
and al, 0xFC ; <<<<<<<<<<<<<<<<<<<
|
||||
mov [mouse.active_sys_window.new_box.left], eax
|
||||
mov eax, [mouse.state.pos.y]
|
||||
sub eax, [mouse.active_sys_window.delta.y]
|
||||
and al, 0xFE ; <<<<<<<<<<<<<<<<<<<
|
||||
mov [mouse.active_sys_window.new_box.top], eax
|
||||
|
||||
mov eax, [mouse.active_sys_window.new_box.left]
|
||||
@ -413,7 +411,6 @@ mouse._.move_handler: ;////////////////////////////////////////////////////////
|
||||
|
||||
mov eax, [mouse.state.pos.x]
|
||||
sub eax, [mouse.active_sys_window.delta.x]
|
||||
and al, 0xFC ; <<<<<<<<<<<<<<<<<<<
|
||||
mov [mouse.active_sys_window.new_box.left], eax
|
||||
sub eax, [mouse.active_sys_window.old_box.left]
|
||||
sub [mouse.active_sys_window.new_box.width], eax
|
||||
@ -437,7 +434,6 @@ mouse._.move_handler: ;////////////////////////////////////////////////////////
|
||||
mov eax, [mouse.state.pos.y]
|
||||
add eax, [mouse.active_sys_window.delta.y]
|
||||
sub eax, [mouse.active_sys_window.old_box.top]
|
||||
and al, 0xFC ; <<<<<<<<<<<<<<<<<<<
|
||||
mov [mouse.active_sys_window.new_box.height], eax
|
||||
|
||||
push eax
|
||||
@ -470,7 +466,6 @@ mouse._.move_handler: ;////////////////////////////////////////////////////////
|
||||
mov eax, [mouse.state.pos.x]
|
||||
add eax, [mouse.active_sys_window.delta.x]
|
||||
sub eax, [mouse.active_sys_window.old_box.left]
|
||||
and al, 0xFC ; <<<<<<<<<<<<<<<<<<<
|
||||
mov [mouse.active_sys_window.new_box.width], eax
|
||||
|
||||
mov eax, [mouse.active_sys_window.new_box.width]
|
||||
@ -518,13 +513,11 @@ mouse._.find_sys_window_under_cursor: ;////////////////////////////////////////
|
||||
;< esi = process slot
|
||||
;< edi = pointer to WDATA struct
|
||||
;------------------------------------------------------------------------------
|
||||
mov esi, [mouse.state.pos.y]
|
||||
mov edi, [mouse.state.pos.x]
|
||||
shr esi, 1
|
||||
shr edi, 2
|
||||
imul esi, [_WinMapWidth]
|
||||
add edi, [_WinMapAddress]
|
||||
add esi, edi
|
||||
mov esi, [Screen_Max_X]
|
||||
inc esi
|
||||
imul esi, [mouse.state.pos.y]
|
||||
add esi, [_WinMapAddress]
|
||||
add esi, [mouse.state.pos.x]
|
||||
movzx esi, byte[esi]
|
||||
mov edi, esi
|
||||
shl edi, 5
|
||||
|
||||
@ -12,7 +12,7 @@ $Revision$
|
||||
;///// public functions ///////////////////////////////////////////////////////
|
||||
;==============================================================================
|
||||
|
||||
window.BORDER_SIZE = 4
|
||||
window.BORDER_SIZE = 5
|
||||
|
||||
macro FuncTable name, table_name, [label]
|
||||
{
|
||||
@ -328,19 +328,15 @@ syscall_move_window: ;///// system function 67 ////////////////////////////////
|
||||
cmp ebx, -1
|
||||
jne @f
|
||||
mov ebx, [edi + WDATA.box.left]
|
||||
and bl, 0xFC
|
||||
@@: cmp ecx, -1
|
||||
jne @f
|
||||
mov ecx, [edi + WDATA.box.top]
|
||||
and cl, 0xFE
|
||||
@@: cmp edx, -1
|
||||
jne @f
|
||||
mov edx, [edi + WDATA.box.width]
|
||||
; and dl, 0xFC
|
||||
@@: cmp esi, -1
|
||||
jne @f
|
||||
mov esi, [edi + WDATA.box.height]
|
||||
; and esi, 0xFFFFFFFE
|
||||
|
||||
@@: push esi edx ecx ebx
|
||||
mov eax, esp
|
||||
@ -515,10 +511,8 @@ repos_windows: ;///////////////////////////////////////////////////////////////
|
||||
mov eax, [edi + WDATA.box.width]
|
||||
sub eax, ebx
|
||||
jle @f
|
||||
; and bl, 0xFC ; <<<<<<<
|
||||
mov [edi + WDATA.box.width], ebx
|
||||
@@: sub ebx, [edi + WDATA.box.width]
|
||||
; and bl, 0xFC ; <<<<<<<
|
||||
mov [edi + WDATA.box.left], ebx
|
||||
|
||||
.fix_vertical:
|
||||
@ -530,10 +524,8 @@ repos_windows: ;///////////////////////////////////////////////////////////////
|
||||
mov eax, [edi + WDATA.box.height]
|
||||
sub eax, ebx
|
||||
jle @f
|
||||
; and bl, 0xFE ; <<<<<<<
|
||||
mov [edi + WDATA.box.height], ebx
|
||||
@@: sub ebx, [edi + WDATA.box.height]
|
||||
; and bl, 0xFE ; <<<<<<<
|
||||
mov [edi + WDATA.box.top], ebx
|
||||
jmp .fix_client_box
|
||||
|
||||
@ -556,7 +548,7 @@ repos_windows: ;///////////////////////////////////////////////////////////////
|
||||
|
||||
add edi, WDATA.sizeof
|
||||
dec ecx
|
||||
jne .next_window ; <<<<<<<<<<<
|
||||
jne .next_window
|
||||
|
||||
.exit:
|
||||
ret
|
||||
@ -565,23 +557,8 @@ align 4
|
||||
;------------------------------------------------------------------------------
|
||||
sys_window_mouse: ;////////////////////////////////////////////////////////////
|
||||
;------------------------------------------------------------------------------
|
||||
;? <description>
|
||||
;? <description> (not used)
|
||||
;------------------------------------------------------------------------------
|
||||
; NOTE: commented out since doesn't provide necessary functionality
|
||||
; anyway, to be reworked
|
||||
; push eax
|
||||
;
|
||||
; mov eax, [timer_ticks]
|
||||
; cmp [new_window_starting], eax
|
||||
; jb .exit
|
||||
;
|
||||
; mov byte[MOUSE_BACKGROUND], 0
|
||||
; mov byte[DONT_DRAW_MOUSE], 0
|
||||
;
|
||||
; mov [new_window_starting], eax
|
||||
;
|
||||
; .exit:
|
||||
; pop eax
|
||||
ret
|
||||
|
||||
align 4
|
||||
@ -666,7 +643,6 @@ drawwindow_I_caption: ;////////////////////////////////////////////////////////
|
||||
add ebx, edx
|
||||
mov eax, [esi + WDATA.box.left]
|
||||
inc eax
|
||||
|
||||
shl eax, 16
|
||||
add eax, [esi + WDATA.box.left]
|
||||
add eax, [esi + WDATA.box.width]
|
||||
@ -1209,11 +1185,6 @@ iglobal
|
||||
5, ? ;type 4 {set by skin}
|
||||
endg
|
||||
|
||||
;uglobal
|
||||
; NOTE: commented out since doesn't provide necessary functionality anyway,
|
||||
; to be reworked
|
||||
; new_window_starting dd ?
|
||||
;endg
|
||||
|
||||
align 4
|
||||
;------------------------------------------------------------------------------
|
||||
@ -1444,21 +1415,13 @@ window._.sys_set_window: ;/////////////////////////////////////////////////////
|
||||
jnz .set_client_box
|
||||
or [edi + WDATA.fl_wdrawn], 1
|
||||
|
||||
; NOTE: commented out since doesn't provide necessary functionality
|
||||
; anyway, to be reworked
|
||||
; mov eax, [timer_ticks] ; [0xfdf0]
|
||||
; add eax, 100
|
||||
; mov [new_window_starting], eax
|
||||
|
||||
; no it wasn't, performing initial window definition
|
||||
; performing initial window definition
|
||||
movzx eax, bx
|
||||
mov [edi + WDATA.box.width], eax
|
||||
movzx eax, cx
|
||||
mov [edi + WDATA.box.height], eax
|
||||
sar ebx, 16
|
||||
; and bl, 0xFC ; <<<<<<<<
|
||||
sar ecx, 16
|
||||
; and cl, 0xFE ; <<<<<<<<
|
||||
mov [edi + WDATA.box.left], ebx
|
||||
mov [edi + WDATA.box.top], ecx
|
||||
|
||||
@ -1642,15 +1605,6 @@ window._.set_screen: ;/////////////////////////////////////////////////////////
|
||||
;> edx = bottom
|
||||
;> esi = process number
|
||||
;------------------------------------------------------------------------------
|
||||
virtual at esp
|
||||
ff_x dd ?
|
||||
ff_y dd ?
|
||||
ff_width dd ?
|
||||
ff_xsz dd ?
|
||||
ff_ysz dd ?
|
||||
ff_map dd ?
|
||||
ff_scale dd ?
|
||||
end virtual
|
||||
|
||||
pushad
|
||||
|
||||
@ -1675,144 +1629,40 @@ end virtual
|
||||
sub edx, ebx
|
||||
inc ecx
|
||||
inc edx
|
||||
shr ecx, 2 ; 1 tile = 4 pix
|
||||
shr edx, 1 ; 1 tile = 2 lines
|
||||
|
||||
; get WinMap start
|
||||
push esi
|
||||
mov edi, [_WinMapWidth]
|
||||
mov edi, [Screen_Max_X]
|
||||
mov esi, edi
|
||||
shr ebx, 1
|
||||
imul edi, ebx
|
||||
shr eax, 2
|
||||
add edi, eax
|
||||
add edi, [_WinMapAddress]
|
||||
pop eax ; al = process#
|
||||
; mov ah, al
|
||||
; push ax
|
||||
; shl eax, 16
|
||||
; pop ax ; eax = 4 dup PROCESS_NUM
|
||||
mov ah, al
|
||||
push ax
|
||||
shl eax, 16
|
||||
pop ax ; eax = 4 dup PROCESS_NUM
|
||||
|
||||
sub esi, ecx ; map line increment (bytes)
|
||||
mov ebx, ecx ; map line width
|
||||
.next_line:
|
||||
; shr ecx, 2 ; 1dword = 4 tiles
|
||||
; rep stosd ; filling the screen map
|
||||
; mov ecx, ebx
|
||||
; and ecx, 3 ; 0 to 3 tiles remaining
|
||||
push ecx
|
||||
shr ecx, 2
|
||||
rep stosd ; filling the screen map
|
||||
mov ecx,[esp]
|
||||
and ecx, 3
|
||||
rep stosb
|
||||
mov ecx, ebx
|
||||
pop ecx
|
||||
add edi, esi
|
||||
sub edi, ecx
|
||||
dec edx
|
||||
jnz .next_line
|
||||
jmp .exit
|
||||
; jmp .exit
|
||||
|
||||
.shaped_window:
|
||||
; for (y=0; y <= y_size; y++)
|
||||
; for (x=0; x <= x_size; x++)
|
||||
; if (shape[coord(x,y,scale)]==1)
|
||||
; set_pixel(x, y, process_number);
|
||||
|
||||
sub ecx, eax
|
||||
sub edx, ebx
|
||||
inc ecx
|
||||
inc edx
|
||||
|
||||
push [edi + APPDATA.wnd_shape_scale] ; push scale first -> for loop
|
||||
|
||||
push ebx
|
||||
push eax
|
||||
mov ebp, eax
|
||||
shr ebp, 2
|
||||
add ebp, [_WinMapAddress]
|
||||
mov eax, [_WinMapWidth]
|
||||
shr ebx, 1
|
||||
imul eax, ebx
|
||||
add ebp, eax ; ebp = map origin
|
||||
|
||||
mov edi, [edi + APPDATA.wnd_shape]
|
||||
pop eax
|
||||
pop ebx
|
||||
|
||||
push ebp ; for loop - screen map origin
|
||||
|
||||
; eax = x_start
|
||||
; ebx = y_start
|
||||
; ecx = x_size
|
||||
; edx = y_size
|
||||
; esi = process_number
|
||||
; edi = &shape
|
||||
; ebp = [ff_map]
|
||||
; [scale]
|
||||
|
||||
push edx ecx ; for loop - x,y size
|
||||
mov ecx, esi
|
||||
shl ecx, 5
|
||||
mov edx, [window_data + ecx + WDATA.box.top]
|
||||
push [window_data + ecx + WDATA.box.width] ; for loop - width
|
||||
mov ecx, [window_data + ecx + WDATA.box.left]
|
||||
sub ebx, edx
|
||||
sub eax, ecx
|
||||
push ebx eax ; for loop - x,y
|
||||
|
||||
add [ff_xsz], eax
|
||||
add [ff_ysz], ebx
|
||||
|
||||
mov ebx, [ff_y]
|
||||
|
||||
.ff_new_y:
|
||||
mov edx, [ff_x]
|
||||
|
||||
.ff_new_x:
|
||||
; -- body --
|
||||
mov ecx, [ff_scale]
|
||||
mov eax, [ff_width]
|
||||
inc eax
|
||||
shr eax, cl
|
||||
push ebx edx
|
||||
shr ebx, cl
|
||||
shr edx, cl
|
||||
imul eax, ebx
|
||||
add eax, edx
|
||||
pop edx ebx
|
||||
add eax, edi
|
||||
call .read_byte ; al= shaped window pix-mask at a given point
|
||||
test al,al
|
||||
jz @f
|
||||
mov eax, esi
|
||||
mov [ebp], al ; a tile belongs to the window if the 1st pixel's mask = 1
|
||||
; -- end body --
|
||||
@@:
|
||||
add edx, 4
|
||||
inc ebp
|
||||
cmp edx, [ff_xsz]
|
||||
jb .ff_new_x
|
||||
|
||||
inc ebx
|
||||
inc ebx
|
||||
cmp ebx, [ff_ysz]
|
||||
jnb @f
|
||||
mov ebp, [ff_map]
|
||||
add ebp, [_WinMapWidth] ; even line: jump to next map row
|
||||
mov [ff_map], ebp
|
||||
jmp .ff_new_y
|
||||
@@:
|
||||
add esp, 7*4
|
||||
; (not supported any more)
|
||||
.exit:
|
||||
popad
|
||||
ret
|
||||
|
||||
.read_byte:
|
||||
; eax - buffer address
|
||||
; esi - slot#
|
||||
push eax ecx edx esi
|
||||
xchg eax, esi
|
||||
lea ecx, [esp + 12] ; buffer addr = stacked [eax] to return
|
||||
mov edx, 1 ; buffer size
|
||||
call read_process_memory ; (core/taskman.inc) returns #bytes read
|
||||
pop esi edx ecx eax ; eax = PID
|
||||
ret
|
||||
|
||||
align 4
|
||||
;------------------------------------------------------------------------------
|
||||
window._.window_activate: ;////////////////////////////////////////////////////
|
||||
|
||||
@ -8,7 +8,6 @@
|
||||
$Revision$
|
||||
|
||||
|
||||
|
||||
; check mouse
|
||||
;
|
||||
;
|
||||
@ -33,8 +32,6 @@ mouse_speed_factor: dd 3
|
||||
mouse_timer_ticks dd 0
|
||||
endg
|
||||
|
||||
;include 'm_com.inc'
|
||||
|
||||
|
||||
draw_mouse_under:
|
||||
; return old picture
|
||||
@ -97,12 +94,9 @@ save_draw_mouse:
|
||||
push eax
|
||||
push ebx
|
||||
|
||||
mov ecx, ebx ; <<<<
|
||||
shr ecx, 1
|
||||
imul ecx, [_WinMapWidth]
|
||||
shr eax, 1
|
||||
shr eax, 1
|
||||
add eax, ecx
|
||||
mov ecx, [Screen_Max_X]
|
||||
inc ecx
|
||||
mul ecx
|
||||
add eax, [_WinMapAddress]
|
||||
movzx edx, byte [ebx+eax]
|
||||
shl edx, 8
|
||||
@ -277,12 +271,10 @@ __sys_disable_mouse:
|
||||
add edx,window_data
|
||||
movzx eax, word [MOUSE_X]
|
||||
movzx ebx, word [MOUSE_Y]
|
||||
mov ecx, ebx ; <<<<
|
||||
shr ecx, 1
|
||||
imul ecx, [_WinMapWidth]
|
||||
shr eax, 1
|
||||
shr eax, 1
|
||||
add ecx, eax
|
||||
mov ecx,[Screen_Max_X]
|
||||
inc ecx
|
||||
imul ecx,ebx
|
||||
add ecx,eax
|
||||
add ecx, [_WinMapAddress]
|
||||
mov eax, [CURRENT_TASK]
|
||||
movzx ebx, byte [ecx]
|
||||
|
||||
@ -320,10 +320,10 @@ high_code:
|
||||
; -----------------------------------------
|
||||
mov al, [BOOT_VAR+0x901F] ; DMA access
|
||||
mov [allow_dma_access], al
|
||||
mov eax, 32 ; <<<<<<<<< bpp
|
||||
mov eax, 32 ; bpp
|
||||
mov [ScreenBPP],al
|
||||
|
||||
mov [_display.bpp], eax
|
||||
|
||||
mov [_display.vrefresh], 60
|
||||
mov [_display.disable_mouse], __sys_disable_mouse
|
||||
|
||||
@ -332,9 +332,6 @@ high_code:
|
||||
dec eax
|
||||
mov [Screen_Max_X],eax
|
||||
mov [screen_workarea.right],eax
|
||||
inc eax
|
||||
shr eax, 2
|
||||
mov [_WinMapWidth], eax ; 1 tyle = 4 pixels
|
||||
movzx eax,word [BOOT_VAR+0x900C] ; Y max
|
||||
mov [_display.height], eax
|
||||
dec eax
|
||||
@ -342,15 +339,13 @@ high_code:
|
||||
mov [screen_workarea.bottom],eax
|
||||
movzx eax,word [BOOT_VAR+0x9008] ; screen mode
|
||||
mov [SCR_MODE],eax
|
||||
; mov eax,[BOOT_VAR+0x9014] ; Vesa 1.2 bnk sw add == not used any more
|
||||
; mov [BANK_SWITCH],eax
|
||||
|
||||
movzx eax, word[BOOT_VAR+0x9001] ; for other modes
|
||||
mov [BytesPerScanLine],ax
|
||||
mov [_display.pitch], eax
|
||||
@@:
|
||||
mov eax, [_display.height]
|
||||
shr eax, 1
|
||||
mul [_WinMapWidth]
|
||||
|
||||
mov eax, [_display.width]
|
||||
mul [_display.height]
|
||||
mov [_WinMapSize], eax
|
||||
|
||||
mov esi, BOOT_VAR+0x9080
|
||||
@ -373,8 +368,8 @@ high_code:
|
||||
; === EGA, VGA & Vesa 1.2 modes not supported ===
|
||||
setvesa20:
|
||||
v20ga32:
|
||||
; mov [PUTPIXEL],dword put_pixel
|
||||
; mov [GETPIXEL],dword get_pixel
|
||||
mov [PUTPIXEL],dword __sys_putpixel
|
||||
mov [GETPIXEL],dword get_pixel
|
||||
|
||||
; -------- Fast System Call init ----------
|
||||
.SEnP:
|
||||
@ -411,7 +406,6 @@ v20ga32:
|
||||
; LOAD IDT
|
||||
|
||||
call build_interrupt_table ;lidt is executed
|
||||
;lidt [idtreg]
|
||||
|
||||
call init_kernel_heap
|
||||
stdcall kernel_alloc, RING0_STACK_SIZE+512
|
||||
@ -512,8 +506,8 @@ v20ga32:
|
||||
mov [BgrDrawMode],eax
|
||||
mov [BgrDataWidth],eax
|
||||
mov [BgrDataHeight],eax
|
||||
; mov [mem_BACKGROUND], 4
|
||||
; mov [img_background], static_background_data
|
||||
mov [mem_BACKGROUND], 4
|
||||
mov [img_background], static_background_data
|
||||
|
||||
mov [SLOT_BASE + 256 + APPDATA.dir_table], sys_pgdir - OS_BASE
|
||||
|
||||
@ -632,7 +626,7 @@ end if
|
||||
|
||||
mov esi,boot_bgr
|
||||
call boot_log
|
||||
call _init_background ;graph32.inc ?
|
||||
call init_background ;
|
||||
call calculatebackground
|
||||
|
||||
; SET UP OS TASK
|
||||
@ -686,137 +680,6 @@ end if
|
||||
mov [SLOT_BASE+APPDATA.cursor],eax
|
||||
mov [SLOT_BASE+APPDATA.cursor+256],eax
|
||||
|
||||
; <<<<<<<<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>>>>>>
|
||||
|
||||
; mov esi, img_test_struct_8
|
||||
; mov edi, 151
|
||||
|
||||
; mov ebp, edi
|
||||
; imul edi, [BytesPerScanLine]
|
||||
; add edi, LFB_BASE + 32*4
|
||||
; mov [img_lfb_origin], edi
|
||||
; shr ebp, 1
|
||||
; imul ebp, [_WinMapWidth]
|
||||
; add ebp, 32/4
|
||||
; add ebp, [_WinMapAddress]
|
||||
; mov ecx, ebp
|
||||
; add ecx, [_WinMapWidth]
|
||||
; mov byte[ecx+1], 2
|
||||
; mov ecx, 6
|
||||
; mov [img_pix_y], ecx
|
||||
; mov eax, 1
|
||||
; mov [img_bytes_per_pix], eax
|
||||
; mov ebx, 1
|
||||
; bts ebx, 24
|
||||
; mov eax, 8-1
|
||||
; mov [img_pix_x], eax
|
||||
; inc eax
|
||||
; shr eax, 2
|
||||
; mov [img_map_x], eax
|
||||
; mov [img_draw_core_fn], draw_core_8bpp
|
||||
; mov [img_draw_edge_fn], draw_edge_8bpp
|
||||
; mov [img_buf_line_size], 9
|
||||
; mov [img_palette], img_test_palette
|
||||
|
||||
; call draw_aligned_box
|
||||
; add edi, 48
|
||||
; mov edx, 8
|
||||
; call draw_unaligned_edge
|
||||
; mono
|
||||
; bts ebx, 25
|
||||
; add edi, [_WinMapWidth] ; = 1/16 of the screen width
|
||||
; mov esi, img_test_struct_1
|
||||
; mov [img_lfb_origin], edi
|
||||
; mov ecx, 9
|
||||
; mov [img_map_x], 4
|
||||
; mov [img_bitoffset], 1
|
||||
; mov [img_edgeoffset], 16
|
||||
; mov [img_draw_core_fn], draw_core_1bpp
|
||||
; mov [img_draw_edge_fn], draw_edge_1bpp
|
||||
; mov [img_buf_line_size], 2
|
||||
; mov [img_bytes_per_pix], 0
|
||||
; call draw_aligned_box
|
||||
; add edi, 48
|
||||
; mov edx, 8
|
||||
; call draw_unaligned_edge
|
||||
; btr ebx, 25
|
||||
; 32bpp
|
||||
; add edi, [_WinMapWidth] ; = 1/16 of the screen width
|
||||
; mov esi, img_test_struct_32
|
||||
; mov [img_lfb_origin], edi
|
||||
; mov ecx, 6
|
||||
; mov [img_map_x], 2
|
||||
; mov [img_draw_core_fn], draw_core_32bpp
|
||||
; mov [img_draw_edge_fn], draw_edge_32bpp
|
||||
; mov [img_buf_line_size], 32
|
||||
; mov [img_bytes_per_pix], 4
|
||||
; call draw_aligned_box
|
||||
; add edi, 48
|
||||
; mov edx, 8
|
||||
; call draw_unaligned_edge
|
||||
|
||||
; 24bpp
|
||||
; add edi, [_WinMapWidth] ; = 1/16 of the screen width
|
||||
; mov esi, img_test_struct_24
|
||||
; mov [img_lfb_origin], edi
|
||||
; mov ecx, 7
|
||||
; mov [img_map_x], 4
|
||||
; mov [img_draw_core_fn], draw_core_24bpp
|
||||
; mov [img_draw_edge_fn], draw_edge_24bpp
|
||||
; mov [img_buf_line_size], 45
|
||||
; mov [img_bytes_per_pix], 3
|
||||
; call draw_aligned_box
|
||||
; add edi, 80
|
||||
; mov edx, 4
|
||||
; call draw_unaligned_edge
|
||||
|
||||
; mov [TASK_BASE-twdw + WDATA.box.left], 0
|
||||
; mov [TASK_BASE-twdw + WDATA.box.top], 0
|
||||
; mov eax, [Screen_Max_X]
|
||||
; mov [TASK_BASE-twdw + WDATA.box.width], eax
|
||||
; mov eax, [Screen_Max_Y]
|
||||
; mov [TASK_BASE-twdw + WDATA.box.height], eax
|
||||
|
||||
; mov ebx, img_test_struct_24
|
||||
; mov ecx, 16*65536 + 7
|
||||
; mov edx, 512*65536 + 400
|
||||
|
||||
; call _putimage
|
||||
|
||||
|
||||
;-----------
|
||||
; mov ebx, img_test_struct_32
|
||||
; mov ecx, 6*65536 + 6
|
||||
; mov edx, 32*65536 + 512
|
||||
; mov esi, 32
|
||||
; xor edi, edi
|
||||
; mov ebp, edi
|
||||
; call sys_putimage_palette.forced
|
||||
|
||||
; mov [img_palette], img_test_palette
|
||||
; mov [img_bytes_per_pix], 0
|
||||
; mov [img_buf_line_size], 0
|
||||
; mov ebx, img_test_palette
|
||||
; mov [img_draw_core_fn], draw_core_0bpp
|
||||
; mov [img_draw_edge_fn], draw_edge_0bpp
|
||||
; mov ecx, 20*65536 + 9
|
||||
; mov edx, 513*65536 + 401
|
||||
; call _putimage
|
||||
|
||||
; mov eax, 561
|
||||
; mov ebx, 461
|
||||
; mov ecx, 555
|
||||
; mov edx, 333
|
||||
; mov edi, 0xAA5533
|
||||
; call _drawbar
|
||||
|
||||
|
||||
|
||||
; jmp $
|
||||
|
||||
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>>>>>>>
|
||||
|
||||
|
||||
|
||||
; READ TSC / SECOND
|
||||
|
||||
@ -856,8 +719,6 @@ end if
|
||||
|
||||
call set_variables
|
||||
|
||||
|
||||
|
||||
; SET MOUSE
|
||||
|
||||
;call detect_devices
|
||||
@ -1023,7 +884,6 @@ osloop:
|
||||
call checkmisc
|
||||
call stack_handler
|
||||
call checkidle
|
||||
; call check_fdd_motor_status
|
||||
jmp osloop
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
; ;
|
||||
@ -1832,7 +1692,6 @@ sys_end:
|
||||
test eax, eax
|
||||
jz @F
|
||||
|
||||
|
||||
stdcall user_free, eax
|
||||
@@:
|
||||
|
||||
@ -2220,24 +2079,271 @@ bgrlock db 0
|
||||
endg
|
||||
|
||||
;=============================== SysFn 15 ================================
|
||||
; no background service supported so far ...
|
||||
;===========================================
|
||||
|
||||
sys_background:
|
||||
|
||||
cmp ebx,6 ; subfns 1..5 do not return anything
|
||||
jb .exit
|
||||
mov dword [esp+32], 0 ; subfns 6,7 return 0 as error
|
||||
cmp ebx,1 ; BACKGROUND SIZE
|
||||
jnz nosb1
|
||||
test ecx,ecx
|
||||
; cmp ecx,0
|
||||
jz sbgrr
|
||||
test edx,edx
|
||||
; cmp edx,0
|
||||
jz sbgrr
|
||||
@@:
|
||||
;;Maxis use atomic bts for mutexes 4.4.2009
|
||||
bts dword [bgrlock], 0
|
||||
jnc @f
|
||||
call change_task
|
||||
jmp @b
|
||||
@@:
|
||||
mov [BgrDataWidth],ecx
|
||||
mov [BgrDataHeight],edx
|
||||
; mov [bgrchanged],1
|
||||
|
||||
pushad
|
||||
; return memory for old background
|
||||
mov eax, [img_background]
|
||||
cmp eax, static_background_data
|
||||
jz @f
|
||||
stdcall kernel_free, eax
|
||||
@@:
|
||||
; calculate RAW size
|
||||
xor eax,eax
|
||||
inc eax
|
||||
cmp [BgrDataWidth],eax
|
||||
jae @f
|
||||
mov [BgrDataWidth],eax
|
||||
@@:
|
||||
cmp [BgrDataHeight],eax
|
||||
jae @f
|
||||
mov [BgrDataHeight],eax
|
||||
@@:
|
||||
mov eax,[BgrDataWidth]
|
||||
imul eax,[BgrDataHeight]
|
||||
lea eax,[eax*3]
|
||||
mov [mem_BACKGROUND],eax
|
||||
; get memory for new background
|
||||
stdcall kernel_alloc, eax
|
||||
test eax, eax
|
||||
jz .memfailed
|
||||
mov [img_background], eax
|
||||
jmp .exit
|
||||
.memfailed:
|
||||
; revert to static monotone data
|
||||
mov [img_background], static_background_data
|
||||
xor eax, eax
|
||||
inc eax
|
||||
mov [BgrDataWidth], eax
|
||||
mov [BgrDataHeight], eax
|
||||
mov [mem_BACKGROUND], 4
|
||||
.exit:
|
||||
popad
|
||||
mov [bgrlock], 0
|
||||
|
||||
sbgrr:
|
||||
ret
|
||||
|
||||
nosb1:
|
||||
|
||||
cmp ebx,2 ; SET PIXEL
|
||||
jnz nosb2
|
||||
|
||||
mov eax, [img_background]
|
||||
test ecx, ecx
|
||||
jz @f
|
||||
cmp eax, static_background_data
|
||||
|
||||
jz .ret
|
||||
@@:
|
||||
mov ebx, [mem_BACKGROUND]
|
||||
add ebx, 4095
|
||||
and ebx, -4096
|
||||
sub ebx, 4
|
||||
cmp ecx, ebx
|
||||
ja .ret
|
||||
|
||||
mov ebx,[eax+ecx]
|
||||
and ebx,0xFF000000 ;255*256*256*256
|
||||
and edx,0x00FFFFFF ;255*256*256+255*256+255
|
||||
add edx,ebx
|
||||
mov [eax+ecx],edx
|
||||
.ret:
|
||||
ret
|
||||
nosb2:
|
||||
|
||||
cmp ebx,3 ; DRAW BACKGROUND
|
||||
jnz nosb3
|
||||
draw_background_temp:
|
||||
; cmp [bgrchanged],1 ;0
|
||||
; je nosb31
|
||||
;draw_background_temp:
|
||||
; mov [bgrchanged],1 ;0
|
||||
mov [background_defined], 1
|
||||
mov byte[BACKGROUND_CHANGED], 1
|
||||
call force_redraw_background
|
||||
nosb31:
|
||||
ret
|
||||
nosb3:
|
||||
|
||||
cmp ebx,4 ; TILED / STRETCHED
|
||||
jnz nosb4
|
||||
cmp ecx,[BgrDrawMode]
|
||||
je nosb41
|
||||
mov [BgrDrawMode],ecx
|
||||
; mov [bgrchanged],1
|
||||
nosb41:
|
||||
ret
|
||||
nosb4:
|
||||
|
||||
cmp ebx,5 ; BLOCK MOVE TO BGR
|
||||
jnz nosb5
|
||||
cmp [img_background], static_background_data
|
||||
jnz @f
|
||||
test edx, edx
|
||||
jnz .fin
|
||||
cmp esi, 4
|
||||
ja .fin
|
||||
@@:
|
||||
; bughere
|
||||
mov eax, ecx
|
||||
mov ebx, edx
|
||||
add ebx, [img_background] ;IMG_BACKGROUND
|
||||
mov ecx, esi
|
||||
call memmove
|
||||
.fin:
|
||||
ret
|
||||
nosb5:
|
||||
|
||||
cmp ebx, 6
|
||||
jnz nosb6
|
||||
;;Maxis use atomic bts for mutex 4.4.2009
|
||||
@@:
|
||||
bts dword [bgrlock], 0
|
||||
jnc @f
|
||||
call change_task
|
||||
jmp @b
|
||||
@@:
|
||||
mov eax, [CURRENT_TASK]
|
||||
mov [bgrlockpid], eax
|
||||
cmp [img_background], static_background_data
|
||||
jz .nomem
|
||||
stdcall user_alloc, [mem_BACKGROUND]
|
||||
mov [esp+32], eax
|
||||
test eax, eax
|
||||
jz .nomem
|
||||
mov ebx, eax
|
||||
shr ebx, 12
|
||||
or dword [page_tabs+(ebx-1)*4], DONT_FREE_BLOCK
|
||||
mov esi, [img_background]
|
||||
shr esi, 12
|
||||
mov ecx, [mem_BACKGROUND]
|
||||
add ecx, 0xFFF
|
||||
shr ecx, 12
|
||||
.z:
|
||||
mov eax, [page_tabs+ebx*4]
|
||||
test al, 1
|
||||
jz @f
|
||||
call free_page
|
||||
@@:
|
||||
mov eax, [page_tabs+esi*4]
|
||||
or al, PG_UW
|
||||
mov [page_tabs+ebx*4], eax
|
||||
mov eax, ebx
|
||||
shl eax, 12
|
||||
invlpg [eax]
|
||||
inc ebx
|
||||
inc esi
|
||||
loop .z
|
||||
ret
|
||||
.nomem:
|
||||
and [bgrlockpid], 0
|
||||
mov [bgrlock], 0
|
||||
nosb6:
|
||||
cmp ebx, 7
|
||||
jnz nosb7
|
||||
cmp [bgrlock], 0
|
||||
jz .err
|
||||
mov eax, [CURRENT_TASK]
|
||||
cmp [bgrlockpid], eax
|
||||
jnz .err
|
||||
mov eax, ecx
|
||||
mov ebx, ecx
|
||||
shr eax, 12
|
||||
mov ecx, [page_tabs+(eax-1)*4]
|
||||
test cl, USED_BLOCK+DONT_FREE_BLOCK
|
||||
jz .err
|
||||
jnp .err
|
||||
push eax
|
||||
shr ecx, 12
|
||||
dec ecx
|
||||
@@:
|
||||
and dword [page_tabs+eax*4], 0
|
||||
mov edx, eax
|
||||
shl edx, 12
|
||||
push eax
|
||||
invlpg [edx]
|
||||
pop eax
|
||||
inc eax
|
||||
loop @b
|
||||
pop eax
|
||||
and dword [page_tabs+(eax-1)*4], not DONT_FREE_BLOCK
|
||||
stdcall user_free, ebx
|
||||
mov [esp+32], eax
|
||||
and [bgrlockpid], 0
|
||||
mov [bgrlock], 0
|
||||
ret
|
||||
.err:
|
||||
and dword [esp+32], 0
|
||||
ret
|
||||
|
||||
nosb7:
|
||||
ret
|
||||
|
||||
;=============================== SysFn 39 ================================
|
||||
; no background service supported so far ...
|
||||
;===========================================
|
||||
align 4
|
||||
|
||||
sys_getbackground:
|
||||
mov dword [esp+32], 0
|
||||
dec ebx
|
||||
jnz nogb1
|
||||
mov eax,[BgrDataWidth]
|
||||
shl eax,16
|
||||
mov ax,[BgrDataHeight]
|
||||
mov [esp+32],eax
|
||||
ret
|
||||
|
||||
nogb1:
|
||||
; cmp eax,2 ; PIXEL
|
||||
dec ebx
|
||||
jnz nogb2
|
||||
|
||||
mov eax, [img_background]
|
||||
test ecx, ecx
|
||||
jz @f
|
||||
cmp eax, static_background_data
|
||||
jz .ret
|
||||
@@:
|
||||
mov ebx, [mem_BACKGROUND]
|
||||
add ebx, 4095
|
||||
and ebx, -4096
|
||||
sub ebx, 4
|
||||
cmp ecx, ebx
|
||||
ja .ret
|
||||
|
||||
mov eax,[ecx+eax]
|
||||
|
||||
and eax, 0xFFFFFF
|
||||
mov [esp+32],eax
|
||||
.ret:
|
||||
ret
|
||||
nogb2:
|
||||
|
||||
; cmp eax,4 ; TILED / STRETCHED
|
||||
dec ebx
|
||||
dec ebx
|
||||
jnz nogb4
|
||||
mov eax,[BgrDrawMode]
|
||||
nogb4:
|
||||
mov [esp+32],eax
|
||||
ret
|
||||
|
||||
;===========================================
|
||||
@ -3096,13 +3202,37 @@ f_irqs:
|
||||
endg
|
||||
|
||||
drawbackground:
|
||||
; inc [mouse_pause]
|
||||
; call draw_background ; graph32.inc
|
||||
; dec [mouse_pause]
|
||||
; call [draw_pointer]
|
||||
; ret
|
||||
inc [mouse_pause]
|
||||
call draw_background ; graph32.inc
|
||||
cmp [SCR_MODE],word 0x12
|
||||
je dbrv20
|
||||
dbrv12:
|
||||
cmp [SCR_MODE],word 0100000000000000b
|
||||
jge dbrv20
|
||||
dec [mouse_pause]
|
||||
call [draw_pointer]
|
||||
ret
|
||||
dbrv20:
|
||||
cmp [BgrDrawMode],dword 1
|
||||
jne bgrstr
|
||||
call vesa20_drawbackground_tiled
|
||||
dec [mouse_pause]
|
||||
call [draw_pointer]
|
||||
ret
|
||||
bgrstr:
|
||||
call vesa20_drawbackground_stretch
|
||||
dec [mouse_pause]
|
||||
call [draw_pointer]
|
||||
ret
|
||||
|
||||
; ====================================================================
|
||||
if 0
|
||||
; the new GFX sys
|
||||
|
||||
align 4
|
||||
syscall_putimage: ; PutImage = SysFn07
|
||||
sys_putimage:
|
||||
@ -3203,6 +3333,311 @@ img_edge_proc_2 dd draw_edge_16bpp
|
||||
img_edge_proc_3 dd draw_edge_24bpp
|
||||
img_edge_proc_4 dd draw_edge_32bpp
|
||||
|
||||
end if
|
||||
; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
|
||||
; the old GFX sys
|
||||
align 4
|
||||
|
||||
syscall_putimage: ; PutImage
|
||||
sys_putimage:
|
||||
test ecx,0x80008000
|
||||
jnz .exit
|
||||
test ecx,0x0000FFFF
|
||||
jz .exit
|
||||
test ecx,0xFFFF0000
|
||||
jnz @f
|
||||
.exit:
|
||||
ret
|
||||
@@:
|
||||
mov edi,[current_slot]
|
||||
add dx,word[edi+APPDATA.wnd_clientbox.top]
|
||||
rol edx,16
|
||||
add dx,word[edi+APPDATA.wnd_clientbox.left]
|
||||
rol edx,16
|
||||
.forced:
|
||||
push ebp esi 0
|
||||
mov ebp, putimage_get24bpp
|
||||
mov esi, putimage_init24bpp
|
||||
sys_putimage_bpp:
|
||||
; cmp [SCR_MODE], word 0x12
|
||||
; jz @f ;.doit
|
||||
; mov eax, vesa12_putimage
|
||||
; cmp [SCR_MODE], word 0100000000000000b
|
||||
; jae @f
|
||||
; cmp [SCR_MODE], word 0x13
|
||||
; jnz .doit
|
||||
;@@:
|
||||
mov eax, vesa20_putimage
|
||||
.doit:
|
||||
inc [mouse_pause]
|
||||
call eax
|
||||
dec [mouse_pause]
|
||||
pop ebp esi ebp
|
||||
jmp [draw_pointer]
|
||||
align 4
|
||||
sys_putimage_palette:
|
||||
; ebx = pointer to image
|
||||
; ecx = [xsize]*65536 + [ysize]
|
||||
; edx = [xstart]*65536 + [ystart]
|
||||
; esi = number of bits per pixel, must be 8, 24 or 32
|
||||
; edi = pointer to palette
|
||||
; ebp = row delta
|
||||
mov eax, [CURRENT_TASK]
|
||||
shl eax, 8
|
||||
add dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.top]
|
||||
rol edx, 16
|
||||
add dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.left]
|
||||
rol edx, 16
|
||||
.forced:
|
||||
cmp esi, 1
|
||||
jnz @f
|
||||
push edi
|
||||
mov eax, [edi+4]
|
||||
sub eax, [edi]
|
||||
push eax
|
||||
push dword [edi]
|
||||
push 0ffffff80h
|
||||
mov edi, esp
|
||||
call put_mono_image
|
||||
add esp, 12
|
||||
pop edi
|
||||
ret
|
||||
@@:
|
||||
cmp esi, 2
|
||||
jnz @f
|
||||
push edi
|
||||
push 0ffffff80h
|
||||
mov edi, esp
|
||||
call put_2bit_image
|
||||
pop eax
|
||||
pop edi
|
||||
ret
|
||||
@@:
|
||||
cmp esi, 4
|
||||
jnz @f
|
||||
push edi
|
||||
push 0ffffff80h
|
||||
mov edi, esp
|
||||
call put_4bit_image
|
||||
pop eax
|
||||
pop edi
|
||||
ret
|
||||
@@:
|
||||
push ebp esi ebp
|
||||
cmp esi, 8
|
||||
jnz @f
|
||||
mov ebp, putimage_get8bpp
|
||||
mov esi, putimage_init8bpp
|
||||
jmp sys_putimage_bpp
|
||||
@@:
|
||||
cmp esi, 15
|
||||
jnz @f
|
||||
mov ebp, putimage_get15bpp
|
||||
mov esi, putimage_init15bpp
|
||||
jmp sys_putimage_bpp
|
||||
@@:
|
||||
cmp esi, 16
|
||||
jnz @f
|
||||
mov ebp, putimage_get16bpp
|
||||
mov esi, putimage_init16bpp
|
||||
jmp sys_putimage_bpp
|
||||
@@:
|
||||
cmp esi, 24
|
||||
jnz @f
|
||||
mov ebp, putimage_get24bpp
|
||||
mov esi, putimage_init24bpp
|
||||
jmp sys_putimage_bpp
|
||||
@@:
|
||||
cmp esi, 32
|
||||
jnz @f
|
||||
mov ebp, putimage_get32bpp
|
||||
mov esi, putimage_init32bpp
|
||||
jmp sys_putimage_bpp
|
||||
@@:
|
||||
pop ebp esi ebp
|
||||
ret
|
||||
|
||||
put_mono_image:
|
||||
push ebp esi ebp
|
||||
mov ebp, putimage_get1bpp
|
||||
mov esi, putimage_init1bpp
|
||||
jmp sys_putimage_bpp
|
||||
put_2bit_image:
|
||||
push ebp esi ebp
|
||||
mov ebp, putimage_get2bpp
|
||||
mov esi, putimage_init2bpp
|
||||
jmp sys_putimage_bpp
|
||||
put_4bit_image:
|
||||
push ebp esi ebp
|
||||
mov ebp, putimage_get4bpp
|
||||
mov esi, putimage_init4bpp
|
||||
jmp sys_putimage_bpp
|
||||
|
||||
putimage_init24bpp:
|
||||
lea eax, [eax*3]
|
||||
putimage_init8bpp:
|
||||
ret
|
||||
|
||||
align 16
|
||||
putimage_get24bpp:
|
||||
movzx eax, byte [esi+2]
|
||||
shl eax, 16
|
||||
mov ax, [esi]
|
||||
add esi, 3
|
||||
ret 4
|
||||
align 16
|
||||
putimage_get8bpp:
|
||||
movzx eax, byte [esi]
|
||||
push edx
|
||||
mov edx, [esp+8]
|
||||
mov eax, [edx+eax*4]
|
||||
pop edx
|
||||
inc esi
|
||||
ret 4
|
||||
|
||||
putimage_init1bpp:
|
||||
add eax, ecx
|
||||
push ecx
|
||||
add eax, 7
|
||||
add ecx, 7
|
||||
shr eax, 3
|
||||
shr ecx, 3
|
||||
sub eax, ecx
|
||||
pop ecx
|
||||
ret
|
||||
align 16
|
||||
putimage_get1bpp:
|
||||
push edx
|
||||
mov edx, [esp+8]
|
||||
mov al, [edx]
|
||||
add al, al
|
||||
jnz @f
|
||||
lodsb
|
||||
adc al, al
|
||||
@@:
|
||||
mov [edx], al
|
||||
sbb eax, eax
|
||||
and eax, [edx+8]
|
||||
add eax, [edx+4]
|
||||
pop edx
|
||||
ret 4
|
||||
|
||||
putimage_init2bpp:
|
||||
add eax, ecx
|
||||
push ecx
|
||||
add ecx, 3
|
||||
add eax, 3
|
||||
shr ecx, 2
|
||||
shr eax, 2
|
||||
sub eax, ecx
|
||||
pop ecx
|
||||
ret
|
||||
align 16
|
||||
putimage_get2bpp:
|
||||
push edx
|
||||
mov edx, [esp+8]
|
||||
mov al, [edx]
|
||||
mov ah, al
|
||||
shr al, 6
|
||||
shl ah, 2
|
||||
jnz .nonewbyte
|
||||
lodsb
|
||||
mov ah, al
|
||||
shr al, 6
|
||||
shl ah, 2
|
||||
add ah, 1
|
||||
.nonewbyte:
|
||||
mov [edx], ah
|
||||
mov edx, [edx+4]
|
||||
movzx eax, al
|
||||
mov eax, [edx+eax*4]
|
||||
pop edx
|
||||
ret 4
|
||||
|
||||
putimage_init4bpp:
|
||||
add eax, ecx
|
||||
push ecx
|
||||
add ecx, 1
|
||||
add eax, 1
|
||||
shr ecx, 1
|
||||
shr eax, 1
|
||||
sub eax, ecx
|
||||
pop ecx
|
||||
ret
|
||||
align 16
|
||||
putimage_get4bpp:
|
||||
push edx
|
||||
mov edx, [esp+8]
|
||||
add byte [edx], 80h
|
||||
jc @f
|
||||
movzx eax, byte [edx+1]
|
||||
mov edx, [edx+4]
|
||||
and eax, 0x0F
|
||||
mov eax, [edx+eax*4]
|
||||
pop edx
|
||||
ret 4
|
||||
@@:
|
||||
movzx eax, byte [esi]
|
||||
add esi, 1
|
||||
mov [edx+1], al
|
||||
shr eax, 4
|
||||
mov edx, [edx+4]
|
||||
mov eax, [edx+eax*4]
|
||||
pop edx
|
||||
ret 4
|
||||
|
||||
putimage_init32bpp:
|
||||
shl eax, 2
|
||||
ret
|
||||
align 16
|
||||
putimage_get32bpp:
|
||||
lodsd
|
||||
ret 4
|
||||
|
||||
putimage_init15bpp:
|
||||
putimage_init16bpp:
|
||||
add eax, eax
|
||||
ret
|
||||
align 16
|
||||
putimage_get15bpp:
|
||||
; 0RRRRRGGGGGBBBBB -> 00000000RRRRR000GGGGG000BBBBB000
|
||||
push ecx edx
|
||||
movzx eax, word [esi]
|
||||
add esi, 2
|
||||
mov ecx, eax
|
||||
mov edx, eax
|
||||
and eax, 0x1F
|
||||
and ecx, 0x1F shl 5
|
||||
and edx, 0x1F shl 10
|
||||
shl eax, 3
|
||||
shl ecx, 6
|
||||
shl edx, 9
|
||||
or eax, ecx
|
||||
or eax, edx
|
||||
pop edx ecx
|
||||
ret 4
|
||||
|
||||
align 16
|
||||
putimage_get16bpp:
|
||||
; RRRRRGGGGGGBBBBB -> 00000000RRRRR000GGGGGG00BBBBB000
|
||||
push ecx edx
|
||||
movzx eax, word [esi]
|
||||
add esi, 2
|
||||
mov ecx, eax
|
||||
mov edx, eax
|
||||
and eax, 0x1F
|
||||
and ecx, 0x3F shl 5
|
||||
and edx, 0x1F shl 11
|
||||
shl eax, 3
|
||||
shl ecx, 5
|
||||
shl edx, 8
|
||||
or eax, ecx
|
||||
or eax, edx
|
||||
pop edx ecx
|
||||
ret 4
|
||||
|
||||
|
||||
|
||||
; ==================================================
|
||||
; eax x beginning
|
||||
; ebx y beginning
|
||||
@ -3219,7 +3654,7 @@ __sys_drawbar:
|
||||
.forced:
|
||||
inc [mouse_pause]
|
||||
; dbv20:
|
||||
call _drawbar
|
||||
call drawbar
|
||||
dec [mouse_pause]
|
||||
jmp [draw_pointer]
|
||||
|
||||
@ -3965,11 +4400,7 @@ set_screen:
|
||||
stdcall kernel_free, [_WinMapAddress]
|
||||
|
||||
mov eax, [_display.width]
|
||||
shr eax, 2
|
||||
mov [_WinMapWidth], eax
|
||||
mov eax, [_display.height]
|
||||
shr eax, 1
|
||||
mul [_WinMapWidth]
|
||||
mul [_display.height]
|
||||
mov [_WinMapSize], eax
|
||||
|
||||
stdcall kernel_alloc, eax
|
||||
@ -4306,27 +4737,3 @@ uglobals_size = $ - endofcode
|
||||
diff16 "Zero-filled blk",0,endofcode
|
||||
diff16 "End of kernel ",0,$
|
||||
|
||||
;Кургинян - математик, и основные свои выводы делает на основе теории катастроф (есть такая вполне себе прикладная область математики) с элементами вариационного и факторного анализа. В принципе, он мог бы изложить суть в 3-4 сухих формулах, но только понять их могли (и захотели) бы человек 200-300...
|
||||
|
||||
;Вот и приходится ему излагать то же самое, но гораздо длиннее и доходчивее. Лично я не поленился и прочитал цикл "Кризис и другие" в архиве "Завтра" за 2009 год.
|
||||
|
||||
|
||||
;Вот очень краткая выжимка его основных идей (с моей колокольни, конечно):
|
||||
|
||||
;1) Планета перенаселена, ресурсов на всех не хватит, период либеральненкой глобализации должен смениться эрой жесткого рационирования при тотальном контроле всего.
|
||||
|
||||
;2) У грядущего тоталитарного общества должна быть господствующая идеология, мобилизующая людей в суровой борьбе. Какой ей быть? для этого надо ответить на два основных вопроса: а) можно ли сделать человека лучше, сильнее, умнее? и б) можно ли сделать общество лучше, справедливее, свободнее?
|
||||
|
||||
;3) существует 4 возможных ответа на эти 2 вопроса: (а+б+) исторический модерн, он же коммунизм; (а+б-) антиисторический модерн, или фашизм; (а-б+) религиозный фундаментализм, или Контрмодерн; и наконец (а-б-) циничный антигуманизм, он же Постмодерн.
|
||||
|
||||
;4) крушение коммунистического проекта в XX веке было тщательно спланированной катастрофой с целью поворота человечества с модернистского пути развития на постмодернистский путь распада. Кургинян здесь имеет в виду катастрофу в математическом смысле, т.е. не какое-то печальное событие, а процесс, приводящий к такому событию. Я не хочу пересказывать здесь все положения теории катастроф - важно только понимать, что такой процесс вовсе не обязательно должен приводить к фатальному исходу - выход из катастрофы всегда можно найти, вплоть до самого последнего момента!
|
||||
|
||||
;5) катиться по этому катастрофическому пути легко, но найти выход из катастрофы с каждым шагом все сложнее. Чтобы избежать фатального конца, одной энергии мало - требуется изрядная сила воли.
|
||||
|
||||
;6) здесь Кургинян подключает другой математический аппарат - теорию игр. И показывает, как шулера - магистры сложной коалиционно-антагонистической игры умеют целенаправленно и эффективно лишать противников воли и смыслов для поиска выхода из катастрофы.
|
||||
|
||||
;7) конечно, человеческое общество - сложнейшая система с непредсказуемым откликом на актиные действия каждого из игроков. Даже опытнейший шулер может здесь сделать неверные ходы. Но в распоряжении мастеров игры имеется еще один мощный аппарат - факторный анализ, позволяющий эффективно корректировать промахи и лучше предсказывть поведение сложных систем.
|
||||
|
||||
;8) и тем не менее, выход есть! Для начала, надо реально осознать свою позицию в игре и навязать свою, активную игру (каждый новый активный игрок усложняет партнерам анализ игры). Это сложно (проще быть болваном), и это требует Воли и воссоздания Смыслов.
|
||||
|
||||
;9) даже самая активная игра будет простым барахтаньем, если не ставится конечная цель. Такая цель есть. Точнее - была: проект (а+б+). Если ее восстановить, мы не просто вернемся к активной игре - мы можем сформировать мощную коалицию антипостмодернистов.
|
||||
|
||||
@ -224,7 +224,8 @@ include "sound/playnote.inc" ; player Note for Speaker PC
|
||||
|
||||
; display
|
||||
|
||||
include "video/graph32.inc" ; 32bpp graphics
|
||||
;include "video/graph32.inc" ; 32bpp graphics
|
||||
include "video/vesa20.inc" ; older graphics engine
|
||||
include "video/cursors.inc" ; cursors functions
|
||||
|
||||
; Network Interface & TCPIP Stack
|
||||
|
||||
Loading…
Reference in New Issue
Block a user