[DLL] GMTINT

• Melhoria na velocidade de algumas funções
  
• Agora é possível definir e retornar valores HSV
  
• Implementação de sistema e data estruturadas para paletas

• É possível alterar sprites e backgrounds;
  
• É possível trocar todos os pixels de uma mesma cor de uma só vez;
  
• Use seleções retangulares para editar certas partes;
  
• Surfaces não são suportadas;
  
• Muitos scripts de conversão para trabalhar com as cores

gabrielsch escreveu:

Eae cabeção! Finalmente voltou!

Bem, estou tendo um erro aqui, ao executar estou recebendo o seguinte erro:

O programa não pode ser iniciado porque está faltando MSVCP100D.dll no seu computador. Tente reinstalá-lo para resolver esse problema.

Então Kabeção, o que me diz? Queria muito testar essa DLL!

Flw!

gabrielsch escreveu:

Ainda não funcionou!

Eu fui instalar, e disse que o Microsoft Visual C++ 2010 Redistributable Package já estava instalado no meu PC, mesmo assim eu reparei, lembrando que meu sistema operacional é x64 bits, então eu baixei o x86 e x64 e ambos deram a mesma mensagem.

Mesmo depois de reparar ele ainda acusa o mesmo erro!

Flw!

Pedrø escreveu:Kabeção, não está funcionando aqui não.
O que será que pode ser?
Às vezes, o fundo muda. Mas o sprite mesmo não...
Alguma ideia?

Até mais!

Código:


/*
    pallete_create_from_act('arquivo da paleta');
*/

var n, npal, nfile, nread, ntype, palsize;

nfile := argument0;

if not file_exists(nfile) then
begin
    show_error('Act file not found.', false);
    return (false) ;
end;

palsize := false;
nread := file_bin_open(nfile, 0);
ntype := file_bin_size(nread);

if ntype = $300 then palsize := $100;
if ntype = $304 then
begin
    file_bin_seek(nread, $301);
    palsize := file_bin_read_byte(nread);
end;

if palsize = false then
begin
    show_error('Invalid or corrupted act file.', false);
    file_bin_close(nread);
    return (false);
end;

npal := gmt_ds_palette_create(palsize, 0);

file_bin_seek(nread, 0);

for (n := 0; n < palsize; n += 1)
begin
    ncolor := $FF;
    repeat (3) ncolor := (ncolor << 8) | file_bin_read_byte(nread);
    gmt_ds_palette_set(npal, n, ncolor);
end;

file_bin_close(nread);

return (npal);

Código:


/*
    pallete_redefine_from_act(id_da_paleta, 'arquivo da paleta');
*/

var n, npal, nfile, nread, ntype, palsize, palid;

palid := argument0;
nfile := argument1;

if not file_exists(nfile) then
begin
    show_error('Act file not found.', false);
    return (false) ;
end;

palsize := false;
nread := file_bin_open(nfile, 0);
ntype := file_bin_size(nread);

if ntype = $300 then palsize := $100;
if ntype = $304 then
begin
    file_bin_seek(nread, $301);
    palsize := file_bin_read_byte(nread);
end;

if palsize = false then
begin
    show_error('Invalid or corrupted act file.', false);
    file_bin_close(nread);
    return (false);
end;

file_bin_seek(nread, 0);

for (n := 0; n < palsize; n += 1)
begin
    ncolor := $FF;
    repeat (3) ncolor := (ncolor << 8) | file_bin_read_byte(nread);
    gmt_ds_palette_set(palid, n, ncolor);
end;

file_bin_close(nread);

return (true);


Ninja8086 escreveu:Vou postar novamente os scripts que criei, pois haviam se perdido com o último problema do fórum... :|

Esse script cria uma nova ds de cores a partir de um arquivo de paletas ACT (Photoshop, Mugen, etc...)

Código:


/*
    pallete_create_from_act('arquivo da paleta');
*/

var n, npal, nfile, nread, ntype, palsize;

nfile := argument0;

if not file_exists(nfile) then
begin
    show_error('Act file not found.', false);
    return (false) ;
end;

palsize := false;
nread := file_bin_open(nfile, 0);
ntype := file_bin_size(nread);

if ntype = $300 then palsize := $100;
if ntype = $304 then
begin
    file_bin_seek(nread, $301);
    palsize := file_bin_read_byte(nread);
end;

if palsize = false then
begin
    show_error('Invalid or corrupted act file.', false);
    file_bin_close(nread);
    return (false);
end;

npal := gmt_ds_palette_create(palsize, 0);

file_bin_seek(nread, 0);

for (n := 0; n < palsize; n += 1)
begin
    ncolor := $FF;
    repeat (3) ncolor := (ncolor << 8) | file_bin_read_byte(nread);
    gmt_ds_palette_set(npal, n, ncolor);
end;

file_bin_close(nread);

return (npal);

Esse apenas redefine uma ds já criada, usando uma nova configuração, a partir de um arquivo ACT.

Código:


/*
    pallete_redefine_from_act(id_da_paleta, 'arquivo da paleta');
*/

var n, npal, nfile, nread, ntype, palsize, palid;

palid := argument0;
nfile := argument1;

if not file_exists(nfile) then
begin
    show_error('Act file not found.', false);
    return (false) ;
end;

palsize := false;
nread := file_bin_open(nfile, 0);
ntype := file_bin_size(nread);

if ntype = $300 then palsize := $100;
if ntype = $304 then
begin
    file_bin_seek(nread, $301);
    palsize := file_bin_read_byte(nread);
end;

if palsize = false then
begin
    show_error('Invalid or corrupted act file.', false);
    file_bin_close(nread);
    return (false);
end;

file_bin_seek(nread, 0);

for (n := 0; n < palsize; n += 1)
begin
    ncolor := $FF;
    repeat (3) ncolor := (ncolor << 8) | file_bin_read_byte(nread);
    gmt_ds_palette_set(palid, n, ncolor);
end;

file_bin_close(nread);

return (true);