#!/home/ptc-nfs/bdkibler/bin/wish
#
set errorNo [catch {

# ----------------------------------------------------------------------
#  TITLE: maj.tcl - Mahjongg game, complete with all data
# ----------------------------------------------------------------------
#  AUTHOR:  Bill Kibler, Kibler Electronics, Lincoln, CA
# ======================================================================
#               Copyright (c) 2000  Kibler Electronics
# ======================================================================

set readme {
"Mahjongg for plugin - an example of mimimalistic coding.
This project is an example of how simple a program can
be. Some credit is due to others for the tiles - kmahjongg,
the basic plugin start is from sol.tcl - which thanks are 
given for their inspiration and code examples. Please
use this program for fun and education... B.D.Kibler"
}
#
# ----------------------------------------------------------------------
#  DEFAULT OPTIONS
# ----------------------------------------------------------------------
if {[string match *color [winfo screenvisual .]]} {
    option add *activeBackground ForestGreen startupFile
    option add *activeForeground white startupFile
    option add *table.background ForestGreen startupFile
    option add *redCardColor firebrick startupFile
    option add *hintColor PaleGreen startupFile
}

# ----------------------------------------------------------------------
# Now insert all the tile images...
# ----------------------------------------------------------------------
#charset=US-ASCII; name=YouWin.GIF encoding: base64

set YouWin {
R0lGODlh4AAAAfcAAM1TXs5WYc9aZdBeadFibNNncNRrdNVvedZye9h5gtuE
jN2Lkt+Ql9+SmeCVnOGYnuKbouShp+SkquapruesseivtOixtum1uuq4vey9
we3Bxe7Gye/IzPDLzvHO0vLT1fPX2fTa3Pbf4fbh4/jl5/jm6Pnr7Pvz9P7+
/vwD+wAAAP///wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAACH5BAEAACkALAAAAADgAAABQAj/AFMIHEiwoMGD
CBMqXMiwocOHECNKnEixosWLGDNq3Mixo8ePIEOKHElS4omTJyyotBCgZQAA
MGPKhGmgpoEQOEOY2GmCIYmfJDAIxSBTgFEBGZJmQHmipNOnUA0yJUCVwMyr
AChopUBRaQYEYBGgGIsiqtmzaAWSRREWAdaZE+JOYAihrt26FHma8Cp3gle9
DPX2HUx4AojDIAh2WNyhsOMJHyJ/SPtUgWUFb2XeJZigc4INoDdAvIw55lEB
TAmuPS2TNMPMMfu+hg1ANuWod2nPBPyQ9NsFwBcwDL7grecECHXbVqhc7u20
umVS1E2coYPrDnQnp708YfO4z9FG/49JMTfW6gt9Y9188Pvche7DP80ZYjxM
+hQZd2AdE/9AEQCKUNRR+jEkwYESvOVSAMSRdlxVVmF1HG/yVWjhhRhmqOGG
HHbo4YcghijiiCSWaOKJKKao4oosiriWBjBqsCB1wQUogmpkjaDjCMfpBiFi
IKR2EFAkPGDkA5rZxRR9M5p2FIUjYpcdVm1x5MGVHuhW5URt6bbjCBDdhaAE
CH3ZJEwQQikihLqpedGYum3F1UJM8QebTQYwBOSWBl3g5wWPyTVmmTsGSpiN
BEn2QQWMVuCVkBINRRRWUpLUJW1EItQWffrpNuhBeH7JUF/aPaQbnpJ+iadx
nlHEZkyQhv/E1Kk2ESSlpAgdiSRtX0r55wUQkUobRJ4iiJCwsFE0pmtnhbYB
rTXpCtGlVy14HEXIZkYsd84dlO1bFNEXowbPSfkWnxHpdSYAC8YarFylOhSf
t/AO+xAH+HJw2oKNVvAcnqethdG4MnmFkXmwCXzQrLR9ahCctLkLqk26Sdzi
xRhnrPHGHHfs8ccghyzyyCSXbPLJKKesckdAGuryYOOO+jJhoq4cIsSwDaDz
AAqbhJJMK1lgc4sE07bzABYXxFQBTBfg39AbY5ml0TtDqapNSeM4lq4LEgek
uTFJ2XMKa/06r0BMmc0teB6X4HYJ6w5oVL/MOtSphK0u1CNWMbf/t/Z7zP09
sl72AUDR0W9VuhDYVx29HWzdPZ5Z5CIXTtEBmB+QOHYMMeA5A2/hKflblBt0
NsmWT6SXnQCgi1DmmjtplJsCvXoVewYpevrFb5dAGuu6nUZa7xD1ih2epOFJ
HPEPrRXB8xHY3npYv67VFvKXEScn1Nx37/334Icv/vjkl2/++RsJNvPLBDG1
/stAHrt+/APR12+mKa7lVdBZT8R4Ztt7CJGglaeJSE10B5GTbgpUIsTRhnYV
aVoBdMM8h/zvLQ5rCJ7wpxC9jKt/IFLPVSAEkt5pKSwMkZSURJiZmhnkLgE0
yJeopa2FoURtsPEKcXRztKc1hHBYYaBIIXCYmQzSB12rOUroajUQIF3rId/C
yrZgk0GCRPEqFCEOAv/NskPaKApCSaNPsQ6UJp68Ky7xasjuBnLFmVBEUriL
ShKN4qUdQUSBtMHVRNooHVMJjl5otJfPmHKS5wDpLX2zCAufaBE+ksePkOuW
QRwJE4hI7y0gDElf4oiRtRwtkwiRUtyoFBamAGlVtDnNuJwFPFKCpYIF+SKE
qqJH9NnylrjMpS53ycte+vKXwAymMIdJzGIa85jIFFHL3meoRCaEmXJxYTIj
wpSgjfIqeKIPBAlCJEnJDSlKAeU0HYKzzBxtbBBhGEyCNk6RTKUqcdpKV5TS
FnS2EyRFy9nOMrm0pvnwniSxXljW+MK72CUvPOGLXP5ixoWob2b0E4h+3qf/
qKhhiYdVa6hArlaTTK6Fay7xGmL+JzayaA0FRCSdJFOQtj8RFGMsfEscj+Os
0Vzmm7GaowBac5nZRJJtgfsp4DjWu2sC4DR06+lD7nYVRiZkb1dxJkFeOtU/
hgxh0dnmQWIaE/QopItNzZvprOodsn4MiOM53M42dx3rYOctjvObUH06uZWO
LHUSoRFw3HqdNFZ1rvAxa+Xsc7nMsdUBnfvcEmsyOqyUriBU9RheI4JVmXg1
IVyFCScHElmBdJZjk4XI6pQYE9cdBHbfhOAlY7JZgehOsB0To33+uVTGsM6H
NvqmEBNSTpl0LTgO8sxqYTIhja6od78j7XiEdxlY/zLEeNfBnmWUFxznLsR5
0JNeW6pHluvZhDTakydAx0ve8pr3vOhNr3rXy972uve98I2vfOdL3/p25KHQ
LEz7UJLfx0S0IO/7r/0axcET6U8p/EMJRV4UI6NatkYBOumXoJqZHyEmaUTS
VZLqsqScrOs0WuXQBUuLwo2M+CoxbMgAabPFiByQiQbBI2x2KyIHwibEDZHa
CcFCERq+RZp0sUsVB2Iml8ikjDsx0XB3Y1yMSJCCb4PIiWcyZIVsECiB4ckH
FZyizAKAhB/pLVZSjJA6KTczLUbInkrcpz+5rMop+NL7EDUQRfXrUVyO1FAO
W8K37RgBKRzKCm/KKzseBGKG4pXhjnwsRRueJKVY0WFwMKoz2naQJ2+h8UcY
fZUCE2RTOWFqEY01sZoAGZAT8Gtg72STVO0IlWHtjKvgCas8hwTSVzFiTpBI
llbSBMYpcKJYG0JJw0Fy1AeSXyCTNREtAv+bJOpEM7BvNZRcHamOOvLVn86Y
akGqsWGknmS9mC2RZSmVi5P2omTAaGuCyJaKCEJyT6A47hrKC7YpKPYbh9La
kjiLgNJ6CKfZ5RKnclvVQa0rUAFcb3BNRFwxQotOsQ2mh8g4M7WMiL6PrdKF
W7HhjR4kIcv1VlcCWnU8WVe72k3vZdv724AVt8sd7pB86eso/GoUWg7Jt4hf
ZJHDxhbIschxx9qVjUN340OWLBNxegRgR7GnRPIJAINdpLJYkTpLfwbuZB9E
zFfJJKwz4/SObPKgG/HkPlluQew4mMRgMSVixv4WVcaIlWc+V1is69p1z5Iq
Gbev4AdP+MIb/vD/iE+84hfP+MY7/vGQj7zkJ0/5ylv+8pjPvOY3z3nNL7O/
hJEqqt936vV+HvR9Eb3MmVl69VZzJW//dU202eQhAcWbsgNnUsp+z9erJPYA
yGZOcNzNPecez4UcPNhnck6TTiTa7Fz88mXS/LFQBPorYfw7qRJPrcwzKfV0
vuK3HyHYkPkhXgm/9R9PdbiuPfkK6SfTLN349mPlk2xXGkokSH/GCxQsn2VQ
aCcReqFQccFQSeZQPBFgiKEYjEFRknEx/+cW+EYQAogXKLcTBugXSoFj+OUy
/zVR61NRGqNjVKMzVvNqWJN/JwVSLSFSh0FS2DE2ZeNSZNVSfvJZJmKC//qE
gsbFUQbgUWThggwSHF9TcjBRUuunFmSBa3CxUjh4ATrYZYQGGzPlGTXVG1V4
VEeRU712ZnVTVjEnhgo3VBvjZRsGAZyBhaFhU5aBU7Y2cTERho11FY/1V2X4
MUVlZFiBVI1ChwshajJhcAdBYTKheinwWVOIInvYEnV3FEllGRAhiDFBiAZh
iDGBiIpYgRqDdTdWewrhZZeFEGA1E5aYiJzoWamIMZ6YGThGEKIYHMORbrGG
HHKVh6uGiyGDVtGhVjrDZ4uDhMy3M3X4hB53ix1nhh7DiwjXEDY2E4qjEFMW
V2M1hsUoE3coWYQ1EXolHMHYV96Gh8lIV+NoMhChVXRXMYoHMWV9VI26SIbl
/1gy5+gQqEUpnLMQnwM6WJFmnLWKi4gx89gQ9XgV0ZgQ+bhYBeSO8QiPRneM
IROQQVYXvyGL6bGFaXiNsXF0CtmQyviQ2ygRraiOBuFl/baJ1jhYaZWBJsA6
pmUQA8mFswOKKbBk/fZaJ+mRKUmAPMGSbJYQLwliMkmTAxhLkvGPKvJu0dF/
gWhbZ4ZbAaJbjGEgCKIgIQVcl/EgtFaLr5giSKkbSqkQ+nFbOUEQuZV7mvYw
U4kVvwUcwdUZS1ZcCcgiyHUZvpYZzGUZfJcQ0OUA0qUA1AUceYkQ2PU82kU9
fzKBfRle3tcic2kZdfmIRjE8UfYQe9mXf7kAgXkQg/8ZPVk5PWDBXWPhXTUB
XsFxfp13mqiZmqq5mqzZmq75mrAZm7I5m7RZm7Z5m7iZm7q5m7zZm775m8AZ
nMKpMh+IekPlPsbZF//1cRDVgPWTE/eDZflDFvuzErw3EMWJevt1EsmpnM65
eiD4nSkwYIziaSVyYEmRYPAXEQwGI8BHHHTGhGMxYZ7hI1UBJBgGFBrGWkqC
EkzChzABlHEZJcIoEy3ZEO0pIwCaGfAZYQOxFvTZGfZJFfiZfxl2bfzJYf7p
YQsqoPNGIlN2oBTBjjFhmgmxYqzGWAaEJfwoEBeXaVHZQGv1QDIpZQU6Zomm
YkBBQBTxYioaY1uxQDFKIs//+BZbqRA8mBkiuhADJxOthxBiEm4FUWSOGBPy
pmSdaaQ1+hBJqnc8xiUDVWg6EiZCJqUEQaUvYaVVcaQXwnQxwaYM8WS0kZkG
QaIwAWcIcWU/kWU7sWXraSJeBmYeIaewQacFYacAgKelZgDmaRAeFCPXiSGB
WhUgMX0lmqNlhhKPGRMtWhBr9qVt5idvZqZEVijrE58pYGeNgnxNMRG4R5D3
6BGWChMmup0nsKmyl5AJ8aknF6qAYihwJmen6qB9Fxl3Fk4suBCvCo2x2hEm
RBtLKhAqhB1oGBOth2iLqWg60qSPJBU3ZIM5pBSl6H6VNpYPwYwxcZYZ8ayw
Ea0prTCt11GtMHGtdmGiMxSm5KZ/jwaumSFpwEFpA/CVBYGuMKGuHMGtMNGo
KQBqOEGJuUaqAhEqhqYQG3dvKWoArqYjdFeJQbd0nRmpEYGwAKCwDBsCDktl
EJsCEjumC1GxMCdtNZGxI7CxxNWxDiE9IAsRTigTuoYTvDYWddliwiZrLddt
+UqOWAFnLgsRzvajJbGzMdGzIfCzKBC0wDa0tugQS5uLGJSyW+sQTaur/9DG
dRdrK9gReAOxn7Cxl79ycOHItUnrtUnXjhFhbpL4FNGGkGZ7HWgrEGrbQjui
bX7itkcLtw/rdavXjFJ5IIDoFOOKFbJEFWGUE2MkAVdatIqLjBypbEb7chAB
R0MJFY97FZFLAJOLE5V7uVo7t936sgvJnJ1LcxEBuhhoFv/GYjYRcA4xcNZi
s8TGupWEjsbYkfkGvMYmERAHI2hxuxeruw3BuwXnuzIzcyHnupuLapmrEMlL
Lmchh2s7sQ3xoljRt79LvURnse8Iu9mbEISUrCLhvYDLsg4hvldBvtMbu9WL
tHaokcVrvkoncjlrYjcKE+6KEOqyoCv3p5j7tv8J97pI5790yxA2ty8u0S9o
EaI9KVoph8AuAbJfy5D765D9i7/n2xATjHMVrHNnwXNR5XOKtIWnSLiea7jD
y7nrSxBuChMBLBEsPBOI6IalUbNE20jGO0Xp+8Ak/L8NkcMAsMMVAXVGoXUQ
QXVWZxGtKBNal7dxi7gFMatN7L4qSzERA8YgAcUCIMUPQcVKcTB2oRtZTLbI
RiZfl5awIXZiXMdk/BFnV7sZoXY6A7KitKBeigBydxg0OxN2ByN4R0fQuneT
mTt+93f2+xR7rIZpRxb4p8Btdx3A1xaFDAKH/E2rFBq46pkIkJelCyGTPJys
3Mqu/MqwHMuyPMu0XMsVtnzLuJzLurzLvNzLvvzLwBzMwBkQADs=
}

#charset=US-ASCII; name=BLK.GIF encoding: base64
# BLK = blank / background pattern

set BLK_data {
R0lGODdhJAA0APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0OrXadAAPwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAQQ4z8ApQQA0AAApQECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKUABOrXadAAP4wAACwAAs4eXJcxjeNQJgCo4gCHYgBxAMoABwBJ
fhIAAQwAAFAAWDQAJAEAJBcAAP//3JYAAAAHLARQFwAEAABQJgAAAKUAAJwC
LuAAAkeGUAAW3wAAASQCAQAANFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHQCLDD//5QAaWgAVgFfSSQAAQAAAOARrwABRAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+pMM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABR8ABR+N+HBOIBXwFR+EYBd19K6XcT
ZABR8ABR+FaHRlaHLgAAAH8AAQAAAQBR+HcDRwAA90aSwACHRAAADIRR/KQA
VtwADYQAWqAAAAC/91sJhgCrenoAAIZkOgYCJvdPTUoAAa8AAEiHkIYFX54A
AMaLynqreswGr08TmRISviwAAAAAJAA0AAAInQAFBAggkODAgggPKjTIMOHA
hgsdSoxIcSLEixYTZqSIkWNBjyA7dtwokqRAkyFJplxZsqXLjShfcmQZc2JN
mgpvymSIc6fGnjd16gRKVChOozuJ+ly6FGlMpUGhrnTKUqpMqi2xqmQaletU
q1u1ghQ7EmxIs1nR2lQ70+tVthDJWoS71i1MugvxxtV7ku9Du18BlxU8l/BY
v3I5BgQAOw==
}

#charset=US-ASCII; name=B1.GIF encoding: base64

set B1_data {
R0lGODdhJwA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzeMDus0APwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAQQ4z8AogQAzQAAogECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKIABOMDus0AP4wAACwAAs4eXJcxjeNQJgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAJwEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAFIAACgC
LQAXt/8AAAD///wAACcAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHECLH///3gAAGgAVgFfSScAAQAAAHARrwAAAAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABdOABdQN+HBOIBXwFdQEYBd19K6XcT
ZABdOABdQFaHRlaHLgAAAH8AAQAAAQBdQHcDRwAA90YygACHRAAADIRdRDQA
VtwADfQAWqAAAAC/91sJhgCtAnoAAIZkOgYCJj9PTUoAAa8AAEiHkIYFX54A
AMaLygKtAswGr08TmUoSviwAAAAAJwA4AAAI/wABCARggYLBgwgTKlyocOCF
CxYqSJxIsaLFixQpCLyA4QLGjyAnPpgIgGPHkCgtPhgp0eTJlDBHsqyQAYNN
jzBzzqx5M6fOiTxf+kS506bQoSCL9kTaYOXFlSyD4vTZdMGCmRKhOpU6tGpV
rBa5+kSAoMGCCFcjRMAoFmbZBmbNqv3YNmUDBCvjhqyL8q7ZB033Gp3at+yD
BXBR8v2ItynUBgkELw0JdwGBB40hSz6KkezlwwQQJ2iwmfBFuJ8xH4ZLuqID
BxIdLKbYILVj0ZFdT4S9mACB2lrJ1raamyJsA8hfz9aa94Hvqwlyw66AHDnF
2RWg4kXweUF0itUrvP++Pvhi9MvcoXovTt3AdPHkJ0+M7v3v6u/wrWOUXb6i
+sOIrTdRdbAVOJ17NPUnEmCHVRAdfhLpB1+E4SUon3qtVSBBRclN2J4BFbXF
HEUbDgjihBW+Z+FLKyXgFIklSvjheGGV12JeFm2onwPhqRhieQ++WJEEEpzY
no8XSfVAdELG1l5sPSoGZJMHgnickSlJxaRxFJooHpJsAanbjjKCWaN84FlJ
IFKz6SfjUIu5iSWbCnaZopmlpfmkh0itOJV1b/YpkViAuoenT4RWKOiZJ1U3
56JAlacopD/2FCilg0qKaZg3mbapRBYE1dFDpJZq6qmonsqTqEa16uqrsLof
ekFNrMZq6603AZBBrbj2KqtAuwYr7LDEFmvsBQMFBAA7
}

#charset=US-ASCII; name=B2.GIF encoding: base64

set B2_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzuKxPc4APQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAIQ4z0AowIAzgAAowECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKMAAuKxPc4APYwAACwAAs4eXJcxjeNQDgCwkgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAHMAACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAHARrwAAKAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+w4M9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABcmABcoN+HBOIBXwFcoEYBd19K6XcT
ZABcmABcoFaHRlaHLgAAAH8AAQAAAQBcoHcDRwAA90a0gACHRAAADIRcpDQA
VtwADfQAWqAAAAC/91sJhgCtAnoAAIZkOgYCJp9PTUoAAa8AAEiHkIYFX54A
AMaLygKtAswGr08TmXYXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHkShFUjB5MqXLixQyYJj5EaUB
CQgmIpBgIGXMmS1tGkCAwEBPnzJpphxalOlRlUmDijTggOiDp1CB1rTpgOdV
lz+VLu1q4CtSrS6pesUaMqzUkGrLsgXpdutUsmZR1l1alOfQuSOj2oXbtChY
wWmrIsibVSzXtYfRjoV81vFdynoRT5Yb2TLIv34NZ5ZsszDgwKRTEn1ZYS/r
165fv4wtu/Lb2m01T8Wpk6ftwZ+dnoapm3Bh0Y1vZ6RqdbhF2nDxOtdYPDrm
5MCXS++sHGNcxrlTW33n/JvvTaPIw3v+bJp7du+KwdOt/nl7+c3yM0Kvf119
94vfTUfRft71hZ6ArdG3XHv3ubTabArihtp6Ek74X4UDCvYehhUUFJVHEIUo
4ogklkiiBUl9CNSKLLboIosXACCTii/WaCNNAmVA4408wjiQjkAGKeSQRBYZ
40ABAQA7
}

#charset=US-ASCII; name=B3.GIF encoding: base64

set B3_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAz+JrvM8ANAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABcQ4zQADxcAzwAADwECAAAAAG8AAAJ6KG8AAIgMZAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MGQAWAACAA8AF+JrvM8ANIwAACwAAs4eXJcxjeNQJgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAIcAACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAHARrwAAUAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABb+ABcAN+HBOIBXwFcAEYBd19K6XcT
ZABb+ABcAFaHRlaHLgAAAH8AAQAAAQBcAHcDRwAA90atQACHRAAADIRcBDQA
VtwADfQAWqAAAAC/91sJhgCtAnoAAIZkOgYCJv9PTUoAAa8AAEiHkIYFX54A
AMaLygKtAswGr08TmX4RniwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHkShFUjB5MqXLixQyYJj5EaUB
CQgmIpBgIGXMmS1tGkCAwEBPnzJpphxalOlRlUmDijTggOiDp1CB1rTpgOdV
lz+VLu1q4CtSrS6pesUaMqzUkGrLsgXpdutUsmZR1l1alOfQuSOj2oXbtChY
wWmrIsibVSzXtYfRjoV81vFdynoRT5Yb2TLIv34NZ5ZsszDgwKRTEn1ZYS/r
165fv4wtu/Lb2m01T7yZs8LO07tx6uSpUfdup8ApGiVq1CJt5MwJFxY9kXYF
qlaT71bMuLXx63i1g6fHXP173O4Yz7O1rv4x5+Kpx7+HG965+fqX55dPDXp5
8v5/wefZXwFOZZp98WG3mHgKdscefvSR512CEH5W4YQDXpjehQ9KuKGEz/Xl
H2E3jUgRewcaaOKJ3+nUm0urwdQibhlZR2ONM96IIE2D6VhRQVF5BNGQRBZp
5JFGWpBUkEA16eSTUDp5AQAyMRnllVjSJFAGVmbppZQDcSnmmGSWaeaZUw4U
EAA7
}

