"

 COPYRIGHT (c) 2004 by eXept Software AG

              All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice.   This software may not

 be provided or otherwise made available to, or used by, any

 other person.  No title to or ownership of the software is

 hereby transferred.

"

"{ Package: 'stx:libbasic' }"

"{ NameSpace: CharacterEncoderImplementations }"

SingleByteEncoder subclass:#CP437

	instanceVariableNames:''

	classVariableNames:''

	poolDictionaries:''

	category:'Collections-Text-Encodings'

!

!CP437 class methodsFor:'documentation'!

copyright

"

 COPYRIGHT (c) 2004 by eXept Software AG

              All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice.   This software may not

 be provided or otherwise made available to, or used by, any

 other person.  No title to or ownership of the software is

 hereby transferred.

"

!

documentation

"

    CodePage 437 / MSDOS Latin US.

    [see with:]

        CharacterEncoderImplementations::CP437 showCharacterSet

    [author:]

        Claus Gittinger

"

! !

!CP437 class methodsFor:'encoding & decoding'!

mapFileURL2_relativePathName

    ^ 'CP437'

    "

     self generateCode

    "

! !

!CP437 class methodsFor:'mapping'!

mapping

"

# From: http://std.dkuug.dk/i18n/charmaps/CP437

<code_set_name> IBM437

<comment_char> %

<escape_char> /

% version: 1.0

% repertoiremap: mnemonic,ds

%  source: IBM NLS RM Vol2 SE09-8002-01, March 1990

% alias CP437

% alias 437

CHARMAP

<NU>                   /x00   <U0000> NULL (NUL)

<SH>                   /x01   <U0001> START OF HEADING (SOH)

<SX>                   /x02   <U0002> START OF TEXT (STX)

<EX>                   /x03   <U0003> END OF TEXT (ETX)

<ET>                   /x04   <U0004> END OF TRANSMISSION (EOT)

<EQ>                   /x05   <U0005> ENQUIRY (ENQ)

<AK>                   /x06   <U0006> ACKNOWLEDGE (ACK)

<BL>                   /x07   <U0007> BELL (BEL)

<BS>                   /x08   <U0008> BACKSPACE (BS)

<HT>                   /x09   <U0009> CHARACTER TABULATION (HT)

<LF>                   /x0A   <U000A> LINE FEED (LF)

<VT>                   /x0B   <U000B> LINE TABULATION (VT)

<FF>                   /x0C   <U000C> FORM FEED (FF)

<CR>                   /x0D   <U000D> CARRIAGE RETURN (CR)

<SO>                   /x0E   <U000E> SHIFT OUT (SO)

<SI>                   /x0F   <U000F> SHIFT IN (SI)

<DL>                   /x10   <U0010> DATALINK ESCAPE (DLE)

<D1>                   /x11   <U0011> DEVICE CONTROL ONE (DC1)

<D2>                   /x12   <U0012> DEVICE CONTROL TWO (DC2)

<D3>                   /x13   <U0013> DEVICE CONTROL THREE (DC3)

<D4>                   /x14   <U0014> DEVICE CONTROL FOUR (DC4)

<NK>                   /x15   <U0015> NEGATIVE ACKNOWLEDGE (NAK)

<SY>                   /x16   <U0016> SYNCHRONOUS IDLE (SYN)

<EB>                   /x17   <U0017> END OF TRANSMISSION BLOCK (ETB)

<CN>                   /x18   <U0018> CANCEL (CAN)

<EM>                   /x19   <U0019> END OF MEDIUM (EM)

<SB>                   /x1A   <U001A> SUBSTITUTE (SUB)

<EC>                   /x1B   <U001B> ESCAPE (ESC)

<FS>                   /x1C   <U001C> FILE SEPARATOR (IS4)

<GS>                   /x1D   <U001D> GROUP SEPARATOR (IS3)

<RS>                   /x1E   <U001E> RECORD SEPARATOR (IS2)

<US>                   /x1F   <U001F> UNIT SEPARATOR (IS1)

<SP>                   /x20   <U0020> SPACE

<!!>                    /x21   <U0021> EXCLAMATION MARK

<'>                    /x22   <U0022> QUOTATION MARK

<Nb>                   /x23   <U0023> NUMBER SIGN

