Return to buttons.c CVS log

Up to [Research Unix] / researchv9 / jtools / src / blitblt

Annotation of researchv9/jtools/src/blitblt/buttons.c, revision 1.1

1.1     ! root        1: #include <jerq.h>
        !             2: 
        !             3: #define        UP      0
        !             4: #define        DOWN    1
        !             5: 
        !             6: lbuttons(updown)
        !             7: int updown;
        !             8: {
        !             9:        Rectangle r, s, kbdrect();
        !            10: 
        !            11:        while((button123()!=0) != updown){
        !            12:                checkshape(0);
        !            13:                wait(MOUSE);
        !            14:        }
        !            15: 
        !            16:        switch (button123()) {
        !            17:                case 4:
        !            18:                        return 1;
        !            19:                case 2:
        !            20:                        return 2;
        !            21:                case 1:
        !            22:                        return 3;
        !            23:        }
        !            24:        return 0;
        !            25: }
        !            26: 
        !            27: lexit3()       /* return true if button3 is clicked */
        !            28: {
        !            29:        extern Cursor skull; Cursor *prev; int lexit;
        !            30:        prev=cursswitch(&skull);
        !            31:        lexit=lbuttons(DOWN); lbuttons(UP);
        !            32:        cursswitch(prev);
        !            33:        return(lexit == 3);
        !            34: }

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