#charset=US-ASCII; name=B4.GIF encoding: base64

set B4_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0uH3k9IASwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABAQ40sApxAA0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcAEOH3k9IAS4wAACwAAs4eXJcxjeNQDgCw4gCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAANEAACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAHARrwAAeAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+xMM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABbWABbYN+HBOIBXwFbYEYBd19K6XcT
ZABbWABbYFaHRlaHLgAAAH8AAQAAAQBbYHcDRwAA90abgACHRAAADIRbZDQA
VtwADfQAWqAAAAC/91sJhgCtAnoAAIZkOgYCJl9PTUoAAa8AAEiHkIYFX54A
AMaLygKtAswGr08TmfoSviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHkShFUjB5MqXLixQyYJj5kaIB
CQgmIpBgIOTNnBV29qQYc2ZLmwYQIDAw1GfSpU0nFqVZ8SlTpVEvWrWqUSbV
qg6UPsiK0UBYBGMtTj060SzPtCLdGoBL1CvbCnLpgsybdW1Nmw7ektUaeG5f
u3/bFtabka9axBYdx1182GjipDevDra5lCfmrpYjQ12KEvNn0F8Bi90MdvXj
0GAFl6b8OrVi2ZNx14UNWPde2qjvSvYJfLdtzJ5J7+2sOXhivKNZc27uHKPS
l0GB1r6LPaXf7t2/g9N/KX68d8g2cerk6VN9UPbGhW8tPb8659HKG2PlGv+5
WdeTAdhfZMX95lsF5d1m2GwHJohXgY1B6OBwBi5oX28WEtcgem0xd5p+mX2I
IIcdUudTdNv5dxZjZa1YmW0PHtjihrwpyCJhNMJIYYQ5CgfhjBlKRSJyJpbl
YX4j1ghdkSCKmCSMOmmX0nUwkWheSA5emVGWWlZp2XNdVlSQXR5BZOaZaKap
ZpoWeEWmUXDGKeeccV4AgExv0qnnnjQJlEGefAZa50B/FmrooYgmqqidAwUE
ADs=
}

#charset=US-ASCII; name=B5.GIF encoding: base64

set B5_data {
R0lGODdhJwA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0eGGENEAQQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAYQ40EApgYA0QAApgECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKYABuGGENEAQYwAACwAAs4eXJcxjeNQDgCxCgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAJwEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAOQAACgC
LQAXt/8AAAD///wAACcAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHECLH///3gAAGgAVgFfSScAAQAAAHARrwAAoAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+xWM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABauABawN+HBOIBXwFawEYBd19K6XcT
ZABauABawFaHRlaHLgAAAH8AAQAAAQBawHcDRwAA90ZZQACHRAAADIRaxDQA
VtwADfQAWqAAAAC/91sJhgCtAnoAAIZkOgYCJr9PTUoAAa8AAEiHkIYFX54A
AMaLygKtAswGr08TmZYRniwAAAAAJwA4AAAI/wABCARggYLBgwgTKlyocOCF
CxYqSJxIsaLFixQpCLyA4QLGjyAvAuDYMaTJkCRLnlxpMQOGlx5ZypToEuZE
AxIQSMRpwCROnRUQSOhJ86XKnQYQIDBA1GfSpU0r1Dz6lKnSqBirVp04NeZO
B0ofYP1oACwCsRS7Uiw7FO1JtgbcFrV500HbsVntxo2qtu7dlXDlSjXqtUJg
vBcPpyW8Vq9gkIq5Mt65dGhSxGsrW23al/JmwFCXLqb7NWzTnxKFnjYruLNh
x1GtQm38VzLp17UNX936Nffg25FLn40Ne/RR3HtpJ/e7fC5VzZeZy71sWbTz
wpejS48dmu9kikotBtyfGL6ia8jFT57PCt16yPXsP6v/jjro0Lqmb+ZMff/6
Wq3KCSYbU8Z5pdVV2920G4L+4TdcgMTlZ9tx41WYXoO9NUedfMi19l2H3HEI
YoEQWlReiRNid2FI43W2oXaQtcfZh9m5x2J3JDr4GFmseQfciuj55tp4QTb3
G4VA8igkjUnmtSRpL9oYX3UzAofjW1diSB5QMp2Y4kwzwQfmR2KOeVFXhZmJ
kQVTdfTQm3DGKeecctbUplF45qnnnnle4NKdfAYqKEwAZADooIj2KZChjDbq
6KOQRnrBQAEBADs=
}

#charset=US-ASCII; name=B6.GIF encoding: base64

set B6_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA2OELhdgAQAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAUQ40AArQUA2AAArQECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAK0ABeELhdgAQIwAACwAAs4eXJcxjeNQJgCtAgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAMcAADQC
LQAAACAAAIAAAAAAACgCAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLGD//wAAUGgAAAFfSSgAAQAAAHARrwAAyAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+tUM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABaGABaIN+HBOIBXwFaIEYBd19K6XcT
ZABaGABaIFaHRlaHLgAAAH8AAQAAAQBaIHcDRwAA90bCQACHRAAADIRaJDQA
VtwADfQAWqAAAAC/91sJhgCuEnoAAIZkOgYCJh9PTUoAAa8AAEiHkIYFX54A
AMaLyhKuEswGr08TmeYSviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHkShFUjB5MqXLixQyYJj58aXN
iTFntqxgQAKCiT0NAPU5EYEEoTyJVjCKtEJOmhUNGECAQGrUqVWb8sRqleLT
nVy5AqUqlezYrGZxyoRK0YADqg+0uoUr9y2CuBrX7uTp4Cjetn0N/AUaeLBT
vTUJ+627OGphrV8T820MmLJiwZARO7Y8GfNmz141VwZ92bBbzpHbVj06FWlr
1lXHBm0dWqfk1rRVl5WLNrNtx3SB360bvDbb0oxJdzacerTpx5+Zi0YePbn0
386ta8+Lnefq3bJhu/j+nvtwd+/gdZdHv755RaoZ4WOUz/34TZfu76fMr1/l
9J4/LXXUUAEyRWBRA6p1XllZXUWWXGHVB9aDaYVVIYWxKWjfXMMJ91xxGu51
mnIjPofadMttl52Et0G34oshtshZiSrGWN2NMJp33Gvp8ZibjxnqKGJvURGp
XpBCtggiX0tyeN2GLlKXY3404iiljTlWOSWKWl6ZIou6iRdej+QFSaWRsq2H
G5L8LRXgRfRZFCeW/aHUZp0joYhnRpFJtqdFBenlEUSEFmrooYgeasFagurk
6KOQRvroBQDI1KikmGZKk0AZXKrpp5MO1OmopJZq6qmoUjpQQAA7
}

#charset=US-ASCII; name=B7.GIF encoding: base64

set B7_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAz+C69c8AZwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAACwQ42cApCwAzwAApAECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKQALOC69c8AZ4wAACwAAs4eXJcxjeNQDgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAMoAAAEC
LcAAAAAAAIQAAAAAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLAH//wAAAGgAAAFfSSgAAQAAAHARrwAA8AAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABZeABZgN+HBOIBXwFZgEYBd19K6XcT
ZABZeABZgFaHRlaHLgAAAH8AAQAAAQBZgHcDRwAA90Z8QACHRAAADIRZhDQA
VtwADfQAWqAAAAC/91sJhgCtAnoAAIZkOgYCJn9PTUoAAa8AAEiHkIYFX54A
AMaLygKtAswGr08TmXYXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIseJEAxIQTEQgwYDFjxUMCryA4QJIkAYMIECQ8uRHCgBIlnRZUSVL
mx5pTqQgc6bOiw5WPsj5k0IGDEhN/qxgwEHHoUtDHk1KEaNGph2rOjUA9WLG
jVl3TvV5ESdRplu7ll3ZkqJRpGTNsr3IsqPKnHJZuh2rFKjQs3fv1gyKQK1U
uH3RPgVM2HDTxRXfUtUKmTJXxpXFIh6cWfFlzp/3brbsOC3m0JonA818167e
1agPq26d8jXTm7ZpC05N9nbtsxuv1sR9VnLvpn+jIi9cnC9otVbBEn0c23hi
6o7NPm8+GjZ0tjhJc/9X7bl0cvGRndPF+Bv9etdErQ9v7379bt6Jg3/EDrzC
ypfq6aSbbTTJt1RgBBYYoICN9XeSgVhdxdF0plX1lX9hyXacdvUxxSF+VYE3
l3fTiWgbhGid5xt8Wqmo4XUVhkgfiel1V15//1nEX43k7XhgjCDWFx2GFHaG
oo9r3bQdj3HVRV9eeDl535HEDeYiguMd1+CSLTLHJIydIXnjl1zS2OGRQA5Y
ZHULiollmS/KyKJfXr43I5UzjinjfXFalCOc+lmEIk1iKmijS2ouNSiiVSrK
V340/flTQWOVBNGlmGaq6aaaWjBVpXCFKuqopIp6AQBHgVrqqqwmJVAGqrYR
KqupA8Fq66245qrrrqcOFBAAOw==
}

#charset=US-ASCII; name=B8.GIF encoding: base64

