stock.txt

这是本人从网上下载到的一份不完全的股票代码。

#include   <conio.h>     
  #include   <ctype.h>     
  #include   <stdlib.h>     
  #include   <stdio.h>     
  #include   <string.h>     
  #include   <dos.h>     
  #include   <dir.h>     
  #include   <time.h>     
  #include   <graphics.h>     
  #include   <share.h>     
  #include   <math.h>     
  float   boll_g=1.667;     
  char   *s16;void   hxs(int   x16,long   int   y16,char   *s16,int   color);     
  void   dis24hz(int   x16,long   int   y16,char   *p,int   color);void   *arrow;     
  struct   ffblk   ffblk;time_t   t;struct   tm   s;     
  double   tmp,fd[5],xx,yy,zg,zd,zz,bb,bb1,zz1,zz2;//,zbs[1000][3];     
  int   cc,aa,zs0[1000][5],j=0,key=0,gd,gm,i,zj=0,done,d[5],w=1,zdzt=0,x16,kk,cz,sum,cg,     
  bc=1,ts=70,kd=10,tz=0,xz,zb=0,ls,sjgs=0,zdj,bs,spss,spjg,zsp;//qx[240][2]     
  long   int   zdl,k,bigl,bigl1,x,y,x1,y1,z,z1,cjl,cjl0[1000],cjl1[1000],c[10],lj[30][8],y16,mm[6],fdd;     
  unsigned   char   rq[]="000000",rq0[]="   ",ch[]="   ",ch0[39],f[39],ff[39],     
  cch,kzm[5],ml[5],cs[4][39],ch1[]="   ",ch2[]="   ",ch3[]="   ",mc[8],     
  ccc[]="   ",ch8[80],fmlj[4],rq1[9],pf,enter,     
  chh[]="   ";//f5钱龙K线   ch键盘输入   ch1名称表   ch2保存   ch3纯表   chh,cch临时     
  FILE   *fas,*fp,*f1,*f3,*f2;   //,*f4,*f5f3为逐日K线   f1为名称表   f2为临时名称表   f4生成K线     
  void   da(void)   {struct   date   da1;getdate(&da1);     
  sprintf(rq1,"%4d%02d%02d",da1.da_year,da1.da_mon,da1.da_day);return;}     
  void   disp_tx(void);   //显示一个图象菜单     
  void   zxfs(void);     
  #include   "xt.c"     
  #include   "zb.c"     
  #include   "px.c"     
  void   main(void)   {     
  da();     
  w=bc=1;ts=75;kd=10;tz=zb=sjgs=j=key=zj=zdzt=0;     
  fp=_fsopen("hzk16","rb",SH_DENYNO);fas=_fsopen("asc16","rb",SH_DENYNO);     
  s.tm_sec=s.tm_min=s.tm_hour=s.tm_wday=s.tm_yday=s.tm_isdst=1;     
  detectgraph(&gd,&gm);   kd=580/ts;   directvideo=0;   initgraph(&gd,&gm,"   ");     
  hxs(18*8,3*20,"行   情   快   车   盘   胜   股   票   分   析   系   统   (4.0)",14);     
  hxs(8*8,6*20,"本系统为一股票分析软件，起到辅助分析行情的作用，其主要功能如下：",3);     
  hxs(8*8,8*20,"１、数据格式袖珍：数据结构比流行分析系统小2到3倍,选股速度飞快.",3);     
  hxs(8*8,10*20,"２、提供智能选股：采用自行研制盘局突破形态选股,具备较高成功率.",3);     
  hxs(8*8,12*20,"３、提供模拟买卖：利用翻页定位和Ｋ线的平移,可进行复盘模拟选股.",3);     
  hxs(8*8,16*20,"   阿华证券软件工作室   主页:www.hu.zj.cninfo.net/~stock",4);     
  textcolor(3);   gotoxy(68,25);getch();     
  //读参数设置文件     
  if   ((f1=_fsopen("cs.dat","rt",SH_DENYNO))==0)     
  {fclose(f1);   f1=_fsopen("cs.dat","wb+",SH_DENYNO);cch=e;     
  fwrite(&cch,1,1,f1);pf=c;fwrite(&pf,1,1,f1);     
  sprintf(chh,"slon");fwrite(&chh,6,1,f1);fclose(f1);   }     
  f1=_fsopen("cs.dat","rt",SH_DENYNO);fseek(f1,0,2);k=ftell(f1)-4;rewind(f1);     
  fread(&cch,1,1,f1);sjgs=cch-97;fread(&pf,1,1,f1);//sjgs=0;     
  for   (i=0;i<k;i++)   {fread(&cch,1,1,f1);sprintf(ccc,"%c",cch);strcat(ff,ccc);}     
    
  switch(sjgs)     
  {case   0:sprintf(cs[1],"\\%s",ff);sprintf(cs[2],"\\%s",ff);break;     
  case   1:sprintf(cs[1],"\\%s\\data\\shase",ff);sprintf(cs[2],"\\%s\\data\\sznse",ff);break;     
  case   2:sprintf(cs[1],"\\%s",ff);sprintf(cs[2],"\\%s",ff);break;     
  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]);