<DO>                   /x24   <U0024> DOLLAR SIGN

<%>                    /x25   <U0025> PERCENT SIGN

<&>                    /x26   <U0026> AMPERSAND

<'>                    /x27   <U0027> APOSTROPHE

<(>                    /x28   <U0028> LEFT PARENTHESIS

<)>                    /x29   <U0029> RIGHT PARENTHESIS

<*>                    /x2A   <U002A> ASTERISK

<+>                    /x2B   <U002B> PLUS SIGN

<,>                    /x2C   <U002C> COMMA

<->                    /x2D   <U002D> HYPHEN-MINUS

<.>                    /x2E   <U002E> FULL STOP

<//>                   /x2F   <U002F> SOLIDUS

<0>                    /x30   <U0030> DIGIT ZERO

<1>                    /x31   <U0031> DIGIT ONE

<2>                    /x32   <U0032> DIGIT TWO

<3>                    /x33   <U0033> DIGIT THREE

<4>                    /x34   <U0034> DIGIT FOUR

<5>                    /x35   <U0035> DIGIT FIVE

<6>                    /x36   <U0036> DIGIT SIX

<7>                    /x37   <U0037> DIGIT SEVEN

<8>                    /x38   <U0038> DIGIT EIGHT

<9>                    /x39   <U0039> DIGIT NINE

<:>                    /x3A   <U003A> COLON

<;>                    /x3B   <U003B> SEMICOLON

<<>                    /x3C   <U003C> LESS-THAN SIGN

<=>                    /x3D   <U003D> EQUALS SIGN

</>>                   /x3E   <U003E> GREATER-THAN SIGN

<?>                    /x3F   <U003F> QUESTION MARK

<At>                   /x40   <U0040> COMMERCIAL AT

<A>                    /x41   <U0041> LATIN CAPITAL LETTER A

<B>                    /x42   <U0042> LATIN CAPITAL LETTER B

<C>                    /x43   <U0043> LATIN CAPITAL LETTER C

<D>                    /x44   <U0044> LATIN CAPITAL LETTER D

<E>                    /x45   <U0045> LATIN CAPITAL LETTER E

<F>                    /x46   <U0046> LATIN CAPITAL LETTER F

<G>                    /x47   <U0047> LATIN CAPITAL LETTER G

<H>                    /x48   <U0048> LATIN CAPITAL LETTER H

<I>                    /x49   <U0049> LATIN CAPITAL LETTER I

<J>                    /x4A   <U004A> LATIN CAPITAL LETTER J

<K>                    /x4B   <U004B> LATIN CAPITAL LETTER K

<L>                    /x4C   <U004C> LATIN CAPITAL LETTER L

<M>                    /x4D   <U004D> LATIN CAPITAL LETTER M

<N>                    /x4E   <U004E> LATIN CAPITAL LETTER N

<O>                    /x4F   <U004F> LATIN CAPITAL LETTER O

<P>                    /x50   <U0050> LATIN CAPITAL LETTER P

<Q>                    /x51   <U0051> LATIN CAPITAL LETTER Q

<R>                    /x52   <U0052> LATIN CAPITAL LETTER R

<S>                    /x53   <U0053> LATIN CAPITAL LETTER S

<T>                    /x54   <U0054> LATIN CAPITAL LETTER T

<U>                    /x55   <U0055> LATIN CAPITAL LETTER U

<V>                    /x56   <U0056> LATIN CAPITAL LETTER V

<W>                    /x57   <U0057> LATIN CAPITAL LETTER W

<X>                    /x58   <U0058> LATIN CAPITAL LETTER X

<Y>                    /x59   <U0059> LATIN CAPITAL LETTER Y

<Z>                    /x5A   <U005A> LATIN CAPITAL LETTER Z

<<(>                   /x5B   <U005B> LEFT SQUARE BRACKET

<////>                 /x5C   <U005C> REVERSE SOLIDUS

<)/>>                  /x5D   <U005D> RIGHT SQUARE BRACKET

<'/>>                  /x5E   <U005E> CIRCUMFLEX ACCENT

<_>                    /x5F   <U005F> LOW LINE

<'!!>                   /x60   <U0060> GRAVE ACCENT

<a>                    /x61   <U0061> LATIN SMALL LETTER A

<b>                    /x62   <U0062> LATIN SMALL LETTER B