set B8_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0uBpm9IAOwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAAQ4zsApwAA0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcAAOBpm9IAO4wAACwAAs4eXJcxjeNQJgCtAgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAOQAACIC
LSIAAAAAADahYvwW6iihAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAHARrwABGAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+tUM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABY2ABY4N+HBOIBXwFY4EYBd19K6XcT
ZABY2ABY4FaHRlaHLgAAAH8AAQAAAQBY4HcDRwAA90Z+AACHRAAADIRY5DQA
VtwADfQAWqAAAAC/91sJhgCwSnoAAIZkOgYCJt9PTUoAAa8AAEiHkIYFX54A
AMaLykqwSswGr08TmTIRniwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFCgZAVgw5sqTJiSFDUgDQ0WOFBwYQGJgZk+ZM
BBVl2tR508CDChRaurzpoGjMokhjTpSJtChTpzOBZsBA9WOFBjElaM2qVSvO
Cgi6ejXQVWaDiRSmVp2IlWfNnUttvu15VirVoTEb6M2rd+9Xs30bABYcNe3d
jzDdulVKcbFin3bXpjyJkrJIipMNr83IufNFzS47I/h6cbRn0FYz3syoszNq
zjMdmLY42kHUjK9Lx/Y6e3RYCbYZW8xN24ADrX7j6tVqm7RGtaFHIjguYS9J
lAaWA5f5GXpq7LKrY/+9jjl7AwnTb1MkDtK41/Gqs/8O/vxweep6fbMerZ0+
Wu9x4QefZzP1x1huoyE3oGftaTcbcWFZx+BI5qG3HoBLjabehNjp9599OTnH
YYbDYTjiiZFFhyKH7IEl4oizXQhiYxtyuFp9my0FXI0Euuccggict6NwnOmE
34MYAsYckay5J96BJhYopGzkXXSUguqxJyV6/llpXIQLpvhdg/PxuBt6YYpJ
G39TbnhmfjF+mCOFBv7lpITdzWjRluj99Rueec65Z4XOgcmjjIIO6mGGrXHW
YmkvkuiaiStO+NpkmO1pGXmZAZjYTnIVGiqoP116lFHTNcXYU0ix2lpubXVv
xVVZOoolU1nZyRlaW6DCBdaoNJml60c39cWXsXYGRlhfr3o617NEOkaqmphW
RlmVnIqE2piVZlQQdB5BJO645JZrbrkWqAXuXey26+677V4AwFTrwmvvvVUJ
lEG9+PYb70D7BizwwAQXbLC8AwUEADs=
}

#charset=US-ASCII; name=B9.GIF encoding: base64

set B9_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzuAKic4APQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAIQ4z0AowIAzgAAowECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKMAAuAKic4APYwAACwAAs4eXJcxjeNQDgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAOYAACIC
LSIAAAAAADb0RjQW6ij0AQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAHARrwABQAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABYOABYQN+HBOIBXwFYQEYBd19K6XcT
ZABYOABYQFaHRlaHLgAAAH8AAQAAAQBYQHcDRwAA90Z7YACHRAAADIRYRDQA
VtwADfQAWqAAAAC/91sJhgCwcnoAAIZkOgYCJj9PTUoAAa8AAEiHkIYFX54A
AMaLynKwcswGr08Tmc4SviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVKhgQAKCiQgkGJhY8WKFjBspWsSocaJBgRcwXJjI0QACBAZCtnwZkyVF
lzBlVqAAIKVKljhj0uRIMyjRnENN+vwJ1MHLBzoNOEUA1abUpzopZMDAdWVT
jVW/GgjL0QHYrFu7WjU7NipbshTfouXKtOzZtXfFwtVK1ytFmBpdhhQcGCbR
ikJl8lULFGlUx1Yhs1xcNy7WtZebZjaZtrLUvHbb4hU9ubPfuKBRkw691/Ro
uJ9Xq27dtzFiwYcLDwacuHRt27iBGxY+l7HNlzaPe0z+cblv48yjS5++0zXH
kR9LivQI8jp37dV/z//MaTVoVPM2Kfs1n5T9cPeKrZfdbJmqW/rqX7tNHZs2
9P77yQZgevLNFiBschEoHmG9/XXbe7wFF95/kh0moYMX5qeZfZhxuKF/niWo
14HFhcifiKyVeNqAI77mnIYO6pZbgwxKCCOGw1mYI44qModcdD/66Bxn4lFn
JHUwdkTSYNh1t92Sz3mGHlBTjldTlOsV1Z6WECKV441XeTifmPWBuCKKBuqn
4H9ospjimiYK2CaaSUYI4YO74YllZA3q+FifE4ZIX5gI4legm2m2uKeibzIa
6JknRipbnXrGSKOd8RUp2IWb7tipiqc1J12QyZFaQUGdqQTRqqy26uqrrloq
kFaqdNVq66242noBAFvRmuuvwHYlUAa+BmusrgMRq+yyzDbr7LO7DhQQADs=
}

#charset=US-ASCII; name=C1.GIF encoding: base64

set C1_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAz+idLc8AUQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABYQ41EApBYAzwAApAECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKQAFuidLc8AUYwAACwAAs4eXJcxjeNQJgCtcgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAGIAAAAC
LiAAAHgAABIAALwCACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAKgRrwAAoAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+twM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABgWABgYN+HBOIBXwFgYEYBd19K6XcT
ZABgWABgYFaHRlaHLgAAAH8AAQAAAQBgYHcDRwAA90ZfQACHRAAADIRgZDQA
VtwADfQAWqAAAAC/91sJhgCrKnoAAIZkOgYCJl9PTUoAAa8AAEiHkIYFX54A
AMaLyiqrKswGr08TmQISviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIseKBixUrXMSYsaJBgRcwXOjYcWNGjiQpUgAQUmRKiygnxkxJoaXL
lzJNUpxJkkIGDEBH4tS48cBOo0N9Ar2JE6NOnh2VBh1KNKdRqBmlMn2JsihS
nFqFNv1KFKvHn1OHztQJFu3WlGvNqnQrFi5bq0npUq2YIMHeuUvrUu37d2LY
wn0J/z38N7HfxXr3JojQlzLkwI0pT35MlfFgzZb3eh66efPltJ8rc86L+TOD
vgxCs0aNc/LrBLFXvxz90jZs2W1bk45wO7foyLWJFzc++y1J28uB00TeWzls
5sFpp4R+XXpP6tut49fGvht8R+jLyX8XHp6B++vqo5rPiB6+96zz+SpPf/8s
++f72aebfP+dF+B48eFXoH7uvYdggoBpR99+6UFoWH4ToVdhfxcuSJFtG/W1
kYUVhDXgUUWJ6FVvYUnnFUeKvUhWBZOFxdyL9OmGI43E2Rjbis+dWNZFypnI
QFG1CWnVAa+ZeNd2SqKYQFhPQrnXRlTO2FuUMFGJGJcWhSVYkoUV5JZIEKWp
5ppstsmmBWidudScdNZpJ50XAPCTnHf26WdQAmXA55+E4jmQoIgmquiijDaa
50ABAQA7
}

#charset=US-ASCII; name=C2.GIF encoding: base64

set C2_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0ej52tEAPAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAEQ4zwApgEA0QAApgECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKYAAej52tEAPIwAACwAAs4eXJcxjeNQDgCqQgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAACkAADcC
Lr2GMv8W32wpNzcAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLBn//xgXr2gADAFfSSgAAQAAAKgRrwAAyAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+qkM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABg+ABhAN+HBOIBXwFhAEYBd19K6XcT
ZABg+ABhAFaHRlaHLgAAAH8AAQAAAQBhAHcDRwAA90a/oACHRAAADIRhBDQA
VtwADfQAWqAAAAC/91sJhgCsEnoAAIZkOgYCJv9PTUoAAa8AAEiHkIYFX54A
AMaLyhKsEswGr08TmTYRniwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFBAksaqxoUOAFDBcObByJceTGAxQAfAR5QKTJiiVfUmxJYSXL
ljInxpTZEmUGDEAvJOiZc6fJngko/AyagEFPlyQzHu3JIOlSkAwYRHgK9aJU
jVwjZFUKFGsEqVy7VjBaIa1OsWSDnrWY1mXMuhcjxAX5FSxXjG5J7r3wMoFY
pENbau2rcXBhsVmrNo0816Rjk4YjS9ZceeRlkpCzYuTM2OJn0JFHZ+3s+Srh
x6knL5Z5emNm0bJZb6yt8fbm1aVNu5bpW/Xsl7zzxqYcnONw4pBV6979HPbv
6Y2rY44+Gbvwsq+tS85v7hx8Ue7AcybvLXa09+9Bc65t3/R9+fjnN9unuF65
e/L3gSTffBjtx592jxUIYIDhQafggP3l9aB8EcJ0lmELHmjegBixhRyChXU4
YAUVejUiiSCeqF6KfnEFIYsV1YXTihtOdZJa1NU40owqTlQhUT2iqOOOeFEI
Y4xF0nbkSzxatqSNSg7pV4s04sekjEaC1yCRLuZU0FUgQSTmmGSWaWaZFiwF
Zllstunmm21eAMBPa8Jp551BCZRBnXj2GedAewYq6KCEFmqonAMFBAA7
}

#charset=US-ASCII; name=C3.GIF encoding: base64

set C3_data {
R0lGODdhJwA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzulAFs4AOwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAAQ4zsAowAAzgAAowECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKMAAOlAFs4AO4wAACwAAs4eXJcxjeNQJgCpMgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAJwEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAL4AACgC
LgAXt/8AAAD///wAACcAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHECLH///3gAAGgAVgFfSScAAQAAAKgRrwAA8AAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+pgM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABhmABhoN+HBOIBXwFhoEYBd19K6XcT
ZABhmABhoFaHRlaHLgAAAH8AAQAAAQBhoHcDRwAA90aI4ACHRAAADIRhpDQA
VtwADfQAWqAAAAC/91sJhgCr6noAAIZkOgYCJp9PTUoAAa8AAEiHkIYFX54A
AMaLyuqr6swGr08TmT4XWiwAAAAAJwA4AAAI/wABCARggYLBgwgTKlyocOCF
CxYqSJxIsaLFixQpCLyA4UIFBgwSJAAZIQHGkxgBcOwIUiRJkyhjUlzJ0iWD
kjJzSsyAoecFmzh15uTp88BLoTqJdjxwIChSmUovMD3wNGnPjhWmVoV61WNW
qltRRpWoNSzGsWTBmrWI9qvatRPbfoVbUS5TuhTt3sVbQe5cvn734g389unU
qYTNHmZK+IDIx49lCj7g92uEy5gvQ4ZZUXDfrhaZghw9OnNJkRQ9VxZNunVp
zTAP7+y6OQHT2rhruwUbtfbt3MBNqgbd2ahr15hR/53tM7Rx5JkjTxzevLjp
5JAvUsea+rfumJMTh4pdTJn49MJIyYsfbD4t38/V06I3q/c9fO7u37ctC9i8
Z/bV8ddfgPPBNZaAAy71X4JSNcWZfl0Z5xSDQD1IV1QhjXSThWthmOFRAGLV
koYT0teVV/ZJZIFSHT3k4oswxihjjESxeNWNOOaoI44X8GTjjkAG6RMAGfwo
5JE8ClTkkkw26eSTUF4wUEAAOw==
}

#charset=US-ASCII; name=C4.GIF encoding: base64

set C4_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0unaedIANgAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAADgQ4zYAqDgA0gAAqAECAAAAAG8AAAJ0dG8AAIgC5AAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MOQAWAACAKgAOOnaedIANowAACwAAs4eXJcxjeNQDgCrAgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAABYAACgC
LgAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAKgRrwABGAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+rUM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABiOABiQN+HBOIBXwFiQEYBd19K6XcT
ZABiOABiQFaHRlaHLgAAAH8AAQAAAQBiQHcDRwAA90Z9oACHRAAADIRiRDQA
VtwADfQAWqAAAAC/91sJhgCp8noAAIZkOgYCJj9PTUoAAa8AAEiHkIYFX54A
AMaLyvKp8swGr08Tmd4XWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBBJojAgEGCBCUpAOjoMaTLiyNLnmRAgWXL
lzgnxjSZgEIGDEA/5sy5s+fPoEOH7vQJ9GZSnCMPMEX6NOcBqUedVg15FWtT
oVu5HqgwVWvYi1cnlgV7Fu1YslnZtqXYVW3cuW4prsVrMa3dr3zp+oULOHCF
wYSpBka8FnHdqozjOn4LmXJij5Ndnty8+fHfoJktch4ZobTpCIgvXwhdYfNp
kiVjl0zd2HLak6Zl65ZNW7LtA6ODCx9eu+LV4ciRF097mzTs3bp7f2U+drDr
09AZSAddvTtMzq9Nb5LH7D319+CeVT9OnzTydL9dLQ91r5gvfbNz78vNP3iv
4cOU+WdYf3f995iAA76F4GJpLcigav8J5lV9Bk6IH19ROYjXUgUaVpSGZxVl
VGEYwjYTiFWJmFJc+wVWUFYeQSTjjDTWaGONFhwFY1M89ujjjz1eAMBPOwJp
5JFBCZRBkUg2GeRAS0Yp5ZRUVmmlkAMFBAA7
}

#charset=US-ASCII; name=D1.GIF encoding: base64

set D1_data {
R0lGODdhJwA3APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0twdUNIAUwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABgQ41MApxgA0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcAGNwdUNIAU4wAACwAAs4eXJcxjeNQJgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDcAJwEAKBcAAP//2JYAAAAIcARQFwAEAABQJgAAALoAADQC
LAAAACAAAIAAAAAAACcCAQAAN1BQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHECLGD//wAAUGgAAAFfSScAAQAAADgRrwAAAQAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABR+ABSAN+HBOIBXwFSAEYBd19K6XcT
ZABR+ABSAFaHRlaHLgAAAH8AAQAAAQBSAHcDRwAA90aqwACHRAAADIRSBGQA
VtwADcQAWqAAAAC/91sJhgCx2noAAIZkOgYCJv9PTUoAAa8AAEiHkIYFX54A
AMaLytqx2swGr08TmcYRniwAAAAAJwA3AAAI/wABCLRAoaDBgwgTKkw4QeCF
CxYqSJxIsaLFixQLAriA4QLGjyAvUuDYMaTJkBQwqPR4sqXFlCtdypwIs+RM
mTVZ3myZc6fLnj5PAgWZoGgCiUaPolRp82MCCRIiSCgaFarSj0MxPpUaoSjX
qUtjhtw6lexVrEx1Iq1wlm1SoxWPts26lmICrl6jtm1bga5cu3jv6rXLtiLd
iWffwkWM8TBjt1aflq0rMu3YrV3vSi0a1ibnuJgzRxg9GbTEnpLlqo46Ouno
zarZWu1r2Wzr0JKtvi7buupR1Hitsu4KlfTU3anx0o5pm3jv4VKPb+69ebln
xUlZe4WN/TPQ7ka1a9QuC/50bd/UiUPXPd05WOB6hb+WbFzzZt2DUaPPPDy3
dNjUvXceWJxRNZ9RyMWWmnUsfWYXbvaV9qB5YjmF2XYSNmaZVkil5iFlL21o
UWLYEVZZhWslFphyjM0l4mOIrTiYiRm9WNheJRLmIopa+WaWSY7ZVZVovnWm
1kX0lVUVWCAF+eBnSQFpY1Aa8kjliU1dWWWWWoZoZZc0TQkmhVyOSeaRZjKI
JpgEMdXRQ3DGKeecdM5pgUoZuKnnnnz26eYFAGCQp5+EFpqWQIMaqiifgAoU
EAA7
}

#charset=US-ASCII; name=D2.GIF encoding: base64

set D2_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0dxp9NEAPAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAEQ4zwApgEA0QAApgECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKYAAdxp9NEAPIwAACwAAs4eXJcxjeNQDgCw8gCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAO4AACgC
LAAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAADgRrwAAKAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+xQM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABSmABSoN+HBOIBXwFSoEYBd19K6XcT
ZABSmABSoFaHRlaHLgAAAH8AAQAAAQBSoHcDRwAA90bJYACHRAAADIRSpDQA
VtwADfQAWqAAAAC/91sJhgCuEnoAAIZkOgYCJp9PTUoAAa8AAEiHkIYFX54A
AMaLyhKuEswGr08TmaYXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHkShFUjB5MqXLixQyYJj58aXN
iTFntkQpoadPlzlppuwZoWiEnimD7gRJNIHTBEcloFRak6mECAl8SoCKNCTV
kE2JRuUqFeRXpljFFu3J1atMoWizFnW6tq3Zt0svXpWLFepRuxnPZtyrduxR
tzqrYgx71XDXwHgVLybsk6zKyDz3Po06FXNmo5w7J3ap9fHl0TdtCk6d1DPr
1qhfi4Yr+zTt2ndj44asezdM175/9w5OcTXx4sCP40xuVStQ5pNBm859e7Bm
utNHQq/ImG1o6nktMopeu/W79uHc0zYmD/h8dfFp5/otX5b3+/R86f49DF4y
/KzrOYbYfRSN51h97oUnHmXeZWeRcdE9ZZltCuoVoIPCEWihc7Bp6BuEx4FI
nIjBUeVfcAXh5RFELLbo4oswvmjBWyrqZOONOOZ44wUAyFSjjkAGSZNAGfwo
5JE7DlTkkkw26eSTUPI4UEAAOw==
}

#charset=US-ASCII; name=D3.GIF encoding: base64

