Found by just playing with CTYPE commands. Feel free to use! Just give credit.