<c>                    /x63   <U0063> LATIN SMALL LETTER C

<d>                    /x64   <U0064> LATIN SMALL LETTER D

<e>                    /x65   <U0065> LATIN SMALL LETTER E

<f>                    /x66   <U0066> LATIN SMALL LETTER F

<g>                    /x67   <U0067> LATIN SMALL LETTER G

<h>                    /x68   <U0068> LATIN SMALL LETTER H

<i>                    /x69   <U0069> LATIN SMALL LETTER I

<j>                    /x6A   <U006A> LATIN SMALL LETTER J

<k>                    /x6B   <U006B> LATIN SMALL LETTER K

<l>                    /x6C   <U006C> LATIN SMALL LETTER L

<m>                    /x6D   <U006D> LATIN SMALL LETTER M

<n>                    /x6E   <U006E> LATIN SMALL LETTER N

<o>                    /x6F   <U006F> LATIN SMALL LETTER O

<p>                    /x70   <U0070> LATIN SMALL LETTER P

<q>                    /x71   <U0071> LATIN SMALL LETTER Q

<r>                    /x72   <U0072> LATIN SMALL LETTER R

<s>                    /x73   <U0073> LATIN SMALL LETTER S

<t>                    /x74   <U0074> LATIN SMALL LETTER T

<u>                    /x75   <U0075> LATIN SMALL LETTER U

<v>                    /x76   <U0076> LATIN SMALL LETTER V

<w>                    /x77   <U0077> LATIN SMALL LETTER W

<x>                    /x78   <U0078> LATIN SMALL LETTER X

<y>                    /x79   <U0079> LATIN SMALL LETTER Y

<z>                    /x7A   <U007A> LATIN SMALL LETTER Z

<(!!>                   /x7B   <U007B> LEFT CURLY BRACKET

<!!!!>                   /x7C   <U007C> VERTICAL LINE

<!!)>                   /x7D   <U007D> RIGHT CURLY BRACKET

<'?>                   /x7E   <U007E> TILDE

<DT>                   /x7F   <U007F> DELETE (DEL)

<C,>                   /x80   <U00C7> LATIN CAPITAL LETTER C WITH CEDILLA

<u:>                   /x81   <U00FC> LATIN SMALL LETTER U WITH DIAERESIS

<e'>                   /x82   <U00E9> LATIN SMALL LETTER E WITH ACUTE

<a/>>                  /x83   <U00E2> LATIN SMALL LETTER A WITH CIRCUMFLEX

<a:>                   /x84   <U00E4> LATIN SMALL LETTER A WITH DIAERESIS

<a!!>                   /x85   <U00E0> LATIN SMALL LETTER A WITH GRAVE

<aa>                   /x86   <U00E5> LATIN SMALL LETTER A WITH RING ABOVE

<c,>                   /x87   <U00E7> LATIN SMALL LETTER C WITH CEDILLA

<e/>>                  /x88   <U00EA> LATIN SMALL LETTER E WITH CIRCUMFLEX

<e:>                   /x89   <U00EB> LATIN SMALL LETTER E WITH DIAERESIS

<e!!>                   /x8A   <U00E8> LATIN SMALL LETTER E WITH GRAVE

<i:>                   /x8B   <U00EF> LATIN SMALL LETTER I WITH DIAERESIS

<i/>>                  /x8C   <U00EE> LATIN SMALL LETTER I WITH CIRCUMFLEX

<i!!>                   /x8D   <U00EC> LATIN SMALL LETTER I WITH GRAVE

<A:>                   /x8E   <U00C4> LATIN CAPITAL LETTER A WITH DIAERESIS

<AA>                   /x8F   <U00C5> LATIN CAPITAL LETTER A WITH RING ABOVE

<E'>                   /x90   <U00C9> LATIN CAPITAL LETTER E WITH ACUTE

<ae>                   /x91   <U00E6> LATIN SMALL LETTER AE

<AE>                   /x92   <U00C6> LATIN CAPITAL LETTER AE

<o/>>                  /x93   <U00F4> LATIN SMALL LETTER O WITH CIRCUMFLEX

<o:>                   /x94   <U00F6> LATIN SMALL LETTER O WITH DIAERESIS

<o!!>                   /x95   <U00F2> LATIN SMALL LETTER O WITH GRAVE

