bctextbox.C

Go to the documentation of this file.

#include "bcclipboard.h"
#include "bclistboxitem.h"
#include "bcresources.h"
#include "bctextbox.h"
#include "clip.h"
#include "colors.h"
#include <ctype.h>
#include "cursors.h"
#include "keys.h"
#include <math.h>
#include "bctimer.h"
#include "vframe.h"

#include <string.h>

#define VERTICAL_MARGIN 2
#define VERTICAL_MARGIN_NOBORDER 0
#define HORIZONTAL_MARGIN 4
#define HORIZONTAL_MARGIN_NOBORDER 2

BC_TextBox::BC_TextBox(int x, 
        int y, 
        int w, 
        int rows, 
        char *text, 
        int has_border, 
        int font)
 : BC_SubWindow(x, y, w, 0, -1)
{
        skip_cursor = 0;
        reset_parameters(rows, has_border, font);
        strcpy(this->text, text);
}

BC_TextBox::BC_TextBox(int x, 
        int y, 
        int w, 
        int rows, 
        int64_t text, 
        int has_border, 
        int font)
 : BC_SubWindow(x, y, w, 0, -1)
{
        skip_cursor = 0;
        reset_parameters(rows, has_border, font);
        sprintf(this->text, "%lld", text);
}

BC_TextBox::BC_TextBox(int x, 
        int y, 
        int w, 
        int rows, 
        float text, 
        int has_border, 
        int font,
        int precision)
 : BC_SubWindow(x, y, w, 0, -1)
{
        skip_cursor = 0;
        reset_parameters(rows, has_border, font);
        this->precision = precision;
        sprintf(this->text, "%0.*f", precision, text);
}

BC_TextBox::BC_TextBox(int x, 
        int y, 
        int w, 
        int rows, 
        int text, 
        int has_border, 
        int font)
 : BC_SubWindow(x, y, w, 0, -1)
{
        skip_cursor = 0;
        reset_parameters(rows, has_border, font);
        sprintf(this->text, "%d", text);
}

BC_TextBox::~BC_TextBox()
{
        if(skip_cursor) delete skip_cursor;
}

int BC_TextBox::reset_parameters(int rows, int has_border, int font)
{
        this->rows = rows;
        this->has_border = has_border;
        this->font = font;
        text_start = 0;
        text_end = 0;
        highlight_letter1 = highlight_letter2 = 0;
        highlight_letter3 = highlight_letter4 = 0;
        ibeam_letter = 0;
        active = 0;
        text_selected = word_selected = 0;
        text_x = 0;
        enabled = 1;
        highlighted = 0;
        precision = 4;
        if (!skip_cursor)
                skip_cursor = new Timer;
        keypress_draw = 1;
        last_keypress = 0;
        separators = 0;
        return 0;
}

int BC_TextBox::initialize()
{
        if (!skip_cursor)
                skip_cursor = new Timer;
        skip_cursor->update();
// Get dimensions
        text_ascent = get_text_ascent(font) + 1;
        text_descent = get_text_descent(font) + 1;
        text_height = text_ascent + text_descent;
        ibeam_letter = strlen(text);
        if(has_border)
        {
                left_margin = right_margin = HORIZONTAL_MARGIN;
                top_margin = bottom_margin = VERTICAL_MARGIN;
        }
        else
        {
                left_margin = right_margin = HORIZONTAL_MARGIN_NOBORDER;
                top_margin = bottom_margin = VERTICAL_MARGIN_NOBORDER;
        }
        h = get_row_h(rows);
        text_x = left_margin;
        text_y = top_margin;
        find_ibeam(0);

// Create the subwindow
        BC_SubWindow::initialize();

        BC_Resources *resources = get_resources();
        if(has_border)
        {
                back_color = resources->text_background;
                high_color = resources->text_background_hi;
        }
        else 
        {
                high_color = resources->text_background_noborder_hi;
                back_color = bg_color;
        }

        draw();
        set_cursor(IBEAM_CURSOR);
        return 0;
}

int BC_TextBox::calculate_h(BC_WindowBase *gui, 
        int font, 
        int has_border,
        int rows)
{
        return rows * (gui->get_text_ascent(font) + 1 + 
                gui->get_text_descent(font) + 1) +
                2 * (has_border ? VERTICAL_MARGIN : VERTICAL_MARGIN_NOBORDER);
}

void BC_TextBox::set_precision(int precision)
{
        this->precision = precision;
}

int BC_TextBox::update(char *text)
{
//printf("BC_TextBox::update 1 %d %s %s\n", strcmp(text, this->text), text, this->text);
        int text_len = strlen(text);
// Don't update if contents are the same
        if(!strcmp(text, this->text)) return 0;


        strcpy(this->text, text);
        if(highlight_letter1 > text_len) highlight_letter1 = text_len;
        if(highlight_letter2 > text_len) highlight_letter2 = text_len;
        if(ibeam_letter > text_len) ibeam_letter = text_len;
        draw();
        return 0;
}

int BC_TextBox::update(int64_t value)
{
        char string[BCTEXTLEN];
        sprintf(string, "%lld", value);


        update(string);
        return 0;
}

int BC_TextBox::update(float value)
{
        char string[BCTEXTLEN];
        sprintf(string, "%0.*f", precision, value);

        update(string);
        return 0;
}

void BC_TextBox::disable()
{
        if(enabled)
        {
                enabled = 0;
                if(top_level)
                {
                        if(active) top_level->deactivate();
                        draw();
                }
        }
}

void BC_TextBox::enable()
{
        if(!enabled)
        {
                enabled = 1;
                if(top_level)
                {
                        draw();
                }
        }
}

int BC_TextBox::get_enabled()
{
        return enabled;
}

int BC_TextBox::pixels_to_rows(BC_WindowBase *window, int font, int pixels)
{
        return (pixels - 4) / 
                (window->get_text_ascent(font) + 1 + 
                        window->get_text_descent(font) + 1);
}

int BC_TextBox::calculate_row_h(int rows, 
        BC_WindowBase *parent_window, 
        int has_border, 
        int font)
{
        return rows * 
                (parent_window->get_text_ascent(font) + 1 + 
                parent_window->get_text_descent(font) + 1) +
                (has_border ? 4 : 0);
}

char* BC_TextBox::get_text()
{
        return text;
}

int BC_TextBox::get_text_rows()
{
        int text_len = strlen(text);
        int result = 1;
        for(int i = 0; i < text_len; i++)
        {
                if(text[i] == 0xa) result++;
        }
        return result;
}


int BC_TextBox::get_row_h(int rows)
{
        return rows * text_height + top_margin + bottom_margin;
}

int BC_TextBox::reposition_window(int x, int y, int w, int rows)
{
        int new_h = get_h();
        if(w < 0) w = get_w();
        if(rows != -1)
        {
                new_h = get_row_h(rows);
                this->rows = rows;
        }

        if(x != get_x() || 
                y != get_y() || 
                w != get_w() || 
                new_h != get_h())
        {
// printf("BC_TextBox::reposition_window 1 %d %d %d %d %d %d %d %d\n",
// x, get_x(), y, get_y(), w, get_w(), new_h, get_h());
                BC_WindowBase::reposition_window(x, y, w, new_h);
                draw();
        }
        return 0;
}

void BC_TextBox::draw_border()
{
        BC_Resources *resources = get_resources();
// Clear margins
        set_color(background_color);
        draw_box(0, 0, left_margin, get_h());
        draw_box(get_w() - right_margin, 0, right_margin, get_h());

        if(has_border)
        {
                if(highlighted)
                        draw_3d_border(0, 0, w, h,
                                resources->button_shadow, 
                                resources->button_uphighlighted,
                                resources->button_highlighted,
                                resources->button_light);
                else
                        draw_3d_border(0, 0, w, h, 
                                resources->text_border1, 
                                resources->text_border2,
                                resources->text_border3,
                                resources->text_border4);
        }
}

void BC_TextBox::draw_cursor()
{
//      set_color(background_color);
        set_color(WHITE);
        set_inverse();

        draw_box(ibeam_x + text_x, 
                ibeam_y + text_y, 
                BCCURSORW, 
                text_height);
        set_opaque();
}


void BC_TextBox::draw()
{
        int i, j, k, text_len;
        int row_begin, row_end;
        int highlight_x1, highlight_x2;
        int need_ibeam = 1;
        BC_Resources *resources = get_resources();

//printf("BC_TextBox::draw 1 %s\n", text);
// Background
        if(has_border)
        {
                background_color = resources->text_background;
        }
        else
        {
                if(highlighted)
                {
                        background_color = high_color;
                }
                else
                {
                        background_color = back_color;
                }
        }

        set_color(background_color);
        draw_box(0, 0, w, h);

// Draw text with selection
        set_font(font);
        text_len = strlen(text);
//printf("BC_TextBox::draw 0 %s %d %d %d %d\n", text, text_y, text_len, get_w(), text_height);

        for(i = 0, k = text_y; i < text_len && k < get_h(); k += text_height)
        {
// Draw row of text
                if(text[i] == '\n') i++;
                row_begin = i;
                for(j = 0; text[i] != '\n' && i < text_len; j++, i++)
                {
                        text_row[j] = text[i];
                }
                row_end = i;
                text_row[j] = 0;

//printf("BC_TextBox::draw 1 %d %d %c\n", row_begin, row_end, text_row[j - 1]);

                if(k > -text_height + top_margin && k < get_h() - bottom_margin)
                {
// Draw highlighted region of row
                        if(highlight_letter2 > highlight_letter1 &&
                                highlight_letter2 > row_begin && highlight_letter1 < row_end)
                        {
                                if(active && enabled && get_has_focus())
                                        set_color(resources->text_highlight);
                                else
                                        set_color(resources->text_inactive_highlight);

                                if(highlight_letter1 >= row_begin && highlight_letter1 < row_end)
                                        highlight_x1 = get_text_width(font, text_row, highlight_letter1 - row_begin);
                                else
                                        highlight_x1 = 0;

                                if(highlight_letter2 > row_begin && highlight_letter2 <= row_end)
                                        highlight_x2 = get_text_width(font, text_row, highlight_letter2 - row_begin);
                                else
                                        highlight_x2 = get_w();

                                draw_box(highlight_x1 + text_x, 
                                        k, 
                                        highlight_x2 - highlight_x1, 
                                        text_height);
                        }

// Draw text over highlight
                        if(enabled)
                                set_color(resources->text_default);
                        else
                                set_color(MEGREY);

                        draw_text(text_x, k + text_ascent, text_row);

// Get ibeam location
                        if(ibeam_letter >= row_begin && ibeam_letter <= row_end)
                        {
                                need_ibeam = 0;
                                ibeam_y = k - text_y;
                                ibeam_x = get_text_width(font, text_row, ibeam_letter - row_begin);
                        }
                }
        }

//printf("BC_TextBox::draw 3 %d\n", ibeam_y);
        if(need_ibeam)
        {
                ibeam_x = 0;
                ibeam_y = 0;
        }

//printf("BC_TextBox::draw 4 %d\n", ibeam_y);
// Draw solid cursor
        if (active) 
                draw_cursor();

// Border
        draw_border();
        flash();
        flush();   
}

int BC_TextBox::focus_in_event()
{
        draw();
        return 1;
}

int BC_TextBox::focus_out_event()
{
        draw();
        return 1;
}

int BC_TextBox::cursor_enter_event()
{
        if(top_level->event_win == win && enabled)
        {
                tooltip_done = 0;

                if(!highlighted)
                {
                        highlighted = 1;
                        draw_border();
                        flash();
                        flush();   
                }
        }
        return 0;
}

int BC_TextBox::cursor_leave_event()
{
        if(highlighted)
        {
                highlighted = 0;
                draw_border();
                hide_tooltip();
                flash();
                flush();   
        }
        return 0;
}

int BC_TextBox::button_press_event()
{
        if(get_buttonpress() > 2) return 0;

        int cursor_letter = 0;
        int text_len = strlen(text);

        if(!enabled) return 0;

        if(top_level->event_win == win)
        {
                if(!active)
                {
                        hide_tooltip();
                        top_level->deactivate();
                        activate();
                }

                cursor_letter = get_cursor_letter(top_level->cursor_x, top_level->cursor_y);
                if(get_double_click())
                {
                        word_selected = 1;
                        select_word(highlight_letter1, highlight_letter2, cursor_letter);
                        highlight_letter3 = highlight_letter1;
                        highlight_letter4 = highlight_letter2;
                        ibeam_letter = highlight_letter2;
                        copy_selection(PRIMARY_SELECTION);
                }
                else
                if(get_buttonpress() == 2)
                {
                        highlight_letter3 = highlight_letter4 = 
                                ibeam_letter = highlight_letter1 = 
                                highlight_letter2 = cursor_letter;
                        paste_selection(PRIMARY_SELECTION);
                }
                else
                {
                        text_selected = 1;
                        highlight_letter3 = highlight_letter4 = 
                                ibeam_letter = highlight_letter1 = 
                                highlight_letter2 = cursor_letter;
                }
                
                if(ibeam_letter < 0) ibeam_letter = 0;
                if(ibeam_letter > text_len) ibeam_letter = text_len;
                draw();
                return 1;
        }
        else
        if(active)
        {
                top_level->deactivate();
        }

        return 0;
}

int BC_TextBox::button_release_event()
{
        if(active)
        {
                hide_tooltip();
                if(text_selected || word_selected)
                {
                        text_selected = 0;
                        word_selected = 0;
                }
        }
        return 0;
}

int BC_TextBox::cursor_motion_event()
{
        int cursor_letter, text_len = strlen(text), letter1, letter2;
        if(active)
        {
                if(text_selected || word_selected)
                {
                        cursor_letter = get_cursor_letter(top_level->cursor_x, top_level->cursor_y);
                        if(word_selected)
                        {
                                select_word(letter1, letter2, cursor_letter);
                        }
                        else
                        if(text_selected)
                        {
                                letter1 = letter2 = cursor_letter;
                        }

                        if(letter1 <= highlight_letter3)
                        {
                                highlight_letter1 = letter1;
                                highlight_letter2 = highlight_letter4;
                                ibeam_letter = letter1;
                        }
                        else
                        if(letter2 >= highlight_letter4)
                        {
                                highlight_letter2 = letter2;
                                highlight_letter1 = highlight_letter3;
                                ibeam_letter = letter2;
                        }
                        
                        copy_selection(PRIMARY_SELECTION);
                        find_ibeam(1);
                        draw();
                        return 1;
                }
        }
        return 0;
}

int BC_TextBox::activate()
{
        top_level->active_subwindow = this;
        active = 1;
        draw();
        top_level->set_repeat(top_level->get_resources()->blink_rate);
        return 0;
}

int BC_TextBox::deactivate()
{
        active = 0;
        top_level->unset_repeat(top_level->get_resources()->blink_rate);
        draw();
        return 0;
}

int BC_TextBox::repeat_event(int64_t duration)
{
        int result = 0;

        if(duration == top_level->get_resources()->tooltip_delay &&
                tooltip_text[0] != 0 &&
                highlighted)
        {
                show_tooltip();
                tooltip_done = 1;
                result = 1;
        }
                
        if(duration == top_level->get_resources()->blink_rate && 
                active &&
                get_has_focus())
        {
                if(skip_cursor->get_difference() < duration)
                {
// printf("BC_TextBox::repeat_event 1 %lld %lld\n", 
// skip_cursor->get_difference(), 
// duration);
                        return 1;
                }
                draw_cursor();
                flash();
                flush();   
                result = 1;
        }
        return result;
}

void BC_TextBox::default_keypress(int &dispatch_event, int &result)
{
    if((top_level->get_keypress() == RETURN) ||
//              (top_level->get_keypress() > 30 && top_level->get_keypress() < 127))
                (top_level->get_keypress() > 30 && top_level->get_keypress() <= 255))
        {
// Substitute UNIX linefeed
                if(top_level->get_keypress() == RETURN) 
                        temp_string[0] = 0xa;
                else
                        temp_string[0] = top_level->get_keypress();
                temp_string[1] = 0;
                insert_text(temp_string);
                find_ibeam(1);
                draw();
                dispatch_event = 1;
                result = 1;
        }
}

int BC_TextBox::select_whole_text(int select)
{
        if (select == 1) 
        {
                highlight_letter1 = 0;
                highlight_letter2 = strlen(text);
                text_selected = word_selected = 0;      
                ibeam_letter = highlight_letter1;
                find_ibeam(1);
                if(keypress_draw) draw();
        } else
        if (select == -1)
        {
                ibeam_letter = strlen(text);
                highlight_letter1 = ibeam_letter;
                highlight_letter2 = ibeam_letter;
                text_selected = word_selected = 0;
                find_ibeam(1);
                if(keypress_draw) draw();
        }
        return highlight_letter2 - highlight_letter1;
}

void BC_TextBox::cycle_textboxes(int amout)
{
        top_level->cycle_textboxes(amout);
}

int BC_TextBox::keypress_event()
{
// Result == 2 contents changed
// Result == 1 trapped keypress
// Result == 0 nothing
        int result = 0;
        int text_len;
        int dispatch_event = 0;

        if(!active || !enabled) return 0;

        text_len = strlen(text);
        last_keypress = get_keypress();
        switch(get_keypress())
        {
                case ESC:
                        top_level->deactivate();
                        result = 0;
                        break;

                case RETURN:
                        if(rows == 1)
                        {
                                top_level->deactivate();
                                dispatch_event = 1;
                                result = 0;
                        }
                        else
                        {
                                default_keypress(dispatch_event, result);
                        }
                        break;
// Handle like a default keypress

                case TAB:
                        cycle_textboxes(1);
                        result = 1;
                        break;

                case LEFTTAB:
                        cycle_textboxes(-1);
                        result = 1;
                        break;

                case LEFT:
                        if(ibeam_letter > 0)
                        {
                                int old_ibeam_letter = ibeam_letter;
// Single character
                                if(!ctrl_down())
                                {
                                        ibeam_letter--;
                                }
                                else
// Word
                                {
                                        ibeam_letter--;
                                        while(ibeam_letter > 0 && isalnum(text[ibeam_letter - 1]))
                                                ibeam_letter--;
                                }


// Extend selection
                                if(top_level->shift_down())
                                {
// Initialize highlighting
                                        if(highlight_letter1 == highlight_letter2)
                                        {
                                                highlight_letter1 = ibeam_letter;
                                                highlight_letter2 = old_ibeam_letter;
                                        }
                                        else
// Extend left highlight
                                        if(highlight_letter1 == old_ibeam_letter)
                                        {
                                                highlight_letter1 = ibeam_letter;
                                        }
                                        else
// Shrink right highlight
                                        if(highlight_letter2 == old_ibeam_letter)
                                        {
                                                highlight_letter2 = ibeam_letter;
                                        }
                                }
                                else
                                {
                                        highlight_letter1 = highlight_letter2 = ibeam_letter;
                                }


                                find_ibeam(1);
                                if(keypress_draw) draw();
                        }
                        result = 1;
                        break;

                case RIGHT:
                        if(ibeam_letter < text_len)
                        {
                                int old_ibeam_letter = ibeam_letter;
// Single character
                                if(!ctrl_down())
                                {
                                        ibeam_letter++;
                                }
                                else
// Word
                                {
                                        while(ibeam_letter < text_len && isalnum(text[ibeam_letter++]))
                                                ;
                                }



// Extend selection
                                if(top_level->shift_down())
                                {
// Initialize highlighting
                                        if(highlight_letter1 == highlight_letter2)
                                        {
                                                highlight_letter1 = old_ibeam_letter;
                                                highlight_letter2 = ibeam_letter;
                                        }
                                        else
// Shrink left highlight
                                        if(highlight_letter1 == old_ibeam_letter)
                                        {
                                                highlight_letter1 = ibeam_letter;
                                        }
                                        else
// Expand right highlight
                                        if(highlight_letter2 == old_ibeam_letter)
                                        {
                                                highlight_letter2 = ibeam_letter;
                                        }
                                }
                                else
                                {
                                        highlight_letter1 = highlight_letter2 = ibeam_letter;
                                }

                                find_ibeam(1);
                                if(keypress_draw) draw();
                        }
                        result = 1;
                        break;

                case UP:
                        if(ibeam_letter > 0)
                        {
//printf("BC_TextBox::keypress_event 1 %d %d %d\n", ibeam_x, ibeam_y, ibeam_letter);
                                int new_letter = get_cursor_letter(ibeam_x + text_x, 
                                        ibeam_y + text_y - text_height);
//printf("BC_TextBox::keypress_event 2 %d %d %d\n", ibeam_x, ibeam_y, new_letter);

// Extend selection
                                if(top_level->shift_down())
                                {
// Initialize highlighting
                                        if(highlight_letter1 == highlight_letter2)
                                        {
                                                highlight_letter1 = new_letter;
                                                highlight_letter2 = ibeam_letter;
                                        }
                                        else
// Expand left highlight
                                        if(highlight_letter1 == ibeam_letter)
                                        {
                                                highlight_letter1 = new_letter;
                                        }
                                        else
// Shrink right highlight
                                        if(highlight_letter2 == ibeam_letter)
                                        {
                                                highlight_letter2 = new_letter;
                                        }
                                }
                                else
                                        highlight_letter1 = highlight_letter2 = new_letter;

                                if(highlight_letter1 > highlight_letter2)
                                {
                                        int temp = highlight_letter1;
                                        highlight_letter1 = highlight_letter2;
                                        highlight_letter2 = temp;
                                }
                                ibeam_letter = new_letter;

                                find_ibeam(1);
                                if(keypress_draw) draw();
                        }
                        result = 1;
                        break;

                case PGUP:
                        if(ibeam_letter > 0)
                        {
                                int new_letter = get_cursor_letter(ibeam_x + text_x, 
                                        ibeam_y + text_y - get_h());

// Extend selection
                                if(top_level->shift_down())
                                {
// Initialize highlighting
                                        if(highlight_letter1 == highlight_letter2)
                                        {
                                                highlight_letter1 = new_letter;
                                                highlight_letter2 = ibeam_letter;
                                        }
                                        else
// Expand left highlight
                                        if(highlight_letter1 == ibeam_letter)
                                        {
                                                highlight_letter1 = new_letter;
                                        }
                                        else
// Shrink right highlight
                                        if(highlight_letter2 == ibeam_letter)
                                        {
                                                highlight_letter2 = new_letter;
                                        }
                                }
                                else
                                        highlight_letter1 = highlight_letter2 = new_letter;

                                if(highlight_letter1 > highlight_letter2)
                                {
                                        int temp = highlight_letter1;
                                        highlight_letter1 = highlight_letter2;
                                        highlight_letter2 = temp;
                                }
                                ibeam_letter = new_letter;

                                find_ibeam(1);
                                if(keypress_draw) draw();
                        }
                        result = 1;
                        break;

                case DOWN:
//                      if(ibeam_letter > 0)
                        {
// Extend selection
                                int new_letter = get_cursor_letter(ibeam_x + text_x, 
                                        ibeam_y + text_y + text_height);
//printf("BC_TextBox::keypress_event 10 %d\n", new_letter);

                                if(top_level->shift_down())
                                {
// Initialize highlighting
                                        if(highlight_letter1 == highlight_letter2)
                                        {
                                                highlight_letter1 = new_letter;
                                                highlight_letter2 = ibeam_letter;
                                        }
                                        else
// Shrink left highlight
                                        if(highlight_letter1 == ibeam_letter)
                                        {
                                                highlight_letter1 = new_letter;
                                        }
                                        else
// Expand right highlight
                                        if(highlight_letter2 == ibeam_letter)
                                        {
                                                highlight_letter2 = new_letter;
                                        }
                                }
                                else
                                        highlight_letter1 = highlight_letter2 = new_letter;

                                if(highlight_letter1 > highlight_letter2)
                                {
                                        int temp = highlight_letter1;
                                        highlight_letter1 = highlight_letter2;
                                        highlight_letter2 = temp;
                                }
                                ibeam_letter = new_letter;

                                find_ibeam(1);
                                if(keypress_draw) draw();

//printf("BC_TextBox::keypress_event 20 %d\n", ibeam_letter);
                        }
                        result = 1;
                        break;

                case PGDN:
                        {
// Extend selection
                                int new_letter = get_cursor_letter(ibeam_x + text_x, 
                                        ibeam_y + text_y + get_h());
//printf("BC_TextBox::keypress_event 10 %d\n", new_letter);

                                if(top_level->shift_down())
                                {
// Initialize highlighting
                                        if(highlight_letter1 == highlight_letter2)
                                        {
                                                highlight_letter1 = new_letter;
                                                highlight_letter2 = ibeam_letter;
                                        }
                                        else
// Shrink left highlight
                                        if(highlight_letter1 == ibeam_letter)
                                        {
                                                highlight_letter1 = new_letter;
                                        }
                                        else
// Expand right highlight
                                        if(highlight_letter2 == ibeam_letter)
                                        {
                                                highlight_letter2 = new_letter;
                                        }
                                }
                                else
                                        highlight_letter1 = highlight_letter2 = new_letter;

                                if(highlight_letter1 > highlight_letter2)
                                {
                                        int temp = highlight_letter1;
                                        highlight_letter1 = highlight_letter2;
                                        highlight_letter2 = temp;
                                }
                                ibeam_letter = new_letter;

                                find_ibeam(1);
                                if(keypress_draw) draw();

//printf("BC_TextBox::keypress_event 20 %d\n", ibeam_letter);
                        }
                        result = 1;
                        break;
                
                case END:
                {
                        int old_ibeam_letter = ibeam_letter;

                        while(ibeam_letter < text_len && text[ibeam_letter] != '\n')
                                ibeam_letter++;

                        if(top_level->shift_down())
                        {
// Begin selection
                                if(highlight_letter1 == highlight_letter2)
                                {
                                        highlight_letter2 = ibeam_letter;
                                        highlight_letter1 = old_ibeam_letter;
                                }
                                else
// Shrink selection
                                if(highlight_letter1 == old_ibeam_letter)
                                {
                                        highlight_letter1 = highlight_letter2;
                                        highlight_letter2 = ibeam_letter;
                                }
                                else
// Extend selection
                                if(highlight_letter2 == old_ibeam_letter)
                                {
                                        highlight_letter2 = ibeam_letter;
                                }
                        }
                        else
                                highlight_letter1 = highlight_letter2 = ibeam_letter;

                        find_ibeam(1);
                        if(keypress_draw) draw();
                        result = 1;
                        break;
                }

                case HOME:
                {
                        int old_ibeam_letter = ibeam_letter;

                        while(ibeam_letter > 0 && text[ibeam_letter - 1] != '\n')
                                ibeam_letter--;

                        if(top_level->shift_down())
                        {
// Begin selection
                                if(highlight_letter1 == highlight_letter2)
                                {
                                        highlight_letter2 = old_ibeam_letter;
                                        highlight_letter1 = ibeam_letter;
                                }
                                else
// Extend selection
                                if(highlight_letter1 == old_ibeam_letter)
                                {
                                        highlight_letter1 = ibeam_letter;
                                }
                                else
// Shrink selection
                                if(highlight_letter2 == old_ibeam_letter)
                                {
                                        highlight_letter2 = highlight_letter1;
                                        highlight_letter1 = ibeam_letter;
                                }
                        }
                        else
                                highlight_letter1 = highlight_letter2 = ibeam_letter;

                        find_ibeam(1);
                        if(keypress_draw) draw();
                        result = 1;
                        break;
                }

        case BACKSPACE:
                        if(highlight_letter1 == highlight_letter2)
                        {
                                if(ibeam_letter > 0)
                                {
                                        delete_selection(ibeam_letter - 1, ibeam_letter, text_len);
                                        ibeam_letter--;
                                }
                        }
                        else
                        {
                                delete_selection(highlight_letter1, highlight_letter2, text_len);
                                highlight_letter2 = ibeam_letter = highlight_letter1;
                        }

                        find_ibeam(1);
                        if(keypress_draw) draw();
                        dispatch_event = 1;
                        result = 1;
                break;

                case DELETE:
                        if(highlight_letter1 == highlight_letter2)
                        {
                                if(ibeam_letter < text_len)
                                {
                                        delete_selection(ibeam_letter, ibeam_letter + 1, text_len);
                                }
                        }
                        else
                        {
                                delete_selection(highlight_letter1, highlight_letter2, text_len);
                                highlight_letter2 = ibeam_letter = highlight_letter1;
                        }
                        
                        find_ibeam(1);
                        if(keypress_draw) draw();
                        dispatch_event = 1;
                        result = 1;
                        break;



                default:
                        if(ctrl_down())
                        {
                                if(get_keypress() == 'c' || get_keypress() == 'C')
                                {
                                        if(highlight_letter1 != highlight_letter2)
                                        {
                                                copy_selection(SECONDARY_SELECTION);
                                                result = 1;
                                        }
                                }
                                else