%%%%%%%%%%%%%
%%
\catcode`\@=11

\chooseGBfont{SONGGB}{nuwpstj_pfb}%
\chooseGBfont{SONGBFGB}{nuwpstjbf_pfb}%
\chooseGBfont{SONGSLGB}{nuwpstjsl_pfb}%
\chooseGBfont{SONGBSGB}{nuwpstjbs_pfb}%


\chooseGBfont{songGB}{nuwpstj}%
\chooseGBfont{songGBi}{nuwpstji}%
\chooseGBfont{songGBb}{nuwpstjb}%
\chooseGBfont{songGBbi}{nuwpstjbi}%

\chooseGBfont{fsGB}{simfang}%
\chooseGBfont{fsGBi}{simfangi}%
\chooseGBfont{fsGBb}{simfangb}%
\chooseGBfont{fsGBbi}{simfangbi}%

\chooseGBKfont{heiGB}{simhei}%
\chooseGBKfont{heiGBi}{simheii}%
\chooseGBKfont{heiGBb}{simheib}%
\chooseGBKfont{heiGBbi}{simheibi}%

\chooseGBfont{kaiGB}{simkai}%
\chooseGBfont{kaiGBi}{simkaii}%
\chooseGBfont{kaiGBb}{simkaib}%
\chooseGBfont{kaiGBbi}{simkaibi}%

\chooseGBKfontadv{songtiGB}{simsun}{28}{117}{15}%
\chooseGBKfontadv{songtiGBi}{simsuni}{28}{117}{15}%
\chooseGBKfontadv{songtiGBb}{simsunb}{28}{117}{15}%
\chooseGBKfontadv{songtiGBbi}{simsunbi}{28}{117}{15}%

\chooseGBfont{FSGB}{simfang_pfb}%
\chooseGBfont{HEIGB}{simhei_pfb}%
\chooseGBfont{KAIGB}{simkai_pfb}%
\chooseGBfont{SONGTIGB}{simsun_pfb}%

\chooseGBfontadv{NWDKAIGB}{ngkai00mp_pfb}{28}{110}{-60}%
\chooseGBfontadv{NWDKAIBFGB}{ngkai00mpbf_pfb}{28}{110}{-60}%
\chooseGBfontadv{NWDKAISLGB}{ngkai00mpsl_pfb}{28}{110}{-60}%
\chooseGBfontadv{NWDKAIBSGB}{ngkai00mpbs_pfb}{28}{110}{-60}%

\chooseGBfontadv{nwdkaiGB}{ngkai00mp}{28}{110}{-60}%
\chooseGBfontadv{NWDSONGGB}{ngbsn00lp_pfb}{28}{110}{-60}%
\chooseGBfontadv{nwdsongGB}{ngbsn00lp}{28}{110}{-60}%


%%% Ķ Unicode encoded (Free)
\chooseGBfont{wdkaiGB}{gkai00mp}%
\chooseGBfont{wdsongGB}{gbsn00lp}%

\choosechfontadv{kaiu}{kaiu}{28}{117}{70}   %Window tμз*
\kaiu

\let\kaiGB\nwdkaiGB
\let\KAIGB\NWDKAIGB
\let\KAIBFGB\NWDKAIBFGB
\let\KAISLGB\NWDKAISLGB
\let\KAIBSGB\NWDKAIBSGB

\ifx\selectfont\undefined
\else
\AtBeginDocument{%
%\def\carc#1{\overarc{$#1$}}
\def\magnification{%
\afterassignment\finishch@mag\ch@@magfactor@@}%
\def\finishch@mag{%
\fontfamily{ptm}\selectfont%
\ch@skipsize=1pt%
\divide\ch@skipsize by 100 \multiply\ch@skipsize by \ch@@magfactor@@%
\divide\ch@skipsizea by 1000 \multiply\ch@skipsizea by \ch@@magfactor@@%
\multiply\ch@skipsizea by 12
\fontsize{\ch@skipsize}{\ch@skipsizea}\selectfont}
}
\input mymacgb
\fi

%\ifx\bfold\undefined
%\let\bfold\bf
%\def\bf{\chbf\unskip\bfold}
%\fi

%\ifx\itold\undefined
%\let\itold\it
%\def\it{\chitalic\itold}
%\fi


%\ifx\bfseriesold\undefined
%\let\bfseriesold\bfseries
%\def\bfseries{\chbf\bfseriesold}
%\fi



\ifx\upshapeold\undefined
\let\upshapeold\upshape
\def\upshape{\def\itshape{\itshapeold}\upshapeold}
\def\chupshape{\def\itshape{\itshapeold}}
\fi



\def\GBcode{y}

%\songtiGB
%\input chitex.sca

\songGB

\def\chNoUp#1{\makeatletter\ch@defNoUpper\lowercase{#1}\ch@defUpper\makeatother}

\catcode`\@=12

\endinput




