home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 432a.lha / ToolLibrary_2.06 / src / TestLib.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-11-11  |  935 b   |  48 lines
  1.  #include <exec/types.h>
  2.  #include <proto/Tool.h>
  3.  #include <proto/exec.h>
  4.  #include <string.h>
  5.  #include <stdio.h>
  6.  #include <stdlib.h>
  7.  
  8.  struct Library *ToolBase;
  9.  
  10.  VOID main()
  11.   {
  12.    DOUBLE a;
  13.    char Buffer[50],B2[50];
  14.    
  15.    ToolBase=OpenLibrary("tool.library",0);
  16.    if(ToolBase==NULL)return;
  17.    
  18.    strcpy(Buffer,"1234567890");
  19.    left(B2,Buffer,3);
  20.    printf("3L  >%s<\n",B2);
  21.    right(B2,Buffer,3);
  22.    printf("3R  >%s<\n",B2);
  23.    mid(B2,Buffer,3,2);
  24.    printf("32M >%s<\n",B2);
  25.    
  26.    left(B2,Buffer,3);
  27.    printf("3L  >%s<\n",B2);
  28.    right(B2,Buffer,3);
  29.    printf("3R  >%s<\n",B2);
  30.    mid(B2,Buffer,3,2);
  31.    printf("32M >%s<\n",B2);
  32.    
  33.    strcpy(Buffer,"1");
  34.    UmwStoF(&a,Buffer);
  35.    printf(">%s< -> >%lf<\n",Buffer,a);
  36.    
  37.    a=5.234;
  38.    UmwFtoS(Buffer,&a,4);
  39.    printf(">%lf< -> >%s<\n",a,Buffer);
  40.    
  41.    a=-0.628319;
  42.    UmwFtoS(Buffer,&a,4);
  43.    printf(">%lf< -> >%s<\n",a,Buffer);
  44.    
  45.    CloseLibrary(ToolBase);
  46.   }
  47.  
  48.