12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347 |
- MODULE EncStdAliases;
- (* Generated automatically *)
- CONST
- modPrefix = "EncStdMap_";
- PROCEDURE GetModName* (s: ARRAY OF CHAR; OUT r: ARRAY OF CHAR; OUT ok: BOOLEAN);
- VAR x: INTEGER;
- BEGIN
- x := 0;
- WHILE (x < LEN(s)) & (s[x] # 0X) DO
- IF (s[x] >= 'a') & (s[x] <= 'z') THEN
- s[x] := CHR(ORD(s[x]) - ORD('a') + ORD('A'))
- END;
- INC(x)
- END;
- x := -1;
- CASE s[0] OF
- | '4':
- IF s[1] = '3' THEN
- IF s[2] = '7' THEN
- IF s[3] = 0X THEN x := 115 END
- END
- END
- | '6':
- IF s[1] = '4' THEN
- IF s[2] = '6' THEN
- IF s[3] = 0X THEN x := 0 END
- END
- END
- | '8':
- CASE s[1] OF
- | '5':
- CASE s[2] OF
- | '0':
- IF s[3] = 0X THEN x := 43 END
- | '2':
- IF s[3] = 0X THEN x := 118 END
- | '5':
- IF s[3] = 0X THEN x := 120 END
- | '7':
- IF s[3] = 0X THEN x := 121 END
- ELSE END
- | '6':
- CASE s[2] OF
- | '1':
- IF s[3] = 0X THEN x := 124 END
- | '0':
- IF s[3] = 0X THEN x := 123 END
- | '3':
- IF s[3] = 0X THEN x := 125 END
- | '2':
- IF s[3] = 0X THEN x := 44 END
- | '5':
- IF s[3] = 0X THEN x := 127 END
- | '6':
- IF s[3] = 0X THEN x := 45 END
- | '9':
- IF s[3] = 0X THEN x := 128 END
- ELSE END
- ELSE END
- | 'A':
- CASE s[1] OF
- | 'S':
- CASE s[2] OF
- | 'C':
- IF s[3] = 'I' THEN
- IF s[4] = 'I' THEN
- IF s[5] = 0X THEN x := 0 END
- END
- END
- | 'M':
- IF s[3] = 'O' THEN
- IF s[4] = '-' THEN
- IF s[5] = '7' THEN
- IF s[6] = '0' THEN
- IF s[7] = '8' THEN
- IF s[8] = 0X THEN x := 22 END
- END
- END
- END
- END
- END
- ELSE END
- | 'R':
- CASE s[2] OF
- | 'A':
- IF s[3] = 'B' THEN
- IF s[4] = 'I' THEN
- IF s[5] = 'C' THEN
- IF s[6] = 0X THEN x := 22 END
- END
- END
- END
- | 'M':
- IF s[3] = 'S' THEN
- IF s[4] = 'C' THEN
- IF s[5] = 'I' THEN
- IF s[6] = 'I' THEN
- IF s[7] = '-' THEN
- IF s[8] = '8' THEN
- IF s[9] = 0X THEN x := 61 END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'T':
- IF s[2] = 'A' THEN
- IF s[3] = 'R' THEN
- IF s[4] = 'I' THEN
- CASE s[5] OF
- | 0X: x := 135
- | 'S':
- IF s[6] = 'T' THEN
- IF s[7] = 0X THEN x := 135 END
- END
- ELSE END
- END
- END
- END
- | 'N':
- IF s[2] = 'S' THEN
- IF s[3] = 'I' THEN
- IF s[4] = '_' THEN
- IF s[5] = 'X' THEN
- IF s[6] = '3' THEN
- IF s[7] = '.' THEN
- IF s[8] = '4' THEN
- IF s[9] = '-' THEN
- IF s[10] = '1' THEN
- IF s[11] = '9' THEN
- CASE s[12] OF
- | '8':
- IF s[13] = '6' THEN
- IF s[14] = 0X THEN x := 0 END
- END
- | '6':
- IF s[13] = '8' THEN
- IF s[14] = 0X THEN x := 0 END
- END
- ELSE END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'C':
- CASE s[1] OF
- | 'P':
- CASE s[2] OF
- | '-':
- CASE s[3] OF
- | 'I':
- IF s[4] = 'S' THEN
- IF s[5] = 0X THEN x := 124 END
- END
- | 'G':
- IF s[4] = 'R' THEN
- IF s[5] = 0X THEN x := 128 END
- END
- ELSE END
- | '1':
- CASE s[3] OF
- | '1':
- CASE s[4] OF
- | '3':
- CASE s[5] OF
- | '1':
- IF s[6] = 0X THEN x := 46 END
- | '3':
- IF s[6] = 0X THEN x := 68 END
- ELSE END
- | '2':
- CASE s[5] OF
- | '9':
- IF s[6] = 0X THEN x := 109 END
- | '5':
- IF s[6] = 0X THEN x := 129 END
- | '4':
- IF s[6] = 0X THEN x := 108 END
- ELSE END
- | '6':
- CASE s[5] OF
- | '1':
- IF s[6] = 0X THEN x := 110 END
- | '3':
- IF s[6] = 0X THEN x := 112 END
- | '2':
- IF s[6] = 0X THEN x := 111 END
- ELSE END
- ELSE END
- | '0':
- IF s[4] = '4' THEN
- IF s[5] = '6' THEN
- IF s[6] = 0X THEN x := 107 END
- END
- END
- | '3':
- IF s[4] = '6' THEN
- IF s[5] = '1' THEN
- IF s[6] = 0X THEN x := 102 END
- END
- END
- | '2':
- IF s[4] = '5' THEN
- CASE s[5] OF
- | '1':
- IF s[6] = 0X THEN x := 35 END
- | '0':
- IF s[6] = 0X THEN x := 34 END
- | '3':
- IF s[6] = 0X THEN x := 37 END
- | '2':
- IF s[6] = 0X THEN x := 36 END
- | '5':
- IF s[6] = 0X THEN x := 39 END
- | '4':
- IF s[6] = 0X THEN x := 38 END
- | '7':
- IF s[6] = 0X THEN x := 41 END
- | '6':
- IF s[6] = 0X THEN x := 40 END
- | '8':
- IF s[6] = 0X THEN x := 42 END
- ELSE END
- END
- | '5':
- IF s[4] = '4' THEN
- IF s[5] = 0X THEN x := 65 END
- END
- ELSE END
- | '3':
- IF s[3] = '6' THEN
- IF s[4] = '7' THEN
- IF s[5] = 0X THEN x := 0 END
- END
- END
- | '4':
- IF s[3] = '3' THEN
- IF s[4] = '7' THEN
- IF s[5] = 0X THEN x := 115 END
- END
- END
- | '7':
- CASE s[3] OF
- | '3':
- IF s[4] = '7' THEN
- IF s[5] = 0X THEN x := 116 END
- END
- | '2':
- IF s[4] = '0' THEN
- IF s[5] = 0X THEN x := 138 END
- END
- | '7':
- IF s[4] = '5' THEN
- IF s[5] = 0X THEN x := 117 END
- END
- ELSE END
- | '9':
- CASE s[3] OF
- | '3':
- CASE s[4] OF
- | '2':
- IF s[5] = 0X THEN x := 82 END
- | '6':
- IF s[5] = 0X THEN x := 88 END
- ELSE END
- | '2':
- IF s[4] = '2' THEN
- IF s[5] = 0X THEN x := 105 END
- END
- | '5':
- IF s[4] = '0' THEN
- IF s[5] = 0X THEN x := 95 END
- END
- | '4':
- CASE s[4] OF
- | '9':
- IF s[5] = 0X THEN x := 101 END
- | '3':
- IF s[5] = 0X THEN x := 106 END
- ELSE END
- ELSE END
- | '8':
- CASE s[3] OF
- | '1':
- IF s[4] = '9' THEN
- IF s[5] = 0X THEN x := 17 END
- END
- | '5':
- CASE s[4] OF
- | '0':
- IF s[5] = 0X THEN x := 43 END
- | '3':
- IF s[5] = 0X THEN x := 119 END
- | '2':
- IF s[5] = 0X THEN x := 118 END
- | '5':
- IF s[5] = 0X THEN x := 120 END
- | '7':
- IF s[5] = 0X THEN x := 121 END
- | '6':
- IF s[5] = 0X THEN x := 104 END
- | '8':
- IF s[5] = 0X THEN x := 122 END
- ELSE END
- | '7':
- IF s[4] = '4' THEN
- IF s[5] = 0X THEN x := 69 END
- END
- | '6':
- CASE s[4] OF
- | '1':
- IF s[5] = 0X THEN x := 124 END
- | '0':
- IF s[5] = 0X THEN x := 123 END
- | '3':
- IF s[5] = 0X THEN x := 125 END
- | '2':
- IF s[5] = 0X THEN x := 44 END
- | '5':
- IF s[5] = 0X THEN x := 127 END
- | '4':
- IF s[5] = 0X THEN x := 126 END
- | '6':
- IF s[5] = 0X THEN x := 45 END
- | '9':
- IF s[5] = 0X THEN x := 128 END
- ELSE END
- ELSE END
- ELSE END
- | 'H':
- IF s[2] = 'I' THEN
- IF s[3] = 'N' THEN
- IF s[4] = 'E' THEN
- IF s[5] = 'S' THEN
- IF s[6] = 'E' THEN
- IF s[7] = 0X THEN x := 77 END
- END
- END
- END
- END
- END
- | 'N':
- CASE s[2] OF
- | 0X: x := 76
- | '-':
- CASE s[3] OF
- | 'B':
- IF s[4] = 'I' THEN
- IF s[5] = 'G' THEN
- IF s[6] = '5' THEN
- IF s[7] = 0X THEN x := 94 END
- END
- END
- END
- | 'G':
- IF s[4] = 'B' THEN
- CASE s[5] OF
- | 0X: x := 86
- | '-':
- IF s[6] = 'I' THEN
- IF s[7] = 'S' THEN
- IF s[8] = 'O' THEN
- IF s[9] = 'I' THEN
- IF s[10] = 'R' THEN
- IF s[11] = '1' THEN
- IF s[12] = '6' THEN
- IF s[13] = '5' THEN
- IF s[14] = 0X THEN x := 78 END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- END
- ELSE END
- ELSE END
- | '9':
- IF s[2] = '9' THEN
- IF s[3] = 0X THEN x := 15 END
- END
- | 'S':
- CASE s[2] OF
- | 'A':
- IF s[3] = 'S' THEN
- IF s[4] = 'C' THEN
- IF s[5] = 'I' THEN
- IF s[6] = 'I' THEN
- IF s[7] = 0X THEN x := 0 END
- END
- END
- END
- END
- | 'B':
- IF s[3] = 'I' THEN
- IF s[4] = 'G' THEN
- IF s[5] = '5' THEN
- IF s[6] = 0X THEN x := 94 END
- END
- END
- END
- | 'E':
- IF s[3] = 'U' THEN
- IF s[4] = 'C' THEN
- CASE s[5] OF
- | 'P':
- IF s[6] = 'K' THEN
- IF s[7] = 'D' THEN
- IF s[8] = 'F' THEN
- IF s[9] = 'M' THEN
- IF s[10] = 'T' THEN
- IF s[11] = 'J' THEN
- IF s[12] = 'A' THEN
- IF s[13] = 'P' THEN
- IF s[14] = 'A' THEN
- IF s[15] = 'N' THEN
- IF s[16] = 'E' THEN
- IF s[17] = 'S' THEN
- IF s[18] = 'E' THEN
- IF s[19] = 0X THEN x := 80 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | 'K':
- IF s[6] = 'R' THEN
- IF s[7] = 0X THEN x := 100 END
- END
- | 'T':
- IF s[6] = 'W' THEN
- IF s[7] = 0X THEN x := 93 END
- END
- ELSE END
- END
- END
- | 'G':
- IF s[3] = 'B' THEN
- IF s[4] = '2' THEN
- IF s[5] = '3' THEN
- IF s[6] = '1' THEN
- IF s[7] = '2' THEN
- IF s[8] = 0X THEN x := 86 END
- END
- END
- END
- END
- END
- | 'I':
- CASE s[3] OF
- | 'S':
- IF s[4] = 'O' THEN
- CASE s[5] OF
- | '1':
- CASE s[6] OF
- | '5':
- IF s[7] = '9' THEN
- IF s[8] = 'J' THEN
- IF s[9] = 'I' THEN
- IF s[10] = 'S' THEN
- IF s[11] = 'X' THEN
- IF s[12] = '0' THEN
- IF s[13] = '2' THEN
- IF s[14] = '1' THEN
- IF s[15] = '2' THEN
- IF s[16] = '1' THEN
- IF s[17] = '9' THEN
- IF s[18] = '9' THEN
- IF s[19] = '0' THEN
- IF s[20] = 0X THEN x := 75 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | '4':
- IF s[7] = 'J' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 'S' THEN
- IF s[10] = 'C' THEN
- IF s[11] = '6' THEN
- IF s[12] = '2' THEN
- IF s[13] = '2' THEN
- IF s[14] = '0' THEN
- IF s[15] = 'R' THEN
- IF s[16] = 'O' THEN
- IF s[17] = 0X THEN x := 72 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | '8':
- IF s[6] = '7' THEN
- IF s[7] = 'J' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 'S' THEN
- IF s[10] = 'X' THEN
- IF s[11] = '0' THEN
- IF s[12] = '2' THEN
- IF s[13] = '0' THEN
- IF s[14] = '8' THEN
- IF s[15] = 0X THEN x := 74 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | '2':
- IF s[6] = '0' THEN
- IF s[7] = '2' THEN
- IF s[8] = '2' THEN
- CASE s[9] OF
- | 'K':
- IF s[10] = 'R' THEN
- IF s[11] = 0X THEN x := 103 END
- END
- | 'J':
- IF s[10] = 'P' THEN
- CASE s[11] OF
- | 0X: x := 83
- | '2':
- IF s[12] = 0X THEN x := 85 END
- ELSE END
- END
- | 'C':
- IF s[10] = 'N' THEN
- IF s[11] = 0X THEN x := 90 END
- END
- ELSE END
- END
- END
- END
- | '5':
- CASE s[6] OF
- | '8':
- IF s[7] = 'G' THEN
- IF s[8] = 'B' THEN
- IF s[9] = '2' THEN
- IF s[10] = '3' THEN
- IF s[11] = '1' THEN
- IF s[12] = '2' THEN
- IF s[13] = '8' THEN
- IF s[14] = '0' THEN
- IF s[15] = 0X THEN x := 77 END
- END
- END
- END
- END
- END
- END
- END
- END
- | '7':
- IF s[7] = 'G' THEN
- IF s[8] = 'B' THEN
- IF s[9] = '1' THEN
- IF s[10] = '9' THEN
- IF s[11] = '8' THEN
- IF s[12] = '8' THEN
- IF s[13] = 0X THEN x := 76 END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'L':
- IF s[6] = 'A' THEN
- IF s[7] = 'T' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 'N' THEN
- CASE s[10] OF
- | 'A':
- IF s[11] = 'R' THEN
- IF s[12] = 'A' THEN
- IF s[13] = 'B' THEN
- IF s[14] = 'I' THEN
- IF s[15] = 'C' THEN
- IF s[16] = 0X THEN x := 22 END
- END
- END
- END
- END
- END
- | 'C':
- IF s[11] = 'Y' THEN
- IF s[12] = 'R' THEN
- IF s[13] = 'I' THEN
- IF s[14] = 'L' THEN
- IF s[15] = 'L' THEN
- IF s[16] = 'I' THEN
- IF s[17] = 'C' THEN
- IF s[18] = 0X THEN x := 21 END
- END
- END
- END
- END
- END
- END
- END
- | 'G':
- IF s[11] = 'R' THEN
- IF s[12] = 'E' THEN
- IF s[13] = 'E' THEN
- IF s[14] = 'K' THEN
- IF s[15] = 0X THEN x := 23 END
- END
- END
- END
- END
- | 'H':
- IF s[11] = 'E' THEN
- IF s[12] = 'B' THEN
- IF s[13] = 'R' THEN
- IF s[14] = 'E' THEN
- IF s[15] = 'W' THEN
- IF s[16] = 0X THEN x := 24 END
- END
- END
- END
- END
- END
- | '1':
- IF s[11] = 0X THEN x := 17 END
- | '3':
- IF s[11] = 0X THEN x := 19 END
- | '2':
- IF s[11] = 0X THEN x := 18 END
- | '5':
- IF s[11] = 0X THEN x := 25 END
- | '4':
- IF s[11] = 0X THEN x := 20 END
- | '6':
- IF s[11] = 0X THEN x := 26 END
- ELSE END
- END
- END
- END
- END
- ELSE END
- END
- | 'B':
- IF s[4] = 'M' THEN
- CASE s[5] OF
- | '1':
- IF s[6] = '1' THEN
- IF s[7] = '6' THEN
- CASE s[8] OF
- | '1':
- IF s[9] = 0X THEN x := 110 END
- | '3':
- IF s[9] = 0X THEN x := 112 END
- | '2':
- IF s[9] = 0X THEN x := 111 END
- ELSE END
- END
- END
- | '8':
- CASE s[6] OF
- | '5':
- CASE s[7] OF
- | '5':
- IF s[8] = 0X THEN x := 120 END
- | '7':
- IF s[8] = 0X THEN x := 121 END
- ELSE END
- | '6':
- CASE s[7] OF
- | '1':
- IF s[8] = 0X THEN x := 124 END
- | '0':
- IF s[8] = 0X THEN x := 123 END
- | '3':
- IF s[8] = 0X THEN x := 125 END
- | '5':
- IF s[8] = 0X THEN x := 127 END
- | '4':
- IF s[8] = 0X THEN x := 126 END
- | '6':
- IF s[8] = 0X THEN x := 45 END
- | '9':
- IF s[8] = 0X THEN x := 128 END
- ELSE END
- ELSE END
- ELSE END
- END
- ELSE END
- | 'H':
- CASE s[3] OF
- | 'A':
- IF s[4] = 'L' THEN
- IF s[5] = 'F' THEN
- IF s[6] = 'W' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 'D' THEN
- IF s[9] = 'T' THEN
- IF s[10] = 'H' THEN
- IF s[11] = 'K' THEN
- IF s[12] = 'A' THEN
- IF s[13] = 'T' THEN
- IF s[14] = 'A' THEN
- IF s[15] = 'K' THEN
- IF s[16] = 'A' THEN
- IF s[17] = 'N' THEN
- IF s[18] = 'A' THEN
- IF s[19] = 0X THEN x := 73 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | 'P':
- IF s[4] = 'R' THEN
- IF s[5] = 'O' THEN
- IF s[6] = 'M' THEN
- IF s[7] = 'A' THEN
- IF s[8] = 'N' THEN
- IF s[9] = '8' THEN
- IF s[10] = 0X THEN x := 59 END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'K':
- CASE s[3] OF
- | 'S':
- IF s[4] = 'C' THEN
- IF s[5] = '5' THEN
- IF s[6] = '6' THEN
- IF s[7] = '0' THEN
- IF s[8] = '1' THEN
- IF s[9] = '1' THEN
- IF s[10] = '9' THEN
- IF s[11] = '8' THEN
- IF s[12] = '7' THEN
- IF s[13] = 0X THEN x := 79 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | 'Z':
- IF s[4] = '1' THEN
- IF s[5] = '0' THEN
- IF s[6] = '4' THEN
- IF s[7] = '8' THEN
- IF s[8] = 0X THEN x := 66 END
- END
- END
- END
- END
- | 'O':
- IF s[4] = 'I' THEN
- IF s[5] = '8' THEN
- IF s[6] = 'R' THEN
- IF s[7] = 0X THEN x := 32 END
- END
- END
- END
- ELSE END
- | 'M':
- IF s[3] = 'A' THEN
- IF s[4] = 'C' THEN
- IF s[5] = 'I' THEN
- IF s[6] = 'N' THEN
- IF s[7] = 'T' THEN
- IF s[8] = 'O' THEN
- IF s[9] = 'S' THEN
- IF s[10] = 'H' THEN
- IF s[11] = 0X THEN x := 47 END
- END
- END
- END
- END
- END
- END
- END
- END
- | 'P':
- CASE s[3] OF
- | 'C':
- CASE s[4] OF
- | 'P':
- IF s[5] = '8' THEN
- IF s[6] = '5' THEN
- IF s[7] = '2' THEN
- IF s[8] = 0X THEN x := 118 END
- END
- END
- END
- | '7':
- IF s[5] = '7' THEN
- IF s[6] = '5' THEN
- IF s[7] = 'B' THEN
- IF s[8] = 'A' THEN
- IF s[9] = 'L' THEN
- IF s[10] = 'T' THEN
- IF s[11] = 'I' THEN
- IF s[12] = 'C' THEN
- IF s[13] = 0X THEN x := 117 END
- END
- END
- END
- END
- END
- END
- END
- END
- | '8':
- CASE s[5] OF
- | 'C':
- IF s[6] = 'O' THEN
- IF s[7] = 'D' THEN
- IF s[8] = 'E' THEN
- IF s[9] = 'P' THEN
- IF s[10] = 'A' THEN
- IF s[11] = 'G' THEN
- IF s[12] = 'E' THEN
- IF s[13] = '4' THEN
- IF s[14] = '3' THEN
- IF s[15] = '7' THEN
- IF s[16] = 0X THEN x := 115 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | '5':
- IF s[6] = '0' THEN
- IF s[7] = 'M' THEN
- IF s[8] = 'U' THEN
- IF s[9] = 'L' THEN
- IF s[10] = 'T' THEN
- IF s[11] = 'I' THEN
- IF s[12] = 'L' THEN
- IF s[13] = 'I' THEN
- IF s[14] = 'N' THEN
- IF s[15] = 'G' THEN
- IF s[16] = 'U' THEN
- IF s[17] = 'A' THEN
- IF s[18] = 'L' THEN
- IF s[19] = 0X THEN x := 43 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | '6':
- IF s[6] = '2' THEN
- IF s[7] = 'L' THEN
- IF s[8] = 'A' THEN
- IF s[9] = 'T' THEN
- IF s[10] = 'I' THEN
- IF s[11] = 'N' THEN
- IF s[12] = 'H' THEN
- IF s[13] = 'E' THEN
- IF s[14] = 'B' THEN
- IF s[15] = 'R' THEN
- IF s[16] = 'E' THEN
- IF s[17] = 'W' THEN
- IF s[18] = 0X THEN x := 44 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- ELSE END
- | 'T':
- IF s[4] = 'C' THEN
- IF s[5] = 'P' THEN
- IF s[6] = '1' THEN
- IF s[7] = '5' THEN
- IF s[8] = '4' THEN
- IF s[9] = 0X THEN x := 65 END
- END
- END
- END
- END
- END
- ELSE END
- | 'S':
- IF s[3] = 'H' THEN
- IF s[4] = 'I' THEN
- IF s[5] = 'F' THEN
- IF s[6] = 'T' THEN
- IF s[7] = 'J' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 'S' THEN
- IF s[10] = 0X THEN x := 81 END
- END
- END
- END
- END
- END
- END
- END
- | 'U':
- CASE s[3] OF
- | 'C':
- IF s[4] = 'S' THEN
- IF s[5] = '4' THEN
- IF s[6] = 0X THEN x := 5 END
- END
- END
- | 'N':
- IF s[4] = 'I' THEN
- IF s[5] = 'C' THEN
- IF s[6] = 'O' THEN
- IF s[7] = 'D' THEN
- IF s[8] = 'E' THEN
- CASE s[9] OF
- | '1':
- IF s[10] = '1' THEN
- CASE s[11] OF
- | 0X: x := 3
- | 'U':
- IF s[12] = 'T' THEN
- IF s[13] = 'F' THEN
- IF s[14] = '7' THEN
- IF s[15] = 0X THEN x := 14 END
- END
- END
- END
- ELSE END
- END
- | 0X: x := 2
- ELSE END
- END
- END
- END
- END
- END
- ELSE END
- | 'V':
- IF s[3] = 'I' THEN
- IF s[4] = 'S' THEN
- IF s[5] = 'C' THEN
- IF s[6] = 'I' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 0X THEN x := 70 END
- END
- END
- END
- END
- END
- ELSE END
- | 'Y':
- IF s[2] = 'R' THEN
- IF s[3] = 'I' THEN
- IF s[4] = 'L' THEN
- IF s[5] = 'L' THEN
- IF s[6] = 'I' THEN
- IF s[7] = 'C' THEN
- CASE s[8] OF
- | 0X: x := 21
- | '-':
- IF s[9] = 'A' THEN
- IF s[10] = 'S' THEN
- IF s[11] = 'I' THEN
- IF s[12] = 'A' THEN
- IF s[13] = 'N' THEN
- IF s[14] = 0X THEN x := 65 END
- END
- END
- END
- END
- END
- ELSE END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'B':
- IF s[1] = 'I' THEN
- IF s[2] = 'G' THEN
- CASE s[3] OF
- | '-':
- CASE s[4] OF
- | '5':
- IF s[5] = 0X THEN x := 94 END
- | 'F':
- IF s[5] = 'I' THEN
- IF s[6] = 'V' THEN
- IF s[7] = 'E' THEN
- IF s[8] = 0X THEN x := 94 END
- END
- END
- END
- ELSE END
- | '5':
- CASE s[4] OF
- | 0X: x := 94
- | 'H':
- IF s[5] = 'K' THEN
- IF s[6] = 'S' THEN
- IF s[7] = 'C' THEN
- IF s[8] = 'S' THEN
- IF s[9] = 0X THEN x := 99 END
- END
- END
- END
- END
- | '-':
- CASE s[5] OF
- | 'H':
- IF s[6] = 'K' THEN
- IF s[7] = 'S' THEN
- IF s[8] = 'C' THEN
- IF s[9] = 'S' THEN
- CASE s[10] OF
- | 0X: x := 99
- | ':':
- CASE s[11] OF
- | '1':
- IF s[12] = '9' THEN
- IF s[13] = '9' THEN
- IF s[14] = '9' THEN
- IF s[15] = 0X THEN x := 96 END
- END
- END
- END
- | '2':
- IF s[12] = '0' THEN
- IF s[13] = '0' THEN
- CASE s[14] OF
- | '1':
- IF s[15] = 0X THEN x := 97 END
- | '8':
- IF s[15] = 0X THEN x := 99 END
- | '4':
- IF s[15] = 0X THEN x := 98 END
- ELSE END
- END
- END
- ELSE END
- ELSE END
- END
- END
- END
- END
- | '2':
- IF s[6] = '0' THEN
- IF s[7] = '0' THEN
- IF s[8] = '3' THEN
- IF s[9] = 0X THEN x := 133 END
- END
- END
- END
- ELSE END
- ELSE END
- | 'F':
- IF s[4] = 'I' THEN
- IF s[5] = 'V' THEN
- IF s[6] = 'E' THEN
- IF s[7] = 0X THEN x := 94 END
- END
- END
- END
- ELSE END
- END
- END
- | 'E':
- CASE s[1] OF
- | 'X':
- IF s[2] = 'T' THEN
- IF s[3] = 'E' THEN
- IF s[4] = 'N' THEN
- IF s[5] = 'D' THEN
- IF s[6] = 'E' THEN
- IF s[7] = 'D' THEN
- IF s[8] = '_' THEN
- IF s[9] = 'U' THEN
- IF s[10] = 'N' THEN
- IF s[11] = 'I' THEN
- IF s[12] = 'X' THEN
- IF s[13] = '_' THEN
- IF s[14] = 'C' THEN
- IF s[15] = 'O' THEN
- IF s[16] = 'D' THEN
- IF s[17] = 'E' THEN
- IF s[18] = '_' THEN
- IF s[19] = 'P' THEN
- IF s[20] = 'A' THEN
- IF s[21] = 'C' THEN
- IF s[22] = 'K' THEN
- IF s[23] = 'E' THEN
- IF s[24] = 'D' THEN
- IF s[25] = '_' THEN
- IF s[26] = 'F' THEN
- IF s[27] = 'O' THEN
- IF s[28] = 'R' THEN
- IF s[29] = 'M' THEN
- IF s[30] = 'A' THEN
- IF s[31] = 'T' THEN
- IF s[32] = '_' THEN
- IF s[33] = 'F' THEN
- IF s[34] = 'O' THEN
- IF s[35] = 'R' THEN
- IF s[36] = '_' THEN
- IF s[37] = 'J' THEN
- IF s[38] = 'A' THEN
- IF s[39] = 'P' THEN
- IF s[40] = 'A' THEN
- IF s[41] = 'N' THEN
- IF s[42] = 'E' THEN
- IF s[43] = 'S' THEN
- IF s[44] = 'E' THEN
- IF s[45] = 0X THEN x := 80 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | 'C':
- IF s[2] = 'M' THEN
- IF s[3] = 'A' THEN
- IF s[4] = '-' THEN
- IF s[5] = '1' THEN
- IF s[6] = '1' THEN
- CASE s[7] OF
- | '8':
- IF s[8] = 0X THEN x := 23 END
- | '4':
- IF s[8] = 0X THEN x := 22 END
- ELSE END
- END
- END
- END
- END
- END
- | 'U':
- IF s[2] = 'C' THEN
- CASE s[3] OF
- | 'C':
- IF s[4] = 'N' THEN
- IF s[5] = 0X THEN x := 86 END
- END
- | 'K':
- IF s[4] = 'R' THEN
- IF s[5] = 0X THEN x := 100 END
- END
- | 'J':
- IF s[4] = 'P' THEN
- IF s[5] = 0X THEN x := 80 END
- END
- | '-':
- CASE s[4] OF
- | 'C':
- IF s[5] = 'N' THEN
- IF s[6] = 0X THEN x := 86 END
- END
- | 'K':
- IF s[5] = 'R' THEN
- IF s[6] = 0X THEN x := 100 END
- END
- | 'J':
- CASE s[5] OF
- | 'I':
- IF s[6] = 'S' THEN
- CASE s[7] OF
- | 'X':
- IF s[8] = '0' THEN
- IF s[9] = '2' THEN
- IF s[10] = '1' THEN
- IF s[11] = '3' THEN
- IF s[12] = 0X THEN x := 130 END
- END
- END
- END
- END
- | '-':
- IF s[8] = '2' THEN
- IF s[9] = '0' THEN
- IF s[10] = '0' THEN
- IF s[11] = '4' THEN
- IF s[12] = 0X THEN x := 130 END
- END
- END
- END
- END
- ELSE END
- END
- | 'P':
- IF s[6] = 0X THEN x := 80 END
- ELSE END
- | 'T':
- IF s[5] = 'W' THEN
- IF s[6] = 0X THEN x := 93 END
- END
- ELSE END
- | 'T':
- IF s[4] = 'W' THEN
- IF s[5] = 0X THEN x := 93 END
- END
- ELSE END
- END
- | 'L':
- IF s[2] = 'O' THEN
- IF s[3] = 'T' THEN
- IF s[4] = '_' THEN
- IF s[5] = '9' THEN
- IF s[6] = '2' THEN
- IF s[7] = '8' THEN
- IF s[8] = 0X THEN x := 23 END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'D':
- IF s[1] = 'E' THEN
- IF s[2] = 'C' THEN
- IF s[3] = '-' THEN
- CASE s[4] OF
- | 'H':
- IF s[5] = 'A' THEN
- IF s[6] = 'N' THEN
- IF s[7] = 'Y' THEN
- IF s[8] = 'U' THEN
- IF s[9] = 0X THEN x := 114 END
- END
- END
- END
- END
- | 'K':
- IF s[5] = 'A' THEN
- IF s[6] = 'N' THEN
- IF s[7] = 'J' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 0X THEN x := 113 END
- END
- END
- END
- END
- ELSE END
- END
- END
- END
- | 'G':
- CASE s[1] OF
- | 'B':
- CASE s[2] OF
- | '1':
- IF s[3] = '8' THEN
- IF s[4] = '0' THEN
- IF s[5] = '3' THEN
- IF s[6] = '0' THEN
- IF s[7] = 0X THEN x := 89 END
- END
- END
- END
- END
- | 'K':
- IF s[3] = 0X THEN x := 87 END
- | '2':
- IF s[3] = '3' THEN
- IF s[4] = '1' THEN
- IF s[5] = '2' THEN
- IF s[6] = 0X THEN x := 86 END
- END
- END
- END
- | '_':
- CASE s[3] OF
- | '1':
- IF s[4] = '9' THEN
- IF s[5] = '8' THEN
- IF s[6] = '8' THEN
- IF s[7] = '-' THEN
- IF s[8] = '8' THEN
- IF s[9] = '0' THEN
- IF s[10] = 0X THEN x := 76 END
- END
- END
- END
- END
- END
- END
- | '2':
- IF s[4] = '3' THEN
- IF s[5] = '1' THEN
- IF s[6] = '2' THEN
- IF s[7] = '-' THEN
- IF s[8] = '8' THEN
- IF s[9] = '0' THEN
- IF s[10] = 0X THEN x := 77 END
- END
- END
- END
- END
- END
- END
- ELSE END
- ELSE END
- | 'R':
- IF s[2] = 'E' THEN
- IF s[3] = 'E' THEN
- IF s[4] = 'K' THEN
- CASE s[5] OF
- | 0X: x := 23
- | '8':
- IF s[6] = 0X THEN x := 23 END
- ELSE END
- END
- END
- END
- | 'E':
- IF s[2] = 'O' THEN
- IF s[3] = 'R' THEN
- IF s[4] = 'G' THEN
- IF s[5] = 'I' THEN
- IF s[6] = 'A' THEN
- IF s[7] = 'N' THEN
- IF s[8] = '-' THEN
- CASE s[9] OF
- | 'A':
- IF s[10] = 'C' THEN
- IF s[11] = 'A' THEN
- IF s[12] = 'D' THEN
- IF s[13] = 'E' THEN
- IF s[14] = 'M' THEN
- IF s[15] = 'Y' THEN
- IF s[16] = 0X THEN x := 62 END
- END
- END
- END
- END
- END
- END
- | 'P':
- IF s[10] = 'S' THEN
- IF s[11] = 0X THEN x := 63 END
- END
- ELSE END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'I':
- CASE s[1] OF
- | 'S':
- IF s[2] = 'O' THEN
- CASE s[3] OF
- | '8':
- IF s[4] = '8' THEN
- IF s[5] = '5' THEN
- IF s[6] = '9' THEN
- IF s[7] = '-' THEN
- CASE s[8] OF
- | '1':
- CASE s[9] OF
- | 0X: x := 17
- | '1':
- IF s[10] = 0X THEN x := 27 END
- | '0':
- IF s[10] = 0X THEN x := 26 END
- | '3':
- IF s[10] = 0X THEN x := 28 END
- | '5':
- IF s[10] = 0X THEN x := 30 END
- | '4':
- IF s[10] = 0X THEN x := 29 END
- | '6':
- IF s[10] = 0X THEN x := 31 END
- ELSE END
- | '3':
- IF s[9] = 0X THEN x := 19 END
- | '2':
- IF s[9] = 0X THEN x := 18 END
- | '5':
- IF s[9] = 0X THEN x := 21 END
- | '4':
- IF s[9] = 0X THEN x := 20 END
- | '7':
- IF s[9] = 0X THEN x := 23 END
- | '6':
- IF s[9] = 0X THEN x := 22 END
- | '9':
- IF s[9] = 0X THEN x := 25 END
- | '8':
- IF s[9] = 0X THEN x := 24 END
- ELSE END
- END
- END
- END
- END
- | '-':
- CASE s[4] OF
- | 'I':
- IF s[5] = 'R' THEN
- IF s[6] = '-' THEN
- CASE s[7] OF
- | '1':
- CASE s[8] OF
- | '1':
- IF s[9] = '0' THEN
- IF s[10] = 0X THEN x := 20 END
- END
- | '0':
- CASE s[9] OF
- | '9':
- IF s[10] = 0X THEN x := 19 END
- | '1':
- IF s[10] = 0X THEN x := 18 END
- | '0':
- IF s[10] = 0X THEN x := 17 END
- ELSE END
- | '3':
- IF s[9] = '8' THEN
- IF s[10] = 0X THEN x := 24 END
- END
- | '2':
- CASE s[9] OF
- | '7':
- IF s[10] = 0X THEN x := 22 END
- | '6':
- IF s[10] = 0X THEN x := 23 END
- ELSE END
- | '5':
- CASE s[9] OF
- | '9':
- IF s[10] = 0X THEN x := 75 END
- | '7':
- IF s[10] = 0X THEN x := 26 END
- ELSE END
- | '4':
- CASE s[9] OF
- | '9':
- IF s[10] = 0X THEN x := 79 END
- | '8':
- IF s[10] = 0X THEN x := 25 END
- | '4':
- IF s[10] = 0X THEN x := 21 END
- | 0X: x := 72
- ELSE END
- | '7':
- IF s[9] = '9' THEN
- IF s[10] = 0X THEN x := 28 END
- END
- | '6':
- IF s[9] = '5' THEN
- IF s[10] = 0X THEN x := 78 END
- END
- | '9':
- IF s[9] = '9' THEN
- IF s[10] = 0X THEN x := 29 END
- END
- ELSE END
- | '8':
- IF s[8] = '7' THEN
- IF s[9] = 0X THEN x := 74 END
- END
- | '2':
- CASE s[8] OF
- | '0':
- IF s[9] = '3' THEN
- IF s[10] = 0X THEN x := 30 END
- END
- | '3':
- IF s[9] = '0' THEN
- IF s[10] = 0X THEN x := 134 END
- END
- | '2':
- IF s[9] = '6' THEN
- IF s[10] = 0X THEN x := 31 END
- END
- ELSE END
- | '5':
- CASE s[8] OF
- | '8':
- IF s[9] = 0X THEN x := 77 END
- | '7':
- IF s[9] = 0X THEN x := 76 END
- ELSE END
- | '6':
- IF s[8] = 0X THEN x := 0 END
- ELSE END
- END
- END
- | '8':
- IF s[5] = '8' THEN
- IF s[6] = '5' THEN
- IF s[7] = '9' THEN
- IF s[8] = '-' THEN
- CASE s[9] OF
- | '1':
- CASE s[10] OF
- | 0X: x := 17
- | '1':
- IF s[11] = 0X THEN x := 27 END
- | '0':
- IF s[11] = 0X THEN x := 26 END
- | '3':
- IF s[11] = 0X THEN x := 28 END
- | '5':
- IF s[11] = 0X THEN x := 30 END
- | '4':
- IF s[11] = 0X THEN x := 29 END
- | '6':
- IF s[11] = 0X THEN x := 31 END
- ELSE END
- | '3':
- IF s[10] = 0X THEN x := 19 END
- | '2':
- IF s[10] = 0X THEN x := 18 END
- | '5':
- IF s[10] = 0X THEN x := 21 END
- | '4':
- IF s[10] = 0X THEN x := 20 END
- | '7':
- IF s[10] = 0X THEN x := 23 END
- | '6':
- IF s[10] = 0X THEN x := 22 END
- | '9':
- IF s[10] = 0X THEN x := 25 END
- | '8':
- IF s[10] = 0X THEN x := 24 END
- ELSE END
- END
- END
- END
- END
- | 'C':
- IF s[5] = 'E' THEN
- IF s[6] = 'L' THEN
- IF s[7] = 'T' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 'C' THEN
- IF s[10] = 0X THEN x := 29 END
- END
- END
- END
- END
- END
- | '2':
- IF s[5] = '0' THEN
- IF s[6] = '2' THEN
- IF s[7] = '2' THEN
- IF s[8] = '-' THEN
- CASE s[9] OF
- | 'C':
- IF s[10] = 'N' THEN
- CASE s[11] OF
- | 0X: x := 90
- | '-':
- IF s[12] = 'E' THEN
- IF s[13] = 'X' THEN
- IF s[14] = 'T' THEN
- IF s[15] = 0X THEN x := 91 END
- END
- END
- END
- ELSE END
- END
- | 'J':
- IF s[10] = 'P' THEN
- CASE s[11] OF
- | 0X: x := 83
- | '-':
- CASE s[12] OF
- | '1':
- IF s[13] = 0X THEN x := 84 END
- | '3':
- IF s[13] = 0X THEN x := 132 END
- | '2':
- CASE s[13] OF
- | 0X: x := 85
- | '0':
- IF s[14] = '0' THEN
- IF s[15] = '4' THEN
- IF s[16] = 0X THEN x := 132 END
- END
- END
- ELSE END
- ELSE END
- ELSE END
- END
- | 'K':
- IF s[10] = 'R' THEN
- IF s[11] = 0X THEN x := 103 END
- END
- ELSE END
- END
- END
- END
- END
- | '1':
- IF s[5] = '0' THEN
- IF s[6] = '6' THEN
- IF s[7] = '4' THEN
- IF s[8] = '6' THEN
- IF s[9] = '-' THEN
- IF s[10] = 'U' THEN
- IF s[11] = 'C' THEN
- IF s[12] = 'S' THEN
- IF s[13] = '-' THEN
- CASE s[14] OF
- | '2':
- IF s[15] = 0X THEN x := 2 END
- | '4':
- IF s[15] = 0X THEN x := 5 END
- ELSE END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | '_':
- CASE s[4] OF
- | '8':
- IF s[5] = '8' THEN
- IF s[6] = '5' THEN
- IF s[7] = '9' THEN
- IF s[8] = '-' THEN
- CASE s[9] OF
- | '1':
- CASE s[10] OF
- | 0X: x := 17
- | '1':
- IF s[11] = 0X THEN x := 27 END
- | '0':
- CASE s[11] OF
- | 0X: x := 26
- | ':':
- IF s[12] = '1' THEN
- IF s[13] = '9' THEN
- IF s[14] = '9' THEN
- IF s[15] = '2' THEN
- IF s[16] = 0X THEN x := 26 END
- END
- END
- END
- END
- ELSE END
- | '3':
- IF s[11] = 0X THEN x := 28 END
- | '5':
- CASE s[11] OF
- | 0X: x := 30
- | ':':
- IF s[12] = '1' THEN
- IF s[13] = '9' THEN
- IF s[14] = '9' THEN
- IF s[15] = '8' THEN
- IF s[16] = 0X THEN x := 30 END
- END
- END
- END
- END
- ELSE END
- | '4':
- CASE s[11] OF
- | 0X: x := 29
- | ':':
- IF s[12] = '1' THEN
- IF s[13] = '9' THEN
- IF s[14] = '9' THEN
- IF s[15] = '8' THEN
- IF s[16] = 0X THEN x := 29 END
- END
- END
- END
- END
- ELSE END
- | '6':
- CASE s[11] OF
- | 0X: x := 31
- | ':':
- IF s[12] = '2' THEN
- IF s[13] = '0' THEN
- IF s[14] = '0' THEN
- IF s[15] = '1' THEN
- IF s[16] = 0X THEN x := 31 END
- END
- END
- END
- END
- ELSE END
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '7' THEN
- IF s[15] = 0X THEN x := 17 END
- END
- END
- END
- END
- ELSE END
- | '3':
- CASE s[10] OF
- | 0X: x := 19
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '8' THEN
- IF s[15] = 0X THEN x := 19 END
- END
- END
- END
- END
- ELSE END
- | '2':
- CASE s[10] OF
- | 0X: x := 18
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '7' THEN
- IF s[15] = 0X THEN x := 18 END
- END
- END
- END
- END
- ELSE END
- | '5':
- CASE s[10] OF
- | 0X: x := 21
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '8' THEN
- IF s[15] = 0X THEN x := 21 END
- END
- END
- END
- END
- ELSE END
- | '4':
- CASE s[10] OF
- | 0X: x := 20
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '8' THEN
- IF s[15] = 0X THEN x := 20 END
- END
- END
- END
- END
- ELSE END
- | '7':
- CASE s[10] OF
- | 0X: x := 23
- | ':':
- CASE s[11] OF
- | '1':
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '7' THEN
- IF s[15] = 0X THEN x := 23 END
- END
- END
- END
- | '2':
- IF s[12] = '0' THEN
- IF s[13] = '0' THEN
- IF s[14] = '3' THEN
- IF s[15] = 0X THEN x := 23 END
- END
- END
- END
- ELSE END
- ELSE END
- | '6':
- CASE s[10] OF
- | 0X: x := 22
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '7' THEN
- IF s[15] = 0X THEN x := 22 END
- END
- END
- END
- END
- ELSE END
- | '9':
- CASE s[10] OF
- | 0X: x := 25
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '9' THEN
- IF s[15] = 0X THEN x := 25 END
- END
- END
- END
- END
- ELSE END
- | '8':
- CASE s[10] OF
- | 0X: x := 24
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '8' THEN
- IF s[14] = '8' THEN
- IF s[15] = 0X THEN x := 24 END
- END
- END
- END
- END
- ELSE END
- ELSE END
- END
- END
- END
- END
- | '6':
- IF s[5] = '4' THEN
- IF s[6] = '6' THEN
- IF s[7] = '.' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 'R' THEN
- IF s[10] = 'V' THEN
- IF s[11] = ':' THEN
- IF s[12] = '1' THEN
- IF s[13] = '9' THEN
- IF s[14] = '9' THEN
- IF s[15] = '1' THEN
- IF s[16] = 0X THEN x := 0 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | '6':
- IF s[4] = '4' THEN
- IF s[5] = '6' THEN
- IF s[6] = '-' THEN
- CASE s[7] OF
- | 'C':
- IF s[8] = 'N' THEN
- IF s[9] = 0X THEN x := 76 END
- END
- | 'J':
- IF s[8] = 'P' THEN
- IF s[9] = 0X THEN x := 72 END
- END
- | 'U':
- IF s[8] = 'S' THEN
- IF s[9] = 0X THEN x := 0 END
- END
- ELSE END
- END
- END
- END
- ELSE END
- END
- | 'B':
- IF s[2] = 'M' THEN
- CASE s[3] OF
- | '-':
- CASE s[4] OF
- | '1':
- IF s[5] = '1' THEN
- IF s[6] = '6' THEN
- CASE s[7] OF
- | '1':
- IF s[8] = 0X THEN x := 110 END
- | '3':
- IF s[8] = 0X THEN x := 112 END
- | '2':
- IF s[8] = 0X THEN x := 111 END
- ELSE END
- END
- END
- | 'C':
- IF s[5] = 'P' THEN
- IF s[6] = '1' THEN
- IF s[7] = '1' THEN
- IF s[8] = '3' THEN
- IF s[9] = '3' THEN
- IF s[10] = 0X THEN x := 68 END
- END
- END
- END
- END
- END
- ELSE END
- | '1':
- IF s[4] = '1' THEN
- IF s[5] = '6' THEN
- CASE s[6] OF
- | '1':
- IF s[7] = 0X THEN x := 110 END
- | '3':
- IF s[7] = 0X THEN x := 112 END
- | '2':
- IF s[7] = 0X THEN x := 111 END
- ELSE END
- END
- END
- | '3':
- IF s[4] = '6' THEN
- IF s[5] = '7' THEN
- IF s[6] = 0X THEN x := 0 END
- END
- END
- | '4':
- IF s[4] = '3' THEN
- IF s[5] = '7' THEN
- IF s[6] = 0X THEN x := 115 END
- END
- END
- | '7':
- IF s[4] = '7' THEN
- IF s[5] = '5' THEN
- IF s[6] = 0X THEN x := 117 END
- END
- END
- | '8':
- CASE s[4] OF
- | '1':
- IF s[5] = '9' THEN
- IF s[6] = 0X THEN x := 17 END
- END
- | '5':
- CASE s[5] OF
- | '0':
- IF s[6] = 0X THEN x := 43 END
- | '2':
- IF s[6] = 0X THEN x := 118 END
- | '5':
- IF s[6] = 0X THEN x := 120 END
- | '7':
- IF s[6] = 0X THEN x := 121 END
- ELSE END
- | '6':
- CASE s[5] OF
- | '1':
- IF s[6] = 0X THEN x := 124 END
- | '0':
- IF s[6] = 0X THEN x := 123 END
- | '3':
- IF s[6] = 0X THEN x := 125 END
- | '2':
- IF s[6] = 0X THEN x := 44 END
- | '5':
- IF s[6] = 0X THEN x := 127 END
- | '4':
- IF s[6] = 0X THEN x := 126 END
- | '6':
- IF s[6] = 0X THEN x := 45 END
- | '9':
- IF s[6] = 0X THEN x := 128 END
- ELSE END
- ELSE END
- ELSE END
- END
- ELSE END
- | 'H':
- CASE s[1] OF
- | 'P':
- IF s[2] = '-' THEN
- IF s[3] = 'R' THEN
- IF s[4] = 'O' THEN
- IF s[5] = 'M' THEN
- IF s[6] = 'A' THEN
- IF s[7] = 'N' THEN
- IF s[8] = '8' THEN
- IF s[9] = 0X THEN x := 59 END
- END
- END
- END
- END
- END
- END
- END
- | 'Z':
- CASE s[2] OF
- | 0X: x := 92
- | '-':
- IF s[3] = 'G' THEN
- IF s[4] = 'B' THEN
- IF s[5] = '-' THEN
- IF s[6] = '2' THEN
- IF s[7] = '3' THEN
- IF s[8] = '1' THEN
- IF s[9] = '2' THEN
- IF s[10] = 0X THEN x := 92 END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'E':
- IF s[2] = 'B' THEN
- IF s[3] = 'R' THEN
- IF s[4] = 'E' THEN
- IF s[5] = 'W' THEN
- IF s[6] = 0X THEN x := 24 END
- END
- END
- END
- END
- ELSE END
- | 'K':
- CASE s[1] OF
- | 'P':
- IF s[2] = 'S' THEN
- IF s[3] = '9' THEN
- IF s[4] = '5' THEN
- IF s[5] = '6' THEN
- IF s[6] = '6' THEN
- IF s[7] = 0X THEN x := 137 END
- END
- END
- END
- END
- END
- | 'S':
- CASE s[2] OF
- | 'C':
- IF s[3] = '_' THEN
- IF s[4] = '5' THEN
- IF s[5] = '6' THEN
- IF s[6] = '0' THEN
- IF s[7] = '1' THEN
- IF s[8] = 0X THEN x := 79 END
- END
- END
- END
- END
- END
- | '_':
- IF s[3] = 'C' THEN
- IF s[4] = '_' THEN
- IF s[5] = '5' THEN
- IF s[6] = '6' THEN
- IF s[7] = '0' THEN
- IF s[8] = '1' THEN
- IF s[9] = '-' THEN
- IF s[10] = '1' THEN
- IF s[11] = '9' THEN
- IF s[12] = '8' THEN
- CASE s[13] OF
- | '9':
- IF s[14] = 0X THEN x := 79 END
- | '7':
- IF s[14] = 0X THEN x := 79 END
- ELSE END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'Z':
- IF s[2] = '-' THEN
- IF s[3] = '1' THEN
- IF s[4] = '0' THEN
- IF s[5] = '4' THEN
- IF s[6] = '8' THEN
- IF s[7] = 0X THEN x := 66 END
- END
- END
- END
- END
- END
- | 'O':
- CASE s[2] OF
- | 'I':
- IF s[3] = '8' THEN
- IF s[4] = '-' THEN
- CASE s[5] OF
- | 'R':
- IF s[6] = 0X THEN x := 32 END
- | 'U':
- IF s[6] = 0X THEN x := 33 END
- | 'T':
- IF s[6] = 0X THEN x := 64 END
- ELSE END
- END
- END
- | 'R':
- IF s[3] = 'E' THEN
- IF s[4] = 'A' THEN
- IF s[5] = 'N' THEN
- IF s[6] = 0X THEN x := 79 END
- END
- END
- END
- ELSE END
- ELSE END
- | 'J':
- CASE s[1] OF
- | 'I':
- IF s[2] = 'S' THEN
- CASE s[3] OF
- | 'X':
- IF s[4] = '0' THEN
- IF s[5] = '2' THEN
- IF s[6] = '0' THEN
- IF s[7] = '1' THEN
- IF s[8] = '-' THEN
- IF s[9] = '1' THEN
- IF s[10] = '9' THEN
- IF s[11] = '7' THEN
- IF s[12] = '6' THEN
- IF s[13] = 0X THEN x := 73 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | '_':
- CASE s[4] OF
- | 'X':
- IF s[5] = '0' THEN
- IF s[6] = '2' THEN
- CASE s[7] OF
- | '1':
- IF s[8] = '2' THEN
- CASE s[9] OF
- | 0X: x := 75
- | '-':
- IF s[10] = '1' THEN
- IF s[11] = '9' THEN
- IF s[12] = '9' THEN
- IF s[13] = '0' THEN
- IF s[14] = 0X THEN x := 75 END
- END
- END
- END
- END
- | '.':
- IF s[10] = '1' THEN
- IF s[11] = '9' THEN
- IF s[12] = '9' THEN
- IF s[13] = '0' THEN
- IF s[14] = '-' THEN
- IF s[15] = '0' THEN
- IF s[16] = 0X THEN x := 75 END
- END
- END
- END
- END
- END
- END
- ELSE END
- END
- | '0':
- CASE s[8] OF
- | '1':
- IF s[9] = 0X THEN x := 73 END
- | '8':
- CASE s[9] OF
- | 0X: x := 74
- | '-':
- IF s[10] = '1' THEN
- IF s[11] = '9' THEN
- CASE s[12] OF
- | '9':
- IF s[13] = '0' THEN
- IF s[14] = 0X THEN x := 74 END
- END
- | '8':
- IF s[13] = '3' THEN
- IF s[14] = 0X THEN x := 74 END
- END
- ELSE END
- END
- END
- ELSE END
- ELSE END
- ELSE END
- END
- END
- | 'C':
- IF s[5] = '6' THEN
- IF s[6] = '2' THEN
- IF s[7] = '2' THEN
- CASE s[8] OF
- | '0':
- IF s[9] = '-' THEN
- IF s[10] = '1' THEN
- IF s[11] = '9' THEN
- IF s[12] = '6' THEN
- IF s[13] = '9' THEN
- IF s[14] = '-' THEN
- IF s[15] = 'R' THEN
- IF s[16] = 'O' THEN
- IF s[17] = 0X THEN x := 72 END
- END
- END
- END
- END
- END
- END
- END
- END
- | '6':
- IF s[9] = '-' THEN
- IF s[10] = '1' THEN
- IF s[11] = '9' THEN
- IF s[12] = '8' THEN
- IF s[13] = '3' THEN
- IF s[14] = 0X THEN x := 74 END
- END
- END
- END
- END
- END
- ELSE END
- END
- END
- END
- ELSE END
- | '0':
- IF s[4] = '2' THEN
- IF s[5] = '0' THEN
- IF s[6] = '8' THEN
- IF s[7] = 0X THEN x := 74 END
- END
- END
- END
- ELSE END
- END
- | 'P':
- IF s[2] = 0X THEN x := 72 END
- | 'A':
- IF s[2] = 'V' THEN
- IF s[3] = 'A' THEN
- IF s[4] = 0X THEN x := 16 END
- END
- END
- | 'O':
- IF s[2] = 'H' THEN
- IF s[3] = 'A' THEN
- IF s[4] = 'B' THEN
- IF s[5] = 0X THEN x := 102 END
- END
- END
- END
- ELSE END
- | 'M':
- CASE s[1] OF
- | 'A':
- IF s[2] = 'C' THEN
- CASE s[3] OF
- | 0X: x := 47
- | 'A':
- IF s[4] = 'R' THEN
- IF s[5] = 'A' THEN
- IF s[6] = 'B' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 'C' THEN
- IF s[9] = 0X THEN x := 57 END
- END
- END
- END
- END
- END
- | 'C':
- CASE s[4] OF
- | 'Y':
- IF s[5] = 'R' THEN
- IF s[6] = 'I' THEN
- IF s[7] = 'L' THEN
- IF s[8] = 'L' THEN
- IF s[9] = 'I' THEN
- IF s[10] = 'C' THEN
- IF s[11] = 0X THEN x := 52 END
- END
- END
- END
- END
- END
- END
- | 'R':
- IF s[5] = 'O' THEN
- IF s[6] = 'A' THEN
- IF s[7] = 'T' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 'A' THEN
- IF s[10] = 'N' THEN
- IF s[11] = 0X THEN x := 50 END
- END
- END
- END
- END
- END
- END
- | 'E':
- IF s[5] = 'N' THEN
- IF s[6] = 'T' THEN
- IF s[7] = 'R' THEN
- IF s[8] = 'A' THEN
- IF s[9] = 'L' THEN
- IF s[10] = 'E' THEN
- IF s[11] = 'U' THEN
- IF s[12] = 'R' THEN
- IF s[13] = 'O' THEN
- IF s[14] = 'P' THEN
- IF s[15] = 'E' THEN
- IF s[16] = 0X THEN x := 48 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'G':
- IF s[4] = 'R' THEN
- IF s[5] = 'E' THEN
- IF s[6] = 'E' THEN
- IF s[7] = 'K' THEN
- IF s[8] = 0X THEN x := 54 END
- END
- END
- END
- END
- | 'I':
- CASE s[4] OF
- | 'C':
- IF s[5] = 'E' THEN
- IF s[6] = 'L' THEN
- IF s[7] = 'A' THEN
- IF s[8] = 'N' THEN
- IF s[9] = 'D' THEN
- IF s[10] = 0X THEN x := 49 END
- END
- END
- END
- END
- END
- | 'N':
- IF s[5] = 'T' THEN
- IF s[6] = 'O' THEN
- IF s[7] = 'S' THEN
- IF s[8] = 'H' THEN
- IF s[9] = 0X THEN x := 47 END
- END
- END
- END
- END
- ELSE END
- | 'H':
- IF s[4] = 'E' THEN
- IF s[5] = 'B' THEN
- IF s[6] = 'R' THEN
- IF s[7] = 'E' THEN
- IF s[8] = 'W' THEN
- IF s[9] = 0X THEN x := 56 END
- END
- END
- END
- END
- END
- | 'R':
- IF s[4] = 'O' THEN
- IF s[5] = 'M' THEN
- IF s[6] = 'A' THEN
- IF s[7] = 'N' THEN
- CASE s[8] OF
- | 0X: x := 47
- | 'I':
- IF s[9] = 'A' THEN
- IF s[10] = 0X THEN x := 51 END
- END
- ELSE END
- END
- END
- END
- END
- | 'U':
- IF s[4] = 'K' THEN
- IF s[5] = 'R' THEN
- IF s[6] = 'A' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 'N' THEN
- IF s[9] = 'E' THEN
- IF s[10] = 0X THEN x := 53 END
- END
- END
- END
- END
- END
- END
- | 'T':
- CASE s[4] OF
- | 'H':
- IF s[5] = 'A' THEN
- IF s[6] = 'I' THEN
- IF s[7] = 0X THEN x := 58 END
- END
- END
- | 'U':
- IF s[5] = 'R' THEN
- IF s[6] = 'K' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 'S' THEN
- IF s[9] = 'H' THEN
- IF s[10] = 0X THEN x := 55 END
- END
- END
- END
- END
- END
- ELSE END
- ELSE END
- END
- | 'S':
- CASE s[2] OF
- | '9':
- IF s[3] = '3' THEN
- IF s[4] = '6' THEN
- IF s[5] = 0X THEN x := 88 END
- END
- END
- | '-':
- CASE s[3] OF
- | 'A':
- CASE s[4] OF
- | 'R':
- IF s[5] = 'A' THEN
- IF s[6] = 'B' THEN
- IF s[7] = 0X THEN x := 40 END
- END
- END
- | 'N':
- IF s[5] = 'S' THEN
- IF s[6] = 'I' THEN
- IF s[7] = 0X THEN x := 36 END
- END
- END
- ELSE END
- | 'C':
- IF s[4] = 'Y' THEN
- IF s[5] = 'R' THEN
- IF s[6] = 'L' THEN
- IF s[7] = 0X THEN x := 35 END
- END
- END
- END
- | 'E':
- IF s[4] = 'E' THEN
- IF s[5] = 0X THEN x := 34 END
- END
- | 'G':
- IF s[4] = 'R' THEN
- IF s[5] = 'E' THEN
- IF s[6] = 'E' THEN
- IF s[7] = 'K' THEN
- IF s[8] = 0X THEN x := 37 END
- END
- END
- END
- END
- | 'H':
- IF s[4] = 'E' THEN
- IF s[5] = 'B' THEN
- IF s[6] = 'R' THEN
- IF s[7] = 0X THEN x := 39 END
- END
- END
- END
- | 'T':
- IF s[4] = 'U' THEN
- IF s[5] = 'R' THEN
- IF s[6] = 'K' THEN
- IF s[7] = 0X THEN x := 38 END
- END
- END
- END
- ELSE END
- | '_':
- IF s[3] = 'K' THEN
- IF s[4] = 'A' THEN
- IF s[5] = 'N' THEN
- IF s[6] = 'J' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 0X THEN x := 81 END
- END
- END
- END
- END
- END
- ELSE END
- | 'U':
- IF s[2] = 'L' THEN
- IF s[3] = 'E' THEN
- IF s[4] = 'L' THEN
- IF s[5] = 'A' THEN
- IF s[6] = 'O' THEN
- IF s[7] = '-' THEN
- IF s[8] = '1' THEN
- IF s[9] = 0X THEN x := 67 END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'L':
- CASE s[1] OF
- | 'A':
- IF s[2] = 'T' THEN
- IF s[3] = 'I' THEN
- IF s[4] = 'N' THEN
- CASE s[5] OF
- | '-':
- IF s[6] = '9' THEN
- IF s[7] = 0X THEN x := 30 END
- END
- | '1':
- CASE s[6] OF
- | 0X: x := 17
- | '0':
- IF s[7] = 0X THEN x := 31 END
- ELSE END
- | '3':
- IF s[6] = 0X THEN x := 19 END
- | '2':
- IF s[6] = 0X THEN x := 18 END
- | '5':
- IF s[6] = 0X THEN x := 25 END
- | '4':
- IF s[6] = 0X THEN x := 20 END
- | '7':
- IF s[6] = 0X THEN x := 28 END
- | '6':
- IF s[6] = 0X THEN x := 26 END
- | '8':
- IF s[6] = 0X THEN x := 29 END
- ELSE END
- END
- END
- END
- | '1':
- CASE s[2] OF
- | 0X: x := 17
- | '0':
- IF s[3] = 0X THEN x := 31 END
- ELSE END
- | '3':
- IF s[2] = 0X THEN x := 19 END
- | '2':
- IF s[2] = 0X THEN x := 18 END
- | '5':
- IF s[2] = 0X THEN x := 25 END
- | '4':
- IF s[2] = 0X THEN x := 20 END
- | '7':
- IF s[2] = 0X THEN x := 28 END
- | '6':
- IF s[2] = 0X THEN x := 26 END
- | '8':
- IF s[2] = 0X THEN x := 29 END
- ELSE END
- | 'N':
- IF s[1] = 'E' THEN
- IF s[2] = 'X' THEN
- IF s[3] = 'T' THEN
- IF s[4] = 'S' THEN
- IF s[5] = 'T' THEN
- IF s[6] = 'E' THEN
- IF s[7] = 'P' THEN
- IF s[8] = 0X THEN x := 60 END
- END
- END
- END
- END
- END
- END
- END
- | 'P':
- IF s[1] = 'T' THEN
- CASE s[2] OF
- | '1':
- IF s[3] = '5' THEN
- IF s[4] = '4' THEN
- IF s[5] = 0X THEN x := 65 END
- END
- END
- | 'C':
- IF s[3] = 'P' THEN
- IF s[4] = '1' THEN
- IF s[5] = '5' THEN
- IF s[6] = '4' THEN
- IF s[7] = 0X THEN x := 65 END
- END
- END
- END
- END
- ELSE END
- END
- | 'S':
- CASE s[1] OF
- | 'H':
- IF s[2] = 'I' THEN
- IF s[3] = 'F' THEN
- IF s[4] = 'T' THEN
- CASE s[5] OF
- | '-':
- IF s[6] = 'J' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 'S' THEN
- IF s[9] = 0X THEN x := 81 END
- END
- END
- END
- | '_':
- IF s[6] = 'J' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 'S' THEN
- CASE s[9] OF
- | 0X: x := 81
- | 'X':
- IF s[10] = '0' THEN
- IF s[11] = '2' THEN
- IF s[12] = '1' THEN
- IF s[13] = '3' THEN
- IF s[14] = 0X THEN x := 131 END
- END
- END
- END
- END
- | '-':
- IF s[10] = '2' THEN
- IF s[11] = '0' THEN
- IF s[12] = '0' THEN
- IF s[13] = '4' THEN
- IF s[14] = 0X THEN x := 131 END
- END
- END
- END
- END
- ELSE END
- END
- END
- END
- ELSE END
- END
- END
- END
- | 'J':
- IF s[2] = 'I' THEN
- IF s[3] = 'S' THEN
- IF s[4] = 0X THEN x := 81 END
- END
- END
- | 'T':
- IF s[2] = 'R' THEN
- IF s[3] = 'K' THEN
- IF s[4] = '1' THEN
- IF s[5] = '0' THEN
- IF s[6] = '4' THEN
- IF s[7] = '8' THEN
- IF s[8] = '-' THEN
- IF s[9] = '2' THEN
- IF s[10] = '0' THEN
- IF s[11] = '0' THEN
- IF s[12] = '2' THEN
- IF s[13] = 0X THEN x := 66 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- ELSE END
- | 'R':
- CASE s[1] OF
- | 'I':
- IF s[2] = 'S' THEN
- IF s[3] = 'C' THEN
- IF s[4] = 'O' THEN
- IF s[5] = 'S' THEN
- IF s[6] = '-' THEN
- IF s[7] = 'L' THEN
- IF s[8] = 'A' THEN
- IF s[9] = 'T' THEN
- IF s[10] = 'I' THEN
- IF s[11] = 'N' THEN
- IF s[12] = '1' THEN
- IF s[13] = 0X THEN x := 136 END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- END
- | '8':
- IF s[2] = 0X THEN x := 59 END
- | 'K':
- IF s[2] = '1' THEN
- IF s[3] = '0' THEN
- IF s[4] = '4' THEN
- IF s[5] = '8' THEN
- IF s[6] = 0X THEN x := 66 END
- END
- END
- END
- END
- | 'O':
- IF s[2] = 'M' THEN
- IF s[3] = 'A' THEN
- IF s[4] = 'N' THEN
- IF s[5] = '8' THEN
- IF s[6] = 0X THEN x := 59 END
- END
- END
- END
- END
- ELSE END
- | 'U':
- CASE s[1] OF
- | 'S':
- CASE s[2] OF
- | 0X: x := 0
- | '-':
- IF s[3] = 'A' THEN
- IF s[4] = 'S' THEN
- IF s[5] = 'C' THEN
- IF s[6] = 'I' THEN
- IF s[7] = 'I' THEN
- IF s[8] = 0X THEN x := 0 END
- END
- END
- END
- END
- END
- ELSE END
- | 'H':
- IF s[2] = 'C' THEN
- IF s[3] = 0X THEN x := 101 END
- END
- | 'C':
- IF s[2] = 'S' THEN
- IF s[3] = '-' THEN
- CASE s[4] OF
- | '2':
- CASE s[5] OF
- | 0X: x := 2
- | 'B':
- IF s[6] = 'E' THEN
- IF s[7] = 0X THEN x := 3 END
- END
- | 'L':
- IF s[6] = 'E' THEN
- IF s[7] = 0X THEN x := 4 END
- END
- ELSE END
- | '4':
- CASE s[5] OF
- | 0X: x := 5
- | 'B':
- IF s[6] = 'E' THEN
- IF s[7] = 0X THEN x := 6 END
- END
- | 'L':
- IF s[6] = 'E' THEN
- IF s[7] = 0X THEN x := 7 END
- END
- ELSE END
- ELSE END
- END
- END
- | 'T':
- IF s[2] = 'F' THEN
- CASE s[3] OF
- | '8':
- IF s[4] = 0X THEN x := 1 END
- | '-':
- CASE s[4] OF
- | '1':
- IF s[5] = '6' THEN
- CASE s[6] OF
- | 0X: x := 8
- | 'B':
- IF s[7] = 'E' THEN
- IF s[8] = 0X THEN x := 9 END
- END
- | 'L':
- IF s[7] = 'E' THEN
- IF s[8] = 0X THEN x := 10 END
- END
- ELSE END
- END
- | '8':
- IF s[5] = 0X THEN x := 1 END
- | '3':
- IF s[5] = '2' THEN
- CASE s[6] OF
- | 0X: x := 11
- | 'B':
- IF s[7] = 'E' THEN
- IF s[8] = 0X THEN x := 12 END
- END
- | 'L':
- IF s[7] = 'E' THEN
- IF s[8] = 0X THEN x := 13 END
- END
- ELSE END
- END
- | '7':
- IF s[5] = 0X THEN x := 14 END
- ELSE END
- ELSE END
- END
- | 'N':
- IF s[2] = 'I' THEN
- IF s[3] = 'C' THEN
- IF s[4] = 'O' THEN
- IF s[5] = 'D' THEN
- IF s[6] = 'E' THEN
- CASE s[7] OF
- | 'B':
- IF s[8] = 'I' THEN
- IF s[9] = 'G' THEN
- IF s[10] = 0X THEN x := 3 END
- END
- END
- | '-':
- IF s[8] = '1' THEN
- IF s[9] = '-' THEN
- IF s[10] = '1' THEN
- CASE s[11] OF
- | 0X: x := 3
- | '-':
- IF s[12] = 'U' THEN
- IF s[13] = 'T' THEN
- IF s[14] = 'F' THEN
- IF s[15] = '-' THEN
- IF s[16] = '7' THEN
- IF s[17] = 0X THEN x := 14 END
- END
- END
- END
- END
- END
- ELSE END
- END
- END
- END
- | 'L':
- IF s[8] = 'I' THEN
- IF s[9] = 'T' THEN
- IF s[10] = 'T' THEN
- IF s[11] = 'L' THEN
- IF s[12] = 'E' THEN
- IF s[13] = 0X THEN x := 4 END
- END
- END
- END
- END
- END
- ELSE END
- END
- END
- END
- END
- END
- ELSE END
- | 'T':
- CASE s[1] OF
- | 'C':
- IF s[2] = 'V' THEN
- IF s[3] = 'N' THEN
- CASE s[4] OF
- | 0X: x := 71
- | '-':
- IF s[5] = '5' THEN
- IF s[6] = '7' THEN
- IF s[7] = '1' THEN
- IF s[8] = '2' THEN
- IF s[9] = 0X THEN x := 71 END
- END
- END
- END
- END
- | '5':
- IF s[5] = '7' THEN
- IF s[6] = '1' THEN
- IF s[7] = '2' THEN
- IF s[8] = '-' THEN
- IF s[9] = '1' THEN
- CASE s[10] OF
- | 0X: x := 71
- | ':':
- IF s[11] = '1' THEN
- IF s[12] = '9' THEN
- IF s[13] = '9' THEN
- IF s[14] = '3' THEN
- IF s[15] = 0X THEN x := 71 END
- END
- END
- END
- END
- ELSE END
- END
- END
- END
- END
- END
- ELSE END
- END
- END
- | 'D':
- IF s[2] = 'S' THEN
- IF s[3] = '5' THEN
- IF s[4] = '6' THEN
- IF s[5] = '5' THEN
- IF s[6] = 0X THEN x := 134 END
- END
- END
- END
- END
- ELSE END
- | 'W':
- IF s[1] = 'I' THEN
- IF s[2] = 'N' THEN
- CASE s[3] OF
- | 'B':
- IF s[4] = 'A' THEN
- IF s[5] = 'L' THEN
- IF s[6] = 'T' THEN
- IF s[7] = 'R' THEN
- IF s[8] = 'I' THEN
- IF s[9] = 'M' THEN
- IF s[10] = 0X THEN x := 41 END
- END
- END
- END
- END
- END
- END
- | 'D':
- IF s[4] = 'O' THEN
- IF s[5] = 'W' THEN
- IF s[6] = 'S' THEN
- IF s[7] = '-' THEN
- CASE s[8] OF
- | '9':
- IF s[9] = '3' THEN
- IF s[10] = '6' THEN
- IF s[11] = 0X THEN x := 88 END
- END
- END
- | '8':
- IF s[9] = '7' THEN
- IF s[10] = '4' THEN
- IF s[11] = 0X THEN x := 69 END
- END
- END
- | '1':
- IF s[9] = '2' THEN
- IF s[10] = '5' THEN
- CASE s[11] OF
- | '1':
- IF s[12] = 0X THEN x := 35 END
- | '0':
- IF s[12] = 0X THEN x := 34 END
- | '3':
- IF s[12] = 0X THEN x := 37 END
- | '2':
- IF s[12] = 0X THEN x := 36 END
- | '5':
- IF s[12] = 0X THEN x := 39 END
- | '4':
- IF s[12] = 0X THEN x := 38 END
- | '7':
- IF s[12] = 0X THEN x := 41 END
- | '6':
- IF s[12] = 0X THEN x := 40 END
- | '8':
- IF s[12] = 0X THEN x := 42 END
- ELSE END
- END
- END
- ELSE END
- END
- END
- END
- END
- ELSE END
- END
- END
- | 'V':
- IF s[1] = 'I' THEN
- IF s[2] = 'S' THEN
- IF s[3] = 'C' THEN
- IF s[4] = 'I' THEN
- IF s[5] = 'I' THEN
- CASE s[6] OF
- | 0X: x := 70
- | '1':
- IF s[7] = '.' THEN
- IF s[8] = '1' THEN
- IF s[9] = '-' THEN
- IF s[10] = '1' THEN
- IF s[11] = 0X THEN x := 70 END
- END
- END
- END
- END
- ELSE END
- END
- END
- END
- END
- END
- | 'X':
- IF s[1] = '0' THEN
- IF s[2] = '2' THEN
- CASE s[3] OF
- | '1':
- IF s[4] = '2' THEN
- IF s[5] = 0X THEN x := 75 END
- END
- | '0':
- CASE s[4] OF
- | '1':
- IF s[5] = 0X THEN x := 73 END
- | '8':
- IF s[5] = 0X THEN x := 74 END
- ELSE END
- ELSE END
- END
- END
- ELSE END;
- ok := TRUE;
- CASE x OF -1: ok := FALSE
- | 0: r := modPrefix + "ascii"
- | 1: r := modPrefix + "utf_8"
- | 2: r := modPrefix + "ucs_2"
- | 3: r := modPrefix + "ucs_2be"
- | 4: r := modPrefix + "ucs_2le"
- | 5: r := modPrefix + "ucs_4"
- | 6: r := modPrefix + "ucs_4be"
- | 7: r := modPrefix + "ucs_4le"
- | 8: r := modPrefix + "utf_16"
- | 9: r := modPrefix + "utf_16be"
- | 10: r := modPrefix + "utf_16le"
- | 11: r := modPrefix + "utf_32"
- | 12: r := modPrefix + "utf_32be"
- | 13: r := modPrefix + "utf_32le"
- | 14: r := modPrefix + "utf_7"
- | 15: r := modPrefix + "c99"
- | 16: r := modPrefix + "java"
- | 17: r := modPrefix + "iso8858_1"
- | 18: r := modPrefix + "iso8859_2"
- | 19: r := modPrefix + "iso8859_3"
- | 20: r := modPrefix + "iso8859_4"
- | 21: r := modPrefix + "iso8859_5"
- | 22: r := modPrefix + "iso8859_6"
- | 23: r := modPrefix + "iso8859_7"
- | 24: r := modPrefix + "iso8859_8"
- | 25: r := modPrefix + "iso8859_9"
- | 26: r := modPrefix + "iso8859_10"
- | 27: r := modPrefix + "iso8859_11"
- | 28: r := modPrefix + "iso8859_13"
- | 29: r := modPrefix + "iso8859_14"
- | 30: r := modPrefix + "iso8859_15"
- | 31: r := modPrefix + "iso8859_16"
- | 32: r := modPrefix + "koi8_r"
- | 33: r := modPrefix + "koi8_u"
- | 34: r := modPrefix + "cp1250"
- | 35: r := modPrefix + "cp1251"
- | 36: r := modPrefix + "cp1252"
- | 37: r := modPrefix + "cp1253"
- | 38: r := modPrefix + "cp1254"
- | 39: r := modPrefix + "cp1255"
- | 40: r := modPrefix + "cp1256"
- | 41: r := modPrefix + "cp1257"
- | 42: r := modPrefix + "cp1258"
- | 43: r := modPrefix + "cp850"
- | 44: r := modPrefix + "cp862"
- | 45: r := modPrefix + "cp866"
- | 46: r := modPrefix + "cp1131"
- | 47: r := modPrefix + "mac_roman"
- | 48: r := modPrefix + "mac_centraleurope"
- | 49: r := modPrefix + "mac_iceland"
- | 50: r := modPrefix + "mac_croatian"
- | 51: r := modPrefix + "mac_romania"
- | 52: r := modPrefix + "mac_cyrillic"
- | 53: r := modPrefix + "mac_ukraine"
- | 54: r := modPrefix + "mac_greek"
- | 55: r := modPrefix + "mac_turkish"
- | 56: r := modPrefix + "mac_hebrew"
- | 57: r := modPrefix + "mac_abaric"
- | 58: r := modPrefix + "mac_thai"
- | 59: r := modPrefix + "hp_roman8"
- | 60: r := modPrefix + "nextstep"
- | 61: r := modPrefix + "armscii_8"
- | 62: r := modPrefix + "georgian_academy"
- | 63: r := modPrefix + "georgian_ps"
- | 64: r := modPrefix + "koi8_t"
- | 65: r := modPrefix + "ptcp154"
- | 66: r := modPrefix + "kz1048"
- | 67: r := modPrefix + "mulelao_1"
- | 68: r := modPrefix + "cp1133"
- | 69: r := modPrefix + "cp874"
- | 70: r := modPrefix + "viscii"
- | 71: r := modPrefix + "tcvn"
- | 72: r := modPrefix + "iso_ir_14"
- | 73: r := modPrefix + "jis_x0201"
- | 74: r := modPrefix + "jis_x0208"
- | 75: r := modPrefix + "jis_x0212"
- | 76: r := modPrefix + "iso_ir_57"
- | 77: r := modPrefix + "iso_ir_58"
- | 78: r := modPrefix + "iso_ir_165"
- | 79: r := modPrefix + "iso_ir_149"
- | 80: r := modPrefix + "eucjp"
- | 81: r := modPrefix + "sjis"
- | 82: r := modPrefix + "cp932"
- | 83: r := modPrefix + "iso_2022_jp"
- | 84: r := modPrefix + "iso_2022_jp_1"
- | 85: r := modPrefix + "iso_2022_jp_2"
- | 86: r := modPrefix + "gb2312"
- | 87: r := modPrefix + "gbk"
- | 88: r := modPrefix + "cp936"
- | 89: r := modPrefix + "cb18030"
- | 90: r := modPrefix + "iso_2022_cn"
- | 91: r := modPrefix + "iso_2022_cn_ext"
- | 92: r := modPrefix + "hz"
- | 93: r := modPrefix + "euctw"
- | 94: r := modPrefix + "big5"
- | 95: r := modPrefix + "cp950"
- | 96: r := modPrefix + "big5_hkscs_1999"
- | 97: r := modPrefix + "big5_hkscs_2001"
- | 98: r := modPrefix + "big5_hkscs_2004"
- | 99: r := modPrefix + "big5_hkscs"
- | 100: r := modPrefix + "euccr"
- | 101: r := modPrefix + "cp949"
- | 102: r := modPrefix + "cp1361"
- | 103: r := modPrefix + "iso_2022_kr"
- | 104: r := modPrefix + "cp856"
- | 105: r := modPrefix + "cp922"
- | 106: r := modPrefix + "cp943"
- | 107: r := modPrefix + "cp1046"
- | 108: r := modPrefix + "cp1124"
- | 109: r := modPrefix + "cp1129"
- | 110: r := modPrefix + "cp1161"
- | 111: r := modPrefix + "cp1162"
- | 112: r := modPrefix + "cp1163"
- | 113: r := modPrefix + "dec_kanji"
- | 114: r := modPrefix + "dec_hanyu"
- | 115: r := modPrefix + "cp437"
- | 116: r := modPrefix + "cp737"
- | 117: r := modPrefix + "cp775"
- | 118: r := modPrefix + "cp852"
- | 119: r := modPrefix + "cp853"
- | 120: r := modPrefix + "cp855"
- | 121: r := modPrefix + "cp857"
- | 122: r := modPrefix + "cp858"
- | 123: r := modPrefix + "cp860"
- | 124: r := modPrefix + "cp861"
- | 125: r := modPrefix + "cp863"
- | 126: r := modPrefix + "cp864"
- | 127: r := modPrefix + "cp865"
- | 128: r := modPrefix + "cp869"
- | 129: r := modPrefix + "cp1125"
- | 130: r := modPrefix + "euc_jisx0213"
- | 131: r := modPrefix + "shift_jisx0213"
- | 132: r := modPrefix + "iso_2022_jp_3"
- | 133: r := modPrefix + "big5_2003"
- | 134: r := modPrefix + "iso_ir_230"
- | 135: r := modPrefix + "atarist"
- | 136: r := modPrefix + "riscos_latin1"
- | 137: r := modPrefix + "kps9566"
- | 138: r := modPrefix + "cp720"
- END
- END GetModName;
- END EncStdAliases.
|