Category : Files from Magazines
Archive   : DEC91.ZIP
Filename : 2N12044A

 
Output of file : 2N12044A contained in archive : DEC91.ZIP
/*
* Listing 2: U2BIN.C
* Convert a Mu-Law encoded file to offset binary.
* Written for Turbo C 2.0, by Bob Bybee, 7/91
*
* Usage: u2bin [expon] [clip]
*
* infile is Mu-Law encoded file
* outfile is offset binary file for TOSPKR
* expon is exponent for uncompression (optional)
* clip is clipping factor (optional)
*
* Defaults of expon = 3, clip = 5 seem to sound good.
*/
#include
#include
#include

#define DEFAULT_EXP 3.0
#define DEFAULT_CLIP 5.0

int xlat[128];

void main( int ac, char **av )
{
int c_in, c_out, sign, i;
FILE *in_fp, *out_fp;
float mag, expon, clip;

/* See if and were given,
* open them if so.
*/
--ac, ++av;
if (ac < 2)
{
printf("usage: u2bin "
"[expon] [clip]\n");
exit(1);
}

if ((in_fp = fopen(*av, "rb")) == NULL ||
(out_fp = fopen(av[1], "wb")) == NULL)
{
printf("can't open files!\n");
exit(1);
}

if (ac >= 3 && (expon = atof(av[2])) > 0.0)
; /* use command-line exponent */
else
expon = DEFAULT_EXP;

if (ac >= 4 && (clip = atof(av[3])) > 1.0)
; /* use command-line clipping */
else
clip = DEFAULT_CLIP;

/* Create data translation table for these
* values of expon and clip.
*/
for (i = 0; i <= 127; ++i)
{
mag = clip * 127.0 * pow((127 - i) / 127.0, expon);
if (mag > 127.0)
mag = 127.0; /* clip */
xlat[i] = (int)mag;
}

/* Read in the file and translate each byte.
*/
while ((c_in = getc(in_fp)) != EOF)
{
if (c_in <= 127)
sign = 1;
else
sign = -1;

c_out = (sign * xlat[c_in & 127]) + 127;
putc(c_out, out_fp);
}

fclose(in_fp);
fclose(out_fp);
exit(0);
}



  3 Responses to “Category : Files from Magazines
Archive   : DEC91.ZIP
Filename : 2N12044A
”

  1. Daniel says:
    January 27, 2013 at 3:59 pm

    Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. Joshie says:
    March 18, 2014 at 4:57 pm

    This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. DiskingRound says:
    January 14, 2015 at 10:57 pm

    But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/