Profiles (different options)

Here you go:

tmpName$ = GetEnv("USERNAME")
If Instr(Lower$(tmpName$), "admin", 1) > 0 Or Lower$(tmpName$) = "guest" Or Lower$(tmpName$) = "user" Then tmpName$ = "Player"
If tmpName$ = "" Or Len(tmpName$) > 15 Then tmpName$ = "Player"
Print tmpName$

Function GetEnv:String(env_var:String)
	Return String(getenv_(env_var))
End Function