<u/>>                  /x96   <U00FB> LATIN SMALL LETTER U WITH CIRCUMFLEX

<u!!>                   /x97   <U00F9> LATIN SMALL LETTER U WITH GRAVE

<y:>                   /x98   <U00FF> LATIN SMALL LETTER Y WITH DIAERESIS

<O:>                   /x99   <U00D6> LATIN CAPITAL LETTER O WITH DIAERESIS

<U:>                   /x9A   <U00DC> LATIN CAPITAL LETTER U WITH DIAERESIS

<Ct>                   /x9B   <U00A2> CENT SIGN

<Pd>                   /x9C   <U00A3> POUND SIGN

<Ye>                   /x9D   <U00A5> YEN SIGN

<Pt>                   /x9E   <U20A7> PESETA SIGN

<f2>                   /x9F   <U0192> LATIN SMALL LETTER F WITH HOOK

<a'>                   /xA0   <U00E1> LATIN SMALL LETTER A WITH ACUTE

<i'>                   /xA1   <U00ED> LATIN SMALL LETTER I WITH ACUTE

<o'>                   /xA2   <U00F3> LATIN SMALL LETTER O WITH ACUTE

<u'>                   /xA3   <U00FA> LATIN SMALL LETTER U WITH ACUTE

<n?>                   /xA4   <U00F1> LATIN SMALL LETTER N WITH TILDE

<N?>                   /xA5   <U00D1> LATIN CAPITAL LETTER N WITH TILDE

<-a>                   /xA6   <U00AA> FEMININE ORDINAL INDICATOR

<-o>                   /xA7   <U00BA> MASCULINE ORDINAL INDICATOR

<?I>                   /xA8   <U00BF> INVERTED QUESTION MARK

<NI>                   /xA9   <U2310> REVERSED NOT SIGN

<NO>                   /xAA   <U00AC> NOT SIGN

<12>                   /xAB   <U00BD> VULGAR FRACTION ONE HALF

<14>                   /xAC   <U00BC> VULGAR FRACTION ONE QUARTER

<!!I>                   /xAD   <U00A1> INVERTED EXCLAMATION MARK

<<<>                   /xAE   <U00AB> LEFT-POINTING DOUBLE ANGLE QUOTATION MARK

</>/>>                 /xAF   <U00BB> RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK

<.S>                   /xB0   <U2591> LIGHT SHADE

<:S>                   /xB1   <U2592> MEDIUM SHADE

<?S>                   /xB2   <U2593> DARK SHADE

<vv>                   /xB3   <U2502> BOX DRAWINGS LIGHT VERTICAL

<vl>                   /xB4   <U2524> BOX DRAWINGS LIGHT VERTICAL AND LEFT

<vL>                   /xB5   <U2561> BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE

<Vl>                   /xB6   <U2562> BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE

<Dl>                   /xB7   <U2556> BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE

<dL>                   /xB8   <U2555> BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE

<VL>                   /xB9   <U2563> BOX DRAWINGS DOUBLE VERTICAL AND LEFT

<VV>                   /xBA   <U2551> BOX DRAWINGS DOUBLE VERTICAL

<LD>                   /xBB   <U2557> BOX DRAWINGS DOUBLE DOWN AND LEFT

<UL>                   /xBC   <U255D> BOX DRAWINGS DOUBLE UP AND LEFT

<Ul>                   /xBD   <U255C> BOX DRAWINGS UP DOUBLE AND LEFT SINGLE

<uL>                   /xBE   <U255B> BOX DRAWINGS UP SINGLE AND LEFT DOUBLE

<dl>                   /xBF   <U2510> BOX DRAWINGS LIGHT DOWN AND LEFT

<ur>                   /xC0   <U2514> BOX DRAWINGS LIGHT UP AND RIGHT

<uh>                   /xC1   <U2534> BOX DRAWINGS LIGHT UP AND HORIZONTAL

<dh>                   /xC2   <U252C> BOX DRAWINGS LIGHT DOWN AND HORIZONTAL

<vr>                   /xC3   <U251C> BOX DRAWINGS LIGHT VERTICAL AND RIGHT

<hh>                   /xC4   <U2500> BOX DRAWINGS LIGHT HORIZONTAL

<vh>                   /xC5   <U253C> BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL

