10 years later...
Durante uma bela tarde de 1998, com a rede em baixo nos laboratórios de computadores do DI, eu e uns colegas pegámos no Turbo Pascal e programámos um pequeno efeito plasma animado, ao bom estilo geek.
Quase 10 anos depois, o código deste programa serve de inspiração à minha primeira experiência no ambiente Processing. Admirai a obra...
O código desta nova versão é um pouco mais simples do que o código da versão original, onde se podiam encontrar coisas deste género:
Em compensação, é mais lento... O original foi feito num Pentium a 133MHz, enquanto este consome 12% de um Athlon a 2GHz...
Quase 10 anos depois, o código deste programa serve de inspiração à minha primeira experiência no ambiente Processing. Admirai a obra...
O código desta nova versão é um pouco mais simples do que o código da versão original, onde se podiam encontrar coisas deste género:
procedure WaitRetrace; assembler;
label l1,l2;
asm
mov dx,3DAh
l1:
in al,dx
and al,08h
jnz l1
l2:
in al,dx
and al,08h
jnz l2
end;
Em compensação, é mais lento... O original foi feito num Pentium a 133MHz, enquanto este consome 12% de um Athlon a 2GHz...
Não esquecer que na altura um "mov ax, 13h; int10h" colocava a VGA num modo indexado que era perfeito para este tipo de efeito (um color cycling), quando hoje em dia tem que ser emulado nos modos true-color.
Um efeito muito bom que me lembro que era feito com color cycling era o slideshow de símbolos (a amarelo) no Panic da Future Crew em que se tinha uma imagem composta com todos as imagens mas com manipulação da palette se conseguia redesenhar a uma velocidade estrondosa.
Por
Pedro Cardoso, em 21 Abril, 2008 10:23
«Não esquecer que na altura um "mov ax, 13h; int10h" colocava a VGA num modo indexado que era perfeito para este tipo de efeito (um color cycling), quando hoje em dia tem que ser emulado nos modos true-color.»
Pois, era exactamente isso que a versão original fazia, e que esta versão faz (emulação).
Por
Carlos Rodrigues, em 21 Abril, 2008 12:42