int AA_VideoInit(_THIS, SDL_PixelFormat *vformat)
{
int keyboard;
int i;
/* Initialize all variables that we clean on shutdown */
for ( i=0; i<SDL_NUMMODES; ++i ) {
SDL_modelist[i] = SDL_malloc(sizeof(SDL_Rect));
SDL_modelist[i]->x = SDL_modelist[i]->y = 0;
}
/* Modes sorted largest to smallest */
SDL_modelist[0]->w = 1024; SDL_modelist[0]->h = 768;
SDL_modelist[1]->w = 800; SDL_modelist[1]->h = 600;
SDL_modelist[2]->w = 640; SDL_modelist[2]->h = 480;
SDL_modelist[3]->w = 320; SDL_modelist[3]->h = 400;
SDL_modelist[4]->w = 320; SDL_modelist[4]->h = 240;
SDL_modelist[5]->w = 320; SDL_modelist[5]->h = 200;
SDL_modelist[6] = NULL;
/* Initialize the library */
AA_mutex = SDL_CreateMutex();
aa_parseoptions (NULL, NULL, NULL, NULL);
AA_context = aa_autoinit(&aa_defparams);
if ( ! AA_context ) {
SDL_SetError("Unable to initialize AAlib");
return(-1);
}
/* Enable mouse and keyboard support */
if ( ! aa_autoinitkbd (AA_context, AA_SENDRELEASE) ) {
SDL_SetError("Unable to initialize AAlib keyboard");
return(-1);
}
if ( ! aa_autoinitmouse (AA_context, AA_SENDRELEASE) ) {
fprintf(stderr,"Warning: Unable to initialize AAlib mouse");
}
AA_rparams = aa_getrenderparams();
local_this = this;
aa_resizehandler(AA_context, AA_ResizeHandler);
fprintf(stderr,"Using AAlib driver: %s (%s)\n", AA_context->driver->name, AA_context->driver->shortname);
AA_in_x11 = (SDL_strcmp(AA_context->driver->shortname,"X11") == 0);
/* Determine the screen depth (use default 8-bit depth) */
vformat->BitsPerPixel = 8;
vformat->BytesPerPixel = 1;
/* We're done! */
return(0);
}
static void
initialize (void)
{
int i;
context = aa_autoinit (&aa_defparams);
if (context == NULL)
{
printf ("Failed to initialize aalib\n");
exit (1);
}
aa_autoinitkbd(context, 0);
params = aa_getrenderparams ();
bitmap = aa_image (context);
for (i = 0; i < 256; i++)
aa_setpalette (palette, i, pal[i * 3] * 4,
pal[i * 3 + 1] * 4,
pal[i * 3 + 2] * 4);
aa_hidecursor (context);
}
bool AaScreen::_init() {
/* width/height image setup */
ascii_hwparms.width = geo.w / 2; // / 2;
ascii_hwparms.height = geo.h / 2; // / 2;
ascii_rndparms = aa_getrenderparams();
ascii_rndparms->bright = 60;
ascii_rndparms->contrast = 4;
ascii_rndparms->gamma = 1;
ascii_context = aa_autoinit(&ascii_hwparms);
if(!ascii_context) {
error("cannot initialize ASCII screen (aa_autoinit failed)");
return(false);
}
screen_buffer = malloc(geo.bytesize);
return(true);
}
static int aarenderer_open(int w, int h, int fs) {
int argc = 1;
char *argv[] = { "foo", NULL };
int i;
if (!aa_parseoptions(NULL, NULL, &argc, argv) || argc != 1) {
printf("%s\n", aa_help);
return 0;
}
context = aa_autoinit(&aa_defparams);
if (context == NULL) {
printf("Can not intialize aalib\n");
return 0;
}
bitmap = aa_image (context);
params = aa_getrenderparams ();
for (i = 0; i < 256; i++)
aa_setpalette(palette, i, pal[i * 3] * 4, pal[i * 3 + 1] * 4, pal[i * 3 + 2] * 4);
aa_hidecursor(context);
return 1;
}
int main(int argc, char **argv)
{
aa_context *c;
int i, y;
char s[256];
aa_renderparams *p;
strcpy(s, "line editor.");
if (!aa_parseoptions(NULL, NULL, &argc, argv) || argc != 1) {
printf("%s\n", aa_help);
exit(1);
}
c = aa_autoinit(&aa_defparams);
if (c == NULL) {
printf("Can not intialize aalib\n");
exit(2);
}
if (!aa_autoinitkbd(c, 0)) {
printf("Can not intialize keyboard\n");
aa_close(c);
exit(3);
}
for (i = 0; i < aa_imgwidth(c); i++)
for (y = 0; y < aa_imgheight(c); y++)
aa_putpixel(c, i, y, i + y < 80 ? i : ((i + y) < 100 ? (i + y == 89 ? 150 : 0) : y * 8));
aa_hidecursor(c);
aa_fastrender(c, 0, 0, aa_scrwidth(c), aa_scrheight(c));
aa_printf(c, 0, 0, AA_SPECIAL, "Fast rendering routine %i",1);
aa_flush(c);
aa_getkey(c, 1);
aa_edit(c, 0, 1, 20, s, 256);
aa_puts(c, 0, 0, AA_SPECIAL, "Key lookup test ");
aa_flush(c);
int ch;
while ((ch = aa_getevent(c, 1)) != ' ') {
char s[80];
sprintf(s, "Key event test-space to exit. c:%i", ch);
aa_puts(c, 0, 0, AA_SPECIAL, s);
aa_flush(c);
}
if (aa_autoinitmouse(c, AA_MOUSEALLMASK)) {
int co = 0;
sprintf(s, "Mouse test-space to exit");
aa_puts(c, 0, 0, AA_SPECIAL, s);
aa_flush(c);
while (aa_getevent(c, 1) != ' ') {
int x, y, b;
char s[80];
co++;
aa_getmouse(c, &x, &y, &b);
sprintf(s, "Mouse test-space to exit. x:%i y:%i b:%i event #%i ", x, y, b, co);
aa_puts(c, 0, 0, AA_SPECIAL, s);
aa_flush(c);
}
aa_hidemouse(c);
while (aa_getevent(c, 1) != ' ') {
int x, y, b;
char s[80];
co++;
aa_getmouse(c, &x, &y, &b);
sprintf(s, "Hidden mouse test-space to exit. x:%i y:%i b:%i event #%i ", x, y, b, co);
aa_puts(c, 0, 0, AA_SPECIAL, s);
aa_flush(c);
}
aa_uninitmouse(c);
}
p = aa_getrenderparams();
for (i = 0; i < AA_DITHERTYPES; i++) {
p->dither = i;
aa_render(c, p, 0, 0, aa_scrwidth(c), aa_scrheight(c));
aa_puts(c, 0, 0, AA_SPECIAL, aa_dithernames[i]);
aa_flush(c);
aa_getkey(c, 1);
}
for (i = 0; i < 255; i += 32) {
p->bright = i;
aa_render(c, p, 0, 0, aa_scrwidth(c), aa_scrheight(c));
aa_puts(c, 0, 0, AA_SPECIAL, "Normal rendering - bright changes");
aa_flush(c);
aa_getkey(c, 1);
}
p->bright = 0;
for (i = 0; i < 128; i += 16) {
p->contrast = i;
aa_render(c, p, 0, 0, aa_scrwidth(c), aa_scrheight(c));
aa_puts(c, 0, 0, AA_SPECIAL, "Normal rendering - contrast changes");
aa_flush(c);
aa_getkey(c, 1);
}
p->contrast = 0;
for (i = 0; i < 255; i += 32) {
p->gamma = 1 + i / 32.0;
aa_render(c, p, 0, 0, aa_scrwidth(c), aa_scrheight(c));
aa_puts(c, 0, 0, AA_SPECIAL, "Normal rendering - gamma changes");
aa_flush(c);
aa_getkey(c, 1);
}
p->gamma = 1.0;
for (i = 0; i < 255; i += 32) {
p->randomval = i;
aa_render(c, p, 0, 0, aa_scrwidth(c), aa_scrheight(c));
aa_puts(c, 0, 0, AA_SPECIAL, "Normal rendering - randomval changes");
aa_flush(c);
aa_getkey(c, 1);
}
aa_close(c);
return 0;
}
int bb(void)
{
aa_gotoxy(context, 0, 0);
introscreen();
params = aa_getrenderparams();
aa_render(context, params, 0, 0, 1, 1);
font = uncompressfont( /*context->params.font */ &aa_font16);
scenetimer = tl_create_timer();
srand(time(NULL));
if (stage != 1)
finish_stuff = 1;
do
switch (stage) {
default:
case 1:
load_song("bb.s3m");
bbupdate();
starttime = endtime = TIME;
scene1();
scene3();
if (quitnow)
goto quit;
vezen(&fk1, &fk2, &fk3, &fk4);
messager("FILIP KUPSA known as FK, Tingle Notions, Dawn Music\n"
"birth: June 22 1979, Tabor, Czech Republic, sex: male\n"
"\n"
"1992 - Changed his piano for 386/mp.com/pc-speaker music\n"
"1993 - Got his first Sound Blaster\n"
"1995 - Changed his SB for a new GUS technology\n"
"1996 - Composed his first great hits\n"
"1996 - FAT recomposition made by Windows 95\n"
"1997 - Released his musac in BB\n"
"\n"
"1998 - Got retired\n"
"\n"
"Contact address: via KT");
devezen2();
scene4();
scene2();
if (quitnow)
goto quit;
vezen(&ms1, &ms2, &ms3, &ms4);
messager("MOJMIR SVOBODA known as MS, TiTania, MSS, Bill\n"
"birth: ??, Tabor, Czech Republic, sex: ? male ?\n"
"\n"
"1993 - Installed Linux on his 386sx/25 + 40MB HDD\n"
"1994 - Removed Linux to make space for Doom\n"
"1995 - Reinstalled Linux on his 486Dx4/120 + 850MB\n"
"1996 - Removed Linux to make space for Windows 95\n"
"\n"
"1997 - Removed Windows 95 to make space for aalib\n"
"\n"
"Contact address: [email protected]");
devezen3();
scene8();
scene6();
case 2:
if (quitnow)
goto quit;
vezen(&kt1, &kt2, &kt3, &kt4);
messager("KAMIL TOMAN known as KT, Kato, Whale, Bart\n"
"birth: May 19 1979, Tabor, Czech Republic, sex: male\n"
"\n"
"1993 - Became a linux extremist\n"
"1993 - Successful attempt to establish a secret organization\n"
" Commandline Brotherhood\n"
"1995 - Action 'koules' - a secret project to train brotherhood\n"
" members - covered under a game design\n"
"\n"
"1998 - Heading a new wave of command line revolution\n"
"\n"
"Contact address: [email protected]");
bbupdate();
starttime = endtime = TIME;
devezen1();
if (quitnow)
goto quit;
scene7();
if (quitnow)
goto quit;
scene5();
if (quitnow)
goto quit;
scene10();
vezen(&hh1, &hh2, &hh3, &hh4);
messager("JAN HUBICKA known as HH, Jahusoft, HuJaSoft, JHS, UNIX, Honza\n"
"birth: Apr 1 1978, Tabor, Czech Republic, sex: male\n"
"\n"
"1991 - Installed underground hackers OS Linux\n"
"1995 - Headed Action 'koules'\n"
"1996 - Famous troan XaoS to convert all windows instalations\n"
" into Linux\n"
"\n"
"1998 - Secret plan to make `Text Windows` system to confuse users\n"
"2001 - Planning an assassination of dictator Bill G.\n"
"\n"
"Contact address: [email protected]");
devezen4();
if (quitnow)
goto quit;
credits();
if (quitnow)
goto quit;
case 3:
if (loopmode)
break;
credits2();
}
while (loopmode);
quit:;
aa_close(context);
return (0);
}
int main(int argc, char **argv) {
int help_flag = 0;
int aahelp_flag = 0;
int justoutput_flag = 0;
int loadavg_flag = 0;
int ipc_flag = 0;
int port_num = DEFPORT;
int max_iterations = 0;
int delay = 0;
int normal_load;
int socket_fd = -1;
float randomizestyletime = 0;
float randomizesitetime = 0;
char *endptr;
setlocale(LC_ALL, "");
bindtextdomain("aajm", LOCALEDIR);
textdomain("aajm");
char options[] = "aljhip:n:d:m:t:s:T:S:";
static struct option long_options[] =
{
{"help", no_argument, &help_flag, 1},
{"aahelp", no_argument, &aahelp_flag, 1},
{"justoutput", no_argument, &justoutput_flag, 1},
{"ipc", no_argument, &ipc_flag, 1},
{"loadavg", no_argument, &loadavg_flag, 1},
{"maxiterations", required_argument, 0, 'm'},
{"port", required_argument, 0, 'p'},
{"normalload", required_argument, 0, 'n'},
{"delay", required_argument, 0, 'd'},
{"siteswap", required_argument, 0, 's'},
{"style", required_argument, 0, 't'},
{"rstyle", required_argument, 0, 'S'},
{"rsiteswap", required_argument, 0, 'T'},
{0,0,0,0}
};
normal_load = (int)(DEFLOAD * 100);
char optch;
int option_index = 0;
//jmlib = new JMLib(errorCB);
jmlib = JMLib::alloc();
jmlib->setPatternDefault();
jmlib->setStyleDefault();
jmlib->startJuggle();
aa_parseoptions(NULL, NULL, &argc, argv);
while( (optch = getopt_long(argc,argv,options,
long_options,&option_index)) != -1)
switch(optch) {
case 's':
jmlib->setPattern("Something",optarg,
HR_DEF, DR_DEF);
break;
case 't':
jmlib->setStyle(optarg);
break;
case 'S':
randomizesitetime = strtod(optarg, &endptr);
if (endptr==optarg || *endptr != 0) {
randomizesitetime = DEFRANDOMSITETIME;
}
break;
case 'T':
randomizestyletime = strtod(optarg, &endptr);
if (endptr==optarg || *endptr != 0) {
randomizestyletime = DEFRANDOMSTYLETIME;
}
break;
case 'h':
help_flag=1;
break;
case 'a':
aahelp_flag=1;
break;
case 'j':
justoutput_flag=1;
break;
case 'm':
max_iterations = atoi(optarg);
break;
case 'd':
delay = atoi(optarg);
break;
case 'l':
loadavg_flag=1;
break;
case 'n':
normal_load = (int)(100*atof(optarg));
break;
case 'i':
ipc_flag=1;
break;
case 'p':
port_num=atoi(optarg);
break;
}
if(aahelp_flag || help_flag) {
printf(gettext("AAJM, An ASCII Art Juggling program\n"));
printf(gettext("Usage: %s [OPTIONS]\n"),argv[0]);
}
if(help_flag) {
printf(gettext("Jugglemaster Options:\n"));
printf(gettext(" -s, --siteswap=XX show siteswap XX (3)\n"));
printf(gettext(" -t, --style=XX use style XX (\"Normal\")\n"));
printf(gettext(" -S, --rsiteswap=XX Randomize siteswap every XX seconds (%f)\n"), DEFRANDOMSITETIME);
printf(gettext(" -T, --rstyle=XX Randomize style every XX seconds (%f)\n"), DEFRANDOMSTYLETIME);
printf(gettext(" -d, --delay=XX delay XX ms between frames (%i)\n"), (int)DEFSPEED/1000);
printf(gettext(" -m, --maxiterations=XX do at most XX iterations\n"));
printf(gettext(" -j, --justoutput only output [don't init kb or mouse]\n"));
printf(gettext(" -i, --ipc enable IPC\n"));
printf(gettext(" -p, --port=XX use port XX for IPC (%i)\n"),DEFPORT);
printf(gettext(" -l, --loadavg change speed based on load average\n"));
printf(gettext(" -n, --normalload=XX a normal load average for your machine (%2.2f)\n"),DEFLOAD);
printf(gettext(" -h, --help get help [this screen]\n"));
printf(gettext(" -a, --aahelp get help on AA options\n\n"));
}
if(aahelp_flag) {
printf(gettext("AALib Options:\n%s\n\n"),aa_help);
}
if(aahelp_flag || help_flag) {
return 0;
}
context = aa_autoinit(&aa_defparams);
if (context == NULL) {
printf(gettext("Failed to initialize aalib\n"));
exit(1);
}
if(!justoutput_flag) {
aa_autoinitkbd(context, 0);
aa_hidecursor(context);
}
params = aa_getrenderparams();
jmlib->setWindowSize(aa_imgwidth(context),aa_imgheight(context));
jmlib->startJuggle();
aa_resizehandler(context, resizehandler);
if(loadavg_flag) {
/* If we're doing that thing where we care, then this
can go down to as-low-as-possible priority */
nice(19);
}
if(ipc_flag) {
socket_fd = startlistening(port_num);
}
main_loop(max_iterations,delay,loadavg_flag,normal_load, socket_fd,
randomizestyletime, randomizesitetime);
if(socket_fd > 0) {
stoplistening(socket_fd);
}
aa_close(context);
delete jmlib;
return 1;
}
status_t
AalibTranslator::DerivedTranslate(BPositionIO *source,
const translator_info *info, BMessage *ioExtension,
uint32 outType, BPositionIO *target, int32 baseType)
{
if(baseType == 1 && outType == AALIB_TEXT_FORMAT) {
BBitmap *originalbmp, *greyscalebmp;
BRect bounds;
int imgWidth;
int imgHeight;
int imgHalfWidth;
int imgHalfHeight;
aa_context *context;
aa_renderparams *params;
aa_palette palette;
struct aa_hardware_params hwparams;
// get the image
originalbmp = BTranslationUtils::GetBitmap(source);
if(originalbmp == NULL) {
return B_ERROR;
}
// get the image size
bounds = originalbmp->Bounds();
imgWidth = bounds.IntegerWidth()+1;
imgHeight = bounds.IntegerHeight()+1;
// convert the bitmap to greyscale
greyscalebmp = new BBitmap(bounds, B_GRAY8);
if(greyscalebmp->ImportBits(originalbmp) != B_OK) {
return B_ERROR;
}
// get half the height and width, rounded up
// aalib outputs half the height and width of the original
if(imgWidth%2 == 1)
imgHalfWidth = (imgWidth+1)/2;
else
imgHalfWidth = imgWidth/2;
if(imgHeight%2 == 1)
imgHalfHeight = (imgHeight+1)/2;
else
imgHalfHeight = imgHeight/2;
// use some custom settings
memcpy(&hwparams, &aa_defparams, sizeof(struct aa_hardware_params));
hwparams.font = NULL; // default font
// output is half of original width and height
hwparams.width = imgHalfWidth;
hwparams.height = imgHalfHeight;
// new aalib context
// use mem_d (memory drive) as we will get the output ourselves
context = aa_init(&mem_d, &hwparams, NULL);
if(context == NULL)
return B_ERROR;
// we can't use memcpy, as the image width
// might not be equal to the bytes per row
/*memcpy(context->imagebuffer,
greyscalebmp->Bits(),
imgWidth*imgHeight);*/
// get the location of the bitmap bits, and the bytes per row
unsigned char *bitsLocation = (unsigned char*)greyscalebmp->Bits();
int bytesPerRow = greyscalebmp->BytesPerRow();
for(int y=0; y<imgHeight; y++) { // for each row and column
for(int x=0; x<imgWidth; x++) {
// set the pixel
// 255- is to invert the greyscale image
aa_putpixel(context, x, y,
255-(bitsLocation[y*bytesPerRow+x]));
}
}
// render the image
params = aa_getrenderparams();
aa_render(context, params, 0, 0, imgWidth, imgHeight);
for(int i=0; i<imgHalfHeight; i++) { // for each row
if(i != 0) { // after first line, write newline
target->Write("\n",1);
}
// output that line
target->Write(context->textbuffer+i*imgHalfWidth,imgHalfWidth);
}
aa_close(context);
free(originalbmp);
delete greyscalebmp;
delete originalbmp;
return B_OK;
}
return B_NO_TRANSLATOR;
}
