Hey All,

I've writing a little 8088 Corruption player [1] w/ SDL_Perl but I've
come across a few issues.

The data format is very much like an ANSI file where there's a
background color then a char on top of in another color. each
character in an 8x8 block needs to be checked against the bit mask of
the font to see if it writes a fg color to the screen or not.

I've attached my program + a required font data file to this message.
you can grab the original movie data file (8088_COR.DAT) from the
original zip [2].

You can see the section commented out in my program that does the fg
color calculations. Things slow to a crawl once you uncomment that
section.

If anyone has any ideas on how to speed this up, I'd love to hear them.

My other question is that I can't for the life of me figure out how to
play the audio frame portion ($abuffer in the program) -- is it even
possible to play raw audio from a variable with SDL_Perl?

-Brian

[1] http://www.oldskool.org/pc/8088_Corruption
[2] http://www.oldskool.org/pc/8088_Corruption/8088_cor.zip

Attachment: 8088_player.pl
Description: Perl program

Attachment: CGA_FONT.8X8
Description: Binary data

Reply via email to