home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d0xx / d008 / hack.lha / src / testit.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-01-18  |  752 b   |  54 lines
  1. #include <stdio.h>
  2. #include "hack.h"
  3.  
  4. char curx, cury;
  5.  
  6. int BASEX;
  7.  
  8. extern int mousex, mousey;
  9.  
  10. main()
  11.    {
  12.    int c;
  13.  
  14.    initterm();
  15.  
  16.    BASEX = -2;
  17.    while((c = inchar()) != 'Q')
  18.     {
  19.     switch(c) {
  20.         case MUP : myprintf("<%d,%d>", mousex, mousey);
  21.             curs(mousex,mousey);
  22.             myputchar('X');
  23.             curx++;
  24.             break;
  25.         case MDOWN : myprintf("<%d,%d>", mousex, mousey);
  26.             curs(mousex,mousey);
  27.             myputchar('*');
  28.             curx++;
  29.             break;
  30.         case 8 : backsp();
  31.             break;
  32.         case 'I':
  33.             BASEX++;
  34.             myprintf("[%d]",BASEX);
  35.             break;
  36.         case 'D':
  37.             BASEX--;
  38.             myprintf("[%d]",BASEX);
  39.             break;
  40.         case 'J' : home();
  41.             break;
  42.         case 'K' : cl_end();
  43.             break;
  44.         case 'L' : clear_screen();
  45.             break;
  46.  
  47.         default  : myputchar(c);
  48.         }
  49.     myfflush();
  50.     }
  51.     hackexit(0);
  52.    }
  53.  
  54.