test_is.c

标准c库代码,可以应用于各个系统提供了大量的基本函数

      setupper = 72;
      break;
    case 'I':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 73;
      setlower = 105;
      setupper = 73;
      break;
    case 'J':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 74;
      setlower = 106;
      setupper = 74;
      break;
    case 'K':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 75;
      setlower = 107;
      setupper = 75;
      break;
    case 'L':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 76;
      setlower = 108;
      setupper = 76;
      break;
    case 'M':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 77;
      setlower = 109;
      setupper = 77;
      break;
    case 'N':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 78;
      setlower = 110;
      setupper = 78;
      break;
    case 'O':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 79;
      setlower = 111;
      setupper = 79;
      break;
    case 'P':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 80;
      setlower = 112;
      setupper = 80;
      break;
    case 'Q':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 81;
      setlower = 113;
      setupper = 81;
      break;
    case 'R':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 82;
      setlower = 114;
      setupper = 82;
      break;
    case 'S':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 83;
      setlower = 115;
      setupper = 83;
      break;
    case 'T':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 84;
      setlower = 116;
      setupper = 84;
      break;
    case 'U':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 85;
      setlower = 117;
      setupper = 85;
      break;
    case 'V':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 86;
      setlower = 118;
      setupper = 86;
      break;
    case 'W':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 87;
      setlower = 119;
      setupper = 87;
      break;
    case 'X':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 88;
      setlower = 120;
      setupper = 88;
      break;
    case 'Y':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 89;
      setlower = 121;
      setupper = 89;
      break;
    case 'Z':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      myupper = 1;
      setascii = 90;
      setlower = 122;
      setupper = 90;
      break;
    case '[':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 91;
      setlower = 91;
      setupper = 91;
      break;
    case '\\':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 92;
      setlower = 92;
      setupper = 92;
      break;
    case ']':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 93;
      setlower = 93;
      setupper = 93;
      break;
    case '^':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 94;
      setlower = 94;
      setupper = 94;
      break;
    case '_':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 95;
      setlower = 95;
      setupper = 95;
      break;
    case '`':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 96;
      setlower = 96;
      setupper = 96;
      break;
    case 'a':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      myxdigit = 1;
      setascii = 97;
      setlower = 97;
      setupper = 65;
      break;
    case 'b':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      myxdigit = 1;
      setascii = 98;
      setlower = 98;
      setupper = 66;
      break;
    case 'c':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      myxdigit = 1;
      setascii = 99;
      setlower = 99;
      setupper = 67;
      break;
    case 'd':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      myxdigit = 1;
      setascii = 100;
      setlower = 100;
      setupper = 68;
      break;
    case 'e':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      myxdigit = 1;
      setascii = 101;
      setlower = 101;
      setupper = 69;
      break;
    case 'f':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      myxdigit = 1;
      setascii = 102;
      setlower = 102;
      setupper = 70;
      break;
    case 'g':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 103;
      setlower = 103;
      setupper = 71;
      break;
    case 'h':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 104;
      setlower = 104;
      setupper = 72;
      break;
    case 'i':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 105;
      setlower = 105;
      setupper = 73;
      break;
    case 'j':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 106;
      setlower = 106;
      setupper = 74;
      break;
    case 'k':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 107;
      setlower = 107;
      setupper = 75;
      break;
    case 'l':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 108;
      setlower = 108;
      setupper = 76;
      break;
    case 'm':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 109;
      setlower = 109;
      setupper = 77;
      break;
    case 'n':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 110;
      setlower = 110;
      setupper = 78;
      break;
    case 'o':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 111;
      setlower = 111;
      setupper = 79;
      break;
    case 'p':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 112;
      setlower = 112;
      setupper = 80;
      break;
    case 'q':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 113;
      setlower = 113;
      setupper = 81;
      break;
    case 'r':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 114;
      setlower = 114;
      setupper = 82;
      break;
    case 's':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 115;
      setlower = 115;
      setupper = 83;
      break;
    case 't':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 116;
      setlower = 116;
      setupper = 84;
      break;
    case 'u':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 117;
      setlower = 117;
      setupper = 85;
      break;
    case 'v':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 118;
      setlower = 118;
      setupper = 86;
      break;
    case 'w':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 119;
      setlower = 119;
      setupper = 87;
      break;
    case 'x':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 120;
      setlower = 120;
      setupper = 88;
      break;
    case 'y':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 121;
      setlower = 121;
      setupper = 89;
      break;
    case 'z':
      myalnum = 1;
      myalpha = 1;
      myascii = 1;
      mygraph = 1;
      mylower = 1;
      myprint = 1;
      setascii = 122;
      setlower = 122;
      setupper = 90;
      break;
    case '{':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 123;
      setlower = 123;
      setupper = 123;
      break;
    case '|':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 124;
      setlower = 124;
      setupper = 124;
      break;
    case '}':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 125;
      setlower = 125;
      setupper = 125;
      break;
    case '~':
      myascii = 1;
      mygraph = 1;
      myprint = 1;
      mypunct = 1;
      setascii = 126;
      setlower = 126;
      setupper = 126;
      break;
    case 0177:
      myascii = 1;
      mycntrl = 1;
      setascii = 127;
      setlower = 127;
      setupper = 127;
      break;
    case 0200:
      setascii = 0;
      setlower = 128;
      setupper = 128;
      break;
    case 0201:
      setascii = 1;
      setlower = 129;
      setupper = 129;
      break;
    case 0202:
      setascii = 2;
      setlower = 130;
      setupper = 130;
      break;
    case 0203:
      setascii = 3;
      setlower = 131;
      setupper = 131;
      break;
    case 0204:
      setascii = 4;
      setlower = 132;
      setupper = 132;
      break;
    case 0205:
      setascii = 5;
      setlower = 133;
      setupper = 133;
      break;
    case 0206:
      setascii = 6;
      setlower = 134;
      setupper = 134;
      break;
    case 0207:
      setascii = 7;
      setlower = 135;
      setupper = 135;
      break;
    case 0210:
      setascii = 8;
      setlower = 136;
      setupper = 136;
      break;
    case 0211:
      setascii = 9;
      setlower = 137;
      setupper = 137;
      break;
    case 0212:
      setascii = 10;
      setlower = 138;
      setupper = 138;
      break;
    case 0213:
      setascii = 11;
      setlower = 139;
      setupper = 139;
      break;
    case 0214:
      setascii = 12;
      setlower = 140;
      setupper = 140;
      break;
    case 0215:
      setascii = 13;
      setlower = 141;
      setupper = 141;
      break;
    case 0216:
      setascii = 14;
      setlower = 142;
      setupper = 142;
      break;
    case 0217:
      setascii = 15;
      setlower = 143;
      setupper = 143;
      break;
    case 0220:
      setascii = 16;
      setlower = 144;
      setupper = 144;
      break;
    case 0221:
      setascii = 17;
      setlower = 145;
      setupper = 145;