BlitzCoder Code Database

BlitzCoder Essentials

•Home Page
•About BlitzCoder
•Contributors
•Terms of Use
•Email Us

Main Areas

•BlitzCoder Chat
•Discussions
•Articles/Tutorials
•Code Database
•Link Database
•Showcase Area
•Worklogs
•Competitions

Special Areas

•Undocumented

Other Blitz Sites

•Blitz Basic Home
•Blitz Showcase
•BlitzPlay Library

BlitzCoder Code Archives Page

Main Codes Page

"Star Wars Name Generator", by krylar

This code will help you get your very own Star Wars name!

Code

Graphics 800,600,16,2
AppTitle "John Logsdon's Star Wars Name Generator!"
FontArial=LoadFont("Verdana",18,True,False,False)
SetFont FontArial
LastName$ = Input$("Last Name: ")
FirstName$ = Input$("First Name: ")
MMName$ = Input$("Mother's Maiden Name: ")
Town$ = Input$("Town you were born in: ")
Print ""
Print "Now...select the title you want:"
Color(75,75,255)
Print "1. Admiral"
Print "2. Darth"
Print "3. Rebel Commander"
Print "4. Lord"
Print "5. Jedi"
Print "6. Padowan"
Print "7. Emperor"
Print "8. Boba"
Print "9. Input your own title..."
Color(255,255,255)
Print "Your Choice?"
FlushKeys()
Repeat
  Select GetKey()
         Case 49
                 Title$ = "Admiral"
                  Exit
         Case 50
                 Title$ = "Darth"
                  Exit
         Case 51
                 Title$ = "Rebel Commander"
                  Exit
         Case 52
                 Title$ = "Lord"
                  Exit
         Case 53
                 Title$ = "Jedi"
                  Exit
         Case 54
                 Title$ = "Padowan"
                  Exit
         Case 55
                 Title$ = "Emperor"
                  Exit
         Case 56
                 Title$ = "Boba"
                  Exit
         Case 57
              Print 
                 Title$ = Input$("Enter your Title: ")
                  Exit
  End Select
Forever

LastName$ = Left$(LastName$,3)
FirstName$ = Left$(FirstName$,2)
MMName$ = Left$(MMName$,2)
Town$ = Left$(Town$,3)
StarWarsName$ = Title$ + " " +  LastName$ + "" + FirstName$ + " " + MMName$ + "" + Town$

Print ""
Print "Your Star Wars name is: " 
Color(0,255,0)
Print ""
Print "" + StarWarsName$

Print 
Print
Color (255,255,255)
Print "Press any key to exit..."
WaitKey()

End

Code software created by Krylar's Kreations