mirror of
https://github.com/ondra-novak/gates_of_skeldal.git
synced 2025-07-14 10:21:51 -04:00
libs compiles
This commit is contained in:
Ondřej Novák
parent
1b0f7fe0c2
commit
a7278bac40
121 changed files with 1528 additions and 1731 deletions
405
libs/mgifplaya.c
405
libs/mgifplaya.c
|
|
@ -4,105 +4,25 @@
|
|||
#include <bgraph.h>
|
||||
|
||||
|
||||
void show_full_lfb12e(void *target, void *buff, void *paleta) {
|
||||
uint16_t *edi = (uint16_t *)target;
|
||||
uint8_t *esi = (uint8_t *)buff;
|
||||
uint16_t *ebx = (uint16_t *)paleta;
|
||||
uint8_t dl = 180;
|
||||
|
||||
void show_full_interl_lfb(void *source,void *target,void *palette, long linelen)
|
||||
{
|
||||
int sslinelen=2*linelen-1280;
|
||||
__asm
|
||||
{
|
||||
mov edi,target
|
||||
mov esi,source
|
||||
mov ebx,palette
|
||||
;edi - target
|
||||
;esi - source
|
||||
;ebx - palette
|
||||
push ebp
|
||||
push sslinelen;
|
||||
mov dl,180
|
||||
shfif2: mov ecx,320
|
||||
shfif1: lodsb
|
||||
movzx eax,al
|
||||
movzx eax,short ptr [eax*2+ebx]
|
||||
mov ebp,eax
|
||||
shl eax,16
|
||||
or eax,ebp
|
||||
stosd
|
||||
dec ecx
|
||||
jnz shfif1
|
||||
add edi,[esp]
|
||||
dec dl
|
||||
jnz shfif2
|
||||
pop eax
|
||||
pop ebp
|
||||
}
|
||||
}
|
||||
//#pragma aux show_full_interl_lfb parm [esi][edi][ebx] modify [eax ecx edx]
|
||||
void show_delta_interl_lfb(void *source,void *target,void *palette, long linelen)
|
||||
{
|
||||
int sslinelen=2*linelen;
|
||||
__asm
|
||||
{
|
||||
mov edi,target
|
||||
mov esi,source
|
||||
mov ebx,palette
|
||||
;edi - target
|
||||
;esi - source
|
||||
;ebx - palette
|
||||
push ebp ;uchovej ebp
|
||||
push sslinelen
|
||||
mov cl,180 ;cl pocet zbyvajicich radek
|
||||
add esi,4 ;preskoc ukazatel
|
||||
mov edx,esi ;edx - zacatek delta mapy
|
||||
add esi,[esi-4] ;esi - zacatek dat
|
||||
shdif6: push edi ;uloz adresu radku
|
||||
shdif2: mov ch,[edx] ;cti _skip_ hodnotu
|
||||
mov al,ch
|
||||
inc edx
|
||||
or al,03fh ;test zda jsou 2 nejvyssi bity nastaveny
|
||||
inc al
|
||||
jz shdif3 ;ano - preskakovani radku
|
||||
movzx eax,ch ;expanduj _skip_ hodnotu do eax
|
||||
lea edi,[eax*8+edi] ;vypocti novou pozici na obrazovce
|
||||
mov ch,[edx] ;cti _copy_ hodnotu
|
||||
inc edx
|
||||
shdif1: lodsb ;vem bajt z datove oblasti
|
||||
movzx eax,al ;expanduj do eax
|
||||
movzx eax,short ptr[eax*2+ebx] ;expanduj hicolor barvu
|
||||
mov ebp,eax ;rozdvoj barvy
|
||||
shl ebp,16
|
||||
or eax,ebp
|
||||
stosd ;zapis dva body
|
||||
lodsb ;opakuj pro dalsi bod jeste jednou
|
||||
movzx eax,al
|
||||
movzx eax,short ptr[eax*2+ebx]
|
||||
mov ebp,eax
|
||||
shl ebp,16
|
||||
or eax,ebp
|
||||
stosd
|
||||
dec ch ;odecti _copy_ hodnotu
|
||||
jnz shdif1 ;dokud neni 0
|
||||
jmp shdif2 ;pokracuj _skip_ hodnotou
|
||||
shdif3: and ch,3fh ;odmaskuj hodni 2 bity
|
||||
pop edi ;obnov edi
|
||||
jnz shdif4 ;pokud je ch=0 preskoc jen jeden radek;
|
||||
add edi,[esp] ;preskoc radek
|
||||
dec cl ;odecti citac radku
|
||||
jnz shdif6 ;skok pokud neni konec
|
||||
pop ebp
|
||||
jmp konec ;navrat
|
||||
shdif4: inc ch ;pocet radek je ch+1
|
||||
sub cl,ch ;odecti ch od zbyvajicich radek
|
||||
jz shdif5 ;je-li nula tak konec
|
||||
shdif7: add edi,[esp] ;preskoc radek
|
||||
dec ch ;odecti ch
|
||||
jnz shdif7 ;preskakuj dokud neni 0
|
||||
jmp shdif6 ;cti dalsi _skip_
|
||||
shdif5: pop ebp
|
||||
konec:
|
||||
}
|
||||
}
|
||||
//#pragma aux show_delta_interl_lfb parm [esi][edi][ebx] modify [eax ecx edx]
|
||||
do {
|
||||
uint32_t ecx = 320;
|
||||
do {
|
||||
uint8_t value = *esi++;
|
||||
*edi++ = ebx[value];
|
||||
ecx--;
|
||||
} while (ecx != 0);
|
||||
dl--;
|
||||
} while (dl != 0);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
void show_full_lfb12e(void *target,void *buff,void *paleta)
|
||||
{
|
||||
__asm
|
||||
|
|
@ -130,164 +50,147 @@ shfl1: lodsw
|
|||
jnz shfl2
|
||||
pop ebp
|
||||
}
|
||||
}
|
||||
}
|
||||
*/
|
||||
/*
|
||||
void show_delta_lfb12e(void *target, void *buff, void *paleta) {
|
||||
uint8_t *edi = (uint8_t *)target;
|
||||
uint8_t *esi = (uint8_t *)buff + 4; // skip pointer
|
||||
uint8_t *ebx = (uint8_t *)paleta;
|
||||
uint8_t cl = 180; // remaining lines
|
||||
uint8_t ch, al;
|
||||
uint16_t *edx = (uint16_t *)esi; // start of delta map
|
||||
esi += *(uint32_t *)(esi - 4); // start of data
|
||||
|
||||
while (cl > 0) {
|
||||
uint8_t *line_address = edi; // save line address
|
||||
ch = *edx++; // read _skip_ value
|
||||
al = ch;
|
||||
al |= 0x3F; // test if the two highest bits are set
|
||||
al++;
|
||||
if (al == 0) { // if yes - skip lines
|
||||
ch &= 0x3F; // mask the upper 2 bits
|
||||
edi += (ch == 0) ? 640 : 0; // skip line if ch is 0
|
||||
cl--; // decrement line counter
|
||||
continue; // continue to next iteration
|
||||
}
|
||||
|
||||
uint32_t eax = (uint32_t)ch; // expand _skip_ value to eax
|
||||
edi += eax * 4; // calculate new position on screen
|
||||
ch = *edx++; // read _copy_ value
|
||||
|
||||
for (uint8_t i = 0; i < ch; i++) {
|
||||
uint16_t ebp = *(uint16_t *)(ebx + (al * 2)); // get color from palette
|
||||
uint16_t color = *(uint16_t *)(ebx + (eax * 2)); // get color from palette
|
||||
eax = (color << 16) | ebp; // combine colors
|
||||
*(uint32_t *)edi = eax; // store the color
|
||||
edi += 4; // move to the next pixel
|
||||
}
|
||||
edi += 640; // skip line
|
||||
cl--; // decrement line counter
|
||||
}
|
||||
}
|
||||
*/
|
||||
static __inline uint32_t read_uint32(uint8_t *from) {
|
||||
uint32_t a = from[0];
|
||||
uint32_t b = from[1];
|
||||
uint32_t c = from[2];
|
||||
uint32_t d = from[2];
|
||||
return a | (b << 8) | (c << 16) | (d << 24);
|
||||
}
|
||||
|
||||
//#pragma aux show_full_lfb12e parm[edi][esi][ebx] modify [eax ecx]
|
||||
void show_delta_lfb12e(void *target,void *buff,void *paleta)
|
||||
{
|
||||
__asm
|
||||
{
|
||||
mov edi,target
|
||||
mov esi,buff
|
||||
mov ebx,paleta
|
||||
;edi - target
|
||||
;esi - buff
|
||||
;ebx - paleta
|
||||
push ebp ;uchovej ebp
|
||||
mov cl,180 ;cl pocet zbyvajicich radek
|
||||
add esi,4 ;preskoc ukazatel
|
||||
mov edx,esi ;edx - zacatek delta mapy
|
||||
add esi,[esi-4] ;esi - zacatek dat
|
||||
shdl6: push edi ;uloz adresu radku
|
||||
shdl2: mov ch,[edx] ;cti _skip_ hodnotu
|
||||
mov al,ch
|
||||
inc edx
|
||||
or al,03fh ;test zda jsou 2 nejvyssi bity nastaveny
|
||||
inc al
|
||||
jz shdl3 ;ano - preskakovani radku
|
||||
movzx eax,ch ;expanduj _skip_ hodnotu do eax
|
||||
lea edi,[eax*4+edi] ;vypocti novou pozici na obrazovce
|
||||
mov ch,[edx] ;cti _copy_ hodnotu
|
||||
inc edx
|
||||
shdl1: lodsw
|
||||
movzx ebp,al
|
||||
movzx ebp,short ptr ds:[ebp*2+ebx]
|
||||
movzx eax,ah
|
||||
movzx eax,short ptr ds:[eax*2+ebx]
|
||||
shl eax,16
|
||||
or eax,ebp
|
||||
stosd
|
||||
dec ch ;odecti _copy_ hodnotu
|
||||
jnz shdl1 ;dokud neni 0
|
||||
jmp shdl2 ;pokracuj _skip_ hodnotou
|
||||
shdl3: and ch,3fh ;odmaskuj hodni 2 bity
|
||||
pop edi ;obnov edi
|
||||
jnz shdl4 ;pokud je ch=0 preskoc jen jeden radek;
|
||||
add edi,640 ;preskoc radek
|
||||
dec cl ;odecti citac radku
|
||||
jnz shdl6 ;skok pokud neni konec
|
||||
pop ebp
|
||||
jmp konec
|
||||
shdl4: inc ch ;pocet radek je ch+1
|
||||
sub cl,ch ;odecti ch od zbyvajicich radek
|
||||
jz shdl5 ;je-li nula tak konec
|
||||
shdl7: add edi,640 ;preskoc radek
|
||||
dec ch ;odecti ch
|
||||
jnz shdl7 ;preskakuj dokud neni 0
|
||||
jmp shdl6 ;cti dalsi _skip_
|
||||
shdl5: pop ebp
|
||||
konec:
|
||||
}
|
||||
}
|
||||
//#pragma aux show_delta_lfb12e parm[edi][esi][ebx] modify [eax ecx]
|
||||
{
|
||||
// __asm
|
||||
// {
|
||||
uint16_t *edi = target;
|
||||
// mov edi,target
|
||||
uint8_t *esi = buff;
|
||||
// mov esi,buff
|
||||
uint16_t *ebx = paleta;
|
||||
// mov ebx,paleta
|
||||
// ;edi - target
|
||||
// ;esi - buff
|
||||
// ;ebx - paleta
|
||||
// push ebp ;uchovej ebp
|
||||
uint8_t cl = 180;
|
||||
// mov cl,180 ;cl pocet zbyvajicich radek
|
||||
uint32_t offset = read_uint32(esi);
|
||||
// add esi,4 ;preskoc ukazatel
|
||||
esi += 4;
|
||||
uint8_t *edx = esi;
|
||||
// mov edx,esi ;edx - zacatek delta mapy
|
||||
uint8_t *data = (esi + offset);
|
||||
// add esi,[esi-4] ;esi - zacatek dat
|
||||
uint16_t *line_beg = edi;
|
||||
//shdl6: push edi ;uloz adresu radku
|
||||
while (cl>0) {
|
||||
uint8_t ch = *edx++;
|
||||
//shdl2: mov ch,[edx] ;cti _skip_ hodnotu
|
||||
// mov al,ch
|
||||
// inc edx
|
||||
// or al,03fh ;test zda jsou 2 nejvyssi bity nastaveny
|
||||
// inc al
|
||||
if ((ch & 0xC0) == 0) {
|
||||
// jz shdl3 ;ano - preskakovani radku
|
||||
edi += ((uint32_t)ch) << 1;
|
||||
// movzx eax,ch ;expanduj _skip_ hodnotu do eax
|
||||
// lea edi,[eax*4+edi] ;vypocti novou pozici na obrazovce
|
||||
ch = *edx++;
|
||||
// mov ch,[edx] ;cti _copy_ hodnotu
|
||||
// inc edx
|
||||
|
||||
void show_full_lfb12e_dx(void *target,void *buff,void *paleta)
|
||||
{
|
||||
__asm
|
||||
{
|
||||
mov edi,target
|
||||
mov esi,buff
|
||||
mov ebx,paleta
|
||||
;edi - target
|
||||
;esi - source
|
||||
;ebx - palette
|
||||
push ebp
|
||||
mov eax,scr_linelen
|
||||
sub eax,640
|
||||
push eax
|
||||
mov dl,180
|
||||
shfl2: mov ecx,160
|
||||
shfl1: lodsw
|
||||
movzx ebp,al
|
||||
movzx ebp,short ptr ds:[ebp*2+ebx]
|
||||
movzx eax,ah
|
||||
movzx eax,short ptr ds:[eax*2+ebx]
|
||||
shl eax,16
|
||||
or eax,ebp
|
||||
mov ebp,eax
|
||||
and ebp,0x7fe07fe0
|
||||
add eax,ebp
|
||||
stosd
|
||||
dec ecx
|
||||
jnz shfl1
|
||||
add edi,[esp]
|
||||
dec dl
|
||||
jnz shfl2
|
||||
pop eax
|
||||
pop ebp
|
||||
while (ch) {
|
||||
uint8_t a = *data++;
|
||||
*edi++ = ebx[a];
|
||||
a = *data++;
|
||||
*edi++ = ebx[a];
|
||||
--ch;
|
||||
}
|
||||
|
||||
//shdl1: lodsw
|
||||
// movzx ebp,al
|
||||
// movzx ebp,short ptr ds:[ebp*2+ebx]
|
||||
// movzx eax,ah
|
||||
// movzx eax,short ptr ds:[eax*2+ebx]
|
||||
// shl eax,16
|
||||
// or eax,ebp
|
||||
// stosd
|
||||
// dec ch ;odecti _copy_ hodnotu
|
||||
// jnz shdl1 ;dokud neni 0
|
||||
// jmp shdl2 ;pokracuj _skip_ hodnotou
|
||||
} else {
|
||||
ch &= 0x3F;
|
||||
++ch;
|
||||
if (ch > cl) ch = cl;
|
||||
line_beg += 320*ch;
|
||||
cl -= ch;
|
||||
edi = line_beg;
|
||||
}
|
||||
|
||||
//shdl3: and ch,3fh ;odmaskuj hodni 2 bity
|
||||
// pop edi ;obnov edi
|
||||
// jnz shdl4 ;pokud je ch=0 preskoc jen jeden radek;
|
||||
// add edi,640 ;preskoc radek
|
||||
// dec cl ;odecti citac radku
|
||||
// jnz shdl6 ;skok pokud neni konec
|
||||
// pop ebp
|
||||
// jmp konec
|
||||
//shdl4: inc ch ;pocet radek je ch+1
|
||||
// sub cl,ch ;odecti ch od zbyvajicich radek
|
||||
// jz shdl5 ;je-li nula tak konec
|
||||
//shdl7: add edi,640 ;preskoc radek
|
||||
// dec ch ;odecti ch
|
||||
// jnz shdl7 ;preskakuj dokud neni 0
|
||||
// jmp shdl6 ;cti dalsi _skip_
|
||||
//shdl5: pop ebp
|
||||
}
|
||||
}
|
||||
//#pragma aux show_full_lfb12e parm[edi][esi][ebx] modify [eax ecx]
|
||||
void show_delta_lfb12e_dx(void *target,void *buff,void *paleta,unsigned long Pitch)
|
||||
{
|
||||
__asm
|
||||
{
|
||||
mov edi,target
|
||||
mov esi,buff
|
||||
mov ebx,paleta
|
||||
;edi - target
|
||||
;esi - buff
|
||||
;ebx - paleta
|
||||
push ebp ;uchovej ebp
|
||||
mov eax,scr_linelen
|
||||
sub eax,640
|
||||
push eax
|
||||
mov cl,180 ;cl pocet zbyvajicich radek
|
||||
add esi,4 ;preskoc ukazatel
|
||||
mov edx,esi ;edx - zacatek delta mapy
|
||||
add esi,[esi-4] ;esi - zacatek dat
|
||||
shdl6: push edi ;uloz adresu radku
|
||||
shdl2: mov ch,[edx] ;cti _skip_ hodnotu
|
||||
mov al,ch
|
||||
inc edx
|
||||
or al,03fh ;test zda jsou 2 nejvyssi bity nastaveny
|
||||
inc al
|
||||
jz shdl3 ;ano - preskakovani radku
|
||||
movzx eax,ch ;expanduj _skip_ hodnotu do eax
|
||||
lea edi,[eax*4+edi] ;vypocti novou pozici na obrazovce
|
||||
mov ch,[edx] ;cti _copy_ hodnotu
|
||||
inc edx
|
||||
shdl1: lodsw
|
||||
movzx ebp,al
|
||||
movzx ebp,short ptr ds:[ebp*2+ebx]
|
||||
movzx eax,ah
|
||||
movzx eax,short ptr ds:[eax*2+ebx]
|
||||
shl eax,16
|
||||
or eax,ebp
|
||||
mov ebp,eax
|
||||
and ebp,0x7fe07fe0
|
||||
add eax,ebp
|
||||
stosd
|
||||
dec ch ;odecti _copy_ hodnotu
|
||||
jnz shdl1 ;dokud neni 0
|
||||
jmp shdl2 ;pokracuj _skip_ hodnotou
|
||||
shdl3: and ch,3fh ;odmaskuj hodni 2 bity
|
||||
pop edi ;obnov edi
|
||||
jnz shdl4 ;pokud je ch=0 preskoc jen jeden radek;
|
||||
add edi,scr_linelen ;preskoc radek
|
||||
dec cl ;odecti citac radku
|
||||
jnz shdl6 ;skok pokud neni konec
|
||||
jmp shdl5
|
||||
shdl4: inc ch ;pocet radek je ch+1
|
||||
sub cl,ch ;odecti ch od zbyvajicich radek
|
||||
jz shdl5 ;je-li nula tak konec
|
||||
shdl7: add edi,scr_linelen ;preskoc radek
|
||||
dec ch ;odecti ch
|
||||
jnz shdl7 ;preskakuj dokud neni 0
|
||||
jmp shdl6 ;cti dalsi _skip_
|
||||
shdl5: pop eax
|
||||
pop ebp
|
||||
}
|
||||
}
|
||||
//konec:
|
||||
// }
|
||||
// }
|
||||
}
|
||||
//#pragma aux show_delta_lfb12e parm[edi][esi][ebx] modify [eax ecx]
|
||||
|
||||
char test_next_frame(void *bufpos,int size)
|
||||
{
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue