vt102em.cpp

使用BorlandC++4.5编译的一个MUD客户端程序

    // Special unix compatibility fix: translate CR into NL
    if (the_char == '\r')
        the_char = '\n';
    
    if (use_this_char)
    {
        char c[2];
        c[0] = the_char;
        c[1] = '\0';
        process_incoming(c); // Send keystroke to VaporTalk
    };
}

// ------------------------------------------------------------------------
d615 32
d664 1
a664 1
      case MY_SOCKET_MSG:
@


1.8
log
@Changed title.
@
text
@d3 5
a7 2
// $Id: vt102em.cpp 1.7 1995/10/18 22:58:01 tsurace Beta tsurace $
// $Log: vt102em.cpp $
d75 1
a75 1
static const char _TITLE[] = "VT-Win 1.0 $State$";
@


1.7
log
@Made MY_SOCKET_LONG message globally accessible.
@
text
@d3 1
a3 1
// $Id: vt102em.cpp 1.6 1995/10/15 23:33:25 tsurace Exp tsurace $
d5 3
d71 2
a72 1
char VT102Emulator::_szClassName[] = "VaporTalk Emulator Window";
d103 1
a103 1
                         _szClassName,
@


1.6
log
@Added one line comment.
@
text
@d3 1
a3 1
// $Id: vt102em.cpp 1.5 1995/10/15 23:23:39 tsurace Exp tsurace $
d5 3
a67 1
const long MY_SOCKET_MSG  = (WM_USER + 1);
d622 1
a622 1
    };
@


1.5
log
@Fixed bug that caused all windows to resize on SIZE_MINIMIZE.
@
text
@d3 1
a3 1
// $Id: vt102em.cpp 1.4 1995/10/11 21:40:43 tsurace Exp tsurace $
d5 3
d586 1
@


1.4
log
@Modified the "select event" handling code.
Modified resize functionality.
Reflects changes to the scream_and_die function.
@
text
@d3 1
a3 1
// $Id: vt102em.cpp 1.3 1995/10/08 23:29:29 tsurace Exp tsurace $
d5 5
d546 11
d559 20
a578 9
    (void) type; // silence 'not used' message
    
    width /= _fontSize.Width();   // Truncated to smaller int!  How nice!
    height /= _fontSize.Height();
    
    if (width < 15)       // These size parameters are enforced by vt
        width = 15;
    if (height < 4)
        height = 4;
d580 8
a587 7
    _screen.Resize(width, height); // Resize screen buffer
    
    // Tricky - pretend we sent a TIOCGWINSZ signal to VT.  The cool thing
    // about this, is that we don't have to worry about accidentally
    // resizing asynchronously, because we didn't catch a signal!
    
    resize_screen(height, width); // Tell vt about it!
@


1.3
log
@Modified code to update more quickly when scrolling.  It kind
of sucks if you have a slow display card right now.
@
text
@d3 1
a3 1
// $Id: vt102em.cpp 1.2 1995/10/07 00:33:48 tsurace Exp tsurace $
d5 4
d27 3
a30 1
#include "esc_seq.hpp"
d33 5
a37 1
    // Functions from VT -- be sure to check the type of these when updating
d41 3
a43 3
    extern int io_check(long sec, long usec); /* remote.c */
    extern int io_cycle();                    /* main.c */
    extern void process_incoming (char * str); // keyboard input routine
d45 1
d57 2
a58 2
const long MY_SOCKET_MSG = (WM_USER + 1);
char VT102Emulator::_szClassName[] = "VT102 Emulator Window";
d102 1
a102 1
        scream_and_die(IDERR_CREATEWINDOW);
d141 3
a143 3
    assert(bottom >= top); // Hey, this won't work!
    assert(top >= 0);
    assert(bottom < _screen.Height()); // Off screen?
d187 6
a192 1
void VT102Emulator::NewSocket (SOCKET s, long events)
d195 15
a209 1
    WSAAsyncSelect (s, Handle(), MY_SOCKET_MSG, events);
d264 1
a264 1
    assert(_screen.Width() > 0); // Useless!
d389 1
a389 1
    wndclass.hIcon         = LoadIcon(Global::Instance(), "whello");
d397 1
a397 1
        scream_and_die(IDERR_REGISTER);
d408 1
a408 1
        scream_and_die(IDERR_LOADFONT);
d421 1
a421 1
        scream_and_die(IDERR_GETTEXTMETRIC); // Could not get font into
d553 1
a553 3
    // First size the screen buffer...this is scary, probably invalidates
    // all the memory.
    _screen.Resize(width, height);
d581 1
a581 3
        io_check(0,0);       // Poll sockets
        while (0 == io_cycle()) // Process buffered input
            ;       
d591 15
@


1.2
log
@Added some cursor colors and the _Size function.  Scrolling
optimization.
@
text
@d3 6
a8 2
// $Id$
// $Log$
d37 1
a37 1
#define TEXT_FORE RGB(200,200,200)
a65 1
  _backgroundBrush((HBRUSH)(GetStockObject(BLACK_BRUSH))),
d68 1
d147 2
d192 3
a194 1
        if ((GetTickCount() - _lastPaintTickCount) > 200)