set D3_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0tzFG9IARAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAkQ40QApwkA0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcACdzFG9IARIwAACwAAs4eXJcxjeNQJgCywgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAABkAACgC
LAAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAADgRrwAAUAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+zEM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABTOABTQN+HBOIBXwFTQEYBd19K6XcT
ZABTOABTQFaHRlaHLgAAAH8AAQAAAQBTQHcDRwAA90bCIACHRAAADIRTRDQA
VtwADfQAWqAAAAC/91sJhgCwenoAAIZkOgYCJj9PTUoAAa8AAEiHkIYFX54A
AMaLynqweswGr08TmfoSviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHkSglqFxpkYLJkyhBqoxAM4JK
jRkw6PwYE+PMBEAT2JRAkULOnT0v/lwpQejNCkZ1wkw6cakEmiqdEo2KlGrV
CAlm1sxqE+rRqVSvhqUJFKtTs1J5elV7FaxQm2+5ok1Kty7WpmX1yk3b969W
uF29VrBK9qlgxRR/Bh1a9OxgxWL/4owLuSLTp5U5d475eDTK0ik/90QdMjPl
05ZT220LGiRrn30bEw1526JVw68z9vYM1nVj3rFlFmd7F/Bu4ckz0mXutqzt
6D6L+x369rpo6YW5B68fiR23dt0ih/tWO7k29O+tt7t/n1jk5+fpy5smD38/
//qLqWYaa8bhpxhqktFmIFWlMebcgqvF9pt485EmoXY1UQjZY9PZVR2EsHHW
YVt4WecVhxiO5dyGEoaH3oHJOXgYi98lOCON9RU4YHn37aeefxMJdhmQExV0
lkcQJankkkw2yaQFRx0p1ZRUVmkllRcAkJOUV3bp5U4CZcDll2RiOZCYaKap
5ppstpnlQAEBADs=
}

#charset=US-ASCII; name=D4.GIF encoding: base64

set D4_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA1d08MtUASQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAA4Q40kAqg4A1QAAqgECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKoADt08MtUASYwAACwAAs4eXJcxjeNQJgCwogCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAGoAAAEC
LMAAAAAAAIQAAAAAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLAH//wAAAGgAAAFfSSgAAQAAADgRrwAAeAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+w8M9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABT2ABT4N+HBOIBXwFT4EYBd19K6XcT
ZABT2ABT4FaHRlaHLgAAAH8AAQAAAQBT4HcDRwAA90aX4ACHRAAADIRT5DQA
VtwADfQAWqAAAAC/91sJhgCuEnoAAIZkOgYCJt9PTUoAAa8AAEiHkIYFX54A
AMaLyhKuEswGr08TmeYXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHixJSqhRZQeVKjSZPUkwZoWaE
lCFp2sRJkUIGDEA/TqSZoGiCmxIyEjWKtOfPoEMlREjg8ijPikSrNq3gE+jJ
rFKRWk06UyrVsCnHcn36darOmmlvYnUbFq4Eq2u9fjQbtihcvDPd1vR7E29X
qHwHHy0sNzBVxX/lHm571qbYxkPpWo6bdPJevmjvbo2q+TJOz6TPciaLFfTq
iahTM72K0uxs1rFJ72SN8e3ovFBbu2TpkjZwmSyTj2QrVLlzp3qfSz/efHry
3NZZYs8ecjv3jN6/X9cML14j8/Ldz6MHr379+PbuzUePb5H8evvo8ZfXL357
cd5KFVcffL4ZV9tmvOW2lF8GysYgbuqB9dqBqonGE2pg2aVWWaW9hmFpGmLW
EoimUTfiY1MtZuFcKBK24octqghYZjFG1tl5oCE444kFvohjjqbxlmGQJrbk
moUAGknXhAra9mCAKT4JG4F1/XZRj/IFV9ZwIv034Hz0QRdUdfEVxJZHEKWp
5ppstsmmBU+d6dWcdNZpJ50XAPCTnHf26WdQAmXA55+E4jmQoIgmquiijDaa
50ABAQA7
}

#charset=US-ASCII; name=D5.GIF encoding: base64

set D5_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA1d3bx9UARQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAoQ40UAqgoA1QAAqgECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKoACt3bx9UARYwAACwAAs4eXJcxjeNQJgCxYgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAANMAAAAC
LSAAAHgAABIAALwCACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAADgRrwAAoAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+xsM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABUeABUgN+HBOIBXwFUgEYBd19K6XcT
ZABUeABUgFaHRlaHLgAAAH8AAQAAAQBUgHcDRwAA90a14ACHRAAADIRUhDQA
VtwADfQAWqAAAAC/91sJhgCuEnoAAIZkOgYCJn9PTUoAAa8AAEiHkIYFX54A
AMaLyhKuEswGr08TmXYRniwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHixJSqhRZQeVKjSZPUkwZoWaE
lCFp2sRJkUIGDEA/TqSZoGiCmxIyEjWKtOfPoEMlREjg8ijPikSrNq3gE+jJ
rFKRWk06UyrVsCnHcn36darOmmlvYnUbFq4Eq2u9fjQbtihcvDPd1vR7E29X
qHwHHy0sNzBVxX/lHm571qbYxkPpWo6bdPJevmjvbo2q+TJOz6TPciaLFfTq
iahTM72K0uxs1rFJ72SN8e3ovFBbu2TpkjZwmSyTj2QrVLlzp3qVF+cdMnfO
ur9BWldq26/x5dGv0/99XZ25+MqmqVvcjrK0XcAZ2c99PHWxaPUazYNMXD8y
fujBKeWeaeWFx11p5MWn336u3fcfgMgxWJ93D0LYnHi7JSdfb8Upt+FzBQYI
oocLRjWcSNOtV6Jv37W2GW+5LUXhgUapBZt+YCVY1ngO3hgdWO/9BmR6x+01
IGfzsXhfkS0J1h9jvPFH2JKoSWkffE3SN6Vh5oH2IpZe7sblj2HqOORrseXY
Y2082hhjdzZeJGOc1imJoV35GWjiS9edaOGIz3l2IaAgFcSWRxAlquiijDbK
qAVPHerVpJRWaimlFwDwk6SXduppUAJlwOmnpGI6kKiopqrqqqy2mulAAQEA
Ow==
}

#charset=US-ASCII; name=D6.GIF encoding: base64

set D6_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0N49A9AASgAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAA8Q40oApQ8A0AAApQECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKUAD949A9AASowAACwAAs4eXJcxjeNQDgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAHYAACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAADgRrwAAyAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABVGABVIN+HBOIBXwFVIEYBd19K6XcT
ZABVGABVIFaHRlaHLgAAAH8AAQAAAQBVIHcDRwAA90aFQACHRAAADIRVJDQA
VtwADfQAWqAAAAC/91sJhgCxEnoAAIZkOgYCJh9PTUoAAa8AAEiHkIYFX54A
AMaLyhKxEswGr08TmZYXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHixJSqhRZQeVKjSZPUkwZoWaE
lCFp2sRJkUIGDEA/TqSZoGiCmxIyEjWKtOfPoEMlREjg8ijPikSrNq3gE+jJ
rFKRWk06UyrVsCnHcn36darOmmlvYnUbFq4Eq2u9fjQbtihcvDPd1vR7E29X
qHwHHy0sNzBVxX/lHm571qbYxkPpWo6bdPJevmjvbo2q+TJOz6TPciaLFfTq
iahTM72K0uxs1rFJ72SN8e3ovFBbu2TpkjZwmSyTj2QrVLlzp3prDxdZnPfx
5i3r/r7om3bupX6Nl/+deht6cLCva9NNjxqsXbXjK5vuzLxl6feY7cvHTz96
YvKR8fYfYaL1h5hgADImIIIEGlYfaJsVONd+pl2XXWnppabTa7GhV6B1F6r2
IWz1yRYeiCbCZ+F4u+WknXclljWdizOSGN1zOOaGo3I6ZlejUsVZpGN3KLJo
l0Yxgqeiekap2KFrIzKpFU/tQThfaxiO2N59FTpGpIP+MbiYhF5CpqCFA44J
WGaPJSjhlhRyNuGXkj1oZYYhbqhliR4uqaFK8H1n24lAkkeojcHpdiRIRCJ5
o4wv0RgposjtmJxn2FkKUkFseQTRp6CGKuqoolrwVKdeparqqqyqegEAP6Eb
2uqstAYlUAay1qqrqwPh6uuvwAYr7LCvDhQQADs=
}

#charset=US-ASCII; name=D7.GIF encoding: base64

set D7_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzd60js0ALgAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABEQ4y4ADhEAzQAADgECAAAAAG8AAAJ6KG8AAIgMZAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MGQAWAACAA4AEd60js0ALowAACwAAs4eXJcxjeNQJgCtAgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAACkAADQC
LQAAACAAAIAAAAAAACgCAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLGD//wAAUGgAAAFfSSgAAQAAADgRrwAA8AAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+tUM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABVuABVwN+HBOIBXwFVwEYBd19K6XcT
ZABVuABVwFaHRlaHLgAAAH8AAQAAAQBVwHcDRwAA90aZwACHRAAADIRVxDQA
VtwADfQAWqAAAAC/91sJhgCw6noAAIZkOgYCJr9PTUoAAa8AAEiHkIYFX54A
AMaLyuqw6swGr08Tmc4SviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsSJFCRgzWtw40aDACxgucNyIMYLJCBhHWqQAAGRIlRclREhAMwFK
CTA7unwJs2SCjBJspoRJIQOGoyJ7zix5U2jOokd5qpT5c6ZQp0SNIs1JlepV
lE+1Sh3ZVWZTsFmjJp1aFqNQnGm3cvVK82bOClDlzj1p927esT2BwvUrdu3d
wxv/GkbMGG9hxIIHh1V7mKnJoZP1srVaF7NKxXt/ZnybGTDJpWbdov38WGnV
zlhZU3btFWXskaBppw66GnfrCpEn+gRKGrhgirkt9/VZc7nZy3BBM+8MV/nQ
6aQVDx/tHKjwtrwxavVHDf32adHlUY5//VXy+drh18M3b7GrVdvqC5dN774+
+bMSaAdeccEZh5pq4j2GnXN8XUdXdq1ZV92DDJ40VG7GeWegaAhOqKFjs031
H4KlLfbefeGVyNVSKNK30m9kjZhiXFIVuF2H332Y3HMM1kQgjxcqSKGDDU7I
GYRq3RiehxptSNxN8u3m4kUyCiVfi72dCFt+SbK4ZX8V2fdllPzpxp+ABy4Z
WJpvSTckmPW9CaJcEkIGZHSFJVWgnRoWJFZIEAUq6KCEFkqoBVr9GdWijDbq
KKMXAGCUoo9WailSAmVA6aWcQjqQpqCGKuqopJYa6UABAQA7
}

#charset=US-ASCII; name=D8.GIF encoding: base64

set D8_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0t8op9IASAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAA0Q40gApw0A0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcADd8op9IASIwAACwAAs4eXJcxjeNQDgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAHkAACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAADgRrwABGAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABWWABWYN+HBOIBXwFWYEYBd19K6XcT
ZABWWABWYFaHRlaHLgAAAH8AAQAAAQBWYHcDRwAA90arYACHRAAADIRWZDQA
VtwADfQAWqAAAAC/91sJhgCwwnoAAIZkOgYCJl9PTUoAAa8AAEiHkIYFX54A
AMaLysKwwswGr08TmQYRniwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVKggoaLFiRgzapxo8WIFgwIvYLjAUUKEkxEqblxJ0SRKlR8BiBzZMkKC
mwlSSmCZsaJNnDo/zhzpM0HHnDBZFj2qk0IGDFAvmDTqsiJSnhRt+tSJ1ClU
olp/przKc+pUpF2fRjUrVgJZpWFvjk3pda3Wqm5TYjWLN+1XqXytBi0bOG/F
ujSLAk1K+KdclYhJ1ny5E2NHxltPwoxs+XJPl5orl+yIkTPWmjiRiuZpujFV
wYxXtoZLNfRblrNXsn18W7ZamnvjotWLNfdGvraJs/4t2TXT2BtbXxat+DF1
zxNNZx48OXRnlIM5V/9X3Zl0ScfkIy+1SN45+6bMkXNVrvtucgnqhc9dfVy/
4fxGtdWbRrsNh1989s3HH4EJwqZeYe0pBSF8f6G22HXmWWjdR8ydR9l3H3ro
HYcVjuaRhhFOV1qHe00InUbGMVibgqfF2JN/A8LIYlk40udbiTzOCFuNO0p4
F2wL6gikaxeeRmJU5Z3YHXctZagdaFSqCOKI4p214WnjBfXgkYYl+d1rZQK4
1ZBBrvkfggHy5qOMZ+2npoBz3hingWr2ladlDb7513pItkimal2iR6WRqYnJ
4nYv6oblZsxJpqWTJsJU0G8jQeTpp6CGKmqoFqjF6VeopqrqqqleAMBTp7Ia
KuusUQmUQay05trqQLf26uuvwAYrrKsDBQQAOw==
}

#charset=US-ASCII; name=D9.GIF encoding: base64

set D9_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAz9+ZW88APgAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAMQ4z4ApAMAzwAApAECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKQAA9+ZW88APowAACwAAs4eXJcxjeNQJgCtAgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAFsAACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAADgRrwABQAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+tUM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABW+ABXAN+HBOIBXwFXAEYBd19K6XcT
ZABW+ABXAFaHRlaHLgAAAH8AAQAAAQBXAHcDRwAA90bBAACHRAAADIRXBDQA
VtwADfQAWqAAAAC/91sJhgCwmnoAAIZkOgYCJv9PTUoAAa8AAEiHkIYFX54A
AMaLypqwmswGr08TmaYXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsWJFCRglWNxI0aDACxgucOQoIYLJCBpHWqQAAGRIlRcjJJiZACXM
ji5f3iyZIKOEmilhUsiAoahImDwxmsQI9ObQojpVJpUJtKlQokZ3yuRZ1eZV
qEelbi2J8qdXlU+zUvQZs2dGqxPZdsQalezStjTPVrB7Nq1OrjP18g26l2rg
lH5FJn0rOGNbn00TL15qlvDGyWWBSt5KFSVckpwPa6Z7YapovZdDd5Ww2S3l
z6ldZ0aZuLBbpo0xPmassbbtvIQH4z080Xfhk8ENfxZenPRFx2vH4g4OvTlY
rbKnO3WOVLVn1BuNj/80vXr79bXVMWuPW72Ccea2IZ+F7xswXPvzlXutvXj9
8btxSVeZe6SpNyB7ugWYXWWtcfWdZRaR92CDnR04nncMFjjWa+DtxiFrzvVn
4V7tiRgZd/glh9xwVr13kmD6qQgggechmNxtI8plnVpiLQhbeNz16OCIHIkH
Wk8V/rhSkCQmGB9Z/ulII4/wmZjfijv+FWN0NN235ZQvWRlUlQKeCJaB96W3
4WwgnomhklwOOZqbSJ4G4WNJ0qahjx3GCWWG14l505Pa1ffloClmGRZ8g/7X
F2mLttdok0EVRFdIEGWq6aacdsqpBVhdCtWopJZqKqkXAECUqKe26qpRAmUU
wOqrtKI6kKy45qrrrrz2mupAAQEAOw==
}

#charset=US-ASCII; name=DR1.GIF encoding: base64

set DR1_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0uXAStIARQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAoQ40UApwoA0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcACuXAStIARYwAACwAAs4eXJcxjeNQDgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAJEAACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAOARrwAAAAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABJOABJQN+HBOIBXwFJQEYBd19K6XcT
ZABJOABJQFaHRlaHLgAAAH8AAQAAAQBJQHcDRwAA90bAAACHRAAADIRJRDQA
VtwADfQAWqAAAAC/91sJhgCr8noAAIZkOgYCJj9PTUoAAa8AAEiHkIYFX54A
AMaLyvKr8swGr08TmVIXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFighCIshIkiQFAB09gizJMiOFlCopjmxJkyKF
DBhyfpQZsiZLAwZu5ow5cabPi0CTVhCqc+VRi0AdGLCJs6nMpxWTTqU69GOE
rxGwToy6lWvTsGIparXI1CPatGOVaqzqMUEFu2K3GpBadindC2Hf+tRbQWvZ
thfw5i08de1ExHaBZpWstnLcuHwf//3KOK7csYXVUmasFDJnrRHkNpaslzLZ
qYjDJohs2LVjx6Rh/00QwS5twxQzi54sGTHo2kqT8m0sFSpfyJ5zC1f92XPQ
vxiRT2xu3TlQ49mXt/vG3Nc6eKS3bY8W/R17RrK5c5cv/Nw9+uSZX/c1fB7q
2s/KIZdUf+xpZ52AunWVnX7rMcaXVOL5paB/WglXoICaTeiZeNXJx6FZRAlo
4YYGZmiVh7VdmOJcEwZoGIcBRsiWe3tViCCCGIF3o40vAsdiU8DxuByMNa5n
HIA7MuijhEByd6CSN4L4UYdQrsejlKTd1yGFox255VG4IZYcXNGZ6FFjoJGZ
3JGhkdkdm23CVRuBaraZ4IluWnYnUXnqidhOfVpUEF0eQWTooYgmqmiiFlRF
6FCQRirppJFeAABOj1Kq6aY6CZRBppyGWulAn5Zq6qmopqqqpQMFBAA7
}

