#author("2018-06-13T18:29:47+09:00","","")
決め打ちで３種類関数にしました


 #module
 #defcfunc is_digit int _p
 	if '0' <= _p{
 		if _p <= '9'{ return 1 }
 	}
 	return 0
 #defcfunc is_S_char int _p
 	if 'a' <= _p{
 		if _p <= 'z'{ return 1 }
 	}
 	return 0
 #defcfunc is_L_char int _p
 	if 'A' <= _p{
 		if _p <= 'Z'{ return 1 }
 	}
 	return 0
 #global
 
 #if 1
 mes "0 : "+is_digit('0')
 mes "5 : "+is_digit('5')
 mes "9 : "+is_digit('9')
 mes "a : "+is_digit('a')
 mes "x : "+is_digit('x')
 mes "z : "+is_digit('z')
 mes "A : "+is_digit('A')
 mes "X : "+is_digit('X')
 mes "Z : "+is_digit('Z')
 
 mes "0 : "+is_S_char('0')
 mes "5 : "+is_S_char('5')
 mes "9 : "+is_S_char('9')
 mes "a : "+is_S_char('a')
 mes "x : "+is_S_char('x')
 mes "z : "+is_S_char('z')
 mes "A : "+is_S_char('A')
 mes "X : "+is_S_char('X')
 mes "Z : "+is_S_char('Z')
 
 mes "0 : "+is_L_char('0')
 mes "5 : "+is_L_char('5')
 mes "9 : "+is_L_char('9')
 mes "a : "+is_L_char('a')
 mes "x : "+is_L_char('x')
 mes "z : "+is_L_char('z')
 mes "A : "+is_L_char('A')
 mes "X : "+is_L_char('X')
 mes "Z : "+is_L_char('Z')
 #endif