Can't Copy and Paste this?

Click here for a copy-and-paste friendly version of this code!

//**************************************

//     

//INCLUDE files for :Format ordinal numb

//     ers

//**************************************

//     

/* +++Date last modified: 05-Jul-1997 */

/*

** NUMCNVRT.H - Header file for SNIPPETS numerical <=> string conversions

*/

#ifndef NUMCNVRT__H

#define NUMCNVRT__H

#include  /* for size_t */

#include "sniptype.h"

#include "round.h"

#include "pi.h"

#define R_ERROR -2 /* EVAL.C Range error*/

/*

** Callable library functions begin here

*/

char * base_convert(const char *in, char *out,

size_t len, int rin, int rout);/* Bascnvrt.C */

char * comma_float(double num, char *buf, int dec); /* Commaflt.C */

size_t commafmt(char *buf, int bufsize, long N); /* Commafmt.C */

char * eng(double value, int places);/* Eng.C */

int evaluate(char *line, double *val);/* Eval.C */

char * fmt_money(double amt);/* Fmtmoney.C */

longhexorint(const char *string); /* Hexorint.C */

char * ltostr(long num, char *string,

size_t max_chars, unsigned base); /* Ltostr.C*/

char * ordinal_text(int number); /* Ord_Text.C */

int scanfrac (const char buf[], double *f);/* Scanfrac.C */

unsigned int hstr_i(char *cptr); /* Hstr_I.C*/

char *long2roman(long val, char *buf, size_t buflen); /* L2Roman.C */

long roman2long(const char *str);/* Roman2L.C */

#if defined(__ZTC__) && !defined(__SC__)

char * ltoa(long val, char *buf, int base); /* Ltoa.C */

#endif

/*

** File: STR27SEG.C

*/

    struct Seg7disp {

    unsigned seg_a : 1;

    unsigned seg_b : 1;

    unsigned seg_c : 1;

    unsigned seg_d : 1;

    unsigned seg_e : 1;

    unsigned seg_f : 1;

    unsigned seg_g : 1;

};

char *str27seg(char *string);

#endif /* NUMCNVRT__H */

code:

Can't Copy and Paste this?

Click here for a copy-and-paste friendly version of this code!

Terms of Agreement:   

By using this code, you agree to the following terms...   

1) You may use this code in your own programs (and may compile it into a program and distribute it in compiled format for langauges that allow it) freely and with no charge.   

2) You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.   

3) You may link to this code from another website, but ONLY if it is not wrapped in a frame. 

4) You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.  

/* +++Date last modified: 05-Jul-1997 */

/*

** Originally published as part of the MicroFirm Function Library

**

** Copyright 1991, Robert B.Stout

**

** With modifications suggested by Maynard Hogg

**

** The user is granted a free limited license to use this source file

** to create royalty-free programs, subject to the terms of the

** license restrictions specified in the LICENSE.MFL file.

**

** Function to return ordinal text.

*/

#include "numcnvrt.h"

static char *text[] = {"th", "st", "nd", "rd"};

char *ordinal_text(int number)

    {

    if (((number %= 100) > 9 && number < 20) || (number %= 10) > 3)

    number = 0;

    return text[number];

}

#ifdef TEST

#include 

main()

    {

    int i;

    for (i = 0; i < 26; ++i)

    printf("%d%s\n", i, ordinal_text(i));

    return 0;

}

#endif /* TEST */