<vR>                   /xC6   <U255E> BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE

<Vr>                   /xC7   <U255F> BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE

<UR>                   /xC8   <U255A> BOX DRAWINGS DOUBLE UP AND RIGHT

<DR>                   /xC9   <U2554> BOX DRAWINGS DOUBLE DOWN AND RIGHT

<UH>                   /xCA   <U2569> BOX DRAWINGS DOUBLE UP AND HORIZONTAL

<DH>                   /xCB   <U2566> BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL

<VR>                   /xCC   <U2560> BOX DRAWINGS DOUBLE VERTICAL AND RIGHT

<HH>                   /xCD   <U2550> BOX DRAWINGS DOUBLE HORIZONTAL

<VH>                   /xCE   <U256C> BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL

<uH>                   /xCF   <U2567> BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE

<Uh>                   /xD0   <U2568> BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE

<dH>                   /xD1   <U2564> BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE

<Dh>                   /xD2   <U2565> BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE

<Ur>                   /xD3   <U2559> BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE

<uR>                   /xD4   <U2558> BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE

<dR>                   /xD5   <U2552> BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE

<Dr>                   /xD6   <U2553> BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE

<Vh>                   /xD7   <U256B> BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE

<vH>                   /xD8   <U256A> BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE

<ul>                   /xD9   <U2518> BOX DRAWINGS LIGHT UP AND LEFT

<dr>                   /xDA   <U250C> BOX DRAWINGS LIGHT DOWN AND RIGHT

<FB>                   /xDB   <U2588> FULL BLOCK

<LB>                   /xDC   <U2584> LOWER HALF BLOCK

<lB>                   /xDD   <U258C> LEFT HALF BLOCK

<RB>                   /xDE   <U2590> RIGHT HALF BLOCK

<TB>                   /xDF   <U2580> UPPER HALF BLOCK

<a*>                   /xE0   <U03B1> GREEK SMALL LETTER ALPHA

<ss>                   /xE1   <U00DF> LATIN SMALL LETTER SHARP S (German)

<G*>                   /xE2   <U0393> GREEK CAPITAL LETTER GAMMA

<p*>                   /xE3   <U03C0> GREEK SMALL LETTER PI

<S*>                   /xE4   <U03A3> GREEK CAPITAL LETTER SIGMA

<s*>                   /xE5   <U03C3> GREEK SMALL LETTER SIGMA

<My>                   /xE6   <U00B5> MICRO SIGN

<t*>                   /xE7   <U03C4> GREEK SMALL LETTER TAU

<F*>                   /xE8   <U03A6> GREEK CAPITAL LETTER PHI

<H*>                   /xE9   <U0398> GREEK CAPITAL LETTER THETA

<W*>                   /xEA   <U03A9> GREEK CAPITAL LETTER OMEGA

<d*>                   /xEB   <U03B4> GREEK SMALL LETTER DELTA

<00>                   /xEC   <U221E> INFINITY

<f*>                   /xED   <U03C6> GREEK SMALL LETTER PHI

<e*>                   /xEE   <U03B5> GREEK SMALL LETTER EPSILON

