新建 文本文档 (2).txt

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

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);     
  x=0;for   (gd=0;gd<10;gd++)   x=x+zs0[xz+gd+1][4];x=x/10.0;     
  setcolor(0);outtextxy(135,2,"圹圹圹?);setcolor(13);outtextxy(95,2,"10PM");     
  gcvt((double)x/100.,5,chh);outtextxy(135,2,chh);     
  x=0;for   (gd=0;gd<20;gd++)   x=x+zs0[xz+gd+1][4];x=x/20.0;     
  setcolor(0);outtextxy(220,2,"圹圹圹?);setcolor(9);outtextxy(185,2,"20PM");     
  gcvt((double)x/100.,5,chh);outtextxy(220,2,chh);     
  x=0;for   (gd=0;gd<30;gd++)   x=x+zs0[xz+gd+1][4];x=x/30.0;     
  setcolor(0);outtextxy(310,2,"圹圹圹?);setcolor(2);outtextxy(275,2,"30PM");     
  gcvt((double)x/100.,5,chh);outtextxy(310,2,chh);     
  x=0;for   (gd=0;gd<75;gd++)   x=x+zs0[xz+gd+1][4];x=x/75.0;     
  setcolor(0);outtextxy(405,2,"圹圹圹?);setcolor(6);outtextxy(365,2,"75PM");     
  gcvt((double)x/100.,5,chh);outtextxy(405,2,chh);     
  x=0;for   (gd=0;gd<150;gd++)   x=x+zs0[xz+gd+1][4];x=x/150.0;     
  setcolor(0);outtextxy(500,2,"圹圹圹?);setcolor(7);outtextxy(455,2,"150PM");     
  gcvt((double)x/100.,5,chh);outtextxy(500,2,chh);     
  x=0;for   (gd=0;gd<5;gd++)   x=x+zs0[xz+gd][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);     
  y=0;for   (gd=0;gd<10;gd++)   y=y+zs0[xz+gd][4];y=y/10.0;     
  setcolor(0);outtextxy(135,2,"圹圹圹?);setcolor(13);outtextxy(95,2,"10PM");     
  gcvt((double)y/100.,5,chh);outtextxy(135,2,chh);     
  //   cprintf("%f",(float)max(x,y)/min(x,y));     
  x=0;for   (gd=0;gd<20;gd++)   x=x+zs0[xz+gd][4];x=x/20.0;     
  setcolor(0);outtextxy(220,2,"圹圹圹?);setcolor(9);outtextxy(185,2,"20PM");     
  gcvt((double)x/100.,5,chh);outtextxy(220,2,chh);     
  x=0;for   (gd=0;gd<30;gd++)   x=x+zs0[xz+gd][4];x=x/30.0;     
  setcolor(0);outtextxy(310,2,"圹圹圹?);setcolor(2);outtextxy(275,2,"30PM");     
  gcvt((double)x/100.,5,chh);outtextxy(310,2,chh);     
  x=0;for   (gd=0;gd<75;gd++)   x=x+zs0[xz+gd][4];x=x/75.0;     
  setcolor(0);outtextxy(405,2,"圹圹圹?);setcolor(6);outtextxy(365,2,"75PM");     
  gcvt((double)x/100.,5,chh);outtextxy(405,2,chh);     
  x=0;for   (gd=0;gd<150;gd++)   x=x+zs0[xz+gd][4];x=x/150.0;     
  setcolor(0);outtextxy(500,2,"圹圹圹?);setcolor(7);outtextxy(455,2,"150PM");     
  gcvt((double)x/100.,5,chh);outtextxy(500,2,chh);     
  x=0;for   (gd=0;gd<5;gd++)   x=x+cjl0[xz+gd];x=x/5;   //移动平均量     
  setcolor(0);outtextxy(100,222,"圹圹圹圹圹?);setcolor(14);outtextxy(40,222,"5PMV");     
  ltoa(x,chh,10);outtextxy(100,222,chh);     
  x=0;for   (gd=0;gd<10;gd++)   x=x+cjl0[xz+gd];x=x/10;     
  setcolor(0);outtextxy(250,222,"圹圹圹圹圹?);setcolor(13);outtextxy(190,222,"10PMV");     
  ltoa(x,chh,10);outtextxy(250,222,chh);     
  //     
  if   (zb==1)   {     
  ls=75;cz=xz+1;zz=0.000000000;   for   (j=cz;j<cz+ls;j++)   {     
  bb=0.00000000000;for   (i=0;i<ls;i++)   bb=bb+(double)zs0[j+i][4]/(double)ls;//bb=(double)bb/(double)ls;     
  zz=zz+((double)zs0[j][4]-bb)*((double)zs0[j][4]-bb);     
  }zz=sqrt((double)zz/ls);     
  bb=0.0000000000;for   (i=0;i<ls;i++)   bb=bb+(double)zs0[cz+i][4]/(double)ls;//bb=(double)bb/ls;     
  xx=bb+boll_g*zz;yy=bb-boll_g*zz;     
  setcolor(0);outtextxy(60,302,"圹圹圹圹圹圹圹");setcolor(15);     
  outtextxy(60,302,"UP:");gcvt((double)xx/100.,5,chh);outtextxy(100,302,chh);     
  setcolor(0);outtextxy(190,302,"圹圹圹圹圹圹圹");setcolor(14);     
  outtextxy(190,302,"MD:");gcvt((double)bb/100.,5,chh);outtextxy(230,302,chh);     
  setcolor(0);outtextxy(320,302,"圹圹圹圹圹圹圹");setcolor(2);     
  outtextxy(320,302,"DN:");gcvt((double)yy/100.,5,chh);outtextxy(360,302,chh);     
  }     
  if   (zb==0)   {     
  if   (key==75&&xz>1)   {zz=(zz*10.0-(xx-yy)*2.0)/8.0;     
  xx=(xx*13.0-zs0[xz-1][4]*2.0)/11.0;yy=(yy*27.0-zs0[xz-1][4]*2.0)/25.0;     
  bb=(xx-yy-zz)*2.0;   }     
  if   (key==77&&done==0)   {     
  xx=(xx*11.0+zs0[xz][4]*2.0)/13.0;     
  yy=(zs0[xz][4]*2.0+yy*25.0)/27.0;zz=(zz*8.0+(xx-yy)*2.0)/10.0;     
  bb=(xx-yy-zz)*2.0;   }     
  setcolor(0);outtextxy(60,302,"圹圹圹圹圹圹圹圹圹圹");setcolor(15);     
  outtextxy(60,302,"DIF:");gcvt((double)(xx-yy),5,chh);outtextxy(100,302,chh);     
  setcolor(0);outtextxy(190,302,"圹圹圹圹圹圹圹圹圹圹");setcolor(14);     
  outtextxy(190,302,"MACD:");gcvt((double)zz,5,chh);outtextxy(230,302,chh);     
  setcolor(0);outtextxy(320,302,"圹圹圹圹圹圹圹圹圹圹");setcolor(2);     
  outtextxy(320,302,"BAR:");gcvt((double)bb,5,chh);outtextxy(360,302,chh);}     
  if   (zb==2)   ;