d196 1
d211 1
d553 3
a555 3
        io_check(0,0);
        while (0 == io_cycle())
            ;          // Just keep looping
@


1.1
log
@Initial revision
@
text
@d3 8
a10 3
// Derived from the cheesy borland Hello World program, I intend to
// make this into a simple VT102 emulator library...oh yeah, for 32-bit
// programs only, but supportive of win32s
d23 8
a30 4
 // Functions from VT
 extern int io_check(long sec, long usec); /* remote.c */
 extern int io_cycle();                    /* main.c */
 extern void process_incoming (char * str); // keyboard input routine
d33 5
d51 2
a52 2
          RGB(200,200,200), // Normal foreground
          RGB(40,255,100),  // Bold foreground
d58 2
a59 1
  _cursorBrush(0),
d61 1
a61 1
  _backgroundColor(RGB(0,0,0)),
d63 3
a65 1
  _fontSize(8,16)
d92 2
a93 1
    Update(); 
a97 1
    DeleteObject(_cursorBrush); // from CreateBrushIndirect
d133 2
a134 2
        area.top = (top + 1) * _fontSize.Height();
        area.bottom = (bottom + 1) * _fontSize.Height();
d136 1
a136 1
        area.right = _screen.Width() * _fontSize.Width();
d138 5
a142 16
        HDC hdc = GetDC(Handle());
        RECT uncovered_rect;
        ScrollDC(hdc,
                 0, // No scroll of x
                 - (amount * _fontSize.Height()),
                 &area,
                 NULL,
                 NULL,
                 &uncovered_rect);
        
        ReleaseDC(Handle(), hdc);
        InvalidateRect(Handle(),&uncovered_rect,TRUE);

        // Force a screen refresh NOW for immediate feedback!
        // This assumes that the screen buffer is up-to-date.  <sigh>
        Update(); 
d144 2
a145 2

    return 1; // Successful scroll
d151 2
a152 2
                                        const Size & size,
                                        void * this_ptr)
d164 1
a164 1

d180 9
a188 2
    for (int i=0; i < len; i++)    
        _screen.Put(str[i]); // No parsing for now
d197 2
d201 3
a203 1
    PAINTSTRUCT ps;              // Begin paint, get info
d205 1
a205 1

d210 1
a210 1

d213 2
a214 2

    DeleteObject(clip_reg);     // Don't need this region any more
d216 1
a216 1
    EndPaint(Handle(), &ps );   // Done, yay!
d224 4
a227 1
    int j; // counter
d229 7
a235 2
    // Copy characters one-at-a-time out of the buffer to the screen.
    for (j = 0; j < _screen.Width(); j++)
d237 21
a257 7
        int index = _screen.IndexOf(j,row);
        SetTextColor(hdc, _screen.ForegroundElement(index));
        TextOut(hdc,
                j * _fontSize.Width(),
                row * _fontSize.Height(),
                &_screen.TextElement(index),
                1);
d274 1
a274 1
    if (firstRow < 0)                      // Off top of screen?
d280 1
a280 1
    if (lastRow < 0)                        // Off top of screen
d282 1
a282 1
    else if (lastRow >= _screen.Height())   // Off bottom of screen?
d288 1
a288 1

d294 2
a295 2

    SetBkMode(hdc, oldBkMode);  // Restore old drawing modes
d308 12
a319 12
    // Put the cursor
    HBRUSH oldBrush = (HBRUSH)SelectObject(hdc, _cursorBrush);

    Pos topLeft(_screen.Cursor());
    _TextToDevice(topLeft);

    Pos bottomRight(topLeft);
    bottomRight.X() += _fontSize.Width() - 1;
    bottomRight.Y() += _fontSize.Height() - 1;
    Rectangle(hdc,
              topLeft.X(), topLeft.Y(),
              bottomRight.X(), bottomRight.Y());
d321 3
a323 1
    SelectObject(hdc, oldBrush); // Put back old brush
d336 1
a336 1
    WNDCLASS wndclass;          // Structure used to register Windows class.
d341 1
a341 1

d354 1
a354 1

a368 4

    _cursorBrush = CreateSolidBrush(RGB(0,125,255));
    if (NULL == _cursorBrush)
        scream_and_die(IDERR_CREATEBRUSH);
d371 1
a371 1

d374 2
a375 2
    HDC hdc = GetDC(Handle());     // Get a device context for a second

d379 1
a379 1
    TEXTMETRIC fontMetric;                   // Get font info
d382 1
a382 1

d384 1
a384 1

d388 1
a388 1

d390 1
a390 1

d418 1
a418 1
      case WM_CREATE:   // Ignore
d422 1
a422 1
      case WM_PAINT:    // Paint yourself!
d426 2
a427 2

      case WM_CHAR:                  // Regular char events
d434 1
a434 1

d439 8
d457 1
a457 1
    return ret_val;          // Handled the message
d485 1
a485 1

d489 1
a489 1

d499 24
d535 1
a535 1
    (void)wParam;    // Silence 'not used' warning
d545 1
a545 1
            ; // Just keep looping
d549 1
a549 1
    
@