#charset=US-ASCII; name=DR2.GIF encoding: base64

set DR2_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzuYLVM4ARAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAkQ40QAowkAzgAAowECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKMACeYLVM4ARIwAACwAAs4eXJcxjeNQJgCtAgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAO4AADQC
LQAAACAAAIAAAAAAACgCAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLGD//x8AUGgXnwFfSSgAAQAAAOARrwAAKAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+tUM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABJ6ABJ8N+HBOIBXwFJ8EYBd19K6XcT
ZABJ6ABJ8FaHRlaHLgAAAH8AAQAAAQBJ8HcDRwAA90aSoACHRAAADIRJ9DQA
VtwADfQAWqAAAAC/91sJhgCr8noAAIZkOgYCJu9PTUoAAa8AAEiHkIYFX54A
AMaLyvKr8swGr08TmXYSviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsUKCihgzapxoUOAFDBc2XtxIsgKCkxQpAPgIEuPFBC9HlqSIgCZH
li0rwtwp06XGmhgpZMBANCTFkTw17swItKJQojmPxrToMmnFpimHFhWJVCrP
nk2BPt2qtOdEnidhXkUZocLYqFV7fk27tGKEtm+NZqx79uvSnm0rRMjLVW1f
vxjvTrxLmGpcr2rV3p0sODBhs4dj1jW8mDJHrS2n6vTLmXPlyYNBh3xZFvHM
rFCNYs789fXn2FbjkrZ9ufZo0nw15tWcG7jrjI2BQzY++/Jy2sxNu1W9N3r0
oNSrW5fp+zZZ3cox585urN144ZHky+9ujT77+e7n06uH/1utfIuGzYvsK58v
c6VnWZRecNfNRF5w0NGHXHYIJpjbRslJ95yCTlH3YH1INVhhbPhJ2KF/GnoX
mobHdUhSbw+uJ9WJDG4nnofTcfhhgRiadaB15QW44XczlgidcO4tFyJVF96X
2UysASmjbUxit2STUBoJpYFBTslblVZSGZteWZZUEGggQSTmmGSWaWaZFmgF
JlRstunmm21eAMBQa8Jp551FCZRBnXj2GedAewYq6KCEFmqonAMFBAA7
}

#charset=US-ASCII; name=DR3.GIF encoding: base64

set DR3_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0eZsy9EAPQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAIQ4z0ApgIA0QAApgECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKYAAuZsy9EAPYwAACwAAs4eXJcxjeNQDgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAEgAACIC
LSIAAAAAADb0RjQW6ij0AQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAOARrwAAUAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABLuABLwN+HBOIBXwFLwEYBd19K6XcT
ZABLuABLwFaHRlaHLgAAAH8AAQAAAQBLwHcDRwAA90bEYACHRAAADIRLxDQA
VtwADfQAWqAAAAC/91sJhgCr8noAAIZkOgYCJr9PTUoAAa8AAEiHkIYFX54A
AMaLyvKr8swGr08TmUIRniwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCAzIhiJwCIFAB09hlxZseRElxMppFRZoUDN
iTZZtqQIswKFDBiCfsRZM6dOniRNAhVK0abRoy8z/gyq0mmBnE9Z9tS4lObV
olm1Su06FGdYsyC3UpzK1GzYq3DPVozAlWpZuBbjFojwNWMEumvJun0Kd4He
vnMBB7YLlvDhwxP/Kq7L9Krhpo+NAv5LUTJgtlXxNsYbN7JnzkrtlnZr2DHi
06mFroYMVfJi2aUti75JVCfoC7of93YK9fdovU2L9l5p/HBrx8p9C86MGCxU
n4KPz0Zecfdtr8GpZ+IV/v2uc+5GqZfHrP5ide7GWXM/ijy+dsJoM+rGznjw
6uRY6QeXfZl1N597A2Z3X37/IXgVgQW01lpebgn4oILiLdcgZoZB2J6BZ8Vl
333oeeffiOI9dlleeHlYWIpv7ecijBa2mB2MJoIoWnzh6fVciMGtN5p/Bx5H
GXjvnZfikeaNh+OGKAKJ40VRgkQjldNtyGKBGLnIkpaxhUbbdV1Ol1x0ZIYJ
0XBpZlRQVx5BJOecdNZpZ50WLAUnVXz26eeffV4AAFB7AmrooUIJlEGhiDYa
6ECLRirppJRWaqmgAwUEADs=
}

#charset=US-ASCII; name=F1.GIF encoding: base64

set F1_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0OcjJtAAQAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAUQ40AApQUA0AAApQECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKUABecjJtAAQIwAACwAAs4eXJcxjeNQJgCtAgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAALkAAJwC
LeAAAkeGUAAW3wAAASgCAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLDD//5QAaWgAVgFfSSgAAQAAAOARrwAAeAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+tUM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABN0ABN2N+HBOIBXwFN2EYBd19K6XcT
ZABN0ABN2FaHRlaHLgAAAH8AAQAAAQBN2HcDRwAA90Z74ACHRAAADIRN3DQA
VtwADfQAWqAAAAC/91sJhgCq4noAAIZkOgYCJtdPTUoAAa8AAEiHkIYFX54A
AMaLyuKq4swGr08TmW4XWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFByAfZLQocuRFCgA6eixZgeVIlyYnUlC5kmJJ
kBNx3gxpE2dOnBQyYBj6kWdFkUhbKs25VCnLB0GH1mTaUqfTpkmZPo1K9OnS
pGBtYsXKdepXq2CNVn0KVGhXtRUNVJA7t25MimUv3DWAwIDcvxTpZswbUy6C
iYIBmyQ8ku5hxIHvMsao+LHdy4PdeswoeOJjxZ07y9R8IbFdvhQP0xV9GrEB
woArp0asGnJouoxFG577uULfuMDrwrboePfsyK7j5lVM3HNF1X7tWhZOGnng
3737hvaNfPJ045ZRQ/8+rrH67NWPEdT+/Nu5xcm+a3P37Liu/OmjpeqFnJ28
5ent4WWeYP/5Rx53nQ2XWnq0Neiee4ItdxGDu4HXWXj5EXXRbu0ViOCBGW4W
3GEezpcdfhXAd+GCxwG4HXzPecgXg+eNB+Ns6n243nPJhbjfhJ7l6B5+vSF2
44MAPvggYEcm2eJ1keFmHpQLpkejcav5aNt8ztHI5ZdMTllfkF0eiKKWl5VI
In8gCqhfXcbFF6N0QbKW4pRIxiXkkOOV9yaPcrL5XJzMwUgihoFy2VuCeHKH
aHxeynfZZOItWiaCAcKJJoeScmqipu+RFp2j1pkoI0bwrZmRlUue1GhMrM5B
x5yPP96F4pkTFaSZRxD16uuvwAYLrAVu7SrVscgmqyyyFwAglLHLRistUQJl
AO202DI7kLXcduvtt+CG2+xAAQEAOw==
}

#charset=US-ASCII; name=F2.GIF encoding: base64

set F2_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA1OdvKtQANwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAADkQ4zcAqjkA1AAAqgECAAAAAG8AAAJ0dG8AAIgC5AAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MOQAWAACAKoAOedvKtQAN4wAACwAAs4eXJcxjeNQDgCq4gCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAABcAACgC
LgAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAOARrwAAoAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+rMM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABOcABOeN+HBOIBXwFOeEYBd19K6XcT
ZABOcABOeFaHRlaHLgAAAH8AAQAAAQBOeHcDRwAA90a64ACHRAAADIROfDQA
VtwADfQAWqAAAAC/91sJhgCssnoAAIZkOgYCJndPTUoAAa8AAEiHkIYFX54A
AMaLyrKssswGr08Tmd4SviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcMFiwoUZJwokmJJkhcpAOjosWJJkSdDosx4kiIF
li1NopT5skLInj5lWqSQAYPRjzp9Kl06E+bSmhOJGs3Z9OnOq0A1Fj3q8ipJ
oE6DQq0glavLsSPTRt1KVe1EAm6HskUal4DduDbn4rXLFy9ZvXUJKLiLt2zb
tIJDwi0MOK6CCGhHGqar1m4EwnEn1/UJucJit5orB5Ug83Pa0G5Dko6MEXVa
mRKCMp5KeWTJ2EzVuh5s2iJuv7sxX/w92+zX3hWJZ25MMsJI5aCZc0Y+Ebpu
6UIxWj/N/Of27W977+2+rR0xVNQ/q5e3nVJ68uEjCTiXSzut8u0EVtM3vp6i
dQmxZbdWffa951tXWhFYoHr+gTcgfxn9JuFyCi6Im4MJQvhcBbFhmOFh9nUI
nHsXOeCAASaaWEGK11WIkYkopiijipKROFGKMc6YowM1ukiRjDviOGNGqBlw
I5BBwhhka8wZ4CSOTw7p5I4VGPlhbRNNaeWMPFappZPt+ZjRkBRpyaSYL7I4
IpppdlkciGm5+SZEftVZQUFseQTRnnz26eefflqwVZ5TFWrooYgaegEARRGa
6KOQHiVQBo5GaqmiA1Gq6aacdurpp4sOFBAAOw==
}

#charset=US-ASCII; name=F3.GIF encoding: base64

set F3_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzefDgM0AUAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABUQ41AAohUAzQAAogECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKIAFefDgM0AUIwAACwAAs4eXJcxjeNQJgCp0gCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAM4AADcC
Lr2GMv8W32wpNzcAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLBn//xgXr2gADAFfSSgAAQAAAOARrwAAyAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+qIM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABPEABPGN+HBOIBXwFPGEYBd19K6XcT
ZABPEABPGFaHRlaHLgAAAH8AAQAAAQBPGHcDRwAA90azoACHRAAADIRPHDQA
VtwADfQAWqAAAAC/91sJhgCsinoAAIZkOgYCJhdPTUoAAa8AAEiHkIYFX54A
AMaLyoqsiswGr08TmUIRniwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjCBDYqQAoKNHkSgrQlBgkYLJkylFQpjJUmMG
DDg/xgQ5c+VFCjdz7rT4YGJPBTVt4oQ5tELRiQZWJlUqtKlTigYMTKXKdOjT
pyCBLtXZtCjYsEG7VlTQ06IDp2fRjs3Itu1EB2/BQqgwc2RashfZRjVQAW9e
oytp/vwLEqmCrIXfXuWb2GdLxo0fNyg88SzSylPFVkW5eWLpoxF6Wq4gWi3I
0k/rQohAuy5XwCI3g3U8W/FtkIYrgj3t0/fE1rgpBhdumqLivr8xLqdYtPRE
pHJHV5zeuUJpvCiRS/8HT125YcnZXUdGD+HsefR+50rva/zu+fTJnYMeD/+y
fIw0VbbXRf1FdxFNCqR21FDiBdYTbalhxyBmgX2m4IAT/meeZAGuFlODG761
oIQ7gbgeekiR15SJ3BWlYobaRVYedyVSqFx3J1plInP2vfihjTzmuCKQOG6o
I5FxmTekhkVatRiTSTpJkYlnZUWYlKzZWCVUFVy55GhxXUmYl2J2idWTYFpk
JZdsjukmmuqxKWeZY5rpX4wVeWmnnXXKOSWRZ2IFWZdl+nncX/lhWVFBaXkE
0aOQRirppJJaEFSjS2Wq6aacanoBADdh2umopOYkUAailqqqpwOh6uqrsMYH
Kuusnw4UEAA7
}

#charset=US-ASCII; name=F4.GIF encoding: base64

set F4_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzugbDM4AOwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAAQ4zsAowAAzgAAowECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKMAAOgbDM4AO4wAACwAAs4eXJcxjeNQDgCrogCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAALMAACIC
LiIAAAAAADb0RigW6ij0AQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAOARrwAA8AAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+r8M9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABRUABRWN+HBOIBXwFRWEYBd19K6XcT
ZABRUABRWFaHRlaHLgAAAH8AAQAAAQBRWHcDRwAA90bE4ACHRAAADIRRXDQA
VtwADfQAWqAAAAC/91sJhgCqknoAAIZkOgYCJldPTUoAAa8AAEiHkIYFX54A
AMaLypKqkswGr08TmRIXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFiQYshsxIEiMFAB09ghxZwUDIkS8psixZgUJK
lS1zxoTZ8uXMkhQyYBj6MafRmDqT0pwYdCjOn0iRGl3alChIkSuvaq2QAKhQ
q1O3lkyQIEKEjFVxLr1olmwEsl0tpi26liLct3Djyv2qti7XvG7PXpzrlyJe
CBDwCt7rlG7dvBEQ5x3M1/HasnjvkqXcOGPiuxUVgzZZGeNnwBXdqtarsfRF
yJMnrm5LurPF1YEXx2VdG2xqzZsrSqhL+HbmsryHry3+Grly4cRd03w+kTpF
B5x9l5RA3fpE7Iy1b/+nyP2iA/Ctba9V7v08eorMl7K36P5nTenyK5Sv4L5+
9r7T6fddfw649J9l00lA4HkGHmgeSRK4ZEB9DTpI33vQSaihfUzhNyCG1clU
IVoefniRdzTFd92E50FXmIoDsogeityhCGOM7oUoXI37pSfedQy2KCB53ElY
o48AVsQgi0PqF6EBPEL53I1AFogdexHyWCOU8JV4IYvDFdljdVl2qB5JQYYp
JUZH3nemfDyO5+aPcvpFZUYoevVmgC96WViKfv5J0p2C9pZkoYNWhiCiFxXE
l0cQRSrppJRWSqkFXz3q1KacduoppxcAIJSmn5ZqKlECZUDqqayCOpCqsMYK
KuustNYa6kABAQA7
}

#charset=US-ASCII; name=T1.GIF encoding: base64

set T1_data {
R0lGODdhKQA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAACH5BAAAAAAALAAAAAApADgAAAj/AAEIBGCBgsGD
CBMqXKhwwkAAFy5YqECxosWLGDNaNDjwAoYLFQloHEmyIgWBHj9SJCCypEuM
J1OqFNnyJUkJOClSuJABg0+QK22OxElUQgUKGXr+DCkUY9GiR5P6VBm0KcWn
OU1KXVrVJtasG7dSrVAz41eiJJEqpcqy7FmoLtVOBdmW5dW3TeVytSpU71i+
L/0CBRxY7GDCJQUjLrz28GKNih+nNSx5cuPKIyNjhkl5cd2yOjtb/VyX82Wb
pEtDFh0ytWvQpudqdE02L2uXbfveJvnZpuaSuXPH3Z1Rtd3hp4EfJ7s8M/GL
wlsjl827+UrrsfcWx3498XPmsFuHe9eaHPp48ZapW4w+kn32v6O5k1fP1/3F
3/HPRy2fP732+N7xJ5R99303W3cB0vdSbwn+t6B8BQq42X4KTkihgxMK5thm
BYn1UUQghijiiCSOaMFWa02l4oostsjiBQBIlaKLNNY4l0BJzWjjji8OlOOP
QAYp5JA5wuhjQAA7
}

#charset=US-ASCII; name=T2.GIF encoding: base64

