home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / CRACK / BDR.ZIP / BDR.C next >
Encoding:
C/C++ Source or Header  |  1996-01-09  |  1.5 KB  |  62 lines
  1. #include <stdio.h>
  2. #include <stdlib.h>
  3. #include <conio.h>
  4. #include <string.h>
  5.  
  6. void main( void )
  7. {
  8.     int    nFido, nSOLen, nMPLen, i;
  9.     long    lRegNo, l1, l2, l3;
  10.     char    pBuf[ 64 ], bSysop[ 32 ], bMailPack[ 10 ];
  11.  
  12.     printf( "\nBDR --- BlueWave Door 3.X for RA Register" );
  13.  
  14.     printf( "\nEnter you Zone: " );
  15.     pBuf[ 0 ] = 6;
  16.     nFido = atoi( cgets( pBuf ) ) + 1;
  17.  
  18.     printf( "\nEnter you Region: " );
  19.     pBuf[ 0 ] = 6;
  20.     nFido *= atoi( cgets( pBuf ) );
  21.  
  22.     printf( "\nEnter you Node: " );
  23.     pBuf[ 0 ] = 6;
  24.     nFido *= atoi( cgets( pBuf ) );
  25.     lRegNo = (long)( (unsigned int)nFido );
  26.  
  27.     printf( "\nEnter your Mail Package Name: " );
  28.     pBuf[ 0 ] = 9;
  29.     cgets( pBuf );
  30.     strcpy( bMailPack, &pBuf[ 2 ] );
  31.  
  32.     printf( "\nEnter your REAL Name: " );
  33.     pBuf[ 0 ] = 31;
  34.     cgets( pBuf );
  35.     strcpy( bSysop, &pBuf[ 2 ] );
  36.  
  37.     strupr( bSysop );
  38.     strupr( bMailPack );
  39.     nSOLen = strlen( bSysop );
  40.     nMPLen = strlen( bMailPack );
  41.  
  42.     nFido = 0;
  43.     for( i = 0; i < nMPLen; i ++ ) nFido += bMailPack[ i ];
  44.     lRegNo += nFido;
  45.  
  46.     for( i = 0; i < nSOLen; i ++ ) if( bSysop[ i ] == ' ' ) break;
  47.     nFido = ( i == nSOLen ) ? 1 : i + 1;
  48.  
  49.     l1 = bMailPack[ 0 ] * bMailPack[ nMPLen - 1 ] * 0x2110;
  50.     l2 = nMPLen * nSOLen * bSysop[ 0 ] * 0xd4c;
  51.     l3 = nMPLen * nSOLen * nFido;
  52.     lRegNo += l1 * l2 * ( l2 + l3 );
  53.  
  54.     if( lRegNo < 0l ) lRegNo = -lRegNo;
  55.     if( lRegNo < 10000000l ) lRegNo += 100000000l;
  56.  
  57.     sprintf( pBuf, "%ld", lRegNo );
  58.     memset( bMailPack, 0, 9 );
  59.     strncpy( bMailPack, pBuf, 8 );
  60.     printf( "\nYour Register Code is: %s\n", bMailPack );
  61. }
  62.