TheGameCreators - CodeBase - Print for DarkSDK

Return to the CodeBase listing

Category: Complete Applications

Version: 1.0

Information

Uploaded: 23rd May 2006 04:40

Modified: 1st Jan 1970 01:00

Author: Smoke sheath

Summary

A Print routine that works like printf , and mem dump routine both for for DarkSDK

Full Description

NB Please note you will have to separate out myPrint.h and myPrint.cpp myPrint function works like printf. There is no absolute error checking so make sure that the number of values you require is met by the number of variables. It does not dbSunc() so you will need to ensure there is one in your code (i would be surprised if there wasnt) use: %i for int %d for double %f for float %l for long %x for hex %s for string i.e: myPrint("Player pos (%f, %f, %f)", p.x, p.y, p.z); also accepts: \n for newline and \t for tab myDump(long addr, int nBytes) will display a dump of nBytes from address addr - a small but invaluable tool

DarkBASIC Professional Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

/*** myPrint.h ***/

#ifndef C_CLASS_MYPRINT

#define C_CLASS_MYPRINT

const C_MYPRINT_OCHAR		= 0;

const C_MYPRINT_ONUMIDENT	= 1;

const C_MYPRINT_ONUM		= 2;

const C_MYPRINT_NL			= 3;

const C_MYPRINT_END			= 4;

const C_MYPRINT_DECCUTOFF	= 4;

// Prototypes

char *binToStr(long);

char *lToStr(long);

char *lToHex(long);

char *dToStr(double);

void myPrint(char *, ...);

void myDump(long *, int);

#endif

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

// myPrint.cpp

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

#include <stdio.h>

#include <stdarg.h>

#include <stdlib.h>

#include <string.h>

#include <math.h>

#include "myPrint.h"

#include "DarkSDK.h"

char *dToStr(double dNum)

{

int iExp = 0;

char outStr[255] = "";

double tNum = 0;

long lVal = 0, lTemp = 0;

long cVal = 0;

int iLoop = 0, oLoop = 0;

tNum = dNum;

iExp = (double)log10f(dNum);

lTemp = (long)pow(10, iExp);

tNum = tNum / lTemp;

while(iExp >= 0)

{

lVal = (long)tNum;

outStr[oLoop++] = (48 + lVal);

tNum -= lVal;

tNum *= 10;

iExp--;

}

outStr[oLoop++] = '.';

for (iLoop = 0; iLoop < C_MYPRINT_DECCUTOFF; iLoop++)

{

lVal = (long)tNum;

outStr[oLoop++] = (48 + lVal);

tNum -= lVal;

tNum *= 10;

}

return (char *)&outStr;

}

char *binToStr(long lNum)

{

char outStr[255] = "";

int oCount = 0;

int lLoop = 0;

long lFlag = 0;

for (lLoop = 0; lLoop < 32; lLoop++)

{

lFlag = 1 << (31 - lLoop);

if ((lNum & lFlag) == 0)

outStr[lLoop] = '0';

else

outStr[lLoop] = '1';

}

outStr[32] = '\0';

return (char *)&outStr;

}

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

*** lToStr **************************************************************************************/

char *lToStr(long lNum)

{

long dNum = 0;

char outStr[255] = "";

int oCount = 0;

long tVal = 0;

long tTemp = 0;

int dMax = 0;

bool quitFlag = FALSE;

dNum = lNum;

while (quitFlag != TRUE)

{

dMax = (int)log10((double)dNum);

tVal = (long) pow(10,dMax);

tTemp = dNum / tVal;

outStr[oCount] = 48 + tTemp;

oCount++;

outStr[oCount] = '\0';

dNum -= (tVal * tTemp);

if (dMax == 0)

quitFlag = TRUE;

}

return (char *)&outStr;

}

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

*** lToHex **************************************************************************************/

char *lToHex(long lNum)

{

char outStr[16] = "";

int oCount = 7;

long *lPtr = &lNum;

char *cPtr = (char *)lPtr;

char inpChar;

int swType = 0;

int fLoop, iLoop;

int tVal = 0;

outStr[10] = '\0';

for (fLoop = 0; fLoop<4; fLoop++)

{

inpChar = *cPtr;

for (iLoop = 0; iLoop < 2; iLoop++)

{

if (iLoop == 0)

tVal = (inpChar & 15);

else

{	tVal = (inpChar & 240);

tVal = tVal / 16;

}

// myPrint("tVal:%i",tVal);

if (tVal < 10)

swType = 0;

else

swType = 1;

switch (swType)

{

case 0:

outStr[oCount] = 48 + tVal;

break;

default:

outStr[oCount] = 65 + tVal - 10;

break;

}

oCount--;

}

cPtr++;

}

return (char *)&outStr;

}

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

*** myPrint *************************************************************************************/

void myPrint(char *formStr, ...)

