intro.cpp

extern "C" {
#include "intro.h"
#include "platform.h"
#include "device.h"
#include "paddle.h"
#include "round.h"
#include "effects.h"
#include "trig.h"
#include "ui.h"
#include "midi.h"
#include "startup.h"
#include "sound.h"
}

#include <stdlib.h>
#include <string.h>

DxBallIntroPoint dxball_intro_points[287];
DxBallIntroOffset dxball_intro_offsets[360];
DxBallUInt dxball_intro_tick;
DxBallInt dxball_intro_cursor_x, dxball_intro_cursor_y;
DxBallInt dxball_scroller_length, dxball_scroller_shift, dxball_scroller_index;
DxBallInt dxball_scroller_reserved, dxball_scroller_advance;
DxBallInt dxball_credit_angle, dxball_credit_first_y, dxball_credit_second_y;
DxBallInt dxball_splash_span = 120, dxball_splash_phase = 1, dxball_splash_offset;

/* FUNCTION: DXBALL 0x00402340 */
DxBallInt dxball_raw_sine(DxBallInt angle)
{
    if (angle < 0) {
        angle = 360 - (-angle) % 360;
    } else {
        angle %= 360;
    }
    angle = dxball_sine_table[angle];
    return angle;
}
/* FUNCTION: DXBALL 0x004023A0 */
DxBallInt dxball_raw_cosine(DxBallInt angle)
{
    if (angle < 0) {
        angle = 360 - (-angle) % 360;
    } else {
        angle %= 360;
    }
    angle = dxball_cosine_table[angle];
    return angle;
}
/* FUNCTION: DXBALL 0x00402520 */
DxBallInt dxball_wave_x(DxBallInt origin, DxBallInt angle, DxBallInt amplitude)
{
    origin += dxball_raw_cosine(angle) * amplitude / 1024;
    return origin;
}
/* FUNCTION: DXBALL 0x00402560 */
DxBallInt dxball_wave_y(DxBallInt origin, DxBallInt angle, DxBallInt amplitude)
{
    origin += dxball_raw_sine(angle) * amplitude / 1024;
    return origin;
}

void dxball_initialize_intro_points(void)
{
    struct { DxBallInt angle, index, y, x; } grid;
    {
        /* Consumed local binary mask: 41 columns by seven rows. */
        char mask[287] = {
            0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
            0, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
            0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
            0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
            0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
            0, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0,
            0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
        };
        grid.x = 116; grid.y = 41; grid.angle = 0;
        for (grid.index = 0; grid.index < 287; ++grid.index) {
            dxball_intro_points[grid.index].x = grid.x;
            dxball_intro_points[grid.index].y = grid.y;
            dxball_intro_points[grid.index].angle = grid.angle;
            dxball_intro_points[grid.index].kind = mask[grid.index];
            if (mask[grid.index] == 1) {
                dxball_intro_points[grid.index].y -= 5;
                dxball_intro_points[grid.index].angle += 30;
            }
            grid.x += 10;
            grid.angle += 20;
            if (grid.x - 116 > 400) {
                grid.x = 116;
                grid.y += 10;
                grid.angle = grid.y - 41;
            }
        }
    }
    for (grid.index = 0; grid.index < 360; ++grid.index) {
        dxball_intro_offsets[grid.index].x = dxball_wave_x(0, grid.index, 4);
        dxball_intro_offsets[grid.index].y = dxball_wave_y(0, grid.index, 3);
    }
    return;
}

void dxball_update_intro_points(void)
{
    DxBallRect rect;
    if (dxball_elapsed(dxball_intro_tick, 50) == 0)
        return;
    dxball_select_surface((DxBallSurface)dxball_board_surface);
    {
        DxBallColorFillFx fill;
        /* The original writes these fields although no call consumes the object. */
        fill.size = sizeof(fill);
        fill.fill_color = 0;
        (void)fill;
    }
    rect.top = 37; rect.bottom = 115;
    rect.left = 112; rect.right = 530;
    ((DxBallDDSurface *)dxball_active_surface)->blt_fast(rect.left, rect.top,
        (DxBallDDSurface *)dxball_background_surface, &rect, 0x10);
    {
        DxBallInt i;
        {
            DxBallInt result;
            DxBallSurfaceDesc desc;
            desc.size = 108; desc.flags = 14;
            ((DxBallDDSurface *)dxball_active_surface)->get_desc(&desc);
            do {
                result = ((DxBallDDSurface *)dxball_active_surface)->lock(NULL, &desc, 0, NULL);
            } while (result != 0);
            for (i = 0; i < 287; ++i) {
                if (dxball_intro_points[i].kind == 0) {
                    DxBallByte *pixel;
                    dxball_intro_points[i].angle += 30;
                    if (dxball_intro_points[i].angle > 359)
                        dxball_intro_points[i].angle %= 360;
                    pixel = desc.pixels;
                    pixel += (dxball_intro_points[i].y +
                        dxball_intro_offsets[dxball_intro_points[i].angle].y) * desc.pitch +
                        dxball_intro_points[i].x +
                        dxball_intro_offsets[dxball_intro_points[i].angle].x;
                    *pixel = 200;
                }
            }
            ((DxBallDDSurface *)dxball_active_surface)->unlock(NULL);
        }
        for (i = 0; i < 287; ++i) {
            if (dxball_intro_points[i].kind == 1) {
                dxball_intro_points[i].angle += 30;
                if (dxball_intro_points[i].angle > 359)
                    dxball_intro_points[i].angle %= 360;
                dxball_draw_keyed_sprite(1,
                    dxball_intro_points[i].x +
                    dxball_intro_offsets[dxball_intro_points[i].angle].x,
                    dxball_intro_points[i].y +
                    dxball_intro_offsets[dxball_intro_points[i].angle].y);
            }
        }
    }
    dxball_invalidate_region(rect);
    dxball_animate_palette(200, 207, 1);
    dxball_intro_tick = dxball_current_time();
    return;
}

void dxball_initialize_intro(void)
{
    dxball_reset_regions();
    dxball_clear_surface((DxBallSurface)dxball_background_surface, 0);
    dxball_load_pcx((DxBallDDSurface *)dxball_background_surface, "mainmenu.pcx", 2, 0, 0);
    dxball_load_sprite_bank(0, 1, "mainmenu.sbk");
    dxball_load_sprite_bank(1, 0, "thefont.sbk");
    dxball_load_sprite_bank(2, 0, "sfont.sbk");
    dxball_select_sprite_bank(0); dxball_select_font_bank(1);
    dxball_load_music("ethno_pa.mds", 1);
    dxball_bind_board_surface((DxBallSurface)dxball_board_surface);
    dxball_intro_tick = 0;
    if (dxball_draw_to_primary == 0) {
        dxball_bind_display_surface((DxBallSurface)dxball_secondary_surface);
    } else {
        dxball_bind_display_surface((DxBallSurface)dxball_primary_surface);
    }
    dxball_redraw_mode();
    dxball_initialize_intro_points();
    dxball_update_intro_points();
    dxball_restore_regions();
    if (dxball_draw_to_primary == 0) dxball_present();
    dxball_palette_transition(1, 6, 0, 255, 1);
    return;
}