<(U>                   /xEF   <U2229> INTERSECTION

<=3>                   /xF0   <U2261> IDENTICAL TO

<+->                   /xF1   <U00B1> PLUS-MINUS SIGN

</>=>                  /xF2   <U2265> GREATER-THAN OR EQUAL TO

<=<>                   /xF3   <U2264> LESS-THAN OR EQUAL TO

<Iu>                   /xF4   <U2320> TOP HALF INTEGRAL

<Il>                   /xF5   <U2321> BOTTOM HALF INTEGRAL

<-:>                   /xF6   <U00F7> DIVISION SIGN

<?2>                   /xF7   <U2248> ALMOST EQUAL TO

<DG>                   /xF8   <U00B0> DEGREE SIGN

<.M>                   /xF9   <U00B7> MIDDLE DOT

<sb>                   /xFA   <U2022> BULLET

<RT>                   /xFB   <U221A> SQUARE ROOT

<nS>                   /xFC   <U207F> SUPERSCRIPT LATIN SMALL LETTER N

<2S>                   /xFD   <U00B2> SUPERSCRIPT TWO

<fS>                   /xFE   <U25A0> BLACK SQUARE

<NS>                   /xFF   <U00A0> NO-BREAK SPACE

END CHARMAP

"

! !

!CP437 methodsFor:'encoding & decoding'!

decode:codeArg

    "Automagically generated by generateCode - do not modify.

     Decode from my encoding into unicode."

    |code "{ Class: SmallInteger }"|

    code := codeArg.

    code <= 16r7F ifTrue:[ ^ code ].

    code > 16rFF ifTrue:[

        ^ self decodingError.

    ].

    ^ #(

       "16r0080"    16r00C7 " LATIN CAPITAL LETTER C WITH CEDILLA " 

       "16r0081"    16r00FC " LATIN SMALL LETTER U WITH DIAERESIS " 

       "16r0082"    16r00E9 " LATIN SMALL LETTER E WITH ACUTE " 

       "16r0083"    16r00E2 " LATIN SMALL LETTER A WITH CIRCUMFLEX " 

       "16r0084"    16r00E4 " LATIN SMALL LETTER A WITH DIAERESIS " 

       "16r0085"    16r00E0 " LATIN SMALL LETTER A WITH GRAVE " 

       "16r0086"    16r00E5 " LATIN SMALL LETTER A WITH RING ABOVE " 

       "16r0087"    16r00E7 " LATIN SMALL LETTER C WITH CEDILLA " 

       "16r0088"    16r00EA " LATIN SMALL LETTER E WITH CIRCUMFLEX " 

       "16r0089"    16r00EB " LATIN SMALL LETTER E WITH DIAERESIS " 

       "16r008A"    16r00E8 " LATIN SMALL LETTER E WITH GRAVE " 

       "16r008B"    16r00EF " LATIN SMALL LETTER I WITH DIAERESIS " 

       "16r008C"    16r00EE " LATIN SMALL LETTER I WITH CIRCUMFLEX " 

       "16r008D"    16r00EC " LATIN SMALL LETTER I WITH GRAVE " 

       "16r008E"    16r00C4 " LATIN CAPITAL LETTER A WITH DIAERESIS " 

       "16r008F"    16r00C5 " LATIN CAPITAL LETTER A WITH RING ABOVE " 

       "16r0090"    16r00C9 " LATIN CAPITAL LETTER E WITH ACUTE " 

       "16r0091"    16r00E6 " LATIN SMALL LETTER AE " 

       "16r0092"    16r00C6 " LATIN CAPITAL LETTER AE " 

       "16r0093"    16r00F4 " LATIN SMALL LETTER O WITH CIRCUMFLEX " 

       "16r0094"    16r00F6 " LATIN SMALL LETTER O WITH DIAERESIS " 

       "16r0095"    16r00F2 " LATIN SMALL LETTER O WITH GRAVE " 

       "16r0096"    16r00FB " LATIN SMALL LETTER U WITH CIRCUMFLEX " 

       "16r0097"    16r00F9 " LATIN SMALL LETTER U WITH GRAVE " 

       "16r0098"    16r00FF " LATIN SMALL LETTER Y WITH DIAERESIS " 

       "16r0099"    16r00D6 " LATIN CAPITAL LETTER O WITH DIAERESIS " 

       "16r009A"    16r00DC " LATIN CAPITAL LETTER U WITH DIAERESIS " 

       "16r009B"    16r00A2 " CENT SIGN " 

       "16r009C"    16r00A3 " POUND SIGN " 

       "16r009D"    16r00A5 " YEN SIGN " 

       "16r009E"    16r20A7 " PESETA SIGN " 

       "16r009F"    16r0192 " LATIN SMALL LETTER F WITH HOOK " 

       "16r00A0"    16r00E1 " LATIN SMALL LETTER A WITH ACUTE " 

       "16r00A1"    16r00ED " LATIN SMALL LETTER I WITH ACUTE " 

       "16r00A2"    16r00F3 " LATIN SMALL LETTER O WITH ACUTE " 

       "16r00A3"    16r00FA " LATIN SMALL LETTER U WITH ACUTE " 

       "16r00A4"    16r00F1 " LATIN SMALL LETTER N WITH TILDE " 

       "16r00A5"    16r00D1 " LATIN CAPITAL LETTER N WITH TILDE " 

       "16r00A6"    16r00AA " FEMININE ORDINAL INDICATOR " 

       "16r00A7"    16r00BA " MASCULINE ORDINAL INDICATOR " 

       "16r00A8"    16r00BF " INVERTED QUESTION MARK " 

       "16r00A9"    16r2310 " REVERSED NOT SIGN " 

       "16r00AA"    16r00AC " NOT SIGN " 

       "16r00AB"    16r00BD " VULGAR FRACTION ONE HALF " 

       "16r00AC"    16r00BC " VULGAR FRACTION ONE QUARTER " 

       "16r00AD"    16r00A1 " INVERTED EXCLAMATION MARK " 

       "16r00AE"    16r00AB " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK " 

       "16r00AF"    16r00BB " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK " 

       "16r00B0"    16r2591 " LIGHT SHADE " 

       "16r00B1"    16r2592 " MEDIUM SHADE " 

       "16r00B2"    16r2593 " DARK SHADE " 

       "16r00B3"    16r2502 " BOX DRAWINGS LIGHT VERTICAL " 

       "16r00B4"    16r2524 " BOX DRAWINGS LIGHT VERTICAL AND LEFT " 

       "16r00B5"    16r2561 " BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE " 

       "16r00B6"    16r2562 " BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE " 

       "16r00B7"    16r2556 " BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE " 

       "16r00B8"    16r2555 " BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE " 

       "16r00B9"    16r2563 " BOX DRAWINGS DOUBLE VERTICAL AND LEFT " 

       "16r00BA"    16r2551 " BOX DRAWINGS DOUBLE VERTICAL " 

       "16r00BB"    16r2557 " BOX DRAWINGS DOUBLE DOWN AND LEFT " 

       "16r00BC"    16r255D " BOX DRAWINGS DOUBLE UP AND LEFT " 

       "16r00BD"    16r255C " BOX DRAWINGS UP DOUBLE AND LEFT SINGLE " 

       "16r00BE"    16r255B " BOX DRAWINGS UP SINGLE AND LEFT DOUBLE " 

       "16r00BF"    16r2510 " BOX DRAWINGS LIGHT DOWN AND LEFT " 

       "16r00C0"    16r2514 " BOX DRAWINGS LIGHT UP AND RIGHT " 

       "16r00C1"    16r2534 " BOX DRAWINGS LIGHT UP AND HORIZONTAL " 

       "16r00C2"    16r252C " BOX DRAWINGS LIGHT DOWN AND HORIZONTAL " 

       "16r00C3"    16r251C " BOX DRAWINGS LIGHT VERTICAL AND RIGHT " 

       "16r00C4"    16r2500 " BOX DRAWINGS LIGHT HORIZONTAL " 

       "16r00C5"    16r253C " BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL " 

       "16r00C6"    16r255E " BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE " 

       "16r00C7"    16r255F " BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE " 

       "16r00C8"    16r255A " BOX DRAWINGS DOUBLE UP AND RIGHT " 

       "16r00C9"    16r2554 " BOX DRAWINGS DOUBLE DOWN AND RIGHT " 

       "16r00CA"    16r2569 " BOX DRAWINGS DOUBLE UP AND HORIZONTAL " 

       "16r00CB"    16r2566 " BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL " 

       "16r00CC"    16r2560 " BOX DRAWINGS DOUBLE VERTICAL AND RIGHT " 

       "16r00CD"    16r2550 " BOX DRAWINGS DOUBLE HORIZONTAL " 

       "16r00CE"    16r256C " BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL " 

       "16r00CF"    16r2567 " BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE " 

       "16r00D0"    16r2568 " BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE " 

       "16r00D1"    16r2564 " BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE " 

       "16r00D2"    16r2565 " BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE " 

       "16r00D3"    16r2559 " BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE " 

       "16r00D4"    16r2558 " BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE " 

       "16r00D5"    16r2552 " BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE " 

       "16r00D6"    16r2553 " BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE " 

       "16r00D7"    16r256B " BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE " 

       "16r00D8"    16r256A " BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE " 

       "16r00D9"    16r2518 " BOX DRAWINGS LIGHT UP AND LEFT " 

       "16r00DA"    16r250C " BOX DRAWINGS LIGHT DOWN AND RIGHT " 

       "16r00DB"    16r2588 " FULL BLOCK " 

       "16r00DC"    16r2584 " LOWER HALF BLOCK " 

       "16r00DD"    16r258C " LEFT HALF BLOCK " 

       "16r00DE"    16r2590 " RIGHT HALF BLOCK " 

       "16r00DF"    16r2580 " UPPER HALF BLOCK " 

       "16r00E0"    16r03B1 " GREEK SMALL LETTER ALPHA " 

       "16r00E1"    16r00DF " LATIN SMALL LETTER SHARP S (German) " 

       "16r00E2"    16r0393 " GREEK CAPITAL LETTER GAMMA " 

       "16r00E3"    16r03C0 " GREEK SMALL LETTER PI " 

       "16r00E4"    16r03A3 " GREEK CAPITAL LETTER SIGMA " 

       "16r00E5"    16r03C3 " GREEK SMALL LETTER SIGMA " 

       "16r00E6"    16r00B5 " MICRO SIGN " 

       "16r00E7"    16r03C4 " GREEK SMALL LETTER TAU " 

       "16r00E8"    16r03A6 " GREEK CAPITAL LETTER PHI " 

       "16r00E9"    16r0398 " GREEK CAPITAL LETTER THETA " 

       "16r00EA"    16r03A9 " GREEK CAPITAL LETTER OMEGA " 

       "16r00EB"    16r03B4 " GREEK SMALL LETTER DELTA " 

       "16r00EC"    16r221E " INFINITY " 

       "16r00ED"    16r03C6 " GREEK SMALL LETTER PHI " 

       "16r00EE"    16r03B5 " GREEK SMALL LETTER EPSILON " 

       "16r00EF"    16r2229 " INTERSECTION " 

       "16r00F0"    16r2261 " IDENTICAL TO " 

       "16r00F1"    16r00B1 " PLUS-MINUS SIGN " 

       "16r00F2"    16r2265 " GREATER-THAN OR EQUAL TO " 

       "16r00F3"    16r2264 " LESS-THAN OR EQUAL TO " 

       "16r00F4"    16r2320 " TOP HALF INTEGRAL " 

       "16r00F5"    16r2321 " BOTTOM HALF INTEGRAL " 

       "16r00F6"    16r00F7 " DIVISION SIGN " 

       "16r00F7"    16r2248 " ALMOST EQUAL TO " 

       "16r00F8"    16r00B0 " DEGREE SIGN " 

       "16r00F9"    16r00B7 " MIDDLE DOT " 

       "16r00FA"    16r2022 " BULLET " 

       "16r00FB"    16r221A " SQUARE ROOT " 

       "16r00FC"    16r207F " SUPERSCRIPT LATIN SMALL LETTER N " 

       "16r00FD"    16r00B2 " SUPERSCRIPT TWO " 

       "16r00FE"    16r25A0 " BLACK SQUARE " 

       "16r00FF"    16r00A0 " NO-BREAK SPACE " 

       ) at:(code - 16r7F).

