JpsephAn S/N gen. for RCThu Dec 10 03:50:46 1998 Greetings everybody,Following is a quick and dirty basic program which, I think, will generale serial numbers to register Rcrawler. This program is based on my understanding of how Rcrawler generale valid serial numbers from the user name. There is no guaranty that all serial numbers generated by this program will work since my understanding of the procedure my be faulty. I place it at your disposal to experiment with it and help me determine whether my understanding of the procedure is correct or faulty.The program was written using Quick basic. If you don't have that program and you like to play with the program below, I will be glad to send you a compiled version which will run in a Dos window.Best regards,Joseph----------------------Cut here--------------CLSINPUT "Enter a user name of 8 or more chanters"; name$length = LEN(name$)IF length < 8 THEN PRINT "The name you entered is too short. Try agin." RUNEND IFfunny$ = "YMA19X@24$Z%"serial$ = "8267-"temp$ = name$GOSUB funnyserial$ = serial$ + temp$GOSUB processtemp$ = serial$GOSUB funnyserial$ = serial$ + temp$PRINT serial$ENDprocess:FOR counter = 0 TO length - 1edx = counter MOD 3 IF edx = 0 THEN al = ASC(MID$(name$, counter + 1, 1)) IF al > &H20 OR al < &H7F THEN al = INT(al / 2) + &H22 IF al > &H5A AND al < &H61 THEN al = al + 6 ;Only Letters A to Z and a to z IF al > &H39 AND al <&H41 THEN al = al + 8 ;and numbers are acceptable. serial$ = serial$ + CHR$(al) ELSE PRINT "You used illegal characters in the user name" RUN END IF END IFNEXTRETURNfunny:funnyl = LEN(temp$)funnyl = funnyl MOD 12temp$ = MID$(funny$, funnyl + 1, 1)RETURN