//26+10=36
const characterI:array[0..35] of char =('0','1','2','3','4','5','6','7','8','9',
'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');

const characterII:array[0..35] of char = ('0','C','S','4','K','V','1','B','R',
'T','Y','L','Z','E','2','Q','G','8','H','F','9','M','3','D','O','6','P','A',
'U','5','I','7','W','X','J','N');