#[],stdin upToEnd do:[:c|(C:=c)<65or:[C:=C\\32//14* -26+C+13].C asCharacter display]