set T2_data {
R0lGODdhKQA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAACH5BAAAAAAALAAAAAApADgAAAj/AAEIBGCBgsGD
CBMqXKhwwkAAFy5YqECxosWLGDNaNDjwAoYLFAmIJKCxpMkKFAR6/FiBZEWX
J2NSTLmS5UWYJyHo1KmRwoUMGIKCvJlzp9GeGYAKJVrSqFMISJXaDGnyKU+T
FJIGnYoTo1OZM7UubVkU7EaxLLua9bozrFSQI0eupWjV7dahcy1avZr1bd6K
ey/2vZs3cMbBY2XuhVoS8VSNi8E6xsv269zJTdv+RYmW8masnT/LxCz6JGnR
cbuenps6ruDQZlu7Pgz7puzbas/61XibrOTaYOWOBh4z9fDdMuUKB4385GyR
MVebXL48KuHi0C1mb0w8Y/WQ22k3ivceXnvuitJtn29ZXvd18s7bo+/Ofv1L
+XYT//3uXn9e/vONxxp+nAm4FoD5PfaffenFRmCB78UGnmn0xYdggBE6aF+C
npWGUYMeYuhfiP191CGJBaFlYkQstujiizC6aIFYUm1l44045ojjBQBoVaOO
QAZ5l0BJ/SjkkTsOVOSSTDbp5JNF8qhkQAA7
}

#charset=US-ASCII; name=T3.GIF encoding: base64

set T3_data {
R0lGODdhKAA3APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAcIeAKGiAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0NTpRdAATwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABQQ408ApRQA0AAApQECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKUAFNTpRdAAT4wAACwAAs4eXAGpjVweLNyF3ACqPABxMMo+b69J
fhIAAQwAAFwAWFCGGgAKNPwAAAAAVpgEEAAAAgAAAAAAAP8AAAD//78AASiG
OgAXt/8AAAD///wAAAAAVpgEEC0AAkeGaAAW31b5/BAAAMwMzAAEEPwAADQA
VgIAAADA8YwABtkW33+/93gAAGgAVgFfSQAAAAAAAAAAAAEAAAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hgAAAAAAAAAAAAAAAAAAAAAA
AEwAADQAAAAAABAAAAAAWAQAAAMAAABJ8ABJ+N+HBOIBXwFJ+EYBd19K6XcT
ZABJ8ABJ+FaHRlaHLgAAAH8AAQAAAQBJ+HcDRwAA90a5YACHRAAADIRJ/GQA
VtwADcQAWqAAAAC/91sJhgCzYnoAAIZkOgYCJvdPTUoAAa8AAEiHkIYFX54A
AO6LymKzYswGr08TmcYZ5iwAAAAAKAA3AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcMFigRCEshoEYFJBCQrUADQ0ePEkSBTnjyZkkJL
lxdhlpxJs2YGDEA/5rzIM6VFCj+DVhRptKnGpDgt6pRp0ifQqEuNFiWJ9KpQ
qRl5VrWqdGoFsxW2Ou2q9KxItE4zssUat65KqF/tYpz51KvenWLHzs0bN7Dh
u36bGlY7sergsItRxn1ccfHfiZQvr8WreTLnzk0za36LVnRd0m8vmk6JOrXc
z0tby4bbt23O1mftrmYdsu7ujKQ9J27KlGlo2Lx7u908PDlI5WTpYjT+/Hjz
6dCf06b4+2X22Ea7U3S/vR2xbanl3ZZfPR7496PI9baHf93u/NrST7/HT9j+
fu7x+RdegHHdx5983ll3nlPBDVgfcf/RtyBoGHVHIWYEXgigV/1pWEFBUHkE
0YgklmjiiSZakFSIV7Xo4oswungBAD+xGOONOAYlUAY25uijjAMFBAA7
}

#charset=US-ASCII; name=T4.GIF encoding: base64

set T4_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA1NY7Q9QASAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAA0Q40gAqQ0A1AAAqQECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKkADdY7Q9QASIwAACwAAs4eXJcxjeNLtgCzYgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKL8AAP//2JYAAAAImARLvwAEAABLtgAAAKIAAAAC
LCAAAHgAABIAALwCACgAAQAAOFBLxxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAAARrwAAeAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+zsN8ufAAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABN2ABN4N+HBOIBXwFN4EYBd19K6XcT
ZABN2ABN4FaHRlaHLgAAAH8AAQAAAQBN4HcDRwAA90a7IACHRAAADIRN5DQA
VtwADfQAWqAAAAC/91sJhgCwMnoAAIZkOgYCJt9PTUoAAa8AAEiHkIYFX54A
AO6LyjKwMswGr08TmR4SsiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFigQIZBxJsgIFAB09UhQpsuREBTBjyoQ5kUJK
lRNZlpzJc6bJDBiCfqzQsuXFnhRpVqRJAajQnFAt8jyqQGrVpkFVGjVaASlV
qz+zfgxJdsCArjFfVv269KpTnCvVrpULtq1bsRZFKq2bdK7amm+Hxt3bli/a
tVifsjWcli5gvIv57m38WHHkvpgPW0wM13Dfql41Bs5IWW7ozaNJ9/RZkrNg
jKtdioYsuzZq2rZzu87NO6zl3jnJcq3c2bbw4xd31z6OPKNykMyjk22d+qJ0
orqry55e+7nL5i69k6uczp067pHCg8sWn7F8+ZHsrYfMOxxjfOj139vXLr++
epL3ETVfewM6x99K/uEH4IH6YdTgbL/x9iBFAX5X4H7n5TYhca9JeGFyBxqX
IIUhbvchiBmWVNSIJKY4XnrmRWgiiy3KCBx8Jd6Ioo067uhRhz1aVNBbP0Jk
5JFIJqkkkhY4RWRWUEYp5ZRRXgAAUE9SqeWWQgmUQZZchlnlQF+WaeaZaKap
ppUDBQQAOw==
}

#charset=US-ASCII; name=T5.GIF encoding: base64

set T5_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0tbCd9IATQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABIQ400ApxIA0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcAEtbCd9IATYwAACwAAs4eXJcxjeNLzgCyUgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKL8AAP//2JYAAAAImARLvwAEAABLzgAAAHsAACIC
LCIAAAAAADbzNowW6ijzAQAAOFBLxxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAAARrwAAoAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+yoN8ufAAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABOeABOgN+HBOIBXwFOgEYBd19K6XcT
ZABOeABOgFaHRlaHLgAAAH8AAQAAAQBOgHcDRwAA90bDAACHRAAADIROhDQA
VtwADfQAWqAAAAC/91sJhgCwMnoAAIZkOgYCJn9PTUoAAa8AAEiHkIYFX54A
AO6LyjKwMswGr08Tmb4RxiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFCgRChsyY0YFJBxkpAOjoESTJCigtnjT5kgLL
lgRI0qw4MyZJChkwCP0IcqRMnzx3/gw61GLOpBiVLhXa0ilUijSlpmRateLT
iUp3asUIlCpRr0lnYo05dmLZpl+/glW7lu7Ft1VFpg3bMytSt1zPHj1Zl/Da
u4EvqjV8uLFFvIKjapXaFvJLmJT/Vk78kjHmvT0rWO6ceW5ojZx1ZrZLNnVJ
vm0Rm70s1vPl0bRtXxbtejdGkUZRz/btFDhw2U2JGzc+NbnX5dD11uxNMbpL
4ryHKw++G/du5r69v6bUK/029d/SuTfvOj54+fWR0cst2v388/lF8T+2P/H9
c/PaXeTffdMF+F97+lEkXn7fqbefgdgxCF+ExSUIGITYDSiccxRKuBWG2wHI
YYQabsieb085iNyJDZZoYnwthsdfh62BSGONI94IH4w6VlQQVx5BJOSQRBZp
ZJEWMAUkVUw26eSTTV4AQFBLQmnllUMJlEGVWHYZ5UBbhinmmGSWaaaUAwUE
ADs=
}

#charset=US-ASCII; name=T6.GIF encoding: base64

set T6_data {
R0lGODdhKAA3APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0tcjR9IARQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAoQ40UApwoA0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcACtcjR9IARYwAACwAAs4eXJcxjeNLtgCzYgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDcAKAEAKL8AAP//2JYAAAAIcARLvwAEAABLtgAAAGUAADQC
LAAAACAAAIAAAAAAACgCAQAAN1BLxxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLGD//+UAUGgBAgFfSSgAAQAAAAARrwAAyAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+zsNd2OAAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABPGABPIN+HBOIBXwFPIEYBd19K6XcT
ZABPGABPIFaHRlaHLgAAAH8AAQAAAQBPIHcDRwAA90bBgACHRAAADIRPJGQA
VtwADcQAWqAAAAC/91sJhgCwMnoAAIZkOgYCJh9PTUoAAa8AAEiHkIYFX54A
AO6LyjKwMswGr08TmVoZ5iwAAAAAKAA3AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaJFBgwsaqxoUOAFDBcoEhi5kSLGjCU1UgDwEeREAiJTVjiJUmYF
Ci1dwrRp8iTPmxkwCA2586fPnxSCDq0Ac2TRlBgr0oxKMalQnUWfbpzKlSrQ
q0Qt7uxKtutEq0u1Fi07NSVal0xj/kSqFC5TkjKjenVbN+TcmVT3bnzr1+jR
mTYJ/z0MWKbiuYwZW3zMU3LjkpTzCp5o+WxfwyVpDv5sc3NP05lDV67JkfTf
11+XwhbrVGtsu69r61bpmqfu3Zh7v/xN3Gli4SKJx/2b2qbxuc1TAucZfaPx
58fB/qw9nK5233jv2o7m/V0m9u7ZZUsPn3x86/LW2VeUT169xvO03XuGP1//
cP/N4RcfgMj9JeB79sF2YFUFzrXgfgnmRh+CuCno322FWXhhddKh51iD6z3I
IH/bTVhfhbOlh2KKfJHIYnBgZfjiRgXVBRJEOOao44487miBUjZeJeSQRBY5
5AUABBWkkUw2OZRAGSzp5JRHDhQQADs=
}

#charset=US-ASCII; name=T7.GIF encoding: base64

set T7_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA1dqXz9UARgAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAsQ40YAqgsA1QAAqgECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKoAC9qXz9UARowAACwAAs4eXJcxjeNQJgCyUgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAAHQAACgC
LAAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAAARrwAA8AAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+yoM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABJQABJSN+HBOIBXwFJSEYBd19K6XcT
ZABJQABJSFaHRlaHLgAAAH8AAQAAAQBJSHcDRwAA90aggACHRAAADIRJTDQA
VtwADfQAWqAAAAC/91sJhgCxQnoAAIZkOgYCJkdPTUoAAa8AAEiHkIYFX54A
AMaLykKxQswGr08TmR4SviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFiQRChrRowEDGkxQpAOjosQKBii9JlkSZkQLL
ljAzljRJ0yKFDBiCfsypk6dMoxqBCiVa9OLOmkpxgkQ5k+JOpD6jDnVJ8+pV
mj+DSo1Z1GvPCmGXci379OzEtDjJVvxaoapbuFudtp1otyfesnrdotUq2CrW
k38L16WLmLDixV4PDxabV3FkjIkf33Ws+WzmzmA5g0b5WbPIkVkpmz59+mJp
lKxZN1ZtMbbt1qRFw7S9djNttyIFvz4p27Nu4iOD+z2OETfq0L9hP1eeO3pG
6iDlQrV+EXt27a6ZU4f0Ph58arXNn3dXH557dprkk3KPX5v9eamP6b8Vf1b/
ZPT52ScfgIr5Nxxw5g2IX2H+/bdgTzEJeF9lEOJWHYH9STjhaMu5x6GCFH4I
YogiFhSVRxClqOKKLLbIogVKnSjWjDTWaCONFwAAlIw39uijUAJlwOOPROI4
kJBIJqnkkkw2meNAAQEAOw==
}

#charset=US-ASCII; name=T8.GIF encoding: base64

set T8_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA1dsYrNUAMwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABYQ4zMAFhYA1QAAFgECAAAAAG8AAAJ6KG8AAIgMZAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MGQAWAACABYAFtsYrNUAM4wAACwAAs4eXJcxjeNQJgCyUgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQJgAAANQAADQC
LAAAACAAAIAAAAAAACgCAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLGD//4QAUGgAAAFfSSgAAQAAAAARrwABGAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+yoM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABLwABLyN+HBOIBXwFLyEYBd19K6XcT
ZABLwABLyFaHRlaHLgAAAH8AAQAAAQBLyHcDRwAA90aGgACHRAAADIRLzDQA
VtwADfQAWqAAAAC/91sJhgCwMnoAAIZkOgYCJsdPTUoAAa8AAEiHkIYFX54A
AMaLyjKwMswGr08TmXYXWiwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcMFigRCZhxJsgIFAB09TiQAMmOClyUtUkipsgLL
lSRfJog5kUIGDEA/rhRZUufOkj6B1rxpM6ZRpD+DNq3INCfMkUmlVp168epE
nVijqty69atXs0cvZl3asitYi29lihVqk6jbtHDxUlxL16reinH3znV6FmNh
k4P9EtbLVzHPpz0TGz7s92jjyX95apSsuXNkpX09a74sujPp0jxPow7JWi3n
zqxj2xUMGrbs2GFrW7zNGzdJ1SB5c039umTr0cVHykauO2br41Cbk/Q9O7dU
53ahW685vXp1jMB3f4zXDj558LJDo1/HSJ7q983S3Rt/T3v9eezo63Mv3R6+
fdH96ReaZwF+9h+B9Bm4H4D5CYhaXQ0qOKBx6am3IH4JOshghBo+GFN4HroW
X4jlgTYhiRMVJJZHELXo4oswxgijBVGtqNSNOOaoI44XAPCTjTsGKWRQAmUA
5JBI8jiQkUw26eSTUEbZ40ABAQA7
}

#charset=US-ASCII; name=T9.GIF encoding: base64

set T9_data {
R0lGODlhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAz9t0T88APAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAEQ4zwApAEAzwAApAECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKQAAdt0T88APIwAACwAAs4eXJcxjeNQDgCwMgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDkAKAEAKBcAAP//2JYAAAAIwARQFwAEAABQDgAAABYAACIC
LCIAAAAAADb1VpQW6ij1AQAAOVBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAAARrwABQAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+wgM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABRWABRYN+HBOIBXwFRYEYBd19K6XcT
ZABRWABRYFaHRlaHLgAAAH8AAQAAAQBRYHcDRwAA90YvYACHRAAADIRRZBQA
VtwADRQAWqAAAAC/91sJhgCyAnoAAIZkOgYCJl9PTUoAAa8AAEiHkIYFX54A
AMaLygKyAswGr08TmUoSviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFiQRCEshIsmQFCgA6eqwwkmJLigcOmCRJQeXK
lywtxpQ58yKFDBiCfsSJs8LOizFN/gx602VRozJ3SlUKVCjIkDl1Sp1KlelH
iy+38pw4tuRSq2CRlk0682xTkBjZki1Ls+pKlljjrqWb0e1Xk3KhZizrd+ZR
mHwFUywMmG5gxBrt/iX5WDFiwpIb6xVLlzHlxFC5WvSst2ddr59Nn0aruvXJ
zK5bk46NV6RP2K5F6s4bGbXp3btX360IvLjurqzBFs9qerZJ281xzwze03lG
29CRDy95HG916SSzZ5gXPvk676ttwV8cf/XpaPXEz8fXXj6++/Zm4XvnLv+9
b/vT9ddbcrkJuJh+PbHnH4GtKTjgdgXeN5F1v0k4IYLPGXjgf7+hR1+EGm7I
YIAWigghbflxiGKKI654m1f1uVhRQXZ5BNGNOOao4446WlBVjUwFKeSQRAp5
AQBAAVnkkkwKJVAGSjYppZEDQWnllVhmqeWWRw4UEAA7
}

#charset=US-ASCII; name=TR1.GIF encoding: base64

set TR1_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0+RRJdMAOAAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAADoQ4zgAqToA0wAAqQECAAAAAG8AAAJ0dG8AAIgC5AAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MOQAWAACAKkAOuRRJdMAOIwAACwAAs4eXJcxjeNQDgCwQgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAGgAACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAKgRrwAAAAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+wkM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABd2ABd4N+HBOIBXwFd4EYBd19K6XcT
ZABd2ABd4FaHRlaHLgAAAH8AAQAAAQBd4HcDRwAA90aJgACHRAAADIRd5DQA
VtwADfQAWqAAAAC/91sJhgCs2noAAIZkOgYCJt9PTUoAAa8AAEiHkIYFX54A
AMaLytqs2swGr08TmTIRniwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjBMLWEQwkSTFByApAOjoESRFBChfVoxZwaRG
li0r2tQpc+IDmzspUsiAoejHkRiDviSptMLQojlDVvhZk2fVqRVEIti5deJT
o1aZIiVJs+RVsV+jXl1LUuvJlzFNmkx7tKdYnQ2omtXZ1SlRsEhrxpXbdm/J
nXTXygTalbBZpYlrImhwMahjuz79Qq07tXBVkw9QihXZ2WbMyEsrT2ywlatl
r39bvpZKmPLnsmtRk2bK1bDvxiQT98WbmvdavX1RK5YsV/JisjA1xubceurg
w8CBXhTOeGTzu4ZJa/8GbHyr7cPOe2NU7v159ZK4q7L3fh335bnTZRYwnp45
/PfDKRdaUjA15lxSsG0GknjMUdXUdvm5tBRrBV4kHmm6SfhThRQxaNF8Hi71
noTjqYWReBvqReJ8IJk3XIjSKUiiTwXG12GMgEnV4oZBwVgiZxZ5aJ6KErKY
0VYbzvijhUdSaOOFCeZ4Il8jwohhhDMiOVyRWHooZGsP6rikkhuypqSRlVE4
okto0tYajzH5OCaCYNZ5oJhC5QdlXI/xt9+WOOYklkm7ZdWdiFkFWheUVrmp
FGJYJmqWW/v5xqCHkYlnGoIFaNrjnBVRmigCuxEaqqQ/AqnkjAXF5hFEsMYw
KuustM5qwV+uQqXrrrz2uusFABCVq6/EFmuUQBkMa+yyvw6U7LPQRivttNQC
O1BAADs=
}

#charset=US-ASCII; name=TR2.GIF encoding: base64

set TR2_data {
R0lGODdhKAA3APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAA0uSgZdIAQwAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAgQ40MApwgA0gAApwECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKcACOSgZdIAQ4wAACwAAs4eXJcxjeNQJgCr8gCHYgBxAMoABwBJ
fhIAAQwAAFAAWDcAKAEAKBcAAP//2JYAAAAIcARQFwAEAABQJgAAAHkAAAAC
LSAAAHgAABIAALwCACgAAQAAN1BQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAKgRrwAAKAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+sQM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABeeABegN+HBOIBXwFegEYBd19K6XcT
ZABeeABegFaHRlaHLgAAAH8AAQAAAQBegHcDRwAA90a5QACHRAAADIRehGQA
VtwADcQAWqAAAAC/91sJhgCtAnoAAIZkOgYCJn9PTUoAAa8AAEiHkIYFX54A
AMaLygKtAswGr08TmZoXWiwAAAAAKAA3AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIsaLFixgrGhR4AcOFjBQTVEgQoQKCBiZFTnwwEaVFCgA6esSYQKTI
Biwb6ERQIYLIBzVNVnA5kYLMmRURJEDJNIHSoRGYPkDwlKdKihQyYNj6cWLJ
oD5F+kTwAGXNqA2oOtUZtKhWrl57RpjaYGlNpyyffo1A1exQl1m3Ip2olO9f
tEIRzPU5cqjTv2krBIb7VfHckyOtGr4ZoSTZoVZ5Sn47eKJKsmbFnpxaUifT
sVTdCu5asvbIsmdFxy55mDBP3pNniv4ptC5snpj7mnRdFytp2kpZPogq9DDP
tJhFKq5eMviFr7drov9UivlB3pTUp1qtwHL0bNMtrzOVuxNzg6iKX/NF6d0k
48wj2aQbZimR1dlpzr3XU2PaWQYaYV6NNxRo1/HU33YTttQcdo/FNhxrO4nU
X2O/neYgcqIl9lMCOXX3XGOZ8WRejL55GJt28Ln4HlWdmSQaY7ElliFhSzXl
HlwL2tgWXyguR9F1I/F2JFIuieXjkz5SleJnMMo1ok3w+dhebO1heWV1I6aU
2IBr6qbedkFGMGJJM15ElXprWsTbdmkumJGWU1Wn50svgpTUSXemWFGPCSJp
KEXqBfqobI5OqmWQk/b5aKSKGqqpoX1h+uinIE1l6qSUlvYoWVqiOmVXqPbN
JWmmhcbKaqcgkfondmWOWqull7qqK0aJ4prRsHYGiyqyFqkX2bK/htklosr6
qqBKTc136ZssYeuYRrU2h6CW2JEbm1mtLZUqrAGyp91S1O7HVqvUEeWdZ/5d
F9Vaad0VFEkBPgVmf19he99I9xlZboTwqZtmbfDup9t9lt2EMMDqvrqgayeh
1dxXz4J5o0oihjuhhDY966OUuT7HbkiuGloQaR5BZPPNOOesc84WvEWzYEAH
LfTQQV8AgFY/E6300lwJlEHSTEdd9EABAQA7
}

#charset=US-ASCII; name=TR3.GIF encoding: base64

set TR3_data {
R0lGODdhKAA4APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAzeT3v80APQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAAAIQ4z0AogIAzQAAogECAAAAAG8AAAKGiG8AAIgNgAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MIAAWAACAKIAAuT3v80APYwAACwAAs4eXJcxjeNQDgCuEgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDgAKAEAKBcAAP//2JYAAAAImARQFwAEAABQDgAAAK8AACgC
LQAXt/8AAAD///wAACgAAQAAOFBQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLH///3gAAGgAVgFfSSgAAQAAAKgRrwAAUAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+uYM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABfGABfIN+HBOIBXwFfIEYBd19K6XcT
ZABfGABfIFaHRlaHLgAAAH8AAQAAAQBfIHcDRwAA90ZfgACHRAAADIRfJDQA
VtwADfQAWqAAAAC/91sJhgCr8noAAIZkOgYCJh9PTUoAAa8AAEiHkIYFX54A
AMaLyvKr8swGr08TmX4SviwAAAAAKAA4AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIseJEBxUgVMCIceNFixMNCryA4QJIjRo5QsCIYCUCBw5WPlip0SIF
ACRLgtwIs+eDnhBernTwM+bLjBQp5NRZsWXMmBCGunxaVGrUihQyYNhqkqJR
mEOfigXrQKjTjiG1cvU61CnNnmVhVhUK9miFrFuZhq0LtOzQmU/bSsWIdy1U
t2fpvoxZlajLqB0LM607GG7Ys2Sf2pXcNTBfzV+BLga98q5anaMp9zU7Nqjr
nmnzmgzqoAFcmHQf45bqdPED07I3QsbcUujP12+jji7KWThUoG9Fux3b82jz
0cr3Ln7ZwOXGopRjc/8FG3Zq242LaaanTdvBdbqZn79EUAHBfJrH4xI+bfLw
4Pks1YfYYzMBtlJzbxkHHn0C2odbS7rB1lxcUbHnkX0T0VecaGSV1lx9FNpn
G0wClrhYRpiJ9eFFcGGYYYMultWYdx+WRiJLCPxWoo4UMQihX8CthR5LZR2F
oYYu5mhfbpCtSJSOHGWopIYlXpQSbUEyNVFpHjVl3wNUggRVhSvu5GUDXzIo
Jk9ZdmWmRWAq+aZN/M1p0ZIu2tmmnhTFCSafewIqYp52lmknmIgCauicU6pZ
aJ2CItDAn3wu+maajs5pqZmSfqkopHzimembm+6E6afBRbokqkLyGSearGqX
aWeneFYKKqNLxpmjnqUiKeqR9KEFUpkk6mikiXat2mVSkFIZbI8v4tilsliB
KqxHRC67apT1VRtclB05G+2zH5XLbKofqfnTRwF6VeWym5bFrpqEksqfm2Je
uyyJ5k5U0GklQSTwwAQXbHDBFqgFcF4MN+zwww1fAIBWC0Ns8cVcCZRBxRh3
HPFAG4cs8sgkl2yyxAMFBAA7
}

#charset=US-ASCII; name=TR4.GIF encoding: base64

set TR4_data {
R0lGODdhKAA3APcAAAAAAACAAICAAIAAgGwAZNTY3AB8EEhkxHgALMAUFNhc
2MS0lFTU2JhcABjISIhAAPzImODgAISIcPzs1PDgwNTAqLiokKSYhIiAbGhg
UAAAAAAAAAAAAAAAAAAAAP///wEAAEYWv7eAiwAAAP///wAAAAAAAAcIeAKG
iAIAAHhxMBKEbAKGiG8AAJ8Bh4cAAMUAAGi/93iBdANfTYhfQEBfTQMAAHQA
AHQAVngAVnBfTcwAVjMAVnRfSXQAVrQAVuMAVgBfScAAAGcAVnRfQHQAVtAA
VrUAVv9fSdz//wcAVgFfQHQAAKwAVsUAVv9fSbj//7gAVtABAdAAaQAAaVUA
AHRpdABkZQAAz+VUQs8ANQAAAAAAAAAAAB8+bwAAAAAAAG8+bwEAAD4WxwAD
dAAAAB8AAAABEbcAABgQ4zUADxgAzwAADwECAAAAAG8AAAJ6KG8AAIgMZAAL
fAAAAgAAAQACAKgAAG8pNywAAAAWv9Q+b5eefgEAAAAAAgACAAAAADeFqFxx
MGQAWAACAA8AGOVUQs8ANYwAACwAAs4eXJcxjeNQJgCtAgCHYgBxAMoABwBJ
fhIAAQwAAFAAWDcAKAEAKBcAAP//2JYAAAAIcARQFwAEAABQJgAAAB4AACIC
LSIAAAAAADb2ZrwW6ij2AQAAN1BQHxgBaAEBaLcAAP/+mJYAAAGIWAQPtwAE
AAARxgAAAI0AAHACLJ///x8RomgXnwFfSSgAAQAAAKgRrwAAeAAAAAAAAAAA
AAAAAAAAAOgAAACAOq8AAL+HxFcGd68AAIf8hq8AAK+tUM9x+AAAAAAAAAAA
AMwAIDQAAAAAABAAAAAAWAQAAAMAAABfuABfwN+HBOIBXwFfwEYBd19K6XcT
ZABfuABfwFaHRlaHLgAAAH8AAQAAAQBfwHcDRwAA90ay4ACHRAAADIRfxGQA
VtwADcQAWqAAAAC/91sJhgCr8noAAIZkOgYCJr9PTUoAAa8AAEiHkIYFX54A
AMaLyvKr8swGr08TmUIRniwAAAAAKAA3AAAI/wABCARggYLBgwgTKlyocMLA
CxcsVJhIseJEAxYrYMxo0aDACxgucLRooGQFBCURONBY4cHIChQAgAzJsaQD
jAgelDTgAOVNBzpxZqQwk2ZFBBd39uRpQGXJByiZrtw4kUIGDFhFUkxpU2pU
jGB7ooza8WrWrROhNtW4kyvQm02Vpqxq1ijPqCp9ss0LtG1PuD1Pwqyr9abT
uIZ3Hn7wM+fdu3Sx0gR7MnHUmycbxG3LkmvksxWm/l161+fmlJibmh4sWaRT
uIjbIsjrtynpnwastp44WzPbu7BJ27bp1KdL3WfBQsU99uYDl0gPwzXNODfh
pGJhu20w+ytXpU6R0/9EChilRsOGEWjerJM5ZvEXao89vNn7X+Klre/ejNsA
95TNzXabTqEdBl95TCVI3Enk/TXbdw6sBF+CzT2XHm/difWVaTtNaFuEl02H
lGDR/fYVXKwlN59YDWDG4IsPoqbgTfAl5ZeAK0XX3YZBgZfiZLiVlxOGLW0V
YXqGfWaXT3kVV2J3vEFFloAY1cgSgRithKGUJI6YkXlWshUaR91BJdhLFIWJ
JoPc5eQlmmquKaWZayqpVZ0MQolnnGjO+Sac1+HJ5myC8vkSVIgWGiiebhK6
56J19kZnnYaONBuXj+4mqHqXKqopozt6ChqomFIK6Zo7/vlSpRxJyZ2oRkWW
2qaeaxoKlkk7SjlkrYtSxlueqc4nJlVpEmbSrQSapyODYOlpUrGaPvlbfbJR
RutGE251bLWUqYYUZ2T9KNJOW0W31klC+dotS+ImpZGXLg0rGLjfEhuntdNO
+S27x0KblVbkbuTrSANXVFBdIUGk8MIMN+xwwxaYhbBkFFds8cUVXwDAVRNj
7PHHWQmUQccgl5zxQAEBADs=
}

# define base set of tiles for win/debug
set baseset {
      T1 T2 T3 T4 T5 T6 T7 T8 T9 \
      D1 D2 D3 D4 D5 D6 D7 D8 D9 \
      B1 B2 B3 B4 B5 B6 B7 B8 B9 \
      TR1 TR2 TR3 TR4 \
      C1 C2 C3 C4 \
      F1 F2 F3 F4 \
      DR1 DR2 DR3 \
      BLK 
}

# define the entire set of tiles in one table
set tileset {
      T1 T2 T3 T4 T5 T6 T7 T8 T9 \
      T1 T2 T3 T4 T5 T6 T7 T8 T9 \
      T1 T2 T3 T4 T5 T6 T7 T8 T9 \
      T1 T2 T3 T4 T5 T6 T7 T8 T9 \
      D1 D2 D3 D4 D5 D6 D7 D8 D9 \
      D1 D2 D3 D4 D5 D6 D7 D8 D9 \
      D1 D2 D3 D4 D5 D6 D7 D8 D9 \
      D1 D2 D3 D4 D5 D6 D7 D8 D9 \
      B1 B2 B3 B4 B5 B6 B7 B8 B9 \
      B1 B2 B3 B4 B5 B6 B7 B8 B9 \
      B1 B2 B3 B4 B5 B6 B7 B8 B9 \
      B1 B2 B3 B4 B5 B6 B7 B8 B9 \
      C1 C2 C3 C4 \
      C1 C2 C3 C4 \
      C1 C2 C3 C4 \
      C1 C2 C3 C4 \
      DR1 DR2 DR3 \
      DR1 DR2 DR3 \
      DR1 DR2 DR3 \
      DR1 DR2 DR3 \
      TR1 TR2 TR3 TR4 F1 F2 F3 F4
}

set trad_grid {
      X 0 1 2 3 4 5 6 7 8 9 10 11 X \
      X 12 13 14 15 16 17 18 19 X \
      X 20 21 22 23 24 25 26 27 28 29 X \
      X 141 30 31 32 33 34 35 36 37 38 39 40 41 142 143 X \
      X 141 42 43 44 45 46 47 48 49 50 51 52 53 142 143 X \
      X 54 55 56 57 58 59 60 61 62 63 X \
      X 64 65 66 67 68 69 70 71 X \
      X 72 73 74 75 76 77 78 79 80 81 82 83 X \
      X 84 85 86 87 88 89 X \
      X 90 91 92 93 94 95 X \
      X 96 97 98 99 100 101 X \
      X 102 103 104 105 106 107 X \
      X 108 109 110 111 112 113 X \
      X 114 115 116 117 118 119 X \
      X 120 121 122 123 X \
      X 124 125 126 127 X \
      X 128 129 130 131 X \
      X 132 133 134 135 X \
      X 140 136 137 140 X \
      X 140 138 139 140 X
   }

# need copy to play with of trad grid...
set play_grid [lrange $trad_grid 0 end ]

# load entire set of tile images for later use
foreach i [info globals *_data ] {
        set til($i) [image create photo $i -data [set $i] ]
        set tilx($i) [image create photo  -data [set $i] -gamma 1.75]
        unset $i
}

# ----------------------------------------------------------------------
# USAGE:  tile_shuffle <tileset>
#
# Takes a list of tiles and shuffles them randomly.  Returns a new
# list of tiles in shuffled order.
# ----------------------------------------------------------------------
proc tile_shuffle {} {
    global tileset stileset
    global play_grid trad_grid

    # need copy to play with of trad grid...
    set play_grid [lrange $trad_grid 0 end ]

    # copy tileset so we can play with copy
    # will need clean set to restart game!
    set ptileset [lrange $tileset 0 end ]
    set stileset {}    
   
    while {[llength $ptileset] > 0} {
        set max [llength $ptileset]
 
        # find the current length and get random number
        # between 0 and length of string.
        set n [expr int([random number $max])]
 
        # get the char pointed to by random number
        set c [lindex $ptileset $n]
 
        # now create new randomized string of tiles
        lappend stileset $c
 
        # now we remove tile used ($c) till all gone
        set ptileset [lreplace $ptileset $n $n]
    }
}

