Home Verkennen Help
Inloggen
eric
/
TurboModula2
1
0
Vork 0
Bestanden Issues 0 Pull-aanvragen 0 Wiki
Boom: codegen-ve
Aftakkingen Labels
TurboModula2
/
docs
/
compiler
/
disasm
/
native.txt

native.txt 132 KB
Permalink Geschiedenis Ruwe

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499 
  1. module start at 19f1
    2. 

  2. 19f1 : Module NATIVE
    3. 

  3. 	depends on Zâüá°átá 
    4. 

  4. 	depends on °átáJá“ÿ 
    5. 

  5. 	depends on COMPILER 
    6. 

  6. 	depends on INTELL 
    7. 

  7. 	depends on TEXTS 
    8. 

  8. 

  9. NATIVE.NATIVE: 18ce
    10. 

  10. NATIVE.ASSERT: 0016
    11. 

  11. NATIVE.DPATCH: 0381
    12. 

  12. NATIVE.OPSIZ : 0067
    13. 

  13. NATIVE.OPERAN: 0083
    14. 

  14. NATIVE.INTERP: 00a6
    15. 

  15. NATIVE.RUNTIM: 00c6
    16. 

  16. NATIVE.RELOP : 00e3
    17. 

  17. NATIVE.PATCH : 0346
    18. 

  18. NATIVE.SETLAB: 05f6
    19. 

  19. NATIVE.GEN1L2: 07ed
    20. 

  20. NATIVE.PUSHIT: 098f
    21. 

  21. NATIVE.POPIT : 099f
    22. 

  22. NATIVE.STACKE: 0b01
    23. 

  23. NATIVE.GENCAL: 0b18
    24. 

  24. NATIVE.AAAAAA: 0000
    25. 

  25. NATIVE.FATAL : 003d
    26. 

  26. NATIVE.OPFILL: 0100
    27. 

  27. NATIVE.INIT  : 012f
    28. 

  28. NATIVE.WRITEP: 03ae
    29. 

  29. NATIVE.GETBYT: 03e4
    30. 

  30. NATIVE.NEXTBY: 03fd
    31. 

  31. NATIVE.NEXTWO: 0420
    32. 

  32. NATIVE.LOOKAH: 0435
    33. 

  33. NATIVE.NEWLIN: 044b
    34. 

  34. NATIVE.WRITEH: 0454
    35. 

  35. NATIVE.WRITET: 04b3
    36. 

  36. NATIVE.WRITEA: 0581
    37. 

  37. NATIVE.PUSHOP: 09b9
    38. 

  38. NATIVE.PUSHBA: 05cb
    39. 

  39. NATIVE.GENBLA: 062f
    40. 

  40. NATIVE.EXHAND: 0699
    41. 

  41. NATIVE.CHECKP: 0702
    42. 

  42. NATIVE.GENFLA: 077d
    43. 

  43. NATIVE.ENTERC: 085d
    44. 

  44. NATIVE.ENTERM: 0948
    45. 

  45. NATIVE.GLOBAL: 0962
    46. 

  46. NATIVE.PUSHLE: 0a06
    47. 

  47. NATIVE.PUSHCO: 0a2c
    48. 

  48. NATIVE.PUSHEX: 0a4d
    49. 

  49. NATIVE.PUSHDE: 0a69
    50. 

  50. NATIVE.PUSHME: 0aa4
    51. 

  51. NATIVE.LOADAL: 0af4
    52. 

  52. NATIVE.LOADIT: 0add
    53. 

  53. NATIVE.MAKECA: 0c84
    54. 

  54. NATIVE.GENRET: 0d04
    55. 

  55. NATIVE.TRANSL: 0f0b
    56. 

  56. NATIVE.LOADST: 0e21
    57. 

  57. NATIVE.DISP  : 0eee
    58. 

  58. NATIVE.SCAN  : 16d7
    59. 

  59. NATIVE.OUTPN : 1698
    60. 

  60. NATIVE.0BZNVE: 1944
    61. 

  61. 

  62. 

  63. 0000  0f        load indexed dword
    64. 

  64. 0001  61        load stack word1
    65. 

  65. 0002  73        store stack word3
    66. 

  66. 0003  73        store stack word3
    67. 

  67. 0004  65        load stack word5
    68. 

  68. 0005  72        store stack word2
    69. 

  69. 0006  74        store stack word4
    70. 

  70. 0007  69        load stack word9
    71. 

  71. 0008  6f        load stack word15
    72. 

  72. 0009  6e        load stack word14
    73. 

  73. 000a  66        load stack word6
    74. 

  74. 000b  61        load stack word1
    75. 

  75. 000c  69        load stack word9
    76. 

  76. 000d  6c        load stack word12
    77. 

  77. 000e  65        load stack word5
    78. 

  78. 000f  64        load stack word4
    79. 

  79. 0010  34        store local word-4
    80. 

  80. 0011  68        load stack word8
    81. 

  81. 0012  b6        not
    82. 

  82. 0013  6d        load stack word13
    83. 

  83. 0014  00        Error16
    84. 

  84. 0015  00        Error16
    85. 

  85. 0016  d4 ff     enter -1
    86. 

  86. 0018  03        load param1
    87. 

  87. 0019  b6        not
    88. 

  88. 001a  e3 1a     jpfalse 0036
    89. 

  89. 001c  92        load immediate 2
    90. 

  90. 001d  8c 05  .. load immediate string "nlc ="
    91. 

  91. 0024  94        load immediate 4
    92. 

  92. 0025  f0 59     call ›âZâüá°á.proc9
    93. 

  93. 0027  92        load immediate 2
    94. 

  94. 0028  0c 32     load INTELL.word2
    95. 

  95. 002a  96        load immediate 6
    96. 

  96. 002b  f0 5b     call ›âZâüá°á.proc11
    97. 

  97. 002d  92        load immediate 2
    98. 

  98. 002e  f0 5e     call ›âZâüá°á.proc14
    99. 

  99. 0030  8e 0f 01  load immediate 271
    100. 

  100. 0033  90        load immediate 0
    101. 

  101. 0034  90        load immediate 0
    102. 

  102. 0035  01        Raise
    103. 

  103. 0036  89        leave2
    104. 

  104. 0037  31        copy string
    105. 

  105. 0038  6b        load stack word11
    106. 

  106. 0039  56        store global word6
    107. 

  107. 003a  d2        reserve
    108. 

  108. 003b  00        Error16
    109. 

  109. 003c  00        Error16
    110. 

  110. 003d  d4 ff     enter -1
    111. 

  111. 003f  03        load param1
    112. 

  112. 0040  ac        inc
    113. 

  113. 0041  04        load param2
    114. 

  114. 0042  40 12     reserve_string
    115. 

  115. 0044  14        store param2
    116. 

  116. 0045  92        load immediate 2
    117. 

  117. 0046  8c 07  .. load immediate string "ERROR: "
    118. 

  118. 004f  96        load immediate 6
    119. 

  119. 0050  f0 59     call ›âZâüá°á.proc9
    120. 

  120. 0052  92        load immediate 2
    121. 

  121. 0053  04        load param2
    122. 

  122. 0054  03        load param1
    123. 

  123. 0055  f0 59     call ›âZâüá°á.proc9
    124. 

  124. 0057  92        load immediate 2
    125. 

  125. 0058  f0 5e     call ›âZâüá°á.proc14
    126. 

  126. 005a  83 00 04  load address Zâüá°átá.WORD4
    127. 

  127. 005d  f0 14     call °átáJá“ÿ.proc4
    128. 

  128. 005f  50        end_program
    129. 

  129. 0060  8a        leave4
    130. 

  130. 0061  d0        iadd_checked
    131. 

  131. 0062  67        load stack word7
    132. 

  132. 0063  72        store stack word2
    133. 

  133. 0064  d4 00     enter +0
    134. 

  134. 0066  00        Error16
    135. 

  135. 0067  d4 ff     enter -1
    136. 

  136. 0069  4c        load global word12
    137. 

  137. 006a  03        load param1
    138. 

  138. 006b  8d ff     load immediate 255
    139. 

  139. 006d  dc        limit_check
    140. 

  140. 006e  0e        load indexed word
    141. 

  141. 006f  8d 3f     load immediate 63
    142. 

  142. 0071  e8        bitwise_and
    143. 

  143. 0072  b1 02     shr 2
    144. 

  144. 0074  8d ff     load immediate 255
    145. 

  145. 0076  dc        limit_check
    146. 

  146. 0077  85 81     fct_leave 129
    147. 

  147. 0079  99        load immediate 9
    148. 

  148. 007a  90        load immediate 0
    149. 

  149. 007b  90        load immediate 0
    150. 

  150. 007c  01        Raise
    151. 

  151. 007d  d8        real_mul
    152. 

  152. 007e  18 65     store local dword +101
    153. 

  153. 0080  49        load global word9
    154. 

  154. 0081  00        Error16
    155. 

  155. 0082  00        Error16
    156. 

  156. 0083  d4 fd     enter -3
    157. 

  157. 0085  4c        load global word12
    158. 

  158. 0086  03        load param1
    159. 

  159. 0087  8d ff     load immediate 255
    160. 

  160. 0089  dc        limit_check
    161. 

  161. 008a  0e        load indexed word
    162. 

  162. 008b  8e ff 01  load immediate 511
    163. 

  163. 008e  e8        bitwise_and
    164. 

  164. 008f  b1 06     shr 6
    165. 

  165. 0091  32        store local word-2
    166. 

  166. 0092  22        load local word-2
    167. 

  167. 0093  97        load immediate 7
    168. 

  168. 0094  a1        not_equal
    169. 

  169. 0095  f1        call proc1
    170. 

  170. 0096  22        load local word-2
    171. 

  171. 0097  8d ff     load immediate 255
    172. 

  172. 0099  dc        limit_check
    173. 

  173. 009a  85 81     fct_leave 129
    174. 

  174. 009c  99        load immediate 9
    175. 

  175. 009d  90        load immediate 0
    176. 

  176. 009e  90        load immediate 0
    177. 

  177. 009f  01        Raise
    178. 

  178. 00a0  22        load local word-2
    179. 

  179. 00a1  6d        load stack word13
    180. 

  180. 00a2  26        load local word-6
    181. 

  181. 00a3  57        store global word7
    182. 

  182. 00a4  00        Error16
    183. 

  183. 00a5  00        Error16
    184. 

  184. 00a6  d4 fd     enter -3
    185. 

  185. 00a8  4c        load global word12
    186. 

  186. 00a9  03        load param1
    187. 

  187. 00aa  8d ff     load immediate 255
    188. 

  188. 00ac  dc        limit_check
    189. 

  189. 00ad  0e        load indexed word
    190. 

  190. 00ae  b1 09     shr 9
    191. 

  191. 00b0  32        store local word-2
    192. 

  192. 00b1  22        load local word-2
    193. 

  193. 00b2  cb        not_zero
    194. 

  194. 00b3  f1        call proc1
    195. 

  195. 00b4  8d cd     load immediate 205
    196. 

  196. 00b6  8e 30 04  load immediate 1072
    197. 

  197. 00b9  22        load local word-2
    198. 

  198. 00ba  95        load immediate 5
    199. 

  199. 00bb  a8        umul
    200. 

  200. 00bc  a6        add
    201. 

  201. 00bd  f0 36     call INTELL.proc6
    202. 

  202. 00bf  89        leave2
    203. 

  203. 00c0  5d        store global word13
    204. 

  204. 00c1  4c        load global word12
    205. 

  205. 00c2  f3        call proc3
    206. 

  206. 00c3  44        load global word4
    207. 

  207. 00c4  00        Error16
    208. 

  208. 00c5  00        Error16
    209. 

  209. 00c6  d4 fd     enter -3
    210. 

  210. 00c8  4c        load global word12
    211. 

  211. 00c9  03        load param1
    212. 

  212. 00ca  8d ff     load immediate 255
    213. 

  213. 00cc  dc        limit_check
    214. 

  214. 00cd  0e        load indexed word
    215. 

  215. 00ce  93        load immediate 3
    216. 

  216. 00cf  e8        bitwise_and
    217. 

  217. 00d0  32        store local word-2
    218. 

  218. 00d1  22        load local word-2
    219. 

  219. 00d2  cb        not_zero
    220. 

  220. 00d3  f1        call proc1
    221. 

  221. 00d4  22        load local word-2
    222. 

  222. 00d5  91        load immediate 1
    223. 

  223. 00d6  a0        equal
    224. 

  224. 00d7  85 81     fct_leave 129
    225. 

  225. 00d9  99        load immediate 9
    226. 

  226. 00da  90        load immediate 0
    227. 

  227. 00db  90        load immediate 0
    228. 

  228. 00dc  01        Raise
    229. 

  229. 00dd  b5        igreater_or_equal
    230. 

  230. 00de  3e fc     store stack word 252
    231. 

  231. 00e0  d2        reserve
    232. 

  232. 00e1  00        Error16
    233. 

  233. 00e2  00        Error16
    234. 

  234. 00e3  d4 fd     enter -3
    235. 

  235. 00e5  4c        load global word12
    236. 

  236. 00e6  03        load param1
    237. 

  237. 00e7  8d ff     load immediate 255
    238. 

  238. 00e9  dc        limit_check
    239. 

  239. 00ea  0e        load indexed word
    240. 

  240. 00eb  93        load immediate 3
    241. 

  241. 00ec  e8        bitwise_and
    242. 

  242. 00ed  32        store local word-2
    243. 

  243. 00ee  22        load local word-2
    244. 

  244. 00ef  cb        not_zero
    245. 

  245. 00f0  f1        call proc1
    246. 

  246. 00f1  22        load local word-2
    247. 

  247. 00f2  93        load immediate 3
    248. 

  248. 00f3  a0        equal
    249. 

  249. 00f4  85 81     fct_leave 129
    250. 

  250. 00f6  99        load immediate 9
    251. 

  251. 00f7  90        load immediate 0
    252. 

  252. 00f8  90        load immediate 0
    253. 

  253. 00f9  01        Raise
    254. 

  254. 00fa  7c        store stack word12
    255. 

  255. 00fb  1e        store indexed word
    256. 

  256. 00fc  b6        not
    257. 

  257. 00fd  3f 00 00  store Zâüá°átá.word0
    258. 

  258. 0100  d4 f9     enter -7
    259. 

  259. 0102  03        load param1
    260. 

  260. 0103  b1 09     shr 9
    261. 

  261. 0105  32        store local word-2
    262. 

  262. 0106  90        load immediate 0
    263. 

  263. 0107  33        store local word-3
    264. 

  264. 0108  04        load param2
    265. 

  265. 0109  ad        dec
    266. 

  266. 010a  34        store local word-4
    267. 

  267. 010b  23        load local word-3
    268. 

  268. 010c  24        load local word-4
    269. 

  269. 010d  a4        uless_or_equal
    270. 

  270. 010e  e3 18     jpfalse 0128
    271. 

  271. 0110  4c        load global word12
    272. 

  272. 0111  05        load param3
    273. 

  273. 0112  23        load local word-3
    274. 

  274. 0113  a6        add
    275. 

  275. 0114  8d ff     load immediate 255
    276. 

  276. 0116  dc        limit_check
    277. 

  277. 0117  03        load param1
    278. 

  278. 0118  1e        store indexed word
    279. 

  279. 0119  22        load local word-2
    280. 

  280. 011a  cb        not_zero
    281. 

  281. 011b  e3 06     jpfalse 0123
    282. 

  282. 011d  03        load param1
    283. 

  283. 011e  8e 00 02  load immediate 512
    284. 

  284. 0121  a6        add
    285. 

  285. 0122  13        store param1
    286. 

  286. 0123  23        load local word-3
    287. 

  287. 0124  ac        inc
    288. 

  288. 0125  33        store local word-3
    289. 

  289. 0126  e4 1d     jp 010b
    290. 

  290. 0128  8b        leave6
    291. 

  291. 0129  16        store param4
    292. 

  292. 012a  2f 45 d6  load .word214
    293. 

  293. 012d  00        Error16
    294. 

  294. 012e  00        Error16
    295. 

  295. 012f  d4 fd     enter -3
    296. 

  296. 0131  90        load immediate 0
    297. 

  297. 0132  32        store local word-2
    298. 

  298. 0133  03        load param1
    299. 

  299. 0134  22        load local word-2
    300. 

  300. 0135  8d ff     load immediate 255
    301. 

  301. 0137  dc        limit_check
    302. 

  302. 0138  8e f8 01  load immediate 504
    303. 

  303. 013b  1e        store indexed word
    304. 

  304. 013c  22        load local word-2
    305. 

  305. 013d  ac        inc
    306. 

  306. 013e  32        store local word-2
    307. 

  307. 013f  22        load local word-2
    308. 

  308. 0140  8d ff     load immediate 255
    309. 

  309. 0142  a3        ugreater_than
    310. 

  310. 0143  e5 12     jpfalse 0133
    311. 

  311. 0145  03        load param1
    312. 

  312. 0146  91        load immediate 1
    313. 

  313. 0147  8e dc 02  load immediate 732
    314. 

  314. 014a  1e        store indexed word
    315. 

  315. 014b  03        load param1
    316. 

  316. 014c  98        load immediate 8
    317. 

  317. 014d  8e dc 05  load immediate 1500
    318. 

  318. 0150  1e        store indexed word
    319. 

  319. 0151  03        load param1
    320. 

  320. 0152  99        load immediate 9
    321. 

  321. 0153  8e dc 07  load immediate 2012
    322. 

  322. 0156  1e        store indexed word
    323. 

  323. 0157  03        load param1
    324. 

  324. 0158  9f        load immediate 15
    325. 

  325. 0159  8e 91 08  load immediate 2193
    326. 

  326. 015c  1e        store indexed word
    327. 

  327. 015d  03        load param1
    328. 

  328. 015e  8d 12     load immediate 18
    329. 

  329. 0160  8e dc 0b  load immediate 3036
    330. 

  330. 0163  1e        store indexed word
    331. 

  331. 0164  03        load param1
    332. 

  332. 0165  8d 18     load immediate 24
    333. 

  333. 0167  8e dc 0d  load immediate 3548
    334. 

  334. 016a  1e        store indexed word
    335. 

  335. 016b  03        load param1
    336. 

  336. 016c  8d 19     load immediate 25
    337. 

  337. 016e  8e dc 0f  load immediate 4060
    338. 

  338. 0171  1e        store indexed word
    339. 

  339. 0172  03        load param1
    340. 

  340. 0173  8d 1f     load immediate 31
    341. 

  341. 0175  8e dc 10  load immediate 4316
    342. 

  342. 0178  1e        store indexed word
    343. 

  343. 0179  03        load param1
    344. 

  344. 017a  8d 22     load immediate 34
    345. 

  345. 017c  8d 61     load immediate 97
    346. 

  346. 017e  1e        store indexed word
    347. 

  347. 017f  03        load param1
    348. 

  348. 0180  8d 28     load immediate 40
    349. 

  349. 0182  8d a1     load immediate 161
    350. 

  350. 0184  1e        store indexed word
    351. 

  351. 0185  03        load param1
    352. 

  352. 0186  8d 30     load immediate 48
    353. 

  353. 0188  8e dc 12  load immediate 4828
    354. 

  354. 018b  1e        store indexed word
    355. 

  355. 018c  03        load param1
    356. 

  356. 018d  8d 31     load immediate 49
    357. 

  357. 018f  8e 1c 15  load immediate 5404
    358. 

  358. 0192  1e        store indexed word
    359. 

  359. 0193  03        load param1
    360. 

  360. 0194  8d 40     load immediate 64
    361. 

  361. 0196  8e dc 17  load immediate 6108
    362. 

  362. 0199  1e        store indexed word
    363. 

  363. 019a  03        load param1
    364. 

  364. 019b  8d 41     load immediate 65
    365. 

  365. 019d  8e 51 18  load immediate 6225
    366. 

  366. 01a0  1e        store indexed word
    367. 

  367. 01a1  03        load param1
    368. 

  368. 01a2  8d 43     load immediate 67
    369. 

  369. 01a4  99        load immediate 9
    370. 

  370. 01a5  1e        store indexed word
    371. 

  371. 01a6  03        load param1
    372. 

  372. 01a7  8d 44     load immediate 68
    373. 

  373. 01a9  8d 5c     load immediate 92
    374. 

  374. 01ab  1e        store indexed word
    375. 

  375. 01ac  03        load param1
    376. 

  376. 01ad  8d 45     load immediate 69
    377. 

  377. 01af  8d 51     load immediate 81
    378. 

  378. 01b1  1e        store indexed word
    379. 

  379. 01b2  03        load param1
    380. 

  380. 01b3  8d 46     load immediate 70
    381. 

  381. 01b5  8d 89     load immediate 137
    382. 

  382. 01b7  1e        store indexed word
    383. 

  383. 01b8  03        load param1
    384. 

  384. 01b9  8d 47     load immediate 71
    385. 

  385. 01bb  8d 9c     load immediate 156
    386. 

  386. 01bd  1e        store indexed word
    387. 

  387. 01be  03        load param1
    388. 

  388. 01bf  8d 48     load immediate 72
    389. 

  389. 01c1  8d 9c     load immediate 156
    390. 

  390. 01c3  1e        store indexed word
    391. 

  391. 01c4  03        load param1
    392. 

  392. 01c5  8d 49     load immediate 73
    393. 

  393. 01c7  8d 5c     load immediate 92
    394. 

  394. 01c9  1e        store indexed word
    395. 

  395. 01ca  03        load param1
    396. 

  396. 01cb  8d 4a     load immediate 74
    397. 

  397. 01cd  8d 5c     load immediate 92
    398. 

  398. 01cf  1e        store indexed word
    399. 

  399. 01d0  03        load param1
    400. 

  400. 01d1  8d 4b     load immediate 75
    401. 

  401. 01d3  99        load immediate 9
    402. 

  402. 01d4  1e        store indexed word
    403. 

  403. 01d5  03        load param1
    404. 

  404. 01d6  8d 4c     load immediate 76
    405. 

  405. 01d8  8d 9c     load immediate 156
    406. 

  406. 01da  1e        store indexed word
    407. 

  407. 01db  03        load param1
    408. 

  408. 01dc  8d 4d     load immediate 77
    409. 

  409. 01de  8d dc     load immediate 220
    410. 

  410. 01e0  1e        store indexed word
    411. 

  411. 01e1  03        load param1
    412. 

  412. 01e2  8d 4e     load immediate 78
    413. 

  413. 01e4  8e 1c 01  load immediate 284
    414. 

  414. 01e7  1e        store indexed word
    415. 

  415. 01e8  03        load param1
    416. 

  416. 01e9  8d 4f     load immediate 79
    417. 

  417. 01eb  8d 9c     load immediate 156
    418. 

  418. 01ed  1e        store indexed word
    419. 

  419. 01ee  03        load param1
    420. 

  420. 01ef  8d 50     load immediate 80
    421. 

  421. 01f1  8e 1c 1a  load immediate 6684
    422. 

  422. 01f4  1e        store indexed word
    423. 

  423. 01f5  03        load param1
    424. 

  424. 01f6  8d 51     load immediate 81
    425. 

  425. 01f8  8e 9c 1c  load immediate 7324
    426. 

  426. 01fb  1e        store indexed word
    427. 

  427. 01fc  03        load param1
    428. 

  428. 01fd  8d 52     load immediate 82
    429. 

  429. 01ff  8d dc     load immediate 220
    430. 

  430. 0201  1e        store indexed word
    431. 

  431. 0202  03        load param1
    432. 

  432. 0203  8d 53     load immediate 83
    433. 

  433. 0205  8d dc     load immediate 220
    434. 

  434. 0207  1e        store indexed word
    435. 

  435. 0208  03        load param1
    436. 

  436. 0209  8d 54     load immediate 84
    437. 

  437. 020b  8d 4a     load immediate 74
    438. 

  438. 020d  1e        store indexed word
    439. 

  439. 020e  03        load param1
    440. 

  440. 020f  8d 55     load immediate 85
    441. 

  441. 0211  8d 9c     load immediate 156
    442. 

  442. 0213  1e        store indexed word
    443. 

  443. 0214  03        load param1
    444. 

  444. 0215  8d 56     load immediate 86
    445. 

  445. 0217  8d 89     load immediate 137
    446. 

  446. 0219  1e        store indexed word
    447. 

  447. 021a  03        load param1
    448. 

  448. 021b  8d 66     load immediate 102
    449. 

  449. 021d  8d 4a     load immediate 74
    450. 

  450. 021f  1e        store indexed word
    451. 

  451. 0220  03        load param1
    452. 

  452. 0221  8d 67     load immediate 103
    453. 

  453. 0223  8d 48     load immediate 72
    454. 

  454. 0225  1e        store indexed word
    455. 

  455. 0226  8d 7b     load immediate 123
    456. 

  456. 0228  93        load immediate 3
    457. 

  457. 0229  8d 52     load immediate 82
    458. 

  458. 022b  ed 11     call proc17
    459. 

  459. 022d  03        load param1
    460. 

  460. 022e  8d 87     load immediate 135
    461. 

  461. 0230  8e dc 27  load immediate 10204
    462. 

  462. 0233  1e        store indexed word
    463. 

  463. 0234  03        load param1
    464. 

  464. 0235  8d 91     load immediate 145
    465. 

  465. 0237  8d 5e     load immediate 94
    466. 

  466. 0239  1e        store indexed word
    467. 

  467. 023a  03        load param1
    468. 

  468. 023b  8d 92     load immediate 146
    469. 

  469. 023d  8d 9d     load immediate 157
    470. 

  470. 023f  1e        store indexed word
    471. 

  471. 0240  03        load param1
    472. 

  472. 0241  8d 93     load immediate 147
    473. 

  473. 0243  8d 8a     load immediate 138
    474. 

  474. 0245  1e        store indexed word
    475. 

  475. 0246  8d a0     load immediate 160
    476. 

  476. 0248  96        load immediate 6
    477. 

  477. 0249  8d 8b     load immediate 139
    478. 

  478. 024b  ed 11     call proc17
    479. 

  479. 024d  8d a6     load immediate 166
    480. 

  480. 024f  92        load immediate 2
    481. 

  481. 0250  8d 8a     load immediate 138
    482. 

  482. 0252  ed 11     call proc17
    483. 

  483. 0254  03        load param1
    484. 

  484. 0255  8d a8     load immediate 168
    485. 

  485. 0257  8e 8a 28  load immediate 10378
    486. 

  486. 025a  1e        store indexed word
    487. 

  487. 025b  8d a9     load immediate 169
    488. 

  488. 025d  92        load immediate 2
    489. 

  489. 025e  8e 89 2a  load immediate 10889
    490. 

  490. 0261  ed 11     call proc17
    491. 

  491. 0263  8d b0     load immediate 176
    492. 

  492. 0265  92        load immediate 2
    493. 

  493. 0266  8d 8a     load immediate 138
    494. 

  494. 0268  ed 11     call proc17
    495. 

  495. 026a  8d b2     load immediate 178
    496. 

  496. 026c  94        load immediate 4
    497. 

  497. 026d  8d 8b     load immediate 139
    498. 

  498. 026f  ed 11     call proc17
    499. 

  499. 0271  03        load param1
    500. 

  500. 0272  8d b6     load immediate 182
    501. 

  501. 0274  8d 4b     load immediate 75
    502. 

  502. 0276  1e        store indexed word
    503. 

  503. 0277  03        load param1
    504. 

  504. 0278  8d b7     load immediate 183
    505. 

  505. 027a  8d 4a     load immediate 74
    506. 

  506. 027c  1e        store indexed word
    507. 

  507. 027d  8d b8     load immediate 184
    508. 

  508. 027f  92        load immediate 2
    509. 

  509. 0280  8e 89 2e  load immediate 11913
    510. 

  510. 0283  ed 11     call proc17
    511. 

  511. 0285  8d ba     load immediate 186
    512. 

  512. 0287  93        load immediate 3
    513. 

  513. 0288  8e 49 32  load immediate 12873
    514. 

  514. 028b  ed 11     call proc17
    515. 

  515. 028d  8d bd     load immediate 189
    516. 

  516. 028f  92        load immediate 2
    517. 

  517. 0290  8e 51 38  load immediate 14417
    518. 

  518. 0293  ed 11     call proc17
    519. 

  519. 0295  03        load param1
    520. 

  520. 0296  8d bf     load immediate 191
    521. 

  521. 0298  8e 51 3c  load immediate 15441
    522. 

  522. 029b  1e        store indexed word
    523. 

  523. 029c  8d c0     load immediate 192
    524. 

  524. 029e  92        load immediate 2
    525. 

  525. 029f  8d 8a     load immediate 138
    526. 

  526. 02a1  ed 11     call proc17
    527. 

  527. 02a3  03        load param1
    528. 

  528. 02a4  8d c2     load immediate 194
    529. 

  529. 02a6  8e 89 3e  load immediate 16009
    530. 

  530. 02a9  1e        store indexed word
    531. 

  531. 02aa  03        load param1
    532. 

  532. 02ab  8d c3     load immediate 195
    533. 

  533. 02ad  8e 9c 40  load immediate 16540
    534. 

  534. 02b0  1e        store indexed word
    535. 

  535. 02b1  8d c4     load immediate 196
    536. 

  536. 02b3  92        load immediate 2
    537. 

  537. 02b4  8e 89 42  load immediate 17033
    538. 

  538. 02b7  ed 11     call proc17
    539. 

  539. 02b9  8d c6     load immediate 198
    540. 

  540. 02bb  95        load immediate 5
    541. 

  541. 02bc  8e 91 46  load immediate 18065
    542. 

  542. 02bf  ed 11     call proc17
    543. 

  543. 02c1  03        load param1
    544. 

  544. 02c2  8d cc     load immediate 204
    545. 

  545. 02c4  8e 51 50  load immediate 20561
    546. 

  546. 02c7  1e        store indexed word
    547. 

  547. 02c8  8d d0     load immediate 208
    548. 

  548. 02ca  92        load immediate 2
    549. 

  549. 02cb  8d 8a     load immediate 138
    550. 

  550. 02cd  ed 11     call proc17
    551. 

  551. 02cf  03        load param1
    552. 

  552. 02d0  8d d2     load immediate 210
    553. 

  553. 02d2  8e 49 54  load immediate 21577
    554. 

  554. 02d5  1e        store indexed word
    555. 

  555. 02d6  03        load param1
    556. 

  556. 02d7  8d d3     load immediate 211
    557. 

  557. 02d9  8e 89 56  load immediate 22153
    558. 

  558. 02dc  1e        store indexed word
    559. 

  559. 02dd  03        load param1
    560. 

  560. 02de  8d d4     load immediate 212
    561. 

  561. 02e0  8e dc 73  load immediate 29660
    562. 

  562. 02e3  1e        store indexed word
    563. 

  563. 02e4  03        load param1
    564. 

  564. 02e5  8d d5     load immediate 213
    565. 

  565. 02e7  8e 89 58  load immediate 22665
    566. 

  566. 02ea  1e        store indexed word
    567. 

  567. 02eb  8d d6     load immediate 214
    568. 

  568. 02ed  94        load immediate 4
    569. 

  569. 02ee  8e 91 5a  load immediate 23185
    570. 

  570. 02f1  ed 11     call proc17
    571. 

  571. 02f3  8d da     load immediate 218
    572. 

  572. 02f5  92        load immediate 2
    573. 

  573. 02f6  8e 89 62  load immediate 25225
    574. 

  574. 02f9  ed 11     call proc17
    575. 

  575. 02fb  03        load param1
    576. 

  576. 02fc  8d dc     load immediate 220
    577. 

  577. 02fe  8e 89 66  load immediate 26249
    578. 

  578. 0301  1e        store indexed word
    579. 

  579. 0302  03        load param1
    580. 

  580. 0303  8d dd     load immediate 221
    581. 

  581. 0305  8e 49 68  load immediate 26697
    582. 

  582. 0308  1e        store indexed word
    583. 

  583. 0309  8d de     load immediate 222
    584. 

  584. 030b  92        load immediate 2
    585. 

  585. 030c  8d 8b     load immediate 139
    586. 

  586. 030e  ed 11     call proc17
    587. 

  587. 0310  03        load param1
    588. 

  588. 0311  8d e6     load immediate 230
    589. 

  589. 0313  8d 8a     load immediate 138
    590. 

  590. 0315  1e        store indexed word
    591. 

  591. 0316  03        load param1
    592. 

  592. 0317  8d e7     load immediate 231
    593. 

  593. 0319  8e 8b 6a  load immediate 27275
    594. 

  594. 031c  1e        store indexed word
    595. 

  595. 031d  8d e8     load immediate 232
    596. 

  596. 031f  92        load immediate 2
    597. 

  597. 0320  8d 8a     load immediate 138
    598. 

  598. 0322  ed 11     call proc17
    599. 

  599. 0324  03        load param1
    600. 

  600. 0325  8d ea     load immediate 234
    601. 

  601. 0327  8e 49 6c  load immediate 27721
    602. 

  602. 032a  1e        store indexed word
    603. 

  603. 032b  03        load param1
    604. 

  604. 032c  8d eb     load immediate 235
    605. 

  605. 032e  8e dc 6f  load immediate 28636
    606. 

  606. 0331  1e        store indexed word
    607. 

  607. 0332  03        load param1
    608. 

  608. 0333  8d ef     load immediate 239
    609. 

  609. 0335  8e dc 71  load immediate 29148
    610. 

  610. 0338  1e        store indexed word
    611. 

  611. 0339  89        leave2
    612. 

  612. 033a  4c        load global word12
    613. 

  613. 033b  ed 12     call proc18
    614. 

  614. 033d  e0 94 15  jp 18d3
    615. 

  615. 0340  3b        store local word-11
    616. 

  616. 0341  6b        load stack word11
    617. 

  617. 0342  c0        uadd_checked
    618. 

  618. 0343  d1        isub_checked
    619. 

  619. 0344  00        Error16
    620. 

  620. 0345  00        Error16
    621. 

  621. 0346  d4 ff     enter -1
    622. 

  622. 0348  4f        load global word15
    623. 

  623. 0349  8e 00 02  load immediate 512
    624. 

  624. 034c  a5        ugreater_or_equal
    625. 

  625. 034d  e3 1d     jpfalse 036c
    626. 

  626. 034f  8c 17  .. load immediate string "INTERNAL TABLE OVERFLOW"
    627. 

  627. 0368  8d 16     load immediate 22
    628. 

  628. 036a  ed 10     call proc16
    629. 

  629. 036c  4e        load global word14
    630. 

  630. 036d  4f        load global word15
    631. 

  631. 036e  8e ff 01  load immediate 511
    632. 

  632. 0371  dc        limit_check
    633. 

  633. 0372  0c 32     load INTELL.word2
    634. 

  634. 0374  af 02     sub 2
    635. 

  635. 0376  1e        store indexed word
    636. 

  636. 0377  4f        load global word15
    637. 

  637. 0378  ac        inc
    638. 

  638. 0379  5f        store global word15
    639. 

  639. 037a  88        leave0
    640. 

  640. 037b  3d 02     store global word 2
    641. 

  641. 037d  db        irange_check
    642. 

  642. 037e  27        load local word-7
    643. 

  643. 037f  00        Error16
    644. 

  644. 0380  00        Error16
    645. 

  645. 0381  d4 fd     enter -3
    646. 

  646. 0383  03        load param1
    647. 

  647. 0384  92        load immediate 2
    648. 

  648. 0385  b9        idiv
    649. 

  649. 0386  13        store param1
    650. 

  650. 0387  4d        load global word13
    651. 

  651. 0388  03        load param1
    652. 

  652. 0389  8e 27 01  load immediate 295
    653. 

  653. 038c  8e d8 ff  load immediate -40
    654. 

  654. 038f  db        irange_check
    655. 

  655. 0390  ae 28     add 40
    656. 

  656. 0392  0e        load indexed word
    657. 

  657. 0393  32        store local word-2
    658. 

  658. 0394  4d        load global word13
    659. 

  659. 0395  03        load param1
    660. 

  660. 0396  8e 27 01  load immediate 295
    661. 

  661. 0399  8e d8 ff  load immediate -40
    662. 

  662. 039c  db        irange_check
    663. 

  663. 039d  ae 28     add 40
    664. 

  664. 039f  04        load param2
    665. 

  665. 03a0  1e        store indexed word
    666. 

  666. 03a1  22        load local word-2
    667. 

  667. 03a2  85 82     fct_leave 130
    668. 

  668. 03a4  99        load immediate 9
    669. 

  669. 03a5  90        load immediate 0
    670. 

  670. 03a6  90        load immediate 0
    671. 

  671. 03a7  01        Raise
    672. 

  672. 03a8  bc        abs
    673. 

  673. 03a9  2f 47 55  load .word85
    674. 

  674. 03ac  00        Error16
    675. 

  675. 03ad  00        Error16
    676. 

  676. 03ae  d4 ff     enter -1
    677. 

  677. 03b0  0c 04     load Zâüá°átá.word4
    678. 

  678. 03b2  4e        load global word14
    679. 

  679. 03b3  4f        load global word15
    680. 

  680. 03b4  b0 01     shl 1
    681. 

  681. 03b6  ef 01 10  call °átáJá“ÿ.proc16
    682. 

  682. 03b9  88        leave0
    683. 

  683. 03ba  8e d8 ff  load immediate -40
    684. 

  684. 03bd  3d 10     store global word 16
    685. 

  685. 03bf  4d        load global word13
    686. 

  686. 03c0  2d 10     load global word 16
    687. 

  687. 03c2  8e 27 01  load immediate 295
    688. 

  688. 03c5  8e d8 ff  load immediate -40
    689. 

  689. 03c8  db        irange_check
    690. 

  690. 03c9  ae 28     add 40
    691. 

  691. 03cb  90        load immediate 0
    692. 

  692. 03cc  1e        store indexed word
    693. 

  693. 03cd  2d 10     load global word 16
    694. 

  694. 03cf  ac        inc
    695. 

  695. 03d0  3d 10     store global word 16
    696. 

  696. 03d2  2d 10     load global word 16
    697. 

  697. 03d4  8d ff     load immediate 255
    698. 

  698. 03d6  b3        igreater_than
    699. 

  699. 03d7  e5 1a     jpfalse 03bf
    700. 

  700. 03d9  90        load immediate 0
    701. 

  701. 03da  5f        store global word15
    702. 

  702. 03db  e0 f9 14  jp 18d6
    703. 

  703. 03de  ca        dmod
    704. 

  704. 03df  6b        load stack word11
    705. 

  705. 03e0  bd        int_to_long
    706. 

  706. 03e1  6e        load stack word14
    707. 

  707. 03e2  00        Error16
    708. 

  708. 03e3  00        Error16
    709. 

  709. 03e4  d4 ff     enter -1
    710. 

  710. 03e6  2d 13     load global word 19
    711. 

  711. 03e8  46        load global word6
    712. 

  712. 03e9  8e 1f 4e  load immediate 19999
    713. 

  713. 03ec  dc        limit_check
    714. 

  714. 03ed  0d        load indexed byte
    715. 

  715. 03ee  3d 11     store global word 17
    716. 

  716. 03f0  46        load global word6
    717. 

  717. 03f1  ac        inc
    718. 

  718. 03f2  56        store global word6
    719. 

  719. 03f3  47        load global word7
    720. 

  720. 03f4  ad        dec
    721. 

  721. 03f5  57        store global word7
    722. 

  722. 03f6  88        leave0
    723. 

  723. 03f7  61        load stack word1
    724. 

  724. 03f8  82 99     load stack address 153
    725. 

  725. 03fa  87 00     asmcode 0
    726. 

  726. 03fc  00        Error16
    727. 

  727. 03fd  d4 ff     enter -1
    728. 

  728. 03ff  2d 13     load global word 19
    729. 

  729. 0401  46        load global word6
    730. 

  730. 0402  8e 1f 4e  load immediate 19999
    731. 

  731. 0405  dc        limit_check
    732. 

  732. 0406  0d        load indexed byte
    733. 

  733. 0407  3d 11     store global word 17
    734. 

  734. 0409  46        load global word6
    735. 

  735. 040a  ac        inc
    736. 

  736. 040b  56        store global word6
    737. 

  737. 040c  47        load global word7
    738. 

  738. 040d  ad        dec
    739. 

  739. 040e  57        store global word7
    740. 

  740. 040f  2d 11     load global word 17
    741. 

  741. 0411  8d ff     load immediate 255
    742. 

  742. 0413  dc        limit_check
    743. 

  743. 0414  85 80     fct_leave 128
    744. 

  744. 0416  99        load immediate 9
    745. 

  745. 0417  90        load immediate 0
    746. 

  746. 0418  90        load immediate 0
    747. 

  747. 0419  01        Raise
    748. 

  748. 041a  61        load stack word1
    749. 

  749. 041b  82 4f     load stack address 79
    750. 

  750. 041d  52        store global word2
    751. 

  751. 041e  00        Error16
    752. 

  752. 041f  00        Error16
    753. 

  753. 0420  d4 ff     enter -1
    754. 

  754. 0422  ed 15     call proc21
    755. 

  755. 0424  ed 15     call proc21
    756. 

  756. 0426  b0 08     shl 8
    757. 

  757. 0428  a6        add
    758. 

  758. 0429  85 80     fct_leave 128
    759. 

  759. 042b  99        load immediate 9
    760. 

  760. 042c  90        load immediate 0
    761. 

  761. 042d  90        load immediate 0
    762. 

  762. 042e  01        Raise
    763. 

  763. 042f  17        store param5
    764. 

  764. 0430  51        store stack dword0
    765. 

  765. 0431  86 27     longfct_leave 39
    766. 

  766. 0433  00        Error16
    767. 

  767. 0434  00        Error16
    768. 

  768. 0435  d4 ff     enter -1
    769. 

  769. 0437  2d 13     load global word 19
    770. 

  770. 0439  46        load global word6
    771. 

  771. 043a  8e 1f 4e  load immediate 19999
    772. 

  772. 043d  dc        limit_check
    773. 

  773. 043e  0d        load indexed byte
    774. 

  774. 043f  85 80     fct_leave 128
    775. 

  775. 0441  99        load immediate 9
    776. 

  776. 0442  90        load immediate 0
    777. 

  777. 0443  90        load immediate 0
    778. 

  778. 0444  01        Raise
    779. 

  779. 0445  bd        int_to_long
    780. 

  780. 0446  7c        store stack word12
    781. 

  781. 0447  8f 4a 00 00 d4  load immediate dword -738197430
    782. 

  782. 044c  ff        call proc15
    783. 

  783. 044d  88        leave0
    784. 

  784. 044e  bc        abs
    785. 

  785. 044f  2f 27 28  load .word40
    786. 

  786. 0452  00        Error16
    787. 

  787. 0453  00        Error16
    788. 

  788. 0454  d4 f9     enter -7
    789. 

  789. 0456  0c 32     load INTELL.word2
    790. 

  790. 0458  46        load global word6
    791. 

  791. 0459  a7        sub
    792. 

  792. 045a  32        store local word-2
    793. 

  793. 045b  2d 15     load global word 21
    794. 

  794. 045d  33        store local word-3
    795. 

  795. 045e  91        load immediate 1
    796. 

  796. 045f  3d 18     store global word 24
    797. 

  797. 0461  2d 16     load global word 22
    798. 

  798. 0463  63        load stack word3
    799. 

  799. 0464  34        store local word-4
    800. 

  800. 0465  2d 18     load global word 24
    801. 

  801. 0467  24        load local word-4
    802. 

  802. 0468  a4        uless_or_equal
    803. 

  803. 0469  e3 11     jpfalse 047c
    804. 

  804. 046b  23        load local word-3
    805. 

  805. 046c  20        dup
    806. 

  806. 046d  65        load stack word5
    807. 

  807. 046e  22        load local word-2
    808. 

  808. 046f  a6        add
    809. 

  809. 0470  75        store stack word5
    810. 

  810. 0471  23        load local word-3
    811. 

  811. 0472  ae 0c     add 12
    812. 

  812. 0474  33        store local word-3
    813. 

  813. 0475  2d 18     load global word 24
    814. 

  814. 0477  ac        inc
    815. 

  815. 0478  3d 18     store global word 24
    816. 

  816. 047a  e4 17     jp 0465
    817. 

  817. 047c  2d 16     load global word 22
    818. 

  818. 047e  34        store local word-4
    819. 

  819. 047f  24        load local word-4
    820. 

  820. 0480  20        dup
    821. 

  821. 0481  60        load stack word0
    822. 

  822. 0482  22        load local word-2
    823. 

  823. 0483  8d 2a     load immediate 42
    824. 

  824. 0485  2d 12     load global word 18
    825. 

  825. 0487  a6        add
    826. 

  826. 0488  4f        load global word15
    827. 

  827. 0489  a6        add
    828. 

  828. 048a  b0 01     shl 1
    829. 

  829. 048c  a6        add
    830. 

  830. 048d  a6        add
    831. 

  831. 048e  70        store stack word0
    832. 

  832. 048f  24        load local word-4
    833. 

  833. 0490  20        dup
    834. 

  834. 0491  61        load stack word1
    835. 

  835. 0492  22        load local word-2
    836. 

  836. 0493  a6        add
    837. 

  837. 0494  71        store stack word1
    838. 

  838. 0495  24        load local word-4
    839. 

  839. 0496  20        dup
    840. 

  840. 0497  62        load stack word2
    841. 

  841. 0498  22        load local word-2
    842. 

  842. 0499  a6        add
    843. 

  843. 049a  72        store stack word2
    844. 

  844. 049b  0c 04     load Zâüá°átá.word4
    845. 

  845. 049d  90        load immediate 0
    846. 

  846. 049e  90        load immediate 0
    847. 

  847. 049f  21        swap
    848. 

  848. 04a0  ef 01 13  call °átáJá“ÿ.proc19
    849. 

  849. 04a3  0c 04     load Zâüá°átá.word4
    850. 

  850. 04a5  2d 16     load global word 22
    851. 

  851. 04a7  8d 10     load immediate 16
    852. 

  852. 04a9  ef 01 10  call °átáJá“ÿ.proc16
    853. 

  853. 04ac  88        leave0
    854. 

  854. 04ad  bc        abs
    855. 

  855. 04ae  2f d7 6b  load n.word107
    856. 

  856. 04b1  00        Error16
    857. 

  857. 04b2  00        Error16
    858. 

  858. 04b3  d4 f7     enter -9
    859. 

  859. 04b5  94        load immediate 4
    860. 

  860. 04b6  d2        reserve
    861. 

  861. 04b7  34        store local word-4
    862. 

  862. 04b8  2d 14     load global word 20
    863. 

  863. 04ba  20        dup
    864. 

  864. 04bb  2e 28     load stack word 40
    865. 

  865. 04bd  91        load immediate 1
    866. 

  866. 04be  ea        power2
    867. 

  867. 04bf  e6        bitwise_or
    868. 

  868. 04c0  3e 28     store stack word 40
    869. 

  869. 04c2  8d 20     load immediate 32
    870. 

  870. 04c4  2d 14     load global word 20
    871. 

  871. 04c6  82 28     load stack address 40
    872. 

  872. 04c8  93        load immediate 3
    873. 

  873. 04c9  0d        load indexed byte
    874. 

  874. 04ca  a7        sub
    875. 

  875. 04cb  b0 01     shl 1
    876. 

  876. 04cd  33        store local word-3
    877. 

  877. 04ce  2d 14     load global word 20
    878. 

  878. 04d0  0c 32     load INTELL.word2
    879. 

  879. 04d2  af 02     sub 2
    880. 

  880. 04d4  3e 27     store stack word 39
    881. 

  881. 04d6  0c 04     load Zâüá°átá.word4
    882. 

  882. 04d8  2d 14     load global word 20
    883. 

  883. 04da  23        load local word-3
    884. 

  884. 04db  a6        add
    885. 

  885. 04dc  8d 5c     load immediate 92
    886. 

  886. 04de  23        load local word-3
    887. 

  887. 04df  a7        sub
    888. 

  888. 04e0  af 08     sub 8
    889. 

  889. 04e2  2d 12     load global word 18
    890. 

  890. 04e4  b0 01     shl 1
    891. 

  891. 04e6  a6        add
    892. 

  892. 04e7  ef 01 10  call °átáJá“ÿ.proc16
    893. 

  893. 04ea  2d 15     load global word 21
    894. 

  894. 04ec  32        store local word-2
    895. 

  895. 04ed  91        load immediate 1
    896. 

  896. 04ee  33        store local word-3
    897. 

  897. 04ef  2d 16     load global word 22
    898. 

  898. 04f1  63        load stack word3
    899. 

  899. 04f2  35        store local word-5
    900. 

  900. 04f3  23        load local word-3
    901. 

  901. 04f4  25        load local word-5
    902. 

  902. 04f5  a4        uless_or_equal
    903. 

  903. 04f6  e3 10     jpfalse 0508
    904. 

  904. 04f8  0c 04     load Zâüá°átá.word4
    905. 

  905. 04fa  22        load local word-2
    906. 

  906. 04fb  9c        load immediate 12
    907. 

  907. 04fc  ef 01 10  call °átáJá“ÿ.proc16
    908. 

  908. 04ff  22        load local word-2
    909. 

  909. 0500  ae 0c     add 12
    910. 

  910. 0502  32        store local word-2
    911. 

  911. 0503  23        load local word-3
    912. 

  912. 0504  ac        inc
    913. 

  913. 0505  33        store local word-3
    914. 

  914. 0506  e4 15     jp 04f3
    915. 

  915. 0508  24        load local word-4
    916. 

  916. 0509  2d 16     load global word 22
    917. 

  917. 050b  61        load stack word1
    918. 

  918. 050c  ae 50     add 80
    919. 

  919. 050e  70        store stack word0
    920. 

  920. 050f  24        load local word-4
    921. 

  921. 0510  4f        load global word15
    922. 

  922. 0511  71        store stack word1
    923. 

  923. 0512  0c 04     load Zâüá°átá.word4
    924. 

  924. 0514  24        load local word-4
    925. 

  925. 0515  94        load immediate 4
    926. 

  926. 0516  ef 01 10  call °átáJá“ÿ.proc16
    927. 

  927. 0519  0c 04     load Zâüá°átá.word4
    928. 

  928. 051b  4d        load global word13
    929. 

  929. 051c  8d 2a     load immediate 42
    930. 

  930. 051e  2d 12     load global word 18
    931. 

  931. 0520  a6        add
    932. 

  932. 0521  b0 01     shl 1
    933. 

  933. 0523  ef 01 10  call °átáJá“ÿ.proc16
    934. 

  934. 0526  ed 13     call proc19
    935. 

  935. 0528  92        load immediate 2
    936. 

  936. 0529  8c 0f  .. load immediate string "Compiled bytes:"
    937. 

  937. 053a  9e        load immediate 14
    938. 

  938. 053b  f0 59     call ›âZâüá°á.proc9
    939. 

  939. 053d  92        load immediate 2
    940. 

  940. 053e  2d 16     load global word 22
    941. 

  941. 0540  61        load stack word1
    942. 

  942. 0541  ae 40     add 64
    943. 

  943. 0543  96        load immediate 6
    944. 

  944. 0544  f0 5b     call ›âZâüá°á.proc11
    945. 

  945. 0546  92        load immediate 2
    946. 

  946. 0547  f0 5e     call ›âZâüá°á.proc14
    947. 

  947. 0549  92        load immediate 2
    948. 

  948. 054a  8c 11  .. load immediate string "Native-code file "
    949. 

  949. 055d  8d 10     load immediate 16
    950. 

  950. 055f  f0 59     call ›âZâüá°á.proc9
    951. 

  951. 0561  92        load immediate 2
    952. 

  952. 0562  0c 44     load TEXTS.word4
    953. 

  953. 0564  8d 13     load immediate 19
    954. 

  954. 0566  f0 59     call ›âZâüá°á.proc9
    955. 

  955. 0568  92        load immediate 2
    956. 

  956. 0569  8c 09  .. load immediate string " produced"
    957. 

  957. 0574  98        load immediate 8
    958. 

  958. 0575  f0 59     call ›âZâüá°á.proc9
    959. 

  959. 0577  92        load immediate 2
    960. 

  960. 0578  f0 5e     call ›âZâüá°á.proc14
    961. 

  961. 057a  88        leave0
    962. 

  962. 057b  bc        abs
    963. 

  963. 057c  2f ab 00  load .word0
    964. 

  964. 057f  00        Error16
    965. 

  965. 0580  00        Error16
    966. 

  966. 0581  d4 ff     enter -1
    967. 

  967. 0583  ed 19     call proc25
    968. 

  968. 0585  0c 04     load Zâüá°átá.word4
    969. 

  969. 0587  f0 38     call INTELL.proc8
    970. 

  970. 0589  ed 1a     call proc26
    971. 

  971. 058b  88        leave0
    972. 

  972. 058c  2f 00 15  load Zâüá°átá.word21
    973. 

  973. 058f  ae 10     add 16
    974. 

  974. 0591  3d 13     store global word 19
    975. 

  975. 0593  90        load immediate 0
    976. 

  976. 0594  56        store global word6
    977. 

  977. 0595  96        load immediate 6
    978. 

  978. 0596  57        store global word7
    979. 

  979. 0597  2f 00 15  load Zâüá°átá.word21
    980. 

  980. 059a  3d 16     store global word 22
    981. 

  981. 059c  2f 00 15  load Zâüá°átá.word21
    982. 

  982. 059f  ae 10     add 16
    983. 

  983. 05a1  2d 16     load global word 22
    984. 

  984. 05a3  61        load stack word1
    985. 

  985. 05a4  a6        add
    986. 

  986. 05a5  3d 14     store global word 20
    987. 

  987. 05a7  2f 00 15  load Zâüá°átá.word21
    988. 

  988. 05aa  ae 10     add 16
    989. 

  989. 05ac  2d 16     load global word 22
    990. 

  990. 05ae  62        load stack word2
    991. 

  991. 05af  a6        add
    992. 

  992. 05b0  3d 15     store global word 21
    993. 

  993. 05b2  2d 14     load global word 20
    994. 

  994. 05b4  82 28     load stack address 40
    995. 

  995. 05b6  91        load immediate 1
    996. 

  996. 05b7  0d        load indexed byte
    997. 

  997. 05b8  3d 12     store global word 18
    998. 

  998. 05ba  2d 17     load global word 23
    999. 

  999. 05bc  2d 14     load global word 20
    1000. 

  1000. 05be  82 2a     load stack address 42
    1001. 

  1001. 05c0  98        load immediate 8
    1002. 

  1002. 05c1  30        copy block
    1003. 

  1003. 05c2  e0 15 13  jp 18d9
    1004. 

  1004. 05c5  8f 68 2d 00 00  load immediate dword 11624
    1005. 

  1005. 05ca  00        Error16
    1006. 

  1006. 05cb  d4 fb     enter -5
    1007. 

  1007. 05cd  90        load immediate 0
    1008. 

  1008. 05ce  33        store local word-3
    1009. 

  1009. 05cf  80 fd     load local address -3
    1010. 

  1010. 05d1  91        load immediate 1
    1011. 

  1011. 05d2  ef 03 12  call INTELL.proc18
    1012. 

  1012. 05d5  80 fe     load local address -2
    1013. 

  1013. 05d7  9c        load immediate 12
    1014. 

  1014. 05d8  40 05     ALLOCATE
    1015. 

  1015. 05da  22        load local word-2
    1016. 

  1016. 05db  90        load immediate 0
    1017. 

  1017. 05dc  71        store stack word1
    1018. 

  1018. 05dd  22        load local word-2
    1019. 

  1019. 05de  46        load global word6
    1020. 

  1020. 05df  72        store stack word2
    1021. 

  1021. 05e0  22        load local word-2
    1022. 

  1022. 05e1  0c 32     load INTELL.word2
    1023. 

  1023. 05e3  73        store stack word3
    1024. 

  1024. 05e4  22        load local word-2
    1025. 

  1025. 05e5  0c 33     load INTELL.word3
    1026. 

  1026. 05e7  74        store stack word4
    1027. 

  1027. 05e8  22        load local word-2
    1028. 

  1028. 05e9  2d 19     load global word 25
    1029. 

  1029. 05eb  75        store stack word5
    1030. 

  1030. 05ec  22        load local word-2
    1031. 

  1031. 05ed  3d 19     store global word 25
    1032. 

  1032. 05ef  88        leave0
    1033. 

  1033. 05f0  d6        real_add
    1034. 

  1034. 05f1  6b        load stack word11
    1035. 

  1035. 05f2  af 05     sub 5
    1036. 

  1036. 05f4  00        Error16
    1037. 

  1037. 05f5  00        Error16
    1038. 

  1038. 05f6  d4 fd     enter -3
    1039. 

  1039. 05f8  03        load param1
    1040. 

  1040. 05f9  60        load stack word0
    1041. 

  1041. 05fa  ab        eq0
    1042. 

  1042. 05fb  e3 0b     jpfalse 0608
    1043. 

  1043. 05fd  03        load param1
    1044. 

  1044. 05fe  9c        load immediate 12
    1045. 

  1045. 05ff  40 05     ALLOCATE
    1046. 

  1046. 0601  03        load param1
    1047. 

  1047. 0602  60        load stack word0
    1048. 

  1048. 0603  0c 33     load INTELL.word3
    1049. 

  1049. 0605  71        store stack word1
    1050. 

  1050. 0606  e2 15     jp 061d
    1051. 

  1051. 0608  03        load param1
    1052. 

  1052. 0609  60        load stack word0
    1053. 

  1053. 060a  61        load stack word1
    1054. 

  1054. 060b  f0 3b     call INTELL.proc11
    1055. 

  1055. 060d  03        load param1
    1056. 

  1056. 060e  60        load stack word0
    1057. 

  1057. 060f  60        load stack word0
    1058. 

  1058. 0610  32        store local word-2
    1059. 

  1059. 0611  22        load local word-2
    1060. 

  1060. 0612  cb        not_zero
    1061. 

  1061. 0613  e3 08     jpfalse 061d
    1062. 

  1062. 0615  22        load local word-2
    1063. 

  1063. 0616  0c 32     load INTELL.word2
    1064. 

  1064. 0618  f0 37     call INTELL.proc7
    1065. 

  1065. 061a  32        store local word-2
    1066. 

  1066. 061b  e4 0c     jp 0611
    1067. 

  1067. 061d  03        load param1
    1068. 

  1068. 061e  60        load stack word0
    1069. 

  1069. 061f  0c 32     load INTELL.word2
    1070. 

  1070. 0621  70        store stack word0
    1071. 

  1071. 0622  03        load param1
    1072. 

  1072. 0623  60        load stack word0
    1073. 

  1073. 0624  90        load immediate 0
    1074. 

  1074. 0625  72        store stack word2
    1075. 

  1075. 0626  90        load immediate 0
    1076. 

  1076. 0627  53        store global word3
    1077. 

  1077. 0628  89        leave2
    1078. 

  1078. 0629  f2        call proc2
    1079. 

  1079. 062a  49        load global word9
    1080. 

  1080. 062b  a3        ugreater_than
    1081. 

  1081. 062c  01        Raise
    1082. 

  1082. 062d  00        Error16
    1083. 

  1083. 062e  00        Error16
    1084. 

  1084. 062f  d4 f5     enter -11
    1085. 

  1085. 0631  90        load immediate 0
    1086. 

  1086. 0632  53        store global word3
    1087. 

  1087. 0633  46        load global word6
    1088. 

  1088. 0634  06        load param4
    1089. 

  1089. 0635  a7        sub
    1090. 

  1090. 0636  33        store local word-3
    1091. 

  1091. 0637  2d 19     load global word 25
    1092. 

  1092. 0639  cb        not_zero
    1093. 

  1093. 063a  de 05     andjp 0641
    1094. 

  1094. 063c  2d 19     load global word 25
    1095. 

  1095. 063e  62        load stack word2
    1096. 

  1096. 063f  23        load local word-3
    1097. 

  1097. 0640  a0        equal
    1098. 

  1098. 0641  df 02     orjp 0645
    1099. 

  1099. 0643  05        load param3
    1100. 

  1100. 0644  b6        not
    1101. 

  1101. 0645  f1        call proc1
    1102. 

  1102. 0646  2d 19     load global word 25
    1103. 

  1103. 0648  34        store local word-4
    1104. 

  1104. 0649  24        load local word-4
    1105. 

  1105. 064a  cb        not_zero
    1106. 

  1106. 064b  de 04     andjp 0651
    1107. 

  1107. 064d  24        load local word-4
    1108. 

  1108. 064e  62        load stack word2
    1109. 

  1109. 064f  23        load local word-3
    1110. 

  1110. 0650  a1        not_equal
    1111. 

  1111. 0651  e3 07     jpfalse 065a
    1112. 

  1112. 0653  24        load local word-4
    1113. 

  1113. 0654  35        store local word-5
    1114. 

  1114. 0655  25        load local word-5
    1115. 

  1115. 0656  65        load stack word5
    1116. 

  1116. 0657  34        store local word-4
    1117. 

  1117. 0658  e4 11     jp 0649
    1118. 

  1118. 065a  24        load local word-4
    1119. 

  1119. 065b  cb        not_zero
    1120. 

  1120. 065c  f1        call proc1
    1121. 

  1121. 065d  03        load param1
    1122. 

  1122. 065e  24        load local word-4
    1123. 

  1123. 065f  60        load stack word0
    1124. 

  1124. 0660  70        store stack word0
    1125. 

  1125. 0661  24        load local word-4
    1126. 

  1126. 0662  63        load stack word3
    1127. 

  1127. 0663  32        store local word-2
    1128. 

  1128. 0664  24        load local word-4
    1129. 

  1129. 0665  64        load stack word4
    1130. 

  1130. 0666  36        store local word-6
    1131. 

  1131. 0667  24        load local word-4
    1132. 

  1132. 0668  2d 19     load global word 25
    1133. 

  1133. 066a  a0        equal
    1134. 

  1134. 066b  e3 07     jpfalse 0674
    1135. 

  1135. 066d  2d 19     load global word 25
    1136. 

  1136. 066f  65        load stack word5
    1137. 

  1137. 0670  3d 19     store global word 25
    1138. 

  1138. 0672  e2 04     jp 0678
    1139. 

  1139. 0674  25        load local word-5
    1140. 

  1140. 0675  24        load local word-4
    1141. 

  1141. 0676  65        load stack word5
    1142. 

  1142. 0677  75        store stack word5
    1143. 

  1143. 0678  80 fc     load local address -4
    1144. 

  1144. 067a  9c        load immediate 12
    1145. 

  1145. 067b  40 06     DEALLOCATE
    1146. 

  1146. 067d  04        load param2
    1147. 

  1147. 067e  9c        load immediate 12
    1148. 

  1148. 067f  40 05     ALLOCATE
    1149. 

  1149. 0681  04        load param2
    1150. 

  1150. 0682  60        load stack word0
    1151. 

  1151. 0683  22        load local word-2
    1152. 

  1152. 0684  70        store stack word0
    1153. 

  1153. 0685  04        load param2
    1154. 

  1154. 0686  60        load stack word0
    1155. 

  1155. 0687  26        load local word-6
    1156. 

  1156. 0688  71        store stack word1
    1157. 

  1157. 0689  04        load param2
    1158. 

  1158. 068a  60        load stack word0
    1159. 

  1159. 068b  90        load immediate 0
    1160. 

  1160. 068c  72        store stack word2
    1161. 

  1161. 068d  04        load param2
    1162. 

  1162. 068e  60        load stack word0
    1163. 

  1163. 068f  90        load immediate 0
    1164. 

  1164. 0690  73        store stack word3
    1165. 

  1165. 0691  84 84     leave 132
    1166. 

  1166. 0693  ea        power2
    1167. 

  1167. 0694  2a        load local word-10
    1168. 

  1168. 0695  da        urange_check
    1169. 

  1169. 0696  12 00 00  ll_longreal +0
    1170. 

  1170. 0699  d4 f3     enter -13
    1171. 

  1171. 069b  90        load immediate 0
    1172. 

  1172. 069c  53        store global word3
    1173. 

  1173. 069d  90        load immediate 0
    1174. 

  1174. 069e  32        store local word-2
    1175. 

  1175. 069f  90        load immediate 0
    1176. 

  1176. 06a0  37        store local word-7
    1177. 

  1177. 06a1  03        load param1
    1178. 

  1178. 06a2  62        load stack word2
    1179. 

  1179. 06a3  60        load stack word0
    1180. 

  1180. 06a4  33        store local word-3
    1181. 

  1181. 06a5  03        load param1
    1182. 

  1182. 06a6  82 02     load stack address 2
    1183. 

  1183. 06a8  9c        load immediate 12
    1184. 

  1184. 06a9  40 06     DEALLOCATE
    1185. 

  1185. 06ab  23        load local word-3
    1186. 

  1186. 06ac  0c 32     load INTELL.word2
    1187. 

  1187. 06ae  23        load local word-3
    1188. 

  1188. 06af  a7        sub
    1189. 

  1189. 06b0  ad        dec
    1190. 

  1190. 06b1  f0 37     call INTELL.proc7
    1191. 

  1191. 06b3  34        store local word-4
    1192. 

  1192. 06b4  ed 15     call proc21
    1193. 

  1193. 06b6  34        store local word-4
    1194. 

  1194. 06b7  24        load local word-4
    1195. 

  1195. 06b8  f0 31     call INTELL.proc1
    1196. 

  1196. 06ba  90        load immediate 0
    1197. 

  1197. 06bb  35        store local word-5
    1198. 

  1198. 06bc  24        load local word-4
    1199. 

  1199. 06bd  cb        not_zero
    1200. 

  1200. 06be  e3 32     jpfalse 06f2
    1201. 

  1201. 06c0  ed 16     call proc22
    1202. 

  1202. 06c2  f0 35     call INTELL.proc5
    1203. 

  1203. 06c4  26        load local word-6
    1204. 

  1204. 06c5  35        store local word-5
    1205. 

  1205. 06c6  ed 16     call proc22
    1206. 

  1206. 06c8  36        store local word-6
    1207. 

  1207. 06c9  26        load local word-6
    1208. 

  1208. 06ca  ae 04     add 4
    1209. 

  1209. 06cc  25        load local word-5
    1210. 

  1210. 06cd  a1        not_equal
    1211. 

  1211. 06ce  e3 15     jpfalse 06e5
    1212. 

  1212. 06d0  22        load local word-2
    1213. 

  1213. 06d1  cb        not_zero
    1214. 

  1214. 06d2  e3 05     jpfalse 06d9
    1215. 

  1215. 06d4  80 fe     load local address -2
    1216. 

  1216. 06d6  9c        load immediate 12
    1217. 

  1217. 06d7  40 06     DEALLOCATE
    1218. 

  1218. 06d9  26        load local word-6
    1219. 

  1219. 06da  ad        dec
    1220. 

  1220. 06db  b7        complement
    1221. 

  1221. 06dc  ac        inc
    1222. 

  1222. 06dd  dd        check_positive
    1223. 

  1223. 06de  90        load immediate 0
    1224. 

  1224. 06df  80 fe     load local address -2
    1225. 

  1225. 06e1  80 f9     load local address -7
    1226. 

  1226. 06e3  ed 1e     call proc30
    1227. 

  1227. 06e5  22        load local word-2
    1228. 

  1228. 06e6  60        load stack word0
    1229. 

  1229. 06e7  0c 32     load INTELL.word2
    1230. 

  1230. 06e9  ac        inc
    1231. 

  1231. 06ea  a7        sub
    1232. 

  1232. 06eb  f0 35     call INTELL.proc5
    1233. 

  1233. 06ed  24        load local word-4
    1234. 

  1234. 06ee  ad        dec
    1235. 

  1235. 06ef  34        store local word-4
    1236. 

  1236. 06f0  e4 36     jp 06bc
    1237. 

  1237. 06f2  22        load local word-2
    1238. 

  1238. 06f3  cb        not_zero
    1239. 

  1239. 06f4  e3 05     jpfalse 06fb
    1240. 

  1240. 06f6  80 fe     load local address -2
    1241. 

  1241. 06f8  9c        load immediate 12
    1242. 

  1242. 06f9  40 06     DEALLOCATE
    1243. 

  1243. 06fb  89        leave2
    1244. 

  1244. 06fc  9c        load immediate 12
    1245. 

  1245. 06fd  17        store param5
    1246. 

  1246. 06fe  1a 56     store stack dword 86
    1247. 

  1247. 0700  00        Error16
    1248. 

  1248. 0701  00        Error16
    1249. 

  1249. 0702  d4 fd     enter -3
    1250. 

  1250. 0704  2d 1a     load global word 26
    1251. 

  1251. 0706  cb        not_zero
    1252. 

  1252. 0707  de 05     andjp 070e
    1253. 

  1253. 0709  46        load global word6
    1254. 

  1254. 070a  2d 1a     load global word 26
    1255. 

  1255. 070c  61        load stack word1
    1256. 

  1256. 070d  a5        ugreater_or_equal
    1257. 

  1257. 070e  e3 66     jpfalse 0776
    1258. 

  1258. 0710  46        load global word6
    1259. 

  1259. 0711  2d 1a     load global word 26
    1260. 

  1260. 0713  61        load stack word1
    1261. 

  1261. 0714  a0        equal
    1262. 

  1262. 0715  f1        call proc1
    1263. 

  1263. 0716  2d 1a     load global word 26
    1264. 

  1264. 0718  60        load stack word0
    1265. 

  1265. 0719  91        load immediate 1
    1266. 

  1266. 071a  a0        equal
    1267. 

  1267. 071b  e3 06     jpfalse 0723
    1268. 

  1268. 071d  2d 1a     load global word 26
    1269. 

  1269. 071f  ed 1f     call proc31
    1270. 

  1270. 0721  e2 44     jp 0767
    1271. 

  1271. 0723  2d 1a     load global word 26
    1272. 

  1272. 0725  60        load stack word0
    1273. 

  1273. 0726  92        load immediate 2
    1274. 

  1274. 0727  a3        ugreater_than
    1275. 

  1275. 0728  e3 07     jpfalse 0731
    1276. 

  1276. 072a  2d 1a     load global word 26
    1277. 

  1277. 072c  60        load stack word0
    1278. 

  1278. 072d  ed 1c     call proc28
    1279. 

  1279. 072f  e2 36     jp 0767
    1280. 

  1280. 0731  2d 1a     load global word 26
    1281. 

  1281. 0733  62        load stack word2
    1282. 

  1282. 0734  cb        not_zero
    1283. 

  1283. 0735  f1        call proc1
    1284. 

  1284. 0736  ed 17     call proc23
    1285. 

  1285. 0738  8d 84     load immediate 132
    1286. 

  1286. 073a  a1        not_equal
    1287. 

  1287. 073b  e3 13     jpfalse 0750
    1288. 

  1288. 073d  03        load param1
    1289. 

  1289. 073e  53        store global word3
    1290. 

  1290. 073f  4b        load global word11
    1291. 

  1291. 0740  b6        not
    1292. 

  1292. 0741  e3 09     jpfalse 074c
    1293. 

  1293. 0743  2d 1a     load global word 26
    1294. 

  1294. 0745  62        load stack word2
    1295. 

  1295. 0746  82 03     load stack address 3
    1296. 

  1296. 0748  91        load immediate 1
    1297. 

  1297. 0749  ef 03 12  call INTELL.proc18
    1298. 

  1298. 074c  90        load immediate 0
    1299. 

  1299. 074d  53        store global word3
    1300. 

  1300. 074e  90        load immediate 0
    1301. 

  1301. 074f  13        store param1
    1302. 

  1302. 0750  2d 1a     load global word 26
    1303. 

  1303. 0752  60        load stack word0
    1304. 

  1304. 0753  92        load immediate 2
    1305. 

  1305. 0754  a0        equal
    1306. 

  1306. 0755  e3 04     jpfalse 075b
    1307. 

  1307. 0757  8d c9     load immediate 201
    1308. 

  1308. 0759  f0 31     call INTELL.proc1
    1309. 

  1309. 075b  2d 1a     load global word 26
    1310. 

  1310. 075d  82 02     load stack address 2
    1311. 

  1311. 075f  f9        call proc9
    1312. 

  1312. 0760  2d 1a     load global word 26
    1313. 

  1313. 0762  82 02     load stack address 2
    1314. 

  1314. 0764  9c        load immediate 12
    1315. 

  1315. 0765  40 06     DEALLOCATE
    1316. 

  1316. 0767  2d 1a     load global word 26
    1317. 

  1317. 0769  32        store local word-2
    1318. 

  1318. 076a  2d 1a     load global word 26
    1319. 

  1319. 076c  63        load stack word3
    1320. 

  1320. 076d  3d 1a     store global word 26
    1321. 

  1321. 076f  80 fe     load local address -2
    1322. 

  1322. 0771  9c        load immediate 12
    1323. 

  1323. 0772  40 06     DEALLOCATE
    1324. 

  1324. 0774  e4 72     jp 0704
    1325. 

  1325. 0776  89        leave2
    1326. 

  1326. 0777  f2        call proc2
    1327. 

  1327. 0778  49        load global word9
    1328. 

  1328. 0779  a7        sub
    1329. 

  1329. 077a  01        Raise
    1330. 

  1330. 077b  00        Error16
    1331. 

  1331. 077c  00        Error16
    1332. 

  1332. 077d  d4 f7     enter -9
    1333. 

  1333. 077f  43        load global word3
    1334. 

  1334. 0780  e3 0d     jpfalse 078f
    1335. 

  1335. 0782  03        load param1
    1336. 

  1336. 0783  60        load stack word0
    1337. 

  1337. 0784  cb        not_zero
    1338. 

  1338. 0785  e3 04     jpfalse 078b
    1339. 

  1339. 0787  03        load param1
    1340. 

  1340. 0788  9c        load immediate 12
    1341. 

  1341. 0789  40 06     DEALLOCATE
    1342. 

  1342. 078b  91        load immediate 1
    1343. 

  1343. 078c  ed 20     call proc32
    1344. 

  1344. 078e  8b        leave6
    1345. 

  1345. 078f  91        load immediate 1
    1346. 

  1346. 0790  ed 20     call proc32
    1347. 

  1347. 0792  46        load global word6
    1348. 

  1348. 0793  04        load param2
    1349. 

  1349. 0794  a6        add
    1350. 

  1350. 0795  32        store local word-2
    1351. 

  1351. 0796  2d 1a     load global word 26
    1352. 

  1352. 0798  ab        eq0
    1353. 

  1353. 0799  df 03     orjp 079e
    1354. 

  1354. 079b  05        load param3
    1355. 

  1355. 079c  92        load immediate 2
    1356. 

  1356. 079d  a4        uless_or_equal
    1357. 

  1357. 079e  df 05     orjp 07a5
    1358. 

  1358. 07a0  22        load local word-2
    1359. 

  1359. 07a1  2d 1a     load global word 26
    1360. 

  1360. 07a3  61        load stack word1
    1361. 

  1361. 07a4  a4        uless_or_equal
    1362. 

  1362. 07a5  df 02     orjp 07a9
    1363. 

  1363. 07a7  47        load global word7
    1364. 

  1364. 07a8  ab        eq0
    1365. 

  1365. 07a9  f1        call proc1
    1366. 

  1366. 07aa  80 fd     load local address -3
    1367. 

  1367. 07ac  9c        load immediate 12
    1368. 

  1368. 07ad  40 05     ALLOCATE
    1369. 

  1369. 07af  23        load local word-3
    1370. 

  1370. 07b0  05        load param3
    1371. 

  1371. 07b1  70        store stack word0
    1372. 

  1372. 07b2  23        load local word-3
    1373. 

  1373. 07b3  22        load local word-2
    1374. 

  1374. 07b4  71        store stack word1
    1375. 

  1375. 07b5  23        load local word-3
    1376. 

  1376. 07b6  03        load param1
    1377. 

  1377. 07b7  60        load stack word0
    1378. 

  1378. 07b8  72        store stack word2
    1379. 

  1379. 07b9  23        load local word-3
    1380. 

  1380. 07ba  2d 1a     load global word 26
    1381. 

  1381. 07bc  73        store stack word3
    1382. 

  1382. 07bd  2d 1a     load global word 26
    1383. 

  1383. 07bf  ab        eq0
    1384. 

  1384. 07c0  df 05     orjp 07c7
    1385. 

  1385. 07c2  22        load local word-2
    1386. 

  1386. 07c3  2d 1a     load global word 26
    1387. 

  1387. 07c5  61        load stack word1
    1388. 

  1388. 07c6  a4        uless_or_equal
    1389. 

  1389. 07c7  e3 05     jpfalse 07ce
    1390. 

  1390. 07c9  23        load local word-3
    1391. 

  1391. 07ca  3d 1a     store global word 26
    1392. 

  1392. 07cc  e2 18     jp 07e6
    1393. 

  1393. 07ce  2d 1a     load global word 26
    1394. 

  1394. 07d0  34        store local word-4
    1395. 

  1395. 07d1  24        load local word-4
    1396. 

  1396. 07d2  35        store local word-5
    1397. 

  1397. 07d3  25        load local word-5
    1398. 

  1398. 07d4  63        load stack word3
    1399. 

  1399. 07d5  34        store local word-4
    1400. 

  1400. 07d6  24        load local word-4
    1401. 

  1401. 07d7  ab        eq0
    1402. 

  1402. 07d8  df 04     orjp 07de
    1403. 

  1403. 07da  22        load local word-2
    1404. 

  1404. 07db  24        load local word-4
    1405. 

  1405. 07dc  61        load stack word1
    1406. 

  1406. 07dd  a4        uless_or_equal
    1407. 

  1407. 07de  e5 0f     jpfalse 07d1
    1408. 

  1408. 07e0  23        load local word-3
    1409. 

  1409. 07e1  24        load local word-4
    1410. 

  1410. 07e2  73        store stack word3
    1411. 

  1411. 07e3  25        load local word-5
    1412. 

  1412. 07e4  23        load local word-3
    1413. 

  1413. 07e5  73        store stack word3
    1414. 

  1414. 07e6  8b        leave6
    1415. 

  1415. 07e7  f2        call proc2
    1416. 

  1416. 07e8  49        load global word9
    1417. 

  1417. 07e9  ad        dec
    1418. 

  1418. 07ea  9f        load immediate 15
    1419. 

  1419. 07eb  00        Error16
    1420. 

  1420. 07ec  00        Error16
    1421. 

  1421. 07ed  d4 f5     enter -11
    1422. 

  1422. 07ef  43        load global word3
    1423. 

  1423. 07f0  b6        not
    1424. 

  1424. 07f1  e3 63     jpfalse 0856
    1425. 

  1425. 07f3  04        load param2
    1426. 

  1426. 07f4  60        load stack word0
    1427. 

  1427. 07f5  ab        eq0
    1428. 

  1428. 07f6  35        store local word-5
    1429. 

  1429. 07f7  25        load local word-5
    1430. 

  1430. 07f8  e3 11     jpfalse 080b
    1431. 

  1431. 07fa  04        load param2
    1432. 

  1432. 07fb  9c        load immediate 12
    1433. 

  1433. 07fc  40 05     ALLOCATE
    1434. 

  1434. 07fe  04        load param2
    1435. 

  1435. 07ff  60        load stack word0
    1436. 

  1436. 0800  90        load immediate 0
    1437. 

  1437. 0801  70        store stack word0
    1438. 

  1438. 0802  04        load param2
    1439. 

  1439. 0803  60        load stack word0
    1440. 

  1440. 0804  0c 33     load INTELL.word3
    1441. 

  1441. 0806  71        store stack word1
    1442. 

  1442. 0807  04        load param2
    1443. 

  1443. 0808  60        load stack word0
    1444. 

  1444. 0809  91        load immediate 1
    1445. 

  1445. 080a  72        store stack word2
    1446. 

  1446. 080b  03        load param1
    1447. 

  1447. 080c  e3 09     jpfalse 0817
    1448. 

  1448. 080e  04        load param2
    1449. 

  1449. 080f  60        load stack word0
    1450. 

  1450. 0810  82 03     load stack address 3
    1451. 

  1451. 0812  25        load local word-5
    1452. 

  1452. 0813  b6        not
    1453. 

  1453. 0814  ef 03 12  call INTELL.proc18
    1454. 

  1454. 0817  04        load param2
    1455. 

  1455. 0818  60        load stack word0
    1456. 

  1456. 0819  60        load stack word0
    1457. 

  1457. 081a  32        store local word-2
    1458. 

  1458. 081b  04        load param2
    1459. 

  1459. 081c  60        load stack word0
    1460. 

  1460. 081d  61        load stack word1
    1461. 

  1461. 081e  36        store local word-6
    1462. 

  1462. 081f  22        load local word-2
    1463. 

  1463. 0820  23        load local word-3
    1464. 

  1464. 0821  f0 37     call INTELL.proc7
    1465. 

  1465. 0823  33        store local word-3
    1466. 

  1466. 0824  22        load local word-2
    1467. 

  1467. 0825  23        load local word-3
    1468. 

  1468. 0826  f0 37     call INTELL.proc7
    1469. 

  1469. 0828  34        store local word-4
    1470. 

  1470. 0829  04        load param2
    1471. 

  1471. 082a  60        load stack word0
    1472. 

  1472. 082b  62        load stack word2
    1473. 

  1473. 082c  e3 0b     jpfalse 0839
    1474. 

  1474. 082e  26        load local word-6
    1475. 

  1475. 082f  f0 3b     call INTELL.proc11
    1476. 

  1476. 0831  04        load param2
    1477. 

  1477. 0832  60        load stack word0
    1478. 

  1478. 0833  0c 32     load INTELL.word2
    1479. 

  1479. 0835  ac        inc
    1480. 

  1480. 0836  70        store stack word0
    1481. 

  1481. 0837  e2 15     jp 084e
    1482. 

  1482. 0839  0c 33     load INTELL.word3
    1483. 

  1483. 083b  26        load local word-6
    1484. 

  1484. 083c  a1        not_equal
    1485. 

  1485. 083d  de 07     andjp 0846
    1486. 

  1486. 083f  23        load local word-3
    1487. 

  1487. 0840  8d ff     load immediate 255
    1488. 

  1488. 0842  e8        bitwise_and
    1489. 

  1489. 0843  8d d9     load immediate 217
    1490. 

  1490. 0845  a0        equal
    1491. 

  1491. 0846  e3 06     jpfalse 084e
    1492. 

  1492. 0848  22        load local word-2
    1493. 

  1493. 0849  ac        inc
    1494. 

  1494. 084a  32        store local word-2
    1495. 

  1495. 084b  26        load local word-6
    1496. 

  1496. 084c  b6        not
    1497. 

  1497. 084d  36        store local word-6
    1498. 

  1498. 084e  26        load local word-6
    1499. 

  1499. 084f  f0 3b     call INTELL.proc11
    1500. 

  1500. 0851  05        load param3
    1501. 

  1501. 0852  22        load local word-2
    1502. 

  1502. 0853  f0 36     call INTELL.proc6
    1503. 

  1503. 0855  f8        call proc8
    1504. 

  1504. 0856  8b        leave6
    1505. 

  1505. 0857  1e        store indexed word
    1506. 

  1506. 0858  6d        load stack word13
    1507. 

  1507. 0859  d2        reserve
    1508. 

  1508. 085a  0d        load indexed byte
    1509. 

  1509. 085b  00        Error16
    1510. 

  1510. 085c  00        Error16
    1511. 

  1511. 085d  d4 ef     enter -17
    1512. 

  1512. 085f  ed 16     call proc22
    1513. 

  1513. 0861  8e 00 80  load immediate -32768
    1514. 

  1514. 0864  a6        add
    1515. 

  1515. 0865  37        store local word-7
    1516. 

  1516. 0866  ed 16     call proc22
    1517. 

  1517. 0868  35        store local word-5
    1518. 

  1518. 0869  8d d9     load immediate 217
    1519. 

  1519. 086b  f0 31     call INTELL.proc1
    1520. 

  1520. 086d  80 fa     load local address -6
    1521. 

  1521. 086f  9c        load immediate 12
    1522. 

  1522. 0870  40 05     ALLOCATE
    1523. 

  1523. 0872  26        load local word-6
    1524. 

  1524. 0873  0c 32     load INTELL.word2
    1525. 

  1525. 0875  ac        inc
    1526. 

  1526. 0876  70        store stack word0
    1527. 

  1527. 0877  26        load local word-6
    1528. 

  1528. 0878  90        load immediate 0
    1529. 

  1529. 0879  71        store stack word1
    1530. 

  1530. 087a  92        load immediate 2
    1531. 

  1531. 087b  ed 16     call proc22
    1532. 

  1532. 087d  ad        dec
    1533. 

  1533. 087e  80 fa     load local address -6
    1534. 

  1534. 0880  ed 21     call proc33
    1535. 

  1535. 0882  8d 21     load immediate 33
    1536. 

  1536. 0884  90        load immediate 0
    1537. 

  1537. 0885  f0 36     call INTELL.proc6
    1538. 

  1538. 0887  f8        call proc8
    1539. 

  1539. 0888  8d e5     load immediate 229
    1540. 

  1540. 088a  8d d9     load immediate 217
    1541. 

  1541. 088c  f0 32     call INTELL.proc2
    1542. 

  1542. 088e  8d d5     load immediate 213
    1543. 

  1543. 0890  f0 31     call INTELL.proc1
    1544. 

  1544. 0892  27        load local word-7
    1545. 

  1545. 0893  cb        not_zero
    1546. 

  1546. 0894  e3 0e     jpfalse 08a4
    1547. 

  1547. 0896  8d 11     load immediate 17
    1548. 

  1548. 0898  8e ff ff  load immediate -1
    1549. 

  1549. 089b  27        load local word-7
    1550. 

  1550. 089c  a7        sub
    1551. 

  1551. 089d  ac        inc
    1552. 

  1552. 089e  f0 36     call INTELL.proc6
    1553. 

  1553. 08a0  8d 19     load immediate 25
    1554. 

  1554. 08a2  f0 31     call INTELL.proc1
    1555. 

  1555. 08a4  8d eb     load immediate 235
    1556. 

  1556. 08a6  f0 31     call INTELL.proc1
    1557. 

  1557. 08a8  8d 21     load immediate 33
    1558. 

  1558. 08aa  8e ff ff  load immediate -1
    1559. 

  1559. 08ad  25        load local word-5
    1560. 

  1560. 08ae  a7        sub
    1561. 

  1561. 08af  f0 36     call INTELL.proc6
    1562. 

  1562. 08b1  8d 19     load immediate 25
    1563. 

  1563. 08b3  f0 31     call INTELL.proc1
    1564. 

  1564. 08b5  8d da     load immediate 218
    1565. 

  1565. 08b7  0c 32     load INTELL.word2
    1566. 

  1566. 08b9  ae 0e     add 14
    1567. 

  1567. 08bb  25        load local word-5
    1568. 

  1568. 08bc  ac        inc
    1569. 

  1569. 08bd  b0 01     shl 1
    1570. 

  1570. 08bf  a6        add
    1571. 

  1571. 08c0  f0 36     call INTELL.proc6
    1572. 

  1572. 08c2  f8        call proc8
    1573. 

  1573. 08c3  8d 21     load immediate 33
    1574. 

  1574. 08c5  0c 32     load INTELL.word2
    1575. 

  1575. 08c7  ae 0b     add 11
    1576. 

  1576. 08c9  f0 36     call INTELL.proc6
    1577. 

  1577. 08cb  f8        call proc8
    1578. 

  1578. 08cc  8d 19     load immediate 25
    1579. 

  1579. 08ce  8d 19     load immediate 25
    1580. 

  1580. 08d0  f0 32     call INTELL.proc2
    1581. 

  1581. 08d2  8d 5e     load immediate 94
    1582. 

  1582. 08d4  8d 23     load immediate 35
    1583. 

  1583. 08d6  f0 32     call INTELL.proc2
    1584. 

  1584. 08d8  8d 56     load immediate 86
    1585. 

  1585. 08da  8d 19     load immediate 25
    1586. 

  1586. 08dc  f0 32     call INTELL.proc2
    1587. 

  1587. 08de  8d d1     load immediate 209
    1588. 

  1588. 08e0  8d e9     load immediate 233
    1589. 

  1589. 08e2  f0 32     call INTELL.proc2
    1590. 

  1590. 08e4  25        load local word-5
    1591. 

  1591. 08e5  ac        inc
    1592. 

  1592. 08e6  35        store local word-5
    1593. 

  1593. 08e7  25        load local word-5
    1594. 

  1594. 08e8  ad        dec
    1595. 

  1595. 08e9  35        store local word-5
    1596. 

  1596. 08ea  ed 16     call proc22
    1597. 

  1597. 08ec  33        store local word-3
    1598. 

  1598. 08ed  46        load global word6
    1599. 

  1599. 08ee  23        load local word-3
    1600. 

  1600. 08ef  a6        add
    1601. 

  1601. 08f0  ad        dec
    1602. 

  1602. 08f1  32        store local word-2
    1603. 

  1603. 08f2  22        load local word-2
    1604. 

  1604. 08f3  46        load global word6
    1605. 

  1605. 08f4  a2        uless_than
    1606. 

  1606. 08f5  e3 24     jpfalse 091b
    1607. 

  1607. 08f7  2d 19     load global word 25
    1608. 

  1608. 08f9  38        store local word-8
    1609. 

  1609. 08fa  28        load local word-8
    1610. 

  1610. 08fb  cb        not_zero
    1611. 

  1611. 08fc  de 04     andjp 0902
    1612. 

  1612. 08fe  28        load local word-8
    1613. 

  1613. 08ff  62        load stack word2
    1614. 

  1614. 0900  22        load local word-2
    1615. 

  1615. 0901  a1        not_equal
    1616. 

  1616. 0902  e3 05     jpfalse 0909
    1617. 

  1617. 0904  28        load local word-8
    1618. 

  1618. 0905  65        load stack word5
    1619. 

  1619. 0906  38        store local word-8
    1620. 

  1620. 0907  e4 0f     jp 08fa
    1621. 

  1621. 0909  28        load local word-8
    1622. 

  1622. 090a  cb        not_zero
    1623. 

  1623. 090b  f1        call proc1
    1624. 

  1624. 090c  28        load local word-8
    1625. 

  1625. 090d  91        load immediate 1
    1626. 

  1626. 090e  71        store stack word1
    1627. 

  1627. 090f  28        load local word-8
    1628. 

  1628. 0910  63        load stack word3
    1629. 

  1629. 0911  0c 32     load INTELL.word2
    1630. 

  1630. 0913  a7        sub
    1631. 

  1631. 0914  ad        dec
    1632. 

  1632. 0915  34        store local word-4
    1633. 

  1633. 0916  24        load local word-4
    1634. 

  1634. 0917  f0 35     call INTELL.proc5
    1635. 

  1635. 0919  e2 04     jp 091f
    1636. 

  1636. 091b  23        load local word-3
    1637. 

  1637. 091c  ac        inc
    1638. 

  1638. 091d  f0 35     call INTELL.proc5
    1639. 

  1639. 091f  25        load local word-5
    1640. 

  1640. 0920  ab        eq0
    1641. 

  1641. 0921  e5 3c     jpfalse 08e7
    1642. 

  1642. 0923  8d d1     load immediate 209
    1643. 

  1643. 0925  f0 31     call INTELL.proc1
    1644. 

  1644. 0927  2d 19     load global word 25
    1645. 

  1645. 0929  38        store local word-8
    1646. 

  1646. 092a  28        load local word-8
    1647. 

  1647. 092b  cb        not_zero
    1648. 

  1648. 092c  de 02     andjp 0930
    1649. 

  1649. 092e  28        load local word-8
    1650. 

  1650. 092f  61        load stack word1
    1651. 

  1651. 0930  e3 0c     jpfalse 093e
    1652. 

  1652. 0932  28        load local word-8
    1653. 

  1653. 0933  39        store local word-9
    1654. 

  1654. 0934  28        load local word-8
    1655. 

  1655. 0935  65        load stack word5
    1656. 

  1656. 0936  38        store local word-8
    1657. 

  1657. 0937  80 f7     load local address -9
    1658. 

  1658. 0939  9c        load immediate 12
    1659. 

  1659. 093a  40 06     DEALLOCATE
    1660. 

  1660. 093c  e4 14     jp 092a
    1661. 

  1661. 093e  28        load local word-8
    1662. 

  1662. 093f  3d 19     store global word 25
    1663. 

  1663. 0941  88        leave0
    1664. 

  1664. 0942  1e        store indexed word
    1665. 

  1665. 0943  6d        load stack word13
    1666. 

  1666. 0944  3a        store local word-10
    1667. 

  1667. 0945  46        load global word6
    1668. 

  1668. 0946  00        Error16
    1669. 

  1669. 0947  00        Error16
    1670. 

  1670. 0948  d4 ff     enter -1
    1671. 

  1671. 094a  2d 19     load global word 25
    1672. 

  1672. 094c  cb        not_zero
    1673. 

  1673. 094d  f1        call proc1
    1674. 

  1674. 094e  2d 19     load global word 25
    1675. 

  1675. 0950  49        load global word9
    1676. 

  1676. 0951  70        store stack word0
    1677. 

  1677. 0952  88        leave0
    1678. 

  1678. 0953  90        load immediate 0
    1679. 

  1679. 0954  3d 1a     store global word 26
    1680. 

  1680. 0956  90        load immediate 0
    1681. 

  1681. 0957  3d 19     store global word 25
    1682. 

  1682. 0959  e0 81 0f  jp 18dc
    1683. 

  1683. 095c  a0        equal
    1684. 

  1684. 095d  50        end_program
    1685. 

  1685. 095e  0d        load indexed byte
    1686. 

  1686. 095f  3e 00     store stack word 0
    1687. 

  1687. 0961  00        Error16
    1688. 

  1688. 0962  d4 fb     enter -5
    1689. 

  1689. 0964  04        load param2
    1690. 

  1690. 0965  8d 3c     load immediate 60
    1691. 

  1691. 0967  e7        bitwise_in
    1692. 

  1692. 0968  e3 1e     jpfalse 0988
    1693. 

  1693. 096a  04        load param2
    1694. 

  1694. 096b  32        store local word-2
    1695. 

  1695. 096c  04        load param2
    1696. 

  1696. 096d  03        load param1
    1697. 

  1697. 096e  b1 01     shr 1
    1698. 

  1698. 0970  a6        add
    1699. 

  1699. 0971  33        store local word-3
    1700. 

  1700. 0972  23        load local word-3
    1701. 

  1701. 0973  96        load immediate 6
    1702. 

  1702. 0974  a3        ugreater_than
    1703. 

  1703. 0975  e3 02     jpfalse 0979
    1704. 

  1704. 0977  96        load immediate 6
    1705. 

  1705. 0978  33        store local word-3
    1706. 

  1706. 0979  49        load global word9
    1707. 

  1707. 097a  22        load local word-2
    1708. 

  1708. 097b  9f        load immediate 15
    1709. 

  1709. 097c  dc        limit_check
    1710. 

  1710. 097d  ea        power2
    1711. 

  1711. 097e  e6        bitwise_or
    1712. 

  1712. 097f  59        store global word9
    1713. 

  1713. 0980  22        load local word-2
    1714. 

  1714. 0981  ac        inc
    1715. 

  1715. 0982  32        store local word-2
    1716. 

  1716. 0983  22        load local word-2
    1717. 

  1717. 0984  23        load local word-3
    1718. 

  1718. 0985  a0        equal
    1719. 

  1719. 0986  e5 0f     jpfalse 0979
    1720. 

  1720. 0988  8a        leave4
    1721. 

  1721. 0989  8f 68 63 6c 00  load immediate dword 7103336
    1722. 

  1722. 098e  00        Error16
    1723. 

  1723. 098f  d4 ff     enter -1
    1724. 

  1724. 0991  03        load param1
    1725. 

  1725. 0992  2d 1b     load global word 27
    1726. 

  1726. 0994  70        store stack word0
    1727. 

  1727. 0995  03        load param1
    1728. 

  1728. 0996  3d 1b     store global word 27
    1729. 

  1729. 0998  89        leave2
    1730. 

  1730. 0999  bf        float_to_long
    1731. 

  1731. 099a  56        store global word6
    1732. 

  1732. 099b  8e d3 00  load immediate 211
    1733. 

  1733. 099e  00        Error16
    1734. 

  1734. 099f  d4 ff     enter -1
    1735. 

  1735. 09a1  2d 1b     load global word 27
    1736. 

  1736. 09a3  cb        not_zero
    1737. 

  1737. 09a4  f1        call proc1
    1738. 

  1738. 09a5  03        load param1
    1739. 

  1739. 09a6  2d 1b     load global word 27
    1740. 

  1740. 09a8  70        store stack word0
    1741. 

  1741. 09a9  2d 1b     load global word 27
    1742. 

  1742. 09ab  60        load stack word0
    1743. 

  1743. 09ac  3d 1b     store global word 27
    1744. 

  1744. 09ae  03        load param1
    1745. 

  1745. 09af  60        load stack word0
    1746. 

  1746. 09b0  90        load immediate 0
    1747. 

  1747. 09b1  70        store stack word0
    1748. 

  1748. 09b2  89        leave2
    1749. 

  1749. 09b3  8f 68 b7 56 00  load immediate dword 5683048
    1750. 

  1750. 09b8  00        Error16
    1751. 

  1751. 09b9  d4 f9     enter -7
    1752. 

  1752. 09bb  80 fc     load local address -4
    1753. 

  1753. 09bd  9c        load immediate 12
    1754. 

  1754. 09be  40 05     ALLOCATE
    1755. 

  1755. 09c0  24        load local word-4
    1756. 

  1756. 09c1  92        load immediate 2
    1757. 

  1757. 09c2  72        store stack word2
    1758. 

  1758. 09c3  24        load local word-4
    1759. 

  1759. 09c4  03        load param1
    1760. 

  1760. 09c5  73        store stack word3
    1761. 

  1761. 09c6  03        load param1
    1762. 

  1762. 09c7  f4        call proc4
    1763. 

  1763. 09c8  33        store local word-3
    1764. 

  1764. 09c9  92        load immediate 2
    1765. 

  1765. 09ca  32        store local word-2
    1766. 

  1766. 09cb  22        load local word-2
    1767. 

  1767. 09cc  23        load local word-3
    1768. 

  1768. 09cd  a3        ugreater_than
    1769. 

  1769. 09ce  e3 0f     jpfalse 09df
    1770. 

  1770. 09d0  24        load local word-4
    1771. 

  1771. 09d1  82 04     load stack address 4
    1772. 

  1772. 09d3  22        load local word-2
    1773. 

  1773. 09d4  91        load immediate 1
    1774. 

  1774. 09d5  91        load immediate 1
    1775. 

  1775. 09d6  da        urange_check
    1776. 

  1776. 09d7  ad        dec
    1777. 

  1777. 09d8  90        load immediate 0
    1778. 

  1778. 09d9  1e        store indexed word
    1779. 

  1779. 09da  22        load local word-2
    1780. 

  1780. 09db  ad        dec
    1781. 

  1781. 09dc  32        store local word-2
    1782. 

  1782. 09dd  e4 14     jp 09cb
    1783. 

  1783. 09df  22        load local word-2
    1784. 

  1784. 09e0  cb        not_zero
    1785. 

  1785. 09e1  e3 11     jpfalse 09f4
    1786. 

  1786. 09e3  24        load local word-4
    1787. 

  1787. 09e4  82 04     load stack address 4
    1788. 

  1788. 09e6  22        load local word-2
    1789. 

  1789. 09e7  91        load immediate 1
    1790. 

  1790. 09e8  91        load immediate 1
    1791. 

  1791. 09e9  da        urange_check
    1792. 

  1792. 09ea  ad        dec
    1793. 

  1793. 09eb  b0 01     shl 1
    1794. 

  1794. 09ed  a6        add
    1795. 

  1795. 09ee  fc        call proc12
    1796. 

  1796. 09ef  22        load local word-2
    1797. 

  1797. 09f0  ad        dec
    1798. 

  1798. 09f1  32        store local word-2
    1799. 

  1799. 09f2  e4 15     jp 09df
    1800. 

  1800. 09f4  24        load local word-4
    1801. 

  1801. 09f5  03        load param1
    1802. 

  1802. 09f6  f3        call proc3
    1803. 

  1803. 09f7  71        store stack word1
    1804. 

  1804. 09f8  24        load local word-4
    1805. 

  1805. 09f9  2d 1b     load global word 27
    1806. 

  1806. 09fb  70        store stack word0
    1807. 

  1807. 09fc  24        load local word-4
    1808. 

  1808. 09fd  3d 1b     store global word 27
    1809. 

  1809. 09ff  89        leave2
    1810. 

  1810. 0a00  8f 68 39 18 00  load immediate dword 1587560
    1811. 

  1811. 0a05  00        Error16
    1812. 

  1812. 0a06  d4 fd     enter -3
    1813. 

  1813. 0a08  80 fe     load local address -2
    1814. 

  1814. 0a0a  9c        load immediate 12
    1815. 

  1815. 0a0b  40 05     ALLOCATE
    1816. 

  1816. 0a0d  22        load local word-2
    1817. 

  1817. 0a0e  04        load param2
    1818. 

  1818. 0a0f  71        store stack word1
    1819. 

  1819. 0a10  22        load local word-2
    1820. 

  1820. 0a11  05        load param3
    1821. 

  1821. 0a12  72        store stack word2
    1822. 

  1822. 0a13  22        load local word-2
    1823. 

  1823. 0a14  03        load param1
    1824. 

  1824. 0a15  92        load immediate 2
    1825. 

  1825. 0a16  b8        imul
    1826. 

  1826. 0a17  73        store stack word3
    1827. 

  1827. 0a18  05        load param3
    1828. 

  1828. 0a19  22        load local word-2
    1829. 

  1829. 0a1a  63        load stack word3
    1830. 

  1830. 0a1b  04        load param2
    1831. 

  1831. 0a1c  f0 3c     call INTELL.proc12
    1832. 

  1832. 0a1e  22        load local word-2
    1833. 

  1833. 0a1f  2d 1b     load global word 27
    1834. 

  1834. 0a21  70        store stack word0
    1835. 

  1835. 0a22  22        load local word-2
    1836. 

  1836. 0a23  3d 1b     store global word 27
    1837. 

  1837. 0a25  8b        leave6
    1838. 

  1838. 0a26  8f 68 4b 4f 00  load immediate dword 5196648
    1839. 

  1839. 0a2b  00        Error16
    1840. 

  1840. 0a2c  d4 fd     enter -3
    1841. 

  1841. 0a2e  80 fe     load local address -2
    1842. 

  1842. 0a30  9c        load immediate 12
    1843. 

  1843. 0a31  40 05     ALLOCATE
    1844. 

  1844. 0a33  22        load local word-2
    1845. 

  1845. 0a34  92        load immediate 2
    1846. 

  1846. 0a35  71        store stack word1
    1847. 

  1847. 0a36  22        load local word-2
    1848. 

  1848. 0a37  90        load immediate 0
    1849. 

  1849. 0a38  72        store stack word2
    1850. 

  1850. 0a39  22        load local word-2
    1851. 

  1851. 0a3a  82 03     load stack address 3
    1852. 

  1852. 0a3c  90        load immediate 0
    1853. 

  1853. 0a3d  03        load param1
    1854. 

  1854. 0a3e  1e        store indexed word
    1855. 

  1855. 0a3f  22        load local word-2
    1856. 

  1856. 0a40  2d 1b     load global word 27
    1857. 

  1857. 0a42  70        store stack word0
    1858. 

  1858. 0a43  22        load local word-2
    1859. 

  1859. 0a44  3d 1b     store global word 27
    1860. 

  1860. 0a46  89        leave2
    1861. 

  1861. 0a47  8f 68 5b 82 00  load immediate dword 8543080
    1862. 

  1862. 0a4c  00        Error16
    1863. 

  1863. 0a4d  d4 ff     enter -1
    1864. 

  1864. 0a4f  93        load immediate 3
    1865. 

  1865. 0a50  92        load immediate 2
    1866. 

  1866. 0a51  04        load param2
    1867. 

  1867. 0a52  dd        check_positive
    1868. 

  1868. 0a53  b7        complement
    1869. 

  1869. 0a54  ac        inc
    1870. 

  1870. 0a55  af 09     sub 9
    1871. 

  1871. 0a57  ed 25     call proc37
    1872. 

  1872. 0a59  03        load param1
    1873. 

  1873. 0a5a  b0 01     shl 1
    1874. 

  1874. 0a5c  ed 26     call proc38
    1875. 

  1875. 0a5e  8d a6     load immediate 166
    1876. 

  1876. 0a60  ed 1c     call proc28
    1877. 

  1877. 0a62  8a        leave4
    1878. 

  1878. 0a63  8f 68 09 17 00  load immediate dword 1509736
    1879. 

  1879. 0a68  00        Error16
    1880. 

  1880. 0a69  d4 fb     enter -5
    1881. 

  1881. 0a6b  80 fd     load local address -3
    1882. 

  1882. 0a6d  9c        load immediate 12
    1883. 

  1883. 0a6e  40 05     ALLOCATE
    1884. 

  1884. 0a70  23        load local word-3
    1885. 

  1885. 0a71  92        load immediate 2
    1886. 

  1886. 0a72  72        store stack word2
    1887. 

  1887. 0a73  23        load local word-3
    1888. 

  1888. 0a74  8d 91     load immediate 145
    1889. 

  1889. 0a76  73        store stack word3
    1890. 

  1890. 0a77  23        load local word-3
    1891. 

  1891. 0a78  03        load param1
    1892. 

  1892. 0a79  71        store stack word1
    1893. 

  1893. 0a7a  23        load local word-3
    1894. 

  1894. 0a7b  82 04     load stack address 4
    1895. 

  1895. 0a7d  90        load immediate 0
    1896. 

  1896. 0a7e  b0 01     shl 1
    1897. 

  1897. 0a80  a6        add
    1898. 

  1898. 0a81  fc        call proc12
    1899. 

  1899. 0a82  92        load immediate 2
    1900. 

  1900. 0a83  32        store local word-2
    1901. 

  1901. 0a84  23        load local word-3
    1902. 

  1902. 0a85  82 04     load stack address 4
    1903. 

  1903. 0a87  22        load local word-2
    1904. 

  1904. 0a88  91        load immediate 1
    1905. 

  1905. 0a89  91        load immediate 1
    1906. 

  1906. 0a8a  da        urange_check
    1907. 

  1907. 0a8b  ad        dec
    1908. 

  1908. 0a8c  90        load immediate 0
    1909. 

  1909. 0a8d  1e        store indexed word
    1910. 

  1910. 0a8e  22        load local word-2
    1911. 

  1911. 0a8f  ac        inc
    1912. 

  1912. 0a90  32        store local word-2
    1913. 

  1913. 0a91  22        load local word-2
    1914. 

  1914. 0a92  92        load immediate 2
    1915. 

  1915. 0a93  a3        ugreater_than
    1916. 

  1916. 0a94  e5 12     jpfalse 0a84
    1917. 

  1917. 0a96  23        load local word-3
    1918. 

  1918. 0a97  2d 1b     load global word 27
    1919. 

  1919. 0a99  70        store stack word0
    1920. 

  1920. 0a9a  23        load local word-3
    1921. 

  1921. 0a9b  3d 1b     store global word 27
    1922. 

  1922. 0a9d  89        leave2
    1923. 

  1923. 0a9e  8f 68 5f 18 00  load immediate dword 1597288
    1924. 

  1924. 0aa3  00        Error16
    1925. 

  1925. 0aa4  d4 fd     enter -3
    1926. 

  1926. 0aa6  80 fe     load local address -2
    1927. 

  1927. 0aa8  9c        load immediate 12
    1928. 

  1928. 0aa9  40 05     ALLOCATE
    1929. 

  1929. 0aab  22        load local word-2
    1930. 

  1930. 0aac  92        load immediate 2
    1931. 

  1931. 0aad  72        store stack word2
    1932. 

  1932. 0aae  22        load local word-2
    1933. 

  1933. 0aaf  8d 92     load immediate 146
    1934. 

  1934. 0ab1  73        store stack word3
    1935. 

  1935. 0ab2  22        load local word-2
    1936. 

  1936. 0ab3  82 04     load stack address 4
    1937. 

  1937. 0ab5  91        load immediate 1
    1938. 

  1938. 0ab6  b0 01     shl 1
    1939. 

  1939. 0ab8  a6        add
    1940. 

  1940. 0ab9  fc        call proc12
    1941. 

  1941. 0aba  22        load local word-2
    1942. 

  1942. 0abb  82 04     load stack address 4
    1943. 

  1943. 0abd  90        load immediate 0
    1944. 

  1944. 0abe  b0 01     shl 1
    1945. 

  1945. 0ac0  a6        add
    1946. 

  1946. 0ac1  fc        call proc12
    1947. 

  1947. 0ac2  22        load local word-2
    1948. 

  1948. 0ac3  22        load local word-2
    1949. 

  1949. 0ac4  82 04     load stack address 4
    1950. 

  1950. 0ac6  90        load immediate 0
    1951. 

  1951. 0ac7  0e        load indexed word
    1952. 

  1952. 0ac8  61        load stack word1
    1953. 

  1953. 0ac9  22        load local word-2
    1954. 

  1954. 0aca  82 04     load stack address 4
    1955. 

  1955. 0acc  91        load immediate 1
    1956. 

  1956. 0acd  0e        load indexed word
    1957. 

  1957. 0ace  61        load stack word1
    1958. 

  1958. 0acf  a6        add
    1959. 

  1959. 0ad0  8d ff     load immediate 255
    1960. 

  1960. 0ad2  dc        limit_check
    1961. 

  1961. 0ad3  71        store stack word1
    1962. 

  1962. 0ad4  22        load local word-2
    1963. 

  1963. 0ad5  fb        call proc11
    1964. 

  1964. 0ad6  88        leave0
    1965. 

  1965. 0ad7  1f        store indexed dword
    1966. 

  1966. 0ad8  02 5f     load proc_addr proc95
    1967. 

  1967. 0ada  6c        load stack word12
    1968. 

  1968. 0adb  00        Error16
    1969. 

  1969. 0adc  00        Error16
    1970. 

  1970. 0add  d4 ff     enter -1
    1971. 

  1971. 0adf  03        load param1
    1972. 

  1972. 0ae0  cb        not_zero
    1973. 

  1973. 0ae1  e3 09     jpfalse 0aec
    1974. 

  1974. 0ae3  03        load param1
    1975. 

  1975. 0ae4  60        load stack word0
    1976. 

  1976. 0ae5  10        load outer frame
    1977. 

  1977. 0ae6  ee 2b     call_with_frame proc43
    1978. 

  1978. 0ae8  03        load param1
    1979. 

  1979. 0ae9  ef 03 17  call INTELL.proc23
    1980. 

  1980. 0aec  84 01     leave 1
    1981. 

  1981. 0aee  1f        store indexed dword
    1982. 

  1982. 0aef  02 0f     load proc_addr proc15
    1983. 

  1983. 0af1  3e 00     store stack word 0
    1984. 

  1984. 0af3  00        Error16
    1985. 

  1985. 0af4  d4 ff     enter -1
    1986. 

  1986. 0af6  2d 1b     load global word 27
    1987. 

  1987. 0af8  ec 2b     nested_call proc43
    1988. 

  1988. 0afa  88        leave0
    1989. 

  1989. 0afb  e4 02     jp 0afb
    1990. 

  1990. 0afd  0e        load indexed word
    1991. 

  1991. 0afe  18 00     store local dword +0
    1992. 

  1992. 0b00  00        Error16
    1993. 

  1993. 0b01  d4 ff     enter -1
    1994. 

  1994. 0b03  2d 1b     load global word 27
    1995. 

  1995. 0b05  ab        eq0
    1996. 

  1996. 0b06  85 80     fct_leave 128
    1997. 

  1997. 0b08  99        load immediate 9
    1998. 

  1998. 0b09  90        load immediate 0
    1999. 

  1999. 0b0a  90        load immediate 0
    2000. 

  2000. 0b0b  01        Raise
    2001. 

  2001. 0b0c  90        load immediate 0
    2002. 

  2002. 0b0d  3d 1b     store global word 27
    2003. 

  2003. 0b0f  e0 ce 0d  jp 18df
    2004. 

  2004. 0b12  f2        call proc2
    2005. 

  2005. 0b13  49        load global word9
    2006. 

  2006. 0b14  0e        load indexed word
    2007. 

  2007. 0b15  3e 00     store stack word 0
    2008. 

  2008. 0b17  00        Error16
    2009. 

  2009. 0b18  d4 f3     enter -13
    2010. 

  2010. 0b1a  03        load param1
    2011. 

  2011. 0b1b  37        store local word-7
    2012. 

  2012. 0b1c  27        load local word-7
    2013. 

  2013. 0b1d  63        load stack word3
    2014. 

  2014. 0b1e  b1 0c     shr 12
    2015. 

  2015. 0b20  33        store local word-3
    2016. 

  2016. 0b21  27        load local word-7
    2017. 

  2017. 0b22  63        load stack word3
    2018. 

  2018. 0b23  8e ff 0f  load immediate 4095
    2019. 

  2019. 0b26  e8        bitwise_and
    2020. 

  2020. 0b27  b1 08     shr 8
    2021. 

  2021. 0b29  35        store local word-5
    2022. 

  2022. 0b2a  27        load local word-7
    2023. 

  2023. 0b2b  63        load stack word3
    2024. 

  2024. 0b2c  8d ff     load immediate 255
    2025. 

  2025. 0b2e  e8        bitwise_and
    2026. 

  2026. 0b2f  34        store local word-4
    2027. 

  2027. 0b30  48        load global word8
    2028. 

  2028. 0b31  24        load local word-4
    2029. 

  2029. 0b32  8d ff     load immediate 255
    2030. 

  2030. 0b34  dc        limit_check
    2031. 

  2031. 0b35  0e        load indexed word
    2032. 

  2032. 0b36  36        store local word-6
    2033. 

  2033. 0b37  23        load local word-3
    2034. 

  2034. 0b38  8d 11     load immediate 17
    2035. 

  2035. 0b3a  e7        bitwise_in
    2036. 

  2036. 0b3b  e3 0f     jpfalse 0b4c
    2037. 

  2037. 0b3d  2f 02 1a  load COMPILER.word26
    2038. 

  2038. 0b40  e3 06     jpfalse 0b48
    2039. 

  2039. 0b42  8e 01 ff  load immediate -255
    2040. 

  2040. 0b45  36        store local word-6
    2041. 

  2041. 0b46  e2 04     jp 0b4c
    2042. 

  2042. 0b48  8e 3d ff  load immediate -195
    2043. 

  2043. 0b4b  36        store local word-6
    2044. 

  2044. 0b4c  23        load local word-3
    2045. 

  2045. 0b4d  91        load immediate 1
    2046. 

  2046. 0b4e  a0        equal
    2047. 

  2047. 0b4f  de 03     andjp 0b54
    2048. 

  2048. 0b51  91        load immediate 1
    2049. 

  2049. 0b52  26        load local word-6
    2050. 

  2050. 0b53  e7        bitwise_in
    2051. 

  2051. 0b54  e3 04     jpfalse 0b5a
    2052. 

  2052. 0b56  f0 3d     call INTELL.proc13
    2053. 

  2053. 0b58  e2 1b     jp 0b75
    2054. 

  2054. 0b5a  42        load global word2
    2055. 

  2055. 0b5b  ab        eq0
    2056. 

  2056. 0b5c  e3 17     jpfalse 0b75
    2057. 

  2057. 0b5e  92        load immediate 2
    2058. 

  2058. 0b5f  32        store local word-2
    2059. 

  2059. 0b60  22        load local word-2
    2060. 

  2060. 0b61  26        load local word-6
    2061. 

  2061. 0b62  e7        bitwise_in
    2062. 

  2062. 0b63  e3 08     jpfalse 0b6d
    2063. 

  2063. 0b65  95        load immediate 5
    2064. 

  2064. 0b66  22        load local word-2
    2065. 

  2065. 0b67  b0 01     shl 1
    2066. 

  2066. 0b69  dd        check_positive
    2067. 

  2067. 0b6a  92        load immediate 2
    2068. 

  2068. 0b6b  f0 3c     call INTELL.proc12
    2069. 

  2069. 0b6d  22        load local word-2
    2070. 

  2070. 0b6e  ac        inc
    2071. 

  2071. 0b6f  32        store local word-2
    2072. 

  2072. 0b70  22        load local word-2
    2073. 

  2073. 0b71  95        load immediate 5
    2074. 

  2074. 0b72  a3        ugreater_than
    2075. 

  2075. 0b73  e5 15     jpfalse 0b60
    2076. 

  2076. 0b75  f0 39     call INTELL.proc9
    2077. 

  2077. 0b77  26        load local word-6
    2078. 

  2078. 0b78  b1 08     shr 8
    2079. 

  2079. 0b7a  8d ff     load immediate 255
    2080. 

  2080. 0b7c  dc        limit_check
    2081. 

  2081. 0b7d  f0 3e     call INTELL.proc14
    2082. 

  2082. 0b7f  27        load local word-7
    2083. 

  2083. 0b80  64        load stack word4
    2084. 

  2084. 0b81  cb        not_zero
    2085. 

  2085. 0b82  e3 0b     jpfalse 0b8f
    2086. 

  2086. 0b84  27        load local word-7
    2087. 

  2087. 0b85  64        load stack word4
    2088. 

  2088. 0b86  ef 03 17  call INTELL.proc23
    2089. 

  2089. 0b89  27        load local word-7
    2090. 

  2090. 0b8a  82 04     load stack address 4
    2091. 

  2091. 0b8c  9c        load immediate 12
    2092. 

  2092. 0b8d  40 06     DEALLOCATE
    2093. 

  2093. 0b8f  23        load local word-3
    2094. 

  2094. 0b90  ab        eq0
    2095. 

  2095. 0b91  e3 0b     jpfalse 0b9e
    2096. 

  2096. 0b93  27        load local word-7
    2097. 

  2097. 0b94  65        load stack word5
    2098. 

  2098. 0b95  ef 03 17  call INTELL.proc23
    2099. 

  2099. 0b98  27        load local word-7
    2100. 

  2100. 0b99  82 05     load stack address 5
    2101. 

  2101. 0b9b  9c        load immediate 12
    2102. 

  2102. 0b9c  40 06     DEALLOCATE
    2103. 

  2103. 0b9e  90        load immediate 0
    2104. 

  2104. 0b9f  f0 3b     call INTELL.proc11
    2105. 

  2105. 0ba1  23        load local word-3
    2106. 

  2106. 0ba2  e2 66     jp 0c0a
    2107. 

  2107. 0ba4  f0 3a     call INTELL.proc10
    2108. 

  2108. 0ba6  90        load immediate 0
    2109. 

  2109. 0ba7  1c 34     store INTELL.word4
    2110. 

  2110. 0ba9  ce        jump_stack
    2111. 

  2111. 0baa  f0 39     call INTELL.proc9
    2112. 

  2112. 0bac  8d dd     load immediate 221
    2113. 

  2113. 0bae  8d e5     load immediate 229
    2114. 

  2114. 0bb0  8d c1     load immediate 193
    2115. 

  2115. 0bb2  f0 33     call INTELL.proc3
    2116. 

  2116. 0bb4  ce        jump_stack
    2117. 

  2117. 0bb5  f0 39     call INTELL.proc9
    2118. 

  2118. 0bb7  91        load immediate 1
    2119. 

  2119. 0bb8  90        load immediate 0
    2120. 

  2120. 0bb9  f0 36     call INTELL.proc6
    2121. 

  2121. 0bbb  ce        jump_stack
    2122. 

  2122. 0bbc  27        load local word-7
    2123. 

  2123. 0bbd  65        load stack word5
    2124. 

  2124. 0bbe  62        load stack word2
    2125. 

  2125. 0bbf  94        load immediate 4
    2126. 

  2126. 0bc0  a0        equal
    2127. 

  2127. 0bc1  e3 12     jpfalse 0bd5
    2128. 

  2128. 0bc3  f0 39     call INTELL.proc9
    2129. 

  2129. 0bc5  8d dd     load immediate 221
    2130. 

  2130. 0bc7  8d 4e     load immediate 78
    2131. 

  2131. 0bc9  90        load immediate 0
    2132. 

  2132. 0bca  f0 33     call INTELL.proc3
    2133. 

  2133. 0bcc  8d dd     load immediate 221
    2134. 

  2134. 0bce  8d 46     load immediate 70
    2135. 

  2135. 0bd0  91        load immediate 1
    2136. 

  2136. 0bd1  f0 33     call INTELL.proc3
    2137. 

  2137. 0bd3  e2 10     jp 0be5
    2138. 

  2138. 0bd5  27        load local word-7
    2139. 

  2139. 0bd6  65        load stack word5
    2140. 

  2140. 0bd7  ef 03 17  call INTELL.proc23
    2141. 

  2141. 0bda  f0 3a     call INTELL.proc10
    2142. 

  2142. 0bdc  90        load immediate 0
    2143. 

  2143. 0bdd  1c 34     store INTELL.word4
    2144. 

  2144. 0bdf  8d 4d     load immediate 77
    2145. 

  2145. 0be1  8d 44     load immediate 68
    2146. 

  2146. 0be3  f0 32     call INTELL.proc2
    2147. 

  2147. 0be5  27        load local word-7
    2148. 

  2148. 0be6  82 05     load stack address 5
    2149. 

  2149. 0be8  9c        load immediate 12
    2150. 

  2150. 0be9  40 06     DEALLOCATE
    2151. 

  2151. 0beb  ce        jump_stack
    2152. 

  2152. 0bec  f0 39     call INTELL.proc9
    2153. 

  2153. 0bee  8d 2a     load immediate 42
    2154. 

  2154. 0bf0  0c 32     load INTELL.word2
    2155. 

  2155. 0bf2  ac        inc
    2156. 

  2156. 0bf3  25        load local word-5
    2157. 

  2157. 0bf4  dd        check_positive
    2158. 

  2158. 0bf5  92        load immediate 2
    2159. 

  2159. 0bf6  b8        imul
    2160. 

  2160. 0bf7  b7        complement
    2161. 

  2161. 0bf8  ac        inc
    2162. 

  2162. 0bf9  af 12     sub 18
    2163. 

  2163. 0bfb  f2        call proc2
    2164. 

  2164. 0bfc  f0 36     call INTELL.proc6
    2165. 

  2165. 0bfe  8d 1e     load immediate 30
    2166. 

  2166. 0c00  24        load local word-4
    2167. 

  2167. 0c01  dd        check_positive
    2168. 

  2168. 0c02  b7        complement
    2169. 

  2169. 0c03  ac        inc
    2170. 

  2170. 0c04  8d ff     load immediate 255
    2171. 

  2171. 0c06  e8        bitwise_and
    2172. 

  2172. 0c07  f0 32     call INTELL.proc2
    2173. 

  2173. 0c09  ce        jump_stack
    2174. 

  2174. 0c0a  cd 00 80 04 00 0f 00  callswitch (return to 0c1f)
    2175. 

  2175. 	case 90 => 0ba4
    2176. 

  2176. 	case 91 => 0baa
    2177. 

  2177. 	case 92 => 0bb5
    2178. 

  2178. 	case 93 => 0bbc
    2179. 

  2179. 	case 94 => 0bec
    2180. 

  2180. 0c1b  9d        load immediate 13
    2181. 

  2181. 0c1c  90        load immediate 0
    2182. 

  2182. 0c1d  90        load immediate 0
    2183. 

  2183. 0c1e  01        Raise
    2184. 

  2184. 0c1f  23        load local word-3
    2185. 

  2185. 0c20  9e        load immediate 14
    2186. 

  2186. 0c21  e7        bitwise_in
    2187. 

  2187. 0c22  e3 25     jpfalse 0c49
    2188. 

  2188. 0c24  8d cd     load immediate 205
    2189. 

  2189. 0c26  45        load global word5
    2190. 

  2190. 0c27  24        load local word-4
    2191. 

  2191. 0c28  8d ff     load immediate 255
    2192. 

  2192. 0c2a  dc        limit_check
    2193. 

  2193. 0c2b  0e        load indexed word
    2194. 

  2194. 0c2c  f0 36     call INTELL.proc6
    2195. 

  2195. 0c2e  f8        call proc8
    2196. 

  2196. 0c2f  24        load local word-4
    2197. 

  2197. 0c30  9f        load immediate 15
    2198. 

  2198. 0c31  e8        bitwise_and
    2199. 

  2199. 0c32  4a        load global word10
    2200. 

  2200. 0c33  24        load local word-4
    2201. 

  2201. 0c34  b1 04     shr 4
    2202. 

  2202. 0c36  9f        load immediate 15
    2203. 

  2203. 0c37  dc        limit_check
    2204. 

  2204. 0c38  0e        load indexed word
    2205. 

  2205. 0c39  e7        bitwise_in
    2206. 

  2206. 0c3a  b6        not
    2207. 

  2207. 0c3b  e3 0a     jpfalse 0c47
    2208. 

  2208. 0c3d  45        load global word5
    2209. 

  2209. 0c3e  24        load local word-4
    2210. 

  2210. 0c3f  8d ff     load immediate 255
    2211. 

  2211. 0c41  dc        limit_check
    2212. 

  2212. 0c42  0c 32     load INTELL.word2
    2213. 

  2213. 0c44  af 02     sub 2
    2214. 

  2214. 0c46  1e        store indexed word
    2215. 

  2215. 0c47  e2 04     jp 0c4d
    2216. 

  2216. 0c49  23        load local word-3
    2217. 

  2217. 0c4a  ae eb     add 235
    2218. 

  2218. 0c4c  f5        call proc5
    2219. 

  2219. 0c4d  26        load local word-6
    2220. 

  2220. 0c4e  b1 08     shr 8
    2221. 

  2221. 0c50  8d ff     load immediate 255
    2222. 

  2222. 0c52  dc        limit_check
    2223. 

  2223. 0c53  ef 03 13  call INTELL.proc19
    2224. 

  2224. 0c56  27        load local word-7
    2225. 

  2225. 0c57  61        load stack word1
    2226. 

  2226. 0c58  8e 15 01  load immediate 277
    2227. 

  2227. 0c5b  e7        bitwise_in
    2228. 

  2228. 0c5c  f1        call proc1
    2229. 

  2229. 0c5d  27        load local word-7
    2230. 

  2230. 0c5e  61        load stack word1
    2231. 

  2231. 0c5f  cb        not_zero
    2232. 

  2232. 0c60  e3 05     jpfalse 0c67
    2233. 

  2233. 0c62  27        load local word-7
    2234. 

  2234. 0c63  91        load immediate 1
    2235. 

  2235. 0c64  72        store stack word2
    2236. 

  2236. 0c65  e2 07     jp 0c6e
    2237. 

  2237. 0c67  fd        call proc13
    2238. 

  2238. 0c68  f1        call proc1
    2239. 

  2239. 0c69  80 03     load local address +3
    2240. 

  2240. 0c6b  9c        load immediate 12
    2241. 

  2241. 0c6c  40 06     DEALLOCATE
    2242. 

  2242. 0c6e  23        load local word-3
    2243. 

  2243. 0c6f  8d 11     load immediate 17
    2244. 

  2244. 0c71  e7        bitwise_in
    2245. 

  2245. 0c72  df 03     orjp 0c77
    2246. 

  2246. 0c74  24        load local word-4
    2247. 

  2247. 0c75  42        load global word2
    2248. 

  2248. 0c76  a1        not_equal
    2249. 

  2249. 0c77  e3 04     jpfalse 0c7d
    2250. 

  2250. 0c79  49        load global word9
    2251. 

  2251. 0c7a  26        load local word-6
    2252. 

  2252. 0c7b  e6        bitwise_or
    2253. 

  2253. 0c7c  59        store global word9
    2254. 

  2254. 0c7d  89        leave2
    2255. 

  2255. 0c7e  74        store stack word4
    2256. 

  2256. 0c7f  38        store local word-8
    2257. 

  2257. 0c80  50        end_program
    2258. 

  2258. 0c81  00        Error16
    2259. 

  2259. 0c82  00        Error16
    2260. 

  2260. 0c83  00        Error16
    2261. 

  2261. 0c84  d4 ef     enter -17
    2262. 

  2262. 0c86  ed 15     call proc21
    2263. 

  2263. 0c88  35        store local word-5
    2264. 

  2264. 0c89  ed 15     call proc21
    2265. 

  2265. 0c8b  36        store local word-6
    2266. 

  2266. 0c8c  05        load param3
    2267. 

  2267. 0c8d  af eb     sub 235
    2268. 

  2268. 0c8f  37        store local word-7
    2269. 

  2269. 0c90  27        load local word-7
    2270. 

  2270. 0c91  99        load immediate 9
    2271. 

  2271. 0c92  e7        bitwise_in
    2272. 

  2272. 0c93  e3 05     jpfalse 0c9a
    2273. 

  2273. 0c95  80 fc     load local address -4
    2274. 

  2274. 0c97  fc        call proc12
    2275. 

  2275. 0c98  e2 02     jp 0c9c
    2276. 

  2276. 0c9a  90        load immediate 0
    2277. 

  2277. 0c9b  34        store local word-4
    2278. 

  2278. 0c9c  27        load local word-7
    2279. 

  2279. 0c9d  8d 11     load immediate 17
    2280. 

  2280. 0c9f  e7        bitwise_in
    2281. 

  2281. 0ca0  e3 04     jpfalse 0ca6
    2282. 

  2282. 0ca2  91        load immediate 1
    2283. 

  2283. 0ca3  54        store global word4
    2284. 

  2284. 0ca4  e2 09     jp 0caf
    2285. 

  2285. 0ca6  90        load immediate 0
    2286. 

  2286. 0ca7  48        load global word8
    2287. 

  2287. 0ca8  03        load param1
    2288. 

  2288. 0ca9  8d ff     load immediate 255
    2289. 

  2289. 0cab  dc        limit_check
    2290. 

  2290. 0cac  0e        load indexed word
    2291. 

  2291. 0cad  e7        bitwise_in
    2292. 

  2292. 0cae  54        store global word4
    2293. 

  2293. 0caf  25        load local word-5
    2294. 

  2294. 0cb0  38        store local word-8
    2295. 

  2295. 0cb1  28        load local word-8
    2296. 

  2296. 0cb2  91        load immediate 1
    2297. 

  2297. 0cb3  a3        ugreater_than
    2298. 

  2298. 0cb4  e3 07     jpfalse 0cbd
    2299. 

  2299. 0cb6  ed 29     call proc41
    2300. 

  2300. 0cb8  28        load local word-8
    2301. 

  2301. 0cb9  ad        dec
    2302. 

  2302. 0cba  38        store local word-8
    2303. 

  2303. 0cbb  e4 0c     jp 0cb1
    2304. 

  2304. 0cbd  25        load local word-5
    2305. 

  2305. 0cbe  ab        eq0
    2306. 

  2306. 0cbf  e3 04     jpfalse 0cc5
    2307. 

  2307. 0cc1  90        load immediate 0
    2308. 

  2308. 0cc2  33        store local word-3
    2309. 

  2309. 0cc3  e2 03     jp 0cc8
    2310. 

  2310. 0cc5  80 fd     load local address -3
    2311. 

  2311. 0cc7  fc        call proc12
    2312. 

  2312. 0cc8  80 fe     load local address -2
    2313. 

  2313. 0cca  9c        load immediate 12
    2314. 

  2314. 0ccb  40 05     ALLOCATE
    2315. 

  2315. 0ccd  22        load local word-2
    2316. 

  2316. 0cce  39        store local word-9
    2317. 

  2317. 0ccf  29        load local word-9
    2318. 

  2318. 0cd0  26        load local word-6
    2319. 

  2319. 0cd1  8d ff     load immediate 255
    2320. 

  2320. 0cd3  dc        limit_check
    2321. 

  2321. 0cd4  71        store stack word1
    2322. 

  2322. 0cd5  29        load local word-9
    2323. 

  2323. 0cd6  97        load immediate 7
    2324. 

  2324. 0cd7  72        store stack word2
    2325. 

  2325. 0cd8  29        load local word-9
    2326. 

  2326. 0cd9  27        load local word-7
    2327. 

  2327. 0cda  b0 0c     shl 12
    2328. 

  2328. 0cdc  04        load param2
    2329. 

  2329. 0cdd  b0 08     shl 8
    2330. 

  2330. 0cdf  a6        add
    2331. 

  2331. 0ce0  03        load param1
    2332. 

  2332. 0ce1  a6        add
    2333. 

  2333. 0ce2  73        store stack word3
    2334. 

  2334. 0ce3  29        load local word-9
    2335. 

  2335. 0ce4  23        load local word-3
    2336. 

  2336. 0ce5  74        store stack word4
    2337. 

  2337. 0ce6  29        load local word-9
    2338. 

  2338. 0ce7  24        load local word-4
    2339. 

  2339. 0ce8  75        store stack word5
    2340. 

  2340. 0ce9  26        load local word-6
    2341. 

  2341. 0cea  ab        eq0
    2342. 

  2342. 0ceb  e3 0e     jpfalse 0cfb
    2343. 

  2343. 0ced  ed 17     call proc23
    2344. 

  2344. 0cef  8d 84     load immediate 132
    2345. 

  2345. 0cf1  a0        equal
    2346. 

  2346. 0cf2  e3 03     jpfalse 0cf7
    2347. 

  2347. 0cf4  ef 03 14  call INTELL.proc20
    2348. 

  2348. 0cf7  22        load local word-2
    2349. 

  2349. 0cf8  fe        call proc14
    2350. 

  2350. 0cf9  e2 02     jp 0cfd
    2351. 

  2351. 0cfb  22        load local word-2
    2352. 

  2352. 0cfc  fb        call proc11
    2353. 

  2353. 0cfd  8b        leave6
    2354. 

  2354. 0cfe  f2        call proc2
    2355. 

  2355. 0cff  49        load global word9
    2356. 

  2356. 0d00  d5        real_compare
    2357. 

  2357. 0d01  6b        load stack word11
    2358. 

  2358. 0d02  00        Error16
    2359. 

  2359. 0d03  00        Error16
    2360. 

  2360. 0d04  d4 fb     enter -5
    2361. 

  2361. 0d06  03        load param1
    2362. 

  2362. 0d07  cb        not_zero
    2363. 

  2363. 0d08  03        load param1
    2364. 

  2364. 0d09  9f        load immediate 15
    2365. 

  2365. 0d0a  dc        limit_check
    2366. 

  2366. 0d0b  ea        power2
    2367. 

  2367. 0d0c  a8        umul
    2368. 

  2368. 0d0d  32        store local word-2
    2369. 

  2369. 0d0e  22        load local word-2
    2370. 

  2370. 0d0f  8e 15 01  load immediate 277
    2371. 

  2371. 0d12  e7        bitwise_in
    2372. 

  2372. 0d13  f1        call proc1
    2373. 

  2373. 0d14  22        load local word-2
    2374. 

  2374. 0d15  cb        not_zero
    2375. 

  2375. 0d16  e3 1b     jpfalse 0d33
    2376. 

  2376. 0d18  80 fd     load local address -3
    2377. 

  2377. 0d1a  fc        call proc12
    2378. 

  2378. 0d1b  ef 03 14  call INTELL.proc20
    2379. 

  2379. 0d1e  23        load local word-3
    2380. 

  2380. 0d1f  62        load stack word2
    2381. 

  2381. 0d20  97        load immediate 7
    2382. 

  2382. 0d21  a0        equal
    2383. 

  2383. 0d22  e3 04     jpfalse 0d28
    2384. 

  2384. 0d24  23        load local word-3
    2385. 

  2385. 0d25  fe        call proc14
    2386. 

  2386. 0d26  e2 04     jp 0d2c
    2387. 

  2387. 0d28  23        load local word-3
    2388. 

  2388. 0d29  ef 03 17  call INTELL.proc23
    2389. 

  2389. 0d2c  80 fd     load local address -3
    2390. 

  2390. 0d2e  9c        load immediate 12
    2391. 

  2391. 0d2f  40 06     DEALLOCATE
    2392. 

  2392. 0d31  f0 39     call INTELL.proc9
    2393. 

  2393. 0d33  90        load immediate 0
    2394. 

  2394. 0d34  f0 3b     call INTELL.proc11
    2395. 

  2395. 0d36  fd        call proc13
    2396. 

  2396. 0d37  de 03     andjp 0d3c
    2397. 

  2397. 0d39  0c 34     load INTELL.word4
    2398. 

  2398. 0d3b  b6        not
    2399. 

  2399. 0d3c  f1        call proc1
    2400. 

  2400. 0d3d  43        load global word3
    2401. 

  2401. 0d3e  e3 02     jpfalse 0d42
    2402. 

  2402. 0d40  e2 d3     jp 0e15
    2403. 

  2403. 0d42  2d 1c     load global word 28
    2404. 

  2404. 0d44  cb        not_zero
    2405. 

  2405. 0d45  e3 09     jpfalse 0d50
    2406. 

  2406. 0d47  8d c3     load immediate 195
    2407. 

  2407. 0d49  2d 1c     load global word 28
    2408. 

  2408. 0d4b  f0 36     call INTELL.proc6
    2409. 

  2409. 0d4d  f8        call proc8
    2410. 

  2410. 0d4e  e2 c5     jp 0e15
    2411. 

  2411. 0d50  0c 32     load INTELL.word2
    2412. 

  2412. 0d52  3d 1c     store global word 28
    2413. 

  2413. 0d54  22        load local word-2
    2414. 

  2414. 0d55  92        load immediate 2
    2415. 

  2415. 0d56  a5        ugreater_or_equal
    2416. 

  2416. 0d57  e3 06     jpfalse 0d5f
    2417. 

  2417. 0d59  8d fd     load immediate 253
    2418. 

  2418. 0d5b  8d e1     load immediate 225
    2419. 

  2419. 0d5d  f0 32     call INTELL.proc2
    2420. 

  2420. 0d5f  22        load local word-2
    2421. 

  2421. 0d60  94        load immediate 4
    2422. 

  2422. 0d61  a5        ugreater_or_equal
    2423. 

  2423. 0d62  e3 08     jpfalse 0d6c
    2424. 

  2424. 0d64  8d d9     load immediate 217
    2425. 

  2425. 0d66  8d e1     load immediate 225
    2426. 

  2426. 0d68  8d d9     load immediate 217
    2427. 

  2427. 0d6a  f0 33     call INTELL.proc3
    2428. 

  2428. 0d6c  22        load local word-2
    2429. 

  2429. 0d6d  98        load immediate 8
    2430. 

  2430. 0d6e  a0        equal
    2431. 

  2431. 0d6f  e3 07     jpfalse 0d78
    2432. 

  2432. 0d71  8d f1     load immediate 241
    2433. 

  2433. 0d73  98        load immediate 8
    2434. 

  2434. 0d74  8d f1     load immediate 241
    2435. 

  2435. 0d76  f0 33     call INTELL.proc3
    2436. 

  2436. 0d78  8d dd     load immediate 221
    2437. 

  2437. 0d7a  8d f9     load immediate 249
    2438. 

  2438. 0d7c  f0 32     call INTELL.proc2
    2439. 

  2439. 0d7e  8d c1     load immediate 193
    2440. 

  2440. 0d80  8d dd     load immediate 221
    2441. 

  2441. 0d82  8d e1     load immediate 225
    2442. 

  2442. 0d84  f0 33     call INTELL.proc3
    2443. 

  2443. 0d86  05        load param3
    2444. 

  2444. 0d87  b6        not
    2445. 

  2445. 0d88  de 02     andjp 0d8c
    2446. 

  2446. 0d8a  04        load param2
    2447. 

  2447. 0d8b  ab        eq0
    2448. 

  2448. 0d8c  de 02     andjp 0d90
    2449. 

  2449. 0d8e  22        load local word-2
    2450. 

  2450. 0d8f  ab        eq0
    2451. 

  2451. 0d90  e3 06     jpfalse 0d98
    2452. 

  2452. 0d92  8d c9     load immediate 201
    2453. 

  2453. 0d94  f0 31     call INTELL.proc1
    2454. 

  2454. 0d96  e2 7d     jp 0e15
    2455. 

  2455. 0d98  8d e1     load immediate 225
    2456. 

  2456. 0d9a  f0 31     call INTELL.proc1
    2457. 

  2457. 0d9c  04        load param2
    2458. 

  2458. 0d9d  94        load immediate 4
    2459. 

  2459. 0d9e  a4        uless_or_equal
    2460. 

  2460. 0d9f  e3 0f     jpfalse 0db0
    2461. 

  2461. 0da1  04        load param2
    2462. 

  2462. 0da2  cb        not_zero
    2463. 

  2463. 0da3  e3 09     jpfalse 0dae
    2464. 

  2464. 0da5  8d d1     load immediate 209
    2465. 

  2465. 0da7  f0 31     call INTELL.proc1
    2466. 

  2466. 0da9  04        load param2
    2467. 

  2467. 0daa  ad        dec
    2468. 

  2468. 0dab  14        store param2
    2469. 

  2469. 0dac  e4 0d     jp 0da1
    2470. 

  2470. 0dae  e2 2d     jp 0ddd
    2471. 

  2471. 0db0  8d eb     load immediate 235
    2472. 

  2472. 0db2  f0 31     call INTELL.proc1
    2473. 

  2473. 0db4  22        load local word-2
    2474. 

  2474. 0db5  98        load immediate 8
    2475. 

  2475. 0db6  a0        equal
    2476. 

  2476. 0db7  e3 04     jpfalse 0dbd
    2477. 

  2477. 0db9  8d f5     load immediate 245
    2478. 

  2478. 0dbb  f0 31     call INTELL.proc1
    2479. 

  2479. 0dbd  8d 21     load immediate 33
    2480. 

  2480. 0dbf  04        load param2
    2481. 

  2481. 0dc0  22        load local word-2
    2482. 

  2482. 0dc1  98        load immediate 8
    2483. 

  2483. 0dc2  a0        equal
    2484. 

  2484. 0dc3  a6        add
    2485. 

  2485. 0dc4  b0 01     shl 1
    2486. 

  2486. 0dc6  f0 36     call INTELL.proc6
    2487. 

  2487. 0dc8  8d 39     load immediate 57
    2488. 

  2488. 0dca  f0 31     call INTELL.proc1
    2489. 

  2489. 0dcc  22        load local word-2
    2490. 

  2490. 0dcd  98        load immediate 8
    2491. 

  2491. 0dce  a0        equal
    2492. 

  2492. 0dcf  e3 04     jpfalse 0dd5
    2493. 

  2493. 0dd1  8d f1     load immediate 241
    2494. 

  2494. 0dd3  f0 31     call INTELL.proc1
    2495. 

  2495. 0dd5  8d f9     load immediate 249
    2496. 

  2496. 0dd7  f0 31     call INTELL.proc1
    2497. 

  2497. 0dd9  8d eb     load immediate 235
    2498. 

  2498. 0ddb  f0 31     call INTELL.proc1
    2499. 

  2499. 0ddd  22        load local word-2
    2500. 

  2500. 0dde  98        load immediate 8
    2501. 

  2501. 0ddf  a0        equal
    2502. 

  2502. 0de0  e3 07     jpfalse 0de9
    2503. 

  2503. 0de2  8d f5     load immediate 245
    2504. 

  2504. 0de4  98        load immediate 8
    2505. 

  2505. 0de5  8d f5     load immediate 245
    2506. 

  2506. 0de7  f0 33     call INTELL.proc3
    2507. 

  2507. 0de9  22        load local word-2
    2508. 

  2508. 0dea  94        load immediate 4
    2509. 

  2509. 0deb  a5        ugreater_or_equal
    2510. 

  2510. 0dec  e3 08     jpfalse 0df6
    2511. 

  2511. 0dee  8d d9     load immediate 217
    2512. 

  2512. 0df0  8d e5     load immediate 229
    2513. 

  2513. 0df2  8d d9     load immediate 217
    2514. 

  2514. 0df4  f0 33     call INTELL.proc3
    2515. 

  2515. 0df6  22        load local word-2
    2516. 

  2516. 0df7  92        load immediate 2
    2517. 

  2517. 0df8  a5        ugreater_or_equal
    2518. 

  2518. 0df9  e3 06     jpfalse 0e01
    2519. 

  2519. 0dfb  8d fd     load immediate 253
    2520. 

  2520. 0dfd  8d e5     load immediate 229
    2521. 

  2521. 0dff  f0 32     call INTELL.proc2
    2522. 

  2522. 0e01  05        load param3
    2523. 

  2523. 0e02  e3 0d     jpfalse 0e11
    2524. 

  2524. 0e04  8d 79     load immediate 121
    2525. 

  2525. 0e06  8d b0     load immediate 176
    2526. 

  2526. 0e08  f0 32     call INTELL.proc2
    2527. 

  2527. 0e0a  8d c2     load immediate 194
    2528. 

  2528. 0e0c  8e 7b 04  load immediate 1147
    2529. 

  2529. 0e0f  f0 36     call INTELL.proc6
    2530. 

  2530. 0e11  8d e9     load immediate 233
    2531. 

  2531. 0e13  f0 31     call INTELL.proc1
    2532. 

  2532. 0e15  91        load immediate 1
    2533. 

  2533. 0e16  53        store global word3
    2534. 

  2534. 0e17  91        load immediate 1
    2535. 

  2535. 0e18  ed 20     call proc32
    2536. 

  2536. 0e1a  8b        leave6
    2537. 

  2537. 0e1b  1f        store indexed dword
    2538. 

  2538. 0e1c  02 db     load proc_addr proc219
    2539. 

  2539. 0e1e  6d        load stack word13
    2540. 

  2540. 0e1f  00        Error16
    2541. 

  2541. 0e20  00        Error16
    2542. 

  2542. 0e21  d4 ef     enter -17
    2543. 

  2543. 0e23  03        load param1
    2544. 

  2544. 0e24  93        load immediate 3
    2545. 

  2545. 0e25  e8        bitwise_and
    2546. 

  2546. 0e26  33        store local word-3
    2547. 

  2547. 0e27  03        load param1
    2548. 

  2548. 0e28  b1 02     shr 2
    2549. 

  2549. 0e2a  34        store local word-4
    2550. 

  2550. 0e2b  24        load local word-4
    2551. 

  2551. 0e2c  8e 40 82  load immediate -32192
    2552. 

  2552. 0e2f  e7        bitwise_in
    2553. 

  2553. 0e30  38        store local word-8
    2554. 

  2554. 0e31  24        load local word-4
    2555. 

  2555. 0e32  8e 00 88  load immediate -30720
    2556. 

  2556. 0e35  e7        bitwise_in
    2557. 

  2557. 0e36  b0 01     shl 1
    2558. 

  2558. 0e38  24        load local word-4
    2559. 

  2559. 0e39  8d 44     load immediate 68
    2560. 

  2560. 0e3b  e7        bitwise_in
    2561. 

  2561. 0e3c  b0 02     shl 2
    2562. 

  2562. 0e3e  a6        add
    2563. 

  2563. 0e3f  24        load local word-4
    2564. 

  2564. 0e40  8e 00 03  load immediate 768
    2565. 

  2565. 0e43  e7        bitwise_in
    2566. 

  2566. 0e44  b0 03     shl 3
    2567. 

  2567. 0e46  a6        add
    2568. 

  2568. 0e47  8d ff     load immediate 255
    2569. 

  2569. 0e49  dc        limit_check
    2570. 

  2570. 0e4a  32        store local word-2
    2571. 

  2571. 0e4b  28        load local word-8
    2572. 

  2572. 0e4c  e3 03     jpfalse 0e51
    2573. 

  2573. 0e4e  80 f7     load local address -9
    2574. 

  2574. 0e50  fc        call proc12
    2575. 

  2575. 0e51  23        load local word-3
    2576. 

  2576. 0e52  92        load immediate 2
    2577. 

  2577. 0e53  a0        equal
    2578. 

  2578. 0e54  e3 0c     jpfalse 0e62
    2579. 

  2579. 0e56  ed 15     call proc21
    2580. 

  2580. 0e58  b0 01     shl 1
    2581. 

  2581. 0e5a  ed 26     call proc38
    2582. 

  2582. 0e5c  8d a6     load immediate 166
    2583. 

  2583. 0e5e  ed 1c     call proc28
    2584. 

  2584. 0e60  e2 0b     jp 0e6d
    2585. 

  2585. 0e62  23        load local word-3
    2586. 

  2586. 0e63  93        load immediate 3
    2587. 

  2587. 0e64  a0        equal
    2588. 

  2588. 0e65  e3 06     jpfalse 0e6d
    2589. 

  2589. 0e67  ed 15     call proc21
    2590. 

  2590. 0e69  ed 15     call proc21
    2591. 

  2591. 0e6b  ed 27     call proc39
    2592. 

  2592. 0e6d  28        load local word-8
    2593. 

  2593. 0e6e  e3 02     jpfalse 0e72
    2594. 

  2594. 0e70  29        load local word-9
    2595. 

  2595. 0e71  fb        call proc11
    2596. 

  2596. 0e72  23        load local word-3
    2597. 

  2597. 0e73  91        load immediate 1
    2598. 

  2598. 0e74  a4        uless_or_equal
    2599. 

  2599. 0e75  e3 42     jpfalse 0eb9
    2600. 

  2600. 0e77  ed 15     call proc21
    2601. 

  2601. 0e79  35        store local word-5
    2602. 

  2602. 0e7a  23        load local word-3
    2603. 

  2603. 0e7b  ab        eq0
    2604. 

  2604. 0e7c  de 04     andjp 0e82
    2605. 

  2605. 0e7e  25        load local word-5
    2606. 

  2606. 0e7f  8d 80     load immediate 128
    2607. 

  2607. 0e81  a5        ugreater_or_equal
    2608. 

  2608. 0e82  e3 06     jpfalse 0e8a
    2609. 

  2609. 0e84  25        load local word-5
    2610. 

  2610. 0e85  af 80     sub 128
    2611. 

  2611. 0e87  36        store local word-6
    2612. 

  2612. 0e88  e2 02     jp 0e8c
    2613. 

  2613. 0e8a  25        load local word-5
    2614. 

  2614. 0e8b  36        store local word-6
    2615. 

  2615. 0e8c  94        load immediate 4
    2616. 

  2616. 0e8d  03        load param1
    2617. 

  2617. 0e8e  91        load immediate 1
    2618. 

  2618. 0e8f  e8        bitwise_and
    2619. 

  2619. 0e90  a7        sub
    2620. 

  2620. 0e91  99        load immediate 9
    2621. 

  2621. 0e92  dc        limit_check
    2622. 

  2622. 0e93  37        store local word-7
    2623. 

  2623. 0e94  28        load local word-8
    2624. 

  2624. 0e95  e3 09     jpfalse 0ea0
    2625. 

  2625. 0e97  27        load local word-7
    2626. 

  2626. 0e98  22        load local word-2
    2627. 

  2627. 0e99  25        load local word-5
    2628. 

  2628. 0e9a  dd        check_positive
    2629. 

  2629. 0e9b  ef 03 19  call INTELL.proc25
    2630. 

  2630. 0e9e  e2 06     jp 0ea6
    2631. 

  2631. 0ea0  27        load local word-7
    2632. 

  2632. 0ea1  22        load local word-2
    2633. 

  2633. 0ea2  26        load local word-6
    2634. 

  2634. 0ea3  dd        check_positive
    2635. 

  2635. 0ea4  ed 25     call proc37
    2636. 

  2636. 0ea6  23        load local word-3
    2637. 

  2637. 0ea7  91        load immediate 1
    2638. 

  2638. 0ea8  a0        equal
    2639. 

  2639. 0ea9  e3 0c     jpfalse 0eb7
    2640. 

  2640. 0eab  25        load local word-5
    2641. 

  2641. 0eac  22        load local word-2
    2642. 

  2642. 0ead  ed 24     call proc36
    2643. 

  2643. 0eaf  28        load local word-8
    2644. 

  2644. 0eb0  e3 05     jpfalse 0eb7
    2645. 

  2645. 0eb2  49        load global word9
    2646. 

  2646. 0eb3  90        load immediate 0
    2647. 

  2647. 0eb4  ea        power2
    2648. 

  2648. 0eb5  e6        bitwise_or
    2649. 

  2649. 0eb6  59        store global word9
    2650. 

  2650. 0eb7  e2 2d     jp 0ee6
    2651. 

  2651. 0eb9  28        load local word-8
    2652. 

  2652. 0eba  e3 0b     jpfalse 0ec7
    2653. 

  2653. 0ebc  22        load local word-2
    2654. 

  2654. 0ebd  ef 03 1a  call INTELL.proc26
    2655. 

  2655. 0ec0  49        load global word9
    2656. 

  2656. 0ec1  90        load immediate 0
    2657. 

  2657. 0ec2  ea        power2
    2658. 

  2658. 0ec3  e6        bitwise_or
    2659. 

  2659. 0ec4  59        store global word9
    2660. 

  2660. 0ec5  e2 1f     jp 0ee6
    2661. 

  2661. 0ec7  24        load local word-4
    2662. 

  2662. 0ec8  8d 20     load immediate 32
    2663. 

  2663. 0eca  a1        not_equal
    2664. 

  2664. 0ecb  e3 19     jpfalse 0ee6
    2665. 

  2665. 0ecd  22        load local word-2
    2666. 

  2666. 0ece  92        load immediate 2
    2667. 

  2667. 0ecf  a0        equal
    2668. 

  2668. 0ed0  e3 05     jpfalse 0ed7
    2669. 

  2669. 0ed2  22        load local word-2
    2670. 

  2670. 0ed3  ed 28     call proc40
    2671. 

  2671. 0ed5  e2 0f     jp 0ee6
    2672. 

  2672. 0ed7  22        load local word-2
    2673. 

  2673. 0ed8  94        load immediate 4
    2674. 

  2674. 0ed9  a0        equal
    2675. 

  2675. 0eda  e3 06     jpfalse 0ee2
    2676. 

  2676. 0edc  8d 41     load immediate 65
    2677. 

  2677. 0ede  ed 1c     call proc28
    2678. 

  2678. 0ee0  e2 04     jp 0ee6
    2679. 

  2679. 0ee2  8d 22     load immediate 34
    2680. 

  2680. 0ee4  ed 1c     call proc28
    2681. 

  2681. 0ee6  84 01     leave 1
    2682. 

  2682. 0ee8  bb        long_to_int
    2683. 

  2683. 0ee9  66        load stack word6
    2684. 

  2684. 0eea  41        load stack dword0
    2685. 

  2685. 0eeb  d6        real_add
    2686. 

  2686. 0eec  00        Error16
    2687. 

  2687. 0eed  00        Error16
    2688. 

  2688. 0eee  d4 fd     enter -3
    2689. 

  2689. 0ef0  03        load param1
    2690. 

  2690. 0ef1  cb        not_zero
    2691. 

  2691. 0ef2  e3 0d     jpfalse 0f01
    2692. 

  2692. 0ef4  80 fe     load local address -2
    2693. 

  2693. 0ef6  fc        call proc12
    2694. 

  2694. 0ef7  80 fe     load local address -2
    2695. 

  2695. 0ef9  9c        load immediate 12
    2696. 

  2696. 0efa  40 06     DEALLOCATE
    2697. 

  2697. 0efc  03        load param1
    2698. 

  2698. 0efd  ad        dec
    2699. 

  2699. 0efe  13        store param1
    2700. 

  2700. 0eff  e4 11     jp 0ef0
    2701. 

  2701. 0f01  fd        call proc13
    2702. 

  2702. 0f02  f1        call proc1
    2703. 

  2703. 0f03  84 01     leave 1
    2704. 

  2704. 0f05  99        load immediate 9
    2705. 

  2705. 0f06  02 c5     load proc_addr proc197
    2706. 

  2706. 0f08  40 00     drop
    2707. 

  2707. 0f0a  00        Error16
    2708. 

  2708. 0f0b  d4 ed     enter -19
    2709. 

  2709. 0f0d  90        load immediate 0
    2710. 

  2710. 0f0e  32        store local word-2
    2711. 

  2711. 0f0f  90        load immediate 0
    2712. 

  2712. 0f10  33        store local word-3
    2713. 

  2713. 0f11  90        load immediate 0
    2714. 

  2714. 0f12  36        store local word-6
    2715. 

  2715. 0f13  90        load immediate 0
    2716. 

  2716. 0f14  37        store local word-7
    2717. 

  2717. 0f15  90        load immediate 0
    2718. 

  2718. 0f16  39        store local word-9
    2719. 

  2719. 0f17  47        load global word7
    2720. 

  2720. 0f18  cb        not_zero
    2721. 

  2721. 0f19  e1 76 07  jpfalse 1691
    2722. 

  2722. 0f1c  ed 14     call proc20
    2723. 

  2723. 0f1e  2d 11     load global word 17
    2724. 

  2724. 0f20  f3        call proc3
    2725. 

  2725. 0f21  35        store local word-5
    2726. 

  2726. 0f22  2d 11     load global word 17
    2727. 

  2727. 0f24  8d ff     load immediate 255
    2728. 

  2728. 0f26  dc        limit_check
    2729. 

  2729. 0f27  34        store local word-4
    2730. 

  2730. 0f28  90        load immediate 0
    2731. 

  2731. 0f29  38        store local word-8
    2732. 

  2732. 0f2a  2d 11     load global word 17
    2733. 

  2733. 0f2c  e0 43 05  jp 1471
    2734. 

  2734. 0f2f  ed 15     call proc21
    2735. 

  2735. 0f31  34        store local word-4
    2736. 

  2736. 0f32  24        load local word-4
    2737. 

  2737. 0f33  9a        load immediate 10
    2738. 

  2738. 0f34  a5        ugreater_or_equal
    2739. 

  2739. 0f35  de 03     andjp 0f3a
    2740. 

  2740. 0f37  24        load local word-4
    2741. 

  2741. 0f38  9f        load immediate 15
    2742. 

  2742. 0f39  a4        uless_or_equal
    2743. 

  2743. 0f3a  e3 1c     jpfalse 0f58
    2744. 

  2744. 0f3c  fd        call proc13
    2745. 

  2745. 0f3d  f1        call proc1
    2746. 

  2746. 0f3e  24        load local word-4
    2747. 

  2747. 0f3f  9b        load immediate 11
    2748. 

  2748. 0f40  a0        equal
    2749. 

  2749. 0f41  e3 05     jpfalse 0f48
    2750. 

  2750. 0f43  90        load immediate 0
    2751. 

  2751. 0f44  f0 3b     call INTELL.proc11
    2752. 

  2752. 0f46  e2 0c     jp 0f54
    2753. 

  2753. 0f48  24        load local word-4
    2754. 

  2754. 0f49  8e 00 c0  load immediate -16384
    2755. 

  2755. 0f4c  e7        bitwise_in
    2756. 

  2756. 0f4d  e3 05     jpfalse 0f54
    2757. 

  2757. 0f4f  90        load immediate 0
    2758. 

  2758. 0f50  1c 33     store INTELL.word3
    2759. 

  2759. 0f52  90        load immediate 0
    2760. 

  2760. 0f53  53        store global word3
    2761. 

  2761. 0f54  ed 1d     call proc29
    2762. 

  2762. 0f56  e2 53     jp 0fab
    2763. 

  2763. 0f58  24        load local word-4
    2764. 

  2764. 0f59  8d 14     load immediate 20
    2765. 

  2765. 0f5b  a0        equal
    2766. 

  2766. 0f5c  e3 02     jpfalse 0f60
    2767. 

  2767. 0f5e  e2 4b     jp 0fab
    2768. 

  2768. 0f60  24        load local word-4
    2769. 

  2769. 0f61  8d 15     load immediate 21
    2770. 

  2770. 0f63  a0        equal
    2771. 

  2771. 0f64  e3 1a     jpfalse 0f80
    2772. 

  2772. 0f66  ed 2a     call proc42
    2773. 

  2773. 0f68  90        load immediate 0
    2774. 

  2774. 0f69  f0 3b     call INTELL.proc11
    2775. 

  2775. 0f6b  f0 3a     call INTELL.proc10
    2776. 

  2776. 0f6d  90        load immediate 0
    2777. 

  2777. 0f6e  1c 34     store INTELL.word4
    2778. 

  2778. 0f70  90        load immediate 0
    2779. 

  2779. 0f71  37        store local word-7
    2780. 

  2780. 0f72  80 f9     load local address -7
    2781. 

  2781. 0f74  91        load immediate 1
    2782. 

  2782. 0f75  ef 03 12  call INTELL.proc18
    2783. 

  2783. 0f78  90        load immediate 0
    2784. 

  2784. 0f79  f0 3b     call INTELL.proc11
    2785. 

  2785. 0f7b  91        load immediate 1
    2786. 

  2786. 0f7c  ec 30     nested_call proc48
    2787. 

  2787. 0f7e  e2 2b     jp 0fab
    2788. 

  2788. 0f80  24        load local word-4
    2789. 

  2789. 0f81  8d 16     load immediate 22
    2790. 

  2790. 0f83  a0        equal
    2791. 

  2791. 0f84  e3 04     jpfalse 0f8a
    2792. 

  2792. 0f86  ed 29     call proc41
    2793. 

  2793. 0f88  e2 21     jp 0fab
    2794. 

  2794. 0f8a  24        load local word-4
    2795. 

  2795. 0f8b  8d 17     load immediate 23
    2796. 

  2796. 0f8d  a0        equal
    2797. 

  2797. 0f8e  e3 0f     jpfalse 0f9f
    2798. 

  2798. 0f90  80 fe     load local address -2
    2799. 

  2799. 0f92  9c        load immediate 12
    2800. 

  2800. 0f93  40 05     ALLOCATE
    2801. 

  2801. 0f95  22        load local word-2
    2802. 

  2802. 0f96  92        load immediate 2
    2803. 

  2803. 0f97  71        store stack word1
    2804. 

  2804. 0f98  22        load local word-2
    2805. 

  2805. 0f99  91        load immediate 1
    2806. 

  2806. 0f9a  72        store stack word2
    2807. 

  2807. 0f9b  22        load local word-2
    2808. 

  2808. 0f9c  fb        call proc11
    2809. 

  2809. 0f9d  e2 0c     jp 0fab
    2810. 

  2810. 0f9f  24        load local word-4
    2811. 

  2811. 0fa0  8d 18     load immediate 24
    2812. 

  2812. 0fa2  a0        equal
    2813. 

  2813. 0fa3  e3 04     jpfalse 0fa9
    2814. 

  2814. 0fa5  90        load immediate 0
    2815. 

  2815. 0fa6  5b        store global word11
    2816. 

  2816. 0fa7  e2 02     jp 0fab
    2817. 

  2817. 0fa9  90        load immediate 0
    2818. 

  2818. 0faa  f1        call proc1
    2819. 

  2819. 0fab  ce        jump_stack
    2820. 

  2820. 0fac  ed 2a     call proc42
    2821. 

  2821. 0fae  f0 39     call INTELL.proc9
    2822. 

  2822. 0fb0  24        load local word-4
    2823. 

  2823. 0fb1  f5        call proc5
    2824. 

  2824. 0fb2  49        load global word9
    2825. 

  2825. 0fb3  90        load immediate 0
    2826. 

  2826. 0fb4  ea        power2
    2827. 

  2827. 0fb5  e6        bitwise_or
    2828. 

  2828. 0fb6  59        store global word9
    2829. 

  2829. 0fb7  24        load local word-4
    2830. 

  2830. 0fb8  f4        call proc4
    2831. 

  2831. 0fb9  ec 30     nested_call proc48
    2832. 

  2832. 0fbb  ce        jump_stack
    2833. 

  2833. 0fbc  80 fe     load local address -2
    2834. 

  2834. 0fbe  9c        load immediate 12
    2835. 

  2835. 0fbf  40 05     ALLOCATE
    2836. 

  2836. 0fc1  22        load local word-2
    2837. 

  2837. 0fc2  92        load immediate 2
    2838. 

  2838. 0fc3  71        store stack word1
    2839. 

  2839. 0fc4  22        load local word-2
    2840. 

  2840. 0fc5  99        load immediate 9
    2841. 

  2841. 0fc6  72        store stack word2
    2842. 

  2842. 0fc7  22        load local word-2
    2843. 

  2843. 0fc8  ed 15     call proc21
    2844. 

  2844. 0fca  73        store stack word3
    2845. 

  2845. 0fcb  22        load local word-2
    2846. 

  2846. 0fcc  fb        call proc11
    2847. 

  2847. 0fcd  ce        jump_stack
    2848. 

  2848. 0fce  94        load immediate 4
    2849. 

  2849. 0fcf  92        load immediate 2
    2850. 

  2850. 0fd0  2d 11     load global word 17
    2851. 

  2851. 0fd2  dd        check_positive
    2852. 

  2852. 0fd3  ed 25     call proc37
    2853. 

  2853. 0fd5  ce        jump_stack
    2854. 

  2854. 0fd6  24        load local word-4
    2855. 

  2855. 0fd7  ec 2f     nested_call proc47
    2856. 

  2856. 0fd9  ce        jump_stack
    2857. 

  2857. 0fda  ed 14     call proc20
    2858. 

  2858. 0fdc  2d 11     load global word 17
    2859. 

  2859. 0fde  b1 04     shr 4
    2860. 

  2860. 0fe0  8d ff     load immediate 255
    2861. 

  2861. 0fe2  dc        limit_check
    2862. 

  2862. 0fe3  2d 11     load global word 17
    2863. 

  2863. 0fe5  9f        load immediate 15
    2864. 

  2864. 0fe6  e8        bitwise_and
    2865. 

  2865. 0fe7  8d ff     load immediate 255
    2866. 

  2866. 0fe9  dc        limit_check
    2867. 

  2867. 0fea  ed 27     call proc39
    2868. 

  2868. 0fec  92        load immediate 2
    2869. 

  2869. 0fed  ed 28     call proc40
    2870. 

  2870. 0fef  ce        jump_stack
    2871. 

  2871. 0ff0  8d a6     load immediate 166
    2872. 

  2872. 0ff2  ed 1c     call proc28
    2873. 

  2873. 0ff4  91        load immediate 1
    2874. 

  2874. 0ff5  ed 28     call proc40
    2875. 

  2875. 0ff7  ce        jump_stack
    2876. 

  2876. 0ff8  8d 93     load immediate 147
    2877. 

  2877. 0ffa  ed 1c     call proc28
    2878. 

  2878. 0ffc  92        load immediate 2
    2879. 

  2879. 0ffd  ed 28     call proc40
    2880. 

  2880. 0fff  ce        jump_stack
    2881. 

  2881. 1000  2d 11     load global word 17
    2882. 

  2882. 1002  8d ff     load immediate 255
    2883. 

  2883. 1004  dc        limit_check
    2884. 

  2884. 1005  ed 1c     call proc28
    2885. 

  2885. 1007  ce        jump_stack
    2886. 

  2886. 1008  94        load immediate 4
    2887. 

  2887. 1009  92        load immediate 2
    2888. 

  2888. 100a  90        load immediate 0
    2889. 

  2889. 100b  ed 25     call proc37
    2890. 

  2890. 100d  24        load local word-4
    2891. 

  2891. 100e  8d 11     load immediate 17
    2892. 

  2892. 1010  a0        equal
    2893. 

  2893. 1011  e3 12     jpfalse 1025
    2894. 

  2894. 1013  92        load immediate 2
    2895. 

  2895. 1014  37        store local word-7
    2896. 

  2896. 1015  ed 15     call proc21
    2897. 

  2897. 1017  3a        store local word-10
    2898. 

  2898. 1018  27        load local word-7
    2899. 

  2899. 1019  2a        load local word-10
    2900. 

  2900. 101a  a4        uless_or_equal
    2901. 

  2901. 101b  e3 08     jpfalse 1025
    2902. 

  2902. 101d  92        load immediate 2
    2903. 

  2903. 101e  ed 28     call proc40
    2904. 

  2904. 1020  27        load local word-7
    2905. 

  2905. 1021  ac        inc
    2906. 

  2906. 1022  37        store local word-7
    2907. 

  2907. 1023  e4 0d     jp 1018
    2908. 

  2908. 1025  ed 17     call proc23
    2909. 

  2909. 1027  34        store local word-4
    2910. 

  2910. 1028  24        load local word-4
    2911. 

  2911. 1029  8d ee     load immediate 238
    2912. 

  2912. 102b  a0        equal
    2913. 

  2913. 102c  e3 02     jpfalse 1030
    2914. 

  2914. 102e  e2 3f     jp 106f
    2915. 

  2915. 1030  24        load local word-4
    2916. 

  2916. 1031  8d af     load immediate 175
    2917. 

  2917. 1033  a0        equal
    2918. 

  2918. 1034  e3 34     jpfalse 106a
    2919. 

  2919. 1036  ed 14     call proc20
    2920. 

  2920. 1038  ed 15     call proc21
    2921. 

  2921. 103a  ed 26     call proc38
    2922. 

  2922. 103c  8d a7     load immediate 167
    2923. 

  2923. 103e  ed 1c     call proc28
    2924. 

  2924. 1040  ed 17     call proc23
    2925. 

  2925. 1042  34        store local word-4
    2926. 

  2926. 1043  24        load local word-4
    2927. 

  2927. 1044  8d 2e     load immediate 46
    2928. 

  2928. 1046  a0        equal
    2929. 

  2929. 1047  e3 04     jpfalse 104d
    2930. 

  2930. 1049  92        load immediate 2
    2931. 

  2931. 104a  35        store local word-5
    2932. 

  2932. 104b  e2 0c     jp 1059
    2933. 

  2933. 104d  24        load local word-4
    2934. 

  2934. 104e  8d 41     load immediate 65
    2935. 

  2935. 1050  a0        equal
    2936. 

  2936. 1051  e3 04     jpfalse 1057
    2937. 

  2937. 1053  94        load immediate 4
    2938. 

  2938. 1054  35        store local word-5
    2939. 

  2939. 1055  e2 02     jp 1059
    2940. 

  2940. 1057  98        load immediate 8
    2941. 

  2941. 1058  35        store local word-5
    2942. 

  2942. 1059  2d 11     load global word 17
    2943. 

  2943. 105b  dd        check_positive
    2944. 

  2944. 105c  25        load local word-5
    2945. 

  2945. 105d  dd        check_positive
    2946. 

  2946. 105e  a7        sub
    2947. 

  2947. 105f  98        load immediate 8
    2948. 

  2948. 1060  b4        iless_or_equal
    2949. 

  2949. 1061  e3 05     jpfalse 1068
    2950. 

  2950. 1063  49        load global word9
    2951. 

  2951. 1064  91        load immediate 1
    2952. 

  2952. 1065  ea        power2
    2953. 

  2953. 1066  e6        bitwise_or
    2954. 

  2954. 1067  59        store global word9
    2955. 

  2955. 1068  e2 05     jp 106f
    2956. 

  2956. 106a  49        load global word9
    2957. 

  2957. 106b  91        load immediate 1
    2958. 

  2958. 106c  ea        power2
    2959. 

  2959. 106d  e6        bitwise_or
    2960. 

  2960. 106e  59        store global word9
    2961. 

  2961. 106f  ce        jump_stack
    2962. 

  2962. 1070  ed 15     call proc21
    2963. 

  2963. 1072  34        store local word-4
    2964. 

  2964. 1073  24        load local word-4
    2965. 

  2965. 1074  97        load immediate 7
    2966. 

  2966. 1075  a4        uless_or_equal
    2967. 

  2967. 1076  e3 0a     jpfalse 1082
    2968. 

  2968. 1078  24        load local word-4
    2969. 

  2969. 1079  ae 20     add 32
    2970. 

  2970. 107b  8d ff     load immediate 255
    2971. 

  2971. 107d  dc        limit_check
    2972. 

  2972. 107e  ec 2f     nested_call proc47
    2973. 

  2973. 1080  e2 39     jp 10bb
    2974. 

  2974. 1082  24        load local word-4
    2975. 

  2975. 1083  98        load immediate 8
    2976. 

  2976. 1084  a0        equal
    2977. 

  2977. 1085  e3 08     jpfalse 108f
    2978. 

  2978. 1087  8d 28     load immediate 40
    2979. 

  2979. 1089  ed 1c     call proc28
    2980. 

  2980. 108b  ed 14     call proc20
    2981. 

  2981. 108d  e2 2c     jp 10bb
    2982. 

  2982. 108f  24        load local word-4
    2983. 

  2983. 1090  99        load immediate 9
    2984. 

  2984. 1091  a0        equal
    2985. 

  2985. 1092  e3 13     jpfalse 10a7
    2986. 

  2986. 1094  ed 2a     call proc42
    2987. 

  2987. 1096  f0 39     call INTELL.proc9
    2988. 

  2988. 1098  8d 2e     load immediate 46
    2989. 

  2989. 109a  99        load immediate 9
    2990. 

  2990. 109b  f0 32     call INTELL.proc2
    2991. 

  2991. 109d  8d 12     load immediate 18
    2992. 

  2992. 109f  f5        call proc5
    2993. 

  2993. 10a0  93        load immediate 3
    2994. 

  2994. 10a1  ec 30     nested_call proc48
    2995. 

  2995. 10a3  ed 14     call proc20
    2996. 

  2996. 10a5  e2 14     jp 10bb
    2997. 

  2997. 10a7  ed 15     call proc21
    2998. 

  2998. 10a9  34        store local word-4
    2999. 

  2999. 10aa  24        load local word-4
    3000. 

  3000. 10ab  8d 80     load immediate 128
    3001. 

  3001. 10ad  a5        ugreater_or_equal
    3002. 

  3002. 10ae  de 04     andjp 10b4
    3003. 

  3003. 10b0  2f 02 1a  load COMPILER.word26
    3004. 

  3004. 10b3  b6        not
    3005. 

  3005. 10b4  24        load local word-4
    3006. 

  3006. 10b5  8d 7f     load immediate 127
    3007. 

  3007. 10b7  e8        bitwise_and
    3008. 

  3008. 10b8  93        load immediate 3
    3009. 

  3009. 10b9  ed 2d     call proc45
    3010. 

  3010. 10bb  ce        jump_stack
    3011. 

  3011. 10bc  94        load immediate 4
    3012. 

  3012. 10bd  92        load immediate 2
    3013. 

  3013. 10be  2d 11     load global word 17
    3014. 

  3014. 10c0  9f        load immediate 15
    3015. 

  3015. 10c1  e8        bitwise_and
    3016. 

  3016. 10c2  dd        check_positive
    3017. 

  3017. 10c3  ef 03 19  call INTELL.proc25
    3018. 

  3018. 10c6  ce        jump_stack
    3019. 

  3019. 10c7  ed 14     call proc20
    3020. 

  3020. 10c9  80 fe     load local address -2
    3021. 

  3021. 10cb  fc        call proc12
    3022. 

  3022. 10cc  2d 11     load global word 17
    3023. 

  3023. 10ce  b1 04     shr 4
    3024. 

  3024. 10d0  8d ff     load immediate 255
    3025. 

  3025. 10d2  dc        limit_check
    3026. 

  3026. 10d3  2d 11     load global word 17
    3027. 

  3027. 10d5  9f        load immediate 15
    3028. 

  3028. 10d6  e8        bitwise_and
    3029. 

  3029. 10d7  8d ff     load immediate 255
    3030. 

  3030. 10d9  dc        limit_check
    3031. 

  3031. 10da  ed 27     call proc39
    3032. 

  3032. 10dc  22        load local word-2
    3033. 

  3033. 10dd  fb        call proc11
    3034. 

  3034. 10de  92        load immediate 2
    3035. 

  3035. 10df  ef 03 1a  call INTELL.proc26
    3036. 

  3036. 10e2  49        load global word9
    3037. 

  3037. 10e3  90        load immediate 0
    3038. 

  3038. 10e4  ea        power2
    3039. 

  3039. 10e5  e6        bitwise_or
    3040. 

  3040. 10e6  59        store global word9
    3041. 

  3041. 10e7  ce        jump_stack
    3042. 

  3042. 10e8  80 fe     load local address -2
    3043. 

  3043. 10ea  fc        call proc12
    3044. 

  3044. 10eb  8d a6     load immediate 166
    3045. 

  3045. 10ed  ed 1c     call proc28
    3046. 

  3046. 10ef  22        load local word-2
    3047. 

  3047. 10f0  fb        call proc11
    3048. 

  3048. 10f1  91        load immediate 1
    3049. 

  3049. 10f2  ef 03 1a  call INTELL.proc26
    3050. 

  3050. 10f5  49        load global word9
    3051. 

  3051. 10f6  90        load immediate 0
    3052. 

  3052. 10f7  ea        power2
    3053. 

  3053. 10f8  e6        bitwise_or
    3054. 

  3054. 10f9  59        store global word9
    3055. 

  3055. 10fa  ce        jump_stack
    3056. 

  3056. 10fb  80 fe     load local address -2
    3057. 

  3057. 10fd  fc        call proc12
    3058. 

  3058. 10fe  8d 93     load immediate 147
    3059. 

  3059. 1100  ed 1c     call proc28
    3060. 

  3060. 1102  22        load local word-2
    3061. 

  3061. 1103  fb        call proc11
    3062. 

  3062. 1104  92        load immediate 2
    3063. 

  3063. 1105  ef 03 1a  call INTELL.proc26
    3064. 

  3064. 1108  49        load global word9
    3065. 

  3065. 1109  90        load immediate 0
    3066. 

  3066. 110a  ea        power2
    3067. 

  3067. 110b  e6        bitwise_or
    3068. 

  3068. 110c  59        store global word9
    3069. 

  3069. 110d  ce        jump_stack
    3070. 

  3070. 110e  ed 2a     call proc42
    3071. 

  3071. 1110  80 fe     load local address -2
    3072. 

  3072. 1112  fc        call proc12
    3073. 

  3073. 1113  22        load local word-2
    3074. 

  3074. 1114  62        load stack word2
    3075. 

  3075. 1115  91        load immediate 1
    3076. 

  3076. 1116  a0        equal
    3077. 

  3077. 1117  f1        call proc1
    3078. 

  3078. 1118  f0 3a     call INTELL.proc10
    3079. 

  3079. 111a  f0 39     call INTELL.proc9
    3080. 

  3080. 111c  91        load immediate 1
    3081. 

  3081. 111d  1c 34     store INTELL.word4
    3082. 

  3082. 111f  80 fd     load local address -3
    3083. 

  3083. 1121  9c        load immediate 12
    3084. 

  3084. 1122  40 05     ALLOCATE
    3085. 

  3085. 1124  23        load local word-3
    3086. 

  3086. 1125  22        load local word-2
    3087. 

  3087. 1126  9c        load immediate 12
    3088. 

  3088. 1127  30        copy block
    3089. 

  3089. 1128  22        load local word-2
    3090. 

  3090. 1129  fb        call proc11
    3091. 

  3091. 112a  23        load local word-3
    3092. 

  3092. 112b  fb        call proc11
    3093. 

  3093. 112c  ce        jump_stack
    3094. 

  3094. 112d  80 fe     load local address -2
    3095. 

  3095. 112f  fc        call proc12
    3096. 

  3096. 1130  80 fd     load local address -3
    3097. 

  3097. 1132  fc        call proc12
    3098. 

  3098. 1133  22        load local word-2
    3099. 

  3099. 1134  fb        call proc11
    3100. 

  3100. 1135  23        load local word-3
    3101. 

  3101. 1136  fb        call proc11
    3102. 

  3102. 1137  22        load local word-2
    3103. 

  3103. 1138  61        load stack word1
    3104. 

  3104. 1139  92        load immediate 2
    3105. 

  3105. 113a  a0        equal
    3106. 

  3106. 113b  de 04     andjp 1141
    3107. 

  3107. 113d  23        load local word-3
    3108. 

  3108. 113e  61        load stack word1
    3109. 

  3109. 113f  92        load immediate 2
    3110. 

  3110. 1140  a0        equal
    3111. 

  3111. 1141  f1        call proc1
    3112. 

  3112. 1142  ce        jump_stack
    3113. 

  3113. 1143  94        load immediate 4
    3114. 

  3114. 1144  92        load immediate 2
    3115. 

  3115. 1145  8d 80     load immediate 128
    3116. 

  3116. 1147  2d 11     load global word 17
    3117. 

  3117. 1149  9f        load immediate 15
    3118. 

  3118. 114a  e8        bitwise_and
    3119. 

  3119. 114b  a7        sub
    3120. 

  3120. 114c  dd        check_positive
    3121. 

  3121. 114d  ed 25     call proc37
    3122. 

  3122. 114f  ce        jump_stack
    3123. 

  3123. 1150  94        load immediate 4
    3124. 

  3124. 1151  92        load immediate 2
    3125. 

  3125. 1152  8e 00 01  load immediate 256
    3126. 

  3126. 1155  2d 11     load global word 17
    3127. 

  3127. 1157  9f        load immediate 15
    3128. 

  3128. 1158  e8        bitwise_and
    3129. 

  3129. 1159  a7        sub
    3130. 

  3130. 115a  dd        check_positive
    3131. 

  3131. 115b  ef 03 19  call INTELL.proc25
    3132. 

  3132. 115e  ce        jump_stack
    3133. 

  3133. 115f  ed 15     call proc21
    3134. 

  3134. 1161  34        store local word-4
    3135. 

  3135. 1162  24        load local word-4
    3136. 

  3136. 1163  e2 51     jp 11b6
    3137. 

  3137. 1165  90        load immediate 0
    3138. 

  3138. 1166  37        store local word-7
    3139. 

  3139. 1167  80 f9     load local address -7
    3140. 

  3140. 1169  91        load immediate 1
    3141. 

  3141. 116a  ef 03 12  call INTELL.proc18
    3142. 

  3142. 116d  8d e1     load immediate 225
    3143. 

  3143. 116f  f0 31     call INTELL.proc1
    3144. 

  3144. 1171  ce        jump_stack
    3145. 

  3145. 1172  24        load local word-4
    3146. 

  3146. 1173  ae 42     add 66
    3147. 

  3147. 1175  24        load local word-4
    3148. 

  3148. 1176  9d        load immediate 13
    3149. 

  3149. 1177  a3        ugreater_than
    3150. 

  3150. 1178  b0 01     shl 1
    3151. 

  3151. 117a  a6        add
    3152. 

  3152. 117b  8d ff     load immediate 255
    3153. 

  3153. 117d  dc        limit_check
    3154. 

  3154. 117e  ed 1c     call proc28
    3155. 

  3155. 1180  ce        jump_stack
    3156. 

  3156. 1181  ed 2a     call proc42
    3157. 

  3157. 1183  f0 39     call INTELL.proc9
    3158. 

  3158. 1185  90        load immediate 0
    3159. 

  3159. 1186  f0 3e     call INTELL.proc14
    3160. 

  3160. 1188  90        load immediate 0
    3161. 

  3161. 1189  ef 03 13  call INTELL.proc19
    3162. 

  3162. 118c  8d 3e     load immediate 62
    3163. 

  3163. 118e  24        load local word-4
    3164. 

  3164. 118f  f0 32     call INTELL.proc2
    3165. 

  3165. 1191  8d 40     load immediate 64
    3166. 

  3166. 1193  f5        call proc5
    3167. 

  3167. 1194  24        load local word-4
    3168. 

  3168. 1195  92        load immediate 2
    3169. 

  3169. 1196  a0        equal
    3170. 

  3170. 1197  e3 0a     jpfalse 11a3
    3171. 

  3171. 1199  80 fe     load local address -2
    3172. 

  3172. 119b  fc        call proc12
    3173. 

  3173. 119c  80 fe     load local address -2
    3174. 

  3174. 119e  9c        load immediate 12
    3175. 

  3175. 119f  40 06     DEALLOCATE
    3176. 

  3176. 11a1  e2 0d     jp 11b0
    3177. 

  3177. 11a3  8d 42     load immediate 66
    3178. 

  3178. 11a5  24        load local word-4
    3179. 

  3179. 11a6  a6        add
    3180. 

  3180. 11a7  24        load local word-4
    3181. 

  3181. 11a8  9d        load immediate 13
    3182. 

  3182. 11a9  a3        ugreater_than
    3183. 

  3183. 11aa  b0 01     shl 1
    3184. 

  3184. 11ac  a6        add
    3185. 

  3185. 11ad  f4        call proc4
    3186. 

  3186. 11ae  ec 30     nested_call proc48
    3187. 

  3187. 11b0  ce        jump_stack
    3188. 

  3188. 11b1  90        load immediate 0
    3189. 

  3189. 11b2  ef 03 18  call INTELL.proc24
    3190. 

  3190. 11b5  ce        jump_stack
    3191. 

  3191. 11b6  cd 00 80 12 00 2b 00  callswitch (return to 11e7)
    3192. 

  3192. 	case 90 => 1165
    3193. 

  3193. 	case 91 => 1172
    3194. 

  3194. 	case 92 => 1181
    3195. 

  3195. 	case 93 => 1172
    3196. 

  3196. 	case 94 => 1172
    3197. 

  3197. 	case 95 => 1181
    3198. 

  3198. 	case 96 => 1181
    3199. 

  3199. 	case 97 => 1181
    3200. 

  3200. 	case 98 => 1181
    3201. 

  3201. 	case 99 => 1172
    3202. 

  3202. 	case 100 => 1181
    3203. 

  3203. 	case 101 => 1181
    3204. 

  3204. 	case 102 => 1181
    3205. 

  3205. 	case 103 => 1181
    3206. 

  3206. 	case 104 => 1181
    3207. 

  3207. 	case 105 => 1181
    3208. 

  3208. 	case 106 => 1172
    3209. 

  3209. 	case 107 => 11b1
    3210. 

  3210. 	case 108 => 1172
    3211. 

  3211. 11e3  9d        load immediate 13
    3212. 

  3212. 11e4  90        load immediate 0
    3213. 

  3213. 11e5  90        load immediate 0
    3214. 

  3214. 11e6  01        Raise
    3215. 

  3215. 11e7  ce        jump_stack
    3216. 

  3216. 11e8  2d 11     load global word 17
    3217. 

  3217. 11ea  9f        load immediate 15
    3218. 

  3218. 11eb  e8        bitwise_and
    3219. 

  3219. 11ec  dd        check_positive
    3220. 

  3220. 11ed  36        store local word-6
    3221. 

  3221. 11ee  26        load local word-6
    3222. 

  3222. 11ef  dd        check_positive
    3223. 

  3223. 11f0  92        load immediate 2
    3224. 

  3224. 11f1  ed 24     call proc36
    3225. 

  3225. 11f3  93        load immediate 3
    3226. 

  3226. 11f4  92        load immediate 2
    3227. 

  3227. 11f5  26        load local word-6
    3228. 

  3228. 11f6  ed 25     call proc37
    3229. 

  3229. 11f8  ce        jump_stack
    3230. 

  3230. 11f9  2d 11     load global word 17
    3231. 

  3231. 11fb  9f        load immediate 15
    3232. 

  3232. 11fc  e8        bitwise_and
    3233. 

  3233. 11fd  dd        check_positive
    3234. 

  3234. 11fe  36        store local word-6
    3235. 

  3235. 11ff  49        load global word9
    3236. 

  3236. 1200  90        load immediate 0
    3237. 

  3237. 1201  ea        power2
    3238. 

  3238. 1202  e6        bitwise_or
    3239. 

  3239. 1203  59        store global word9
    3240. 

  3240. 1204  26        load local word-6
    3241. 

  3241. 1205  dd        check_positive
    3242. 

  3242. 1206  92        load immediate 2
    3243. 

  3243. 1207  ed 24     call proc36
    3244. 

  3244. 1209  93        load immediate 3
    3245. 

  3245. 120a  92        load immediate 2
    3246. 

  3246. 120b  2d 11     load global word 17
    3247. 

  3247. 120d  9f        load immediate 15
    3248. 

  3248. 120e  e8        bitwise_and
    3249. 

  3249. 120f  dd        check_positive
    3250. 

  3250. 1210  ef 03 19  call INTELL.proc25
    3251. 

  3251. 1213  ce        jump_stack
    3252. 

  3252. 1214  80 fe     load local address -2
    3253. 

  3253. 1216  fc        call proc12
    3254. 

  3254. 1217  22        load local word-2
    3255. 

  3255. 1218  61        load stack word1
    3256. 

  3256. 1219  92        load immediate 2
    3257. 

  3257. 121a  a0        equal
    3258. 

  3258. 121b  f1        call proc1
    3259. 

  3259. 121c  22        load local word-2
    3260. 

  3260. 121d  62        load stack word2
    3261. 

  3261. 121e  91        load immediate 1
    3262. 

  3262. 121f  a0        equal
    3263. 

  3263. 1220  e3 05     jpfalse 1227
    3264. 

  3264. 1222  f0 3a     call INTELL.proc10
    3265. 

  3265. 1224  90        load immediate 0
    3266. 

  3266. 1225  1c 34     store INTELL.word4
    3267. 

  3267. 1227  80 fe     load local address -2
    3268. 

  3268. 1229  9c        load immediate 12
    3269. 

  3269. 122a  40 06     DEALLOCATE
    3270. 

  3270. 122c  ce        jump_stack
    3271. 

  3271. 122d  ed 15     call proc21
    3272. 

  3272. 122f  b0 01     shl 1
    3273. 

  3273. 1231  dd        check_positive
    3274. 

  3274. 1232  36        store local word-6
    3275. 

  3275. 1233  ed 15     call proc21
    3276. 

  3276. 1235  35        store local word-5
    3277. 

  3277. 1236  26        load local word-6
    3278. 

  3278. 1237  8d ff     load immediate 255
    3279. 

  3279. 1239  b3        igreater_than
    3280. 

  3280. 123a  e3 06     jpfalse 1242
    3281. 

  3281. 123c  26        load local word-6
    3282. 

  3282. 123d  8e 00 ff  load immediate -256
    3283. 

  3283. 1240  a6        add
    3284. 

  3284. 1241  36        store local word-6
    3285. 

  3285. 1242  96        load immediate 6
    3286. 

  3286. 1243  26        load local word-6
    3287. 

  3287. 1244  25        load local word-5
    3288. 

  3288. 1245  f0 3c     call INTELL.proc12
    3289. 

  3289. 1247  96        load immediate 6
    3290. 

  3290. 1248  92        load immediate 2
    3291. 

  3291. 1249  90        load immediate 0
    3292. 

  3292. 124a  ed 25     call proc37
    3293. 

  3293. 124c  26        load local word-6
    3294. 

  3294. 124d  8d 7f     load immediate 127
    3295. 

  3295. 124f  b4        iless_or_equal
    3296. 

  3296. 1250  e3 06     jpfalse 1258
    3297. 

  3297. 1252  26        load local word-6
    3298. 

  3298. 1253  dd        check_positive
    3299. 

  3299. 1254  ed 26     call proc38
    3300. 

  3300. 1256  e2 08     jp 1260
    3301. 

  3301. 1258  8e 00 ff  load immediate -256
    3302. 

  3302. 125b  26        load local word-6
    3303. 

  3303. 125c  dd        check_positive
    3304. 

  3304. 125d  a6        add
    3305. 

  3305. 125e  ed 26     call proc38
    3306. 

  3306. 1260  8d a6     load immediate 166
    3307. 

  3307. 1262  ed 1c     call proc28
    3308. 

  3308. 1264  ce        jump_stack
    3309. 

  3309. 1265  ed 15     call proc21
    3310. 

  3310. 1267  36        store local word-6
    3311. 

  3311. 1268  ed 15     call proc21
    3312. 

  3312. 126a  35        store local word-5
    3313. 

  3313. 126b  95        load immediate 5
    3314. 

  3314. 126c  26        load local word-6
    3315. 

  3315. 126d  92        load immediate 2
    3316. 

  3316. 126e  b8        imul
    3317. 

  3317. 126f  25        load local word-5
    3318. 

  3318. 1270  f0 3c     call INTELL.proc12
    3319. 

  3319. 1272  26        load local word-6
    3320. 

  3320. 1273  dd        check_positive
    3321. 

  3321. 1274  25        load local word-5
    3322. 

  3322. 1275  ed 24     call proc36
    3323. 

  3323. 1277  95        load immediate 5
    3324. 

  3324. 1278  92        load immediate 2
    3325. 

  3325. 1279  26        load local word-6
    3326. 

  3326. 127a  ed 25     call proc37
    3327. 

  3327. 127c  ce        jump_stack
    3328. 

  3328. 127d  2d 11     load global word 17
    3329. 

  3329. 127f  af 84     sub 132
    3330. 

  3330. 1281  8d ff     load immediate 255
    3331. 

  3331. 1283  dc        limit_check
    3332. 

  3332. 1284  35        store local word-5
    3333. 

  3333. 1285  ed 15     call proc21
    3334. 

  3334. 1287  34        store local word-4
    3335. 

  3335. 1288  24        load local word-4
    3336. 

  3336. 1289  8d 80     load immediate 128
    3337. 

  3337. 128b  a5        ugreater_or_equal
    3338. 

  3338. 128c  de 04     andjp 1292
    3339. 

  3339. 128e  2f 02 1a  load COMPILER.word26
    3340. 

  3340. 1291  b6        not
    3341. 

  3341. 1292  24        load local word-4
    3342. 

  3342. 1293  8d 7f     load immediate 127
    3343. 

  3343. 1295  e8        bitwise_and
    3344. 

  3344. 1296  25        load local word-5
    3345. 

  3345. 1297  ed 2d     call proc45
    3346. 

  3346. 1299  ce        jump_stack
    3347. 

  3347. 129a  80 fe     load local address -2
    3348. 

  3348. 129c  9c        load immediate 12
    3349. 

  3349. 129d  40 05     ALLOCATE
    3350. 

  3350. 129f  22        load local word-2
    3351. 

  3351. 12a0  92        load immediate 2
    3352. 

  3352. 12a1  71        store stack word1
    3353. 

  3353. 12a2  22        load local word-2
    3354. 

  3354. 12a3  98        load immediate 8
    3355. 

  3355. 12a4  72        store stack word2
    3356. 

  3356. 12a5  22        load local word-2
    3357. 

  3357. 12a6  ed 15     call proc21
    3358. 

  3358. 12a8  73        store stack word3
    3359. 

  3359. 12a9  22        load local word-2
    3360. 

  3360. 12aa  82 04     load stack address 4
    3361. 

  3361. 12ac  8d 80     load immediate 128
    3362. 

  3362. 12ae  40 05     ALLOCATE
    3363. 

  3363. 12b0  90        load immediate 0
    3364. 

  3364. 12b1  37        store local word-7
    3365. 

  3365. 12b2  27        load local word-7
    3366. 

  3366. 12b3  22        load local word-2
    3367. 

  3367. 12b4  63        load stack word3
    3368. 

  3368. 12b5  a2        uless_than
    3369. 

  3369. 12b6  e3 0e     jpfalse 12c6
    3370. 

  3370. 12b8  22        load local word-2
    3371. 

  3371. 12b9  64        load stack word4
    3372. 

  3372. 12ba  27        load local word-7
    3373. 

  3373. 12bb  8d 7f     load immediate 127
    3374. 

  3374. 12bd  dc        limit_check
    3375. 

  3375. 12be  ed 15     call proc21
    3376. 

  3376. 12c0  1d        store indexed byte
    3377. 

  3377. 12c1  27        load local word-7
    3378. 

  3378. 12c2  ac        inc
    3379. 

  3379. 12c3  37        store local word-7
    3380. 

  3380. 12c4  e4 14     jp 12b2
    3381. 

  3381. 12c6  22        load local word-2
    3382. 

  3382. 12c7  fb        call proc11
    3383. 

  3383. 12c8  ce        jump_stack
    3384. 

  3384. 12c9  ed 15     call proc21
    3385. 

  3385. 12cb  ed 26     call proc38
    3386. 

  3386. 12cd  ce        jump_stack
    3387. 

  3387. 12ce  ed 16     call proc22
    3388. 

  3388. 12d0  ed 26     call proc38
    3389. 

  3389. 12d2  ce        jump_stack
    3390. 

  3390. 12d3  80 fe     load local address -2
    3391. 

  3391. 12d5  9c        load immediate 12
    3392. 

  3392. 12d6  40 05     ALLOCATE
    3393. 

  3393. 12d8  22        load local word-2
    3394. 

  3394. 12d9  94        load immediate 4
    3395. 

  3395. 12da  71        store stack word1
    3396. 

  3396. 12db  22        load local word-2
    3397. 

  3397. 12dc  90        load immediate 0
    3398. 

  3398. 12dd  72        store stack word2
    3399. 

  3399. 12de  22        load local word-2
    3400. 

  3400. 12df  82 03     load stack address 3
    3401. 

  3401. 12e1  90        load immediate 0
    3402. 

  3402. 12e2  ed 16     call proc22
    3403. 

  3403. 12e4  1e        store indexed word
    3404. 

  3404. 12e5  22        load local word-2
    3405. 

  3405. 12e6  82 03     load stack address 3
    3406. 

  3406. 12e8  91        load immediate 1
    3407. 

  3407. 12e9  ed 16     call proc22
    3408. 

  3408. 12eb  1e        store indexed word
    3409. 

  3409. 12ec  22        load local word-2
    3410. 

  3410. 12ed  fb        call proc11
    3411. 

  3411. 12ee  ce        jump_stack
    3412. 

  3412. 12ef  2d 11     load global word 17
    3413. 

  3413. 12f1  9f        load immediate 15
    3414. 

  3414. 12f2  e8        bitwise_and
    3415. 

  3415. 12f3  ed 26     call proc38
    3416. 

  3416. 12f5  ce        jump_stack
    3417. 

  3417. 12f6  2d 11     load global word 17
    3418. 

  3418. 12f8  af 06     sub 6
    3419. 

  3419. 12fa  8d ff     load immediate 255
    3420. 

  3420. 12fc  dc        limit_check
    3421. 

  3421. 12fd  34        store local word-4
    3422. 

  3422. 12fe  91        load immediate 1
    3423. 

  3423. 12ff  ed 26     call proc38
    3424. 

  3424. 1301  24        load local word-4
    3425. 

  3425. 1302  ed 1c     call proc28
    3426. 

  3426. 1304  ce        jump_stack
    3427. 

  3427. 1305  2d 11     load global word 17
    3428. 

  3428. 1307  af 08     sub 8
    3429. 

  3429. 1309  8d ff     load immediate 255
    3430. 

  3430. 130b  dc        limit_check
    3431. 

  3431. 130c  34        store local word-4
    3432. 

  3432. 130d  ed 15     call proc21
    3433. 

  3433. 130f  ed 26     call proc38
    3434. 

  3434. 1311  24        load local word-4
    3435. 

  3435. 1312  ed 1c     call proc28
    3436. 

  3436. 1314  ce        jump_stack
    3437. 

  3437. 1315  2d 11     load global word 17
    3438. 

  3438. 1317  8d ff     load immediate 255
    3439. 

  3439. 1319  dc        limit_check
    3440. 

  3440. 131a  34        store local word-4
    3441. 

  3441. 131b  ed 15     call proc21
    3442. 

  3442. 131d  ed 26     call proc38
    3443. 

  3443. 131f  24        load local word-4
    3444. 

  3444. 1320  ed 1c     call proc28
    3445. 

  3445. 1322  ce        jump_stack
    3446. 

  3446. 1323  ed 29     call proc41
    3447. 

  3447. 1325  ed 29     call proc41
    3448. 

  3448. 1327  2d 11     load global word 17
    3449. 

  3449. 1329  8d ff     load immediate 255
    3450. 

  3450. 132b  dc        limit_check
    3451. 

  3451. 132c  ed 1c     call proc28
    3452. 

  3452. 132e  ce        jump_stack
    3453. 

  3453. 132f  ed 22     call proc34
    3454. 

  3454. 1331  ce        jump_stack
    3455. 

  3455. 1332  fd        call proc13
    3456. 

  3456. 1333  f1        call proc1
    3457. 

  3457. 1334  90        load immediate 0
    3458. 

  3458. 1335  37        store local word-7
    3459. 

  3459. 1336  80 f9     load local address -7
    3460. 

  3460. 1338  91        load immediate 1
    3461. 

  3461. 1339  ef 03 12  call INTELL.proc18
    3462. 

  3462. 133c  90        load immediate 0
    3463. 

  3463. 133d  f0 3b     call INTELL.proc11
    3464. 

  3464. 133f  8d c9     load immediate 201
    3465. 

  3465. 1341  f0 31     call INTELL.proc1
    3466. 

  3466. 1343  ce        jump_stack
    3467. 

  3467. 1344  fd        call proc13
    3468. 

  3468. 1345  f1        call proc1
    3469. 

  3469. 1346  90        load immediate 0
    3470. 

  3470. 1347  37        store local word-7
    3471. 

  3471. 1348  80 f9     load local address -7
    3472. 

  3472. 134a  91        load immediate 1
    3473. 

  3473. 134b  ef 03 12  call INTELL.proc18
    3474. 

  3474. 134e  90        load immediate 0
    3475. 

  3475. 134f  f0 3b     call INTELL.proc11
    3476. 

  3476. 1351  ed 16     call proc22
    3477. 

  3477. 1353  ad        dec
    3478. 

  3478. 1354  36        store local word-6
    3479. 

  3479. 1355  8d 21     load immediate 33
    3480. 

  3480. 1357  80 f8     load local address -8
    3481. 

  3481. 1359  91        load immediate 1
    3482. 

  3482. 135a  fa        call proc10
    3483. 

  3483. 135b  8d e5     load immediate 229
    3484. 

  3484. 135d  f0 31     call INTELL.proc1
    3485. 

  3485. 135f  90        load immediate 0
    3486. 

  3486. 1360  26        load local word-6
    3487. 

  3487. 1361  dd        check_positive
    3488. 

  3488. 1362  80 f8     load local address -8
    3489. 

  3489. 1364  ed 21     call proc33
    3490. 

  3490. 1366  ce        jump_stack
    3491. 

  3491. 1367  80 fe     load local address -2
    3492. 

  3492. 1369  fc        call proc12
    3493. 

  3493. 136a  80 fd     load local address -3
    3494. 

  3494. 136c  fc        call proc12
    3495. 

  3495. 136d  23        load local word-3
    3496. 

  3496. 136e  62        load stack word2
    3497. 

  3497. 136f  ab        eq0
    3498. 

  3498. 1370  de 03     andjp 1375
    3499. 

  3499. 1372  22        load local word-2
    3500. 

  3500. 1373  62        load stack word2
    3501. 

  3501. 1374  ab        eq0
    3502. 

  3502. 1375  f1        call proc1
    3503. 

  3503. 1376  22        load local word-2
    3504. 

  3504. 1377  82 03     load stack address 3
    3505. 

  3505. 1379  91        load immediate 1
    3506. 

  3506. 137a  23        load local word-3
    3507. 

  3507. 137b  82 03     load stack address 3
    3508. 

  3508. 137d  90        load immediate 0
    3509. 

  3509. 137e  0e        load indexed word
    3510. 

  3510. 137f  1e        store indexed word
    3511. 

  3511. 1380  22        load local word-2
    3512. 

  3512. 1381  94        load immediate 4
    3513. 

  3513. 1382  71        store stack word1
    3514. 

  3514. 1383  22        load local word-2
    3515. 

  3515. 1384  fb        call proc11
    3516. 

  3516. 1385  80 fd     load local address -3
    3517. 

  3517. 1387  9c        load immediate 12
    3518. 

  3518. 1388  40 06     DEALLOCATE
    3519. 

  3519. 138a  2d 11     load global word 17
    3520. 

  3520. 138c  8d ff     load immediate 255
    3521. 

  3521. 138e  dc        limit_check
    3522. 

  3522. 138f  ed 1c     call proc28
    3523. 

  3523. 1391  ce        jump_stack
    3524. 

  3524. 1392  2d 11     load global word 17
    3525. 

  3525. 1394  8d ff     load immediate 255
    3526. 

  3526. 1396  dc        limit_check
    3527. 

  3527. 1397  34        store local word-4
    3528. 

  3528. 1398  ed 15     call proc21
    3529. 

  3529. 139a  36        store local word-6
    3530. 

  3530. 139b  24        load local word-4
    3531. 

  3531. 139c  26        load local word-6
    3532. 

  3532. 139d  dd        check_positive
    3533. 

  3533. 139e  80 f8     load local address -8
    3534. 

  3534. 13a0  ed 21     call proc33
    3535. 

  3535. 13a2  ce        jump_stack
    3536. 

  3536. 13a3  2d 11     load global word 17
    3537. 

  3537. 13a5  8d ff     load immediate 255
    3538. 

  3538. 13a7  dc        limit_check
    3539. 

  3539. 13a8  34        store local word-4
    3540. 

  3540. 13a9  24        load local word-4
    3541. 

  3541. 13aa  8d e1     load immediate 225
    3542. 

  3542. 13ac  a4        uless_or_equal
    3543. 

  3543. 13ad  e3 06     jpfalse 13b5
    3544. 

  3544. 13af  ed 16     call proc22
    3545. 

  3545. 13b1  ad        dec
    3546. 

  3546. 13b2  36        store local word-6
    3547. 

  3547. 13b3  e2 11     jp 13c6
    3548. 

  3548. 13b5  24        load local word-4
    3549. 

  3549. 13b6  8d e3     load immediate 227
    3550. 

  3550. 13b8  a4        uless_or_equal
    3551. 

  3551. 13b9  e3 05     jpfalse 13c0
    3552. 

  3552. 13bb  ed 15     call proc21
    3553. 

  3553. 13bd  36        store local word-6
    3554. 

  3554. 13be  e2 06     jp 13c6
    3555. 

  3555. 13c0  ed 15     call proc21
    3556. 

  3556. 13c2  dd        check_positive
    3557. 

  3557. 13c3  b7        complement
    3558. 

  3558. 13c4  ac        inc
    3559. 

  3559. 13c5  36        store local word-6
    3560. 

  3560. 13c6  26        load local word-6
    3561. 

  3561. 13c7  90        load immediate 0
    3562. 

  3562. 13c8  b2        iless_than
    3563. 

  3563. 13c9  e3 43     jpfalse 140e
    3564. 

  3564. 13cb  26        load local word-6
    3565. 

  3565. 13cc  b7        complement
    3566. 

  3566. 13cd  ac        inc
    3567. 

  3567. 13ce  dd        check_positive
    3568. 

  3568. 13cf  4b        load global word11
    3569. 

  3569. 13d0  b6        not
    3570. 

  3570. 13d1  80 f8     load local address -8
    3571. 

  3571. 13d3  80 f7     load local address -9
    3572. 

  3572. 13d5  ed 1e     call proc30
    3573. 

  3573. 13d7  4b        load global word11
    3574. 

  3574. 13d8  e3 34     jpfalse 140e
    3575. 

  3575. 13da  42        load global word2
    3576. 

  3576. 13db  ab        eq0
    3577. 

  3577. 13dc  e3 19     jpfalse 13f7
    3578. 

  3578. 13de  92        load immediate 2
    3579. 

  3579. 13df  37        store local word-7
    3580. 

  3580. 13e0  27        load local word-7
    3581. 

  3581. 13e1  29        load local word-9
    3582. 

  3582. 13e2  e7        bitwise_in
    3583. 

  3583. 13e3  e3 08     jpfalse 13ed
    3584. 

  3584. 13e5  95        load immediate 5
    3585. 

  3585. 13e6  27        load local word-7
    3586. 

  3586. 13e7  b0 01     shl 1
    3587. 

  3587. 13e9  dd        check_positive
    3588. 

  3588. 13ea  92        load immediate 2
    3589. 

  3589. 13eb  f0 3c     call INTELL.proc12
    3590. 

  3590. 13ed  27        load local word-7
    3591. 

  3591. 13ee  ac        inc
    3592. 

  3592. 13ef  37        store local word-7
    3593. 

  3593. 13f0  27        load local word-7
    3594. 

  3594. 13f1  95        load immediate 5
    3595. 

  3595. 13f2  a3        ugreater_than
    3596. 

  3596. 13f3  e5 15     jpfalse 13e0
    3597. 

  3597. 13f5  e2 02     jp 13f9
    3598. 

  3598. 13f7  f0 3d     call INTELL.proc13
    3599. 

  3599. 13f9  29        load local word-9
    3600. 

  3600. 13fa  b1 08     shr 8
    3601. 

  3601. 13fc  8d ff     load immediate 255
    3602. 

  3602. 13fe  dc        limit_check
    3603. 

  3603. 13ff  f0 3e     call INTELL.proc14
    3604. 

  3604. 1401  29        load local word-9
    3605. 

  3605. 1402  b1 08     shr 8
    3606. 

  3606. 1404  8d ff     load immediate 255
    3607. 

  3607. 1406  dc        limit_check
    3608. 

  3608. 1407  ef 03 13  call INTELL.proc19
    3609. 

  3609. 140a  49        load global word9
    3610. 

  3610. 140b  29        load local word-9
    3611. 

  3611. 140c  e6        bitwise_or
    3612. 

  3612. 140d  59        store global word9
    3613. 

  3613. 140e  24        load local word-4
    3614. 

  3614. 140f  91        load immediate 1
    3615. 

  3615. 1410  e8        bitwise_and
    3616. 

  3616. 1411  e3 12     jpfalse 1425
    3617. 

  3617. 1413  80 fe     load local address -2
    3618. 

  3618. 1415  fc        call proc12
    3619. 

  3619. 1416  22        load local word-2
    3620. 

  3620. 1417  90        load immediate 0
    3621. 

  3621. 1418  91        load immediate 1
    3622. 

  3622. 1419  80 f8     load local address -8
    3623. 

  3623. 141b  ef 03 16  call INTELL.proc22
    3624. 

  3624. 141e  80 fe     load local address -2
    3625. 

  3625. 1420  9c        load immediate 12
    3626. 

  3626. 1421  40 06     DEALLOCATE
    3627. 

  3627. 1423  e2 07     jp 142c
    3628. 

  3628. 1425  8d c3     load immediate 195
    3629. 

  3629. 1427  80 f8     load local address -8
    3630. 

  3630. 1429  4b        load global word11
    3631. 

  3631. 142a  b6        not
    3632. 

  3632. 142b  fa        call proc10
    3633. 

  3633. 142c  26        load local word-6
    3634. 

  3634. 142d  90        load immediate 0
    3635. 

  3635. 142e  b5        igreater_or_equal
    3636. 

  3636. 142f  e3 09     jpfalse 143a
    3637. 

  3637. 1431  90        load immediate 0
    3638. 

  3638. 1432  26        load local word-6
    3639. 

  3639. 1433  dd        check_positive
    3640. 

  3640. 1434  80 f8     load local address -8
    3641. 

  3641. 1436  ed 21     call proc33
    3642. 

  3642. 1438  e2 05     jp 143f
    3643. 

  3643. 143a  80 f8     load local address -8
    3644. 

  3644. 143c  9c        load immediate 12
    3645. 

  3645. 143d  40 06     DEALLOCATE
    3646. 

  3646. 143f  ce        jump_stack
    3647. 

  3647. 1440  8d eb     load immediate 235
    3648. 

  3648. 1442  90        load immediate 0
    3649. 

  3649. 1443  90        load immediate 0
    3650. 

  3650. 1444  ed 2c     call proc44
    3651. 

  3651. 1446  ce        jump_stack
    3652. 

  3652. 1447  2d 11     load global word 17
    3653. 

  3653. 1449  90        load immediate 0
    3654. 

  3654. 144a  ed 15     call proc21
    3655. 

  3655. 144c  ed 2c     call proc44
    3656. 

  3656. 144e  ce        jump_stack
    3657. 

  3657. 144f  8d ef     load immediate 239
    3658. 

  3658. 1451  ed 15     call proc21
    3659. 

  3659. 1453  ed 15     call proc21
    3660. 

  3660. 1455  ed 2c     call proc44
    3661. 

  3661. 1457  ce        jump_stack
    3662. 

  3662. 1458  ed 14     call proc20
    3663. 

  3663. 145a  8d ef     load immediate 239
    3664. 

  3664. 145c  2d 11     load global word 17
    3665. 

  3665. 145e  b1 04     shr 4
    3666. 

  3666. 1460  2d 11     load global word 17
    3667. 

  3667. 1462  9f        load immediate 15
    3668. 

  3668. 1463  e8        bitwise_and
    3669. 

  3669. 1464  ed 2c     call proc44
    3670. 

  3670. 1466  ce        jump_stack
    3671. 

  3671. 1467  8d ed     load immediate 237
    3672. 

  3672. 1469  90        load immediate 0
    3673. 

  3673. 146a  2d 11     load global word 17
    3674. 

  3674. 146c  9f        load immediate 15
    3675. 

  3675. 146d  e8        bitwise_and
    3676. 

  3676. 146e  ed 2c     call proc44
    3677. 

  3677. 1470  ce        jump_stack
    3678. 

  3678. 1471  cd 00 80 ff 00 0c 02  callswitch (return to 1683)
    3679. 

  3679. 	case 90 => 0f2f
    3680. 

  3680. 	case 91 => 0fac
    3681. 

  3681. 	case 92 => 0fbc
    3682. 

  3682. 	case 93 => 0fce
    3683. 

  3683. 	case 94 => 0fce
    3684. 

  3684. 	case 95 => 0fce
    3685. 

  3685. 	case 96 => 0fce
    3686. 

  3686. 	case 97 => 0fce
    3687. 

  3687. 	case 98 => 0fd6
    3688. 

  3688. 	case 99 => 0fd6
    3689. 

  3689. 	case 100 => 0fd6
    3690. 

  3690. 	case 101 => 0fd6
    3691. 

  3691. 	case 102 => 0fda
    3692. 

  3692. 	case 103 => 0ff0
    3693. 

  3693. 	case 104 => 0ff8
    3694. 

  3694. 	case 105 => 1000
    3695. 

  3695. 	case 106 => 1008
    3696. 

  3696. 	case 107 => 1008
    3697. 

  3697. 	case 108 => 1070
    3698. 

  3698. 	case 109 => 10bc
    3699. 

  3699. 	case 110 => 10bc
    3700. 

  3700. 	case 111 => 10bc
    3701. 

  3701. 	case 112 => 10bc
    3702. 

  3702. 	case 113 => 10bc
    3703. 

  3703. 	case 114 => 0fd6
    3704. 

  3704. 	case 115 => 0fd6
    3705. 

  3705. 	case 116 => 0fd6
    3706. 

  3706. 	case 117 => 0fd6
    3707. 

  3707. 	case 118 => 10c7
    3708. 

  3708. 	case 119 => 10e8
    3709. 

  3709. 	case 120 => 10fb
    3710. 

  3710. 	case 121 => 0fac
    3711. 

  3711. 	case 122 => 110e
    3712. 

  3712. 	case 123 => 112d
    3713. 

  3713. 	case 124 => 1143
    3714. 

  3714. 	case 125 => 1143
    3715. 

  3715. 	case 126 => 1143
    3716. 

  3716. 	case 127 => 1143
    3717. 

  3717. 	case 128 => 1143
    3718. 

  3718. 	case 129 => 1143
    3719. 

  3719. 	case 130 => 1143
    3720. 

  3720. 	case 131 => 1143
    3721. 

  3721. 	case 132 => 1143
    3722. 

  3722. 	case 133 => 1143
    3723. 

  3723. 	case 134 => 0fd6
    3724. 

  3724. 	case 135 => 0fd6
    3725. 

  3725. 	case 136 => 0fd6
    3726. 

  3726. 	case 137 => 0fd6
    3727. 

  3727. 	case 138 => 0fac
    3728. 

  3728. 	case 139 => 0fac
    3729. 

  3729. 	case 140 => 1150
    3730. 

  3730. 	case 141 => 1150
    3731. 

  3731. 	case 142 => 1150
    3732. 

  3732. 	case 143 => 1150
    3733. 

  3733. 	case 144 => 1150
    3734. 

  3734. 	case 145 => 1150
    3735. 

  3735. 	case 146 => 1150
    3736. 

  3736. 	case 147 => 1150
    3737. 

  3737. 	case 148 => 1150
    3738. 

  3738. 	case 149 => 1150
    3739. 

  3739. 	case 150 => 0fd6
    3740. 

  3740. 	case 151 => 0fd6
    3741. 

  3741. 	case 152 => 0fd6
    3742. 

  3742. 	case 153 => 0fd6
    3743. 

  3743. 	case 154 => 115f
    3744. 

  3744. 	case 155 => 1000
    3745. 

  3745. 	case 156 => 11e8
    3746. 

  3746. 	case 157 => 11e8
    3747. 

  3747. 	case 158 => 11e8
    3748. 

  3748. 	case 159 => 11e8
    3749. 

  3749. 	case 160 => 11e8
    3750. 

  3750. 	case 161 => 11e8
    3751. 

  3751. 	case 162 => 11e8
    3752. 

  3752. 	case 163 => 11e8
    3753. 

  3753. 	case 164 => 11e8
    3754. 

  3754. 	case 165 => 11e8
    3755. 

  3755. 	case 166 => 11e8
    3756. 

  3756. 	case 167 => 11e8
    3757. 

  3757. 	case 168 => 11e8
    3758. 

  3758. 	case 169 => 11e8
    3759. 

  3759. 	case 170 => 0fac
    3760. 

  3760. 	case 171 => 0fac
    3761. 

  3761. 	case 172 => 11f9
    3762. 

  3762. 	case 173 => 11f9
    3763. 

  3763. 	case 174 => 11f9
    3764. 

  3764. 	case 175 => 11f9
    3765. 

  3765. 	case 176 => 11f9
    3766. 

  3766. 	case 177 => 11f9
    3767. 

  3767. 	case 178 => 11f9
    3768. 

  3768. 	case 179 => 11f9
    3769. 

  3769. 	case 180 => 11f9
    3770. 

  3770. 	case 181 => 11f9
    3771. 

  3771. 	case 182 => 11f9
    3772. 

  3772. 	case 183 => 11f9
    3773. 

  3773. 	case 184 => 11f9
    3774. 

  3774. 	case 185 => 11f9
    3775. 

  3775. 	case 186 => 1678
    3776. 

  3776. 	case 187 => 1678
    3777. 

  3777. 	case 188 => 1678
    3778. 

  3778. 	case 189 => 1678
    3779. 

  3779. 	case 190 => 1678
    3780. 

  3780. 	case 191 => 1214
    3781. 

  3781. 	case 192 => 1000
    3782. 

  3782. 	case 193 => 1000
    3783. 

  3783. 	case 194 => 1678
    3784. 

  3784. 	case 195 => 1678
    3785. 

  3785. 	case 196 => 1678
    3786. 

  3786. 	case 197 => 1678
    3787. 

  3787. 	case 198 => 1678
    3788. 

  3788. 	case 199 => 1678
    3789. 

  3789. 	case 200 => 1678
    3790. 

  3790. 	case 201 => 1678
    3791. 

  3791. 	case 202 => 1678
    3792. 

  3792. 	case 203 => 1678
    3793. 

  3793. 	case 204 => 1678
    3794. 

  3794. 	case 205 => 1678
    3795. 

  3795. 	case 206 => 1678
    3796. 

  3796. 	case 207 => 1678
    3797. 

  3797. 	case 208 => 1678
    3798. 

  3798. 	case 209 => 1678
    3799. 

  3799. 	case 210 => 1678
    3800. 

  3800. 	case 211 => 1678
    3801. 

  3801. 	case 212 => 1678
    3802. 

  3802. 	case 213 => 1000
    3803. 

  3803. 	case 214 => 1000
    3804. 

  3804. 	case 215 => 1000
    3805. 

  3805. 	case 216 => 1678
    3806. 

  3806. 	case 217 => 1678
    3807. 

  3807. 	case 218 => 122d
    3808. 

  3808. 	case 219 => 1265
    3809. 

  3809. 	case 220 => 0fd6
    3810. 

  3810. 	case 221 => 0fd6
    3811. 

  3811. 	case 222 => 127d
    3812. 

  3812. 	case 223 => 127d
    3813. 

  3813. 	case 224 => 127d
    3814. 

  3814. 	case 225 => 1678
    3815. 

  3815. 	case 226 => 1678
    3816. 

  3816. 	case 227 => 1678
    3817. 

  3817. 	case 228 => 1678
    3818. 

  3818. 	case 229 => 1678
    3819. 

  3819. 	case 230 => 129a
    3820. 

  3820. 	case 231 => 12c9
    3821. 

  3821. 	case 232 => 12ce
    3822. 

  3822. 	case 233 => 12d3
    3823. 

  3823. 	case 234 => 12ef
    3824. 

  3824. 	case 235 => 12ef
    3825. 

  3825. 	case 236 => 12ef
    3826. 

  3826. 	case 237 => 12ef
    3827. 

  3827. 	case 238 => 12ef
    3828. 

  3828. 	case 239 => 12ef
    3829. 

  3829. 	case 240 => 12ef
    3830. 

  3830. 	case 241 => 12ef
    3831. 

  3831. 	case 242 => 12ef
    3832. 

  3832. 	case 243 => 12ef
    3833. 

  3833. 	case 244 => 12ef
    3834. 

  3834. 	case 245 => 12ef
    3835. 

  3835. 	case 246 => 12ef
    3836. 

  3836. 	case 247 => 12ef
    3837. 

  3837. 	case 248 => 12ef
    3838. 

  3838. 	case 249 => 12ef
    3839. 

  3839. 	case 250 => 1000
    3840. 

  3840. 	case 251 => 1000
    3841. 

  3841. 	case 252 => 1000
    3842. 

  3842. 	case 253 => 1000
    3843. 

  3843. 	case 254 => 1000
    3844. 

  3844. 	case 255 => 1000
    3845. 

  3845. 	case 256 => 1000
    3846. 

  3846. 	case 257 => 1000
    3847. 

  3847. 	case 258 => 1000
    3848. 

  3848. 	case 259 => 1000
    3849. 

  3849. 	case 260 => 1000
    3850. 

  3850. 	case 261 => 1678
    3851. 

  3851. 	case 262 => 12f6
    3852. 

  3852. 	case 263 => 12f6
    3853. 

  3853. 	case 264 => 1305
    3854. 

  3854. 	case 265 => 1305
    3855. 

  3855. 	case 266 => 1315
    3856. 

  3856. 	case 267 => 1315
    3857. 

  3857. 	case 268 => 1000
    3858. 

  3858. 	case 269 => 1000
    3859. 

  3859. 	case 270 => 1000
    3860. 

  3860. 	case 271 => 1000
    3861. 

  3861. 	case 272 => 1000
    3862. 

  3862. 	case 273 => 1000
    3863. 

  3863. 	case 274 => 1000
    3864. 

  3864. 	case 275 => 1000
    3865. 

  3865. 	case 276 => 1000
    3866. 

  3866. 	case 277 => 1000
    3867. 

  3867. 	case 278 => 1000
    3868. 

  3868. 	case 279 => 1000
    3869. 

  3869. 	case 280 => 1000
    3870. 

  3870. 	case 281 => 1000
    3871. 

  3871. 	case 282 => 1000
    3872. 

  3872. 	case 283 => 1000
    3873. 

  3873. 	case 284 => 1000
    3874. 

  3874. 	case 285 => 0fac
    3875. 

  3875. 	case 286 => 1323
    3876. 

  3876. 	case 287 => 1000
    3877. 

  3877. 	case 288 => 1000
    3878. 

  3878. 	case 289 => 1000
    3879. 

  3879. 	case 290 => 1000
    3880. 

  3880. 	case 291 => 1000
    3881. 

  3881. 	case 292 => 1000
    3882. 

  3882. 	case 293 => 1678
    3883. 

  3883. 	case 294 => 1000
    3884. 

  3884. 	case 295 => 132f
    3885. 

  3885. 	case 296 => 1332
    3886. 

  3886. 	case 297 => 1344
    3887. 

  3887. 	case 298 => 1000
    3888. 

  3888. 	case 299 => 1000
    3889. 

  3889. 	case 300 => 1000
    3890. 

  3890. 	case 301 => 1000
    3891. 

  3891. 	case 302 => 1678
    3892. 

  3892. 	case 303 => 1000
    3893. 

  3893. 	case 304 => 1000
    3894. 

  3894. 	case 305 => 1000
    3895. 

  3895. 	case 306 => 1000
    3896. 

  3896. 	case 307 => 1000
    3897. 

  3897. 	case 308 => 1367
    3898. 

  3898. 	case 309 => 1367
    3899. 

  3899. 	case 310 => 1000
    3900. 

  3900. 	case 311 => 1000
    3901. 

  3901. 	case 312 => 1392
    3902. 

  3902. 	case 313 => 1392
    3903. 

  3903. 	case 314 => 13a3
    3904. 

  3904. 	case 315 => 13a3
    3905. 

  3905. 	case 316 => 13a3
    3906. 

  3906. 	case 317 => 13a3
    3907. 

  3907. 	case 318 => 13a3
    3908. 

  3908. 	case 319 => 13a3
    3909. 

  3909. 	case 320 => 1000
    3910. 

  3910. 	case 321 => 1000
    3911. 

  3911. 	case 322 => 1000
    3912. 

  3912. 	case 323 => 1000
    3913. 

  3913. 	case 324 => 1000
    3914. 

  3914. 	case 325 => 1440
    3915. 

  3915. 	case 326 => 1447
    3916. 

  3916. 	case 327 => 1447
    3917. 

  3917. 	case 328 => 1447
    3918. 

  3918. 	case 329 => 144f
    3919. 

  3919. 	case 330 => 1458
    3920. 

  3920. 	case 331 => 1467
    3921. 

  3921. 	case 332 => 1467
    3922. 

  3922. 	case 333 => 1467
    3923. 

  3923. 	case 334 => 1467
    3924. 

  3924. 	case 335 => 1467
    3925. 

  3925. 	case 336 => 1467
    3926. 

  3926. 	case 337 => 1467
    3927. 

  3927. 	case 338 => 1467
    3928. 

  3928. 	case 339 => 1467
    3929. 

  3929. 	case 340 => 1467
    3930. 

  3930. 	case 341 => 1467
    3931. 

  3931. 	case 342 => 1467
    3932. 

  3932. 	case 343 => 1467
    3933. 

  3933. 	case 344 => 1467
    3934. 

  3934. 	case 345 => 1467
    3935. 

  3935. 1678  92        load immediate 2
    3936. 

  3936. 1679  2d 11     load global word 17
    3937. 

  3937. 167b  96        load immediate 6
    3938. 

  3938. 167c  f0 5b     call ›âZâüá°á.proc11
    3939. 

  3939. 167e  92        load immediate 2
    3940. 

  3940. 167f  f0 5e     call ›âZâüá°á.proc14
    3941. 

  3941. 1681  90        load immediate 0
    3942. 

  3942. 1682  f1        call proc1
    3943. 

  3943. 1683  90        load immediate 0
    3944. 

  3944. 1684  ed 20     call proc32
    3945. 

  3945. 1686  ed 18     call proc24
    3946. 

  3946. 1688  fd        call proc13
    3947. 

  3947. 1689  e3 03     jpfalse 168e
    3948. 

  3948. 168b  ef 03 11  call INTELL.proc17
    3949. 

  3949. 168e  e0 87 f8  jp 0f17
    3950. 

  3950. 1691  88        leave0
    3951. 

  3951. 1692  32        store local word-2
    3952. 

  3952. 1693  6e        load stack word14
    3953. 

  3953. 1694  b1 d2     shr 210
    3954. 

  3954. 1696  00        Error16
    3955. 

  3955. 1697  00        Error16
    3956. 

  3956. 1698  d4 fb     enter -5
    3957. 

  3957. 169a  91        load immediate 1
    3958. 

  3958. 169b  32        store local word-2
    3959. 

  3959. 169c  03        load param1
    3960. 

  3960. 169d  8d 26     load immediate 38
    3961. 

  3961. 169f  aa        umod
    3962. 

  3962. 16a0  33        store local word-3
    3963. 

  3963. 16a1  03        load param1
    3964. 

  3964. 16a2  8d 26     load immediate 38
    3965. 

  3965. 16a4  a9        udiv
    3966. 

  3966. 16a5  13        store param1
    3967. 

  3967. 16a6  23        load local word-3
    3968. 

  3968. 16a7  8d 1a     load immediate 26
    3969. 

  3969. 16a9  a2        uless_than
    3970. 

  3970. 16aa  e3 08     jpfalse 16b4
    3971. 

  3971. 16ac  92        load immediate 2
    3972. 

  3972. 16ad  23        load local word-3
    3973. 

  3973. 16ae  ae 41     add 65
    3974. 

  3974. 16b0  f0 58     call ›âZâüá°á.proc8
    3975. 

  3975. 16b2  e2 13     jp 16c7
    3976. 

  3976. 16b4  23        load local word-3
    3977. 

  3977. 16b5  8d 24     load immediate 36
    3978. 

  3978. 16b7  a2        uless_than
    3979. 

  3979. 16b8  e3 08     jpfalse 16c2
    3980. 

  3980. 16ba  92        load immediate 2
    3981. 

  3981. 16bb  23        load local word-3
    3982. 

  3982. 16bc  ae 16     add 22
    3983. 

  3983. 16be  f0 58     call ›âZâüá°á.proc8
    3984. 

  3984. 16c0  e2 05     jp 16c7
    3985. 

  3985. 16c2  92        load immediate 2
    3986. 

  3986. 16c3  8d 20     load immediate 32
    3987. 

  3987. 16c5  f0 58     call ›âZâüá°á.proc8
    3988. 

  3988. 16c7  22        load local word-2
    3989. 

  3989. 16c8  ac        inc
    3990. 

  3990. 16c9  32        store local word-2
    3991. 

  3991. 16ca  22        load local word-2
    3992. 

  3992. 16cb  93        load immediate 3
    3993. 

  3993. 16cc  a3        ugreater_than
    3994. 

  3994. 16cd  e5 33     jpfalse 169c
    3995. 

  3995. 16cf  84 01     leave 1
    3996. 

  3996. 16d1  5e        store global word14
    3997. 

  3997. 16d2  00        Error16
    3998. 

  3998. 16d3  3f d6 00  store .word0
    3999. 

  3999. 16d6  00        Error16
    4000. 

  4000. 16d7  d4 e9     enter -23
    4001. 

  4001. 16d9  ed 14     call proc20
    4002. 

  4002. 16db  90        load immediate 0
    4003. 

  4003. 16dc  3d 1c     store global word 28
    4004. 

  4004. 16de  90        load immediate 0
    4005. 

  4005. 16df  59        store global word9
    4006. 

  4006. 16e0  91        load immediate 1
    4007. 

  4007. 16e1  5b        store global word11
    4008. 

  4008. 16e2  90        load immediate 0
    4009. 

  4009. 16e3  1c 33     store INTELL.word3
    4010. 

  4010. 16e5  90        load immediate 0
    4011. 

  4011. 16e6  1c 34     store INTELL.word4
    4012. 

  4012. 16e8  90        load immediate 0
    4013. 

  4013. 16e9  53        store global word3
    4014. 

  4014. 16ea  2d 11     load global word 17
    4015. 

  4015. 16ec  ab        eq0
    4016. 

  4016. 16ed  f1        call proc1
    4017. 

  4017. 16ee  ed 15     call proc21
    4018. 

  4018. 16f0  93        load immediate 3
    4019. 

  4019. 16f1  91        load immediate 1
    4020. 

  4020. 16f2  da        urange_check
    4021. 

  4021. 16f3  32        store local word-2
    4022. 

  4022. 16f4  22        load local word-2
    4023. 

  4023. 16f5  e0 74 01  jp 186b
    4024. 

  4024. 16f8  ed 15     call proc21
    4025. 

  4025. 16fa  52        store global word2
    4026. 

  4026. 16fb  45        load global word5
    4027. 

  4027. 16fc  42        load global word2
    4028. 

  4028. 16fd  8d ff     load immediate 255
    4029. 

  4029. 16ff  dc        limit_check
    4030. 

  4030. 1700  0c 32     load INTELL.word2
    4031. 

  4031. 1702  1e        store indexed word
    4032. 

  4032. 1703  ed 15     call proc21
    4033. 

  4033. 1705  57        store global word7
    4034. 

  4034. 1706  47        load global word7
    4035. 

  4035. 1707  f0 31     call INTELL.proc1
    4036. 

  4036. 1709  47        load global word7
    4037. 

  4037. 170a  cb        not_zero
    4038. 

  4038. 170b  e3 06     jpfalse 1713
    4039. 

  4039. 170d  ed 15     call proc21
    4040. 

  4040. 170f  f0 31     call INTELL.proc1
    4041. 

  4041. 1711  e4 0a     jp 1709
    4042. 

  4042. 1713  ce        jump_stack
    4043. 

  4043. 1714  ed 15     call proc21
    4044. 

  4044. 1716  52        store global word2
    4045. 

  4045. 1717  ed 16     call proc22
    4046. 

  4046. 1719  57        store global word7
    4047. 

  4047. 171a  45        load global word5
    4048. 

  4048. 171b  42        load global word2
    4049. 

  4049. 171c  8d ff     load immediate 255
    4050. 

  4050. 171e  dc        limit_check
    4051. 

  4051. 171f  0c 32     load INTELL.word2
    4052. 

  4052. 1721  1e        store indexed word
    4053. 

  4053. 1722  47        load global word7
    4054. 

  4054. 1723  cb        not_zero
    4055. 

  4055. 1724  e3 06     jpfalse 172c
    4056. 

  4056. 1726  ed 15     call proc21
    4057. 

  4057. 1728  f0 31     call INTELL.proc1
    4058. 

  4058. 172a  e4 0a     jp 1722
    4059. 

  4059. 172c  ce        jump_stack
    4060. 

  4060. 172d  ed 15     call proc21
    4061. 

  4061. 172f  52        store global word2
    4062. 

  4062. 1730  ed 15     call proc21
    4063. 

  4063. 1732  36        store local word-6
    4064. 

  4064. 1733  ed 16     call proc22
    4065. 

  4065. 1735  ad        dec
    4066. 

  4066. 1736  57        store global word7
    4067. 

  4067. 1737  ed 16     call proc22
    4068. 

  4068. 1739  34        store local word-4
    4069. 

  4069. 173a  24        load local word-4
    4070. 

  4070. 173b  ec 32     nested_call proc50
    4071. 

  4071. 173d  24        load local word-4
    4072. 

  4072. 173e  f0 35     call INTELL.proc5
    4073. 

  4073. 1740  ed 16     call proc22
    4074. 

  4074. 1742  34        store local word-4
    4075. 

  4075. 1743  24        load local word-4
    4076. 

  4076. 1744  ec 32     nested_call proc50
    4077. 

  4077. 1746  24        load local word-4
    4078. 

  4078. 1747  f0 35     call INTELL.proc5
    4079. 

  4079. 1749  ed 16     call proc22
    4080. 

  4080. 174b  33        store local word-3
    4081. 

  4081. 174c  92        load immediate 2
    4082. 

  4082. 174d  0c 32     load INTELL.word2
    4083. 

  4083. 174f  96        load immediate 6
    4084. 

  4084. 1750  f0 5b     call ›âZâüá°á.proc11
    4085. 

  4085. 1752  0c 32     load INTELL.word2
    4086. 

  4086. 1754  3c f4     store local word -12
    4087. 

  4087. 1756  23        load local word-3
    4088. 

  4088. 1757  cb        not_zero
    4089. 

  4089. 1758  e3 13     jpfalse 176d
    4090. 

  4090. 175a  80 f8     load local address -8
    4091. 

  4091. 175c  9c        load immediate 12
    4092. 

  4092. 175d  40 05     ALLOCATE
    4093. 

  4093. 175f  91        load immediate 1
    4094. 

  4094. 1760  23        load local word-3
    4095. 

  4095. 1761  ad        dec
    4096. 

  4096. 1762  80 f8     load local address -8
    4097. 

  4097. 1764  ed 21     call proc33
    4098. 

  4098. 1766  28        load local word-8
    4099. 

  4099. 1767  0c 32     load INTELL.word2
    4100. 

  4100. 1769  70        store stack word0
    4101. 

  4101. 176a  28        load local word-8
    4102. 

  4102. 176b  90        load immediate 0
    4103. 

  4103. 176c  71        store stack word1
    4104. 

  4104. 176d  90        load immediate 0
    4105. 

  4105. 176e  f0 35     call INTELL.proc5
    4106. 

  4106. 1770  93        load immediate 3
    4107. 

  4107. 1771  90        load immediate 0
    4108. 

  4108. 1772  90        load immediate 0
    4109. 

  4109. 1773  ef 03 10  call INTELL.proc16
    4110. 

  4110. 1776  45        load global word5
    4111. 

  4111. 1777  42        load global word2
    4112. 

  4112. 1778  8d ff     load immediate 255
    4113. 

  4113. 177a  dc        limit_check
    4114. 

  4114. 177b  0e        load indexed word
    4115. 

  4115. 177c  3b        store local word-11
    4116. 

  4116. 177d  45        load global word5
    4117. 

  4117. 177e  42        load global word2
    4118. 

  4118. 177f  8d ff     load immediate 255
    4119. 

  4119. 1781  dc        limit_check
    4120. 

  4120. 1782  0c 32     load INTELL.word2
    4121. 

  4121. 1784  1e        store indexed word
    4122. 

  4122. 1785  4a        load global word10
    4123. 

  4123. 1786  42        load global word2
    4124. 

  4124. 1787  b1 04     shr 4
    4125. 

  4125. 1789  9f        load immediate 15
    4126. 

  4126. 178a  dc        limit_check
    4127. 

  4127. 178b  b0 01     shl 1
    4128. 

  4128. 178d  a6        add
    4129. 

  4129. 178e  20        dup
    4130. 

  4130. 178f  60        load stack word0
    4131. 

  4131. 1790  42        load global word2
    4132. 

  4132. 1791  9f        load immediate 15
    4133. 

  4133. 1792  e8        bitwise_and
    4134. 

  4134. 1793  9f        load immediate 15
    4135. 

  4135. 1794  dc        limit_check
    4136. 

  4136. 1795  ea        power2
    4137. 

  4137. 1796  e6        bitwise_or
    4138. 

  4138. 1797  70        store stack word0
    4139. 

  4139. 1798  2b        load local word-11
    4140. 

  4140. 1799  8e ff ff  load immediate -1
    4141. 

  4141. 179c  a1        not_equal
    4142. 

  4142. 179d  e3 08     jpfalse 17a7
    4143. 

  4143. 179f  2b        load local word-11
    4144. 

  4144. 17a0  0c 32     load INTELL.word2
    4145. 

  4145. 17a2  f0 37     call INTELL.proc7
    4146. 

  4146. 17a4  3b        store local word-11
    4147. 

  4147. 17a5  e4 0f     jp 1798
    4148. 

  4148. 17a7  ed 14     call proc20
    4149. 

  4149. 17a9  2d 11     load global word 17
    4150. 

  4150. 17ab  8d 87     load immediate 135
    4151. 

  4151. 17ad  a0        equal
    4152. 

  4152. 17ae  e3 1c     jpfalse 17cc
    4153. 

  4153. 17b0  42        load global word2
    4154. 

  4154. 17b1  cb        not_zero
    4155. 

  4155. 17b2  f1        call proc1
    4156. 

  4156. 17b3  8d 3e     load immediate 62
    4157. 

  4157. 17b5  ed 15     call proc21
    4158. 

  4158. 17b7  f0 32     call INTELL.proc2
    4159. 

  4159. 17b9  8d 87     load immediate 135
    4160. 

  4160. 17bb  f5        call proc5
    4161. 

  4161. 17bc  47        load global word7
    4162. 

  4162. 17bd  cb        not_zero
    4163. 

  4163. 17be  e3 06     jpfalse 17c6
    4164. 

  4164. 17c0  ed 15     call proc21
    4165. 

  4165. 17c2  f0 31     call INTELL.proc1
    4166. 

  4166. 17c4  e4 0a     jp 17bc
    4167. 

  4167. 17c6  8e 00 ff  load immediate -256
    4168. 

  4168. 17c9  59        store global word9
    4169. 

  4169. 17ca  e2 6c     jp 1838
    4170. 

  4170. 17cc  2d 11     load global word 17
    4171. 

  4171. 17ce  8d d4     load immediate 212
    4172. 

  4172. 17d0  a0        equal
    4173. 

  4173. 17d1  f1        call proc1
    4174. 

  4174. 17d2  8d ff     load immediate 255
    4175. 

  4175. 17d4  ed 15     call proc21
    4176. 

  4176. 17d6  a7        sub
    4177. 

  4177. 17d7  b1 01     shr 1
    4178. 

  4178. 17d9  37        store local word-7
    4179. 

  4179. 17da  8d 21     load immediate 33
    4180. 

  4180. 17dc  27        load local word-7
    4181. 

  4181. 17dd  b0 01     shl 1
    4182. 

  4182. 17df  dd        check_positive
    4183. 

  4183. 17e0  b7        complement
    4184. 

  4184. 17e1  ac        inc
    4185. 

  4185. 17e2  f0 36     call INTELL.proc6
    4186. 

  4186. 17e4  8d d4     load immediate 212
    4187. 

  4187. 17e6  f5        call proc5
    4188. 

  4188. 17e7  23        load local word-3
    4189. 

  4189. 17e8  ab        eq0
    4190. 

  4190. 17e9  39        store local word-9
    4191. 

  4191. 17ea  94        load immediate 4
    4192. 

  4192. 17eb  3a        store local word-10
    4193. 

  4193. 17ec  42        load global word2
    4194. 

  4194. 17ed  ab        eq0
    4195. 

  4195. 17ee  e3 0c     jpfalse 17fc
    4196. 

  4196. 17f0  29        load local word-9
    4197. 

  4197. 17f1  de 03     andjp 17f6
    4198. 

  4198. 17f3  2f 02 1a  load COMPILER.word26
    4199. 

  4199. 17f6  39        store local word-9
    4200. 

  4200. 17f7  2d 12     load global word 18
    4201. 

  4201. 17f9  37        store local word-7
    4202. 

  4202. 17fa  93        load immediate 3
    4203. 

  4203. 17fb  3a        store local word-10
    4204. 

  4204. 17fc  29        load local word-9
    4205. 

  4205. 17fd  e3 06     jpfalse 1805
    4206. 

  4206. 17ff  2a        load local word-10
    4207. 

  4207. 1800  26        load local word-6
    4208. 

  4208. 1801  27        load local word-7
    4209. 

  4209. 1802  ef 03 10  call INTELL.proc16
    4210. 

  4210. 1805  42        load global word2
    4211. 

  4211. 1806  ab        eq0
    4212. 

  4212. 1807  e3 25     jpfalse 182e
    4213. 

  4213. 1809  92        load immediate 2
    4214. 

  4214. 180a  34        store local word-4
    4215. 

  4215. 180b  2d 17     load global word 23
    4216. 

  4216. 180d  24        load local word-4
    4217. 

  4217. 180e  93        load immediate 3
    4218. 

  4218. 180f  92        load immediate 2
    4219. 

  4219. 1810  da        urange_check
    4220. 

  4220. 1811  af 02     sub 2
    4221. 

  4221. 1813  0e        load indexed word
    4222. 

  4222. 1814  cb        not_zero
    4223. 

  4223. 1815  e3 08     jpfalse 181f
    4224. 

  4224. 1817  95        load immediate 5
    4225. 

  4225. 1818  24        load local word-4
    4226. 

  4226. 1819  b0 01     shl 1
    4227. 

  4227. 181b  dd        check_positive
    4228. 

  4228. 181c  92        load immediate 2
    4229. 

  4229. 181d  f0 3c     call INTELL.proc12
    4230. 

  4230. 181f  24        load local word-4
    4231. 

  4231. 1820  ac        inc
    4232. 

  4232. 1821  34        store local word-4
    4233. 

  4233. 1822  24        load local word-4
    4234. 

  4234. 1823  95        load immediate 5
    4235. 

  4235. 1824  a3        ugreater_than
    4236. 

  4236. 1825  e5 1c     jpfalse 180b
    4237. 

  4237. 1827  90        load immediate 0
    4238. 

  4238. 1828  ef 03 13  call INTELL.proc19
    4239. 

  4239. 182b  ef 03 11  call INTELL.proc17
    4240. 

  4240. 182e  ed 2e     call proc46
    4241. 

  4241. 1830  49        load global word9
    4242. 

  4242. 1831  ef 03 15  call INTELL.proc21
    4243. 

  4243. 1834  b0 08     shl 8
    4244. 

  4244. 1836  e6        bitwise_or
    4245. 

  4245. 1837  59        store global word9
    4246. 

  4246. 1838  48        load global word8
    4247. 

  4247. 1839  42        load global word2
    4248. 

  4248. 183a  8d ff     load immediate 255
    4249. 

  4249. 183c  dc        limit_check
    4250. 

  4250. 183d  49        load global word9
    4251. 

  4251. 183e  1e        store indexed word
    4252. 

  4252. 183f  92        load immediate 2
    4253. 

  4253. 1840  0c 32     load INTELL.word2
    4254. 

  4254. 1842  2c f4     load local word -12
    4255. 

  4255. 1844  a7        sub
    4256. 

  4256. 1845  96        load immediate 6
    4257. 

  4257. 1846  f0 5b     call ›âZâüá°á.proc11
    4258. 

  4258. 1848  92        load immediate 2
    4259. 

  4259. 1849  f0 5e     call ›âZâüá°á.proc14
    4260. 

  4260. 184b  ce        jump_stack
    4261. 

  4261. 184c  ed 16     call proc22
    4262. 

  4262. 184e  ad        dec
    4263. 

  4263. 184f  57        store global word7
    4264. 

  4264. 1850  93        load immediate 3
    4265. 

  4265. 1851  90        load immediate 0
    4266. 

  4266. 1852  90        load immediate 0
    4267. 

  4267. 1853  ef 03 10  call INTELL.proc16
    4268. 

  4268. 1856  90        load immediate 0
    4269. 

  4269. 1857  1c 33     store INTELL.word3
    4270. 

  4270. 1859  90        load immediate 0
    4271. 

  4271. 185a  1c 34     store INTELL.word4
    4272. 

  4272. 185c  ed 1d     call proc29
    4273. 

  4273. 185e  ed 2e     call proc46
    4274. 

  4274. 1860  49        load global word9
    4275. 

  4275. 1861  ef 03 15  call INTELL.proc21
    4276. 

  4276. 1864  b0 08     shl 8
    4277. 

  4277. 1866  e6        bitwise_or
    4278. 

  4278. 1867  59        store global word9
    4279. 

  4279. 1868  ed 23     call proc35
    4280. 

  4280. 186a  ce        jump_stack
    4281. 

  4281. 186b  cd 01 80 03 00 0d 00  callswitch (return to 187e)
    4282. 

  4282. 	case 91 => 16f8
    4283. 

  4283. 	case 92 => 1714
    4284. 

  4284. 	case 93 => 172d
    4285. 

  4285. 	case 94 => 184c
    4286. 

  4286. 187a  9d        load immediate 13
    4287. 

  4287. 187b  90        load immediate 0
    4288. 

  4288. 187c  90        load immediate 0
    4289. 

  4289. 187d  01        Raise
    4290. 

  4290. 187e  96        load immediate 6
    4291. 

  4291. 187f  57        store global word7
    4292. 

  4292. 1880  22        load local word-2
    4293. 

  4293. 1881  93        load immediate 3
    4294. 

  4294. 1882  a0        equal
    4295. 

  4295. 1883  de 02     andjp 1887
    4296. 

  4296. 1885  42        load global word2
    4297. 

  4297. 1886  ab        eq0
    4298. 

  4298. 1887  e1 50 fe  jpfalse 16d9
    4299. 

  4299. 188a  8e 00 01  load immediate 256
    4300. 

  4300. 188d  34        store local word-4
    4301. 

  4301. 188e  24        load local word-4
    4302. 

  4302. 188f  ad        dec
    4303. 

  4303. 1890  34        store local word-4
    4304. 

  4304. 1891  45        load global word5
    4305. 

  4305. 1892  24        load local word-4
    4306. 

  4306. 1893  8d ff     load immediate 255
    4307. 

  4307. 1895  dc        limit_check
    4308. 

  4308. 1896  0e        load indexed word
    4309. 

  4309. 1897  8e ff ff  load immediate -1
    4310. 

  4310. 189a  a1        not_equal
    4311. 

  4311. 189b  e5 0f     jpfalse 188e
    4312. 

  4312. 189d  24        load local word-4
    4313. 

  4313. 189e  ac        inc
    4314. 

  4314. 189f  34        store local word-4
    4315. 

  4315. 18a0  24        load local word-4
    4316. 

  4316. 18a1  b0 01     shl 1
    4317. 

  4317. 18a3  57        store global word7
    4318. 

  4318. 18a4  24        load local word-4
    4319. 

  4319. 18a5  ad        dec
    4320. 

  4320. 18a6  34        store local word-4
    4321. 

  4321. 18a7  45        load global word5
    4322. 

  4322. 18a8  24        load local word-4
    4323. 

  4323. 18a9  8d ff     load immediate 255
    4324. 

  4324. 18ab  dc        limit_check
    4325. 

  4325. 18ac  0e        load indexed word
    4326. 

  4326. 18ad  8e ff ff  load immediate -1
    4327. 

  4327. 18b0  a1        not_equal
    4328. 

  4328. 18b1  f1        call proc1
    4329. 

  4329. 18b2  45        load global word5
    4330. 

  4330. 18b3  24        load local word-4
    4331. 

  4331. 18b4  8d ff     load immediate 255
    4332. 

  4332. 18b6  dc        limit_check
    4333. 

  4333. 18b7  0e        load indexed word
    4334. 

  4334. 18b8  0c 32     load INTELL.word2
    4335. 

  4335. 18ba  ac        inc
    4336. 

  4336. 18bb  a7        sub
    4337. 

  4337. 18bc  35        store local word-5
    4338. 

  4338. 18bd  25        load local word-5
    4339. 

  4339. 18be  f0 35     call INTELL.proc5
    4340. 

  4340. 18c0  ed 16     call proc22
    4341. 

  4341. 18c2  35        store local word-5
    4342. 

  4342. 18c3  24        load local word-4
    4343. 

  4343. 18c4  ab        eq0
    4344. 

  4344. 18c5  e5 23     jpfalse 18a4
    4345. 

  4345. 18c7  88        leave0
    4346. 

  4346. 18c8  39        store local word-9
    4347. 

  4347. 18c9  6b        load stack word11
    4348. 

  4348. 18ca  b6        not
    4349. 

  4349. 18cb  19 99     store global dword 153
    4350. 

  4350. 18cd  00        Error16
    4351. 

  4351. 18ce  d4 ff     enter -1
    4352. 

  4352. 18d0  e0 68 ea  jp 033a
    4353. 

  4353. 18d3  e0 e5 ea  jp 03ba
    4354. 

  4354. 18d6  e0 b4 ec  jp 058c
    4355. 

  4355. 18d9  e0 78 f0  jp 0953
    4356. 

  4356. 18dc  e0 2e f2  jp 0b0c
    4357. 

  4357. 18df  90        load immediate 0
    4358. 

  4358. 18e0  3d 1d     store global word 29
    4359. 

  4359. 18e2  48        load global word8
    4360. 

  4360. 18e3  2d 1d     load global word 29
    4361. 

  4361. 18e5  8d ff     load immediate 255
    4362. 

  4362. 18e7  dc        limit_check
    4363. 

  4363. 18e8  8e ff ff  load immediate -1
    4364. 

  4364. 18eb  1e        store indexed word
    4365. 

  4365. 18ec  45        load global word5
    4366. 

  4366. 18ed  2d 1d     load global word 29
    4367. 

  4367. 18ef  8d ff     load immediate 255
    4368. 

  4368. 18f1  dc        limit_check
    4369. 

  4369. 18f2  8e ff ff  load immediate -1
    4370. 

  4370. 18f5  1e        store indexed word
    4371. 

  4371. 18f6  2d 1d     load global word 29
    4372. 

  4372. 18f8  ac        inc
    4373. 

  4373. 18f9  3d 1d     store global word 29
    4374. 

  4374. 18fb  2d 1d     load global word 29
    4375. 

  4375. 18fd  8d ff     load immediate 255
    4376. 

  4376. 18ff  a3        ugreater_than
    4377. 

  4377. 1900  e5 20     jpfalse 18e2
    4378. 

  4378. 1902  90        load immediate 0
    4379. 

  4379. 1903  3d 1d     store global word 29
    4380. 

  4380. 1905  4a        load global word10
    4381. 

  4381. 1906  2d 1d     load global word 29
    4382. 

  4382. 1908  9f        load immediate 15
    4383. 

  4383. 1909  dc        limit_check
    4384. 

  4384. 190a  90        load immediate 0
    4385. 

  4385. 190b  1e        store indexed word
    4386. 

  4386. 190c  2d 1d     load global word 29
    4387. 

  4387. 190e  ac        inc
    4388. 

  4388. 190f  3d 1d     store global word 29
    4389. 

  4389. 1911  2d 1d     load global word 29
    4390. 

  4390. 1913  9f        load immediate 15
    4391. 

  4391. 1914  a3        ugreater_than
    4392. 

  4392. 1915  e5 12     jpfalse 1905
    4393. 

  4393. 1917  92        load immediate 2
    4394. 

  4394. 1918  8c 12  .. load immediate string "NAME   START   LEN"
    4395. 

  4395. 192c  8d 11     load immediate 17
    4396. 

  4396. 192e  f0 59     call ›âZâüá°á.proc9
    4397. 

  4397. 1930  92        load immediate 2
    4398. 

  4398. 1931  f0 5e     call ›âZâüá°á.proc14
    4399. 

  4399. 1933  ed 31     call proc49
    4400. 

  4400. 1935  92        load immediate 2
    4401. 

  4401. 1936  f0 5e     call ›âZâüá°á.proc14
    4402. 

  4402. 1938  ed 1b     call proc27
    4403. 

  4403. 193a  83 00 04  load address Zâüá°átá.WORD4
    4404. 

  4404. 193d  0c 44     load TEXTS.word4
    4405. 

  4405. 193f  8d 13     load immediate 19
    4406. 

  4406. 1941  f0 15     call °átáJá“ÿ.proc5
    4407. 

  4407. 1943  50        end_program
    4408. 

  4408. 1944  8c 0d  .. load immediate string "OUT OF MEMORY"
    4409. 

  4409. 1953  9c        load immediate 12
    4410. 

  4410. 1954  ed 10     call proc16
    4411. 

  4411. 1956  50        end_program
    4412. 

  4412. 1957  8c 09  .. load immediate string "DISK FULL"
    4413. 

  4413. 1962  98        load immediate 8
    4414. 

  4414. 1963  ed 10     call proc16
    4415. 

  4415. 1965  50        end_program
    4416. 

  4416. 1966  02 1a     load proc_addr proc26
    4417. 

  4417. 1968  03        load param1
    4418. 

  4418. 1969  ed ff     call proc255
    4419. 

  4419. 196b  05        load param3
    4420. 

  4420. 196c  00        Error16
    4421. 

  4421. 196d  d6        real_add
    4422. 

  4422. 196e  ff        call proc15
    4423. 

  4423. 196f  28        load local word-8
    4424. 

  4424. 1970  fd        call proc13
    4425. 

  4425. 1971  65        load stack word5
    4426. 

  4426. 1972  fd        call proc13
    4427. 

  4427. 1973  7a        store stack word10
    4428. 

  4428. 1974  f5        call proc5
    4429. 

  4429. 1975  ab        eq0
    4430. 

  4430. 1976  f4        call proc4
    4431. 

  4431. 1977  93        load immediate 3
    4432. 

  4432. 1978  f5        call proc5
    4433. 

  4433. 1979  8a        leave4
    4434. 

  4434. 197a  f3        call proc3
    4435. 

  4435. 197b  08 f3     load local dword-13
    4436. 

  4436. 197d  5f        store global word15
    4437. 

  4437. 197e  f1        call proc1
    4438. 

  4438. 197f  74        store stack word4
    4439. 

  4439. 1980  f1        call proc1
    4440. 

  4440. 1981  22        load local word-2
    4441. 

  4441. 1982  f1        call proc1
    4442. 

  4442. 1983  e5 f0     jpfalse 1895
    4443. 

  4443. 1985  c7        dsub
    4444. 

  4444. 1986  f0 a4     call .proc4
    4445. 

  4445. 1988  f0 7c     call .proc12
    4446. 

  4446. 198a  f0 d6     call .proc6
    4447. 

  4447. 198c  ef ba ef  call �H�œ�I.proc239
    4448. 

  4448. 198f  cd ee eb ed 6e ed 03  callswitch (return to 1d82)
    4449. 

  4449. 1996  ed 97     call proc151
    4450. 

  4450. 1998  ec 31     nested_call proc49
    4451. 

  4451. 199a  ec 1d     nested_call proc29
    4452. 

  4452. 199c  f0 e3     call .proc3
    4453. 

  4453. 199e  eb        extern_proc_call
    4454. 

  4454. 199f  13        store param1
    4455. 

  4455. 19a0  eb        extern_proc_call
    4456. 

  4456. 19a1  b2        iless_than
    4457. 

  4457. 19a2  ea        power2
    4458. 

  4458. 19a3  a7        sub
    4459. 

  4459. 19a4  ea        power2
    4460. 

  4460. 19a5  8f ea 78 ea 53  load immediate dword 1407875306
    4461. 

  4461. 19aa  ea        power2
    4462. 

  4462. 19ab  38        store local word-8
    4463. 

  4463. 19ac  ea        power2
    4464. 

  4464. 19ad  00        Error16
    4465. 

  4465. 19ae  ea        power2
    4466. 

  4466. 19af  7f        store stack word15
    4467. 

  4467. 19b0  e7        bitwise_in
    4468. 

  4468. 19b1  4e        load global word14
    4469. 

  4469. 19b2  e7        bitwise_in
    4470. 

  4470. 19b3  89        leave2
    4471. 

  4471. 19b4  e6        bitwise_or
    4472. 

  4472. 19b5  4a        load global word10
    4473. 

  4473. 19b6  e6        bitwise_or
    4474. 

  4474. 19b7  60        load stack word0
    4475. 

  4475. 19b8  f1        call proc1
    4476. 

  4476. 19b9  47        load global word7
    4477. 

  4477. 19ba  f1        call proc1
    4478. 

  4478. 19bb  e3 ef     jpfalse 1aac
    4479. 

  4479. 19bd  d1        isub_checked
    4480. 

  4480. 19be  ef 2d ee  call .proc238
    4481. 

  4481. 19c1  34        store local word-4
    4482. 

  4482. 19c2  ec 82     nested_call proc130
    4483. 

  4483. 19c4  e9        bitwise_xor
    4484. 

  4484. 19c5  1d        store indexed byte
    4485. 

  4485. 19c6  e7        bitwise_in
    4486. 

  4486. 19c7  fe        call proc14
    4487. 

  4487. 19c8  e6        bitwise_or
    4488. 

  4488. 19c9  dc        limit_check
    4489. 

  4489. 19ca  e6        bitwise_or
    4490. 

  4490. 19cb  b7        complement
    4491. 

  4491. 19cc  e6        bitwise_or
    4492. 

  4492. 19cd  99        load immediate 9
    4493. 

  4493. 19ce  e6        bitwise_or
    4494. 

  4494. 19cf  b1 e9     shr 233
    4495. 

  4495. 19d1  44        load global word4
    4496. 

  4496. 19d2  e6        bitwise_or
    4497. 

  4497. 

  4498. 

  4499.