Helpful codes

ID:274643
 
Jun 7 2002, 5:31 am
I don't know why I'm making this post but oh well.

mob/var
list/upper=list("A","B","C","D","E","F","G","H","I","J","K", "L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z")
list/lower=list("a","b","c","d","e","f","g","h","i","j","k", "l","m","n","o","p","q","r","s","t","u","v","w","x","y","z")
mob/proc/checkupper()
if(upper.Find("[copytext("[usr.name]",1,2)]"))
usr<<"Your Name passes"
usr.loc=locate(1,1,1)
if(lower.Find("[copytext("[usr.name]",1,2)]"))
usr<<"Your name must begin with a Capital Letter"
Login(usr)

This will check for an Upper Case Letter for the first letter of the users name.
Jun 7 2002, 5:37 am
There are easier ways to check for capital letters:
var/firstletter=copytext(t,1,2)
if(firstletter==lowertext(firstletter))
  themob << "Your name must begin with a capital letter."

Or:
var/ch=text2ascii(t,1)
if(ch<65 || ch>90)
  themob << "Your name must begin with a capital letter."

Lummox JR
Jun 7 2002, 5:53 am
In response to Lummox JR
I see...