• Status: Solved
• Priority: Medium
• Security: Public
• Views: 235

# name generator

i am trying to make a name generator and dont know how to get started if someone could help me with some sample code i would greatly appreciate it thank you
0
p400
1 Solution

Commented:
CLS
PRINT "Welcome to Tiki's Name Generator.  To start, press a key.  To quit, press a key"
PRINT "again.  To pause to view names, push the pause key.  Good luck."
SLEEP
dump\$ = INKEY\$
RANDOMIZE TIMER
NameLoop:
a = 0: c = 0
WHILE a < 66 OR a = 69 OR a = 73 OR a = 79 OR a = 85
a = INT(RND * 26 + 65)
WEND
b = INT(RND * 5)
IF b = 0 THEN b = 65
IF b = 1 THEN b = 69
IF b = 2 THEN b = 73
IF b = 3 THEN b = 79
IF b = 4 THEN b = 85
WHILE c < 66 OR c = 69 OR c = 73 OR c = 79 OR c = 85
c = INT(RND * 26 + 65)
WEND
d = INT(RND * 5)
IF d = 0 THEN d = 65
IF d = 1 THEN d = 69
IF d = 2 THEN d = 73
IF d = 3 THEN d = 79
IF d = 4 THEN d = 85
b = b + 32: c = c + 32: d = d + 32
PRINT CHR\$(a); CHR\$(b); CHR\$(c); CHR\$(d); " ";
IF INKEY\$ <> "" THEN END
GOTO NameLoop

Is it helps?
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.