# layout the tiles in a traditional grid
proc layout {canv} {
    global stileset til
    
    for {set i 0} {$i < [llength $stileset]} {incr i} {
 
        # 1st level 12,8,10,12,12,10,8,12
        if {$i >=  0 && $i <= 11} { set y  40 ; set x [ expr ($i * 40) + 80 ] }
        if {$i >= 12 && $i <= 19} { set y  95 ; set x [ expr (($i - 12) * 40) + 160 ] }
        if {$i >= 20 && $i <= 29} { set y 150 ; set x [ expr (($i - 20) * 40) + 120 ] }
        if {$i >= 30 && $i <= 41} { set y 205 ; set x [ expr (($i - 30) * 40) + 80 ] }
        if {$i >= 42 && $i <= 53} { set y 260 ; set x [ expr (($i - 42) * 40) + 80 ] }
        if {$i >= 54 && $i <= 63} { set y 315 ; set x [ expr (($i - 54) * 40) + 120 ] }
        if {$i >= 64 && $i <= 71} { set y 370 ; set x [ expr (($i - 64) * 40) + 160 ] }
        if {$i >= 72 && $i <= 83} { set y 425 ; set x [ expr (($i - 72) * 40) + 80 ] }
        # 2nd level 6 by 6 y-4
        if {$i >= 84 && $i <= 89} { set y  91 ; set x [ expr (($i - 84) * 40) + 204 ] }
        if {$i >= 90 && $i <= 95} { set y 146 ; set x [ expr (($i - 90) * 40) + 204 ] }
        if {$i >= 96 && $i <= 101} { set y 201 ; set x [ expr (($i - 96) * 40) + 204 ] }
        if {$i >= 102 && $i <= 107} { set y 256 ; set x [ expr (($i - 102) * 40) + 204 ] }
        if {$i >= 108 && $i <= 113} { set y 311 ; set x [ expr (($i - 108) * 40) + 204 ] }
        if {$i >= 114 && $i <= 119} { set y 366 ; set x [ expr (($i - 114) * 40) + 204 ] }
        # 3rd level 4 by 4 y-8
        if {$i >= 120 && $i <= 123} { set y 142 ; set x [ expr (($i - 120) * 40) + 248 ] }
        if {$i >= 124 && $i <= 127} { set y 197 ; set x [ expr (($i - 124) * 40) + 248 ] }
        if {$i >= 128 && $i <= 131} { set y 252 ; set x [ expr (($i - 128) * 40) + 248 ] }
        if {$i >= 132 && $i <= 135} { set y 307 ; set x [ expr (($i - 132) * 40) + 248 ] }
        # 4th level 2 by 2 y-12
        if {$i >= 136 && $i <= 137} { set y 193 ; set x [ expr (($i - 136) * 40) + 292 ] }
        if {$i >= 138 && $i <= 139} { set y 248 ; set x [ expr (($i - 138) * 40) + 292 ] }
        # single tiles 2 1st level 1 on 5th level
        if {$i == 140 } { set y 220 ; set x 315 }
        if {$i == 141 } { set y 230 ; set x 40 }
        if {$i == 142 } { set y 230 ; set x 560 }
        if {$i == 143 } { set y 230 ; set x 600 }
 
        set id [$canv create image $x $y  \
           -image [lindex $stileset $i]_data \
           -tags [lindex $stileset $i]]
        update
         set idd [lindex $stileset $i]
         set idx [lindex $stileset $i]_data
         set idh $til($idx)
        $canv bind $id <ButtonPress-1> "maj_grab $canv $idh $idd $x $y $i"
        }
}
        
#########
# test/win - display full set of tiles
#
###############################
proc cycle {} {
        global baseset
        set count 0
        set delay 30

        while {$count <= 41 } {
        if {$count >=  0 } { set y  40 ; set x [ expr ($count * 40) + 40 ] }
        if {$count >=  9 } { set y  95 ; set x [ expr (($count -  9) * 40) + 40 ] }
        if {$count >= 18 } { set y 150 ; set x [ expr (($count - 18) * 40) + 40 ] }
        if {$count >= 27 } { set y 205 ; set x [ expr (($count - 27) * 40) + 40 ] }
        if {$count >= 35 } { set y 260 ; set x [ expr (($count - 35) * 40) + 40 ] }

        .table create image $x $y  \
           -image [lindex $baseset $count]_data \
           -tags [lindex $baseset $count]
        update
        after $delay 
        incr count
        }

}

############################################################
#
#  USAGE:  random number ?<max>? ?<min>?
#          random seed <value>
#
#  In the first form, return a random number in the range <min> to
#  <max>.  If <min> is not specified, the default is 0; if max is not
#  specified, the default is 1.
#
#  In the second form, set the seed for the random number generator
#  to <value>.
# ----------------------------------------------------------------------
proc random {option args} {
    global randomSeed

    switch $option {
        seed {
            if {[llength $args] != 1} {
                error "wrong # args: should be \"random seed value\""
            }
            set randomSeed [lindex $args 0]
        }
        number {
            set max 1.0
            set min 0.0
            if {[llength $args] > 0} {
                set max [lindex $args 0]
            }
            if {[llength $args] > 1} {
                set min [lindex $args 1]
            }
            if {[llength $args] > 2} {
                error "wrong # args: should be \"random number ?max? ?min?\""
            }
            set randomSeed [expr (7141*$randomSeed+54773) %259200]
            set num  [expr $randomSeed/259200.0*($max-$min)+$min]
            return $num
        }
        default {
            error "bad option \"$option\": should be number or seed"
        }
    }
}

random seed [clock clicks]


# ----------------------------------------------------------------------
# USAGE:  maj_grab <canvas> <idh> <tileName> <x> <y>
#
# Invoked when the user clicks on the tile 
# all the real work happens here .....
# ----------------------------------------------------------------------
set selected "" 
set selectidd "" 

proc maj_grab {canv idh tileName x y p} {
     global stileset canvas tilx selectp
     global selected selectidd play_grid
     global selectx selecty selectidh

# must see if the tile is OK to remove
# first get location in play_grid
 set n [ lsearch $play_grid $p ]
 if  { [ lindex $play_grid [ expr $n - 1 ] ]  == "X" || \
         [ lindex $play_grid [ expr $n + 1 ] ] == "X" } {

# eight case where id will be different but treat as same
  if { $tileName == "TR1" || $tileName == "TR2" || $tileName == "TR3" || $tileName == "TR4" } {
       set tileName "TR"
     }
  if { ($tileName == "F1") || ($tileName == "F2") || \
       ($tileName == "F3") || ($tileName == "F4") } {
       set tileName "FR"
     }

# see if different
  if { $tileName != $selectidd } {
    if { $selectidd != "" } {
        set id [ $canv find closest $selectx $selecty ]
        set canvas(select,$canv) $id
        focus $canv
        $canv delete $canvas(select,$canv)
        unset canvas(select,$canv)
        set ydd [$canv create image $selectx $selecty  \
          -image $selectidh \
          -tags $selectidd ]
        $canv bind $ydd <ButtonPress-1> "maj_grab $canv $selectidh $selectidd $selectx $selecty $selectp"
        } 
    set id [ $canv find closest $x $y ]
    set canvas(select,$canv) $id
    focus $canv
    $canv delete $canvas(select,$canv)
    unset canvas(select,$canv)
        $canv create image $x $y  \
          -image $tilx($idh) \
          -tags $tileName 
    set selectidd $tileName
    set selected $id
    set selectx $x
    set selecty $y
    set selectidh $idh
    set selectp $p

   } else {
# same tile type go bye bye..
    set id [ $canv find closest $x $y ]
    set canvas(select,$canv) $id
    focus $canv
    $canv delete $canvas(select,$canv)
    unset canvas(select,$canv)
    set id [ $canv find closest $selectx $selecty ]
    set canvas(select,$canv) $id
    focus $canv
    $canv delete $canvas(select,$canv)
    unset canvas(select,$canv)
     
    set n 0
    while { $n != -1 } {
      set n [ lsearch $play_grid $p ]
      if { $n != -1 } { set play_grid [ lreplace $play_grid $n $n ] }
    }
    set n 0
    while { $n != -1 } {
      set n [ lsearch $play_grid $selectp ]
      if { $n != -1 } { set play_grid [ lreplace $play_grid $n $n ] }
    } 
    set selectidd ""
    set selected ""
    set selectx ""
    set selecty ""
    set selectidh ""
    set selectp ""
    # when string only has X's you win...
    if { [ llength $play_grid ] <= 40 } { 
         after 100 maj_win
        }
# end of if/else name matches selection
  }
# end of tile has X on right or left of it..
 }

# end of routine..
}

# ----------------------------------------------------------------------
# USAGE:  maj_new_game <canvas>
#
# Invoked to clear off the <canvas> game board and set up a new game.
# Shuffles a new deck of cards and deals the piles for solitaire.
# ----------------------------------------------------------------------
proc maj_new_game {canv} {
    $canv delete all

    # shuffle the tiles - creates stileset
    tile_shuffle

    layout $canv

    sol_timer restart .mbar.timer
}


# ----------------------------------------------------------------------
# USAGE:  maj_win
#
# Invoked to end a game when the player wins.  Stops the clock and
# puts up the "You Win" message.
# ----------------------------------------------------------------------
proc maj_win {} {
    global MajWinImage 

    sol_timer stop .mbar.timer
    # should be empty - but just be sure
    .table delete all
    # now display all the tiles
    cycle
    after 200
    # overlay the you win image...
    .table create image 200 200 -image $MajWinImage

    for {set i 0} {$i < 3} {incr i} {
        bell
        after 100
    }
    set gameTime [sol_timer get .mbar.timer]
}

set MajWinImage [image create photo -data $YouWin -format gif ]


set HourData(hour1) {
#define hour1_width 16
#define hour1_height 16
static unsigned char hour1_bits[] = {
   0xfe, 0x7f, 0x14, 0x28, 0x14, 0x28, 0x94, 0x2a, 0x54, 0x2d, 0xb4, 0x2a,
   0x64, 0x25, 0xc4, 0x22, 0x44, 0x23, 0xa4, 0x24, 0x14, 0x29, 0x94, 0x28,
   0x14, 0x28, 0x14, 0x28, 0x14, 0x28, 0xfe, 0x7f};

}
set HourData(hour2) {
#define hour2_width 16
#define hour2_height 16
static unsigned char hour2_bits[] = {
   0xfe, 0x7f, 0x14, 0x28, 0x14, 0x28, 0x14, 0x28, 0x54, 0x2d, 0xb4, 0x2a,
   0x64, 0x25, 0xc4, 0x22, 0x44, 0x23, 0xa4, 0x24, 0x14, 0x29, 0x94, 0x28,
   0x14, 0x29, 0x94, 0x28, 0x54, 0x29, 0xfe, 0x7f};

}
set HourData(hour3) {
#define hour3_width 16
#define hour3_height 16
static unsigned char hour3_bits[] = {
   0xfe, 0x7f, 0x14, 0x28, 0x14, 0x28, 0x14, 0x28, 0x14, 0x29, 0xb4, 0x2a,
   0x64, 0x25, 0xc4, 0x22, 0x44, 0x23, 0xa4, 0x24, 0x14, 0x29, 0x94, 0x28,
   0x14, 0x29, 0xb4, 0x2a, 0x54, 0x2d, 0xfe, 0x7f};

}
set HourData(hour4) {
#define hour4_width 16
#define hour4_height 16
static unsigned char hour4_bits[] = {
   0xfe, 0x7f, 0x14, 0x28, 0x14, 0x28, 0x14, 0x28, 0x14, 0x28, 0x14, 0x2a,
   0x64, 0x25, 0xc4, 0x22, 0x44, 0x23, 0xa4, 0x24, 0x14, 0x29, 0x94, 0x28,
   0x54, 0x2d, 0xb4, 0x2a, 0x54, 0x2d, 0xfe, 0x7f};

}
set HourData(hour5) {
#define hour5_width 16
#define hour5_height 16
static unsigned char hour5_bits[] = {
   0xfe, 0x7f, 0x14, 0x28, 0x14, 0x28, 0x14, 0x28, 0x14, 0x28, 0x14, 0x28,
   0x24, 0x24, 0xc4, 0x22, 0x44, 0x23, 0xa4, 0x24, 0x14, 0x29, 0x94, 0x2a,
   0x54, 0x2d, 0xb4, 0x2a, 0x54, 0x2d, 0xfe, 0x7f};

}

# ----------------------------------------------------------------------
# USAGE:  sol_timer_create <windowName>
#
# Makes a simple timer assembly in a window named <windowName>.
# This timer can be started or stopped by calling sol_timer.
# ----------------------------------------------------------------------
proc sol_timer_create {win} {
    global Timers TimerFrames HourData env

    if {![info exists TimerFrames]} {
        for {set i 1} {$i <= 5} {incr i} {
            lappend TimerFrames [image create bitmap \
                -data $HourData(hour$i)]
        }
    }

    frame $win
    pack $win -side right

    label $win.l -text "Time:"
    pack $win.l -side left
    label $win.hourglass
    pack $win.hourglass -side left
    label $win.current -width 5 -anchor w
    pack $win.current -side left

    set Timers($win-after) ""
    set Timers($win-time) 0
        set Timers($win-running) 1
}

# ----------------------------------------------------------------------
# USAGE:  sol_timer continue <windowName>
#         sol_timer get <windowName>
#         sol_timer isrunning <windowname>
#         sol_timer restart <windowName>
#         sol_timer stop <windowName>
#         sol_timer tick <windowName>
#
# Handles all operations on timers created by sol_timer_create.
# The restart, stop and continue options are used to start/stop the
# timer.  The "get" option returns the current time.  The "tick"
# option is used internally to increment the time value.
# ----------------------------------------------------------------------
proc sol_timer {option win} {
    global Timers TimerFrames

    switch $option {
        continue {
            sol_timer stop $win
            set Timers($win-after) [after 200 [list sol_timer tick $win]]
            set Timers($win-running) 1
        }
        get {
            return [expr $Timers($win-time)/5]
        }
        isrunning {
                return $Timers($win-running)
        }
        restart {
            set Timers($win-time) 0
            sol_timer continue $win
            set Timers($win-running) 1
        }
        stop {
            if {$Timers($win-after) != ""} {
                after cancel $Timers($win-after)
                set Timers($win-after) ""
                set Timers($win-running) 0
            }
        }
        tick {
            incr Timers($win-time)
            set frame [expr $Timers($win-time) % 5]
            set secs  [expr $Timers($win-time) / 5]

            $win.hourglass configure -image [lindex $TimerFrames $frame]
            $win.current configure -text $secs

            set Timers($win-after) [after 200 [list sol_timer tick $win]]
        }
        default {
            error "bad option \"$option\": should be start, stop or tick"
        }
    }
}


# ----------------------------------------------------------------------
# Set up game...
# ----------------------------------------------------------------------


frame .mbar -borderwidth 2 -relief raised
pack .mbar -side top -fill x

button .mbar.deal -text "Deal" -command {
    maj_new_game .table
}
pack .mbar.deal -side left -padx 2
bind . <Control-KeyPress-d> {.mbar.deal invoke}

button .mbar.rdme -text "Readme..." -command {
    maj_readme
}
pack .mbar.rdme -side left -padx 2
bind . <Control-KeyPress-p> {.mbar.rdme invoke}

sol_timer_create .mbar.timer
pack .mbar.timer -side right -padx 4

canvas .table -width 640 -height 520
pack .table -expand yes -fill both

# ----------------------------------------------------------------------
# Readme...
# ----------------------------------------------------------------------
frame .table.rdme -borderwidth 2 -relief raised

frame .table.rdme.controls
pack .table.rdme.controls -side bottom -fill x -padx 4 -pady 4

button .table.rdme.controls.ok -text "OK" -command maj_readme_ok
pack .table.rdme.controls.ok -side left -expand yes

frame .table.rdme.opts 
  message .table.rdme.opts.text -aspect 1000 -justify center \
            -text "$readme"
  pack .table.rdme.opts.text
pack .table.rdme.opts -side left -expand yes -fill both -padx 4 -pady 4

proc maj_readme {} {
    sol_timer stop .mbar.timer
    .table delete rdme
    .table create window 60 60 -anchor nw -window .table.rdme -tags rdme
}

proc maj_readme_ok {} {
    .table delete rdme
    sol_timer continue .mbar.timer
}

# ----------------------------------------------------------------------
# Start new game...
# ----------------------------------------------------------------------
random seed [clock clicks]


maj_new_game .table

} errorStr]

if { $errorNo != 0 } {
        label .err1 -text "$errorStr: $errorInfo"
        pack .err1
}