!

encode:unicodeArg

    "Automagically generated by generateCode - do not modify.

     Encode from unicode into my encoding."

    |unicode "{ Class: SmallInteger }"|

    unicode := unicodeArg.

    unicode <= 16r7F ifTrue:[ ^ unicode ].

    unicode > 16r25A0 ifTrue:[

        ^ self encodingError.

    ].

    unicode <= 16r9F ifTrue:[

        ^ self encodingError

    ].

    unicode <= 16r3C6 ifTrue:[

        unicode <= 16r192 ifTrue:[

            unicode <= 16rFF ifTrue:[

                [

                    |t|

                    t := #[

                       "16r00A0"    16rFF " NO-BREAK SPACE " 

                       "16r00A1"    16rAD " INVERTED EXCLAMATION MARK " 

                       "16r00A2"    16r9B " CENT SIGN " 

                       "16r00A3"    16r9C " POUND SIGN " 

                       "16r00A4"    16r00 " invalid " 

                       "16r00A5"    16r9D " YEN SIGN " 

                       "16r00A6"    16r00 " invalid " 

                       "16r00A7"    16r00 " invalid " 

                       "16r00A8"    16r00 " invalid " 

                       "16r00A9"    16r00 " invalid " 

                       "16r00AA"    16rA6 " FEMININE ORDINAL INDICATOR " 

                       "16r00AB"    16rAE " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK "