% -*- coding: utf-8; -*-

\documentclass[a4paper]{article}
\usepackage[cjkjis]{ucs}

\makeatletter
\makeatother
\usepackage[utf8]{inputenc}
\usepackage{europs}

\usepackage[C40,LGR,T2A,ET5,T1]{fontenc}
\usepackage[francais,russian,greek,english]{babel}

\newcommand{\french}{\selectlanguage{francais}\fontencoding{T1}\selectfont}
\newcommand{\english}{\selectlanguage{english}\fontencoding{T1}\selectfont}
\newcommand{\greek}{\selectlanguage{greek}\fontencoding{LGR}\selectfont}
\newcommand{\japanese}{\selectlanguage{english}\fontencoding{C40}\selectfont}
\newcommand{\russian}{\selectlanguage{russian}\fontencoding{T2A}\selectfont}
\newcommand{\vietnamese}{\selectlanguage{francais}\fontencoding{ET5}\selectfont}

\renewcommand{\euro}{\EUR}

\begin{document}
\gdef\CJK@plane{16}

\french Héhé~! Œuf~! 100~€~!

\greek Ελλενικα άββσ

\russian абцдефгхий

\vietnamese Việt Nam

\japanese
私は大きい猫です。
犬は可愛いですね。
\end{document}