FileMaker Pro Custom Functions

/*------------------------------------------------------- Returns the ascii value for the first character given in textparameter 'char' Syntax: Asc ( text ) Returns the ascii value 0-255 Return type: Number Theo Ros ----------------------------------------------------------*/ Let ( [ ascii = "☺☻♥♦♣♠•◘○◙♂♀♪♫☼►◄↕‼\¶" & "§▬↨↑↓→←∟↔▲▼ !\"#$%&'()*+,-./" & "0123456789|;<=>?@ABCDEFGHIJKLMNOP" & "QRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz" & "{|}~⌂ÇüéâäàåçêëèïîìÄÅÉæÆôöòûùÿÖÜø" & "£Ø׃áíóúñѪº¿®¬½¼¡«»░▒▓│┤ÁÂÀ©╣" & "║╗╝¢¥┐ü┴┬├─┼ãÃ╚╔╩╦╠═╬¤ðÐÊ" & "ËÈıÍÎÏ┘┌█▄¦Ì▀ÓßÔÒõÕµþÞÚÛÙýݯ´­±‗¾¶§" & "÷¸°¨·¹³²■ " ; char = Left ( char ; 1 ) ; pos = Position ( ascii ; char ; 1 ; 1 ) ] ; If ( pos = 0 ; 0 ; If ( PatternCount ( ascii ; char ) > 1 ; // Upper and Lower case found? // use Exact() for matching occurrence If ( Exact ( Middle ( ascii ; pos ; 1 ) ; char ) ; pos ; Position ( ascii ; char ; 1 ; 2 ) ) ; pos ) // one occurrence found, use it ) )
 Then copy & paste into FileMaker Advanced's Edit Custom Function window.