{

char outStr[255] = "";

char tempStr[255] = "";

int		tempi = 0;

long	templ = 0;

double	tempd = 0;

float	tempf = 0;

char   *temps = NULL;

char	tempc = ' ';

char *tabStr = "      ";

div_t div_result;

va_list vList;

int lCount;

int oCount;

int pType;

int quitFlag = FALSE;

char testChar;

//init

lCount = 0;

oCount = 0;

pType = C_MYPRINT_OCHAR;

va_start(vList, formStr);

while (quitFlag != TRUE)

{

testChar = formStr[lCount];

switch(testChar)

{

case '\0':

quitFlag = TRUE;

dbPrint((char *)&outStr);

break;

case '\n':

dbPrint((char *)&outStr);

oCount = 0;

outStr[oCount] = '\0';

break;

case '%':

pType = C_MYPRINT_ONUMIDENT;

break;

case  9:

strcat((char *)&outStr, tabStr);

div_result = div(oCount, 5);

if (div_result.rem == 0)

oCount += 5;

else

oCount += (5 - div_result.rem);

break;

default:

switch(pType)

{

case C_MYPRINT_ONUMIDENT:

tempc = formStr[lCount];

switch(tempc)

{

case 'i':

tempi = va_arg(vList, int);

itoa(tempi, (char *)&tempStr, 10);

oCount += strlen((char *)&tempStr);

strcat((char *)&outStr, (char *)&tempStr);

break;

case 's':

temps = va_arg(vList, char *);

strcat((char *)&outStr, temps);

oCount += strlen(temps);

break;

case 'd':

tempd = va_arg(vList, double);

tempStr[0]='\0';

//_gcvt(&tempd, C_MYPRINT_DECCUTOFF, (char *)&tempStr);

strcpy((char *)&tempStr, dToStr(tempd));

strcat((char *)&outStr, (char *)&tempStr);

oCount += strlen((char *)&tempStr);

break;

case 'f':

tempd = va_arg(vList, double);

tempStr[0]='\0';

strcpy((char *)&tempStr, dToStr(tempd));

strcat((char *)&outStr, (char *)&tempStr);

oCount += strlen((char *)&tempStr);

break;

case 'b':

templ = va_arg(vList, long);

tempStr[0]='\0';

strcpy((char *)&tempStr, binToStr(templ));

strcat((char *)&outStr, (char *)&tempStr);

oCount += strlen((char *)&tempStr);

break;

case 'x':

templ = va_arg(vList, long);

tempStr[0]='\0';

strcpy((char *)&tempStr, lToHex(templ));

strcat((char *)&outStr, (char *)&tempStr);

oCount += strlen((char *)&tempStr);

break;

case 'l':

templ = va_arg(vList, long);

tempStr[0]='\0';

strcpy((char *)&tempStr, lToStr(templ));

strcat((char *)&outStr, (char *)&tempStr);

oCount += strlen((char *)&tempStr);

break;

default:

break;

}

// reset next input type

pType = C_MYPRINT_OCHAR;

break;

default:

outStr[oCount++] = formStr[lCount];

outStr[oCount] = '\0';

break;

}

break;

}

// Update counter in string

lCount++;

}

va_end(vList);

}

void myDump(long *addr, int nBytes)

{

char oVal;

char hByte, lByte;

long *lPtr = NULL;

char *cPtr = NULL;

char oStr[255] = "";

int bCount = 0;

int oCount = 0;

int lCount = 0;

long mask = 0;

div_t div_result;

// Init

oStr[42]='\0';

oStr[58]='\0';

cPtr = (char *)addr;

while (bCount < nBytes)

{

char *(lPtr) = cPtr;

oCount = 0 ;oStr[oCount]='\0';

mask = 255;

strncpy((char *)&oStr, (char *)lToHex((long)lPtr), 8);

oCount = 8;

oStr[oCount++] = ' ';

oStr[oCount++] = ':';

oStr[oCount++] = '>';

for (lCount = 0; lCount < 16; lCount++)

{

oVal = *cPtr;

cPtr++;

div_result = div((int)oVal,16);

hByte = div_result.quot;

lByte = div_result.rem;

if (hByte < 0)

hByte += 8;

if (lByte < 0)

lByte *= -1;

if (hByte < 10)

oStr[oCount++] = 48 + hByte;

else

oStr[oCount++] = 55 + hByte;

if (lByte < 10)

oStr[oCount++] = 48 + lByte;

else

oStr[oCount++] = 55 + lByte;

oStr[oCount++] = ' ';

bCount++;

}

cPtr = (char *)lPtr;

for (lCount = 0; lCount < 16; lCount++)

{

oVal = *cPtr;

cPtr++;

if ((oVal > 31) & (oVal < 127))

oStr[oCount] = oVal;

else

oStr[oCount] = 32;

oCount++;

}

oStr[oCount] = '\0';

dbPrint((char *)&oStr);

}

dbPrint("");

}

Download

Please login to download

Comments

No comments yet.

Author Name:	Smoke sheath
CodeBase Entries:	1

CodeBase - Print for DarkSDK

Information

Summary

Full Description

DarkBASIC Professional Source Code

Download

Screen Shot

Author

Comments