Pascal like kernel encoding added

KERNEL.PAS: Pascal like kernel encoding