www.pudn.com > 5101.zip > F51.C
#include#include #include #include #include int zk32[8][4][32]; int zk24[25][3][24]; int zk20[40][3][20]; int zk16[4][2][16]; int dd; void pg1(); void pg11(); void hf11(); int tselect11(); int tselect12(); int test11(); void hf2(); void pg2(); void pg21(); int test21(); int tselect22(); void pg3(); void pg31(); void pg4(); void pg41(); void menu1(); void gc1(); void gc2(); se4(int a) { int i,j,ch,c,d,k; outp(0x378,0x20); tmenu21(a); settextstyle(1,0,2); c=0; for(;;) { i=tselect11(); switch(i) { case 0: hf2(); pg4(); pg41(); c=0; for(;;) { if(c==2) break; for(;;) { delay(200); outp(0x378,0xa0); delay(200); if(!(inp(0x379) & 0x80)) break; if(kbhit()) { ch=getch(); if(ch==27) { c=2; break; } } } if(c==2) break; test21(); if(kbhit()) { ch=getch(); if(ch==27) break; setfillstyle(1,0); bar(84,424,133,447); hzxs20(85,425,34,11); hzxs20(110,425,35,11); getch(); bar(84,424,133,447); hzxs20(85,425,12,11); hzxs20(110,425,13,11); } delay(dd); } break; case 1: j=tselect22(); hf2(); pg4(); pg42(j); c=0; for(;;) { if(c==2) break; for(k=0;k<4;k++) { gotoxy(58,7+k); printf(" "); gotoxy(68,7+k); printf(" "); } for(k=0;k<4;k++) { gotoxy(58,12+k); printf(" "); gotoxy(68,12+k); printf(" "); } for(k=0;k<4;k++) { gotoxy(58,17+k); printf(" "); gotoxy(68,17+k); printf(" "); } for(k=0;k<4;k++) { gotoxy(58,22+k); printf(" "); gotoxy(68,22+k); printf(" "); } for(k=0;k<4;k++) { gotoxy(20,7+k); printf(" "); gotoxy(31,7+k); printf(" "); } for(k=0;k<4;k++) { gotoxy(20,12+k); printf(" "); gotoxy(31,12+k); printf(" "); } for(k=0;k<4;k++) { gotoxy(20,17+k); printf(" "); gotoxy(31,17+k); printf(" "); } for(k=0;k<4;k++) { gotoxy(20,22+k); printf(" "); gotoxy(31,22+k); printf(" "); } for(d=0;d<32;d++) { for(;;) { delay(500); outp(0x378,0xa0); delay(500); if(!((inp(0x379) & 0x80))) break; if(kbhit()) { ch=getch(); if(ch==27) { c=2; break; } } } if(c==2) break; test22(j,d); if(kbhit()) { ch=getch(); if(ch==27) { c=2; break; } } } if(c==2) break; delay(dd); } break; case 2: gc2(); break; case 3: cleardevice(); menu1(); return; } } } void pg4() { int i; setfillstyle(1,7); setcolor(11); hzxs16(50,65,0,11); hzxs16(80,65,1,11); outtextxy(152,63,"BIT"); hzxs16(245,65,2,11); hzxs16(275,65,3,11); hzxs16(350,65,0,11); hzxs16(380,65,1,11); outtextxy(450,63,"BIT"); hzxs16(545,65,2,11); hzxs16(575,65,3,11); hzxs20(10,425,10,11); hzxs20(35,425,11,11); outtextxy(60,425,":"); hzxs20(195,425,15,11); hzxs20(218,425,16,11); hzxs20(241,425,17,11); hzxs20(264,425,18,11); outtextxy(290,425,":"); hzxs20(421,426,38,11); hzxs20(444,426,39,11); hzxs20(467,425,24,11); hzxs20(490,425,25,11); outtextxy(515,427,":"); setfillstyle(1,0); bar(530,423,580,443); switch(dd) { case 0: outtextxy(555,425,"0"); break; case 200: outtextxy(535,425,"200"); break; case 500: outtextxy(535,425,"500"); break; case 1000: outtextxy(535,425,"1000"); break; case 2000: outtextxy(535,425,"2000"); break; } hzxs20(585,425,26,11); hzxs20(610,425,27,11); setfillstyle(1,7); bar(15,455,330,476); setcolor(5); outtextxy(15,454,"Esc"); hzxs20(50,456,28,5); hzxs20(80,456,29,5); hzxs20(110,456,30,5); } void pg41() { int i; setfillstyle(1,7); setcolor(11); for(i=0;i<4;i++) { gotoxy(9,7+i); printf("%2d",i+1); } for(i=4;i<8;i++) { gotoxy(9,8+i); printf("%2d",i+1); } for(i=8;i<12;i++) { gotoxy(9,9+i); printf("%2d",i+1); } for(i=12;i<16;i++) { gotoxy(9,10+i); printf("%2d",i+1); } for(i=16;i<20;i++) { gotoxy(46,i-9); printf("%2d",i+1); } for(i=20;i<24;i++) { gotoxy(46,i-8); printf("%2d",i+1); } for(i=24;i<28;i++) { gotoxy(46,i-7); printf("%2d",i+1); } for(i=28;i<32;i++) { gotoxy(46,i-6); printf("%2d",i+1); } hzxs20(85,425,22,11); hzxs20(110,425,23,11); hzxs20(135,425,36,11); hzxs20(160,425,37,11); hzxs20(313,425,21,11); hzxs20(347,425,22,11); hzxs20(382,425,23,11); } pg42(int a) { int i; for(i=0;i<4;i++) { gotoxy(9,7+i); printf("%2d",a+1); } for(i=4;i<8;i++) { gotoxy(9,8+i); printf("%2d",a+1); } for(i=8;i<12;i++) { gotoxy(9,9+i); printf("%2d",a+1); } for(i=12;i<16;i++) { gotoxy(9,10+i); printf("%2d",a+1); } for(i=16;i<20;i++) { gotoxy(46,i-9); printf("%2d",a+1); } for(i=20;i<24;i++) { gotoxy(46,i-8); printf("%2d",a+1); } for(i=24;i<28;i++) { gotoxy(46,i-7); printf("%2d",a+1); } for(i=28;i<32;i++) { gotoxy(46,i-6); printf("%2d",a+1); } hzxs20(85,425,22,11); hzxs20(110,425,23,11); hzxs20(135,425,36,11); hzxs20(160,425,37,11); hzxs20(313,425,21,11); hzxs20(347,425,22,11); hzxs20(382,425,23,11); } /*****************************************/ se3(int a) { int i,j,ch,c,d,k; tmenu11(a); outp(0x378,0x20); settextstyle(1,0,2); for(;;) { i=tselect11(); switch(i) { case 0: hf11(); pg3(); pg31(); c=0; for(;;) { if(c==2) break; for(;;) { delay(200); outp(0x378,0xa0); delay(200); if(!((inp(0x379)) & 0x80)) break; if(kbhit()) { ch=getch(); if(ch==27) { c=2; break; } } } if(c==2) break; test11(); if(kbhit()) { ch=getch(); if(ch==27) break; } delay(dd); } break; case 1: j=tselect12(); hf11(); pg3(); pg32(j); c=0; for(;;) { if(c==2) break; for(a=0;a<8;a++) { gotoxy(20,10+a*2); printf(" "); gotoxy(31,10+a*2); printf(" "); } for(a=0;a<8;a++) { gotoxy(58,10+a*2); printf(" "); gotoxy(68,10+a*2); printf(" "); } for(d=0;d<16;d++) { for(;;) { delay(500); outp(0x378,0xa0); delay(500); if(!((inp(0x379)) & 0x80)) break; if(kbhit()) { ch=getch(); if(ch==27) { c=2; break; } } } if(c==2) break; test12(j,d); if(kbhit()) { ch=getch(); if(ch==27) { c=2; break; } } } if(c==2) break; delay(dd); } break; case 2: gc1(); break; case 3: cleardevice(); menu1(); return; } } } void pg3() { int i; setfillstyle(1,7); setcolor(11); hzxs16(50,110,0,11); hzxs16(80,110,1,11); outtextxy(152,108,"BIT"); hzxs16(245,110,2,11); hzxs16(275,110,3,11); hzxs16(350,110,0,11); hzxs16(380,110,1,11); outtextxy(450,108,"BIT"); hzxs16(545,110,2,11); hzxs16(575,110,3,11); hzxs20(10,425,10,11); hzxs20(35,425,11,11); outtextxy(60,425,":"); hzxs20(195,425,15,11); hzxs20(218,425,16,11); hzxs20(241,425,17,11); hzxs20(264,425,18,11); outtextxy(290,425,":"); hzxs20(421,426,38,11); hzxs20(444,426,39,11); hzxs20(467,425,24,11); hzxs20(490,425,25,11); outtextxy(515,427,":"); setfillstyle(1,0); bar(530,423,580,443); switch(dd) { case 0: outtextxy(555,425,"0"); break; case 200: outtextxy(535,425,"200"); break; case 500: outtextxy(535,425,"500"); break; case 1000: outtextxy(535,425,"1000"); break; case 2000: outtextxy(535,425,"2000"); break; } hzxs20(585,425,26,11); hzxs20(610,425,27,11); setfillstyle(1,7); bar(15,455,330,476); setcolor(5); outtextxy(15,454,"Esc"); hzxs20(50,456,28,5); hzxs20(80,456,29,5); hzxs20(110,456,30,5); } void pg31() { int i; setfillstyle(1,7); setcolor(11); for(i=0;i<8;i++) { gotoxy(10,10+i*2); printf("%1d ",i+1); } for(i=8;i<16;i++) { gotoxy(47,i*2-6); printf("%2d ",i+1); } hzxs20(85,425,36,11); hzxs20(110,425,37,11); hzxs20(135,425,22,11); hzxs20(160,425,23,11); hzxs20(313,425,21,11); hzxs20(347,425,22,11); hzxs20(382,425,23,11); } pg32(int a) { int i; setfillstyle(1,7); setcolor(11); for(i=0;i<8;i++) { gotoxy(10,10+i*2); printf("%1d ",a+1); } for(i=8;i<16;i++) { gotoxy(47,i*2-6); printf("%2d ",a+1); } hzxs20(85,425,36,11); hzxs20(110,425,37,11); hzxs20(135,425,22,11); hzxs20(160,425,23,11); hzxs20(313,425,21,11); hzxs20(347,425,22,11); hzxs20(382,425,23,11); } /********************************************/ se2(int a) { int i,j,ch,c,d; tmenu21(a); settextstyle(1,0,2); for(;;) { i=tselect11(); switch(i) { case 0: hf2(); pg2(); pg21(); for(;;) { test21(); if(kbhit()) { ch=getch(); if(ch==27) break; setfillstyle(1,0); bar(84,424,133,447); hzxs20(85,425,34,11); hzxs20(110,425,35,11); getch(); bar(84,424,133,447); hzxs20(85,425,12,11); hzxs20(110,425,13,11); } delay(dd); } break; case 1: j=tselect22(); hf2(); pg2(); pg22(j); c=0; for(;;) { if(c==2) break; for(d=0;d<32;d++) { test22(j,d); if(kbhit()) { ch=getch(); if(ch==27) { c=2; break; } } } if(c==2) break; delay(dd); } break; case 2: gc2(); break; case 3: cleardevice(); menu1(); return; } } } void hf2() { int i; setfillstyle(1,0); bar(105,58,630,410); setcolor(14); line(20,60,620,60); line(20,405,620,405); for(i=20;i<621;i=i+100) line(i,61,i,404); rectangle(19,59,621,406); line(321,61,321,405); line(21,85,619,85); line(21,86,619,86); line(21,165,619,165); line(21,245,619,245); line(21,325,619,325); } tmenu21(int a) { int i,j; setfillstyle(1,0); bar(20,20,600,450); setfillstyle(1,7); bar(300,454,450,475); setcolor(14); rectangle(0,40,639,451); rectangle(1,41,638,450); setfillstyle(1,14); bar(2,420,637,421); bar(190,422,191,449); bar(412,422,413,449); setcolor(10); outtextxy(150,2,"F-510"); if(a==1) outtextxy(240,2,"2"); else outtextxy(240,2,"4"); hzxs24(280,8,7,10); hzxs24(330,8,8,10); hzxs24(380,8,0,10); hzxs24(430,8,1,10); setcolor(14); line(20,60,620,60); line(20,405,620,405); for(i=20;i<621;i=i+100) line(i,61,i,404); rectangle(19,59,621,406); line(321,61,321,405); line(21,85,619,85); line(21,86,619,86); line(21,165,619,165); line(21,245,619,245); line(21,325,619,325); } void pg2() { int i; setfillstyle(1,7); setcolor(11); hzxs16(50,65,0,11); hzxs16(80,65,1,11); outtextxy(152,63,"BIT"); hzxs16(245,65,2,11); hzxs16(275,65,3,11); hzxs16(350,65,0,11); hzxs16(380,65,1,11); outtextxy(450,63,"BIT"); hzxs16(545,65,2,11); hzxs16(575,65,3,11); hzxs20(10,425,10,11); hzxs20(35,425,11,11); outtextxy(60,425,":"); hzxs20(195,425,15,11); hzxs20(218,425,16,11); hzxs20(241,425,17,11); hzxs20(264,425,18,11); outtextxy(290,425,":"); hzxs20(421,426,38,11); hzxs20(444,426,39,11); hzxs20(467,425,24,11); hzxs20(490,425,25,11); outtextxy(515,427,":"); setfillstyle(1,0); bar(530,423,580,443); switch(dd) { case 0: outtextxy(555,425,"0"); break; case 200: outtextxy(535,425,"200"); break; case 500: outtextxy(535,425,"500"); break; case 1000: outtextxy(535,425,"1000"); break; case 2000: outtextxy(535,425,"2000"); break; } hzxs20(585,425,26,11); hzxs20(610,425,27,11); setfillstyle(1,7); bar(15,455,330,476); setcolor(5); outtextxy(15,454,"Esc"); hzxs20(50,456,28,5); hzxs20(80,456,29,5); hzxs20(110,456,30,5); } void pg21() { int i; setfillstyle(1,7); setcolor(11); for(i=0;i<4;i++) { gotoxy(9,7+i); printf("%2d",i+1); } for(i=4;i<8;i++) { gotoxy(9,8+i); printf("%2d",i+1); } for(i=8;i<12;i++) { gotoxy(9,9+i); printf("%2d",i+1); } for(i=12;i<16;i++) { gotoxy(9,10+i); printf("%2d",i+1); } for(i=16;i<20;i++) { gotoxy(46,i-9); printf("%2d",i+1); } for(i=20;i<24;i++) { gotoxy(46,i-8); printf("%2d",i+1); } for(i=24;i<28;i++) { gotoxy(46,i-7); printf("%2d",i+1); } for(i=28;i<32;i++) { gotoxy(46,i-6); printf("%2d",i+1); } for(i=0;i<3;i++) hzxs20(85+25*i,425,i+12,11); hzxs20(160,425,8,11); hzxs20(313,427,19,11); hzxs20(336,425,20,11); hzxs20(359,425,15,11); hzxs20(382,425,16,11); for(i=0;i<5;i++) hzxs20(170+i*30,456,i+31,5); } pg22(int a) { int i; for(i=0;i<4;i++) { gotoxy(9,7+i); printf("%2d",a+1); } for(i=4;i<8;i++) { gotoxy(9,8+i); printf("%2d",a+1); } for(i=8;i<12;i++) { gotoxy(9,9+i); printf("%2d",a+1); } for(i=12;i<16;i++) { gotoxy(9,10+i); printf("%2d",a+1); } for(i=16;i<20;i++) { gotoxy(46,i-9); printf("%2d",a+1); } for(i=20;i<24;i++) { gotoxy(46,i-8); printf("%2d",a+1); } for(i=24;i<28;i++) { gotoxy(46,i-7); printf("%2d",a+1); } for(i=28;i<32;i++) { gotoxy(46,i-6); printf("%2d",a+1); } for(i=0;i<3;i++) hzxs20(85+25*i,425,i+12,11); hzxs20(160,425,8,11); hzxs20(313,427,19,11); hzxs20(336,425,20,11); hzxs20(359,425,15,11); hzxs20(382,425,16,11); for(i=0;i<5;i++) hzxs20(170+i*30,456,i+31,5); } int tselect22() { int a,b; setfillstyle(1,7); bar(350,100,540,290); bar1(350,100,540,290,0); bar1(355,105,535,285,1); for(a=357;a<530;a+=30) for(b=107;b<275;b+=30) bar1(a,b,a+25,b+25,0); bar1(357,107,383,133,1); setcolor(5); settextstyle(1,0,1); outtextxy(367,110,"1"); outtextxy(427,140,"9"); outtextxy(397,110,"2"); outtextxy(450,140,"10"); outtextxy(427,110,"3"); outtextxy(480,140,"11"); outtextxy(457,110,"4"); outtextxy(510,140,"12"); outtextxy(487,110,"5"); outtextxy(360,170,"13"); outtextxy(517,110,"6"); outtextxy(390,170,"14"); outtextxy(367,140,"7"); outtextxy(420,170,"15"); outtextxy(397,140,"8"); outtextxy(450,170,"16"); outtextxy(480,170,"17"); outtextxy(360,230,"25"); outtextxy(510,170,"18"); outtextxy(390,230,"26"); outtextxy(360,200,"19"); outtextxy(420,230,"27"); outtextxy(390,200,"20"); outtextxy(450,230,"28"); outtextxy(420,200,"21"); outtextxy(480,230,"29"); outtextxy(450,200,"22"); outtextxy(510,230,"30"); outtextxy(480,200,"23"); outtextxy(360,260,"31"); outtextxy(510,200,"24"); outtextxy(390,260,"32"); b=0; for(;;) { a=getch(); switch(a) { case 0x48: bar1(357+b%6*30,107+b/6*30,382+b%6*30,132+b/6*30,0); b-=6; if(b<0) b=36+b; bar1(357+b%6*30,107+b/6*30,382+b%6*30,132+b/6*30,1); break; case 0x50: bar1(357+b%6*30,107+b/6*30,382+b%6*30,132+b/6*30,0); b+=6; if(b>35) b=b-36; bar1(357+b%6*30,107+b/6*30,382+b%6*30,132+b/6*30,1); break; case 0x4b: bar1(357+b%6*30,107+b/6*30,382+b%6*30,132+b/6*30,0); b--; if(((b+1)%6)==0) b+=6; bar1(357+b%6*30,107+b/6*30,382+b%6*30,132+b/6*30,1); break; case 0x4d : bar1(357+b%6*30,107+b/6*30,382+b%6*30,132+b/6*30,0); b++; if((b%6)==0) b-=6; bar1(357+b%6*30,107+b/6*30,382+b%6*30,132+b/6*30,1); break; case 13: if(b<32) return(b); break; } } } int test21() { int i,j,ch,x,y,z; for(i=0;i<32;i++) { outp(0x378,i); delay(1); outp(0x378,0x20+i); delay(1); for(;;) { j=inp(0x379); if(j & 8) break; if(kbhit()) { ch=getch(); if(ch==27) return; } } outp(0x378,0x40); delay(1); x=inp(0x379); x=x/16; outp(0x378,0x60); delay(1); y=inp(0x379); y=y/16; outp(0x378,0x80); delay(1); z=inp(0x379); z=z/16; xsdata21(x,y,z,i); } } test22(int a,int b) { int j,ch,x,y,z; outp(0x378,a); delay(1); outp(0x378,0x20+a); delay(1); for(;;) { j=inp(0x379); if(j & 8) break; if(kbhit()) { ch=getch(); if(ch==27) return; } } outp(0x378,0x40); delay(1); x=inp(0x379); x=x/16; outp(0x378,0x60); delay(1); y=inp(0x379); y=y/16; outp(0x378,0x80); delay(1); z=inp(0x379); z=z/16; xsdata21(x,y,z,b); } xsdata21(x,y,z,i) int x,y,z,i; { float v; int j; char s1[1],s2[1],s3[1]; ltoa(x,s1,16); strupr(s1); ltoa(y,s2,16); strupr(s2); ltoa(z,s3,16); strupr(s3); j=x*256+y*16+z; v=10.0*j/4096-5; if(i<4) { gotoxy(20,7+i); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(31,7+i); printf("%1.5f ",v); } if((i>3)&&(i<8)) { gotoxy(20,8+i); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(31,8+i); printf("%1.5f ",v); } if((i>7)&&(i<12)) { gotoxy(20,9+i); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(31,9+i); printf("%1.5f ",v); } if((i>11)&&(i<16)) { gotoxy(20,10+i); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(31,10+i); printf("%1.5f ",v); } if((i>15)&&(i<20)) { gotoxy(58,i-9); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(68,i-9); printf("%1.5f ",v); } if((i>19)&&(i<24)) { gotoxy(58,i-8); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(68,i-8); printf("%1.5f ",v); } if((i>23)&&(i<28)) { gotoxy(58,i-7); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(68,i-7); printf("%1.5f ",v); } if((i>27)&&(i<32)) { gotoxy(58,i-6); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(68,i-6); printf("%1.5f ",v); } } /**************************************************/ se1(int a) { int i,j,ch,c,d; tmenu11(a); settextstyle(1,0,2); for(;;) { i=tselect11(); switch(i) { case 0: hf11(); pg1(); pg11(); for(;;) { test11(); if(kbhit()) { ch=getch(); if(ch==27) break; setfillstyle(1,0); bar(84,424,133,447); hzxs20(85,425,34,11); hzxs20(110,425,35,11); getch(); bar(84,424,133,447); hzxs20(85,425,12,11); hzxs20(110,425,13,11); } delay(dd); } break; case 1: j=tselect12(); hf11(); pg1(); pg12(j); c=0; for(;;) { if(c==2) break; for(d=0;d<16;d++) { test12(j,d); if(kbhit()) { ch=getch(); if(ch==27) { c=2; break; } } } if(c==2) break; delay(dd); } break; case 2: gc1(); break; case 3: cleardevice(); menu1(); return; } } } void hf11() { int i; setfillstyle(1,0); bar(100,70,630,391); setcolor(14); for(i=102;i<391;i=i+32) line(20,i,620,i); for(i=20;i<621;i=i+100) line(i,102,i,390); rectangle(19,101,621,391); line(321,101,321,389); line(21,133,619,133); } tmenu11(int a) { int i,j; setfillstyle(1,0); bar(20,20,600,450); setfillstyle(1,7); bar(300,455,450,475); setcolor(14); rectangle(0,40,639,451); rectangle(1,41,638,450); setfillstyle(1,14); bar(2,420,637,421); bar(190,422,191,449); bar(412,422,413,449); setcolor(10); outtextxy(150,2,"F-510"); if(a==0) outtextxy(240,2,"1"); else outtextxy(240,2,"3"); hzxs24(280,7,7,10); hzxs24(330,7,8,10); hzxs24(380,7,0,10); hzxs24(430,7,1,10); setcolor(14); line(20,390,620,390); for(i=102;i<391;i=i+32) line(20,i,620,i); for(i=20;i<621;i=i+100) line(i,102,i,390); rectangle(19,101,621,391); line(321,101,321,389); line(21,133,619,133); } int tselect11() { int a,b,c; setfillstyle(1,7); bar(110,76,310,245); bar1(110,76,310,245,0); bar1(115,81,305,240,1); bar1(117,83,303,118,1); setcolor(2); rectangle(117,83,303,118); rectangle(116,84,302,117); for(a=0;a<3;a++) hzxs24(130+a*35,90,a+9,5); hzxs24(235,90,7,5); hzxs24(270,90,8,5); bar1(117,123,303,158,0); hzxs24(130,130,12,5); for(a=1;a<3;a++) hzxs24(130+a*35,130,a+9,5); hzxs24(235,130,7,5); hzxs24(270,130,8,5); bar1(117,163,303,198,0); for(a=0;a<6;a++) hzxs24(130+a*28,170,a+19,5); bar1(117,203,303,238,0); hzxs24(130,210,17,5); hzxs24(270,210,18,5); b=0; for(;;) { a=getch(); switch(a) { case 0x48: bar1(117,83+40*b,303,118+40*b,0); setcolor(7); rectangle(117,83+40*b,303,118+40*b); rectangle(118,84+40*b,302,117+40*b); b--; if(b<0) b=3; bar1(117,83+40*b,303,118+40*b,1); setcolor(2); rectangle(117,83+40*b,303,118+40*b); rectangle(118,84+40*b,302,117+40*b); break; case 0x50: bar1(117,83+40*b,303,118+40*b,0); setcolor(7); rectangle(117,83+40*b,303,118+40*b); rectangle(118,84+40*b,302,117+40*b); b++; if(b>3) b=0; bar1(117,83+40*b,303,118+40*b,1); setcolor(2); rectangle(117,83+40*b,303,118+40*b); rectangle(118,84+40*b,302,117+40*b); break; case 13: return(b); } } } int tselect12() { int a,b; setfillstyle(1,7); bar(350,100,540,290); bar1(350,100,540,290,0); bar1(355,105,535,285,1); for(a=357;a<530;a+=45) for(b=107;b<275;b+=45) bar1(a,b,a+40,b+40,0); bar1(357,107,398,148,1); setcolor(5); outtextxy(370,115,"1"); outtextxy(370,205,"9"); outtextxy(415,115,"2"); outtextxy(410,205,"10"); outtextxy(460,115,"3"); outtextxy(455,205,"11"); outtextxy(505,115,"4"); outtextxy(500,205,"12"); outtextxy(370,160,"5"); outtextxy(365,250,"13"); outtextxy(415,160,"6"); outtextxy(410,250,"14"); outtextxy(460,160,"7"); outtextxy(455,250,"15"); outtextxy(505,160,"8"); outtextxy(500,250,"16"); b=0; for(;;) { a=getch(); switch(a) { case 0x48: bar1(357+b%4*45,107+b/4*45,397+b%4*45,147+b/4*45,0); b-=4; if(b<0) b=16+b; bar1(357+b%4*45,107+b/4*45,397+b%4*45,147+b/4*45,1); break; case 0x50: bar1(357+b%4*45,107+b/4*45,397+b%4*45,147+b/4*45,0); b+=4; if(b>15) b=b-16; bar1(357+b%4*45,107+b/4*45,397+b%4*45,147+b/4*45,1); break; case 0x4b: bar1(357+b%4*45,107+b/4*45,397+b%4*45,147+b/4*45,0); b--; if(((b+1)%4)==0) b+=4; bar1(357+b%4*45,107+b/4*45,397+b%4*45,147+b/4*45,1); break; case 0x4d : bar1(357+b%4*45,107+b/4*45,397+b%4*45,147+b/4*45,0); b++; if((b%4)==0) b-=4; bar1(357+b%4*45,107+b/4*45,397+b%4*45,147+b/4*45,1); break; case 13: return(b); } } } void pg1() { int i; setfillstyle(1,7); setcolor(11); hzxs16(50,110,0,11); hzxs16(80,110,1,11); outtextxy(152,108,"BIT"); hzxs16(245,110,2,11); hzxs16(275,110,3,11); hzxs16(350,110,0,11); hzxs16(380,110,1,11); outtextxy(450,108,"BIT"); hzxs16(545,110,2,11); hzxs16(575,110,3,11); hzxs20(10,425,10,11); hzxs20(35,425,11,11); outtextxy(60,425,":"); hzxs20(195,425,15,11); hzxs20(218,425,16,11); hzxs20(241,425,17,11); hzxs20(264,425,18,11); outtextxy(290,425,":"); hzxs20(421,426,38,11); hzxs20(444,426,39,11); hzxs20(467,425,24,11); hzxs20(490,425,25,11); outtextxy(515,427,":"); setfillstyle(1,0); bar(530,423,580,443); switch(dd) { case 0: outtextxy(555,425,"0"); break; case 200: outtextxy(535,425,"200"); break; case 500: outtextxy(535,425,"500"); break; case 1000: outtextxy(535,425,"1000"); break; case 2000: outtextxy(535,425,"2000"); break; } hzxs20(585,425,26,11); hzxs20(610,425,27,11); setfillstyle(1,7); bar(15,455,330,476); setcolor(5); outtextxy(15,454,"Esc"); hzxs20(50,456,28,5); hzxs20(80,456,29,5); hzxs20(110,456,30,5); } void pg11() { int i; setfillstyle(1,7); setcolor(11); for(i=0;i<8;i++) { gotoxy(10,10+i*2); printf("%1d ",i+1); } for(i=8;i<16;i++) { gotoxy(47,i*2-6); printf("%2d ",i+1); } for(i=0;i<3;i++) hzxs20(85+25*i,425,i+12,11); hzxs20(160,425,8,11); hzxs20(313,427,19,11); hzxs20(336,425,20,11); hzxs20(359,425,15,11); hzxs20(382,425,16,11); for(i=0;i<5;i++) hzxs20(170+i*30,456,i+31,5); } pg12(int a) { int i; setfillstyle(1,7); setcolor(11); for(i=0;i<8;i++) { gotoxy(10,10+i*2); printf("%1d ",a+1); } for(i=8;i<16;i++) { gotoxy(47,i*2-6); printf("%2d ",a+1); } for(i=0;i<3;i++) hzxs20(85+25*i,425,i+12,11); hzxs20(160,425,8,11); hzxs20(313,427,19,11); hzxs20(336,425,20,11); hzxs20(359,425,15,11); hzxs20(382,425,16,11); } int test11() { int i,j,ch,x,y,z; for(i=0;i<16;i++) { outp(0x378,i); delay(1); outp(0x378,0x20+i); delay(1); for(;;) { j=inp(0x379); if(j & 8) break; if(kbhit()) { ch=getch(); if(ch==27) return(2); } } outp(0x378,0x40); delay(1); x=inp(0x379); x=x/16; outp(0x378,0x60); delay(1); y=inp(0x379); y=y/16; outp(0x378,0x80); delay(1); z=inp(0x379); z=z/16; xsdata(x,y,z,i); } } int test12(int a,int i) { int j,ch,x,y,z; outp(0x378,a); delay(1); outp(0x378,0x20+a); delay(1); for(;;) { j=inp(0x379); if(j & 8) break; if(kbhit()) { ch=getch(); if(ch==27) return(2); } } outp(0x378,0x40); delay(1); x=inp(0x379); x=x/16; outp(0x378,0x60); delay(1); y=inp(0x379); y=y/16; outp(0x378,0x80); delay(1); z=inp(0x379); z=z/16; xsdata(x,y,z,i); } xsdata(x,y,z,i) int x,y,z,i; { int a; float v; int j; char s1[1],s2[1],s3[1]; ltoa(x,s1,16); strupr(s1); ltoa(y,s2,16); strupr(s2); ltoa(z,s3,16); strupr(s3); j=x*256+y*16+z; v=10.0*j/4096-5; if(i<8) { gotoxy(20,10+i*2); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(31,10+i*2); printf("%1.5f ",v); } else { gotoxy(58,i*2-6); printf("%s",s1); printf("%s",s2); printf("%s",s3); gotoxy(68, i*2-6); printf("%1.5f ",v); } } /************************************************/ hzxs32(int x,int y,int n,int col) { int i,j,a,b; for(i=0;i<32;i++) { b=x-1; for(j=0;j<=3;j++) for(a=1;a<0x81;a=a*2) { if(zk32[n][j][i] & 0x80/a) b++; else putpixel(b++,y+i,col); } } } hzxs24(int x,int y,int n,int col) { int i,j,a,b; for(i=0;i<24;i++) { b=x-1; for(j=0;j<=2;j++) for(a=1;a<0x81;a=a*2) { if(zk24[n][j][i] & 0x80/a) b++; else putpixel(b++,y+i,col); } } } hzxs20(int x,int y,int n,int col) { int i,j,a,b; for(i=0;i<20;i++) { b=x-1; for(j=0;j<=2;j++) for(a=1;a<0x81;a=a*2) { if(zk20[n][j][i] & 0x80/a) b++; else putpixel(b++,y+i,col); } } } hzxs16(int x,int y,int n,int col) { int i,j,a,b; for(i=0;i<16;i++) { b=x-1; for(j=0;j<2;j++) for(a=1;a<0x81;a=a*2) { if(zk16[n][j][i] & 0x80/a) b++; else putpixel(b++,y+i,col); } } } void xs() { FILE *fp; int h,a,i,j; fp=fopen("zk.f51","rb"); for(i=0;i<8;i++) for(j=0;j<32;j++) for(a=0;a<4;a++) zk32[i][a][j]=getc(fp); for(i=0;i<25;i++) for(j=0;j<24;j++) for(a=0;a<3;a++) zk24[i][a][j]=getc(fp); for(i=0;i<40;i++) for(j=0;j<20;j++) for(a=0;a<3;a++) zk20[i][a][j]=getc(fp); for(i=0;i<4;i++) for(j=0;j<16;j++) for(a=0;a<2;a++) zk16[i][a][j]=getc(fp); fclose(fp); } void menu1() { int i; setfillstyle(1,7); /* fk1 */ settextstyle(1,0,4); bar(2,455,637,477); bar1(2,455,637,477,0); setfillstyle(1,5); bar(130,50,560,150); setfillstyle(1,7); bar(110,40,540,140); bar1(110,40,540,140,0); bar1(115,45,535,135,1); setcolor(4); outtextxy(130,70,"F-5100"); for(i=0;i<8;i++) hzxs32(245+i*35,71,i,5); /* fk2 */ settextstyle(1,0,2); setcolor(5); setfillstyle(1,5); bar(20,456,21,475); line(16,461,20,456); line(16,462,20,457); line(25,461,21,456); line(25,462,21,457); bar(39,456,40,475); line(35,471,39,475); line(35,470,39,474); line(44,470,40,475); line(44,471,40,474); hzxs20(55,456,0,5); hzxs20(80,456,1,5); outtextxy(140,454,"Enter"); hzxs20(200,456,2,5); hzxs20(225,456,3,5); outtextxy(300,454,"Esc"); hzxs20(340,456,4,5); hzxs20(365,456,5,5); settextstyle(1,0,4); for(i=0;i<4;i++) hzxs20(540+i*25,456,6+i,4); setfillstyle(1,5); bar(80,200,220,390); setfillstyle(1,7); bar(60,190,200,380); bar1(60,190,200,380,0); bar1(65,195,195,375,1); bar1(67,197,193,237,1); setcolor(5); outtextxy(77,199,"F-5101"); setcolor(2); rectangle(67,197,193,237); rectangle(68,198,192,236); bar1(67,242,193,282,0); setcolor(5); outtextxy(77,244,"F-5102"); bar1(67,287,193,327,0); setcolor(5); outtextxy(77,289,"F-5103"); bar1(67,332,193,372,0); setcolor(5); outtextxy(77,334,"F-5104"); } int select(int b) { int a; for(;;) { a=getch(); switch(a) { case 0x48: bar1(67,197+45*b,193,237+45*b,0); setcolor(7); rectangle(67,197+45*b,193,237+45*b); rectangle(68,198+45*b,192,236+45*b); b--; if(b<0) b=3; bar1(67,197+45*b,193,237+45*b,1); setcolor(2); rectangle(67,197+45*b,193,237+45*b); rectangle(68,198+45*b,192,236+45*b); break; case 0x50: bar1(67,197+45*b,193,237+45*b,0); setcolor(7); rectangle(67,197+45*b,193,237+45*b); rectangle(68,198+45*b,192,236+45*b); b++; if(b>3) b=0; bar1(67,197+45*b,193,237+45*b,1); setcolor(2); rectangle(67,197+45*b,193,237+45*b); rectangle(68,198+45*b,192,236+45*b); break; case 27: return(4); case 13: return(b); } } } select1(int a) { int ch,b; setfillstyle(1,5); bar(270,190+a*40,440,290+a*40); setfillstyle(1,7); bar(250,180+a*40,420,280+a*40); bar1(250,180+a*40,420,280+a*40,0); bar1(255,185+a*40,415,275+a*40,1); bar1(257,187+a*40,413,227+a*40,1); for(b=0;b<4;b++) hzxs24(270+b*36,196+a*40,b,5); hzxs24(270,242+a*40,4,5); hzxs24(298,242+a*40,5,5); hzxs24(326,242+a*40,6,5); hzxs24(354,242+a*40,2,5); hzxs24(378,242+a*40,3,5); bar1(257,232+a*40,413,273+a*40,0); setcolor(2); rectangle(257,187+a*40,413,227+a*40); rectangle(258,188+a*40,412,226+a*40); b=1; for(;;) { ch=getch(); switch(ch) { case 0x48: b=1; bar1(257,187+a*40,413,227+a*40,1); bar1(257,232+a*40,413,273+a*40,0); setcolor(2); rectangle(257,187+a*40,413,227+a*40); rectangle(258,188+a*40,412,226+a*40); setcolor(7); rectangle(257,232+a*40,413,273+a*40); rectangle(258,233+a*40,412,272+a*40); break; case 0x50: b=2; bar1(257,187+a*40,413,227+a*40,0); bar1(257,232+a*40,413,273+a*40,1); setcolor(7); rectangle(257,187+a*40,413,227+a*40); rectangle(258,188+a*40,412,226+a*40); setcolor(2); rectangle(257,232+a*40,413,273+a*40); rectangle(258,233+a*40,412,272+a*40); break; case 27: setfillstyle(1,0); bar(240,170,450,410); return(0); case 13: return(b); } } } bar1(x,y,x1,y1,a) int x,y,x1,y1,a; { if(a==0) setcolor(15); else setcolor(8); line(x-2,y-2,x1+1,y-2); line(x-1,y-1,x1,y-1); line(x-2,y-1,x-2,y1+2); line(x-1,y,x-1,y1+1); if(a==1) setcolor(15); else setcolor(8); line(x-1,y1+2,x1+2,y1+2); line(x,y1+1,x1+1,y1+1); line(x1+2,y-2,x1+2,y1+1); line(x1+1,y-1,x1+1,y1); } main() { int a,b,c,ch,k,p; a=DETECT; b=0; registerbgidriver(EGAVGA_driver); registerbgifont(triplex_font); initgraph(&a,&b,""); dd=500; xs(); setpalette(5,0); setpalette(13,17); setbkcolor(1); menu1(); a=0; for(;;) { a=select(a); if(a==4) break; b=select1(a); if(b==0) continue; if((a==0)||(a==2)) { if(b==1) se1(a); else se3(a); } else { if(b==1) se2(a); else se4(a); } a=0; } restorecrtmode(); exit(0); } void gc1() { int i,j,ch; setfillstyle(1,7); bar(348,118,452,327); bar1(348,118,452,327,0); bar1(353,123,447,322,1); bar1(355,125,445,160,0); bar1(355,165,445,200,0); bar1(355,205,445,240,1); bar1(355,245,445,280,0); bar1(355,285,445,320,0); setcolor(5); outtextxy(397,132,"0"); outtextxy(387,172,"200"); outtextxy(387,212,"500"); outtextxy(380,252,"1000"); outtextxy(380,292,"2000"); i=2; for(;;) { ch=getch(); switch(ch) { case 0x48: bar1(355,125+i*40,445,160+i*40,0); i--; if(i<0) i=4; bar1(355,125+i*40,445,160+i*40,1); break; case 0x50: bar1(355,125+i*40,445,160+i*40,0); i++; if(i>4) i=0; bar1(355,125+i*40,445,160+i*40,1); break; case 27: setfillstyle(1,0); bar(340,115,455,330); setcolor(14); line(340,133,460,133); for(j=0;j<8;j++) line(340,134+j*32,460,134+j*32); line(420,110,420,340); return; case 13: setfillstyle(1,0); bar(340,115,455,330); setcolor(14); line(340,133,460,133); for(j=0;j<8;j++) line(340,134+j*32,460,134+j*32); line(420,110,420,340); switch(i) { case 0: dd=0; break; case 1: dd=200; break; case 2: dd=500; break; case 3: dd=1000; break; case 4: dd=2000; break; } return; } } } void gc2() { int i,j,ch; setfillstyle(1,7); bar(348,118,452,327); bar1(348,118,452,327,0); bar1(353,123,447,322,1); bar1(355,125,445,160,0); bar1(355,165,445,200,0); bar1(355,205,445,240,1); bar1(355,245,445,280,0); bar1(355,285,445,320,0); setcolor(5); outtextxy(397,132,"0"); outtextxy(387,172,"200"); outtextxy(387,212,"500"); outtextxy(380,252,"1000"); outtextxy(380,292,"2000"); i=2; for(;;) { ch=getch(); switch(ch) { case 0x48: bar1(355,125+i*40,445,160+i*40,0); i--; if(i<0) i=4; bar1(355,125+i*40,445,160+i*40,1); break; case 0x50: bar1(355,125+i*40,445,160+i*40,0); i++; if(i>4) i=0; bar1(355,125+i*40,445,160+i*40,1); break; case 27: setfillstyle(1,0); bar(340,115,455,330); setcolor(14); for(j=0;j<3;j++) line(340,165+j*80,460,165+j*80); line(420,110,420,340); return; case 13: setfillstyle(1,0); bar(340,115,455,330); setcolor(14); for(j=0;j<3;j++) line(340,165+j*80,460,165+j*80); line(420,110,420,340); switch(i) { case 0: dd=0; break; case 1: dd=200; break; case 2: dd=500; break; case 3: dd=1000; break; case 4: dd=2000; break; } return; } } }