void dxball_redraw_intro(void)
{
    DxBallRect rect;
    rect.left = 0; rect.top = 0; rect.right = 640; rect.bottom = 480;
    dxball_clear_surface((DxBallSurface)dxball_primary_surface, 0);
    if (dxball_draw_to_primary == 0) dxball_clear_surface((DxBallSurface)dxball_secondary_surface, 0);
    dxball_clear_surface((DxBallSurface)dxball_board_surface, 0);
    ((DxBallDDSurface *)dxball_board_surface)->blt(&rect,
        (DxBallDDSurface *)dxball_background_surface, &rect, 0x01000000, NULL);
    dxball_select_surface((DxBallSurface)dxball_board_surface); dxball_select_font_bank(2);
    dxball_wait_frames(1);
    if ((DxBallUInt)dxball_score > 0) {
        char text[32], number[11];
        DxBallInt count;
        strcpy(text, "Last Score - ");
        _ultoa((unsigned long)(DxBallUInt)dxball_score, number, 10);
        strcat(text, number);
        count = (DxBallInt)strlen(text);
        dxball_draw_text(3, 10, count, text);
    }
    dxball_wait_frames(1); dxball_draw_text(615, 10, 6, "V 1.07");
    dxball_wait_frames(1); dxball_draw_text(485, 130, 19, "By Michael P. Welch");
    dxball_wait_frames(1); dxball_draw_text(3, 465, 59, "Copyright  1996  by Michael P. Welch,  All Rights Reserved.");
    dxball_wait_frames(1); dxball_draw_text(3, 475, 109, "You may freely distribute this game so long as it's not sold for profit without the author's written consent.");
    dxball_select_font_bank(1);
    dxball_wait_frames(1); dxball_draw_centered_text(317, 210, 22, "BASED ON  ``MEGABALL``");
    dxball_wait_frames(1); dxball_draw_centered_text(317, 250, 19, "BY ED AND AL MACKEY");
    ((DxBallDDSurface *)dxball_primary_surface)->blt(&rect,
        (DxBallDDSurface *)dxball_board_surface, &rect, 0x01000000, NULL);
    if (dxball_draw_to_primary == 0) {
        ((DxBallDDSurface *)dxball_secondary_surface)->blt(&rect,
            (DxBallDDSurface *)dxball_board_surface, &rect, 0x01000000, NULL);
    }
    return;
}

void dxball_intro_frame(void)
{
    if (dxball_draw_to_primary != 0) dxball_wait_frames(1);
    dxball_restore_regions();
    dxball_intro_cursor_x = dxball_mouse_x;
    dxball_intro_cursor_y = dxball_mouse_y;
    if (dxball_intro_cursor_x > 599) dxball_intro_cursor_x = 599;
    if (dxball_intro_cursor_x < 8) dxball_intro_cursor_x = 8;
    if (dxball_intro_cursor_y > 447) dxball_intro_cursor_y = 447;
    dxball_update_intro_points();
    if (dxball_draw_to_primary == 0) dxball_present();
    dxball_rotate_palette_right(48, 63, 1);
    if (dxball_mouse_action == 1) { dxball_end_requested = 1; dxball_return_to_menu = 1; dxball_mouse_action = 0; }
    if (dxball_mouse_action == 2) dxball_mouse_action = 0;
    return;
}
void dxball_intro_key(char key)
{
    switch (key) {
    case ' ': break;
    case 'p':
        if (dxball_control_pressed != 0) {
            dxball_end_requested = 1;
            dxball_return_to_menu = 2;
        }
        break;
    case 'q': break;
    case 'r': break;
    case 't': break;
    case 'u': break;
    case 'v': break;
    case 'w': break;
    case 'x': break;
    case 'y': break;
    case 'z': break;
    case '{': break;
    }
    return;
}
void dxball_dispose_intro(DxBallInt fade)
{
    DxBallRect rect;
    rect.left = 0; rect.top = 0; rect.right = 640; rect.bottom = 480;
    if (fade != 0) {
        dxball_palette_transition(1, 6, 0, 255, 0);
        dxball_clear_surface((DxBallSurface)dxball_board_surface, 0);
        dxball_clear_surface((DxBallSurface)dxball_primary_surface, 0);
        if (dxball_draw_to_primary == 0) {
            ((DxBallDDSurface *)dxball_secondary_surface)->blt(&rect,
                (DxBallDDSurface *)dxball_board_surface, &rect, 0x01000000, NULL);
        }
        dxball_release_sprite_banks();
        dxball_release_sounds();
        dxball_close_music();
    }
    return;
}

void dxball_initialize_splash(void)
{
    DxBallColorKey key;
    DxBallInt i;
    dxball_reset_regions(); dxball_clear_surface((DxBallSurface)dxball_background_surface, 0);
    dxball_load_pcx((DxBallDDSurface *)dxball_background_surface, "intro.pcx", 2, 0, 0);
    dxball_load_sprite_bank(0, 0, "candy.sbk");
    dxball_load_sprite_bank(1, 0, "chisel2.sbk");
    dxball_select_sprite_bank(0); dxball_select_font_bank(1);
    dxball_load_sound(0, "whine.wav");
    dxball_bind_board_surface((DxBallSurface)dxball_board_surface);
    if (dxball_draw_to_primary == 0) {
        dxball_bind_display_surface((DxBallSurface)dxball_secondary_surface);
    } else {
        dxball_bind_display_surface((DxBallSurface)dxball_primary_surface);
    }
    dxball_scroller_reserved = 0; dxball_scroller_length = (DxBallInt)strlen(dxball_welcome_text);
    dxball_scroller_index = 0; dxball_scroller_shift = 0; dxball_scroller_advance = 0;
    dxball_credit_first_y = 0; dxball_credit_second_y = 0; dxball_credit_angle = 0;
    key.low = 0; key.high = 0;
    ((DxBallDDSurface *)dxball_board_surface)->set_color_key(8, &key);
    dxball_redraw_mode(); dxball_update_sound(0, 0, 0, 0);
    for (i = 48; i <= dxball_splash_span + 48; ++i) {
        dxball_saved_palette[i].red = 0;
        dxball_saved_palette[i].green = 0;
        dxball_saved_palette[i].blue = 0;
    }
    dxball_palette_transition(1, 6, 0, 255, 1);
    return;
}

void dxball_redraw_splash(void)
{
    DxBallRect full;
    full.left = 0; full.top = 0; full.right = 640; full.bottom = 480;
    dxball_clear_surface((DxBallSurface)dxball_primary_surface, 0);
    if (dxball_draw_to_primary == 0) dxball_fill_rect((DxBallSurface)dxball_secondary_surface, 0, 0, 639, 479, 0);
    dxball_clear_surface((DxBallSurface)dxball_board_surface, 0);
    ((DxBallDDSurface *)dxball_board_surface)->blt(&full,
        (DxBallDDSurface *)dxball_background_surface, &full, 0x01000000, NULL);
    {
        DxBallRect logo;
        DxBallInt y;
        logo.left = 0; logo.top = 19; logo.right = 639; logo.bottom = 169;
        ((DxBallDDSurface *)dxball_primary_surface)->blt(&logo,
            (DxBallDDSurface *)dxball_board_surface, &logo, 0x01000000, NULL);
        if (dxball_draw_to_primary == 0) {
            dxball_bind_display_surface((DxBallSurface)dxball_primary_surface); dxball_draw_waving_credits();
            dxball_bind_display_surface((DxBallSurface)dxball_secondary_surface);
        }
        for (y = 155; y <= dxball_splash_span * 2 + 155; y += 2) {
            dxball_draw_line(dxball_primary_surface, 0, y, 639, y, (DxBallByte)((y - 155) / 2 + 48));
            dxball_draw_line(dxball_primary_surface, 0, y + 1, 639, y + 1, (DxBallByte)((y - 155) / 2 + 48));
        }
        dxball_select_surface((DxBallSurface)dxball_primary_surface); dxball_select_font_bank(0);
        dxball_draw_text(20, 190, 11, "VIDEO CARD:");
        if (dxball_software_only != 0) {
            dxball_draw_text(180, 190, 24, "NO HARDWARE ACCELERATION");
            dxball_draw_text(210, 210, 28, "DEFAULT TO >COMPATIBLE< MODE");
        } else if (dxball_low_video_memory != 0) {
            dxball_draw_text(180, 190, 16, "LOW VIDEO MEMORY");
            dxball_draw_text(210, 210, 28, "DEFAULT TO >COMPATIBLE< MODE");
        } else if (dxball_wait_vertical_blank == 0) {
            dxball_draw_text(180, 190, 25, "REFRESH RATE ABOVE 60 MHZ");
            dxball_draw_text(210, 210, 28, "DEFAULT TO >COMPATIBLE< MODE");
        } else {
            dxball_draw_text(180, 190, 27, "HARDWARE ACCELERATION FOUND");
            dxball_draw_text(210, 210, 13, "AND SUPPORTED");
        }
        dxball_draw_text(20, 245, 7, "AUTHOR:");
        dxball_draw_text(180, 245, 16, "MICHAEL P. WELCH");
        dxball_draw_text(20, 265, 7, "3D GFX:");
        dxball_draw_text(180, 265, 14, "SEUMAS McNALLY");
        dxball_draw_text(20, 300, 7, "E-MAIL:");
        dxball_draw_text(180, 300, 18, "MWELCH@NETWAVE.NET");
        dxball_draw_centered_text(320, 330, 41, "SEND COMMENTS, BUGS, AND GREETINGS TO GET");
        dxball_draw_centered_text(320, 350, 37, "HINT FOR LEVEL EDITOR AND OTHER TIPS.");
    }
    if (dxball_draw_to_primary == 0) {
        ((DxBallDDSurface *)dxball_secondary_surface)->blt(&full,
            (DxBallDDSurface *)dxball_primary_surface, &full, 0x01000000, NULL);
    }
    return;
}

void dxball_update_scroller(void)
{
    DxBallRect rect;
    dxball_select_font_bank(1); dxball_scroller_shift += 4;
    if (dxball_scroller_advance < dxball_scroller_shift) {
        ++dxball_scroller_index;
        if (dxball_scroller_index > dxball_scroller_length - 1) dxball_scroller_index = 0;
        dxball_select_surface((DxBallSurface)dxball_board_surface);
        dxball_scroller_advance = dxball_draw_glyph(dxball_welcome_text[dxball_scroller_index], 600, 470) + 1;
        if (dxball_scroller_advance == 1) dxball_scroller_advance = 15;
        dxball_scroller_shift = 0;
    }
    rect.left = 40; rect.top = 440; rect.right = 639; rect.bottom = 475;
    ((DxBallDDSurface *)dxball_board_surface)->blt_fast(36, 440,
        (DxBallDDSurface *)dxball_board_surface, &rect, 0x10);
    return;
}
void dxball_draw_scroller_wave(void)
{
    DxBallRect rect;
    struct { DxBallInt x, step; } cursor;
    rect.top = 440; rect.bottom = 475;
    cursor.step = 5;
    for (cursor.x = 40; cursor.x <= 600 - cursor.step; cursor.x += cursor.step) {
        rect.left = cursor.x; rect.right = cursor.step + cursor.x;
        if (dxball_reduced_particles != 0) {
            ((DxBallDDSurface *)dxball_primary_surface)->blt_fast(cursor.x,
                (DxBallInt)(dxball_sine(cursor.x) * 20.0) + 420,
                (DxBallDDSurface *)dxball_board_surface, &rect, 0x10);
        } else {
            ((DxBallDDSurface *)dxball_effect_surface)->blt_fast(cursor.x,
                (DxBallInt)(dxball_sine(cursor.x) * 20.0) + 420,
                (DxBallDDSurface *)dxball_board_surface, &rect, 0x10);
        }
    }
    return;
}
void dxball_draw_waving_credits(void)
{
    DxBallRect first, second;
    first.left = 0; first.top = 335; first.right = 639; first.bottom = 353;
    second.left = 0; second.top = 362; second.right = 639; second.bottom = 380;
    dxball_credit_angle += 20;
    if (dxball_credit_angle > 359) dxball_credit_angle %= 360;
    dxball_credit_first_y = (DxBallInt)(dxball_sine(dxball_credit_angle) * 3.0);
    dxball_credit_second_y = (DxBallInt)(dxball_sine(-dxball_credit_angle) * 3.0);
    if (dxball_reduced_particles != 0) {
        ((DxBallDDSurface *)dxball_primary_surface)->blt_fast(0, dxball_credit_first_y + 3,
            (DxBallDDSurface *)dxball_board_surface, &first, 0x10);
        ((DxBallDDSurface *)dxball_primary_surface)->blt_fast(0, dxball_credit_second_y + 127,
            (DxBallDDSurface *)dxball_board_surface, &second, 0x10);
    } else {
        ((DxBallDDSurface *)dxball_effect_surface)->blt_fast(0, dxball_credit_first_y + 3,
            (DxBallDDSurface *)dxball_board_surface, &first, 0x10);
        ((DxBallDDSurface *)dxball_effect_surface)->blt_fast(0, dxball_credit_second_y + 127,
            (DxBallDDSurface *)dxball_board_surface, &second, 0x10);
    }
    return;
}
void dxball_pulse_splash_palette(void)
{
    DxBallInt half;
    if (dxball_cursor_warp_disabled != 0) return;
    {
        DxBallInt i;
        for (i = 48; i <= dxball_splash_span + 48; ++i) {
            if (dxball_live_palette[i].red > 0) dxball_live_palette[i].red -= 4;
            if (dxball_live_palette[i].blue > 0) dxball_live_palette[i].blue -= 2;
        }
    }
    half = dxball_splash_span / 2;
    {
        DxBallInt middle;
        middle = half + 48;
        dxball_splash_offset = (DxBallInt)(dxball_sine(dxball_splash_phase) * (half - 1));
        ++dxball_splash_phase;
        if (dxball_splash_phase > 359) dxball_splash_phase %= 360;
        dxball_live_palette[middle + dxball_splash_offset].red = 160;
        dxball_live_palette[middle + dxball_splash_offset + 1].red = 160;
        dxball_live_palette[middle - dxball_splash_offset].blue = 160;
        dxball_live_palette[middle - dxball_splash_offset + 1].blue = 160;
        dxball_direct_palette->set_entries(0, 48, dxball_splash_span + 48, dxball_live_palette + 48);
    }
    return;
}
void dxball_splash_frame(void)
{
    dxball_update_sound(0, 0, 0, 0);
    if (dxball_draw_to_primary != 0) dxball_wait_frames(1);
    dxball_restore_regions();
    dxball_intro_cursor_x = dxball_mouse_x;
    dxball_intro_cursor_y = dxball_mouse_y;
    if (dxball_intro_cursor_x > 599) dxball_intro_cursor_x = 599;
    if (dxball_intro_cursor_x < 8) dxball_intro_cursor_x = 8;
    if (dxball_intro_cursor_y > 447) dxball_intro_cursor_y = 447;
    dxball_update_scroller(); dxball_draw_scroller_wave();
    if (dxball_draw_to_primary == 0) dxball_present();
    dxball_rotate_rgb_colors(189, 66, dxball_splash_colors); dxball_pulse_splash_palette();
    if (dxball_mouse_action == 1) { dxball_end_requested = 1; dxball_return_to_menu = 0; dxball_mouse_action = 0; }
    if (dxball_mouse_action == 2) dxball_mouse_action = 0;
    return;
}
void dxball_splash_key(char key)
{
    (void)key;
    dxball_end_requested = 1;
    dxball_return_to_menu = 0;
    return;
}
void dxball_dispose_splash(DxBallInt fade)
{
    DxBallRect rect;
    rect.left = 0; rect.top = 0; rect.right = 640; rect.bottom = 480;
    dxball_stop_sound(0);
    if (fade != 0) {
        dxball_palette_transition(1, 6, 0, 255, 0);
        dxball_clear_surface((DxBallSurface)dxball_board_surface, 0);
        dxball_clear_surface((DxBallSurface)dxball_primary_surface, 0);
        if (dxball_draw_to_primary == 0) {
            ((DxBallDDSurface *)dxball_secondary_surface)->blt(&rect,
                (DxBallDDSurface *)dxball_board_surface, &rect, 0x01000000, NULL);
        }
        dxball_release_sprite_banks();
        dxball_release_sounds();
        dxball_close_music();
    }
    return;
}

/* Retained program text and 22 RGB triples; no external game assets. */
const char dxball_welcome_text[] =
    " WELCOME TO DX-BALL.     GREETINGS GO OUT TO:  ED + AL MACKEY, SIMEON, LARRY, MI"
    "KE BOEH, DARK UNICORN PRODUCTIONS (SHANE, JOHN, SEUMAS, ERIC (SIDEWINDER), REMEM"
    "BER KIT...), AND THE 'MAD TESTER' CHAY-BOB.     LAST MINUTE SUPER THANKS GOES TO"
    " SHANE MONROE FOR THE DX-BALL WEB PAGE.    IT ROCKS!     THIS PROJECT WAS MANY L"
    "ONG MONTHS IN THE MAKING.    LATE NIGHTS, LOTS OF MOUNTAIN DEW, AND MANY PROGRAM"
    "MING BOOKS GOT THIS, MY FIRST DIRECT X AND PC GAME, FINISHED FOR YOUR VIEWING PL"
    "EASURE.      ABOUT THE GAME: I KNOW 'BREAKOUT' GAMES HAVE BEEN DONE TO DEATH, BU"
    "T I HAVEN'T FOUND ONE YET THAT'S AS COMPELLING AS MEGABALL FOR THE AMIGA COMPUTE"
    "R.    SINCE MEGABALL IS MY WIFE'S FAVORITE GAME, I THOUGHT I'D MAKE HER A VERSIO"
    "N THAT SHE CAN PLAY ON MY PENTIUM 60.  :)      BY THE WAY, DX-BALL IS MEANT TO B"
    "E AN AMIGA GAME TRAPPED IN A PC'S BODY.   (SMILE)    ALSO GOT SOME RETRO COMMODO"
    "RE 64 MIXED IN HERE AND THERE...  IF ONLY I HAD A DIRECT SOUND 'MOD' PLAYER, THE"
    "N EVERYTHING WOULD BE PERFECT!      ABOUT THE AUTHOR: HI I'M MIKE, BUT SOME CALL"
    " ME 'SCORCH.'    I'M THAT KID WHO WROTE THE AMIGA GAME 'SCORCHED TANKS.'    I KN"
    "OW, I KNOW, ALL YOU PC PEOPLE ARE SAYING 'NO STUPID, THAT'S SCORCHED EARTH!'    "
    "WELL, 'S-TANKS' WAS THE AMIGA ANSWER TO 'EARTH.'    THE WHOLE SCORCH PROJECT WAS"
    " VERY EXCELLENT AND THE RESPONSE FROM MY FELLOW AMI FANS WAS INCREDIBLE.    CERT"
    "AINLY, '94 WAS THE BEGINNING OF THE REST OF MY LIFE, AND I MUST SAY THANKS TO MY"
    " FRIENDS ALL OVER THE WORLD.        HEY, IF YOU'RE STILL READING THIS SCROLLER, "
    "THEN MORE POWER TO YA!   LET'S TALK ABOUT CODE...   DX-BALL WAS WRITTEN TO BE CO"
    "MPATIBLE WITH EVERY POSSIBLE PC THAT CAN INSTALL DIRECT X 2.    I BOUGHT 4 VIDEO"
    " CARDS ON MY OWN AND BORROWED 2 VIDEO CARDS FROM MY GOOD FRIEND MIKE BOEH.    I "
    "TOOK DX-BALL TO WORK, NEIGHBOR'S HOUSE, FATHER-IN-LAW'S HOUSE, BROTHER-IN-LAW'S "
    "HOUSE, AND EVEN HAD IT TESTED WITH WINDOWS NT AS SOON AS THE NEW RELEASE SUPPORT"
    "ED DIRECT X.    I EVEN ASKED/FORCED MY FRIENDS TO TAKE IT HOME AND TRY IT ON THE"
    "IR PC'S.  :O  MAN I FOUND A LOT OF BUGS IN THE GAME, AND LOTS OF QUIRKS IN DIREC"
    "T X.    I HOPE I GOT THEM ALL, BUT IF I DIDN'T, I KNOW I CAN COUNT ON 'YOU' TO S"
    "END ME AN E-MAIL.    SO I FOUND OUT TWO IMPORTANT THINGS FROM MY EXPERIMENTS.   "
    " FIRST OF ALL, DIRECT X'S HARDWARE ACCELERATION IS VERY COOL.    SECOND, I LEARN"
    "ED THAT NOT EVERY VIDEO CARD SUPPORTS IT.    FOR INSTANCE, VIDEO CARDS WITH: S3,"
    " MACH32/64, MATROX, TSENG, AND OTHERS WITH HARDWARE SUPPORT CAN SPEED-UP GRAPHIC"
    "S 'BLITTING' BY AT LEAST 3X IF DONE PROPERLY.    BUT THERE ARE VERY COMMON VIDEO"
    " CARDS WITH TRIDENT OR ARK CHIPSETS THAT HAVE NO SUPPORT.    THEY WILL RUN DIREC"
    "T X GAMES, BUT THE EMULATION MODE CAN SLOW IT WAY DOWN.    UNTIL THE DAY THAT EV"
    "ERYONE GETS A NEW COMPUTER OR VIDEO CARD, DIRECT X WILL NOT REACH IT'S FULL POTE"
    "NTIAL.    BUT FOR NOW, US PROGRAMMERS WILL WORK OUR BRAINS OUT TO GIVE EVERYONE "
    "A CHANCE TO PLAY OUR GAMES.    DX-BALL RUNS ON ALL VIDEO CARDS, EITHER IN THE BL"
    "AZING FAST MODE, OR IN THE 'COMPATIBILITY' MODE THAT KEEPS UP WITH THE 60 FPS ST"
    "ANDARD.    I ONLY ASK THAT IF YOUR SYSTEM HAS A VERY HIGH REFRESH RATE... THEN M"
    "AYBE YOU OUGHT TO LOWER IT FOR THE SAKE OF PLAYING DX-BALL AT A NORMAL SPEED.  :"
    ")    WELL, I'VE TALKED ABOUT EVERYTHING NOW AND IT'S TIME TO WRAP-UP THIS EXTRA "
    "LONG SCROLLER.    THANKS FOR READING, AND ENJOY THE GAME.                       "
    "                          MADE YOU LOOK!  HEHEHEHEHEHE                          "
    "                                        "
;
DxBallInt dxball_splash_colors[66] = {
    0, 20, 240,
    0, 40, 240,
    0, 60, 240,
    0, 80, 240,
    0, 100, 240,
    0, 120, 240,
    0, 140, 240,
    0, 160, 240,
    0, 180, 240,
    0, 200, 240,
    0, 220, 240,
    0, 240, 240,
    0, 220, 240,
    0, 200, 240,
    0, 180, 240,
    0, 160, 240,
    0, 140, 240,
    0, 120, 240,
    0, 100, 240,
    0, 80, 240,
    0, 60, 240,
    0, 40, 240,
};