163 lines
5.7 KiB
NASM
163 lines
5.7 KiB
NASM
|
;
|
||
|
|
; Command & Conquer Red Alert(tm)
|
||
|
|
; Copyright 2025 Electronic Arts Inc.
|
||
|
|
;
|
||
|
|
; This program is free software: you can redistribute it and/or modify
|
||
|
|
; it under the terms of the GNU General Public License as published by
|
||
|
|
; the Free Software Foundation, either version 3 of the License, or
|
||
|
|
; (at your option) any later version.
|
||
|
|
;
|
||
|
|
; This program is distributed in the hope that it will be useful,
|
||
|
|
; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
|
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
|
; GNU General Public License for more details.
|
||
|
|
;
|
||
|
|
; You should have received a copy of the GNU General Public License
|
||
|
|
; along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||
|
|
;
|
||
|
|
|
||
|
|
|
||
|
|
;**********************************************************************************************
|
||
|
|
;** C O N F I D E N T I A L --- W E S T W O O D S T U D I O S I N C **
|
||
|
|
;**********************************************************************************************
|
||
|
|
;* *
|
||
|
|
;* Project Name : VQA Viewer *
|
||
|
|
;* *
|
||
|
|
;* File Name : INTERPAL.ASM *
|
||
|
|
;* *
|
||
|
|
;* Programmer : Steve Tall *
|
||
|
|
;* *
|
||
|
|
;* Start Date : December 15th, 1995 *
|
||
|
|
;* *
|
||
|
|
;* Last Update : December 22nd, 1995 [ST] *
|
||
|
|
;* *
|
||
|
|
;*--------------------------------------------------------------------------------------------*
|
||
|
|
;* Functions: *
|
||
|
|
;* *
|
||
|
|
;* Asm_Interpolate -- interpolate a 320x200 buffer to a 640x400 screen *
|
||
|
|
;* *
|
||
|
|
;* *
|
||
|
|
;* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
IDEAL
|
||
|
|
P386
|
||
|
|
MODEL USE32 FLAT
|
||
|
|
|
||
|
|
|
||
|
|
segment mycode page public use32 'code' ; Need stricter segment alignment
|
||
|
|
|
||
|
|
global C Asm_Interpolate:near
|
||
|
|
global C Palette_Interpolation_Table:byte
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
;*********************************************************************************************
|
||
|
|
;* Asm_Interpolate -- interpolate a 320x200 buffer to a 640x400 screen *
|
||
|
|
;* *
|
||
|
|
;* INPUT: ptr to source buffer (320x200 image) *
|
||
|
|
;* ptr to dest buffer (640x400) *
|
||
|
|
;* height of source buffer *
|
||
|
|
;* width f source buffer *
|
||
|
|
;* width of dest buffer *
|
||
|
|
;* *
|
||
|
|
;* *
|
||
|
|
;* OUTPUT: none *
|
||
|
|
;* *
|
||
|
|
;* Warnings: *
|
||
|
|
;* *
|
||
|
|
;* HISTORY: *
|
||
|
|
;* 12/15/95 ST : Created. *
|
||
|
|
;*===========================================================================================*
|
||
|
|
|
||
|
|
PROC Asm_Interpolate C near
|
||
|
|
|
||
|
|
ARG src_ptr:dword
|
||
|
|
ARG dest_ptr:dword
|
||
|
|
ARG source_height:dword
|
||
|
|
ARG source_width:dword
|
||
|
|
ARG dest_width:dword
|
||
|
|
|
||
|
|
LOCAL old_dest:dword
|
||
|
|
LOCAL width_counter:dword
|
||
|
|
|
||
|
|
pushad
|
||
|
|
|
||
|
|
mov eax,[dest_ptr]
|
||
|
|
mov [old_dest],eax
|
||
|
|
|
||
|
|
mov esi,[src_ptr]
|
||
|
|
|
||
|
|
??each_line_loop:
|
||
|
|
mov [width_counter],0
|
||
|
|
mov ecx,[source_width]
|
||
|
|
sub ecx,2
|
||
|
|
shr ecx,1
|
||
|
|
mov edi,[old_dest]
|
||
|
|
jmp ??interpolate_loop
|
||
|
|
|
||
|
|
align 32
|
||
|
|
;
|
||
|
|
; convert 2 pixels of source into 4 pixels of destination
|
||
|
|
; so we can write to video memory with dwords
|
||
|
|
;
|
||
|
|
??interpolate_loop:
|
||
|
|
mov eax,[esi]
|
||
|
|
lea esi,[esi+2]
|
||
|
|
mov edx,eax
|
||
|
|
mov ebx,eax
|
||
|
|
and edx,65535
|
||
|
|
ror ebx,8
|
||
|
|
mov bl,[edx+Palette_Interpolation_Table]
|
||
|
|
mov bh,ah
|
||
|
|
and eax,000ffff00h
|
||
|
|
ror ebx,8
|
||
|
|
|
||
|
|
;1st 3 pixels now in ebx
|
||
|
|
|
||
|
|
shr eax,8
|
||
|
|
mov bh,[eax+Palette_Interpolation_Table]
|
||
|
|
ror ebx,16
|
||
|
|
mov [edi],ebx
|
||
|
|
add edi,4
|
||
|
|
|
||
|
|
dec ecx
|
||
|
|
jnz ??interpolate_loop
|
||
|
|
|
||
|
|
; do the last three pixels and a blank on the end of a row
|
||
|
|
xor eax,eax
|
||
|
|
mov ax,[esi]
|
||
|
|
mov [edi],al
|
||
|
|
inc edi
|
||
|
|
lea esi,[esi+2]
|
||
|
|
mov al,[eax+Palette_Interpolation_Table]
|
||
|
|
mov [edi],al
|
||
|
|
inc edi
|
||
|
|
mov [edi],ah
|
||
|
|
inc edi
|
||
|
|
mov [byte edi],0
|
||
|
|
|
||
|
|
mov edi,[dest_width]
|
||
|
|
add [old_dest],edi
|
||
|
|
|
||
|
|
dec [source_height]
|
||
|
|
jnz ??each_line_loop
|
||
|
|
|
||
|
|
popad
|
||
|
|
ret
|
||
|
|
|
||
|
|
endp Asm_Interpolate
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
ends mycode
|
||
|
|
|
||
|
|
end
|
||
|
|
|
||
|
|
|