Return to motion.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.lib / lib2648

Annotation of 42BSD/usr.lib/lib2648/motion.c, revision 1.1

1.1     ! root        1: /*     motion.c        4.1     83/03/09        */
        !             2: /*
        !             3:  * Move the pen to x, y.  We assume we are already in ESCP mode.
        !             4:  */
        !             5: 
        !             6: #include "2648.h"
        !             7: 
        !             8: motion(x, y)
        !             9: {
        !            10:        char lox, loy, hix, hiy;
        !            11:        int delx, dely;
        !            12: 
        !            13:        delx = x-_penx; dely = y-_peny;
        !            14:        if (-16 <= delx && delx <= 15 && -16 <= dely && dely <= 15) {
        !            15:                /*
        !            16:                 * Optimization: if within 15 in both directions, can use
        !            17:                 * HP short incremental mode, only 3 bytes.
        !            18:                 */
        !            19:                outchar('j');
        !            20:                outchar(32 + (delx & 31));
        !            21:                outchar(32 + (dely & 31));
        !            22:        } else {
        !            23:                /*
        !            24:                 * Otherwise must use binary absolute mode, 5 bytes.
        !            25:                 * We never use ascii mode or binary incremental, since
        !            26:                 * those both take many more bytes.
        !            27:                 */
        !            28:                outchar('i');
        !            29:                outchar(32+ ((x>>5) & 31));
        !            30:                outchar(32+ (x&31));
        !            31:                outchar(32+ ((y>>5) & 31));
        !            32:                outchar(32+ (y&31));
        !            33:        }
        !            34:        _penx = x;
        !            35:        _peny = y;
        !            36: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.