[brainfuck program to calculate ascii value of a character] 

,[[>+>+<<-]>>[[-[-[-[-[-[-[-[-[-[-[>+<<<]]]]]]]]]]]>>]<[>+<-]>[<+<++++++++++>>-]<<[<->-]>]++++++++[<++++++>-]<[-<[+<<<]>>>[>>>]<<]<[.<<<]