|
case 3:sprintf(cs[1],"\\%s\\data\\shase",ff);sprintf(cs[2],"\\%s\\data\\sznse",ff);break; case 4:sprintf(cs[1],"\\%s\\data\\sh",ff);sprintf(cs[2],"\\%s\\data\\sz",ff);break;} fclose(f1); sprintf(kzm,".day"); //打开目录浏览文件 if ((f1=_fsopen("sh.txt","rt",SH_DENYNO))!=0) fseek(f1,6,1); fscanf(f1,"%6s",&ch1); if (w==1) hxs(1*8,18*24,"<日",3); if (w==2) hxs(1*8,18*24,"<周",3); if (w==3) hxs(1*8,18*24,"<30",3); if (w==4) hxs(1*8,18*24,"<60",3); hxs(4*8,18*24,"线>F1必涨 F2熊市克星 F3穿3线 F4搜股 F7代码更新 H帮助 *指标",3); disp_tx();free(arrow);j=0; while (1==1) { key=getch(); // 退出 "ESC" if (key==27) { setfillstyle(1,7);bar(14*8,7*17,70*8,17*17); hxs(14*8,7*17,"┌──────────────────────────┐",0); hxs(14*8,8*17,"│ │",0); hxs(14*8,9*17,"│ │",0); hxs(14*8,10*17,"│ │",0); hxs(14*8,11*17,"│ 是否退出(y/n)? │",0); hxs(14*8,12*17,"│ │",0); hxs(14*8,13*17,"│ │",0); hxs(14*8,14*17,"│ │",0); hxs(14*8,15*17,"│ │",0); hxs(14*8,16*17,"└──────────────────────────┘ ",0); key=getch();if (key==y||key==Y) {cleardevice();closegraph(); fcloseall(); return;} disp_tx();j=0;continue;} if (key!=13) { ch[j]=key;gm=j;j++;if (j>5) j=5;}//1 if (key==47) {px();sprintf(ch1,"1A0001");disp_tx();} //涨跌"/" if (key==13&&gm==1&&ch[0]==0) {//2 if (ch[1]==3) {gm=5;sprintf(ch,"1A0001");} if (ch[1]==4) {gm=5;sprintf(ch,"002A01");} if (ch[1]==5) {gm=3;sprintf(ch,"2B07");} } if (key==13&&gm==5) { sprintf(ch2,ch1);sprintf(ch3,ch);//if (gm==3) ch3[4]=ch3[5]= ; sprintf(chh,"%c%c%c%c%c%c",ch3[0],ch3[1],ch3[2],ch3[3],ch3[4],ch3[5]); rewind(f1); while (ch1[0]!=e) { fscanf(f1,"%6s",&ch1);if (strcmp(ch1,chh)==0) break; } if (ch1[0]==e) {ch1[0]=0;rewind(f1); while (ch1[0]!=e) {fscanf(f1,"%6s",&ch1);if (strcmp(ch1,ch2)==0) break;}} disp_tx();} if (key==75||key==77) {//3光标→ ← if (xz>0) putimage(kd*(ts-xz)+kd/2+1,0,arrow,0);free(arrow);done=0; if (key==75) xz++; else xz--;if (xz<=0) done=1;xz=min(max(1,xz),min(ts,zj)); arrow=malloc(imagesize(kd*(ts-xz)+kd/2+1,0,kd*(ts-xz)+kd/2+1,420)); getimage(kd*(ts-xz)+kd/2+1,0,kd*(ts-xz)+kd/2+1,426,arrow); setcolor(7);line(kd*(ts-xz)+kd/2+1,10,kd*(ts-xz)+kd/2+1,426); x=zs0[xz][0]; if (w<3) x=x/1000+(199000+100*((x%1000-1)/12)+(x%1000-1)%12+1)*100; setcolor(0); outtextxy(582-8,20,"圹圹圹圹"); setcolor(3);gcvt((double)x,8,chh);outtextxy(583-8,20,chh); setcolor(0); outtextxy(582,32,"圹圹圹?); setcolor(7);gcvt((double)zs0[xz][1]/100.,5,chh);outtextxy(582,32,"O:"); outtextxy(598,32,chh);setcolor(0); outtextxy(582,42,"圹圹圹?); setcolor(7);gcvt((double)zs0[xz][2]/100.,5,chh);outtextxy(582,42,"H:"); outtextxy(598,42,chh);setcolor(0); outtextxy(582,52,"圹圹圹?); setcolor(7);gcvt((double)zs0[xz][3]/100.,5,chh);outtextxy(582,52,"L:"); outtextxy(598,52,chh);setcolor(0); outtextxy(582,62,"圹圹圹?); setcolor(7);gcvt((double)zs0[xz][4]/100.,5,chh);outtextxy(582,62,"C:"); outtextxy(598,62,chh); setcolor(0);outtextxy(582,80,"圹圹圹?); setcolor(14);ltoa(cjl0[xz],chh,10);outtextxy(582,80,chh);gotoxy(40,23); x=0;for (gd=0;gd<5;gd++) x=x+zs0[xz+gd+1][4];x=x/5.0; setcolor(0);outtextxy(45,2,"圹圹圹?);setcolor(14);outtextxy(5,2,"5PMA"); gcvt((double)x/100.,5,chh);outtextxy(45,2,chh); |
