Sharp X68000 Disassemblies
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

hlk.s 154KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838483948404841484248434844484548464847484848494850485148524853485448554856485748584859486048614862486348644865486648674868486948704871487248734874487548764877487848794880488148824883488448854886488748884889489048914892489348944895489648974898489949004901490249034904490549064907490849094910491149124913491449154916491749184919492049214922492349244925492649274928492949304931493249334934493549364937493849394940494149424943494449454946494749484949495049514952495349544955495649574958495949604961496249634964496549664967496849694970497149724973497449754976497749784979498049814982498349844985498649874988498949904991499249934994499549964997499849995000500150025003500450055006500750085009501050115012501350145015501650175018501950205021502250235024502550265027502850295030503150325033503450355036503750385039504050415042504350445045504650475048504950505051505250535054505550565057505850595060506150625063506450655066506750685069507050715072507350745075507650775078507950805081508250835084508550865087508850895090509150925093509450955096509750985099510051015102510351045105510651075108510951105111511251135114511551165117511851195120512151225123512451255126512751285129513051315132513351345135513651375138513951405141514251435144514551465147514851495150515151525153515451555156515751585159516051615162516351645165516651675168516951705171517251735174517551765177517851795180518151825183518451855186518751885189519051915192519351945195519651975198519952005201520252035204520552065207520852095210521152125213521452155216521752185219522052215222522352245225522652275228522952305231523252335234523552365237523852395240524152425243524452455246524752485249525052515252525352545255525652575258525952605261526252635264526552665267526852695270527152725273527452755276527752785279528052815282528352845285528652875288528952905291529252935294529552965297529852995300530153025303530453055306530753085309531053115312531353145315531653175318531953205321532253235324532553265327532853295330533153325333533453355336533753385339534053415342534353445345534653475348534953505351535253535354535553565357535853595360536153625363536453655366536753685369537053715372537353745375537653775378537953805381538253835384538553865387538853895390539153925393539453955396539753985399540054015402540354045405540654075408540954105411541254135414541554165417541854195420542154225423542454255426542754285429543054315432543354345435543654375438543954405441544254435444544554465447544854495450545154525453545454555456545754585459546054615462546354645465546654675468546954705471547254735474547554765477547854795480548154825483548454855486548754885489549054915492549354945495549654975498549955005501550255035504550555065507550855095510551155125513551455155516551755185519552055215522552355245525552655275528552955305531553255335534553555365537553855395540554155425543554455455546554755485549555055515552555355545555555655575558555955605561556255635564556555665567556855695570557155725573557455755576557755785579558055815582558355845585558655875588558955905591559255935594559555965597559855995600560156025603560456055606560756085609561056115612561356145615561656175618561956205621562256235624562556265627562856295630563156325633563456355636563756385639564056415642564356445645564656475648564956505651565256535654565556565657565856595660566156625663566456655666566756685669567056715672567356745675567656775678567956805681568256835684568556865687568856895690569156925693569456955696569756985699570057015702570357045705570657075708570957105711571257135714571557165717571857195720572157225723572457255726572757285729573057315732573357345735573657375738573957405741574257435744574557465747574857495750575157525753575457555756575757585759576057615762576357645765576657675768576957705771577257735774577557765777577857795780578157825783578457855786578757885789579057915792579357945795579657975798579958005801580258035804580558065807580858095810581158125813581458155816581758185819582058215822582358245825582658275828582958305831583258335834583558365837583858395840584158425843584458455846584758485849585058515852585358545855585658575858585958605861586258635864586558665867586858695870587158725873587458755876587758785879588058815882588358845885588658875888588958905891589258935894589558965897589858995900590159025903590459055906590759085909591059115912591359145915591659175918591959205921592259235924592559265927592859295930593159325933593459355936593759385939594059415942594359445945594659475948594959505951595259535954595559565957595859595960596159625963596459655966596759685969597059715972597359745975597659775978597959805981598259835984598559865987598859895990599159925993599459955996599759985999600060016002600360046005600660076008600960106011601260136014601560166017601860196020602160226023602460256026602760286029603060316032603360346035603660376038603960406041604260436044604560466047604860496050605160526053605460556056605760586059606060616062606360646065606660676068606960706071607260736074607560766077607860796080608160826083608460856086608760886089609060916092609360946095609660976098609961006101610261036104610561066107610861096110611161126113611461156116611761186119612061216122612361246125612661276128612961306131613261336134613561366137613861396140614161426143614461456146614761486149615061516152615361546155615661576158615961606161616261636164616561666167616861696170617161726173617461756176617761786179618061816182618361846185618661876188618961906191619261936194619561966197619861996200620162026203620462056206620762086209621062116212621362146215621662176218621962206221622262236224622562266227622862296230623162326233623462356236623762386239624062416242624362446245624662476248624962506251625262536254625562566257625862596260626162626263626462656266626762686269627062716272627362746275627662776278627962806281628262836284628562866287628862896290629162926293629462956296629762986299630063016302630363046305630663076308630963106311631263136314631563166317631863196320632163226323632463256326632763286329633063316332633363346335633663376338633963406341634263436344634563466347634863496350635163526353635463556356635763586359636063616362636363646365636663676368636963706371637263736374637563766377637863796380638163826383638463856386638763886389639063916392639363946395639663976398639964006401640264036404640564066407640864096410641164126413641464156416641764186419642064216422642364246425642664276428642964306431643264336434643564366437643864396440644164426443644464456446644764486449645064516452645364546455645664576458645964606461646264636464646564666467646864696470647164726473647464756476647764786479648064816482648364846485648664876488648964906491649264936494649564966497649864996500650165026503650465056506650765086509651065116512651365146515651665176518651965206521652265236524652565266527652865296530653165326533653465356536653765386539654065416542654365446545654665476548654965506551655265536554655565566557655865596560656165626563656465656566656765686569657065716572657365746575657665776578657965806581658265836584658565866587658865896590659165926593659465956596659765986599660066016602660366046605660666076608660966106611661266136614661566166617661866196620662166226623662466256626662766286629663066316632663366346635663666376638663966406641664266436644664566466647664866496650665166526653665466556656665766586659666066616662666366646665666666676668666966706671667266736674667566766677667866796680668166826683668466856686668766886689669066916692669366946695669666976698669967006701670267036704670567066707670867096710671167126713671467156716671767186719672067216722672367246725672667276728672967306731673267336734673567366737673867396740674167426743674467456746674767486749675067516752675367546755675667576758675967606761676267636764676567666767676867696770677167726773677467756776677767786779678067816782678367846785678667876788678967906791679267936794679567966797679867996800680168026803680468056806680768086809681068116812681368146815681668176818681968206821682268236824682568266827682868296830683168326833683468356836683768386839684068416842684368446845684668476848684968506851685268536854685568566857685868596860686168626863686468656866686768686869687068716872687368746875687668776878687968806881688268836884688568866887688868896890689168926893689468956896689768986899690069016902690369046905690669076908690969106911691269136914691569166917691869196920692169226923692469256926692769286929693069316932693369346935693669376938693969406941694269436944694569466947694869496950695169526953695469556956695769586959696069616962696369646965696669676968696969706971697269736974697569766977697869796980698169826983698469856986698769886989699069916992699369946995699669976998699970007001700270037004700570067007700870097010701170127013701470157016701770187019702070217022702370247025702670277028702970307031703270337034703570367037703870397040704170427043704470457046704770487049705070517052705370547055705670577058705970607061706270637064706570667067706870697070707170727073707470757076707770787079708070817082708370847085708670877088708970907091709270937094709570967097709870997100710171027103710471057106710771087109711071117112711371147115711671177118711971207121712271237124712571267127712871297130713171327133713471357136713771387139714071417142714371447145714671477148714971507151715271537154715571567157715871597160716171627163716471657166716771687169717071717172717371747175717671777178717971807181718271837184718571867187718871897190719171927193719471957196719771987199720072017202720372047205720672077208720972107211721272137214721572167217721872197220722172227223722472257226722772287229723072317232723372347235723672377238723972407241724272437244724572467247724872497250725172527253725472557256725772587259726072617262726372647265726672677268726972707271727272737274727572767277727872797280728172827283728472857286728772887289729072917292729372947295729672977298729973007301730273037304730573067307730873097310731173127313731473157316731773187319732073217322732373247325732673277328732973307331733273337334733573367337733873397340734173427343734473457346734773487349735073517352735373547355735673577358735973607361736273637364736573667367736873697370737173727373737473757376737773787379738073817382738373847385738673877388738973907391739273937394739573967397739873997400740174027403740474057406740774087409741074117412741374147415741674177418741974207421742274237424742574267427742874297430743174327433743474357436743774387439744074417442744374447445744674477448744974507451745274537454745574567457745874597460746174627463746474657466746774687469747074717472747374747475747674777478747974807481748274837484748574867487748874897490749174927493749474957496749774987499750075017502750375047505750675077508750975107511751275137514751575167517751875197520752175227523752475257526752775287529753075317532753375347535753675377538753975407541754275437544754575467547754875497550755175527553755475557556755775587559756075617562756375647565756675677568756975707571757275737574757575767577757875797580758175827583758475857586758775887589759075917592759375947595759675977598759976007601760276037604760576067607760876097610761176127613761476157616761776187619762076217622762376247625762676277628762976307631763276337634763576367637763876397640764176427643764476457646764776487649765076517652765376547655765676577658765976607661766276637664766576667667766876697670767176727673767476757676767776787679768076817682768376847685768676877688768976907691769276937694769576967697769876997700770177027703770477057706770777087709771077117712771377147715771677177718771977207721772277237724772577267727772877297730773177327733773477357736773777387739774077417742774377447745774677477748774977507751775277537754775577567757775877597760776177627763776477657766776777687769777077717772777377747775777677777778777977807781778277837784778577867787778877897790779177927793779477957796779777987799780078017802780378047805780678077808780978107811781278137814781578167817781878197820782178227823782478257826782778287829783078317832783378347835783678377838783978407841784278437844784578467847784878497850785178527853785478557856785778587859786078617862786378647865786678677868786978707871787278737874787578767877787878797880788178827883788478857886788778887889789078917892789378947895789678977898789979007901790279037904790579067907790879097910791179127913791479157916791779187919792079217922792379247925792679277928792979307931793279337934793579367937793879397940794179427943794479457946794779487949795079517952795379547955795679577958795979607961796279637964796579667967796879697970797179727973797479757976797779787979798079817982798379847985798679877988798979907991799279937994799579967997799879998000800180028003800480058006800780088009801080118012801380148015801680178018801980208021802280238024802580268027802880298030803180328033803480358036803780388039804080418042804380448045804680478048804980508051805280538054805580568057805880598060806180628063806480658066806780688069807080718072807380748075807680778078807980808081808280838084808580868087808880898090809180928093809480958096809780988099810081018102810381048105810681078108810981108111811281138114811581168117811881198120812181228123812481258126812781288129813081318132813381348135813681378138813981408141814281438144814581468147814881498150815181528153815481558156815781588159816081618162816381648165816681678168816981708171817281738174817581768177817881798180818181828183818481858186818781888189819081918192819381948195819681978198819982008201820282038204820582068207820882098210821182128213821482158216821782188219822082218222822382248225822682278228822982308231823282338234823582368237823882398240824182428243824482458246824782488249825082518252825382548255825682578258825982608261826282638264826582668267826882698270827182728273827482758276827782788279828082818282828382848285828682878288828982908291829282938294829582968297829882998300830183028303830483058306830783088309831083118312831383148315831683178318831983208321832283238324832583268327832883298330833183328333833483358336833783388339834083418342834383448345834683478348834983508351835283538354835583568357835883598360836183628363836483658366836783688369837083718372837383748375837683778378837983808381838283838384838583868387838883898390839183928393839483958396839783988399840084018402840384048405840684078408840984108411841284138414841584168417841884198420842184228423842484258426842784288429843084318432843384348435843684378438843984408441844284438444844584468447844884498450845184528453845484558456845784588459846084618462846384648465846684678468846984708471847284738474847584768477847884798480848184828483848484858486848784888489849084918492849384948495849684978498849985008501850285038504850585068507850885098510851185128513851485158516851785188519852085218522852385248525852685278528852985308531853285338534853585368537853885398540854185428543854485458546854785488549855085518552855385548555855685578558855985608561856285638564856585668567856885698570857185728573857485758576857785788579858085818582858385848585858685878588858985908591859285938594859585968597859885998600860186028603860486058606860786088609861086118612861386148615861686178618861986208621862286238624862586268627862886298630863186328633863486358636863786388639864086418642864386448645864686478648864986508651865286538654865586568657865886598660866186628663866486658666866786688669867086718672867386748675867686778678867986808681868286838684868586868687868886898690869186928693869486958696869786988699870087018702870387048705870687078708870987108711871287138714871587168717871887198720872187228723872487258726872787288729873087318732873387348735873687378738873987408741874287438744874587468747874887498750875187528753875487558756875787588759876087618762876387648765876687678768876987708771877287738774877587768777877887798780878187828783878487858786878787888789879087918792879387948795879687978798879988008801880288038804880588068807880888098810881188128813881488158816881788188819882088218822882388248825882688278828882988308831883288338834883588368837883888398840884188428843884488458846884788488849885088518852885388548855885688578858885988608861886288638864886588668867886888698870887188728873887488758876887788788879888088818882888388848885888688878888888988908891889288938894889588968897889888998900890189028903890489058906890789088909891089118912891389148915891689178918891989208921892289238924892589268927892889298930893189328933893489358936893789388939894089418942894389448945894689478948894989508951895289538954895589568957895889598960896189628963896489658966896789688969897089718972897389748975897689778978897989808981898289838984898589868987898889898990899189928993899489958996899789988999900090019002900390049005900690079008900990109011901290139014901590169017901890199020902190229023902490259026902790289029903090319032903390349035903690379038903990409041904290439044904590469047904890499050905190529053905490559056905790589059906090619062906390649065906690679068906990709071907290739074907590769077907890799080908190829083908490859086908790889089909090919092909390949095909690979098909991009101910291039104910591069107910891099110911191129113911491159116911791189119912091219122912391249125912691279128912991309131913291339134913591369137913891399140914191429143914491459146914791489149915091519152915391549155915691579158915991609161916291639164916591669167916891699170917191729173917491759176917791789179918091819182918391849185918691879188918991909191919291939194919591969197919891999200920192029203920492059206920792089209921092119212921392149215921692179218921992209221922292239224922592269227922892299230923192329233923492359236923792389239924092419242924392449245924692479248924992509251925292539254925592569257925892599260926192629263926492659266926792689269927092719272927392749275927692779278927992809281928292839284928592869287928892899290929192929293929492959296929792989299930093019302930393049305930693079308930993109311931293139314931593169317931893199320932193229323932493259326932793289329933093319332933393349335933693379338933993409341934293439344934593469347934893499350935193529353935493559356935793589359936093619362936393649365936693679368936993709371937293739374937593769377937893799380938193829383938493859386938793889389939093919392939393949395939693979398939994009401940294039404940594069407940894099410941194129413941494159416941794189419942094219422942394249425942694279428942994309431943294339434943594369437943894399440944194429443944494459446944794489449945094519452945394549455945694579458945994609461946294639464946594669467946894699470947194729473947494759476947794789479948094819482948394849485948694879488948994909491949294939494949594969497949894999500950195029503950495059506950795089509951095119512951395149515951695179518951995209521952295239524952595269527952895299530953195329533953495359536953795389539954095419542954395449545954695479548954995509551955295539554955595569557955895599560956195629563956495659566956795689569957095719572957395749575957695779578957995809581958295839584958595869587958895899590959195929593959495959596959795989599960096019602960396049605960696079608960996109611961296139614961596169617961896199620962196229623962496259626962796289629963096319632963396349635963696379638963996409641964296439644964596469647964896499650965196529653965496559656965796589659966096619662966396649665966696679668966996709671967296739674967596769677967896799680968196829683968496859686968796889689969096919692969396949695969696979698969997009701970297039704970597069707970897099710971197129713971497159716971797189719972097219722972397249725972697279728972997309731973297339734973597369737973897399740974197429743974497459746974797489749975097519752975397549755975697579758975997609761976297639764976597669767976897699770977197729773977497759776977797789779978097819782978397849785978697879788978997909791979297939794979597969797
  1. ;=============================================
  2. ; Filename hlk.r
  3. ;
  4. ;
  5. ; Base address 000000
  6. ; Exec address 000000
  7. ; Text size 0068d4 byte(s)
  8. ; Data size 000000 byte(s)
  9. ; Bss size 000000 byte(s)
  10. ; 1281 Labels
  11. ;
  12. ; Commandline dis -b2 -h -m68000 --sp -q1 -B -M -o120 -ghlk.lab --overwrite hlk.r hlk.s
  13. ; DIS version 3.16
  14. ;=============================================
  15. .include inc/doscall.mac
  16. .include inc/iocscall.mac
  17. .include inc/fefunc.mac
  18. .cpu 68000
  19. .text
  20. Start:
  21. bra.s Start2
  22. HuPair:
  23. .dc.b '#HUPAIR',$00
  24. Start2:
  25. lea.l ($0010,a0),a0
  26. suba.l a0,a1
  27. adda.l #$000085e0,a1
  28. move.l a1,-(sp)
  29. move.l a0,-(sp)
  30. DOS _SETBLOCK
  31. addq.l #8,sp
  32. tst.l d0
  33. bmi.w L00054e
  34. lea.l (a0,a1.l),sp
  35. lea.l (End,pc),a6
  36. lea.l (a6),a1
  37. moveq.l #$00,d0
  38. move.w #$0177,d1
  39. L000034:
  40. move.l d0,(a1)+
  41. dbra.w d1,L000034
  42. move.l (Start-$00003c,pc),d0
  43. andi.l #$dfffdfdf,d0
  44. cmpi.l #$47324c4b,d0 ;'G2LK'
  45. seq.b ($05d7,a6)
  46. lea.l ($0064,a6),a0
  47. move.l a0,($0068,a6)
  48. lea.l ($006c,a6),a0
  49. move.l a0,($0070,a6)
  50. lea.l ($0074,a6),a0
  51. move.l a0,($0078,a6)
  52. moveq.l #$5c,d1 ;'\'
  53. pea.l ($019c,a6)
  54. clr.l -(sp)
  55. pea.l (L00125d,pc)
  56. DOS _GETENV
  57. addq.l #8,sp
  58. move.l d0,(sp)+
  59. bmi.s L000084
  60. cmpi.w #$2f00,($019c,a6)
  61. bne.s L000084
  62. moveq.l #$2f,d1 ;'/'
  63. L000084:
  64. move.b d1,($05dc,a6)
  65. pea.l ($4004)
  66. DOS _MALLOC
  67. move.l d0,(sp)+
  68. bmi.w L00054e
  69. move.l d0,d2
  70. bsr.w L0005c8
  71. tst.l d0
  72. bmi.w L00054e
  73. move.l d0,-(sp)
  74. move.l d2,-(sp)
  75. move.l d1,-(sp)
  76. pea.l ($1000)
  77. bsr.w L001366
  78. lea.l ($0010,sp),sp
  79. pea.l ($019c,a6)
  80. clr.l -(sp)
  81. pea.l (L001259,pc)
  82. DOS _GETENV
  83. addq.l #8,sp
  84. move.l d0,(sp)+
  85. bmi.s L0000d2
  86. pea.l ($019c,a6)
  87. bsr.w L0013a2
  88. move.l d0,(sp)+
  89. bmi.w L000554
  90. L0000d2:
  91. pea.l ($0001,a2)
  92. bsr.w L0013a2
  93. move.l d0,(sp)+
  94. bmi.w L000554
  95. beq.w L00056e
  96. move.l ($05a8,a6),d0
  97. st.b d0
  98. addq.l #1,d0
  99. move.l d0,-(sp)
  100. move.l ($05ac,a6),-(sp)
  101. DOS _SETBLOCK
  102. addq.l #8,sp
  103. bsr.w L001e26
  104. bsr.w L0005c8
  105. tst.l d0
  106. bmi.w L00054e
  107. move.l d0,d2
  108. add.l d1,d2
  109. moveq.l #$60,d3 ;'`'
  110. sub.l d3,d1
  111. bmi.w L00054e
  112. add.l d3,d0
  113. move.l d0,($008c,a6)
  114. move.l #$00001800,d3
  115. sub.l d3,d1
  116. bmi.w L00054e
  117. add.l d3,d0
  118. move.l d0,($0088,a6)
  119. move.l d0,($0090,a6)
  120. moveq.l #$60,d3 ;'`'
  121. sub.l d3,d1
  122. bmi.w L00054e
  123. add.l d3,d0
  124. move.l d0,($007c,a6)
  125. move.l d2,($0080,a6)
  126. move.l d1,($0084,a6)
  127. bsr.w L000632
  128. tst.w ($05cc,a6)
  129. bne.w L000452
  130. movea.l ($007c,a6),a5
  131. move.l ($0084,a6),d7
  132. bsr.w L000ade
  133. bsr.w L000b20
  134. bsr.w L000b08
  135. bsr.w L000b64
  136. move.l a5,($007c,a6)
  137. move.l d7,($0084,a6)
  138. move.l ($05bc,a6),d7
  139. beq.s L000186
  140. lea.l (L001278,pc),a0
  141. movea.l a0,a1
  142. movea.l d7,a2
  143. sub.l ($007c,a6),d7
  144. neg.l d7
  145. bsr.w L00282c
  146. L000186:
  147. tst.b ($05d0,a6)
  148. beq.s L000198
  149. move.w #$0002,-(sp)
  150. pea.l (L000cd8,pc)
  151. DOS _FPUTS
  152. addq.l #6,sp
  153. L000198:
  154. movea.l ($05a0,a6),a1
  155. tst.l (a1)
  156. beq.w L00056e
  157. L0001a2:
  158. move.l (a1)+,d1
  159. beq.s L0001bc
  160. movea.l d1,a0
  161. cmpi.b #$2b,(a0)+ ;'+'
  162. bne.s L0001a2
  163. bsr.w L002832
  164. tst.l d0
  165. ble.s L0001a2
  166. bsr.w L00053e
  167. bra.s L0001a2
  168. L0001bc:
  169. movea.l ($05a0,a6),a1
  170. tst.l (a1)
  171. beq.w L00056e
  172. L0001c6:
  173. move.l (a1)+,d1
  174. beq.s L0001e0
  175. movea.l d1,a0
  176. cmpi.b #$2b,(a0) ;'+'
  177. beq.s L0001c6
  178. bsr.w L002832
  179. tst.l d0
  180. ble.s L0001c6
  181. bsr.w L00053e
  182. bra.s L0001c6
  183. L0001e0:
  184. tst.w ($05cc,a6)
  185. bne.w L000452
  186. move.l ($0064,a6),d0
  187. beq.w L000452
  188. tst.l ($05bc,a6)
  189. beq.s L000200
  190. movea.l d0,a0
  191. tst.l ($008a,a0)
  192. beq.w L000452
  193. L000200:
  194. move.l ($0064,a6),d0
  195. L000204:
  196. movea.l d0,a0
  197. tst.l ($0004,a0)
  198. bne.s L000210
  199. bsr.w L00298c
  200. L000210:
  201. move.l ($008a,a0),d0
  202. bne.s L000204
  203. move.l ($006c,a6),d0
  204. beq.w L00056e
  205. movea.l d0,a1
  206. movea.l (a1),a0
  207. move.l ($05bc,a6),d0
  208. cmp.l ($0010,a0),d0
  209. bne.s L000234
  210. tst.l ($0004,a1)
  211. beq.w L00056e
  212. L000234:
  213. bsr.w L000b84
  214. bsr.w L000c12
  215. move.l ($006c,a6),d0
  216. L000240:
  217. movea.l d0,a1
  218. movea.l (a1),a0
  219. bsr.w L0029e8
  220. move.l ($0004,a1),d0
  221. bne.s L000240
  222. move.l ($006c,a6),d0
  223. L000252:
  224. movea.l d0,a1
  225. movea.l (a1),a0
  226. bsr.w L00217e
  227. bsr.w L002a12
  228. move.l ($0004,a1),d0
  229. bne.s L000252
  230. tst.w ($05cc,a6)
  231. bne.w L000452
  232. move.l ($0040,a6),d0
  233. add.l ($0044,a6),d0
  234. tst.b ($05d7,a6)
  235. bne.s L00028a
  236. tst.w ($05ce,a6)
  237. bne.w L000562
  238. tst.l d0
  239. bne.w L000562
  240. bra.s L000304
  241. L00028a:
  242. move.l ($0040,a6),d6
  243. tst.b ($05ce,a6)
  244. bne.s L00029c
  245. tst.l d6
  246. bne.w L000568
  247. bra.s L00029e
  248. L00029c:
  249. addq.l #8,d6
  250. L00029e:
  251. move.l ($0044,a6),d7
  252. tst.b ($05cf,a6)
  253. bne.s L0002b0
  254. tst.l d7
  255. bne.w L000568
  256. bra.s L0002b2
  257. L0002b0:
  258. addq.l #8,d7
  259. L0002b2:
  260. movea.l ($05bc,a6),a4
  261. move.l ($001e,a4),d1
  262. movea.l ($0048,a6),a1
  263. move.l d1,(a1)
  264. move.l d1,($0048,a6)
  265. lea.l (L001334,pc),a0
  266. bsr.w L002402
  267. movea.l d0,a0
  268. move.l d1,($000c,a0)
  269. add.l d6,d1
  270. movea.l ($004c,a6),a1
  271. move.l d1,(a1)
  272. move.l d1,($004c,a6)
  273. lea.l (L00134a,pc),a0
  274. bsr.w L002402
  275. movea.l d0,a0
  276. move.l d1,($000c,a0)
  277. add.l d7,d1
  278. move.l d1,($001e,a4)
  279. movea.l ($05c0,a6),a1
  280. move.l d6,d0
  281. add.l d7,d0
  282. add.l d0,(a1)
  283. movea.l ($0064,a6),a0
  284. add.l d0,($002a,a0)
  285. L000304:
  286. lea.l (L000458,pc),a3
  287. moveq.l #$00,d0
  288. lea.l (L000472,pc),a4
  289. jsr (a3)
  290. move.l d1,($0004,a6)
  291. lea.l (L000486,pc),a4
  292. jsr (a3)
  293. move.l d1,($0008,a6)
  294. lea.l (L0004c0,pc),a4
  295. jsr (a3)
  296. move.l d1,($0038,a6)
  297. lea.l (L0004f6,pc),a4
  298. jsr (a3)
  299. move.l d1,($003c,a6)
  300. lea.l (L00049a,pc),a4
  301. jsr (a3)
  302. move.l d1,($000c,a6)
  303. add.l ($0010,a6),d0
  304. lea.l (L0004ae,pc),a4
  305. jsr (a3)
  306. move.l d1,($0014,a6)
  307. move.l #$ffff8000,d0
  308. lea.l (L0004c0,pc),a4
  309. jsr (a3)
  310. move.l d1,($0018,a6)
  311. lea.l (L0004d2,pc),a4
  312. jsr (a3)
  313. move.l d1,($001c,a6)
  314. add.l ($0020,a6),d0
  315. lea.l (L0004e4,pc),a4
  316. jsr (a3)
  317. move.l d1,($0024,a6)
  318. lea.l (L0004f6,pc),a4
  319. jsr (a3)
  320. move.l d1,($0028,a6)
  321. lea.l (L000508,pc),a4
  322. jsr (a3)
  323. move.l d1,($002c,a6)
  324. add.l ($0030,a6),d0
  325. lea.l (L00051a,pc),a4
  326. jsr (a3)
  327. move.l d1,($0034,a6)
  328. tst.b ($05d6,a6)
  329. beq.s L0003c8
  330. move.l ($0018,a6),d1
  331. add.l ($001c,a6),d1
  332. add.l ($0020,a6),d1
  333. add.l ($0024,a6),d1
  334. add.l ($0028,a6),d1
  335. add.l ($002c,a6),d1
  336. add.l ($0030,a6),d1
  337. add.l ($0034,a6),d1
  338. lea.l (L001318,pc),a0
  339. bsr.w L002402
  340. movea.l d0,a0
  341. move.l d1,($000c,a0)
  342. L0003c8:
  343. move.l ($006c,a6),d0
  344. L0003cc:
  345. movea.l d0,a1
  346. movea.l (a1),a0
  347. bsr.w L002566
  348. move.l ($0004,a1),d0
  349. bne.s L0003cc
  350. tst.w ($05cc,a6)
  351. bne.s L000452
  352. bsr.w L0060aa
  353. move.l ($0004,a6),d0
  354. add.l ($0008,a6),d0
  355. add.l ($0038,a6),d0
  356. add.l ($003c,a6),d0
  357. add.l ($0054,a6),d0
  358. move.l d0,(a6)
  359. add.l ($000c,a6),d0
  360. move.l d0,($0058,a6)
  361. move.l #$ffff8000,d0
  362. add.l ($0018,a6),d0
  363. add.l ($001c,a6),d0
  364. move.l d0,($005c,a6)
  365. add.l ($0020,a6),d0
  366. add.l ($0024,a6),d0
  367. add.l ($0028,a6),d0
  368. add.l ($002c,a6),d0
  369. move.l d0,($0060,a6)
  370. move.l ($006c,a6),d0
  371. L00042c:
  372. movea.l d0,a1
  373. movea.l (a1),a0
  374. bsr.w L002450
  375. move.l ($0004,a1),d0
  376. bne.s L00042c
  377. tst.w ($05cc,a6)
  378. beq.s L000444
  379. bsr.w L000c82
  380. L000444:
  381. bsr.w L002ad0
  382. tst.b ($05d5,a6)
  383. beq.s L000452
  384. bsr.w L00570c
  385. L000452:
  386. move.w ($05cc,a6),-(sp)
  387. DOS _EXIT2
  388. L000458:
  389. move.l d0,d2
  390. move.l ($006c,a6),d1
  391. beq.s L00046c
  392. L000460:
  393. movea.l d1,a1
  394. movea.l (a1),a0
  395. jsr (a4)
  396. move.l ($0004,a1),d1
  397. bne.s L000460
  398. L00046c:
  399. move.l d0,d1
  400. sub.l d2,d1
  401. rts
  402. L000472:
  403. tst.b ($0097,a0)
  404. beq.s L00047c
  405. bsr.w L00052c
  406. L00047c:
  407. move.l d0,($004e,a0)
  408. add.l ($0026,a0),d0
  409. rts
  410. L000486:
  411. tst.b ($0098,a0)
  412. beq.s L000490
  413. bsr.w L00052c
  414. L000490:
  415. move.l d0,($0052,a0)
  416. add.l ($002a,a0),d0
  417. rts
  418. L00049a:
  419. tst.b ($0099,a0)
  420. beq.s L0004a4
  421. bsr.w L00052c
  422. L0004a4:
  423. move.l d0,($0056,a0)
  424. add.l ($002e,a0),d0
  425. rts
  426. L0004ae:
  427. tst.b ($009a,a0)
  428. beq.s L0004b6
  429. bsr.s L00052c
  430. L0004b6:
  431. move.l d0,($005a,a0)
  432. add.l ($0032,a0),d0
  433. rts
  434. L0004c0:
  435. tst.b ($009b,a0)
  436. beq.s L0004c8
  437. bsr.s L00052c
  438. L0004c8:
  439. move.l d0,($005e,a0)
  440. add.l ($0036,a0),d0
  441. rts
  442. L0004d2:
  443. tst.b ($009c,a0)
  444. beq.s L0004da
  445. bsr.s L00052c
  446. L0004da:
  447. move.l d0,($0062,a0)
  448. add.l ($003a,a0),d0
  449. rts
  450. L0004e4:
  451. tst.b ($009d,a0)
  452. beq.s L0004ec
  453. bsr.s L00052c
  454. L0004ec:
  455. move.l d0,($0066,a0)
  456. add.l ($003e,a0),d0
  457. rts
  458. L0004f6:
  459. tst.b ($009e,a0)
  460. beq.s L0004fe
  461. bsr.s L00052c
  462. L0004fe:
  463. move.l d0,($006a,a0)
  464. add.l ($0042,a0),d0
  465. rts
  466. L000508:
  467. tst.b ($009f,a0)
  468. beq.s L000510
  469. bsr.s L00052c
  470. L000510:
  471. move.l d0,($006e,a0)
  472. add.l ($0046,a0),d0
  473. rts
  474. L00051a:
  475. tst.b ($00a0,a0)
  476. beq.s L000522
  477. bsr.s L00052c
  478. L000522:
  479. move.l d0,($0072,a0)
  480. add.l ($004a,a0),d0
  481. rts
  482. L00052c:
  483. move.l d1,-(sp)
  484. move.l ($008e,a0),d1
  485. subq.l #1,d1
  486. add.l d1,d0
  487. not.l d1
  488. and.l d1,d0
  489. move.l (sp)+,d1
  490. rts
  491. L00053e:
  492. pea.l (L0011d4,pc)
  493. DOS _PRINT
  494. move.l d1,-(sp)
  495. DOS _PRINT
  496. addq.l #8,sp
  497. bra.w L000c82
  498. L00054e:
  499. pea.l (L00115b,pc)
  500. bra.s L000558
  501. L000554:
  502. pea.l (L0010b9,pc)
  503. L000558:
  504. DOS _PRINT
  505. addq.l #4,sp
  506. L00055c:
  507. move.w #$0001,-(sp)
  508. DOS _EXIT2
  509. L000562:
  510. pea.l (L001201,pc)
  511. bra.s L000558
  512. L000568:
  513. pea.l (L001229,pc)
  514. bra.s L000558
  515. L00056e:
  516. tst.b ($05d0,a6)
  517. bne.s L00057c
  518. pea.l (L000cd8,pc)
  519. DOS _PRINT
  520. addq.l #4,sp
  521. L00057c:
  522. pea.l (L000d26,pc)
  523. bra.s L000558
  524. L000582:
  525. pea.l (L000cd8,pc)
  526. DOS _PRINT
  527. pea.l (L000d26,pc)
  528. DOS _PRINT
  529. addq.l #8,sp
  530. bra.w L000452
  531. L000594:
  532. lea.l (L000cf5,pc),a0
  533. move.b #$0a,(a0)+
  534. clr.b (a0)
  535. pea.l (L000cd8,pc)
  536. DOS _PRINT
  537. addq.l #4,sp
  538. bra.w L000452
  539. L0005aa:
  540. pea.l (L0010cd,pc)
  541. DOS _PRINT
  542. addq.l #4,sp
  543. move.l a0,d0
  544. pea.l (Start,pc)
  545. sub.l (sp)+,d0
  546. bsr.w L000ca2
  547. bsr.w L000c82
  548. pea.l (L0010e2,pc)
  549. bra.s L000558
  550. L0005c8:
  551. pea.l ($00ffff00)
  552. DOS _MALLOC
  553. move.l (sp)+,d1
  554. tst.l d0
  555. beq.s L0005e0
  556. and.l d0,d1
  557. beq.s L0005e2
  558. move.l d1,-(sp)
  559. DOS _MALLOC
  560. addq.l #4,sp
  561. L0005e0:
  562. rts
  563. L0005e2:
  564. moveq.l #$ff,d0
  565. rts
  566. L0005e6:
  567. pea.l (L0011e4,pc)
  568. DOS _PRINT
  569. addq.l #4,sp
  570. move.w (a0),d0
  571. bsr.w L000c96
  572. pea.l (L0011f7,pc)
  573. DOS _PRINT
  574. addq.l #4,sp
  575. move.l a0,d0
  576. sub.l ($0010,a1),d0
  577. bsr.w L000ca2
  578. bsr.w L000c82
  579. pea.l (L0011fc,pc)
  580. DOS _PRINT
  581. move.l ($0008,a1),-(sp)
  582. DOS _PRINT
  583. addq.l #8,sp
  584. move.l ($0004,a1),d1
  585. beq.s L00062a
  586. pea.l (L0011fc,pc)
  587. DOS _PRINT
  588. move.l d1,-(sp)
  589. DOS _PRINT
  590. addq.l #8,sp
  591. L00062a:
  592. bsr.w L000c82
  593. bra.w L00055c
  594. L000632:
  595. movem.l d1-d2/d7/a0-a5,-(sp)
  596. movea.l ($007c,a6),a5
  597. move.l ($0084,a6),d7
  598. movea.l ($05a0,a6),a1
  599. L000642:
  600. move.l (a1)+,d0
  601. beq.w L000768
  602. movea.l d0,a2
  603. cmpi.b #$2d,(a2)+ ;'-'
  604. bne.s L000642
  605. subq.l #4,a1
  606. movea.l a1,a4
  607. L000654:
  608. move.l ($0004,a4),(a4)+
  609. bne.s L000654
  610. subq.l #1,($059c,a6)
  611. move.b (a2)+,d0
  612. beq.w L000710
  613. cmpi.b #$2d,d0 ;'-'
  614. beq.s L0006dc
  615. bra.s L000670
  616. L00066c:
  617. move.b (a2)+,d0
  618. beq.s L000642
  619. L000670:
  620. cmpi.b #$3f,d0 ;'?'
  621. beq.w L000582
  622. cmpi.b #$30,d0 ;'0'
  623. beq.w L0008fc
  624. cmpi.b #$31,d0 ;'1'
  625. beq.w L000904
  626. cmpi.b #$4c,d0 ;'L'
  627. beq.w L0008a0
  628. andi.w #$00df,d0
  629. subi.b #$41,d0 ;'A'
  630. cmpi.b #$19,d0
  631. bhi.s L000712
  632. add.w d0,d0
  633. move.w (L0006a8,pc,d0.w),d0
  634. jmp (L0006a8,pc,d0.w)
  635. L0006a8:
  636. .dc.w L000934-L0006a8
  637. .dc.w L00098c-L0006a8
  638. .dc.w L000712-L0006a8
  639. .dc.w L0009c2-L0006a8
  640. .dc.w L000952-L0006a8
  641. .dc.w L000712-L0006a8
  642. .dc.w L0009a4-L0006a8
  643. .dc.w L000582-L0006a8
  644. .dc.w L000776-L0006a8
  645. .dc.w L000712-L0006a8
  646. .dc.w L000712-L0006a8
  647. .dc.w L0007e8-L0006a8
  648. .dc.w L0008b0-L0006a8
  649. .dc.w L000712-L0006a8
  650. .dc.w L0008c4-L0006a8
  651. .dc.w L0008e2-L0006a8
  652. .dc.w L000712-L0006a8
  653. .dc.w L00093a-L0006a8
  654. .dc.w L000984-L0006a8
  655. .dc.w L00092c-L0006a8
  656. .dc.w L000712-L0006a8
  657. .dc.w L000914-L0006a8
  658. .dc.w L00091c-L0006a8
  659. .dc.w L000924-L0006a8
  660. .dc.w L000712-L0006a8
  661. .dc.w L00090c-L0006a8
  662. L0006dc:
  663. lea.l (L0006fe,pc),a4
  664. L0006e0:
  665. move.w (a4)+,d0
  666. beq.s L000710
  667. move.w (a4)+,d1
  668. pea.l (L0006fe,pc,d0.w)
  669. pea.l (a2)
  670. bsr.w L0068a8
  671. addq.l #8,sp
  672. bne.s L0006e0
  673. L0006f4:
  674. tst.b (a2)+
  675. bne.s L0006f4
  676. subq.l #1,a2
  677. jmp (L0006fe,pc,d1.w)
  678. L0006fe:
  679. .dc.w L00109e-L0006fe
  680. .dc.w L000582-L0006fe
  681. .dc.w L0010a3-L0006fe
  682. .dc.w L00090c-L0006fe
  683. .dc.w L0010a9-L0006fe
  684. .dc.w L000914-L0006fe
  685. .dc.w L0010b1-L0006fe
  686. .dc.w L000594-L0006fe
  687. .dc.w L0006fe-L0006fe
  688. L000710:
  689. subq.l #1,a2
  690. L000712:
  691. pea.l (L001173,pc)
  692. DOS _PRINT
  693. bsr.s L00072a
  694. L00071a:
  695. addq.l #4,sp
  696. bsr.w L000c82
  697. move.w #$0001,($05cc,a6)
  698. bra.w L000642
  699. L00072a:
  700. move.l a2,-(sp)
  701. L00072c:
  702. cmpi.b #$2d,-(a2) ;'-'
  703. bne.s L00072c
  704. move.l a2,-(sp)
  705. DOS _PRINT
  706. addq.l #4,sp
  707. movea.l (sp)+,a2
  708. rts
  709. L00073c:
  710. pea.l (L001185,pc)
  711. DOS _PRINT
  712. bsr.s L00072a
  713. tst.b (a2)
  714. bne.s L00071a
  715. bsr.w L000c78
  716. move.l a3,(sp)
  717. DOS _PRINT
  718. bra.s L00071a
  719. L000752:
  720. pea.l (L001185,pc)
  721. DOS _PRINT
  722. bsr.s L00072a
  723. bra.s L00071a
  724. L00075c:
  725. pea.l (L0011ae,pc)
  726. DOS _PRINT
  727. addq.l #4,sp
  728. bra.w L00066c
  729. L000768:
  730. move.l a5,($007c,a6)
  731. move.l d7,($0084,a6)
  732. movem.l (sp)+,d1-d2/d7/a0-a5
  733. rts
  734. L000776:
  735. bsr.w L000a18
  736. beq.s L000752
  737. clr.w -(sp)
  738. pea.l (a3)
  739. DOS _OPEN
  740. addq.l #6,sp
  741. move.l d0,d1
  742. bmi.w L000aca
  743. move.w #$0002,-(sp)
  744. clr.l -(sp)
  745. move.w d1,-(sp)
  746. DOS _SEEK
  747. move.l d0,d2
  748. clr.w ($0006,sp)
  749. DOS _SEEK
  750. addq.l #8,sp
  751. or.l d2,d0
  752. bmi.s L0007de
  753. moveq.l #$fe,d0
  754. and.l d2,d0
  755. addq.l #2,d0
  756. sub.l d0,d7
  757. bmi.w L00054e
  758. sub.l d0,($0080,a6)
  759. movea.l ($0080,a6),a0
  760. move.l d2,-(sp)
  761. pea.l (a0)
  762. move.w d1,-(sp)
  763. DOS _READ
  764. addq.l #6,sp
  765. cmp.l (sp)+,d2
  766. bne.s L0007de
  767. clr.b (a0,d2.l)
  768. move.w d1,-(sp)
  769. DOS _CLOSE
  770. addq.l #2,sp
  771. pea.l (a0)
  772. bsr.w L001444
  773. move.l d0,(sp)+
  774. bmi.w L000554
  775. bra.w L000642
  776. L0007de:
  777. move.w d1,-(sp)
  778. DOS _CLOSE
  779. addq.l #2,sp
  780. bra.w L000642
  781. L0007e8:
  782. tst.b (a2)
  783. bne.s L000850
  784. lea.l ($019c,a6),a3
  785. pea.l (a3)
  786. clr.l -(sp)
  787. pea.l (L001255,pc)
  788. DOS _GETENV
  789. addq.l #8,sp
  790. move.l d0,(sp)+
  791. bmi.w L00075c
  792. bsr.s L000808
  793. bra.w L00066c
  794. L000808:
  795. pea.l (a3)
  796. bsr.w L006892
  797. addq.l #4,sp
  798. tst.l d0
  799. beq.s L00084e
  800. addq.l #7,d0
  801. andi.w #$fffe,d0
  802. sub.l d0,d7
  803. bmi.w L00054e
  804. sub.l d0,($0080,a6)
  805. movea.l ($0080,a6),a0
  806. pea.l (a0)
  807. clr.l (a0)+
  808. L00082c:
  809. move.b (a3)+,(a0)+
  810. bne.s L00082c
  811. subq.l #2,a0
  812. cmpi.b #$3a,(a0)+ ;':'
  813. beq.s L00083e
  814. move.b #$5c,(a0)+ ;'\'
  815. clr.b (a0)
  816. L00083e:
  817. bsr.w L0067bc
  818. movea.l (sp)+,a0
  819. movea.l ($0078,a6),a3
  820. move.l a0,(a3)
  821. move.l a0,($0078,a6)
  822. L00084e:
  823. rts
  824. L000850:
  825. pea.l (a2)
  826. bsr.w L006892
  827. addq.l #4,sp
  828. addq.l #7,d0
  829. andi.w #$fffe,d0
  830. sub.l d0,d7
  831. bmi.w L00054e
  832. sub.l d0,($0080,a6)
  833. movea.l ($0080,a6),a0
  834. pea.l (L001255,pc)
  835. pea.l (a0)
  836. bsr.w L006860
  837. addq.l #8,sp
  838. pea.l (a2)
  839. pea.l (a0)
  840. bsr.w L006876
  841. addq.l #8,sp
  842. pea.l (L001263,pc)
  843. pea.l (a0)
  844. bsr.w L006876
  845. addq.l #8,sp
  846. lea.l (a1),a2
  847. L000890:
  848. tst.l (a2)+
  849. bne.s L000890
  850. clr.l (a2)
  851. move.l a0,-(a2)
  852. subq.l #1,($059c,a6)
  853. bra.w L000642
  854. L0008a0:
  855. bsr.w L000a18
  856. beq.w L000752
  857. bsr.w L000808
  858. bra.w L000642
  859. L0008b0:
  860. bsr.w L000a18
  861. beq.w L000752
  862. bsr.w L000a3a
  863. bmi.w L00073c
  864. bra.w L000642
  865. L0008c4:
  866. bsr.w L000a18
  867. beq.w L000752
  868. moveq.l #$5f,d0 ;'_'
  869. movea.l a3,a4
  870. lea.l ($009c,a6),a0
  871. L0008d4:
  872. move.b (a4)+,(a0)+
  873. dbeq.w d0,L0008d4
  874. beq.w L000642
  875. bra.w L00073c
  876. L0008e2:
  877. st.b ($05d5,a6)
  878. moveq.l #$5f,d0 ;'_'
  879. lea.l (a2),a4
  880. lea.l ($011c,a6),a0
  881. L0008ee:
  882. move.b (a4)+,(a0)+
  883. dbeq.w d0,L0008ee
  884. beq.w L000642
  885. bra.w L000752
  886. L0008fc:
  887. sf.b ($05d7,a6)
  888. bra.w L00066c
  889. L000904:
  890. st.b ($05d7,a6)
  891. bra.w L00066c
  892. L00090c:
  893. sf.b ($05d1,a6)
  894. bra.w L00066c
  895. L000914:
  896. st.b ($05d1,a6)
  897. bra.w L00066c
  898. L00091c:
  899. st.b ($05d2,a6)
  900. bra.w L00066c
  901. L000924:
  902. st.b ($05d3,a6)
  903. bra.w L00066c
  904. L00092c:
  905. st.b ($05d0,a6)
  906. bra.w L00066c
  907. L000934:
  908. lea.l ($05d8,a6),a4
  909. bra.s L00093e
  910. L00093a:
  911. lea.l ($05da,a6),a4
  912. L00093e:
  913. st.b (a4)+
  914. moveq.l #$20,d0 ;' '
  915. or.b (a2)+,d0
  916. cmpi.b #$6e,d0 ;'n'
  917. seq.b (a4)
  918. beq.s L00094e
  919. subq.l #1,a2
  920. L00094e:
  921. bra.w L00066c
  922. L000952:
  923. bsr.w L000a18
  924. beq.w L000752
  925. bsr.w L000a3a
  926. bmi.w L00073c
  927. move.l d0,d1
  928. subq.l #2,d1
  929. cmpi.l #$000000fe,d1
  930. bhi.w L00073c
  931. move.l d0,d1
  932. L000972:
  933. lsr.l #1,d1
  934. bcc.s L000972
  935. bne.w L00073c
  936. lea.l (L000cd4,pc),a4
  937. move.l d0,(a4)
  938. bra.w L000642
  939. L000984:
  940. st.b ($05d6,a6)
  941. bra.w L00066c
  942. L00098c:
  943. bsr.w L000a18
  944. beq.w L000752
  945. bsr.w L000a3a
  946. bmi.w L00073c
  947. move.l d0,($0098,a6)
  948. bra.w L000642
  949. L0009a4:
  950. bsr.s L000a18
  951. beq.w L000752
  952. bsr.w L000a3a
  953. bmi.w L00073c
  954. moveq.l #$02,d1
  955. cmp.l d1,d0
  956. bhi.w L00073c
  957. move.b d0,($05d4,a6)
  958. bra.w L000642
  959. L0009c2:
  960. bsr.s L000a18
  961. beq.w L000752
  962. bsr.w L000b4c
  963. subq.l #6,d7
  964. bmi.w L00054e
  965. move.w #$b200,(a5)+
  966. lea.l (a5),a0
  967. clr.l (a5)+
  968. movea.l a3,a4
  969. L0009dc:
  970. move.b (a4)+,d1
  971. beq.s L0009f0
  972. cmpi.b #$3d,d1 ;'='
  973. beq.s L0009f0
  974. subq.l #1,d7
  975. bmi.w L00054e
  976. move.b d1,(a5)+
  977. bra.s L0009dc
  978. L0009f0:
  979. move.w a5,d0
  980. ori.w #$0001,d0
  981. sub.w a5,d0
  982. L0009f8:
  983. subq.l #1,d7
  984. bmi.w L00054e
  985. clr.b (a5)+
  986. dbra.w d0,L0009f8
  987. tst.b d1
  988. beq.w L00073c
  989. movea.l a4,a3
  990. bsr.s L000a3a
  991. bmi.w L00073c
  992. move.l d0,(a0)
  993. bra.w L000642
  994. L000a18:
  995. movea.l a2,a3
  996. tst.b (a2)
  997. bne.s L000a38
  998. move.l (a1),d0
  999. beq.s L000a38
  1000. movea.l d0,a3
  1001. cmpi.b #$2d,(a3) ;'-'
  1002. beq.s L000a38
  1003. movea.l a1,a4
  1004. L000a2c:
  1005. move.l ($0004,a4),(a4)+
  1006. bne.s L000a2c
  1007. subq.l #1,($059c,a6)
  1008. moveq.l #$01,d0
  1009. L000a38:
  1010. rts
  1011. L000a3a:
  1012. movem.l d1/a4,-(sp)
  1013. moveq.l #$00,d0
  1014. moveq.l #$00,d1
  1015. movea.l a3,a4
  1016. move.b (a4)+,d1
  1017. beq.s L000a8c
  1018. cmpi.b #$24,d1 ;'$'
  1019. beq.s L000a98
  1020. cmpi.b #$39,d1 ;'9'
  1021. bhi.s L000a8c
  1022. cmpi.b #$30,d1 ;'0'
  1023. bcs.s L000a8c
  1024. bhi.s L000a68
  1025. moveq.l #$20,d1 ;' '
  1026. or.b (a4)+,d1
  1027. cmpi.b #$78,d1 ;'x'
  1028. beq.s L000a98
  1029. subq.l #1,a4
  1030. L000a68:
  1031. subq.l #1,a4
  1032. L000a6a:
  1033. move.b (a4)+,d1
  1034. beq.s L000a90
  1035. subi.b #$30,d1 ;'0'
  1036. cmpi.b #$09,d1
  1037. bhi.s L000a8c
  1038. cmpi.l #$19999999,d0
  1039. bhi.s L000a8c
  1040. add.l d0,d0
  1041. move.l d0,-(sp)
  1042. lsl.l #2,d0
  1043. add.l (sp)+,d0
  1044. add.l d1,d0
  1045. bcc.s L000a6a
  1046. L000a8c:
  1047. moveq.l #$ff,d1
  1048. bra.s L000a92
  1049. L000a90:
  1050. moveq.l #$00,d1
  1051. L000a92:
  1052. movem.l (sp)+,d1/a4
  1053. rts
  1054. L000a98:
  1055. move.b (a4)+,d1
  1056. beq.s L000a8c
  1057. L000a9c:
  1058. cmpi.b #$39,d1 ;'9'
  1059. bls.s L000aae
  1060. andi.b #$df,d1
  1061. cmpi.b #$41,d1 ;'A'
  1062. bcs.s L000a8c
  1063. subq.b #7,d1
  1064. L000aae:
  1065. subi.b #$30,d1 ;'0'
  1066. cmpi.b #$0f,d1
  1067. bhi.s L000a8c
  1068. cmpi.l #$0fffffff,d0
  1069. bhi.s L000a8c
  1070. lsl.l #4,d0
  1071. or.b d1,d0
  1072. move.b (a4)+,d1
  1073. bne.s L000a9c
  1074. bra.s L000a90
  1075. L000aca:
  1076. pea.l (L001193,pc)
  1077. DOS _PRINT
  1078. pea.l (a3)
  1079. DOS _PRINT
  1080. addq.l #8,sp
  1081. bsr.w L000c82
  1082. bra.w L00055c
  1083. L000ade:
  1084. tst.b ($05d7,a6)
  1085. beq.s L000b06
  1086. bsr.s L000b4c
  1087. pea.l ($0002,a5)
  1088. move.l (sp)+,($0048,a6)
  1089. moveq.l #$16,d0
  1090. lea.l (L00132e,pc),a4
  1091. bsr.s L000b74
  1092. pea.l ($0002,a5)
  1093. move.l (sp)+,($004c,a6)
  1094. moveq.l #$16,d0
  1095. lea.l (L001344,pc),a4
  1096. bsr.s L000b74
  1097. L000b06:
  1098. rts
  1099. L000b08:
  1100. tst.b ($05d7,a6)
  1101. beq.s L000b1e
  1102. pea.l ($0008,a5)
  1103. move.l (sp)+,($05c0,a6)
  1104. moveq.l #$0c,d0
  1105. lea.l (L00135a,pc),a4
  1106. bsr.s L000b74
  1107. L000b1e:
  1108. rts
  1109. L000b20:
  1110. tst.b ($05d6,a6)
  1111. beq.s L000b4a
  1112. bsr.s L000b4c
  1113. moveq.l #$14,d0
  1114. lea.l (L0012fe,pc),a4
  1115. bsr.s L000b74
  1116. moveq.l #$10,d0
  1117. lea.l (L001312,pc),a4
  1118. bsr.s L000b74
  1119. moveq.l #$0c,d0
  1120. lea.l (L001322,pc),a4
  1121. bsr.s L000b74
  1122. moveq.l #$40,d0 ;'@'
  1123. movea.l ($05bc,a6),a4
  1124. add.l d0,($001e,a4)
  1125. L000b4a:
  1126. rts
  1127. L000b4c:
  1128. tst.l ($05bc,a6)
  1129. bne.s L000b62
  1130. move.l a5,($05bc,a6)
  1131. move.l #$0000008c,d0
  1132. lea.l (L001272,pc),a4
  1133. bsr.s L000b74
  1134. L000b62:
  1135. rts
  1136. L000b64:
  1137. tst.l ($05bc,a6)
  1138. beq.s L000b72
  1139. subq.l #2,d7
  1140. bmi.w L00054e
  1141. clr.w (a5)+
  1142. L000b72:
  1143. rts
  1144. L000b74:
  1145. sub.l d0,d7
  1146. bmi.w L00054e
  1147. subq.l #1,d0
  1148. L000b7c:
  1149. move.b (a4)+,(a5)+
  1150. dbra.w d0,L000b7c
  1151. rts
  1152. L000b84:
  1153. movem.l d1/a0-a3,-(sp)
  1154. lea.l ($009c,a6),a0
  1155. movea.l a0,a2
  1156. move.b (a0),d1
  1157. bne.s L000bac
  1158. movea.l ($006c,a6),a1
  1159. movea.l (a1),a0
  1160. move.l ($05bc,a6),d0
  1161. cmp.l ($0010,a0),d0
  1162. bne.s L000ba8
  1163. movea.l ($0004,a1),a1
  1164. movea.l (a1),a0
  1165. L000ba8:
  1166. movea.l ($0008,a0),a0
  1167. L000bac:
  1168. lea.l ($019c,a6),a3
  1169. pea.l (a3)
  1170. pea.l (a0)
  1171. DOS _NAMECK
  1172. addq.l #8,sp
  1173. pea.l (a3)
  1174. pea.l (a2)
  1175. bsr.w L006860
  1176. addq.l #8,sp
  1177. pea.l ($0043,a3)
  1178. pea.l (a2)
  1179. bsr.w L006876
  1180. addq.l #8,sp
  1181. pea.l (a2)
  1182. bsr.w L0067bc
  1183. addq.l #4,sp
  1184. tst.b d1
  1185. beq.s L000be2
  1186. lea.l ($0056,a3),a0
  1187. tst.b (a0)
  1188. bne.s L000bfe
  1189. L000be2:
  1190. lea.l (L001266,pc),a0
  1191. tst.b ($05da,a6)
  1192. bne.s L000bfe
  1193. addq.l #3,a0
  1194. tst.b d1
  1195. bne.s L000bf8
  1196. tst.b ($05d9,a6)
  1197. bne.s L000bfe
  1198. L000bf8:
  1199. tst.b ($05d8,a6)
  1200. bne.s L000c0c
  1201. L000bfe:
  1202. pea.l (a0)
  1203. pea.l (a2)
  1204. bsr.w L006876
  1205. addq.l #8,sp
  1206. neg.b ($05d9,a6)
  1207. L000c0c:
  1208. movem.l (sp)+,d1/a0-a3
  1209. rts
  1210. L000c12:
  1211. movem.l d1/a0-a2,-(sp)
  1212. tst.b ($05d5,a6)
  1213. beq.s L000c72
  1214. lea.l ($011c,a6),a0
  1215. lea.l (a0),a1
  1216. lea.l ($019c,a6),a2
  1217. move.b (a0),d1
  1218. bne.s L000c2e
  1219. lea.l ($009c,a6),a1
  1220. L000c2e:
  1221. pea.l (a2)
  1222. pea.l (a1)
  1223. DOS _NAMECK
  1224. addq.l #8,sp
  1225. tst.l d0
  1226. bmi.s L000c72
  1227. pea.l (a2)
  1228. pea.l (a0)
  1229. bsr.w L006860
  1230. addq.l #8,sp
  1231. pea.l ($0043,a2)
  1232. pea.l (a0)
  1233. bsr.w L006876
  1234. addq.l #8,sp
  1235. pea.l (a0)
  1236. bsr.w L0067bc
  1237. addq.l #4,sp
  1238. tst.b d1
  1239. beq.s L000c64
  1240. lea.l ($0056,a2),a2
  1241. tst.b (a2)
  1242. bne.s L000c68
  1243. L000c64:
  1244. lea.l (L00126c,pc),a2
  1245. L000c68:
  1246. pea.l (a2)
  1247. pea.l (a0)
  1248. bsr.w L006876
  1249. addq.l #8,sp
  1250. L000c72:
  1251. movem.l (sp)+,d1/a0-a2
  1252. rts
  1253. L000c78:
  1254. move.w #$0020,-(sp) ;' '
  1255. DOS _PUTCHAR
  1256. addq.l #2,sp
  1257. rts
  1258. L000c82:
  1259. pea.l (L001253,pc)
  1260. DOS _PRINT
  1261. addq.l #4,sp
  1262. rts
  1263. L000c8c:
  1264. movem.l d1-d2/a0,-(sp)
  1265. moveq.l #$01,d2
  1266. ror.l #8,d0
  1267. bra.s L000ca8
  1268. L000c96:
  1269. movem.l d1-d2/a0,-(sp)
  1270. move.w #$0003,d2
  1271. swap.w d0
  1272. bra.s L000ca8
  1273. L000ca2:
  1274. movem.l d1-d2/a0,-(sp)
  1275. moveq.l #$07,d2
  1276. L000ca8:
  1277. move.l d0,d1
  1278. L000caa:
  1279. rol.l #4,d1
  1280. moveq.l #$0f,d0
  1281. and.w d1,d0
  1282. move.b (L000cc4,pc,d0.w),d0
  1283. move.w d0,-(sp)
  1284. DOS _PUTCHAR
  1285. addq.l #2,sp
  1286. dbra.w d2,L000caa
  1287. movem.l (sp)+,d1-d2/a0
  1288. rts
  1289. L000cc4:
  1290. .dc.b $30,$31,$32,$33,$34,$35,$36,$37
  1291. .dc.b $38,$39,$61,$62,$63,$64,$65,$66
  1292. L000cd4:
  1293. .dc.l $00000002
  1294. L000cd8:
  1295. .dc.b 'HLK evolution version 3.01+12'
  1296. L000cf5:
  1297. .dc.b ' Copyright 1989-94 SALT, 1999/07/16 立花えり子.',$0a,$00
  1298. L000d26:
  1299. .dc.b 'usege: hlk [switch] file [+file] ...',$0a
  1300. .dc.b $09,'-a / -an',$09,'実行ファイルの拡張子省略時に .x を付けない',$0a
  1301. .dc.b $09,'-b num',$09,$09,'ベースアドレスの設定',$0a
  1302. .dc.b $09,'-d label=num',$09,'シンボルの定義',$0a
  1303. .dc.b $09,'-e num',$09,$09,'アライメント値の設定',$0a
  1304. .dc.b $09,'-g num',$09,$09,'ロードモードの設定(0~2)',$0a
  1305. .dc.b $09,'-i file',$09,$09,'インダイレクトファイルの指定',$0a
  1306. .dc.b $09,'-l',$09,$09,'ライブラリのパスとして環境変数 lib を使用する',$0a
  1307. .dc.b $09,'-l<lib>',$09,$09,'lib<lib>.a をリンクする',$0a
  1308. .dc.b $09,'-L path',$09,$09,'ライブラリ検索パスの指定',$0a
  1309. .dc.b $09,'-o file',$09,$09,'実行ファイル名の指定',$0a
  1310. .dc.b $09,'-p[file]',$09,'マップファイルの作成',$0a
  1311. .dc.b $09,'-r / -rn',$09,'.r 形式実行ファイルの作成',$0a
  1312. .dc.b $09,'-s',$09,$09,'セクション情報を実行ファイルに埋め込む',$0a
  1313. .dc.b $09,'-t',$09,$09,'起動時にタイトルを表示する',$0a
  1314. .dc.b $09,'-w',$09,$09,'警告の出力禁止',$0a
  1315. .dc.b $09,'-x',$09,$09,'シンボルテーブルの出力禁止',$0a
  1316. .dc.b $09,'-0 / -1',$09,$09,'.ctor/.dtor に対応しない / する',$0a
  1317. .dc.b $0a
  1318. .dc.b $09,'--help (-h)',$09,'使用法表示',$0a
  1319. .dc.b $09,'--quiet (-z)',$09,'--verbose (-v) オプションを取り消す',$0a
  1320. .dc.b $09,'--verbose (-v)',$09,'詳細表示',$0a
  1321. .dc.b $09,'--version',$09,'バージョン表示',$0a
  1322. .dc.b $0a
  1323. .dc.b $09,'環境変数 HLK の内容がコマンドラインの手前に挿入されます.',$0a
  1324. .dc.b $09,'ファイル名先頭に + をつけたオブジェクトを先頭にリンクします.',$0a,$00
  1325. L00109e:
  1326. .dc.b 'help',$00
  1327. L0010a3:
  1328. .dc.b 'quiet',$00
  1329. L0010a9:
  1330. .dc.b 'verbose',$00
  1331. L0010b1:
  1332. .dc.b 'version',$00
  1333. L0010b9:
  1334. .dc.b 'Too many arguments',$0a,$00
  1335. L0010cd:
  1336. .dc.b 'Internal error at : ',$00
  1337. L0010e2:
  1338. .dc.b 'このエラーはプログラムのバグによって発生した可能性が大です.',$0a
  1339. .dc.b '作者にお知らせ下さい.できる限りの事はやってみます.(;_;)',$0a
  1340. .dc.b $0a,$00
  1341. L00115b:
  1342. .dc.b 'Out of memory !! (゚_゚;',$0a,$00
  1343. L001173:
  1344. .dc.b 'Unknown option : ',$00
  1345. L001185:
  1346. .dc.b 'Bad option : ',$00
  1347. L001193:
  1348. .dc.b 'Not found indirect file : ',$00
  1349. L0011ae:
  1350. .dc.b 'Undefined environment variable ',$27,'lib',$27,$0a,$00
  1351. L0011d4:
  1352. .dc.b 'Already read : ',$00
  1353. L0011e4:
  1354. .dc.b 'Unknown command : ',$00
  1355. L0011f7:
  1356. .dc.b ' at ',$00
  1357. L0011fc:
  1358. .dc.b ' in ',$00
  1359. L001201:
  1360. .dc.b 'Using (do)ctor/dtor without -1 option.',$0a,$00
  1361. L001229:
  1362. .dc.b 'Using ctor/dtor without .doctor/.dodtor.',$0a,$00
  1363. L001253:
  1364. .dc.b $0a,$00
  1365. L001255:
  1366. .dc.b 'lib',$00
  1367. L001259:
  1368. .dc.b 'HLK',$00
  1369. L00125d:
  1370. .dc.b 'SLASH',$00
  1371. L001263:
  1372. .dc.b $2e,$61,$00
  1373. L001266:
  1374. .dc.b $2e,$72,$00,$2e,$78,$00
  1375. L00126c:
  1376. .dc.b '.map',$00,$00
  1377. L001272:
  1378. .dc.b $d0,$00,$00,$00,$00,$00
  1379. L001278:
  1380. .dc.b '*SYSTEM*',$00,$00
  1381. L001282:
  1382. .dc.b 'タ',$01,$00,$00,$00,$00
  1383. .dc.b 'text',$00,$00
  1384. .dc.b 'タ',$02,$00,$00,$00,$00
  1385. .dc.b 'data',$00,$00
  1386. .dc.b 'タ',$03,$00,$00,$00,$00
  1387. .dc.b 'bss',$00
  1388. .dc.b 'タ',$04,$00,$00,$00,$00
  1389. .dc.b 'stack',$00
  1390. .dc.b 'タ',$05,$00,$00,$00,$00
  1391. .dc.b 'rdata',$00
  1392. .dc.b 'タ',$06,$00,$00,$00,$00
  1393. .dc.b 'rbss',$00,$00
  1394. .dc.b 'タ',$07,$00,$00,$00,$00
  1395. .dc.b 'rstack',$00,$00
  1396. .dc.b 'タ',$08,$00,$00,$00,$00
  1397. .dc.b 'rldata',$00,$00
  1398. .dc.b 'タ',$09,$00,$00,$00,$00
  1399. .dc.b 'rlbss',$00
  1400. .dc.b 'タ',$0a,$00,$00,$00,$00
  1401. .dc.b 'rlstack',$00
  1402. L0012fe:
  1403. .dc.b $b2,$02,$00,$00,$00,$00,$5f,$5f
  1404. .dc.b $5f,$73,$69,$7a,$65,$5f,$69,$6e
  1405. .dc.b $66,$6f,$00,$00
  1406. L001312:
  1407. .dc.b $b2,$00,$00,$00,$00,$00
  1408. L001318:
  1409. .dc.b '___rsize',$00,$00
  1410. L001322:
  1411. .dc.b $20,$02,$00,$00,$00,$00,$30,$00
  1412. .dc.b $00,$00,$00,$40
  1413. L00132e:
  1414. .dc.b $b2,$02,$00,$00,$00,$00
  1415. L001334:
  1416. .dc.b '___CTOR_LIST__',$00,$00
  1417. L001344:
  1418. .dc.b $b2,$02,$00,$00,$00,$00
  1419. L00134a:
  1420. .dc.b '___DTOR_LIST__',$00,$00
  1421. L00135a:
  1422. .dc.b $20,$02,$00,$00,$00,$00,$30,$00
  1423. .dc.b $00,$00,$00,$00
  1424. L001366:
  1425. link.w a6,#$0000
  1426. movem.l d1-d3/a0,-(sp)
  1427. movem.l ($0008,a6),d0-d3
  1428. lea.l (End,pc),a0
  1429. move.l d0,($05a4,a0)
  1430. move.l d1,($05b0,a0)
  1431. move.l d2,($05a0,a0)
  1432. move.l d3,($05b4,a0)
  1433. move.l d3,($05ac,a0)
  1434. clr.l ($059c,a0)
  1435. clr.l ($05a8,a0)
  1436. movea.l ($05a0,a0),a0
  1437. clr.l (a0)
  1438. movem.l (sp)+,d1-d3/a0
  1439. unlk a6
  1440. rts
  1441. L0013a2:
  1442. link.w a6,#$0000
  1443. movem.l d1-d4/a0-a4,-(sp)
  1444. movea.l ($0008,a6),a0
  1445. lea.l (End,pc),a4
  1446. move.l ($059c,a4),d1
  1447. movea.l ($05a0,a4),a1
  1448. move.l d1,d2
  1449. lsl.l #2,d2
  1450. adda.l d2,a1
  1451. move.l ($05b0,a4),d2
  1452. move.l ($05a8,a4),d3
  1453. moveq.l #$00,d4
  1454. movea.l ($05b4,a4),a2
  1455. lea.l ($05a4,a4),a3
  1456. L0013d2:
  1457. movea.l a2,a4
  1458. tst.l (a3)
  1459. bls.s L001440
  1460. L0013d8:
  1461. move.b (a0)+,d0
  1462. beq.s L001420
  1463. cmpi.b #$20,d0 ;' '
  1464. beq.s L0013d8
  1465. L0013e2:
  1466. tst.b d4
  1467. beq.s L0013ee
  1468. cmp.b d4,d0
  1469. bne.s L001400
  1470. L0013ea:
  1471. eor.b d0,d4
  1472. bra.s L00140a
  1473. L0013ee:
  1474. cmp.b #$22,d0 ;'"'
  1475. beq.s L0013ea
  1476. cmp.b #$27,d0 ;'''
  1477. beq.s L0013ea
  1478. cmp.b #$20,d0 ;' '
  1479. beq.s L00140e
  1480. L001400:
  1481. subq.l #1,d2
  1482. beq.s L001440
  1483. addq.l #1,d3
  1484. move.b d0,(a2)+
  1485. beq.s L00140e
  1486. L00140a:
  1487. move.b (a0)+,d0
  1488. bra.s L0013e2
  1489. L00140e:
  1490. subq.l #1,d2
  1491. beq.s L001440
  1492. addq.l #1,d3
  1493. clr.b (a2)+
  1494. move.l a4,(a1)+
  1495. addq.l #1,d1
  1496. subq.l #1,(a3)
  1497. tst.b d0
  1498. bne.s L0013d2
  1499. L001420:
  1500. clr.l (a1)
  1501. lea.l (End,pc),a0
  1502. move.l d1,($059c,a0)
  1503. move.l d2,($05b0,a0)
  1504. move.l a2,($05b4,a0)
  1505. move.l d3,($05a8,a0)
  1506. move.l d1,d0
  1507. L001438:
  1508. movem.l (sp)+,d1-d4/a0-a4
  1509. unlk a6
  1510. rts
  1511. L001440:
  1512. moveq.l #$ff,d0
  1513. bra.s L001438
  1514. L001444:
  1515. movem.l a0-a1/a6,-(sp)
  1516. lea.l (End,pc),a6
  1517. movea.l ($0010,sp),a0
  1518. move.l ($059c,a6),d0
  1519. movea.l ($05a0,a6),a1
  1520. lsl.l #2,d0
  1521. adda.l d0,a1
  1522. L00145c:
  1523. move.b (a0)+,d0
  1524. beq.s L001494
  1525. cmpi.b #$1a,d0
  1526. beq.s L001494
  1527. cmpi.b #$20,d0 ;' '
  1528. bls.s L00145c
  1529. tst.l ($05a4,a6)
  1530. ble.s L0014a0
  1531. subq.l #1,a0
  1532. subq.l #1,($05a4,a6)
  1533. addq.l #1,($059c,a6)
  1534. move.l a0,(a1)+
  1535. L00147e:
  1536. move.b (a0)+,d0
  1537. cmpi.b #$20,d0 ;' '
  1538. bhi.s L00147e
  1539. clr.b (-$0001,a0)
  1540. tst.b d0
  1541. beq.s L001494
  1542. cmpi.b #$1a,d0
  1543. bne.s L00145c
  1544. L001494:
  1545. clr.l (a1)
  1546. move.l ($059c,a6),d0
  1547. L00149a:
  1548. movem.l (sp)+,a0-a1/a6
  1549. rts
  1550. L0014a0:
  1551. moveq.l #$ff,d0
  1552. bra.s L00149a
  1553. L0014a4:
  1554. movem.l d1-d2/a0,-(sp)
  1555. move.w d0,d1
  1556. beq.s L0014e0
  1557. lsr.w #8,d1
  1558. cmpi.b #$10,d1
  1559. beq.s L0014e4
  1560. add.w d1,d1
  1561. lea.l (L001546,pc),a0
  1562. move.w (a0,d1.w),d1
  1563. beq.s L0014e8
  1564. lea.l (L001846,pc),a0
  1565. move.b d0,d2
  1566. ext.w d2
  1567. add.w d2,d2
  1568. add.w d1,d2
  1569. cmp.w (a0,d2.w),d0
  1570. bne.s L0014e8
  1571. lsr.w #1,d2
  1572. moveq.l #$00,d0
  1573. move.w d2,d0
  1574. L0014d8:
  1575. movem.l (sp)+,d1-d2/a0
  1576. tst.l d0
  1577. rts
  1578. L0014e0:
  1579. moveq.l #$00,d0
  1580. bra.s L0014d8
  1581. L0014e4:
  1582. moveq.l #$01,d0
  1583. bra.s L0014d8
  1584. L0014e8:
  1585. moveq.l #$ff,d0
  1586. bra.s L0014d8
  1587. L0014ec:
  1588. movem.l d1/a1,-(sp)
  1589. move.w (a0)+,d0
  1590. move.w d0,d1
  1591. bsr.s L0014a4
  1592. bmi.s L00150e
  1593. add.w d0,d0
  1594. lea.l (L001ba8,pc),a1
  1595. move.w (a1,d0.w),d0
  1596. jsr (a1,d0.w)
  1597. moveq.l #$00,d0
  1598. L001508:
  1599. movem.l (sp)+,d1/a1
  1600. rts
  1601. L00150e:
  1602. subq.l #2,a0
  1603. moveq.l #$ff,d0
  1604. bra.s L001508
  1605. L001514:
  1606. subq.l #2,a0
  1607. rts
  1608. L001518:
  1609. andi.w #$00fe,d1
  1610. addq.w #2,d1
  1611. adda.w d1,a0
  1612. rts
  1613. L001522:
  1614. rts
  1615. L001524:
  1616. addq.l #2,a0
  1617. rts
  1618. L001528:
  1619. addq.l #4,a0
  1620. rts
  1621. L00152c:
  1622. addq.l #6,a0
  1623. rts
  1624. L001530:
  1625. addq.l #8,a0
  1626. rts
  1627. L001534:
  1628. addq.l #4,a0
  1629. bra.s L00153e
  1630. L001538:
  1631. bra.s L00153e
  1632. L00153a:
  1633. tst.b (a0)+
  1634. beq.s L001544
  1635. L00153e:
  1636. tst.b (a0)+
  1637. bne.s L00153a
  1638. addq.l #1,a0
  1639. L001544:
  1640. rts
  1641. L001546:
  1642. .dc.w $0000,$0000,$0000,$0000
  1643. .dc.w $0000,$0000,$0000,$0000
  1644. .dc.w $0000,$0000,$0000,$0000
  1645. .dc.w $0000,$0000,$0000,$0000
  1646. .dc.w $0000,$0000,$0000,$0000
  1647. .dc.w $0000,$0000,$0000,$0000
  1648. .dc.w $0000,$0000,$0000,$0000
  1649. .dc.w $0000,$0000,$0000,$0000
  1650. .dc.w $0002,$0000,$0000,$0000
  1651. .dc.w $0000,$0000,$0000,$0000
  1652. .dc.w $0000,$0000,$0000,$0000
  1653. .dc.w $0000,$0000,$0000,$0000
  1654. .dc.w $0018,$0000,$0000,$0000
  1655. .dc.w $0000,$0000,$0000,$0000
  1656. .dc.w $0000,$0000,$0000,$0000
  1657. .dc.w $0000,$0000,$0000,$0000
  1658. .dc.w $0022,$0040,$005e,$007c
  1659. .dc.w $0000,$0096,$00a8,$00c2
  1660. .dc.w $0000,$0000,$0000,$0000
  1661. .dc.w $00ca,$00cc,$0000,$0000
  1662. .dc.w $00d8,$00f6,$0114,$0132
  1663. .dc.w $0000,$014c,$015e,$0178
  1664. .dc.w $0000,$0000,$0000,$0000
  1665. .dc.w $0000,$0000,$0000,$0000
  1666. .dc.w $0000,$0000,$0000,$0000
  1667. .dc.w $0000,$0180,$0000,$0000
  1668. .dc.w $0000,$0194,$0000,$01a8
  1669. .dc.w $0000,$0000,$0000,$0000
  1670. .dc.w $0000,$0000,$0000,$0000
  1671. .dc.w $0000,$0000,$0000,$0000
  1672. .dc.w $0000,$0000,$0000,$0000
  1673. .dc.w $0000,$0000,$0000,$0000
  1674. .dc.w $01c6,$0000,$0000,$0000
  1675. .dc.w $0000,$0000,$0000,$0000
  1676. .dc.w $0000,$0000,$0000,$0000
  1677. .dc.w $0000,$0000,$0000,$0000
  1678. .dc.w $01dc,$01de,$01e0,$01e2
  1679. .dc.w $0000,$0000,$01e4,$0000
  1680. .dc.w $0000,$01e6,$0000,$0000
  1681. .dc.w $0000,$0000,$0000,$0000
  1682. .dc.w $01e6,$0000,$0000,$0000
  1683. .dc.w $0000,$0000,$0000,$0000
  1684. .dc.w $0000,$0000,$0000,$0000
  1685. .dc.w $0000,$0000,$0000,$0000
  1686. .dc.w $0228,$0000,$0230,$0000
  1687. .dc.w $0000,$0000,$0000,$0000
  1688. .dc.w $0000,$0000,$0000,$0000
  1689. .dc.w $0000,$0000,$0000,$0000
  1690. .dc.w $0244,$0000,$0000,$0000
  1691. .dc.w $0000,$0000,$0000,$0000
  1692. .dc.w $0000,$0000,$0000,$0000
  1693. .dc.w $0000,$0000,$0000,$0000
  1694. .dc.w $0260,$0000,$0000,$0000
  1695. .dc.w $0000,$0000,$0000,$0000
  1696. .dc.w $0000,$0000,$0000,$0000
  1697. .dc.w $0000,$0000,$0000,$0000
  1698. .dc.w $0262,$0000,$0000,$0000
  1699. .dc.w $0000,$0000,$0000,$0000
  1700. .dc.w $0000,$0000,$0000,$0000
  1701. .dc.w $0000,$0000,$0000,$0000
  1702. .dc.w $0000,$0000,$0000,$0000
  1703. .dc.w $0000,$0000,$0000,$0000
  1704. .dc.w $0000,$0000,$0000,$0000
  1705. .dc.w $0000,$0000,$0000,$0000
  1706. .dc.w $0000,$0000,$0000,$0000
  1707. .dc.w $0000,$0000,$0000,$0000
  1708. .dc.w $0000,$0000,$0000,$0000
  1709. .dc.w $0000,$0000,$0000,$0000
  1710. .dc.w $0000,$0000,$0000,$0000
  1711. .dc.w $0000,$0000,$0000,$0000
  1712. .dc.w $0000,$0000,$0000,$0000
  1713. .dc.w $0000,$0000,$0000,$0000
  1714. .dc.w $0000,$0000,$0000,$0000
  1715. .dc.w $0000,$0000,$0000,$0000
  1716. .dc.w $0000,$0000,$0000,$0000
  1717. .dc.w $0000,$0000,$0000,$0000
  1718. .dc.w $0000,$0000,$0000,$0000
  1719. .dc.w $0000,$0000,$0000,$0000
  1720. .dc.w $0000,$0000,$0000,$0000
  1721. .dc.w $0000,$0000,$0000,$0000
  1722. .dc.w $0000,$0000,$0000,$0000
  1723. .dc.w $0000,$0000,$0000,$0000
  1724. .dc.w $0000,$0000,$0000,$0000
  1725. .dc.w $0000,$0000,$0000,$0000
  1726. .dc.w $0000,$0000,$0000,$0000
  1727. .dc.w $0000,$0000,$0000,$0000
  1728. .dc.w $0000,$0000,$0000,$0000
  1729. .dc.w $0000,$0000,$0000,$0000
  1730. .dc.w $0000,$0000,$0000,$0000
  1731. .dc.w $0000,$0000,$0000,$0000
  1732. .dc.w $0000,$0000,$0000,$0000
  1733. .dc.w $0000,$0000,$0000,$0000
  1734. .dc.w $0000,$0000,$0000,$0000
  1735. .dc.w $0000,$0000,$0000,$0000
  1736. .dc.w $0000,$0000,$0000,$0000
  1737. .dc.w $0000,$0000,$0000,$0000
  1738. L001846:
  1739. .dc.w $0000,$0000,$2001,$2002
  1740. .dc.w $2003,$2004,$2005,$2006
  1741. .dc.w $2007,$2008,$2009,$200a
  1742. .dc.w $3000,$40fc,$40fd,$40fe
  1743. .dc.w $40ff,$4000,$4001,$4002
  1744. .dc.w $4003,$4004,$4005,$4006
  1745. .dc.w $4007,$4008,$4009,$400a
  1746. .dc.w $41fc,$41fd,$41fe,$41ff
  1747. .dc.w $4100,$4101,$4102,$4103
  1748. .dc.w $4104,$4105,$4106,$4107
  1749. .dc.w $4108,$4109,$410a,$42fc
  1750. .dc.w $42fd,$42fe,$42ff,$4200
  1751. .dc.w $4201,$4202,$4203,$4204
  1752. .dc.w $4205,$4206,$4207,$4208
  1753. .dc.w $4209,$420a,$43fc,$43fd
  1754. .dc.w $43fe,$43ff,$4300,$4301
  1755. .dc.w $4302,$4303,$4304,$4305
  1756. .dc.w $4306,$4307,$4308,$4309
  1757. .dc.w $430a,$45fe,$45ff,$0000
  1758. .dc.w $0000,$0000,$0000,$0000
  1759. .dc.w $46fc,$46fd,$46fe,$46ff
  1760. .dc.w $4600,$4601,$4602,$4603
  1761. .dc.w $4604,$4605,$4606,$4607
  1762. .dc.w $4608,$4609,$460a,$47fe
  1763. .dc.w $47ff,$0000,$0000,$0000
  1764. .dc.w $0000,$0000,$4c01,$4d01
  1765. .dc.w $50fc,$50fd,$50fe,$50ff
  1766. .dc.w $5000,$5001,$5002,$5003
  1767. .dc.w $5004,$5005,$5006,$5007
  1768. .dc.w $5008,$5009,$500a,$51fc
  1769. .dc.w $51fd,$51fe,$51ff,$5100
  1770. .dc.w $5101,$5102,$5103,$5104
  1771. .dc.w $5105,$5106,$5107,$5108
  1772. .dc.w $5109,$510a,$52fc,$52fd
  1773. .dc.w $52fe,$52ff,$5200,$5201
  1774. .dc.w $5202,$5203,$5204,$5205
  1775. .dc.w $5206,$5207,$5208,$5209
  1776. .dc.w $520a,$53fc,$53fd,$53fe
  1777. .dc.w $53ff,$5300,$5301,$5302
  1778. .dc.w $5303,$5304,$5305,$5306
  1779. .dc.w $5307,$5308,$5309,$530a
  1780. .dc.w $55fe,$55ff,$0000,$0000
  1781. .dc.w $0000,$0000,$0000,$56fc
  1782. .dc.w $56fd,$56fe,$56ff,$5600
  1783. .dc.w $5601,$5602,$5603,$5604
  1784. .dc.w $5605,$5606,$5607,$5608
  1785. .dc.w $5609,$560a,$57fe,$57ff
  1786. .dc.w $0000,$0000,$0000,$0000
  1787. .dc.w $0000,$6501,$6502,$6503
  1788. .dc.w $6504,$6505,$6506,$6507
  1789. .dc.w $6508,$6509,$650a,$6901
  1790. .dc.w $6902,$6903,$6904,$6905
  1791. .dc.w $6906,$6907,$6908,$6909
  1792. .dc.w $690a,$6b01,$6b02,$6b03
  1793. .dc.w $6b04,$6b05,$6b06,$6b07
  1794. .dc.w $6b08,$6b09,$6b0a,$80fc
  1795. .dc.w $80fd,$80fe,$80ff,$8000
  1796. .dc.w $8001,$8002,$8003,$8004
  1797. .dc.w $8005,$8006,$8007,$8008
  1798. .dc.w $8009,$800a,$9000,$9100
  1799. .dc.w $9200,$9300,$9600,$9900
  1800. .dc.w $a001,$a002,$a003,$a004
  1801. .dc.w $a005,$a006,$a007,$0000
  1802. .dc.w $a009,$a00a,$a00b,$a00c
  1803. .dc.w $a00d,$a00e,$a00f,$a010
  1804. .dc.w $a011,$a012,$a013,$a014
  1805. .dc.w $a015,$a016,$a017,$a018
  1806. .dc.w $a019,$a01a,$a01b,$a01c
  1807. .dc.w $a01d,$0000,$0000,$b0ff
  1808. .dc.w $b2fc,$b2fd,$b2fe,$b2ff
  1809. .dc.w $b200,$b201,$b202,$b203
  1810. .dc.w $b204,$b205,$b206,$b207
  1811. .dc.w $b208,$b209,$b20a,$c001
  1812. .dc.w $c002,$c003,$c004,$c005
  1813. .dc.w $c006,$c007,$c008,$c009
  1814. .dc.w $c00a,$0000,$c00c,$c00d
  1815. .dc.w $d000,$e000,$e001,$0000
  1816. .dc.w $0000,$0000,$0000,$0000
  1817. .dc.w $0000,$0000,$0000,$0000
  1818. .dc.w $0000,$e00c,$e00d,$0000
  1819. .dc.w $0000,$0000,$0000,$0000
  1820. .dc.w $0000,$0000,$0000,$0000
  1821. .dc.w $0000,$0000,$0000,$0000
  1822. .dc.w $0000,$0000,$0000,$0000
  1823. .dc.w $0000,$0000,$0000,$0000
  1824. .dc.w $0000,$0000,$0000,$0000
  1825. .dc.w $0000,$0000,$0000,$0000
  1826. .dc.w $0000,$0000,$0000,$0000
  1827. .dc.w $0000,$0000,$0000,$0000
  1828. .dc.w $0000,$0000,$0000,$0000
  1829. .dc.w $0000,$0000,$0000,$0000
  1830. .dc.w $0000,$0000,$0000,$0000
  1831. .dc.w $0000,$0000,$0000,$0000
  1832. .dc.w $0000,$0000,$0000,$0000
  1833. .dc.w $0000,$0000,$0000,$0000
  1834. .dc.w $0000,$0000,$0000,$0000
  1835. .dc.w $0000,$0000,$0000,$0000
  1836. .dc.w $0000,$0000,$0000,$0000
  1837. .dc.w $0000,$0000,$0000,$0000
  1838. .dc.w $0000,$0000,$0000,$0000
  1839. .dc.w $0000,$0000,$0000,$0000
  1840. .dc.w $0000,$0000,$0000,$0000
  1841. .dc.w $0000,$0000,$0000,$0000
  1842. .dc.w $0000,$0000,$0000,$0000
  1843. .dc.w $0000,$0000,$0000,$0000
  1844. .dc.w $0000,$0000,$0000,$0000
  1845. .dc.w $0000,$0000,$0000,$0000
  1846. .dc.w $0000,$0000,$0000,$0000
  1847. .dc.w $0000
  1848. L001ba8:
  1849. .dc.w $f96c,$f970,$f980,$f980
  1850. .dc.w $f980,$f980,$f980,$f980
  1851. .dc.w $f980,$f980,$f980,$f980
  1852. .dc.w $f980,$f97c,$f97c,$f97c
  1853. .dc.w $f97c,$f980,$f980,$f980
  1854. .dc.w $f980,$f980,$f980,$f980
  1855. .dc.w $f980,$f980,$f980,$f980
  1856. .dc.w $f97c,$f97c,$f97c,$f97c
  1857. .dc.w $f980,$f980,$f980,$f980
  1858. .dc.w $f980,$f980,$f980,$f980
  1859. .dc.w $f980,$f980,$f980,$f97c
  1860. .dc.w $f97c,$f97c,$f97c,$f980
  1861. .dc.w $f980,$f980,$f980,$f980
  1862. .dc.w $f980,$f980,$f980,$f980
  1863. .dc.w $f980,$f980,$f97c,$f97c
  1864. .dc.w $f97c,$f97c,$f980,$f980
  1865. .dc.w $f980,$f980,$f980,$f980
  1866. .dc.w $f980,$f980,$f980,$f980
  1867. .dc.w $f980,$f97c,$f97c,$f966
  1868. .dc.w $f966,$f966,$f966,$f966
  1869. .dc.w $f97c,$f97c,$f97c,$f97c
  1870. .dc.w $f980,$f980,$f980,$f980
  1871. .dc.w $f980,$f980,$f980,$f980
  1872. .dc.w $f980,$f980,$f980,$f97c
  1873. .dc.w $f97c,$f966,$f966,$f966
  1874. .dc.w $f966,$f966,$f980,$f980
  1875. .dc.w $f984,$f984,$f984,$f984
  1876. .dc.w $f988,$f988,$f988,$f988
  1877. .dc.w $f988,$f988,$f988,$f988
  1878. .dc.w $f988,$f988,$f988,$f984
  1879. .dc.w $f984,$f984,$f984,$f988
  1880. .dc.w $f988,$f988,$f988,$f988
  1881. .dc.w $f988,$f988,$f988,$f988
  1882. .dc.w $f988,$f988,$f984,$f984
  1883. .dc.w $f984,$f984,$f988,$f988
  1884. .dc.w $f988,$f988,$f988,$f988
  1885. .dc.w $f988,$f988,$f988,$f988
  1886. .dc.w $f988,$f984,$f984,$f984
  1887. .dc.w $f984,$f988,$f988,$f988
  1888. .dc.w $f988,$f988,$f988,$f988
  1889. .dc.w $f988,$f988,$f988,$f988
  1890. .dc.w $f984,$f984,$f966,$f966
  1891. .dc.w $f966,$f966,$f966,$f984
  1892. .dc.w $f984,$f984,$f984,$f988
  1893. .dc.w $f988,$f988,$f988,$f988
  1894. .dc.w $f988,$f988,$f988,$f988
  1895. .dc.w $f988,$f988,$f984,$f984
  1896. .dc.w $f966,$f966,$f966,$f966
  1897. .dc.w $f966,$f984,$f984,$f984
  1898. .dc.w $f984,$f984,$f984,$f984
  1899. .dc.w $f984,$f984,$f984,$f984
  1900. .dc.w $f984,$f984,$f984,$f984
  1901. .dc.w $f984,$f984,$f984,$f984
  1902. .dc.w $f984,$f984,$f984,$f984
  1903. .dc.w $f984,$f984,$f984,$f984
  1904. .dc.w $f984,$f984,$f984,$f97c
  1905. .dc.w $f97c,$f97c,$f97c,$f980
  1906. .dc.w $f980,$f980,$f980,$f980
  1907. .dc.w $f980,$f980,$f980,$f980
  1908. .dc.w $f980,$f980,$f97a,$f97a
  1909. .dc.w $f97a,$f97a,$f97a,$f97a
  1910. .dc.w $f97a,$f97a,$f97a,$f97a
  1911. .dc.w $f97a,$f97a,$f97a,$f966
  1912. .dc.w $f97a,$f97a,$f97a,$f97a
  1913. .dc.w $f97a,$f97a,$f97a,$f97a
  1914. .dc.w $f97a,$f97a,$f97a,$f97a
  1915. .dc.w $f97a,$f97a,$f97a,$f97a
  1916. .dc.w $f97a,$f97a,$f97a,$f97a
  1917. .dc.w $f97a,$f966,$f966,$f98c
  1918. .dc.w $f98c,$f98c,$f98c,$f98c
  1919. .dc.w $f98c,$f98c,$f98c,$f98c
  1920. .dc.w $f98c,$f98c,$f98c,$f98c
  1921. .dc.w $f98c,$f98c,$f98c,$f98c
  1922. .dc.w $f98c,$f98c,$f98c,$f98c
  1923. .dc.w $f98c,$f98c,$f98c,$f98c
  1924. .dc.w $f98c,$f966,$f98c,$f98c
  1925. .dc.w $f98c,$f984,$f990,$f966
  1926. .dc.w $f966,$f966,$f966,$f966
  1927. .dc.w $f966,$f966,$f966,$f966
  1928. .dc.w $f966,$f97a,$f97a
  1929. L001e26:
  1930. move.l a0,-(sp)
  1931. pea.l ($4000)
  1932. DOS _MALLOC
  1933. move.l d0,(sp)+
  1934. bmi.w L00054e
  1935. lea.l (End+$0005b8,pc),a0
  1936. move.l d0,(a0)
  1937. movea.l d0,a0
  1938. move.w #$0fff,d0
  1939. moveq.l #$00,d1
  1940. L001e42:
  1941. move.l d1,(a0)+
  1942. dbra.w d0,L001e42
  1943. movea.l (sp)+,a0
  1944. rts
  1945. L001e4c:
  1946. movem.l d1-d3/a0-a6,-(sp)
  1947. moveq.l #$00,d2
  1948. lea.l (End+$00007c,pc),a2
  1949. lea.l (End+$000084,pc),a3
  1950. lea.l ($0076,a1),a4
  1951. subq.l #4,(a3)
  1952. bmi.w L00054e
  1953. movea.l (a2),a5
  1954. addq.l #4,(a2)
  1955. move.l a5,($007a,a1)
  1956. move.l d2,(a5)
  1957. bra.s L001e74
  1958. L001e70:
  1959. bsr.w L00153e
  1960. L001e74:
  1961. move.w (a0),d1
  1962. beq.w L001f1e
  1963. cmpi.w #$b2ff,d1
  1964. beq.w L001f24
  1965. cmpi.w #$b0ff,d1
  1966. beq.w L001f24
  1967. cmpi.w #$b2fc,d1
  1968. bcs.s L001e98
  1969. cmpi.w #$b2fe,d1
  1970. bls.w L001f38
  1971. L001e98:
  1972. cmpi.w #$b200,d1
  1973. bcs.s L001ea6
  1974. cmpi.w #$b20a,d1
  1975. bls.w L001f46
  1976. L001ea6:
  1977. cmpi.w #$c001,d1
  1978. bcs.s L001ef6
  1979. beq.w L001fd4
  1980. cmpi.w #$c003,d1
  1981. bcs.w L001fea
  1982. beq.w L002000
  1983. cmpi.w #$c005,d1
  1984. bcs.w L002016
  1985. beq.w L00202c
  1986. cmpi.w #$c007,d1
  1987. bcs.w L002042
  1988. beq.w L002058
  1989. cmpi.w #$c009,d1
  1990. bcs.w L00206e
  1991. beq.w L002084
  1992. cmpi.w #$c00b,d1
  1993. bcs.w L00209a
  1994. beq.s L001ef6
  1995. cmpi.w #$c00d,d1
  1996. bcs.w L0020b0
  1997. beq.w L0020b8
  1998. L001ef6:
  1999. cmpi.w #$e001,d1
  2000. beq.w L0020de
  2001. cmpi.w #$e00c,d1
  2002. beq.w L0020ca
  2003. cmpi.w #$e00d,d1
  2004. beq.w L0020d4
  2005. move.w d1,d0
  2006. bsr.w L0014ec
  2007. tst.l d0
  2008. bpl.w L001e74
  2009. bra.w L0005e6
  2010. L001f1e:
  2011. movem.l (sp)+,d1-d3/a0-a6
  2012. rts
  2013. L001f24:
  2014. lea.l ($0082,a1),a6
  2015. tst.l (a6)
  2016. bne.s L001f2e
  2017. move.l a0,(a6)
  2018. L001f2e:
  2019. move.l a0,($0086,a1)
  2020. addq.l #6,a0
  2021. bra.w L001e70
  2022. L001f38:
  2023. lea.l ($0082,a1),a6
  2024. tst.l (a6)
  2025. bne.s L001f42
  2026. move.l a0,(a6)
  2027. L001f42:
  2028. move.l a0,($0086,a1)
  2029. L001f46:
  2030. cmpi.b #$2a,($0006,a0) ;'*'
  2031. beq.s L001f78
  2032. lea.l ($0096,a1),a6
  2033. move.w d1,d0
  2034. ext.w d0
  2035. st.b (a6,d0.w)
  2036. exg.l a0,a1
  2037. bsr.w L002342
  2038. exg.l a0,a1
  2039. moveq.l #$08,d3
  2040. sub.l d3,(a3)
  2041. bmi.w L00054e
  2042. add.l d3,(a2)
  2043. move.l a0,(a5)+
  2044. move.l d0,(a5)+
  2045. move.l d2,(a5)
  2046. addq.l #6,a0
  2047. bra.w L001e70
  2048. L001f78:
  2049. move.l ($0002,a0),d0
  2050. moveq.l #$01,d1
  2051. lsl.l d0,d1
  2052. move.l d1,($008e,a1)
  2053. subq.l #2,d1
  2054. cmpi.l #$00000100,d1
  2055. bhi.s L001f94
  2056. L001f8e:
  2057. addq.l #6,a0
  2058. bra.w L001e70
  2059. L001f94:
  2060. pea.l (L0025b6,pc)
  2061. DOS _PRINT
  2062. addq.l #4,sp
  2063. move.l ($008e,a1),d0
  2064. bsr.w L000ca2
  2065. bsr.w L000c82
  2066. pea.l (L00260e,pc)
  2067. DOS _PRINT
  2068. move.l ($0008,a1),-(sp)
  2069. DOS _PRINT
  2070. addq.l #8,sp
  2071. move.l ($0004,a1),d1
  2072. beq.s L001fc8
  2073. pea.l (L00260e,pc)
  2074. DOS _PRINT
  2075. move.l d1,-(sp)
  2076. DOS _PRINT
  2077. addq.l #8,sp
  2078. L001fc8:
  2079. bsr.w L000c82
  2080. move.l (L000cd4,pc),($008e,a1)
  2081. bra.s L001f8e
  2082. L001fd4:
  2083. addq.l #2,a0
  2084. move.l (a0)+,d0
  2085. addq.l #1,d0
  2086. andi.w #$fffe,d0
  2087. move.l d0,($0026,a1)
  2088. sne.b ($0097,a1)
  2089. bra.w L001e70
  2090. L001fea:
  2091. addq.l #2,a0
  2092. move.l (a0)+,d0
  2093. addq.l #1,d0
  2094. andi.w #$fffe,d0
  2095. move.l d0,($002a,a1)
  2096. sne.b ($0098,a1)
  2097. bra.w L001e70
  2098. L002000:
  2099. addq.l #2,a0
  2100. move.l (a0)+,d0
  2101. addq.l #1,d0
  2102. andi.w #$fffe,d0
  2103. move.l d0,($002e,a1)
  2104. sne.b ($0099,a1)
  2105. bra.w L001e70
  2106. L002016:
  2107. addq.l #2,a0
  2108. move.l (a0)+,d0
  2109. addq.l #1,d0
  2110. andi.w #$fffe,d0
  2111. move.l d0,($0032,a1)
  2112. sne.b ($009a,a1)
  2113. bra.w L001e70
  2114. L00202c:
  2115. addq.l #2,a0
  2116. move.l (a0)+,d0
  2117. addq.l #1,d0
  2118. andi.w #$fffe,d0
  2119. move.l d0,($0036,a1)
  2120. sne.b ($009b,a1)
  2121. bra.w L001e70
  2122. L002042:
  2123. addq.l #2,a0
  2124. move.l (a0)+,d0
  2125. addq.l #1,d0
  2126. andi.w #$fffe,d0
  2127. move.l d0,($003a,a1)
  2128. sne.b ($009c,a1)
  2129. bra.w L001e70
  2130. L002058:
  2131. addq.l #2,a0
  2132. move.l (a0)+,d0
  2133. addq.l #1,d0
  2134. andi.w #$fffe,d0
  2135. move.l d0,($003e,a1)
  2136. sne.b ($009d,a1)
  2137. bra.w L001e70
  2138. L00206e:
  2139. addq.l #2,a0
  2140. move.l (a0)+,d0
  2141. addq.l #1,d0
  2142. andi.w #$fffe,d0
  2143. move.l d0,($0042,a1)
  2144. sne.b ($009e,a1)
  2145. bra.w L001e70
  2146. L002084:
  2147. addq.l #2,a0
  2148. move.l (a0)+,d0
  2149. addq.l #1,d0
  2150. andi.w #$fffe,d0
  2151. move.l d0,($0046,a1)
  2152. sne.b ($009f,a1)
  2153. bra.w L001e70
  2154. L00209a:
  2155. addq.l #2,a0
  2156. move.l (a0)+,d0
  2157. addq.l #1,d0
  2158. andi.w #$fffe,d0
  2159. move.l d0,($004a,a1)
  2160. sne.b ($00a0,a1)
  2161. bra.w L001e70
  2162. L0020b0:
  2163. move.l a1,-(sp)
  2164. lea.l (End+$000040,pc),a1
  2165. bra.s L0020be
  2166. L0020b8:
  2167. move.l a1,-(sp)
  2168. lea.l (End+$000044,pc),a1
  2169. L0020be:
  2170. addq.l #2,a0
  2171. move.l (a0)+,d0
  2172. add.l d0,(a1)
  2173. movea.l (sp)+,a1
  2174. bra.w L001e70
  2175. L0020ca:
  2176. addq.l #2,a0
  2177. st.b ($00a2,a1)
  2178. bra.w L001e74
  2179. L0020d4:
  2180. addq.l #2,a0
  2181. st.b ($00a3,a1)
  2182. bra.w L001e74
  2183. L0020de:
  2184. lea.l (End+$000080,pc),a2
  2185. moveq.l #$08,d3
  2186. sub.l d3,(a3)
  2187. bmi.w L00054e
  2188. sub.l d3,(a2)
  2189. move.l (a2),d0
  2190. move.l d0,(a4)
  2191. lea.l (End+$00007c,pc),a2
  2192. movea.l d0,a4
  2193. move.l a0,(a4)
  2194. addq.w #4,a4
  2195. move.l d2,(a4)
  2196. addq.l #2,a0
  2197. bra.w L001e70
  2198. L002102:
  2199. movem.l d1-d3/a0-a4,-(sp)
  2200. moveq.l #$00,d2
  2201. moveq.l #$04,d3
  2202. movea.l a0,a1
  2203. lea.l (End+$00007c,pc),a2
  2204. lea.l (End+$000084,pc),a3
  2205. sub.l d3,(a3)
  2206. bmi.w L00054e
  2207. movea.l (a2),a4
  2208. add.l d3,(a2)
  2209. move.l a4,($007e,a1)
  2210. move.l d2,(a4)
  2211. moveq.l #$08,d3
  2212. move.l ($0082,a1),d0
  2213. beq.s L002162
  2214. movea.l d0,a0
  2215. L00212e:
  2216. cmpa.l ($0086,a1),a0
  2217. bhi.s L002162
  2218. move.w (a0),d1
  2219. cmpi.w #$b2fc,d1
  2220. beq.s L002168
  2221. cmpi.w #$b2fd,d1
  2222. beq.s L002168
  2223. cmpi.w #$b2fe,d1
  2224. beq.s L002168
  2225. cmpi.w #$b2ff,d1
  2226. beq.s L002168
  2227. cmpi.w #$b0ff,d1
  2228. beq.s L002168
  2229. move.w d1,d0
  2230. bsr.w L0014ec
  2231. tst.l d0
  2232. bpl.s L00212e
  2233. bra.w L0005e6
  2234. L002162:
  2235. movem.l (sp)+,d1-d3/a0-a4
  2236. rts
  2237. L002168:
  2238. sub.l d3,(a3)
  2239. bmi.w L00054e
  2240. add.l d3,(a2)
  2241. move.l a0,(a4)+
  2242. move.l d2,(a4)+
  2243. move.l d2,(a4)
  2244. addq.l #6,a0
  2245. bsr.w L00153e
  2246. bra.s L00212e
  2247. L00217e:
  2248. movem.l d1-d2/a0-a5,-(sp)
  2249. lea.l (End,pc),a4
  2250. movea.l ($007a,a0),a1
  2251. L00218a:
  2252. move.l (a1)+,d0
  2253. beq.w L00233c
  2254. movea.l d0,a2
  2255. movea.l (a1)+,a3
  2256. move.l ($0014,a3),d0
  2257. bne.w L002306
  2258. move.w ($000a,a3),d0
  2259. cmpa.l (a3),a0
  2260. bne.s L0021e0
  2261. cmpi.w #$00fe,d0
  2262. bne.s L0021b8
  2263. move.l ($0010,a3),d0
  2264. add.l d0,($0010,a4)
  2265. st.b ($0008,a3)
  2266. bra.s L00218a
  2267. L0021b8:
  2268. cmpi.w #$00fd,d0
  2269. bne.s L0021cc
  2270. move.l ($0010,a3),d0
  2271. add.l d0,($0020,a4)
  2272. st.b ($0008,a3)
  2273. bra.s L00218a
  2274. L0021cc:
  2275. cmpi.w #$00fc,d0
  2276. bne.s L00218a
  2277. move.l ($0010,a3),d0
  2278. add.l d0,($0030,a4)
  2279. st.b ($0008,a3)
  2280. bra.s L00218a
  2281. L0021e0:
  2282. cmpi.w #$00fe,d0
  2283. bne.s L00222a
  2284. cmp.b ($0001,a2),d0
  2285. bne.s L002204
  2286. move.l ($0002,a2),d0
  2287. move.l ($0010,a3),d1
  2288. cmp.l d1,d0
  2289. bls.s L00218a
  2290. move.l d0,($0010,a3)
  2291. sub.l d1,d0
  2292. add.l d0,($0010,a4)
  2293. bra.s L00218a
  2294. L002204:
  2295. move.w (a2),d0
  2296. cmpi.b #$fd,d0
  2297. beq.w L002306
  2298. cmpi.b #$fc,d0
  2299. beq.w L002306
  2300. tst.w ($0008,a3)
  2301. beq.w L0022b8
  2302. move.l ($0010,a3),d0
  2303. sub.l d0,($0010,a4)
  2304. bra.w L0022b8
  2305. L00222a:
  2306. cmpi.w #$00fd,d0
  2307. bne.s L002274
  2308. cmp.b ($0001,a2),d0
  2309. bne.s L002252
  2310. move.l ($0002,a2),d0
  2311. move.l ($0010,a3),d1
  2312. cmp.l d1,d0
  2313. bls.w L00218a
  2314. move.l d0,($0010,a3)
  2315. sub.l d1,d0
  2316. add.l d0,($0020,a4)
  2317. bra.w L00218a
  2318. L002252:
  2319. move.w (a2),d0
  2320. cmpi.b #$fe,d0
  2321. beq.w L002306
  2322. cmpi.b #$fc,d0
  2323. beq.w L002306
  2324. tst.w ($0008,a3)
  2325. beq.s L0022b8
  2326. move.l ($0010,a3),d0
  2327. sub.l d0,($0020,a4)
  2328. bra.s L0022b8
  2329. L002274:
  2330. cmpi.w #$00fd,d0
  2331. bne.s L0022dc
  2332. cmp.b ($0001,a2),d0
  2333. bne.s L00229c
  2334. move.l ($0002,a2),d0
  2335. move.l ($0010,a3),d1
  2336. cmp.l d1,d0
  2337. bls.w L00218a
  2338. move.l d0,($0010,a3)
  2339. sub.l d1,d0
  2340. add.l d0,($0030,a4)
  2341. bra.w L00218a
  2342. L00229c:
  2343. move.w (a2),d0
  2344. cmpi.b #$fd,d0
  2345. beq.s L002306
  2346. cmpi.b #$fc,d0
  2347. beq.s L002306
  2348. tst.w ($0008,a3)
  2349. beq.s L0022b8
  2350. move.l ($0010,a3),d0
  2351. sub.l d0,($0030,a4)
  2352. L0022b8:
  2353. moveq.l #$00,d0
  2354. move.w d0,d1
  2355. move.b ($0001,a2),d1
  2356. move.l ($0002,a2),d2
  2357. move.l a0,(a3)
  2358. move.w d1,($000a,a3)
  2359. move.l d2,($000c,a3)
  2360. move.l d0,($0010,a3)
  2361. L0022d2:
  2362. move.w #$0001,($0008,a3)
  2363. bra.w L00218a
  2364. L0022dc:
  2365. tst.w d0
  2366. bne.s L0022f2
  2367. tst.b ($0001,a2)
  2368. bne.s L0022f2
  2369. move.l ($000c,a3),d0
  2370. cmp.l ($0002,a2),d0
  2371. beq.w L00218a
  2372. L0022f2:
  2373. move.w (a2),d0
  2374. cmpi.b #$fe,d0
  2375. beq.s L0022d2
  2376. cmpi.b #$fd,d0
  2377. beq.s L0022d2
  2378. cmpi.b #$fc,d0
  2379. beq.s L0022d2
  2380. L002306:
  2381. movem.l a0-a1,-(sp)
  2382. lea.l (End+$00007c,pc),a0
  2383. lea.l (End+$000084,pc),a1
  2384. moveq.l #$08,d0
  2385. sub.l d0,(a1)
  2386. bmi.w L00054e
  2387. movea.l (a0),a5
  2388. add.l d0,(a0)
  2389. lea.l ($0014,a3),a0
  2390. L002322:
  2391. move.l (a0),d0
  2392. beq.s L00232c
  2393. movea.l d0,a0
  2394. addq.w #4,a0
  2395. bra.s L002322
  2396. L00232c:
  2397. move.l a5,(a0)
  2398. movem.l (sp)+,a0-a1
  2399. move.l a0,(a5)
  2400. clr.l ($0004,a5)
  2401. bra.w L00218a
  2402. L00233c:
  2403. movem.l (sp)+,d1-d2/a0-a5
  2404. rts
  2405. L002342:
  2406. movem.l d1-d2/a0-a5,-(sp)
  2407. moveq.l #$00,d0
  2408. lea.l ($0006,a1),a2
  2409. lea.l (L00262c,pc),a3
  2410. L002350:
  2411. moveq.l #$00,d1
  2412. move.b (a2)+,d1
  2413. beq.s L002360
  2414. rol.w #3,d0
  2415. add.w d1,d1
  2416. add.w (a3,d1.w),d0
  2417. bra.s L002350
  2418. L002360:
  2419. andi.w #$0fff,d0
  2420. asl.l #2,d0
  2421. movea.l (End+$0005b8,pc),a2
  2422. adda.l d0,a2
  2423. L00236c:
  2424. move.l (a2),d0
  2425. beq.s L00238e
  2426. exg.l d0,a2
  2427. lea.l ($0006,a1),a3
  2428. movea.l ($0004,a2),a4
  2429. L00237a:
  2430. move.b (a3)+,d1
  2431. beq.s L002384
  2432. cmp.b (a4)+,d1
  2433. beq.s L00237a
  2434. bra.s L002388
  2435. L002384:
  2436. tst.b (a4)
  2437. beq.s L0023e6
  2438. L002388:
  2439. lea.l ($0018,a2),a2
  2440. bra.s L00236c
  2441. L00238e:
  2442. moveq.l #$1c,d0
  2443. lea.l (End+$000080,pc),a4
  2444. lea.l (End+$000084,pc),a5
  2445. sub.l d0,(a5)
  2446. bmi.w L00054e
  2447. sub.l d0,(a4)
  2448. movea.l (a4),a3
  2449. move.l a3,(a2)
  2450. L0023a4:
  2451. moveq.l #$00,d0
  2452. move.w d0,d1
  2453. move.b ($0001,a1),d1
  2454. move.l ($0002,a1),d2
  2455. lea.l ($0006,a1),a4
  2456. move.l a0,(a3)+
  2457. move.l a4,(a3)+
  2458. move.w d0,(a3)+
  2459. move.w d1,(a3)+
  2460. cmpi.w #$00fe,d1
  2461. beq.s L0023d4
  2462. cmpi.w #$00fd,d1
  2463. beq.s L0023d4
  2464. cmpi.w #$00fc,d1
  2465. beq.s L0023d4
  2466. move.l d2,(a3)+
  2467. move.l d0,(a3)+
  2468. bra.s L0023de
  2469. L0023d4:
  2470. addq.l #1,d2
  2471. andi.w #$fffe,d2
  2472. move.l d0,(a3)+
  2473. move.l d2,(a3)+
  2474. L0023de:
  2475. move.l d0,(a3)+
  2476. move.l d0,(a3)+
  2477. move.l (a2),d0
  2478. bra.s L0023fc
  2479. L0023e6:
  2480. movea.l (a2),a4
  2481. tst.l ($0004,a0)
  2482. bne.s L0023fa
  2483. tst.l ($0004,a4)
  2484. beq.s L0023fa
  2485. movea.l d0,a2
  2486. movea.l (a2),a3
  2487. bra.s L0023a4
  2488. L0023fa:
  2489. exg.l d0,a2
  2490. L0023fc:
  2491. movem.l (sp)+,d1-d2/a0-a5
  2492. rts
  2493. L002402:
  2494. movem.l d1-d2/a0-a3,-(sp)
  2495. moveq.l #$00,d0
  2496. movea.l a0,a1
  2497. lea.l (L00262c,pc),a2
  2498. L00240e:
  2499. moveq.l #$00,d1
  2500. move.b (a1)+,d1
  2501. beq.s L00241e
  2502. add.w d1,d1
  2503. rol.w #3,d0
  2504. add.w (a2,d1.w),d0
  2505. bra.s L00240e
  2506. L00241e:
  2507. andi.w #$0fff,d0
  2508. asl.l #2,d0
  2509. movea.l (End+$0005b8,pc),a1
  2510. adda.l d0,a1
  2511. L00242a:
  2512. move.l (a1),d0
  2513. beq.s L00244a
  2514. movea.l d0,a1
  2515. movea.l a0,a2
  2516. movea.l ($0004,a1),a3
  2517. L002436:
  2518. move.b (a2)+,d1
  2519. beq.s L002440
  2520. cmp.b (a3)+,d1
  2521. beq.s L002436
  2522. bra.s L002444
  2523. L002440:
  2524. tst.b (a3)
  2525. beq.s L00244a
  2526. L002444:
  2527. lea.l ($0018,a1),a1
  2528. bra.s L00242a
  2529. L00244a:
  2530. movem.l (sp)+,d1-d2/a0-a3
  2531. rts
  2532. L002450:
  2533. movem.l d1/a0-a4,-(sp)
  2534. movea.l ($007a,a0),a1
  2535. L002458:
  2536. move.l (a1)+,d0
  2537. beq.w L002560
  2538. movea.l (a1)+,a2
  2539. cmpa.l (a2),a0
  2540. bne.s L002458
  2541. tst.l ($0014,a2)
  2542. bne.w L002516
  2543. tst.w ($0008,a2)
  2544. ble.s L00248a
  2545. move.b (End+$0005d2,pc),d0
  2546. bne.s L00248a
  2547. pea.l (L0025d5,pc)
  2548. DOS _PRINT
  2549. move.l ($0004,a2),-(sp)
  2550. DOS _PRINT
  2551. addq.l #8,sp
  2552. bsr.w L000c82
  2553. L00248a:
  2554. move.l ($000c,a2),d1
  2555. move.w ($000a,a2),d0
  2556. addq.b #4,d0
  2557. cmpi.w #$000e,d0
  2558. bhi.s L0024b2
  2559. move.b (L0024a2,pc,d0.w),d0
  2560. jmp (L0024a2,pc,d0.w)
  2561. L0024a2:
  2562. .dc.b $60,$5a,$54,$10,$6c,$18,$1e,$24
  2563. .dc.b $2a,$30,$36,$3c,$42,$48,$4e,$00
  2564. L0024b2:
  2565. lea.l (L002450,pc),a0
  2566. bra.w L0005aa
  2567. L0024ba:
  2568. add.l ($004e,a0),d1
  2569. bra.s L00250e
  2570. L0024c0:
  2571. add.l ($0052,a0),d1
  2572. bra.s L00250e
  2573. L0024c6:
  2574. add.l ($0056,a0),d1
  2575. bra.s L00250e
  2576. L0024cc:
  2577. add.l ($005a,a0),d1
  2578. bra.s L00250e
  2579. L0024d2:
  2580. add.l ($005e,a0),d1
  2581. bra.s L00250e
  2582. L0024d8:
  2583. add.l ($0062,a0),d1
  2584. bra.s L00250e
  2585. L0024de:
  2586. add.l ($0066,a0),d1
  2587. bra.s L00250e
  2588. L0024e4:
  2589. add.l ($006a,a0),d1
  2590. bra.s L00250e
  2591. L0024ea:
  2592. add.l ($006e,a0),d1
  2593. bra.s L00250e
  2594. L0024f0:
  2595. add.l ($0072,a0),d1
  2596. bra.s L00250e
  2597. L0024f6:
  2598. lea.l (End+$000058,pc),a4
  2599. bra.s L002506
  2600. L0024fc:
  2601. lea.l (End+$00005c,pc),a4
  2602. bra.s L002506
  2603. L002502:
  2604. lea.l (End+$000060,pc),a4
  2605. L002506:
  2606. add.l (a4),d1
  2607. move.l ($0010,a2),d0
  2608. add.l d0,(a4)
  2609. L00250e:
  2610. move.l d1,($000c,a2)
  2611. bra.w L002458
  2612. L002516:
  2613. pea.l (L0025f6,pc)
  2614. DOS _PRINT
  2615. move.l ($0004,a2),-(sp)
  2616. DOS _PRINT
  2617. addq.l #8,sp
  2618. bsr.w L000c82
  2619. pea.l (L00260e,pc)
  2620. DOS _PRINT
  2621. move.l ($0008,a0),-(sp)
  2622. DOS _PRINT
  2623. addq.l #8,sp
  2624. move.l ($0014,a2),d1
  2625. L00253a:
  2626. movea.l d1,a3
  2627. movea.l (a3),a4
  2628. bsr.w L000c78
  2629. move.l ($0008,a4),-(sp)
  2630. DOS _PRINT
  2631. addq.l #4,sp
  2632. move.l ($0004,a3),d1
  2633. bne.s L00253a
  2634. lea.l (End+$0005cc,pc),a4
  2635. move.w #$0001,(a4)
  2636. bsr.w L000c82
  2637. bra.w L002458
  2638. L002560:
  2639. movem.l (sp)+,d1/a0-a4
  2640. rts
  2641. L002566:
  2642. movem.l d1-d3/a0-a1,-(sp)
  2643. moveq.l #$00,d3
  2644. movea.l ($007e,a0),a1
  2645. L002570:
  2646. move.l (a1)+,d1
  2647. beq.s L0025a8
  2648. move.l (a1)+,d2
  2649. bne.s L002570
  2650. tas.b d3
  2651. bne.s L00259a
  2652. pea.l (L002613,pc)
  2653. DOS _PRINT
  2654. move.l ($0008,a0),-(sp)
  2655. DOS _PRINT
  2656. addq.l #8,sp
  2657. bsr.w L000c82
  2658. move.l a0,-(sp)
  2659. lea.l (End+$0005cc,pc),a0
  2660. move.w #$0001,(a0)
  2661. movea.l (sp)+,a0
  2662. L00259a:
  2663. addq.l #6,d1
  2664. move.l d1,-(sp)
  2665. DOS _PRINT
  2666. addq.l #4,sp
  2667. bsr.w L000c82
  2668. bra.s L002570
  2669. L0025a8:
  2670. tst.b d3
  2671. beq.s L0025b0
  2672. bsr.w L000c82
  2673. L0025b0:
  2674. movem.l (sp)+,d1-d3/a0-a1
  2675. rts
  2676. L0025b6:
  2677. .dc.b 'Warning, illegal align size : ',$00
  2678. L0025d5:
  2679. .dc.b 'Warning, duplicate definition : ',$00
  2680. L0025f6:
  2681. .dc.b 'Duplicate definition : ',$00
  2682. L00260e:
  2683. .dc.b ' in ',$00
  2684. L002613:
  2685. .dc.b 'Undefined symbol(s) in ',$00,$00
  2686. L00262c:
  2687. .dc.w $a75b,$ae8e,$66c2,$f127
  2688. .dc.w $36f8,$75cb,$d6dc,$9882
  2689. .dc.w $ae45,$c35f,$e3c2,$b38f
  2690. .dc.w $e65a,$a9a0,$2f4c,$99cf
  2691. .dc.w $2dd6,$a241,$d0e0,$0a4a
  2692. .dc.w $64ca,$b89f,$5541,$4e8f
  2693. .dc.w $e0d5,$7b6d,$dad5,$33a6
  2694. .dc.w $7b0f,$ef08,$fc74,$fc10
  2695. .dc.w $8909,$9b23,$d16f,$6dd5
  2696. .dc.w $e3db,$841b,$eda5,$d284
  2697. .dc.w $e824,$38a3,$6f67,$f725
  2698. .dc.w $67f5,$c411,$e394,$1e39
  2699. .dc.w $bfed,$a02d,$6f7d,$14c8
  2700. .dc.w $c224,$df38,$9ffa,$1d61
  2701. .dc.w $cb24,$0201,$9371,$050c
  2702. .dc.w $ad1a,$1ac9,$e4a5,$0e4a
  2703. .dc.w $cb90,$aa5f,$a3fc,$0623
  2704. .dc.w $f19e,$bc04,$6c4e,$2f26
  2705. .dc.w $82e3,$d087,$54ec,$5654
  2706. .dc.w $5170,$fa29,$f8b5,$c53c
  2707. .dc.w $b2e4,$b9b9,$6efa,$3ae6
  2708. .dc.w $8057,$2178,$4b9a,$07d3
  2709. .dc.w $0f5a,$ab35,$ace6,$f20b
  2710. .dc.w $4705,$6231,$26bd,$431d
  2711. .dc.w $6ef7,$d53b,$d070,$ba11
  2712. .dc.w $6041,$0894,$44d7,$ae68
  2713. .dc.w $7782,$8b0b,$9b51,$d82a
  2714. .dc.w $94d2,$52e1,$67b6,$87e6
  2715. .dc.w $ffc2,$fce5,$c857,$83a4
  2716. .dc.w $986a,$7f58,$5813,$14e5
  2717. .dc.w $bb69,$7009,$203b,$01b1
  2718. .dc.w $3ad0,$cc39,$c9ae,$9397
  2719. .dc.w $6c3e,$22b7,$5dbd,$9798
  2720. .dc.w $2fcb,$7ec4,$7e47,$4943
  2721. .dc.w $d408,$6128,$429d,$75a0
  2722. .dc.w $390d,$ce39,$3e97,$6d30
  2723. .dc.w $ad79,$5baa,$899b,$eefb
  2724. .dc.w $185d,$ffd8,$be6c,$4490
  2725. .dc.w $c158,$5776,$fb70,$33f7
  2726. .dc.w $8f82,$58e1,$cd7f,$06b1
  2727. .dc.w $ca6c,$92cc,$4bea,$89c6
  2728. .dc.w $592e,$1094,$1890,$06c5
  2729. .dc.w $8a67,$52ec,$4ac2,$35b6
  2730. .dc.w $3e28,$6c2a,$6f5f,$6e1a
  2731. .dc.w $c310,$d616,$abb8,$75f9
  2732. .dc.w $f237,$a2f1,$8ca5,$8fe2
  2733. .dc.w $2f27,$5a8a,$308c,$81dd
  2734. .dc.w $450d,$0122,$2b30,$9c6b
  2735. .dc.w $9073,$2588,$9af7,$a594
  2736. .dc.w $e371,$c4fd,$13b9,$dfe7
  2737. .dc.w $a8a6,$6e50,$acc7,$1865
  2738. .dc.w $a423,$25c2,$0100,$919d
  2739. .dc.w $3287,$7322,$27b5,$1f97
  2740. .dc.w $33ea,$68b1,$b4c5,$f6d4
  2741. .dc.w $f6dd,$803e,$c681,$f25c
  2742. .dc.w $5478,$cc0a,$f0c8,$54be
  2743. .dc.w $b05a,$d3e4,$4aeb,$dd02
  2744. .dc.w $d594,$950d,$6fc2,$dba9
  2745. .dc.w $20c5,$9e54,$76ac,$16bb
  2746. .dc.w $6405,$fafa,$f381,$d7c7
  2747. .dc.w $02e5,$32ce,$0492,$e4d5
  2748. .dc.w $cf7d,$4a11,$3dbe,$8766
  2749. .dc.w $1f6c,$c892,$bd56,$8582
  2750. .dc.w $cbc3,$b992,$1039,$28b8
  2751. L00282c:
  2752. movem.l d1-d4/d7/a1-a4,-(sp)
  2753. bra.s L002840
  2754. L002832:
  2755. movem.l d1-d4/d7/a1-a4,-(sp)
  2756. bsr.w L00657c
  2757. tst.l d0
  2758. bne.w L0028d0
  2759. L002840:
  2760. cmpi.w #$d100,(a2)
  2761. beq.s L002862
  2762. cmpi.w #$0068,(a2) ;'h'
  2763. beq.s L00288e
  2764. moveq.l #$00,d1
  2765. moveq.l #$00,d2
  2766. moveq.l #$00,d3
  2767. bsr.w L0028da
  2768. movea.l a2,a0
  2769. movea.l d0,a1
  2770. bsr.w L001e4c
  2771. movea.l a1,a0
  2772. bra.s L0028c8
  2773. L002862:
  2774. move.l a0,d1
  2775. moveq.l #$00,d2
  2776. moveq.l #$00,d3
  2777. lea.l ($0006,a2),a4
  2778. L00286c:
  2779. tst.w (a4)
  2780. beq.s L0028c6
  2781. move.l a1,-(sp)
  2782. move.l ($0018,a4),d7
  2783. movea.l a4,a0
  2784. lea.l ($0020,a4),a2
  2785. bsr.s L0028da
  2786. movea.l a2,a0
  2787. movea.l d0,a1
  2788. bsr.w L001e4c
  2789. movea.l (sp)+,a1
  2790. lea.l ($20,a4,d7.l),a4
  2791. bra.s L00286c
  2792. L00288e:
  2793. move.l a0,d1
  2794. moveq.l #$00,d2
  2795. moveq.l #$00,d3
  2796. movea.l a2,a3
  2797. lea.l ($0040,a3),a4
  2798. move.l ($0024,a3),d4
  2799. beq.s L0028c6
  2800. L0028a0:
  2801. move.l a1,-(sp)
  2802. move.l ($0020,a4),d7
  2803. movea.l a4,a0
  2804. movea.l ($001c,a4),a2
  2805. adda.l a3,a2
  2806. bsr.s L0028da
  2807. movea.l a2,a0
  2808. movea.l d0,a1
  2809. bsr.w L001e4c
  2810. movea.l (sp)+,a1
  2811. lea.l ($0030,a4),a4
  2812. sub.l #$00000030,d4
  2813. bne.s L0028a0
  2814. L0028c6:
  2815. suba.l a0,a0
  2816. L0028c8:
  2817. moveq.l #$00,d0
  2818. L0028ca:
  2819. movem.l (sp)+,d1-d4/d7/a1-a4
  2820. rts
  2821. L0028d0:
  2822. bpl.s L0028ca
  2823. move.w #$0001,($05cc,a6)
  2824. bra.s L0028ca
  2825. L0028da:
  2826. movem.l d1-d5/a0-a6,-(sp)
  2827. moveq.l #$00,d4
  2828. move.l #$000000a4,d5
  2829. lea.l (End+$00007c,pc),a3
  2830. lea.l (End+$000084,pc),a4
  2831. sub.l d5,(a4)
  2832. bmi.w L00054e
  2833. movea.l (a3),a5
  2834. add.l d5,(a3)
  2835. lea.l (End+$000068,pc),a3
  2836. movea.l (a3),a6
  2837. move.l a5,(a6)
  2838. lea.l ($008a,a5),a6
  2839. move.l a6,(a3)
  2840. move.l d4,(a6)
  2841. move.l a1,(a5)
  2842. move.l d1,($0004,a5)
  2843. move.l a0,($0008,a5)
  2844. move.l d7,($000c,a5)
  2845. move.l d4,($0014,a5)
  2846. move.l d4,($0018,a5)
  2847. move.l d2,($001c,a5)
  2848. move.l d3,($0020,a5)
  2849. move.l a2,($0010,a5)
  2850. move.w d4,($0024,a5)
  2851. move.l d4,($0026,a5)
  2852. move.l d4,($002a,a5)
  2853. move.l d4,($002e,a5)
  2854. move.l d4,($0032,a5)
  2855. move.l d4,($0036,a5)
  2856. move.l d4,($003a,a5)
  2857. move.l d4,($003e,a5)
  2858. move.l d4,($0042,a5)
  2859. move.l d4,($0046,a5)
  2860. move.l d4,($004a,a5)
  2861. move.l d4,($0076,a5)
  2862. move.l d4,($007a,a5)
  2863. move.l d4,($007e,a5)
  2864. move.l d4,($0082,a5)
  2865. move.l d4,($0086,a5)
  2866. move.l (L000cd4,pc),($008e,a5)
  2867. move.l d4,($0092,a5)
  2868. move.l d4,($0096,a5)
  2869. move.l d4,($009a,a5)
  2870. move.l d4,($009e,a5)
  2871. move.w d4,($00a2,a5)
  2872. move.l a5,d0
  2873. movem.l (sp)+,d1-d5/a0-a6
  2874. rts
  2875. L00298c:
  2876. movem.l d1-d2/a1-a3/a6,-(sp)
  2877. lea.l (End,pc),a6
  2878. tst.b ($05d1,a6)
  2879. beq.s L0029b2
  2880. pea.l (L002ab4,pc)
  2881. DOS _PRINT
  2882. pea.l ($000f)
  2883. pea.l (a0)
  2884. bsr.w L002a66
  2885. bsr.w L000c82
  2886. lea.l ($000c,sp),sp
  2887. L0029b2:
  2888. moveq.l #$08,d1
  2889. sub.l d1,($0084,a6)
  2890. bmi.w L00054e
  2891. movea.l ($007c,a6),a3
  2892. add.l d1,($007c,a6)
  2893. move.w #$ffff,($0024,a0)
  2894. move.w ($00a2,a0),d0
  2895. or.w d0,($05ce,a6)
  2896. movea.l ($0070,a6),a2
  2897. move.l a3,(a2)
  2898. move.l a0,(a3)
  2899. addq.w #4,a3
  2900. clr.l (a3)
  2901. move.l a3,($0070,a6)
  2902. movem.l (sp)+,d1-d2/a1-a3/a6
  2903. rts
  2904. L0029e8:
  2905. movem.l a0-a1,-(sp)
  2906. move.l ($0076,a0),d0
  2907. beq.s L002a0c
  2908. L0029f2:
  2909. movea.l d0,a1
  2910. movea.l (a1),a0
  2911. addq.l #2,a0
  2912. bsr.w L002832
  2913. tst.l d0
  2914. bne.s L002a06
  2915. move.l a0,d0
  2916. beq.s L002a06
  2917. bsr.s L00298c
  2918. L002a06:
  2919. move.l ($0004,a1),d0
  2920. bne.s L0029f2
  2921. L002a0c:
  2922. movem.l (sp)+,a0-a1
  2923. rts
  2924. L002a12:
  2925. movem.l a0-a1,-(sp)
  2926. bsr.w L002102
  2927. movea.l ($007e,a0),a1
  2928. move.l (a1)+,d0
  2929. beq.s L002a60
  2930. L002a22:
  2931. movea.l d0,a0
  2932. addq.l #6,a0
  2933. bsr.w L002402
  2934. move.l d0,(a1)+
  2935. beq.s L002a5c
  2936. movea.l d0,a0
  2937. movea.l (a0),a0
  2938. tst.w ($0024,a0)
  2939. bne.s L002a5c
  2940. bsr.w L00298c
  2941. tst.l ($0004,a0)
  2942. beq.s L002a5c
  2943. tst.l ($0076,a0)
  2944. beq.s L002a5c
  2945. pea.l (L002abe,pc)
  2946. DOS _PRINT
  2947. clr.l -(sp)
  2948. pea.l (a0)
  2949. bsr.s L002a66
  2950. bsr.w L000c82
  2951. lea.l ($000c,sp),sp
  2952. L002a5c:
  2953. move.l (a1)+,d0
  2954. bne.s L002a22
  2955. L002a60:
  2956. movem.l (sp)+,a0-a1
  2957. rts
  2958. L002a66:
  2959. link.w a6,#$0000
  2960. movem.l d1-d2/a0-a1,-(sp)
  2961. movea.l ($0008,a6),a0
  2962. move.l ($000c,a6),d1
  2963. movea.l ($0008,a0),a1
  2964. move.l ($0004,a0),d2
  2965. pea.l (a1)
  2966. DOS _PRINT
  2967. move.l d2,(sp)+
  2968. beq.s L002aac
  2969. addq.w #1,d1
  2970. L002a88:
  2971. subq.w #1,d1
  2972. tst.b (a1)+
  2973. bne.s L002a88
  2974. L002a8e:
  2975. move.w #$0009,-(sp)
  2976. DOS _PUTCHAR
  2977. addq.l #2,sp
  2978. subq.w #8,d1
  2979. bgt.s L002a8e
  2980. move.w #$0028,-(sp) ;'('
  2981. DOS _PUTCHAR
  2982. move.l d2,-(sp)
  2983. DOS _PRINT
  2984. move.w #$0029,-(sp) ;')'
  2985. DOS _PUTCHAR
  2986. addq.l #8,sp
  2987. L002aac:
  2988. movem.l (sp)+,d1-d2/a0-a1
  2989. unlk a6
  2990. rts
  2991. L002ab4:
  2992. .dc.b 'Linked : ',$00
  2993. L002abe:
  2994. .dc.b 'Request error : ',$00,$00
  2995. L002ad0:
  2996. link.w a6,#-$005e
  2997. movem.l d1-d7/a0-a5,-(sp)
  2998. lea.l (End,pc),a0
  2999. tst.b ($05d1,a0)
  3000. beq.s L002aea
  3001. pea.l (L005472,pc)
  3002. DOS _PRINT
  3003. addq.l #4,sp
  3004. L002aea:
  3005. moveq.l #$40,d0 ;'@'
  3006. add.l d0,($007c,a0)
  3007. sub.l d0,($0084,a0)
  3008. bmi.s L002afa
  3009. bsr.w L0058e0
  3010. L002afa:
  3011. bmi.w L00054e
  3012. movea.l ($007c,a0),a5
  3013. move.l a5,(-$0008,a6)
  3014. lea.l (a5),a1
  3015. moveq.l #$00,d0
  3016. moveq.l #$0f,d1
  3017. L002b0c:
  3018. move.l d0,-(a1)
  3019. dbra.w d1,L002b0c
  3020. move.l a1,(-$000c,a6)
  3021. move.l d0,(-$005a,a6)
  3022. move.l d0,(-$0056,a6)
  3023. move.l d0,(-$002e,a6)
  3024. move.l d0,(-$002a,a6)
  3025. move.l d0,(-$0026,a6)
  3026. move.l d0,(-$0022,a6)
  3027. move.l d0,(-$001e,a6)
  3028. move.l d0,(-$001a,a6)
  3029. move.l d0,(-$0016,a6)
  3030. move.l d0,(-$0012,a6)
  3031. move.w d0,(-$000e,a6)
  3032. move.l d0,(-$0042,a6)
  3033. move.l d0,(-$0052,a6)
  3034. sub.l ($001c,a0),d0
  3035. sub.l ($0020,a0),d0
  3036. sub.l ($0024,a0),d0
  3037. move.l d0,(-$004e,a6)
  3038. move.l a5,d0
  3039. move.l d0,(-$003e,a6)
  3040. add.l ($0004,a0),d0
  3041. move.l d0,(-$003a,a6)
  3042. add.l ($0008,a0),d0
  3043. move.l d0,(-$0036,a6)
  3044. move.l d0,(-$004a,a6)
  3045. add.l ($0038,a0),d0
  3046. move.l d0,(-$0032,a6)
  3047. add.l ($003c,a0),d0
  3048. move.l d0,($0050,a0)
  3049. move.l d0,(-$0046,a6)
  3050. move.l (a0),d0
  3051. move.l ($0084,a0),d7
  3052. sub.l d0,d7
  3053. bmi.w L00054e
  3054. lea.l (a5,d0.l),a4
  3055. move.l a4,(-$005e,a6)
  3056. tst.b ($05ce,a0)
  3057. beq.s L002bb0
  3058. bsr.w L002eb2
  3059. adda.l ($0048,a0),a3
  3060. addq.l #4,a3
  3061. move.l a3,($0048,a0)
  3062. L002bb0:
  3063. tst.b ($05cf,a0)
  3064. beq.s L002bc4
  3065. bsr.w L002eb2
  3066. adda.l ($004c,a0),a3
  3067. addq.l #4,a3
  3068. move.l a3,($004c,a0)
  3069. L002bc4:
  3070. lea.l ($006c,a0),a2
  3071. move.l (a2),d0
  3072. beq.w L002c76
  3073. L002bce:
  3074. movea.l d0,a2
  3075. movea.l (a2),a1
  3076. tst.b ($0097,a1)
  3077. beq.s L002be0
  3078. lea.l (-$003e,a6),a5
  3079. bsr.w L002f1c
  3080. L002be0:
  3081. tst.b ($0098,a1)
  3082. beq.s L002bee
  3083. lea.l (-$003a,a6),a5
  3084. bsr.w L002ef0
  3085. L002bee:
  3086. tst.b ($009b,a1)
  3087. beq.s L002bfc
  3088. lea.l (-$0036,a6),a5
  3089. bsr.w L002ef0
  3090. L002bfc:
  3091. tst.b ($009e,a1)
  3092. beq.s L002c0a
  3093. lea.l (-$0032,a6),a5
  3094. bsr.w L002ef0
  3095. L002c0a:
  3096. moveq.l #$01,d5
  3097. movea.l (-$003e,a6),a5
  3098. movea.l ($0010,a1),a0
  3099. move.w (a0),d0
  3100. beq.s L002c34
  3101. L002c18:
  3102. move.w d0,d1
  3103. bsr.w L0014a4
  3104. bmi.w L002e64
  3105. add.w d0,d0
  3106. lea.l (L00548e,pc),a3
  3107. move.w (a3,d0.w),d0
  3108. jsr (a3,d0.w)
  3109. move.w (a0),d0
  3110. bne.s L002c18
  3111. L002c34:
  3112. addq.l #2,a0
  3113. move.l a0,($0014,a1)
  3114. move.l ($000c,a1),d0
  3115. sub.l a0,d0
  3116. add.l ($0010,a1),d0
  3117. move.l d0,($0018,a1)
  3118. subq.w #1,d5
  3119. bne.s L002c52
  3120. move.l a5,(-$003e,a6)
  3121. bra.s L002c6e
  3122. L002c52:
  3123. subq.w #1,d5
  3124. bne.s L002c5c
  3125. move.l a5,(-$003a,a6)
  3126. bra.s L002c6e
  3127. L002c5c:
  3128. subq.w #3,d5
  3129. bne.s L002c66
  3130. move.l a5,(-$0036,a6)
  3131. bra.s L002c6e
  3132. L002c66:
  3133. subq.w #3,d5
  3134. bne.s L002c6e
  3135. move.l a5,(-$0032,a6)
  3136. L002c6e:
  3137. addq.w #4,a2
  3138. move.l (a2),d0
  3139. bne.w L002bce
  3140. L002c76:
  3141. lea.l (-$003e,a6),a5
  3142. bsr.w L002f4a
  3143. lea.l (-$003a,a6),a5
  3144. bsr.w L002f4a
  3145. lea.l (-$0036,a6),a5
  3146. bsr.w L002f4a
  3147. lea.l (-$0032,a6),a5
  3148. bsr.w L002f4a
  3149. move.w (End+$0005cc,pc),d0
  3150. bne.w L002e50
  3151. move.l (-$0042,a6),d0
  3152. cmp.l (End+$000054,pc),d0
  3153. bne.w L002ea2
  3154. move.b (End+$0005da,pc),d0
  3155. bne.s L002cb8
  3156. bsr.w L002f5c
  3157. bmi.w L002e80
  3158. L002cb8:
  3159. move.b (End+$0005d3,pc),d0
  3160. bne.s L002cce
  3161. bsr.w L00305e
  3162. bsr.w L003132
  3163. move.w (End+$0005cc,pc),d0
  3164. bne.w L002e50
  3165. L002cce:
  3166. lea.l (End,pc),a0
  3167. tst.b ($05d6,a0)
  3168. beq.s L002d14
  3169. bsr.w L002eb2
  3170. move.l ($0004,a0),(a3)+
  3171. move.l ($0008,a0),(a3)+
  3172. move.l ($000c,a0),(a3)+
  3173. move.l ($0010,a0),(a3)+
  3174. move.l ($0014,a0),(a3)+
  3175. move.l ($0018,a0),(a3)+
  3176. move.l ($001c,a0),(a3)+
  3177. move.l ($0020,a0),(a3)+
  3178. move.l ($0024,a0),(a3)+
  3179. move.l ($0028,a0),(a3)+
  3180. move.l ($002c,a0),(a3)+
  3181. move.l ($0030,a0),(a3)+
  3182. move.l ($0034,a0),(a3)+
  3183. move.l ($0054,a0),(a3)+
  3184. L002d14:
  3185. moveq.l #$ff,d0
  3186. tst.b ($05ce,a0)
  3187. beq.s L002d28
  3188. movea.l ($0048,a0),a3
  3189. clr.l (a3)
  3190. suba.l ($0040,a0),a3
  3191. move.l d0,-(a3)
  3192. L002d28:
  3193. tst.b ($05cf,a0)
  3194. beq.s L002d3a
  3195. movea.l ($004c,a0),a3
  3196. clr.l (a3)
  3197. suba.l ($0044,a0),a3
  3198. move.l d0,-(a3)
  3199. L002d3a:
  3200. movea.l (-$000c,a6),a3
  3201. move.w #$4855,(a3) ;'HU'
  3202. move.b ($05d4,a0),($0003,a3)
  3203. move.l ($0098,a0),d0
  3204. move.l d0,($0004,a3)
  3205. add.l ($0094,a0),d0
  3206. move.l d0,($0008,a3)
  3207. move.l ($0004,a0),($000c,a3)
  3208. move.l (a0),d0
  3209. sub.l ($0004,a0),d0
  3210. move.l d0,($0010,a3)
  3211. move.l ($000c,a0),d0
  3212. add.l ($0010,a0),d0
  3213. add.l ($0014,a0),d0
  3214. move.l d0,($0014,a3)
  3215. move.l (-$005a,a6),($0018,a3)
  3216. move.l (-$0056,a6),($001c,a3)
  3217. move.l (-$001e,a6),($0020,a3)
  3218. move.l (-$001a,a6),d0
  3219. add.l (-$0016,a6),d0
  3220. move.l d0,($0024,a3)
  3221. move.l (-$0012,a6),($0028,a3)
  3222. tst.b ($05da,a0)
  3223. beq.s L002dd4
  3224. tst.b ($05db,a0)
  3225. bne.s L002dbc
  3226. tst.l (-$005a,a6)
  3227. bne.w L002e7a
  3228. move.l ($0094,a0),d0
  3229. cmp.l ($0098,a0),d0
  3230. bne.w L002e86
  3231. L002dbc:
  3232. move.l ($0014,a3),d0
  3233. cmp.l d0,d7
  3234. bcs.w L00054e
  3235. move.l ($000c,a3),d1
  3236. add.l ($0010,a3),d1
  3237. lea.l ($0040,a3),a3
  3238. bra.s L002df2
  3239. L002dd4:
  3240. moveq.l #$40,d1 ;'@'
  3241. add.l ($000c,a3),d1
  3242. add.l ($0010,a3),d1
  3243. add.l ($0018,a3),d1
  3244. add.l ($001c,a3),d1
  3245. add.l ($0020,a3),d1
  3246. add.l ($0024,a3),d1
  3247. add.l ($0028,a3),d1
  3248. L002df2:
  3249. move.w #$0020,-(sp) ;' '
  3250. tst.b ($05d8,a0)
  3251. beq.s L002e06
  3252. tst.b ($05d9,a0)
  3253. bgt.s L002e06
  3254. ori.w #$0080,(sp)
  3255. L002e06:
  3256. pea.l ($009c,a0)
  3257. DOS _CREATE
  3258. addq.l #6,sp
  3259. move.l d0,d2
  3260. bmi.s L002e68
  3261. move.l d1,-(sp)
  3262. pea.l (a3)
  3263. move.w d2,-(sp)
  3264. DOS _WRITE
  3265. addq.l #6,sp
  3266. move.l d0,(sp)+
  3267. bmi.s L002e6e
  3268. cmp.l d0,d1
  3269. bne.s L002e74
  3270. tst.b ($05da,a0)
  3271. beq.s L002e46
  3272. move.l (-$002c,a3),d1
  3273. beq.s L002e46
  3274. bsr.w L002ec6
  3275. move.l d1,-(sp)
  3276. pea.l (a4)
  3277. move.w d2,-(sp)
  3278. DOS _WRITE
  3279. addq.l #6,sp
  3280. move.l d0,(sp)+
  3281. bmi.s L002e6e
  3282. cmp.l d0,d1
  3283. bne.s L002e74
  3284. L002e46:
  3285. move.w d2,-(sp)
  3286. DOS _CLOSE
  3287. addq.l #2,sp
  3288. tst.l d0
  3289. bmi.s L002e6e
  3290. L002e50:
  3291. lea.l (End,pc),a0
  3292. move.l a4,($007c,a0)
  3293. move.l d7,($0084,a0)
  3294. L002e5c:
  3295. movem.l (sp)+,d1-d7/a0-a5
  3296. unlk a6
  3297. rts
  3298. L002e64:
  3299. bra.w L0005e6
  3300. L002e68:
  3301. pea.l (L0053ca,pc)
  3302. bra.s L002e8a
  3303. L002e6e:
  3304. pea.l (L0053dd,pc)
  3305. bra.s L002e8a
  3306. L002e74:
  3307. pea.l (L0053ef,pc)
  3308. bra.s L002e8a
  3309. L002e7a:
  3310. pea.l (L0053fe,pc)
  3311. bra.s L002e8a
  3312. L002e80:
  3313. pea.l (L005416,pc)
  3314. bra.s L002e8a
  3315. L002e86:
  3316. pea.l (L005431,pc)
  3317. L002e8a:
  3318. DOS _PRINT
  3319. pea.l (End+$00009c,pc)
  3320. DOS _PRINT
  3321. addq.l #8,sp
  3322. bsr.w L000c82
  3323. lea.l (End+$0005cc,pc),a0
  3324. move.w #$0001,(a0)
  3325. bra.s L002e5c
  3326. L002ea2:
  3327. pea.l (L005454,pc)
  3328. DOS _PRINT
  3329. addq.l #4,sp
  3330. lea.l (L002ad0,pc),a0
  3331. bra.w L0005aa
  3332. L002eb2:
  3333. movea.l ($006c,a0),a2
  3334. movea.l (a2),a1
  3335. movea.l ($0052,a1),a3
  3336. adda.l (-$000c,a6),a3
  3337. lea.l ($0040,a3),a3
  3338. rts
  3339. L002ec6:
  3340. movem.l d1/a4,-(sp)
  3341. lsr.l #3,d1
  3342. moveq.l #$00,d0
  3343. bra.s L002ed4
  3344. L002ed0:
  3345. move.l d0,(a4)+
  3346. move.l d0,(a4)+
  3347. L002ed4:
  3348. dbra.w d1,L002ed0
  3349. clr.w d1
  3350. subq.l #1,d1
  3351. bcc.s L002ed0
  3352. moveq.l #$07,d1
  3353. and.l (sp),d1
  3354. bra.s L002ee6
  3355. L002ee4:
  3356. move.b d0,(a4)+
  3357. L002ee6:
  3358. dbra.w d1,L002ee4
  3359. movem.l (sp)+,d1/a4
  3360. rts
  3361. L002ef0:
  3362. movem.l d0-d1/a0,-(sp)
  3363. movea.l (a5),a0
  3364. move.l (-$0008,a6),d0
  3365. sub.l a0,d0
  3366. move.l ($008e,a1),d1
  3367. subq.l #1,d1
  3368. and.l d1,d0
  3369. beq.s L002f16
  3370. lsr.l #1,d0
  3371. bcc.s L002f10
  3372. clr.b (a0)+
  3373. bra.s L002f10
  3374. L002f0e:
  3375. clr.w (a0)+
  3376. L002f10:
  3377. subq.l #1,d0
  3378. bcc.s L002f0e
  3379. move.l a0,(a5)
  3380. L002f16:
  3381. movem.l (sp)+,d0-d1/a0
  3382. rts
  3383. L002f1c:
  3384. movem.l d0-d1/a0,-(sp)
  3385. movea.l (a5),a0
  3386. move.l (-$0008,a6),d0
  3387. sub.l a0,d0
  3388. move.l ($008e,a1),d1
  3389. subq.l #1,d1
  3390. and.l d1,d0
  3391. beq.s L002f44
  3392. lsr.l #1,d0
  3393. bcc.s L002f3e
  3394. clr.b (a0)+
  3395. bra.s L002f3e
  3396. L002f3a:
  3397. move.w #$4e71,(a0)+ ;'Nq'
  3398. L002f3e:
  3399. subq.l #1,d0
  3400. bcc.s L002f3a
  3401. move.l a0,(a5)
  3402. L002f44:
  3403. movem.l (sp)+,d0-d1/a0
  3404. rts
  3405. L002f4a:
  3406. move.l a0,-(sp)
  3407. movea.l (a5),a0
  3408. move.w a0,-(sp)
  3409. lsr.w (sp)+
  3410. bcc.s L002f58
  3411. clr.b (a0)+
  3412. move.l a0,(a5)
  3413. L002f58:
  3414. movea.l (sp)+,a0
  3415. rts
  3416. L002f5c:
  3417. movem.l d1-d7/a0-a1,-(sp)
  3418. movea.l (-$005e,a6),a0
  3419. subq.l #6,a0
  3420. move.l (-$005a,a6),d1
  3421. move.l d1,d2
  3422. move.l d1,d3
  3423. lsr.l #1,d3
  3424. btst.l #$00,d3
  3425. beq.s L002f78
  3426. subq.l #3,d3
  3427. L002f78:
  3428. tst.l d3
  3429. beq.s L002fb2
  3430. move.l ($02,a0,d3.l),d4
  3431. move.l d3,d5
  3432. move.l d5,d6
  3433. add.l d6,d6
  3434. L002f86:
  3435. cmp.l d6,d2
  3436. bcs.s L002faa
  3437. beq.s L002f98
  3438. move.l ($08,a0,d6.l),d7
  3439. cmp.l ($02,a0,d6.l),d7
  3440. bls.s L002f98
  3441. addq.l #6,d6
  3442. L002f98:
  3443. cmp.l ($02,a0,d6.l),d4
  3444. bcc.s L002faa
  3445. move.l ($02,a0,d6.l),($02,a0,d5.l)
  3446. move.l d6,d5
  3447. add.l d6,d6
  3448. bra.s L002f86
  3449. L002faa:
  3450. move.l d4,($02,a0,d5.l)
  3451. subq.l #6,d3
  3452. bra.s L002f78
  3453. L002fb2:
  3454. moveq.l #$06,d3
  3455. L002fb4:
  3456. cmp.l #$00000006,d2
  3457. bls.s L002ff8
  3458. move.l ($02,a0,d2.l),d4
  3459. move.l ($0008,a0),($02,a0,d2.l)
  3460. subq.l #6,d2
  3461. move.l d3,d5
  3462. move.l d5,d6
  3463. add.l d6,d6
  3464. L002fce:
  3465. cmp.l d6,d2
  3466. bcs.s L002ff2
  3467. beq.s L002fe0
  3468. move.l ($08,a0,d6.l),d7
  3469. cmp.l ($02,a0,d6.l),d7
  3470. bls.s L002fe0
  3471. addq.l #6,d6
  3472. L002fe0:
  3473. cmp.l ($02,a0,d6.l),d4
  3474. bcc.s L002ff2
  3475. move.l ($02,a0,d6.l),($02,a0,d5.l)
  3476. move.l d6,d5
  3477. add.l d6,d6
  3478. bra.s L002fce
  3479. L002ff2:
  3480. move.l d4,($02,a0,d5.l)
  3481. bra.s L002fb4
  3482. L002ff8:
  3483. movea.l (-$005e,a6),a0
  3484. movea.l a0,a1
  3485. move.l (-$005a,a6),d2
  3486. move.l d2,d3
  3487. move.l #$00010000,d4
  3488. moveq.l #$40,d5 ;'@'
  3489. add.l (-$000c,a6),d5
  3490. moveq.l #$00,d7
  3491. bra.s L003034
  3492. L003014:
  3493. move.l d5,d1
  3494. addq.l #2,a0
  3495. move.l (a0)+,d5
  3496. or.w d5,d7
  3497. move.l d5,d0
  3498. sub.l d1,d0
  3499. cmp.l d4,d0
  3500. bcc.s L00302e
  3501. move.w d0,(a1)+
  3502. subq.l #4,d3
  3503. subq.l #6,d2
  3504. bcc.s L003014
  3505. bra.s L003038
  3506. L00302e:
  3507. move.w #$0001,(a1)+
  3508. move.l d0,(a1)+
  3509. L003034:
  3510. subq.l #6,d2
  3511. bcc.s L003014
  3512. L003038:
  3513. movea.l a1,a4
  3514. move.l (-$005a,a6),d0
  3515. sub.l d3,d0
  3516. move.l d3,(-$005a,a6)
  3517. lea.l (End,pc),a0
  3518. sub.l d0,($007c,a0)
  3519. add.l d0,($0084,a0)
  3520. moveq.l #$00,d0
  3521. btst.l d0,d7
  3522. beq.s L003058
  3523. moveq.l #$ff,d0
  3524. L003058:
  3525. movem.l (sp)+,d1-d7/a0-a1
  3526. rts
  3527. L00305e:
  3528. movem.l d1-d3/a0-a3,-(sp)
  3529. moveq.l #$00,d3
  3530. lea.l (End+$00006c,pc),a2
  3531. L003068:
  3532. move.l (a2),d0
  3533. beq.w L003120
  3534. movea.l d0,a2
  3535. movea.l (a2),a1
  3536. movea.l ($007a,a1),a3
  3537. L003076:
  3538. tst.l (a3)
  3539. beq.w L00311a
  3540. movea.l ($0004,a3),a0
  3541. cmpa.l (a0),a1
  3542. bne.w L003114
  3543. move.w ($000a,a0),d0
  3544. beq.s L0030de
  3545. cmpi.w #$0001,d0
  3546. beq.s L0030c6
  3547. cmpi.w #$0002,d0
  3548. beq.s L0030cc
  3549. cmpi.w #$0003,d0
  3550. beq.s L0030d2
  3551. cmpi.w #$0004,d0
  3552. beq.s L0030d8
  3553. cmpi.w #$000a,d0
  3554. bls.s L0030de
  3555. cmpi.w #$00fc,d0
  3556. beq.s L0030be
  3557. cmpi.w #$00fd,d0
  3558. beq.s L0030be
  3559. cmpi.w #$00fe,d0
  3560. beq.s L0030c2
  3561. bra.s L00312a
  3562. L0030be:
  3563. moveq.l #$00,d1
  3564. bra.s L0030e2
  3565. L0030c2:
  3566. moveq.l #$03,d1
  3567. bra.s L0030e2
  3568. L0030c6:
  3569. move.w #$0201,d1
  3570. bra.s L0030e2
  3571. L0030cc:
  3572. move.w #$0202,d1
  3573. bra.s L0030e2
  3574. L0030d2:
  3575. move.w #$0203,d1
  3576. bra.s L0030e2
  3577. L0030d8:
  3578. move.w #$0204,d1
  3579. bra.s L0030e2
  3580. L0030de:
  3581. move.w #$0200,d1
  3582. L0030e2:
  3583. move.l ($000c,a0),d2
  3584. subq.l #6,d7
  3585. bmi.w L00054e
  3586. addq.l #6,d3
  3587. move.w d1,(a4)+
  3588. move.l d2,(a4)+
  3589. movea.l ($0004,a0),a0
  3590. L0030f6:
  3591. subq.l #1,d7
  3592. bmi.w L00054e
  3593. addq.l #1,d3
  3594. move.b (a0)+,(a4)+
  3595. bne.s L0030f6
  3596. move.l a4,d0
  3597. btst.l #$00,d0
  3598. beq.s L003114
  3599. subq.l #1,d7
  3600. bmi.w L00054e
  3601. addq.l #1,d3
  3602. clr.b (a4)+
  3603. L003114:
  3604. addq.l #8,a3
  3605. bra.w L003076
  3606. L00311a:
  3607. addq.w #4,a2
  3608. bra.w L003068
  3609. L003120:
  3610. move.l d3,(-$0056,a6)
  3611. movem.l (sp)+,d1-d3/a0-a3
  3612. rts
  3613. L00312a:
  3614. lea.l (L00305e,pc),a0
  3615. bra.w L0005aa
  3616. L003132:
  3617. movem.l d1-d7/a0-a5,-(sp)
  3618. lea.l (End+$00006c,pc),a2
  3619. L00313a:
  3620. move.l (a2),d0
  3621. beq.s L003174
  3622. movea.l d0,a2
  3623. movea.l (a2),a1
  3624. tst.l ($0018,a1)
  3625. beq.s L003170
  3626. movea.l ($0014,a1),a3
  3627. move.l (a3)+,d1
  3628. move.l (a3)+,d3
  3629. move.l ($0c,a3,d1.l),d2
  3630. mulu.w #$0012,d2
  3631. sub.l d2,d3
  3632. bmi.w L003690
  3633. move.l (a3)+,d4
  3634. add.l d1,(-$001e,a6)
  3635. add.l d2,(-$001a,a6)
  3636. add.l d3,(-$0016,a6)
  3637. add.l d4,(-$0012,a6)
  3638. L003170:
  3639. addq.w #4,a2
  3640. bra.s L00313a
  3641. L003174:
  3642. move.l (-$001e,a6),d0
  3643. add.l (-$001a,a6),d0
  3644. add.l (-$0016,a6),d0
  3645. add.l (-$0012,a6),d0
  3646. sub.l d0,d7
  3647. bmi.w L00054e
  3648. adda.l d0,a5
  3649. lea.l (End,pc),a2
  3650. move.l a5,($007c,a2)
  3651. move.l d7,($0084,a2)
  3652. moveq.l #$00,d0
  3653. move.l d0,(-$002e,a6)
  3654. move.l d0,(-$002a,a6)
  3655. move.l d0,(-$0026,a6)
  3656. move.l d0,(-$0022,a6)
  3657. lea.l (End+$00006c,pc),a2
  3658. L0031ae:
  3659. move.l (a2),d0
  3660. beq.w L00367a
  3661. movea.l d0,a2
  3662. movea.l (a2),a1
  3663. tst.l ($0018,a1)
  3664. beq.w L003674
  3665. movea.l ($0014,a1),a3
  3666. move.l (a3)+,d1
  3667. move.l (a3)+,d3
  3668. move.l ($0c,a3,d1.l),d2
  3669. mulu.w #$0012,d2
  3670. sub.l d2,d3
  3671. move.l (a3)+,d4
  3672. move.l d1,d7
  3673. beq.s L003200
  3674. movea.l (-$002e,a6),a5
  3675. adda.l a4,a5
  3676. move.l ($004e,a1),d5
  3677. L0031e2:
  3678. move.l (a3)+,d0
  3679. move.w (a3)+,d6
  3680. beq.s L0031f4
  3681. add.l d5,d0
  3682. move.l d0,(a5)+
  3683. move.w d6,(a5)+
  3684. subq.l #6,d7
  3685. bhi.s L0031e2
  3686. bra.s L003200
  3687. L0031f4:
  3688. add.l (-$002a,a6),d0
  3689. move.l d0,(a5)+
  3690. move.w d6,(a5)+
  3691. subq.l #6,d7
  3692. bhi.s L0031e2
  3693. L003200:
  3694. move.l d2,d7
  3695. beq.w L0034ee
  3696. move.l (-$002a,a6),d0
  3697. mulu.w #$0012,d0
  3698. add.l (-$001e,a6),d0
  3699. lea.l (a4,d0.l),a5
  3700. L003216:
  3701. move.l (a3)+,d6
  3702. cmp.l #$2e626600,d6 ;'.bf'<<8
  3703. beq.w L00333c
  3704. cmp.l #$2e656600,d6 ;'.ef'<<8
  3705. beq.w L003366
  3706. cmp.l #$2e626200,d6 ;'.bb'<<8
  3707. beq.w L00333c
  3708. cmp.l #$2e656200,d6 ;'.eb'<<8
  3709. beq.w L003366
  3710. cmp.l #$2e656f73,d6 ;'.eos'
  3711. beq.w L00338a
  3712. cmp.l #$2e66696c,d6 ;'.fil'
  3713. beq.w L0033ae
  3714. cmp.l #$2e746578,d6 ;'.tex'
  3715. beq.w L0033ae
  3716. cmp.l #$2e646174,d6 ;'.dat'
  3717. beq.w L0033ae
  3718. cmp.l #$2e627373,d6 ;'.bss'
  3719. beq.w L0033ae
  3720. cmp.l #$2e726461,d6 ;'.rda'
  3721. beq.w L0033ae
  3722. cmp.l #$2e726273,d6 ;'.rbs'
  3723. beq.w L0033ae
  3724. cmp.l #$2e726c64,d6 ;'.rld'
  3725. beq.w L0033ae
  3726. cmp.l #$2e726c62,d6 ;'.rlb'
  3727. beq.w L0033ae
  3728. move.l d6,(a5)+
  3729. move.l (a3)+,(a5)+
  3730. tst.l d6
  3731. bne.s L0032aa
  3732. move.l -(a5),d6
  3733. add.l (-$0022,a6),d6
  3734. move.l d6,(a5)+
  3735. L0032aa:
  3736. move.b ($0009,a3),d0
  3737. bne.w L0033d6
  3738. move.l (a3)+,d6
  3739. move.w (a3)+,d0
  3740. cmp.w #$0001,d0
  3741. bne.s L0032c2
  3742. add.l ($004e,a1),d6
  3743. bra.s L003326
  3744. L0032c2:
  3745. cmp.w #$0002,d0
  3746. bne.s L0032d2
  3747. add.l ($0052,a1),d6
  3748. sub.l (End+$000004,pc),d6
  3749. bra.s L003326
  3750. L0032d2:
  3751. cmp.w #$0003,d0
  3752. bne.s L0032e2
  3753. add.l ($0056,a1),d6
  3754. sub.l (End,pc),d6
  3755. bra.s L003326
  3756. L0032e2:
  3757. cmp.w #$0005,d0
  3758. bne.s L0032ee
  3759. add.l ($005e,a1),d6
  3760. bra.s L003326
  3761. L0032ee:
  3762. cmp.w #$0006,d0
  3763. bne.s L0032fa
  3764. add.l ($0062,a1),d6
  3765. bra.s L003326
  3766. L0032fa:
  3767. cmp.w #$0008,d0
  3768. bne.s L003306
  3769. add.l ($006a,a1),d6
  3770. bra.s L003326
  3771. L003306:
  3772. cmp.w #$0009,d0
  3773. bne.s L003312
  3774. add.l ($006e,a1),d6
  3775. bra.s L003326
  3776. L003312:
  3777. cmpi.w #$fffc,d0
  3778. bcc.s L003326
  3779. cmpi.w #$00fc,d0
  3780. beq.s L003326
  3781. cmpi.w #$00fd,d0
  3782. bne.w L003690
  3783. L003326:
  3784. move.l d6,(a5)+
  3785. move.w d0,(a5)+
  3786. move.l (a3)+,(a5)+
  3787. L00332c:
  3788. moveq.l #$12,d6
  3789. sub.l d6,d7
  3790. bhi.w L003216
  3791. bcs.w L003688
  3792. bra.w L0034ee
  3793. L00333c:
  3794. move.l d6,(a5)+
  3795. move.l (a3)+,(a5)+
  3796. move.l (a3)+,d0
  3797. add.l ($004e,a1),d0
  3798. move.l d0,(a5)+
  3799. move.l (a3)+,(a5)+
  3800. move.w (a3)+,(a5)+
  3801. move.l (a3)+,(a5)+
  3802. move.l (a3)+,(a5)+
  3803. move.l (a3)+,(a5)+
  3804. move.l (a3)+,d0
  3805. add.l (-$002a,a6),d0
  3806. move.l d0,(a5)+
  3807. move.w (a3)+,(a5)+
  3808. moveq.l #$12,d6
  3809. sub.l d6,d7
  3810. bhi.s L00332c
  3811. bra.w L003688
  3812. L003366:
  3813. move.l d6,(a5)+
  3814. move.l (a3)+,(a5)+
  3815. move.l (a3)+,d0
  3816. add.l ($004e,a1),d0
  3817. move.l d0,(a5)+
  3818. move.l (a3)+,(a5)+
  3819. move.w (a3)+,(a5)+
  3820. move.l (a3)+,(a5)+
  3821. move.l (a3)+,(a5)+
  3822. move.l (a3)+,(a5)+
  3823. move.l (a3)+,(a5)+
  3824. move.w (a3)+,(a5)+
  3825. moveq.l #$12,d6
  3826. sub.l d6,d7
  3827. bhi.s L00332c
  3828. bra.w L003688
  3829. L00338a:
  3830. move.l d6,(a5)+
  3831. move.l (a3)+,(a5)+
  3832. move.l (a3)+,(a5)+
  3833. move.l (a3)+,(a5)+
  3834. move.w (a3)+,(a5)+
  3835. move.l (a3)+,d0
  3836. add.l (-$002a,a6),d0
  3837. move.l d0,(a5)+
  3838. move.l (a3)+,(a5)+
  3839. move.l (a3)+,(a5)+
  3840. move.l (a3)+,(a5)+
  3841. move.w (a3)+,(a5)+
  3842. moveq.l #$12,d6
  3843. sub.l d6,d7
  3844. bhi.s L00332c
  3845. bra.w L003688
  3846. L0033ae:
  3847. move.l d6,(a5)+
  3848. move.l (a3)+,(a5)+
  3849. move.l (a3)+,(a5)+
  3850. move.l (a3)+,(a5)+
  3851. move.w (a3)+,(a5)+
  3852. move.l (a3)+,(a5)+
  3853. move.l (a3)+,(a5)+
  3854. move.l (a3)+,(a5)+
  3855. move.w (a3)+,(a5)+
  3856. move.l (a3)+,d0
  3857. beq.s L0033c8
  3858. add.l (-$0022,a6),d0
  3859. L0033c8:
  3860. move.l d0,(a5)+
  3861. moveq.l #$12,d6
  3862. sub.l d6,d7
  3863. bhi.w L00332c
  3864. bra.w L003688
  3865. L0033d6:
  3866. cmp.b #$01,d0
  3867. bne.w L003690
  3868. move.l (a3)+,d6
  3869. move.w (a3)+,d0
  3870. cmp.w #$0001,d0
  3871. bne.s L0033ee
  3872. add.l ($004e,a1),d6
  3873. bra.s L003462
  3874. L0033ee:
  3875. cmp.w #$0002,d0
  3876. bne.s L0033fe
  3877. add.l ($0052,a1),d6
  3878. sub.l (End+$000004,pc),d6
  3879. bra.s L00346e
  3880. L0033fe:
  3881. cmp.w #$0003,d0
  3882. bne.s L00340e
  3883. add.l ($0056,a1),d6
  3884. sub.l (End,pc),d6
  3885. bra.s L00346e
  3886. L00340e:
  3887. cmp.w #$0005,d0
  3888. bne.s L00341a
  3889. add.l ($005e,a1),d6
  3890. bra.s L00346e
  3891. L00341a:
  3892. cmp.w #$0006,d0
  3893. bne.s L003426
  3894. add.l ($0062,a1),d6
  3895. bra.s L00346e
  3896. L003426:
  3897. cmp.w #$0008,d0
  3898. bne.s L003432
  3899. add.l ($006a,a1),d6
  3900. bra.s L00346e
  3901. L003432:
  3902. cmp.w #$0009,d0
  3903. bne.s L00343e
  3904. add.l ($006e,a1),d6
  3905. bra.s L00346e
  3906. L00343e:
  3907. cmpi.w #$ffff,d0
  3908. beq.s L00346e
  3909. cmpi.w #$fffc,d0
  3910. bcs.w L003690
  3911. move.w (a3),d5
  3912. cmp.w #$0008,d5
  3913. beq.s L003492
  3914. cmp.w #$0009,d5
  3915. beq.s L003492
  3916. cmp.w #$000a,d5
  3917. beq.s L003492
  3918. bra.s L00346e
  3919. L003462:
  3920. move.w (a3),d5
  3921. and.w #$0030,d5
  3922. cmp.w #$0020,d5 ;' '
  3923. beq.s L0034be
  3924. L00346e:
  3925. move.l d6,(a5)+
  3926. move.w d0,(a5)+
  3927. move.l (a3)+,(a5)+
  3928. move.l (a3)+,d0
  3929. beq.s L00347c
  3930. add.l (-$002a,a6),d0
  3931. L00347c:
  3932. move.l d0,(a5)+
  3933. move.l (a3)+,(a5)+
  3934. move.l (a3)+,(a5)+
  3935. move.l (a3)+,(a5)+
  3936. move.w (a3)+,(a5)+
  3937. moveq.l #$12,d6
  3938. sub.l d6,d7
  3939. bhi.w L00332c
  3940. bra.w L003688
  3941. L003492:
  3942. move.l d6,(a5)+
  3943. move.w d0,(a5)+
  3944. move.l (a3)+,(a5)+
  3945. move.l (a3)+,d0
  3946. beq.s L0034a0
  3947. add.l (-$002a,a6),d0
  3948. L0034a0:
  3949. move.l d0,(a5)+
  3950. move.l (a3)+,(a5)+
  3951. move.l (a3)+,(a5)+
  3952. move.l (a3)+,d0
  3953. beq.s L0034ae
  3954. add.l (-$002a,a6),d0
  3955. L0034ae:
  3956. move.l d0,(a5)+
  3957. move.w (a3)+,(a5)+
  3958. moveq.l #$12,d6
  3959. sub.l d6,d7
  3960. bhi.w L00332c
  3961. bra.w L003688
  3962. L0034be:
  3963. move.l d6,(a5)+
  3964. move.w d0,(a5)+
  3965. move.l (a3)+,(a5)+
  3966. move.l (a3)+,d0
  3967. beq.s L0034cc
  3968. add.l (-$002a,a6),d0
  3969. L0034cc:
  3970. move.l d0,(a5)+
  3971. move.l (a3)+,(a5)+
  3972. move.l (a3)+,d0
  3973. add.l (-$002e,a6),d0
  3974. move.l d0,(a5)+
  3975. move.l (a3)+,d0
  3976. add.l (-$002a,a6),d0
  3977. move.l d0,(a5)+
  3978. move.w (a3)+,(a5)+
  3979. moveq.l #$12,d6
  3980. sub.l d6,d7
  3981. bhi.w L00332c
  3982. bra.w L003688
  3983. L0034ee:
  3984. move.l d3,d7
  3985. beq.w L00363e
  3986. move.l (-$0026,a6),d0
  3987. mulu.w #$0012,d0
  3988. add.l (-$001a,a6),d0
  3989. add.l (-$001e,a6),d0
  3990. lea.l (a4,d0.l),a5
  3991. move.l (End,pc),d5
  3992. L00350c:
  3993. move.l (a3)+,d6
  3994. move.l d6,(a5)+
  3995. move.l (a3)+,(a5)+
  3996. tst.l d6
  3997. bne.s L00351e
  3998. move.l -(a5),d6
  3999. add.l (-$0022,a6),d6
  4000. move.l d6,(a5)+
  4001. L00351e:
  4002. move.w ($0004,a3),d6
  4003. cmpi.w #$00fe,d6
  4004. bhi.w L003778
  4005. cmpi.w #$00fc,d6
  4006. bcc.s L003540
  4007. cmpi.w #$fffe,d6
  4008. bhi.w L003778
  4009. cmpi.w #$fffc,d6
  4010. bcs.w L0035d8
  4011. L003540:
  4012. move.l (-$0008,a5),d0
  4013. beq.s L003554
  4014. lea.l (End+$0001a4,pc),a0
  4015. clr.b (a0)
  4016. move.l (-$0004,a5),-(a0)
  4017. move.l d0,-(a0)
  4018. bra.s L003564
  4019. L003554:
  4020. movea.l ($0014,a1),a0
  4021. move.l (a0)+,d0
  4022. add.l (a0)+,d0
  4023. add.l (-$0004,a3),d0
  4024. lea.l ($04,a0,d0.l),a0
  4025. L003564:
  4026. bsr.w L002402
  4027. tst.l d0
  4028. beq.w L003690
  4029. movea.l d0,a0
  4030. move.l ($000c,a0),d0
  4031. move.w ($000a,a0),d6
  4032. cmp.b #$fe,d6
  4033. beq.s L003586
  4034. cmp.b #$fd,d6
  4035. beq.s L003590
  4036. bra.s L003598
  4037. L003586:
  4038. sub.l d5,d0
  4039. move.l d0,(a5)+
  4040. move.w #$0003,(a5)+
  4041. bra.s L00359e
  4042. L003590:
  4043. move.l d0,(a5)+
  4044. move.w #$0006,(a5)+
  4045. bra.s L00359e
  4046. L003598:
  4047. move.l d0,(a5)+
  4048. move.w #$0009,(a5)+
  4049. L00359e:
  4050. addq.l #6,a3
  4051. move.l (a3)+,(a5)+
  4052. L0035a2:
  4053. move.b (-$0001,a5),d0
  4054. beq.s L0035ca
  4055. cmp.b #$01,d0
  4056. bne.w L003690
  4057. moveq.l #$12,d6
  4058. sub.l d6,d7
  4059. bls.w L003688
  4060. move.l (a3)+,d0
  4061. beq.s L0035c0
  4062. add.l (-$002a,a6),d0
  4063. L0035c0:
  4064. move.l d0,(a5)+
  4065. move.l (a3)+,(a5)+
  4066. move.l (a3)+,(a5)+
  4067. move.l (a3)+,(a5)+
  4068. move.w (a3)+,(a5)+
  4069. L0035ca:
  4070. moveq.l #$12,d6
  4071. sub.l d6,d7
  4072. bhi.w L00350c
  4073. bcs.w L003688
  4074. bra.s L00363e
  4075. L0035d8:
  4076. cmp.w #$0001,d6
  4077. bne.s L0035e4
  4078. move.l ($004e,a1),d0
  4079. bra.s L003632
  4080. L0035e4:
  4081. cmp.w #$0002,d6
  4082. bne.s L0035f4
  4083. move.l ($0052,a1),d0
  4084. sub.l (End+$000004,pc),d0
  4085. bra.s L003632
  4086. L0035f4:
  4087. cmp.w #$0003,d6
  4088. bne.s L003604
  4089. move.l ($0056,a1),d0
  4090. sub.l (End,pc),d0
  4091. bra.s L003632
  4092. L003604:
  4093. cmp.w #$0005,d6
  4094. bne.s L003610
  4095. move.l ($005e,a1),d0
  4096. bra.s L003632
  4097. L003610:
  4098. cmp.w #$0006,d6
  4099. bne.s L00361c
  4100. move.l ($0062,a1),d0
  4101. bra.s L003632
  4102. L00361c:
  4103. cmp.w #$0008,d6
  4104. bne.s L003628
  4105. move.l ($006a,a1),d0
  4106. bra.s L003632
  4107. L003628:
  4108. cmp.w #$0009,d6
  4109. bne.s L003690
  4110. move.l ($006e,a1),d0
  4111. L003632:
  4112. add.l (a3)+,d0
  4113. move.l d0,(a5)+
  4114. move.w (a3)+,(a5)+
  4115. move.l (a3)+,(a5)+
  4116. bra.w L0035a2
  4117. L00363e:
  4118. move.l d4,d7
  4119. beq.s L00365c
  4120. move.l (-$0022,a6),d0
  4121. add.l (-$0016,a6),d0
  4122. add.l (-$001a,a6),d0
  4123. add.l (-$001e,a6),d0
  4124. lea.l (a4,d0.l),a5
  4125. L003656:
  4126. move.b (a3)+,(a5)+
  4127. subq.l #1,d7
  4128. bne.s L003656
  4129. L00365c:
  4130. divu.w #$0012,d2
  4131. divu.w #$0012,d3
  4132. add.l d1,(-$002e,a6)
  4133. add.l d2,(-$002a,a6)
  4134. add.l d3,(-$0026,a6)
  4135. add.l d4,(-$0022,a6)
  4136. L003674:
  4137. addq.w #4,a2
  4138. bra.w L0031ae
  4139. L00367a:
  4140. movem.l (sp)+,d1-d7/a0-a5
  4141. movea.l (End+$00007c,pc),a5
  4142. move.l (End+$000084,pc),d7
  4143. rts
  4144. L003688:
  4145. lea.l (L003132,pc),a0
  4146. bra.w L0005aa
  4147. L003690:
  4148. pea.l (L0052e6,pc)
  4149. DOS _PRINT
  4150. move.l ($0008,a1),-(sp)
  4151. DOS _PRINT
  4152. addq.l #8,sp
  4153. move.l ($0004,a1),d0
  4154. beq.s L0036b2
  4155. pea.l (L00539d,pc)
  4156. DOS _PRINT
  4157. move.l ($0004,a1),-(sp)
  4158. DOS _PRINT
  4159. addq.l #8,sp
  4160. L0036b2:
  4161. bsr.w L000c82
  4162. lea.l (End+$0005cc,pc),a0
  4163. move.w #$0001,(a0)
  4164. movem.l (sp)+,d1-d7/a0-a5
  4165. unlk a6
  4166. rts
  4167. L0036c6:
  4168. movea.l ($007e,a1),a3
  4169. subq.l #1,d0
  4170. mulu.w #$0008,d0
  4171. adda.l d0,a3
  4172. movea.l ($0004,a3),a3
  4173. moveq.l #$00,d0
  4174. move.w ($000a,a3),d0
  4175. move.l ($000c,a3),d1
  4176. rts
  4177. L0036e2:
  4178. cmp.l #$000000ff,d1
  4179. bgt.w L0037a4
  4180. cmp.l #$ffffff80,d1
  4181. blt.w L0037a4
  4182. rts
  4183. L0036f8:
  4184. cmp.l #$0000007f,d1
  4185. bgt.w L0037a4
  4186. cmp.l #$ffffff80,d1
  4187. blt.w L0037a4
  4188. rts
  4189. L00370e:
  4190. cmp.l #$0000ffff,d1
  4191. bgt.w L0037a4
  4192. cmp.l #$ffff8000,d1
  4193. blt.w L0037a4
  4194. rts
  4195. L003724:
  4196. cmp.l #$00007fff,d1
  4197. bgt.s L0037a4
  4198. cmp.l #$ffff8000,d1
  4199. blt.s L0037a4
  4200. rts
  4201. L003736:
  4202. pea.l (L0053a2,pc)
  4203. DOS _PRINT
  4204. moveq.l #$c0,d0
  4205. add.l a5,d0
  4206. sub.l (-$000c,a6),d0
  4207. move.w d5,d1
  4208. subq.w #1,d1
  4209. beq.s L003790
  4210. subq.w #1,d1
  4211. beq.s L003786
  4212. subq.w #3,d1
  4213. beq.s L00376e
  4214. subq.w #3,d1
  4215. beq.s L00375e
  4216. lea.l (L003736,pc),a0
  4217. bra.w L0005aa
  4218. L00375e:
  4219. pea.l (L0053c0,pc)
  4220. sub.l #$00010000,d0
  4221. sub.l ($006a,a1),d0
  4222. bra.s L003778
  4223. L00376e:
  4224. pea.l (L0053b7,pc)
  4225. sub.l #$00008000,d0
  4226. L003778:
  4227. sub.l ($005e,a1),d0
  4228. sub.l (End+$000008,pc),d0
  4229. sub.l (End+$000004,pc),d0
  4230. bra.s L003798
  4231. L003786:
  4232. pea.l (L0053af,pc)
  4233. sub.l ($0052,a1),d0
  4234. bra.s L003798
  4235. L003790:
  4236. pea.l (L0053a7,pc)
  4237. sub.l ($004e,a1),d0
  4238. L003798:
  4239. bsr.w L000ca2
  4240. DOS _PRINT
  4241. addq.l #8,sp
  4242. bra.w L000c82
  4243. L0037a4:
  4244. movem.l d0-d1/a0,-(sp)
  4245. pea.l (L005341,pc)
  4246. bra.s L0037ca
  4247. L0037ae:
  4248. movem.l d0-d1/a0,-(sp)
  4249. pea.l (L005315,pc)
  4250. bra.s L0037ca
  4251. L0037b8:
  4252. movem.l d0-d1/a0,-(sp)
  4253. pea.l (L00532a,pc)
  4254. bra.s L0037ca
  4255. L0037c2:
  4256. movem.l d0-d1/a0,-(sp)
  4257. pea.l (L005302,pc)
  4258. L0037ca:
  4259. DOS _PRINT
  4260. addq.l #4,sp
  4261. bsr.s L00380c
  4262. bsr.w L003736
  4263. L0037d4:
  4264. lea.l (End+$0005cc,pc),a0
  4265. move.w #$0001,(a0)
  4266. movem.l (sp)+,d0-d1/a0
  4267. rts
  4268. L0037e2:
  4269. movem.l d0-d1/a0,-(sp)
  4270. pea.l (L005382,pc)
  4271. DOS _PRINT
  4272. addq.l #4,sp
  4273. bsr.s L00380c
  4274. bra.s L0037d4
  4275. L0037f2:
  4276. pea.l (L00534f,pc)
  4277. bra.s L0037fc
  4278. L0037f8:
  4279. pea.l (L005368,pc)
  4280. L0037fc:
  4281. DOS _PRINT
  4282. addq.l #4,sp
  4283. bsr.s L00380c
  4284. bsr.w L003736
  4285. move.w #$0001,-(sp)
  4286. DOS _EXIT2
  4287. L00380c:
  4288. move.l ($0008,a1),-(sp)
  4289. DOS _PRINT
  4290. move.l ($0004,a1),(sp)
  4291. beq.s L003822
  4292. pea.l (L00539d,pc)
  4293. DOS _PRINT
  4294. addq.l #4,sp
  4295. DOS _PRINT
  4296. L003822:
  4297. addq.l #4,sp
  4298. bra.w L000c82
  4299. L003828:
  4300. addq.l #2,a0
  4301. andi.w #$00ff,d1
  4302. cmpi.w #$0001,d5
  4303. beq.s L003846
  4304. cmpi.w #$0002,d5
  4305. beq.s L003846
  4306. cmpi.w #$0005,d5
  4307. beq.s L003846
  4308. cmpi.w #$0008,d5
  4309. bne.s L003856
  4310. L003846:
  4311. move.b (a0)+,(a5)+
  4312. dbra.w d1,L003846
  4313. L00384c:
  4314. move.w a0,d0
  4315. andi.w #$0001,d0
  4316. adda.w d0,a0
  4317. rts
  4318. L003856:
  4319. adda.w d1,a0
  4320. addq.l #1,a0
  4321. bra.s L00384c
  4322. L00385c:
  4323. tst.l ($0002,a0)
  4324. bne.w L002e64
  4325. addq.l #6,a0
  4326. move.w d5,d0
  4327. subq.w #1,d0
  4328. beq.s L00388a
  4329. subq.w #1,d0
  4330. beq.s L003884
  4331. subq.w #3,d0
  4332. beq.s L00387e
  4333. subq.w #3,d0
  4334. bne.s L00388e
  4335. move.l a5,(-$0032,a6)
  4336. bra.s L00388e
  4337. L00387e:
  4338. move.l a5,(-$0036,a6)
  4339. bra.s L00388e
  4340. L003884:
  4341. move.l a5,(-$003a,a6)
  4342. bra.s L00388e
  4343. L00388a:
  4344. move.l a5,(-$003e,a6)
  4345. L00388e:
  4346. moveq.l #$00,d5
  4347. move.b d1,d5
  4348. subq.b #1,d1
  4349. beq.s L0038b4
  4350. subq.b #1,d1
  4351. beq.s L0038ae
  4352. subq.b #3,d1
  4353. beq.s L0038a8
  4354. subq.b #3,d1
  4355. bne.s L0038a6
  4356. movea.l (-$0032,a6),a5
  4357. L0038a6:
  4358. rts
  4359. L0038a8:
  4360. movea.l (-$0036,a6),a5
  4361. rts
  4362. L0038ae:
  4363. movea.l (-$003a,a6),a5
  4364. rts
  4365. L0038b4:
  4366. movea.l (-$003e,a6),a5
  4367. rts
  4368. L0038ba:
  4369. addq.l #2,a0
  4370. move.l (a0)+,d1
  4371. cmpi.w #$0001,d5
  4372. beq.s L0038d6
  4373. cmpi.w #$0002,d5
  4374. beq.s L0038d6
  4375. cmpi.w #$0005,d5
  4376. beq.s L0038d6
  4377. cmpi.w #$0008,d5
  4378. bne.s L0038e0
  4379. L0038d6:
  4380. moveq.l #$00,d0
  4381. L0038d8:
  4382. subq.l #1,d1
  4383. bmi.s L0038e2
  4384. move.b d0,(a5)+
  4385. bra.s L0038d8
  4386. L0038e0:
  4387. adda.l d1,a5
  4388. L0038e2:
  4389. rts
  4390. L0038e4:
  4391. movem.l a3/a5,-(sp)
  4392. lea.l (End+$000048,pc),a3
  4393. L0038ec:
  4394. addq.l #2,a0
  4395. move.l (a0)+,d1
  4396. add.l ($004e,a1),d1
  4397. movea.l (a3),a5
  4398. subq.l #6,d7
  4399. bmi.w L00054e
  4400. addq.l #6,(-$005a,a6)
  4401. clr.w (a4)+
  4402. move.l a5,(a4)+
  4403. add.l (End+$000098,pc),d1
  4404. move.w a5,-(sp)
  4405. lsr.w (sp)+
  4406. bcc.s L003910
  4407. bsr.s L003924
  4408. L003910:
  4409. move.l d1,(a5)+
  4410. move.l a5,(a3)
  4411. movem.l (sp)+,a3/a5
  4412. rts
  4413. L00391a:
  4414. movem.l a3/a5,-(sp)
  4415. lea.l (End+$00004c,pc),a3
  4416. bra.s L0038ec
  4417. L003924:
  4418. addq.l #2,(sp)
  4419. L003926:
  4420. rol.l #8,d1
  4421. move.b d1,(a5)+
  4422. move.l d1,(a5)+
  4423. ror.l #8,d1
  4424. subq.l #1,a5
  4425. rts
  4426. L003932:
  4427. addq.l #2,a0
  4428. move.w (a0)+,d0
  4429. cmpi.w #$0001,d5
  4430. beq.s L00394e
  4431. cmpi.w #$0002,d5
  4432. beq.s L00394e
  4433. cmpi.w #$0005,d5
  4434. beq.s L00394e
  4435. cmpi.w #$0008,d5
  4436. bne.s L003964
  4437. L00394e:
  4438. bsr.w L0036c6
  4439. tst.w d0
  4440. beq.s L00395c
  4441. bsr.w L0037c2
  4442. bra.s L003960
  4443. L00395c:
  4444. bsr.w L0036e2
  4445. L003960:
  4446. clr.b (a5)+
  4447. move.b d1,(a5)+
  4448. L003964:
  4449. rts
  4450. L003966:
  4451. addq.l #2,a0
  4452. move.w (a0)+,d0
  4453. cmpi.w #$0001,d5
  4454. beq.s L003982
  4455. cmpi.w #$0002,d5
  4456. beq.s L003982
  4457. cmpi.w #$0005,d5
  4458. beq.s L003982
  4459. cmpi.w #$0008,d5
  4460. bne.s L003996
  4461. L003982:
  4462. bsr.w L0036c6
  4463. tst.w d0
  4464. beq.s L003990
  4465. bsr.w L0037c2
  4466. bra.s L003994
  4467. L003990:
  4468. bsr.w L0036e2
  4469. L003994:
  4470. move.b d1,(a5)+
  4471. L003996:
  4472. rts
  4473. L003998:
  4474. addq.l #2,a0
  4475. move.w (a0)+,d0
  4476. cmpi.w #$0001,d5
  4477. beq.s L0039b4
  4478. cmpi.w #$0002,d5
  4479. beq.s L0039b4
  4480. cmpi.w #$0005,d5
  4481. beq.s L0039b4
  4482. cmpi.w #$0008,d5
  4483. bne.s L0039e4
  4484. L0039b4:
  4485. bsr.w L0036c6
  4486. tst.w d0
  4487. beq.s L0039da
  4488. cmp.w #$00fe,d0
  4489. beq.s L0039c8
  4490. cmp.w #$0004,d0
  4491. bhi.s L0039ce
  4492. L0039c8:
  4493. bsr.w L0037c2
  4494. bra.s L0039de
  4495. L0039ce:
  4496. cmp.w #$0004,d5
  4497. bhi.s L0039c8
  4498. bsr.w L003724
  4499. bra.s L0039de
  4500. L0039da:
  4501. bsr.w L00370e
  4502. L0039de:
  4503. move.w d1,-(sp)
  4504. move.b (sp)+,(a5)+
  4505. move.b d1,(a5)+
  4506. L0039e4:
  4507. rts
  4508. L0039e6:
  4509. addq.l #2,a0
  4510. move.w (a0)+,d0
  4511. cmpi.w #$0001,d5
  4512. beq.s L003a02
  4513. cmpi.w #$0002,d5
  4514. beq.s L003a02
  4515. cmpi.w #$0005,d5
  4516. beq.s L003a02
  4517. cmpi.w #$0008,d5
  4518. bne.s L003a7a
  4519. L003a02:
  4520. bsr.w L0036c6
  4521. tst.w d0
  4522. beq.s L003a70
  4523. cmp.w #$0004,d0
  4524. bls.s L003a5e
  4525. cmp.w #$00fe,d0
  4526. beq.s L003a5e
  4527. cmp.w #$0004,d5
  4528. bls.s L003a70
  4529. move.l (-$0042,a6),d0
  4530. cmp.l (End+$000054,pc),d0
  4531. beq.w L002ea2
  4532. addq.l #4,(-$0042,a6)
  4533. move.l a4,d0
  4534. movea.l (-$0046,a6),a4
  4535. suba.l (-$004a,a6),a5
  4536. cmpa.l (End+$000038,pc),a5
  4537. bcc.s L003a48
  4538. suba.l (-$0052,a6),a5
  4539. move.l a5,(a4)+
  4540. adda.l (-$0052,a6),a5
  4541. bra.s L003a52
  4542. L003a48:
  4543. suba.l (-$004e,a6),a5
  4544. move.l a5,(a4)+
  4545. adda.l (-$004e,a6),a5
  4546. L003a52:
  4547. move.l a4,(-$0046,a6)
  4548. movea.l d0,a4
  4549. adda.l (-$004a,a6),a5
  4550. bra.s L003a70
  4551. L003a5e:
  4552. subq.l #6,d7
  4553. bmi.w L00054e
  4554. addq.l #6,(-$005a,a6)
  4555. clr.w (a4)+
  4556. move.l a5,(a4)+
  4557. add.l (End+$000098,pc),d1
  4558. L003a70:
  4559. move.w a5,-(sp)
  4560. lsr.w (sp)+
  4561. bcs.w L003926
  4562. move.l d1,(a5)+
  4563. L003a7a:
  4564. rts
  4565. L003a7c:
  4566. addq.l #2,a0
  4567. move.l (a0)+,d1
  4568. cmpi.w #$0001,d5
  4569. beq.s L003a98
  4570. cmpi.w #$0002,d5
  4571. beq.s L003a98
  4572. cmpi.w #$0005,d5
  4573. beq.s L003a98
  4574. cmpi.w #$0008,d5
  4575. bne.s L003aa0
  4576. L003a98:
  4577. bsr.w L0036e2
  4578. clr.b (a5)+
  4579. move.b d1,(a5)+
  4580. L003aa0:
  4581. rts
  4582. L003aa2:
  4583. addq.l #2,a0
  4584. move.l (a0)+,d1
  4585. cmpi.w #$0001,d5
  4586. beq.s L003abe
  4587. cmpi.w #$0002,d5
  4588. beq.s L003abe
  4589. cmpi.w #$0005,d5
  4590. beq.s L003abe
  4591. cmpi.w #$0008,d5
  4592. bne.s L003ac4
  4593. L003abe:
  4594. bsr.w L0036e2
  4595. move.b d1,(a5)+
  4596. L003ac4:
  4597. rts
  4598. L003ac6:
  4599. addq.l #2,a0
  4600. move.l (a0)+,d1
  4601. cmpi.w #$0001,d5
  4602. beq.s L003ae2
  4603. cmpi.w #$0002,d5
  4604. beq.s L003ae2
  4605. cmpi.w #$0005,d5
  4606. beq.s L003ae2
  4607. cmpi.w #$0008,d5
  4608. bne.s L003aec
  4609. L003ae2:
  4610. bsr.w L00370e
  4611. move.w d1,-(sp)
  4612. move.b (sp)+,(a5)+
  4613. move.b d1,(a5)+
  4614. L003aec:
  4615. rts
  4616. L003aee:
  4617. addq.l #2,a0
  4618. move.l (a0)+,d1
  4619. cmpi.w #$0001,d5
  4620. beq.s L003b0a
  4621. cmpi.w #$0002,d5
  4622. beq.s L003b0a
  4623. cmpi.w #$0005,d5
  4624. beq.s L003b0a
  4625. cmpi.w #$0008,d5
  4626. bne.s L003b14
  4627. L003b0a:
  4628. move.w a5,-(sp)
  4629. lsr.w (sp)+
  4630. bcs.w L003926
  4631. move.l d1,(a5)+
  4632. L003b14:
  4633. rts
  4634. L003b16:
  4635. addq.l #6,a0
  4636. cmpi.w #$0001,d5
  4637. beq.s L003b30
  4638. cmpi.w #$0002,d5
  4639. beq.s L003b30
  4640. cmpi.w #$0005,d5
  4641. beq.s L003b30
  4642. cmpi.w #$0008,d5
  4643. bne.s L003b38
  4644. L003b30:
  4645. bsr.w L0037c2
  4646. clr.b (a5)+
  4647. clr.b (a5)+
  4648. L003b38:
  4649. rts
  4650. L003b3a:
  4651. addq.l #6,a0
  4652. cmpi.w #$0001,d5
  4653. beq.s L003b54
  4654. cmpi.w #$0002,d5
  4655. beq.s L003b54
  4656. cmpi.w #$0005,d5
  4657. beq.s L003b54
  4658. cmpi.w #$0008,d5
  4659. bne.s L003b5a
  4660. L003b54:
  4661. bsr.w L0037c2
  4662. clr.b (a5)+
  4663. L003b5a:
  4664. rts
  4665. L003b5c:
  4666. addq.l #2,a0
  4667. move.l (a0)+,d1
  4668. cmpi.w #$0001,d5
  4669. beq.s L003b78
  4670. cmpi.w #$0002,d5
  4671. beq.s L003b78
  4672. cmpi.w #$0005,d5
  4673. beq.s L003b78
  4674. cmpi.w #$0008,d5
  4675. bne.s L003b92
  4676. L003b78:
  4677. add.l ($005e,a1),d1
  4678. cmp.w #$0004,d5
  4679. bls.s L003b88
  4680. bsr.w L0037c2
  4681. bra.s L003b8c
  4682. L003b88:
  4683. bsr.w L003724
  4684. L003b8c:
  4685. move.w d1,-(sp)
  4686. move.b (sp)+,(a5)+
  4687. move.b d1,(a5)+
  4688. L003b92:
  4689. rts
  4690. L003b94:
  4691. addq.l #2,a0
  4692. move.l (a0)+,d1
  4693. cmpi.w #$0001,d5
  4694. beq.s L003bb0
  4695. cmpi.w #$0002,d5
  4696. beq.s L003bb0
  4697. cmpi.w #$0005,d5
  4698. beq.s L003bb0
  4699. cmpi.w #$0008,d5
  4700. bne.s L003bca
  4701. L003bb0:
  4702. add.l ($0062,a1),d1
  4703. cmp.w #$0004,d5
  4704. bls.s L003bc0
  4705. bsr.w L0037c2
  4706. bra.s L003bc4
  4707. L003bc0:
  4708. bsr.w L003724
  4709. L003bc4:
  4710. move.w d1,-(sp)
  4711. move.b (sp)+,(a5)+
  4712. move.b d1,(a5)+
  4713. L003bca:
  4714. rts
  4715. L003bcc:
  4716. addq.l #2,a0
  4717. move.l (a0)+,d1
  4718. cmpi.w #$0001,d5
  4719. beq.s L003be8
  4720. cmpi.w #$0002,d5
  4721. beq.s L003be8
  4722. cmpi.w #$0005,d5
  4723. beq.s L003be8
  4724. cmpi.w #$0008,d5
  4725. bne.s L003c02
  4726. L003be8:
  4727. add.l ($0066,a1),d1
  4728. cmp.w #$0004,d5
  4729. bls.s L003bf8
  4730. bsr.w L0037c2
  4731. bra.s L003bfc
  4732. L003bf8:
  4733. bsr.w L003724
  4734. L003bfc:
  4735. move.w d1,-(sp)
  4736. move.b (sp)+,(a5)+
  4737. move.b d1,(a5)+
  4738. L003c02:
  4739. rts
  4740. L003c04:
  4741. addq.l #2,a0
  4742. move.l (a0)+,d1
  4743. cmpi.w #$0001,d5
  4744. beq.s L003c20
  4745. cmpi.w #$0002,d5
  4746. beq.s L003c20
  4747. cmpi.w #$0005,d5
  4748. beq.s L003c20
  4749. cmpi.w #$0008,d5
  4750. bne.s L003c40
  4751. L003c20:
  4752. add.l ($004e,a1),d1
  4753. subq.l #6,d7
  4754. bmi.w L00054e
  4755. addq.l #6,(-$005a,a6)
  4756. clr.w (a4)+
  4757. move.l a5,(a4)+
  4758. add.l (End+$000098,pc),d1
  4759. move.w a5,-(sp)
  4760. lsr.w (sp)+
  4761. bcs.w L003926
  4762. move.l d1,(a5)+
  4763. L003c40:
  4764. rts
  4765. L003c42:
  4766. addq.l #2,a0
  4767. move.l (a0)+,d1
  4768. cmpi.w #$0001,d5
  4769. beq.s L003c5e
  4770. cmpi.w #$0002,d5
  4771. beq.s L003c5e
  4772. cmpi.w #$0005,d5
  4773. beq.s L003c5e
  4774. cmpi.w #$0008,d5
  4775. bne.s L003c7e
  4776. L003c5e:
  4777. add.l ($0052,a1),d1
  4778. subq.l #6,d7
  4779. bmi.w L00054e
  4780. addq.l #6,(-$005a,a6)
  4781. clr.w (a4)+
  4782. move.l a5,(a4)+
  4783. add.l (End+$000098,pc),d1
  4784. move.w a5,-(sp)
  4785. lsr.w (sp)+
  4786. bcs.w L003926
  4787. move.l d1,(a5)+
  4788. L003c7e:
  4789. rts
  4790. L003c80:
  4791. addq.l #2,a0
  4792. move.l (a0)+,d1
  4793. cmpi.w #$0001,d5
  4794. beq.s L003c9c
  4795. cmpi.w #$0002,d5
  4796. beq.s L003c9c
  4797. cmpi.w #$0005,d5
  4798. beq.s L003c9c
  4799. cmpi.w #$0008,d5
  4800. bne.s L003cbc
  4801. L003c9c:
  4802. add.l ($0056,a1),d1
  4803. subq.l #6,d7
  4804. bmi.w L00054e
  4805. addq.l #6,(-$005a,a6)
  4806. clr.w (a4)+
  4807. move.l a5,(a4)+
  4808. add.l (End+$000098,pc),d1
  4809. move.w a5,-(sp)
  4810. lsr.w (sp)+
  4811. bcs.w L003926
  4812. move.l d1,(a5)+
  4813. L003cbc:
  4814. rts
  4815. L003cbe:
  4816. addq.l #2,a0
  4817. move.l (a0)+,d1
  4818. cmpi.w #$0001,d5
  4819. beq.s L003cda
  4820. cmpi.w #$0002,d5
  4821. beq.s L003cda
  4822. cmpi.w #$0005,d5
  4823. beq.s L003cda
  4824. cmpi.w #$0008,d5
  4825. bne.s L003cfa
  4826. L003cda:
  4827. add.l ($005a,a1),d1
  4828. subq.l #6,d7
  4829. bmi.w L00054e
  4830. addq.l #6,(-$005a,a6)
  4831. clr.w (a4)+
  4832. move.l a5,(a4)+
  4833. add.l (End+$000098,pc),d1
  4834. move.w a5,-(sp)
  4835. lsr.w (sp)+
  4836. bcs.w L003926
  4837. move.l d1,(a5)+
  4838. L003cfa:
  4839. rts
  4840. L003cfc:
  4841. addq.l #2,a0
  4842. move.l (a0)+,d1
  4843. cmpi.w #$0001,d5
  4844. beq.s L003d18
  4845. cmpi.w #$0002,d5
  4846. beq.s L003d18
  4847. cmpi.w #$0005,d5
  4848. beq.s L003d18
  4849. cmpi.w #$0008,d5
  4850. bne.s L003d6c
  4851. L003d18:
  4852. add.l ($005e,a1),d1
  4853. cmp.w #$0004,d5
  4854. bls.s L003d62
  4855. move.l (-$0042,a6),d0
  4856. cmp.l (End+$000054,pc),d0
  4857. beq.w L002ea2
  4858. addq.l #4,(-$0042,a6)
  4859. move.l a4,d0
  4860. movea.l (-$0046,a6),a4
  4861. suba.l (-$004a,a6),a5
  4862. cmpa.l (End+$000038,pc),a5
  4863. bcc.s L003d4e
  4864. suba.l (-$0052,a6),a5
  4865. move.l a5,(a4)+
  4866. adda.l (-$0052,a6),a5
  4867. bra.s L003d58
  4868. L003d4e:
  4869. suba.l (-$004e,a6),a5
  4870. move.l a5,(a4)+
  4871. adda.l (-$004e,a6),a5
  4872. L003d58:
  4873. move.l a4,(-$0046,a6)
  4874. movea.l d0,a4
  4875. adda.l (-$004a,a6),a5
  4876. L003d62:
  4877. move.w a5,-(sp)
  4878. lsr.w (sp)+
  4879. bcs.w L003926
  4880. move.l d1,(a5)+
  4881. L003d6c:
  4882. rts
  4883. L003d6e:
  4884. addq.l #2,a0
  4885. move.l (a0)+,d1
  4886. cmpi.w #$0001,d5
  4887. beq.s L003d8a
  4888. cmpi.w #$0002,d5
  4889. beq.s L003d8a
  4890. cmpi.w #$0005,d5
  4891. beq.s L003d8a
  4892. cmpi.w #$0008,d5
  4893. bne.s L003dde
  4894. L003d8a:
  4895. add.l ($0062,a1),d1
  4896. cmp.w #$0004,d5
  4897. bls.s L003dd4
  4898. move.l (-$0042,a6),d0
  4899. cmp.l (End+$000054,pc),d0
  4900. beq.w L002ea2
  4901. addq.l #4,(-$0042,a6)
  4902. move.l a4,d0
  4903. movea.l (-$0046,a6),a4
  4904. suba.l (-$004a,a6),a5
  4905. cmpa.l (End+$000038,pc),a5
  4906. bcc.s L003dc0
  4907. suba.l (-$0052,a6),a5
  4908. move.l a5,(a4)+
  4909. adda.l (-$0052,a6),a5
  4910. bra.s L003dca
  4911. L003dc0:
  4912. suba.l (-$004e,a6),a5
  4913. move.l a5,(a4)+
  4914. adda.l (-$004e,a6),a5
  4915. L003dca:
  4916. move.l a4,(-$0046,a6)
  4917. movea.l d0,a4
  4918. adda.l (-$004a,a6),a5
  4919. L003dd4:
  4920. move.w a5,-(sp)
  4921. lsr.w (sp)+
  4922. bcs.w L003926
  4923. move.l d1,(a5)+
  4924. L003dde:
  4925. rts
  4926. L003de0:
  4927. addq.l #2,a0
  4928. move.l (a0)+,d1
  4929. cmpi.w #$0001,d5
  4930. beq.s L003dfc
  4931. cmpi.w #$0002,d5
  4932. beq.s L003dfc
  4933. cmpi.w #$0005,d5
  4934. beq.s L003dfc
  4935. cmpi.w #$0008,d5
  4936. bne.s L003e50
  4937. L003dfc:
  4938. add.l ($0066,a1),d1
  4939. cmp.w #$0004,d5
  4940. bls.s L003e46
  4941. move.l (-$0042,a6),d0
  4942. cmp.l (End+$000054,pc),d0
  4943. beq.w L002ea2
  4944. addq.l #4,(-$0042,a6)
  4945. move.l a4,d0
  4946. movea.l (-$0046,a6),a4
  4947. suba.l (-$004a,a6),a5
  4948. cmpa.l (End+$000038,pc),a5
  4949. bcc.s L003e32
  4950. suba.l (-$0052,a6),a5
  4951. move.l a5,(a4)+
  4952. adda.l (-$0052,a6),a5
  4953. bra.s L003e3c
  4954. L003e32:
  4955. suba.l (-$004e,a6),a5
  4956. move.l a5,(a4)+
  4957. adda.l (-$004e,a6),a5
  4958. L003e3c:
  4959. move.l a4,(-$0046,a6)
  4960. movea.l d0,a4
  4961. adda.l (-$004a,a6),a5
  4962. L003e46:
  4963. move.w a5,-(sp)
  4964. lsr.w (sp)+
  4965. bcs.w L003926
  4966. move.l d1,(a5)+
  4967. L003e50:
  4968. rts
  4969. L003e52:
  4970. addq.l #2,a0
  4971. move.l (a0)+,d1
  4972. cmpi.w #$0001,d5
  4973. beq.s L003e6e
  4974. cmpi.w #$0002,d5
  4975. beq.s L003e6e
  4976. cmpi.w #$0005,d5
  4977. beq.s L003e6e
  4978. cmpi.w #$0008,d5
  4979. bne.s L003ec2
  4980. L003e6e:
  4981. add.l ($006a,a1),d1
  4982. cmp.w #$0004,d5
  4983. bls.s L003eb8
  4984. move.l (-$0042,a6),d0
  4985. cmp.l (End+$000054,pc),d0
  4986. beq.w L002ea2
  4987. addq.l #4,(-$0042,a6)
  4988. move.l a4,d0
  4989. movea.l (-$0046,a6),a4
  4990. suba.l (-$004a,a6),a5
  4991. cmpa.l (End+$000038,pc),a5
  4992. bcc.s L003ea4
  4993. suba.l (-$0052,a6),a5
  4994. move.l a5,(a4)+
  4995. adda.l (-$0052,a6),a5
  4996. bra.s L003eae
  4997. L003ea4:
  4998. suba.l (-$004e,a6),a5
  4999. move.l a5,(a4)+
  5000. adda.l (-$004e,a6),a5
  5001. L003eae:
  5002. move.l a4,(-$0046,a6)
  5003. movea.l d0,a4
  5004. adda.l (-$004a,a6),a5
  5005. L003eb8:
  5006. move.w a5,-(sp)
  5007. lsr.w (sp)+
  5008. bcs.w L003926
  5009. move.l d1,(a5)+
  5010. L003ec2:
  5011. rts
  5012. L003ec4:
  5013. addq.l #2,a0
  5014. move.l (a0)+,d1
  5015. cmpi.w #$0001,d5
  5016. beq.s L003ee0
  5017. cmpi.w #$0002,d5
  5018. beq.s L003ee0
  5019. cmpi.w #$0005,d5
  5020. beq.s L003ee0
  5021. cmpi.w #$0008,d5
  5022. bne.s L003f34
  5023. L003ee0:
  5024. add.l ($006e,a1),d1
  5025. cmp.w #$0004,d5
  5026. bls.s L003f2a
  5027. move.l (-$0042,a6),d0
  5028. cmp.l (End+$000054,pc),d0
  5029. beq.w L002ea2
  5030. addq.l #4,(-$0042,a6)
  5031. move.l a4,d0
  5032. movea.l (-$0046,a6),a4
  5033. suba.l (-$004a,a6),a5
  5034. cmpa.l (End+$000038,pc),a5
  5035. bcc.s L003f16
  5036. suba.l (-$0052,a6),a5
  5037. move.l a5,(a4)+
  5038. adda.l (-$0052,a6),a5
  5039. bra.s L003f20
  5040. L003f16:
  5041. suba.l (-$004e,a6),a5
  5042. move.l a5,(a4)+
  5043. adda.l (-$004e,a6),a5
  5044. L003f20:
  5045. move.l a4,(-$0046,a6)
  5046. movea.l d0,a4
  5047. adda.l (-$004a,a6),a5
  5048. L003f2a:
  5049. move.w a5,-(sp)
  5050. lsr.w (sp)+
  5051. bcs.w L003926
  5052. move.l d1,(a5)+
  5053. L003f34:
  5054. rts
  5055. L003f36:
  5056. addq.l #2,a0
  5057. move.l (a0)+,d1
  5058. cmpi.w #$0001,d5
  5059. beq.s L003f52
  5060. cmpi.w #$0002,d5
  5061. beq.s L003f52
  5062. cmpi.w #$0005,d5
  5063. beq.s L003f52
  5064. cmpi.w #$0008,d5
  5065. bne.s L003fa6
  5066. L003f52:
  5067. add.l ($0072,a1),d1
  5068. cmp.w #$0004,d5
  5069. bls.s L003f9c
  5070. move.l (-$0042,a6),d0
  5071. cmp.l (End+$000054,pc),d0
  5072. beq.w L002ea2
  5073. addq.l #4,(-$0042,a6)
  5074. move.l a4,d0
  5075. movea.l (-$0046,a6),a4
  5076. suba.l (-$004a,a6),a5
  5077. cmpa.l (End+$000038,pc),a5
  5078. bcc.s L003f88
  5079. suba.l (-$0052,a6),a5
  5080. move.l a5,(a4)+
  5081. adda.l (-$0052,a6),a5
  5082. bra.s L003f92
  5083. L003f88:
  5084. suba.l (-$004e,a6),a5
  5085. move.l a5,(a4)+
  5086. adda.l (-$004e,a6),a5
  5087. L003f92:
  5088. move.l a4,(-$0046,a6)
  5089. movea.l d0,a4
  5090. adda.l (-$004a,a6),a5
  5091. L003f9c:
  5092. move.w a5,-(sp)
  5093. lsr.w (sp)+
  5094. bcs.w L003926
  5095. move.l d1,(a5)+
  5096. L003fa6:
  5097. rts
  5098. L003fa8:
  5099. addq.l #2,a0
  5100. move.w (a0)+,d0
  5101. move.l (a0)+,d2
  5102. cmpi.w #$0001,d5
  5103. beq.s L003fc6
  5104. cmpi.w #$0002,d5
  5105. beq.s L003fc6
  5106. cmpi.w #$0005,d5
  5107. beq.s L003fc6
  5108. cmpi.w #$0008,d5
  5109. bne.s L003fde
  5110. L003fc6:
  5111. bsr.w L0036c6
  5112. add.l d2,d1
  5113. tst.w d0
  5114. beq.s L003fd6
  5115. bsr.w L0037c2
  5116. bra.s L003fda
  5117. L003fd6:
  5118. bsr.w L0036e2
  5119. L003fda:
  5120. clr.b (a5)+
  5121. move.b d1,(a5)+
  5122. L003fde:
  5123. rts
  5124. L003fe0:
  5125. addq.l #2,a0
  5126. move.w (a0)+,d0
  5127. move.l (a0)+,d2
  5128. cmpi.w #$0001,d5
  5129. beq.s L003ffe
  5130. cmpi.w #$0002,d5
  5131. beq.s L003ffe
  5132. cmpi.w #$0005,d5
  5133. beq.s L003ffe
  5134. cmpi.w #$0008,d5
  5135. bne.s L004014
  5136. L003ffe:
  5137. bsr.w L0036c6
  5138. add.l d2,d1
  5139. tst.w d0
  5140. beq.s L00400e
  5141. bsr.w L0037c2
  5142. bra.s L004012
  5143. L00400e:
  5144. bsr.w L0036e2
  5145. L004012:
  5146. move.b d1,(a5)+
  5147. L004014:
  5148. rts
  5149. L004016:
  5150. addq.l #2,a0
  5151. move.w (a0)+,d0
  5152. move.l (a0)+,d2
  5153. cmpi.w #$0001,d5
  5154. beq.s L004034
  5155. cmpi.w #$0002,d5
  5156. beq.s L004034
  5157. cmpi.w #$0005,d5
  5158. beq.s L004034
  5159. cmpi.w #$0008,d5
  5160. bne.s L004066
  5161. L004034:
  5162. bsr.w L0036c6
  5163. add.l d2,d1
  5164. tst.w d0
  5165. beq.s L00405c
  5166. cmp.w #$00fe,d0
  5167. beq.s L00404a
  5168. cmp.w #$0004,d0
  5169. bhi.s L004050
  5170. L00404a:
  5171. bsr.w L0037c2
  5172. bra.s L004060
  5173. L004050:
  5174. cmp.w #$0004,d5
  5175. bhi.s L00404a
  5176. bsr.w L003724
  5177. bra.s L004060
  5178. L00405c:
  5179. bsr.w L00370e
  5180. L004060:
  5181. move.w d1,-(sp)
  5182. move.b (sp)+,(a5)+
  5183. move.b d1,(a5)+
  5184. L004066:
  5185. rts
  5186. L004068:
  5187. addq.l #2,a0
  5188. move.w (a0)+,d0
  5189. move.l (a0)+,d2
  5190. cmpi.w #$0001,d5
  5191. beq.s L004086
  5192. cmpi.w #$0002,d5
  5193. beq.s L004086
  5194. cmpi.w #$0005,d5
  5195. beq.s L004086
  5196. cmpi.w #$0008,d5
  5197. bne.s L004100
  5198. L004086:
  5199. bsr.w L0036c6
  5200. add.l d2,d1
  5201. tst.w d0
  5202. beq.s L0040f6
  5203. cmp.w #$0004,d0
  5204. bls.s L0040e4
  5205. cmp.w #$00fe,d0
  5206. beq.s L0040e4
  5207. cmp.w #$0004,d5
  5208. bls.s L0040f6
  5209. move.l (-$0042,a6),d0
  5210. cmp.l (End+$000054,pc),d0
  5211. beq.w L002ea2
  5212. addq.l #4,(-$0042,a6)
  5213. move.l a4,d0
  5214. movea.l (-$0046,a6),a4
  5215. suba.l (-$004a,a6),a5
  5216. cmpa.l (End+$000038,pc),a5
  5217. bcc.s L0040ce
  5218. suba.l (-$0052,a6),a5
  5219. move.l a5,(a4)+
  5220. adda.l (-$0052,a6),a5
  5221. bra.s L0040d8
  5222. L0040ce:
  5223. suba.l (-$004e,a6),a5
  5224. move.l a5,(a4)+
  5225. adda.l (-$004e,a6),a5
  5226. L0040d8:
  5227. move.l a4,(-$0046,a6)
  5228. movea.l d0,a4
  5229. adda.l (-$004a,a6),a5
  5230. bra.s L0040f6
  5231. L0040e4:
  5232. subq.l #6,d7
  5233. bmi.w L00054e
  5234. addq.l #6,(-$005a,a6)
  5235. clr.w (a4)+
  5236. move.l a5,(a4)+
  5237. add.l (End+$000098,pc),d1
  5238. L0040f6:
  5239. move.w a5,-(sp)
  5240. lsr.w (sp)+
  5241. bcs.w L003926
  5242. move.l d1,(a5)+
  5243. L004100:
  5244. rts
  5245. L004102:
  5246. addq.l #2,a0
  5247. move.l (a0)+,d1
  5248. add.l (a0)+,d1
  5249. cmpi.w #$0001,d5
  5250. beq.s L004120
  5251. cmpi.w #$0002,d5
  5252. beq.s L004120
  5253. cmpi.w #$0005,d5
  5254. beq.s L004120
  5255. cmpi.w #$0008,d5
  5256. bne.s L004128
  5257. L004120:
  5258. bsr.w L0036e2
  5259. clr.b (a5)+
  5260. move.b d1,(a5)+
  5261. L004128:
  5262. rts
  5263. L00412a:
  5264. addq.l #2,a0
  5265. move.l (a0)+,d1
  5266. add.l (a0)+,d1
  5267. cmpi.w #$0001,d5
  5268. beq.s L004148
  5269. cmpi.w #$0002,d5
  5270. beq.s L004148
  5271. cmpi.w #$0005,d5
  5272. beq.s L004148
  5273. cmpi.w #$0008,d5
  5274. bne.s L00414e
  5275. L004148:
  5276. bsr.w L0036e2
  5277. move.b d1,(a5)+
  5278. L00414e:
  5279. rts
  5280. L004150:
  5281. addq.l #2,a0
  5282. move.l (a0)+,d1
  5283. add.l (a0)+,d1
  5284. cmpi.w #$0001,d5
  5285. beq.s L00416e
  5286. cmpi.w #$0002,d5
  5287. beq.s L00416e
  5288. cmpi.w #$0005,d5
  5289. beq.s L00416e
  5290. cmpi.w #$0008,d5
  5291. bne.s L004178
  5292. L00416e:
  5293. bsr.w L00370e
  5294. move.w d1,-(sp)
  5295. move.b (sp)+,(a5)+
  5296. move.b d1,(a5)+
  5297. L004178:
  5298. rts
  5299. L00417a:
  5300. addq.l #2,a0
  5301. move.l (a0)+,d1
  5302. add.l (a0)+,d1
  5303. cmpi.w #$0001,d5
  5304. beq.s L004198
  5305. cmpi.w #$0002,d5
  5306. beq.s L004198
  5307. cmpi.w #$0005,d5
  5308. beq.s L004198
  5309. cmpi.w #$0008,d5
  5310. bne.s L0041a2
  5311. L004198:
  5312. move.w a5,-(sp)
  5313. lsr.w (sp)+
  5314. bcs.w L003926
  5315. move.l d1,(a5)+
  5316. L0041a2:
  5317. rts
  5318. L0041a4:
  5319. lea.l ($000a,a0),a0
  5320. cmpi.w #$0001,d5
  5321. beq.s L0041c0
  5322. cmpi.w #$0002,d5
  5323. beq.s L0041c0
  5324. cmpi.w #$0005,d5
  5325. beq.s L0041c0
  5326. cmpi.w #$0008,d5
  5327. bne.s L0041c8
  5328. L0041c0:
  5329. bsr.w L0037c2
  5330. clr.b (a5)+
  5331. clr.b (a5)+
  5332. L0041c8:
  5333. rts
  5334. L0041ca:
  5335. lea.l ($000a,a0),a0
  5336. cmpi.w #$0001,d5
  5337. beq.s L0041e6
  5338. cmpi.w #$0002,d5
  5339. beq.s L0041e6
  5340. cmpi.w #$0005,d5
  5341. beq.s L0041e6
  5342. cmpi.w #$0008,d5
  5343. bne.s L0041ec
  5344. L0041e6:
  5345. bsr.w L0037c2
  5346. clr.b (a5)+
  5347. L0041ec:
  5348. rts
  5349. L0041ee:
  5350. addq.l #2,a0
  5351. move.l (a0)+,d1
  5352. add.l (a0)+,d1
  5353. cmpi.w #$0001,d5
  5354. beq.s L00420c
  5355. cmpi.w #$0002,d5
  5356. beq.s L00420c
  5357. cmpi.w #$0005,d5
  5358. beq.s L00420c
  5359. cmpi.w #$0008,d5
  5360. bne.s L004226
  5361. L00420c:
  5362. add.l ($005e,a1),d1
  5363. cmp.w #$0004,d5
  5364. bls.s L00421c
  5365. bsr.w L0037c2
  5366. bra.s L004220
  5367. L00421c:
  5368. bsr.w L003724
  5369. L004220:
  5370. move.w d1,-(sp)
  5371. move.b (sp)+,(a5)+
  5372. move.b d1,(a5)+
  5373. L004226:
  5374. rts
  5375. L004228:
  5376. addq.l #2,a0
  5377. move.l (a0)+,d1
  5378. add.l (a0)+,d1
  5379. cmpi.w #$0001,d5
  5380. beq.s L004246
  5381. cmpi.w #$0002,d5
  5382. beq.s L004246
  5383. cmpi.w #$0005,d5
  5384. beq.s L004246
  5385. cmpi.w #$0008,d5
  5386. bne.s L004260
  5387. L004246:
  5388. add.l ($0062,a1),d1
  5389. cmp.w #$0004,d5
  5390. bls.s L004256
  5391. bsr.w L0037c2
  5392. bra.s L00425a
  5393. L004256:
  5394. bsr.w L003724
  5395. L00425a:
  5396. move.w d1,-(sp)
  5397. move.b (sp)+,(a5)+
  5398. move.b d1,(a5)+
  5399. L004260:
  5400. rts
  5401. L004262:
  5402. addq.l #2,a0
  5403. move.l (a0)+,d1
  5404. add.l (a0)+,d1
  5405. cmpi.w #$0001,d5
  5406. beq.s L004280
  5407. cmpi.w #$0002,d5
  5408. beq.s L004280
  5409. cmpi.w #$0005,d5
  5410. beq.s L004280
  5411. cmpi.w #$0008,d5
  5412. bne.s L00429a
  5413. L004280:
  5414. add.l ($0066,a1),d1
  5415. cmp.w #$0004,d5
  5416. bls.s L004290
  5417. bsr.w L0037c2
  5418. bra.s L004294
  5419. L004290:
  5420. bsr.w L003724
  5421. L004294:
  5422. move.w d1,-(sp)
  5423. move.b (sp)+,(a5)+
  5424. move.b d1,(a5)+
  5425. L00429a:
  5426. rts
  5427. L00429c:
  5428. addq.l #2,a0
  5429. move.l (a0)+,d1
  5430. add.l (a0)+,d1
  5431. cmpi.w #$0001,d5
  5432. beq.s L0042ba
  5433. cmpi.w #$0002,d5
  5434. beq.s L0042ba
  5435. cmpi.w #$0005,d5
  5436. beq.s L0042ba
  5437. cmpi.w #$0008,d5
  5438. bne.s L0042da
  5439. L0042ba:
  5440. add.l ($004e,a1),d1
  5441. subq.l #6,d7
  5442. bmi.w L00054e
  5443. addq.l #6,(-$005a,a6)
  5444. clr.w (a4)+
  5445. move.l a5,(a4)+
  5446. add.l (End+$000098,pc),d1
  5447. move.w a5,-(sp)
  5448. lsr.w (sp)+
  5449. bcs.w L003926
  5450. move.l d1,(a5)+
  5451. L0042da:
  5452. rts
  5453. L0042dc:
  5454. addq.l #2,a0
  5455. move.l (a0)+,d1
  5456. add.l (a0)+,d1
  5457. cmpi.w #$0001,d5
  5458. beq.s L0042fa
  5459. cmpi.w #$0002,d5
  5460. beq.s L0042fa
  5461. cmpi.w #$0005,d5
  5462. beq.s L0042fa
  5463. cmpi.w #$0008,d5
  5464. bne.s L00431a
  5465. L0042fa:
  5466. add.l ($0052,a1),d1
  5467. subq.l #6,d7
  5468. bmi.w L00054e
  5469. addq.l #6,(-$005a,a6)
  5470. clr.w (a4)+
  5471. move.l a5,(a4)+
  5472. add.l (End+$000098,pc),d1
  5473. move.w a5,-(sp)
  5474. lsr.w (sp)+
  5475. bcs.w L003926
  5476. move.l d1,(a5)+
  5477. L00431a:
  5478. rts
  5479. L00431c:
  5480. addq.l #2,a0
  5481. move.l (a0)+,d1
  5482. add.l (a0)+,d1
  5483. cmpi.w #$0001,d5
  5484. beq.s L00433a
  5485. cmpi.w #$0002,d5
  5486. beq.s L00433a
  5487. cmpi.w #$0005,d5
  5488. beq.s L00433a
  5489. cmpi.w #$0008,d5
  5490. bne.s L00435a
  5491. L00433a:
  5492. add.l ($0056,a1),d1
  5493. subq.l #6,d7
  5494. bmi.w L00054e
  5495. addq.l #6,(-$005a,a6)
  5496. clr.w (a4)+
  5497. move.l a5,(a4)+
  5498. add.l (End+$000098,pc),d1
  5499. move.w a5,-(sp)
  5500. lsr.w (sp)+
  5501. bcs.w L003926
  5502. move.l d1,(a5)+
  5503. L00435a:
  5504. rts
  5505. L00435c:
  5506. addq.l #2,a0
  5507. move.l (a0)+,d1
  5508. add.l (a0)+,d1
  5509. cmpi.w #$0001,d5
  5510. beq.s L00437a
  5511. cmpi.w #$0002,d5
  5512. beq.s L00437a
  5513. cmpi.w #$0005,d5
  5514. beq.s L00437a
  5515. cmpi.w #$0008,d5
  5516. bne.s L00439a
  5517. L00437a:
  5518. add.l ($005a,a1),d1
  5519. subq.l #6,d7
  5520. bmi.w L00054e
  5521. addq.l #6,(-$005a,a6)
  5522. clr.w (a4)+
  5523. move.l a5,(a4)+
  5524. add.l (End+$000098,pc),d1
  5525. move.w a5,-(sp)
  5526. lsr.w (sp)+
  5527. bcs.w L003926
  5528. move.l d1,(a5)+
  5529. L00439a:
  5530. rts
  5531. L00439c:
  5532. addq.l #2,a0
  5533. move.l (a0)+,d1
  5534. add.l (a0)+,d1
  5535. cmpi.w #$0001,d5
  5536. beq.s L0043ba
  5537. cmpi.w #$0002,d5
  5538. beq.s L0043ba
  5539. cmpi.w #$0005,d5
  5540. beq.s L0043ba
  5541. cmpi.w #$0008,d5
  5542. bne.s L00440e
  5543. L0043ba:
  5544. add.l ($005e,a1),d1
  5545. cmp.w #$0004,d5
  5546. bls.s L004404
  5547. move.l (-$0042,a6),d0
  5548. cmp.l (End+$000054,pc),d0
  5549. beq.w L002ea2
  5550. addq.l #4,(-$0042,a6)
  5551. move.l a4,d0
  5552. movea.l (-$0046,a6),a4
  5553. suba.l (-$004a,a6),a5
  5554. cmpa.l (End+$000038,pc),a5
  5555. bcc.s L0043f0
  5556. suba.l (-$0052,a6),a5
  5557. move.l a5,(a4)+
  5558. adda.l (-$0052,a6),a5
  5559. bra.s L0043fa
  5560. L0043f0:
  5561. suba.l (-$004e,a6),a5
  5562. move.l a5,(a4)+
  5563. adda.l (-$004e,a6),a5
  5564. L0043fa:
  5565. move.l a4,(-$0046,a6)
  5566. movea.l d0,a4
  5567. adda.l (-$004a,a6),a5
  5568. L004404:
  5569. move.w a5,-(sp)
  5570. lsr.w (sp)+
  5571. bcs.w L003926
  5572. move.l d1,(a5)+
  5573. L00440e:
  5574. rts
  5575. L004410:
  5576. addq.l #2,a0
  5577. move.l (a0)+,d1
  5578. add.l (a0)+,d1
  5579. cmpi.w #$0001,d5
  5580. beq.s L00442e
  5581. cmpi.w #$0002,d5
  5582. beq.s L00442e
  5583. cmpi.w #$0005,d5
  5584. beq.s L00442e
  5585. cmpi.w #$0008,d5
  5586. bne.s L004482
  5587. L00442e:
  5588. add.l ($0062,a1),d1
  5589. cmp.w #$0004,d5
  5590. bls.s L004478
  5591. move.l (-$0042,a6),d0
  5592. cmp.l (End+$000054,pc),d0
  5593. beq.w L002ea2
  5594. addq.l #4,(-$0042,a6)
  5595. move.l a4,d0
  5596. movea.l (-$0046,a6),a4
  5597. suba.l (-$004a,a6),a5
  5598. cmpa.l (End+$000038,pc),a5
  5599. bcc.s L004464
  5600. suba.l (-$0052,a6),a5
  5601. move.l a5,(a4)+
  5602. adda.l (-$0052,a6),a5
  5603. bra.s L00446e
  5604. L004464:
  5605. suba.l (-$004e,a6),a5
  5606. move.l a5,(a4)+
  5607. adda.l (-$004e,a6),a5
  5608. L00446e:
  5609. move.l a4,(-$0046,a6)
  5610. movea.l d0,a4
  5611. adda.l (-$004a,a6),a5
  5612. L004478:
  5613. move.w a5,-(sp)
  5614. lsr.w (sp)+
  5615. bcs.w L003926
  5616. move.l d1,(a5)+
  5617. L004482:
  5618. rts
  5619. L004484:
  5620. addq.l #2,a0
  5621. move.l (a0)+,d1
  5622. add.l (a0)+,d1
  5623. cmpi.w #$0001,d5
  5624. beq.s L0044a2
  5625. cmpi.w #$0002,d5
  5626. beq.s L0044a2
  5627. cmpi.w #$0005,d5
  5628. beq.s L0044a2
  5629. cmpi.w #$0008,d5
  5630. bne.s L0044f6
  5631. L0044a2:
  5632. add.l ($0066,a1),d1
  5633. cmp.w #$0004,d5
  5634. bls.s L0044ec
  5635. move.l (-$0042,a6),d0
  5636. cmp.l (End+$000054,pc),d0
  5637. beq.w L002ea2
  5638. addq.l #4,(-$0042,a6)
  5639. move.l a4,d0
  5640. movea.l (-$0046,a6),a4
  5641. suba.l (-$004a,a6),a5
  5642. cmpa.l (End+$000038,pc),a5
  5643. bcc.s L0044d8
  5644. suba.l (-$0052,a6),a5
  5645. move.l a5,(a4)+
  5646. adda.l (-$0052,a6),a5
  5647. bra.s L0044e2
  5648. L0044d8:
  5649. suba.l (-$004e,a6),a5
  5650. move.l a5,(a4)+
  5651. adda.l (-$004e,a6),a5
  5652. L0044e2:
  5653. move.l a4,(-$0046,a6)
  5654. movea.l d0,a4
  5655. adda.l (-$004a,a6),a5
  5656. L0044ec:
  5657. move.w a5,-(sp)
  5658. lsr.w (sp)+
  5659. bcs.w L003926
  5660. move.l d1,(a5)+
  5661. L0044f6:
  5662. rts
  5663. L0044f8:
  5664. addq.l #2,a0
  5665. move.l (a0)+,d1
  5666. add.l (a0)+,d1
  5667. cmpi.w #$0001,d5
  5668. beq.s L004516
  5669. cmpi.w #$0002,d5
  5670. beq.s L004516
  5671. cmpi.w #$0005,d5
  5672. beq.s L004516
  5673. cmpi.w #$0008,d5
  5674. bne.s L00456a
  5675. L004516:
  5676. add.l ($006a,a1),d1
  5677. cmp.w #$0004,d5
  5678. bls.s L004560
  5679. move.l (-$0042,a6),d0
  5680. cmp.l (End+$000054,pc),d0
  5681. beq.w L002ea2
  5682. addq.l #4,(-$0042,a6)
  5683. move.l a4,d0
  5684. movea.l (-$0046,a6),a4
  5685. suba.l (-$004a,a6),a5
  5686. cmpa.l (End+$000038,pc),a5
  5687. bcc.s L00454c
  5688. suba.l (-$0052,a6),a5
  5689. move.l a5,(a4)+
  5690. adda.l (-$0052,a6),a5
  5691. bra.s L004556
  5692. L00454c:
  5693. suba.l (-$004e,a6),a5
  5694. move.l a5,(a4)+
  5695. adda.l (-$004e,a6),a5
  5696. L004556:
  5697. move.l a4,(-$0046,a6)
  5698. movea.l d0,a4
  5699. adda.l (-$004a,a6),a5
  5700. L004560:
  5701. move.w a5,-(sp)
  5702. lsr.w (sp)+
  5703. bcs.w L003926
  5704. move.l d1,(a5)+
  5705. L00456a:
  5706. rts
  5707. L00456c:
  5708. addq.l #2,a0
  5709. move.l (a0)+,d1
  5710. add.l (a0)+,d1
  5711. cmpi.w #$0001,d5
  5712. beq.s L00458a
  5713. cmpi.w #$0002,d5
  5714. beq.s L00458a
  5715. cmpi.w #$0005,d5
  5716. beq.s L00458a
  5717. cmpi.w #$0008,d5
  5718. bne.s L0045de
  5719. L00458a:
  5720. add.l ($006e,a1),d1
  5721. cmp.w #$0004,d5
  5722. bls.s L0045d4
  5723. move.l (-$0042,a6),d0
  5724. cmp.l (End+$000054,pc),d0
  5725. beq.w L002ea2
  5726. addq.l #4,(-$0042,a6)
  5727. move.l a4,d0
  5728. movea.l (-$0046,a6),a4
  5729. suba.l (-$004a,a6),a5
  5730. cmpa.l (End+$000038,pc),a5
  5731. bcc.s L0045c0
  5732. suba.l (-$0052,a6),a5
  5733. move.l a5,(a4)+
  5734. adda.l (-$0052,a6),a5
  5735. bra.s L0045ca
  5736. L0045c0:
  5737. suba.l (-$004e,a6),a5
  5738. move.l a5,(a4)+
  5739. adda.l (-$004e,a6),a5
  5740. L0045ca:
  5741. move.l a4,(-$0046,a6)
  5742. movea.l d0,a4
  5743. adda.l (-$004a,a6),a5
  5744. L0045d4:
  5745. move.w a5,-(sp)
  5746. lsr.w (sp)+
  5747. bcs.w L003926
  5748. move.l d1,(a5)+
  5749. L0045de:
  5750. rts
  5751. L0045e0:
  5752. addq.l #2,a0
  5753. move.l (a0)+,d1
  5754. add.l (a0)+,d1
  5755. cmpi.w #$0001,d5
  5756. beq.s L0045fe
  5757. cmpi.w #$0002,d5
  5758. beq.s L0045fe
  5759. cmpi.w #$0005,d5
  5760. beq.s L0045fe
  5761. cmpi.w #$0008,d5
  5762. bne.s L004652
  5763. L0045fe:
  5764. add.l ($0072,a1),d1
  5765. cmp.w #$0004,d5
  5766. bls.s L004648
  5767. move.l (-$0042,a6),d0
  5768. cmp.l (End+$000054,pc),d0
  5769. beq.w L002ea2
  5770. addq.l #4,(-$0042,a6)
  5771. move.l a4,d0
  5772. movea.l (-$0046,a6),a4
  5773. suba.l (-$004a,a6),a5
  5774. cmpa.l (End+$000038,pc),a5
  5775. bcc.s L004634
  5776. suba.l (-$0052,a6),a5
  5777. move.l a5,(a4)+
  5778. adda.l (-$0052,a6),a5
  5779. bra.s L00463e
  5780. L004634:
  5781. suba.l (-$004e,a6),a5
  5782. move.l a5,(a4)+
  5783. adda.l (-$004e,a6),a5
  5784. L00463e:
  5785. move.l a4,(-$0046,a6)
  5786. movea.l d0,a4
  5787. adda.l (-$004a,a6),a5
  5788. L004648:
  5789. move.w a5,-(sp)
  5790. lsr.w (sp)+
  5791. bcs.w L003926
  5792. move.l d1,(a5)+
  5793. L004652:
  5794. rts
  5795. L004654:
  5796. addq.l #2,a0
  5797. move.l (a0)+,d2
  5798. add.l ($004e,a1),d2
  5799. move.w (a0)+,d0
  5800. cmpi.w #$0001,d5
  5801. beq.s L004676
  5802. cmpi.w #$0002,d5
  5803. beq.s L004676
  5804. cmpi.w #$0005,d5
  5805. beq.s L004676
  5806. cmpi.w #$0008,d5
  5807. bne.s L00469c
  5808. L004676:
  5809. bsr.w L0036c6
  5810. sub.l d2,d1
  5811. tst.w d0
  5812. beq.s L00468c
  5813. cmp.w #$00fe,d0
  5814. beq.s L004692
  5815. cmp.w #$0004,d0
  5816. bls.s L004692
  5817. L00468c:
  5818. bsr.w L0037c2
  5819. bra.s L004696
  5820. L004692:
  5821. bsr.w L003724
  5822. L004696:
  5823. move.w d1,-(sp)
  5824. move.b (sp)+,(a5)+
  5825. move.b d1,(a5)+
  5826. L00469c:
  5827. rts
  5828. L00469e:
  5829. addq.l #2,a0
  5830. move.l (a0)+,d2
  5831. add.l ($0052,a1),d2
  5832. move.w (a0)+,d0
  5833. cmpi.w #$0001,d5
  5834. beq.s L0046c0
  5835. cmpi.w #$0002,d5
  5836. beq.s L0046c0
  5837. cmpi.w #$0005,d5
  5838. beq.s L0046c0
  5839. cmpi.w #$0008,d5
  5840. bne.s L0046e6
  5841. L0046c0:
  5842. bsr.w L0036c6
  5843. sub.l d2,d1
  5844. tst.w d0
  5845. beq.s L0046d6
  5846. cmp.w #$00fe,d0
  5847. beq.s L0046dc
  5848. cmp.w #$0004,d0
  5849. bls.s L0046dc
  5850. L0046d6:
  5851. bsr.w L0037c2
  5852. bra.s L0046e0
  5853. L0046dc:
  5854. bsr.w L003724
  5855. L0046e0:
  5856. move.w d1,-(sp)
  5857. move.b (sp)+,(a5)+
  5858. move.b d1,(a5)+
  5859. L0046e6:
  5860. rts
  5861. L0046e8:
  5862. addq.l #2,a0
  5863. move.l (a0)+,d2
  5864. add.l ($0056,a1),d2
  5865. move.w (a0)+,d0
  5866. cmpi.w #$0001,d5
  5867. beq.s L00470a
  5868. cmpi.w #$0002,d5
  5869. beq.s L00470a
  5870. cmpi.w #$0005,d5
  5871. beq.s L00470a
  5872. cmpi.w #$0008,d5
  5873. bne.s L004730
  5874. L00470a:
  5875. bsr.w L0036c6
  5876. sub.l d2,d1
  5877. tst.w d0
  5878. beq.s L004720
  5879. cmp.w #$00fe,d0
  5880. beq.s L004726
  5881. cmp.w #$0004,d0
  5882. bls.s L004726
  5883. L004720:
  5884. bsr.w L0037c2
  5885. bra.s L00472a
  5886. L004726:
  5887. bsr.w L003724
  5888. L00472a:
  5889. move.w d1,-(sp)
  5890. move.b (sp)+,(a5)+
  5891. move.b d1,(a5)+
  5892. L004730:
  5893. rts
  5894. L004732:
  5895. addq.l #2,a0
  5896. move.l (a0)+,d2
  5897. add.l ($005a,a1),d2
  5898. move.w (a0)+,d0
  5899. cmpi.w #$0001,d5
  5900. beq.s L004754
  5901. cmpi.w #$0002,d5
  5902. beq.s L004754
  5903. cmpi.w #$0005,d5
  5904. beq.s L004754
  5905. cmpi.w #$0008,d5
  5906. bne.s L00477a
  5907. L004754:
  5908. bsr.w L0036c6
  5909. sub.l d2,d1
  5910. tst.w d0
  5911. beq.s L00476a
  5912. cmp.w #$00fe,d0
  5913. beq.s L004770
  5914. cmp.w #$0004,d0
  5915. bls.s L004770
  5916. L00476a:
  5917. bsr.w L0037c2
  5918. bra.s L004774
  5919. L004770:
  5920. bsr.w L003724
  5921. L004774:
  5922. move.w d1,-(sp)
  5923. move.b (sp)+,(a5)+
  5924. move.b d1,(a5)+
  5925. L00477a:
  5926. rts
  5927. L00477c:
  5928. addq.l #2,a0
  5929. move.l (a0)+,d2
  5930. add.l ($005e,a1),d2
  5931. move.w (a0)+,d0
  5932. cmpi.w #$0001,d5
  5933. beq.s L00479e
  5934. cmpi.w #$0002,d5
  5935. beq.s L00479e
  5936. cmpi.w #$0005,d5
  5937. beq.s L00479e
  5938. cmpi.w #$0008,d5
  5939. bne.s L0047c0
  5940. L00479e:
  5941. bsr.w L0036c6
  5942. sub.l d2,d1
  5943. cmp.w #$00fe,d0
  5944. beq.s L0047b0
  5945. cmp.w #$0004,d0
  5946. bhi.s L0047b6
  5947. L0047b0:
  5948. bsr.w L0037c2
  5949. bra.s L0047ba
  5950. L0047b6:
  5951. bsr.w L003724
  5952. L0047ba:
  5953. move.w d1,-(sp)
  5954. move.b (sp)+,(a5)+
  5955. move.b d1,(a5)+
  5956. L0047c0:
  5957. rts
  5958. L0047c2:
  5959. addq.l #2,a0
  5960. move.l (a0)+,d2
  5961. add.l ($0062,a1),d2
  5962. move.w (a0)+,d0
  5963. cmpi.w #$0001,d5
  5964. beq.s L0047e4
  5965. cmpi.w #$0002,d5
  5966. beq.s L0047e4
  5967. cmpi.w #$0005,d5
  5968. beq.s L0047e4
  5969. cmpi.w #$0008,d5
  5970. bne.s L004806
  5971. L0047e4:
  5972. bsr.w L0036c6
  5973. sub.l d2,d1
  5974. cmp.w #$00fe,d0
  5975. beq.s L0047f6
  5976. cmp.w #$0004,d0
  5977. bhi.s L0047fc
  5978. L0047f6:
  5979. bsr.w L0037c2
  5980. bra.s L004800
  5981. L0047fc:
  5982. bsr.w L003724
  5983. L004800:
  5984. move.w d1,-(sp)
  5985. move.b (sp)+,(a5)+
  5986. move.b d1,(a5)+
  5987. L004806:
  5988. rts
  5989. L004808:
  5990. addq.l #2,a0
  5991. move.l (a0)+,d2
  5992. add.l ($0066,a1),d2
  5993. move.w (a0)+,d0
  5994. cmpi.w #$0001,d5
  5995. beq.s L00482a
  5996. cmpi.w #$0002,d5
  5997. beq.s L00482a
  5998. cmpi.w #$0005,d5
  5999. beq.s L00482a
  6000. cmpi.w #$0008,d5
  6001. bne.s L00484c
  6002. L00482a:
  6003. bsr.w L0036c6
  6004. sub.l d2,d1
  6005. cmp.w #$00fe,d0
  6006. beq.s L00483c
  6007. cmp.w #$0004,d0
  6008. bhi.s L004842
  6009. L00483c:
  6010. bsr.w L0037c2
  6011. bra.s L004846
  6012. L004842:
  6013. bsr.w L003724
  6014. L004846:
  6015. move.w d1,-(sp)
  6016. move.b (sp)+,(a5)+
  6017. move.b d1,(a5)+
  6018. L00484c:
  6019. rts
  6020. L00484e:
  6021. addq.l #2,a0
  6022. move.l (a0)+,d2
  6023. add.l ($006a,a1),d2
  6024. move.w (a0)+,d0
  6025. cmpi.w #$0001,d5
  6026. beq.s L004870
  6027. cmpi.w #$0002,d5
  6028. beq.s L004870
  6029. cmpi.w #$0005,d5
  6030. beq.s L004870
  6031. cmpi.w #$0008,d5
  6032. bne.s L004892
  6033. L004870:
  6034. bsr.w L0036c6
  6035. sub.l d2,d1
  6036. cmp.w #$00fe,d0
  6037. beq.s L004882
  6038. cmp.w #$0004,d0
  6039. bhi.s L004888
  6040. L004882:
  6041. bsr.w L0037c2
  6042. bra.s L00488c
  6043. L004888:
  6044. bsr.w L003724
  6045. L00488c:
  6046. move.w d1,-(sp)
  6047. move.b (sp)+,(a5)+
  6048. move.b d1,(a5)+
  6049. L004892:
  6050. rts
  6051. L004894:
  6052. addq.l #2,a0
  6053. move.l (a0)+,d2
  6054. add.l ($006e,a1),d2
  6055. move.w (a0)+,d0
  6056. cmpi.w #$0001,d5
  6057. beq.s L0048b6
  6058. cmpi.w #$0002,d5
  6059. beq.s L0048b6
  6060. cmpi.w #$0005,d5
  6061. beq.s L0048b6
  6062. cmpi.w #$0008,d5
  6063. bne.s L0048d8
  6064. L0048b6:
  6065. bsr.w L0036c6
  6066. sub.l d2,d1
  6067. cmp.w #$00fe,d0
  6068. bhi.s L0048c8
  6069. cmp.w #$0004,d0
  6070. bhi.s L0048ce
  6071. L0048c8:
  6072. bsr.w L0037c2
  6073. bra.s L0048d2
  6074. L0048ce:
  6075. bsr.w L003724
  6076. L0048d2:
  6077. move.w d1,-(sp)
  6078. move.b (sp)+,(a5)+
  6079. move.b d1,(a5)+
  6080. L0048d8:
  6081. rts
  6082. L0048da:
  6083. addq.l #2,a0
  6084. move.l (a0)+,d2
  6085. add.l ($0072,a1),d2
  6086. move.w (a0)+,d0
  6087. cmpi.w #$0001,d5
  6088. beq.s L0048fc
  6089. cmpi.w #$0002,d5
  6090. beq.s L0048fc
  6091. cmpi.w #$0005,d5
  6092. beq.s L0048fc
  6093. cmpi.w #$0008,d5
  6094. bne.s L00491e
  6095. L0048fc:
  6096. bsr.w L0036c6
  6097. sub.l d2,d1
  6098. cmp.w #$00fe,d0
  6099. beq.s L00490e
  6100. cmp.w #$0004,d0
  6101. bhi.s L004914
  6102. L00490e:
  6103. bsr.w L0037c2
  6104. bra.s L004918
  6105. L004914:
  6106. bsr.w L003724
  6107. L004918:
  6108. move.w d1,-(sp)
  6109. move.b (sp)+,(a5)+
  6110. move.b d1,(a5)+
  6111. L00491e:
  6112. rts
  6113. L004920:
  6114. addq.l #2,a0
  6115. move.l (a0)+,d2
  6116. add.l ($004e,a1),d2
  6117. move.w (a0)+,d0
  6118. cmpi.w #$0001,d5
  6119. beq.s L004942
  6120. cmpi.w #$0002,d5
  6121. beq.s L004942
  6122. cmpi.w #$0005,d5
  6123. beq.s L004942
  6124. cmpi.w #$0008,d5
  6125. bne.s L004964
  6126. L004942:
  6127. bsr.w L0036c6
  6128. sub.l d2,d1
  6129. tst.w d0
  6130. beq.s L004958
  6131. cmp.w #$00fe,d0
  6132. beq.s L00495e
  6133. cmp.w #$0004,d0
  6134. bls.s L00495e
  6135. L004958:
  6136. bsr.w L0037c2
  6137. bra.s L004962
  6138. L00495e:
  6139. bsr.w L0036f8
  6140. L004962:
  6141. move.b d1,(a5)+
  6142. L004964:
  6143. rts
  6144. L004966:
  6145. addq.l #2,a0
  6146. move.l (a0)+,d2
  6147. add.l ($0052,a1),d2
  6148. move.w (a0)+,d0
  6149. cmpi.w #$0001,d5
  6150. beq.s L004988
  6151. cmpi.w #$0002,d5
  6152. beq.s L004988
  6153. cmpi.w #$0005,d5
  6154. beq.s L004988
  6155. cmpi.w #$0008,d5
  6156. bne.s L0049aa
  6157. L004988:
  6158. bsr.w L0036c6
  6159. sub.l d2,d1
  6160. tst.w d0
  6161. beq.s L00499e
  6162. cmp.w #$00fe,d0
  6163. beq.s L0049a4
  6164. cmp.w #$0004,d0
  6165. bls.s L0049a4
  6166. L00499e:
  6167. bsr.w L0037c2
  6168. bra.s L0049a8
  6169. L0049a4:
  6170. bsr.w L0036f8
  6171. L0049a8:
  6172. move.b d1,(a5)+
  6173. L0049aa:
  6174. rts
  6175. L0049ac:
  6176. addq.l #2,a0
  6177. move.l (a0)+,d2
  6178. add.l ($0056,a1),d2
  6179. move.w (a0)+,d0
  6180. cmpi.w #$0001,d5
  6181. beq.s L0049ce
  6182. cmpi.w #$0002,d5
  6183. beq.s L0049ce
  6184. cmpi.w #$0005,d5
  6185. beq.s L0049ce
  6186. cmpi.w #$0008,d5
  6187. bne.s L0049f0
  6188. L0049ce:
  6189. bsr.w L0036c6
  6190. sub.l d2,d1
  6191. tst.w d0
  6192. beq.s L0049e4
  6193. cmp.w #$00fe,d0
  6194. beq.s L0049ea
  6195. cmp.w #$0004,d0
  6196. bls.s L0049ea
  6197. L0049e4:
  6198. bsr.w L0037c2
  6199. bra.s L0049ee
  6200. L0049ea:
  6201. bsr.w L0036f8
  6202. L0049ee:
  6203. move.b d1,(a5)+
  6204. L0049f0:
  6205. rts
  6206. L0049f2:
  6207. addq.l #2,a0
  6208. move.l (a0)+,d2
  6209. add.l ($005a,a1),d2
  6210. move.w (a0)+,d0
  6211. cmpi.w #$0001,d5
  6212. beq.s L004a14
  6213. cmpi.w #$0002,d5
  6214. beq.s L004a14
  6215. cmpi.w #$0005,d5
  6216. beq.s L004a14
  6217. cmpi.w #$0008,d5
  6218. bne.s L004a36
  6219. L004a14:
  6220. bsr.w L0036c6
  6221. sub.l d2,d1
  6222. tst.w d0
  6223. beq.s L004a2a
  6224. cmp.w #$00fe,d0
  6225. beq.s L004a30
  6226. cmp.w #$0004,d0
  6227. bls.s L004a30
  6228. L004a2a:
  6229. bsr.w L0037c2
  6230. bra.s L004a34
  6231. L004a30:
  6232. bsr.w L0036f8
  6233. L004a34:
  6234. move.b d1,(a5)+
  6235. L004a36:
  6236. rts
  6237. L004a38:
  6238. addq.l #2,a0
  6239. move.l (a0)+,d2
  6240. add.l ($005e,a1),d2
  6241. move.w (a0)+,d0
  6242. cmpi.w #$0001,d5
  6243. beq.s L004a5a
  6244. cmpi.w #$0002,d5
  6245. beq.s L004a5a
  6246. cmpi.w #$0005,d5
  6247. beq.s L004a5a
  6248. cmpi.w #$0008,d5
  6249. bne.s L004a78
  6250. L004a5a:
  6251. bsr.w L0036c6
  6252. sub.l d2,d1
  6253. cmp.w #$00fe,d0
  6254. beq.s L004a6c
  6255. cmp.w #$0004,d0
  6256. bhi.s L004a72
  6257. L004a6c:
  6258. bsr.w L0037c2
  6259. bra.s L004a76
  6260. L004a72:
  6261. bsr.w L0036f8
  6262. L004a76:
  6263. move.b d1,(a5)+
  6264. L004a78:
  6265. rts
  6266. L004a7a:
  6267. addq.l #2,a0
  6268. move.l (a0)+,d2
  6269. add.l ($0062,a1),d2
  6270. move.w (a0)+,d0
  6271. cmpi.w #$0001,d5
  6272. beq.s L004a9c
  6273. cmpi.w #$0002,d5
  6274. beq.s L004a9c
  6275. cmpi.w #$0005,d5
  6276. beq.s L004a9c
  6277. cmpi.w #$0008,d5
  6278. bne.s L004aba
  6279. L004a9c:
  6280. bsr.w L0036c6
  6281. sub.l d2,d1
  6282. cmp.w #$00fe,d0
  6283. beq.s L004aae
  6284. cmp.w #$0004,d0
  6285. bhi.s L004ab4
  6286. L004aae:
  6287. bsr.w L0037c2
  6288. bra.s L004ab8
  6289. L004ab4:
  6290. bsr.w L0036f8
  6291. L004ab8:
  6292. move.b d1,(a5)+
  6293. L004aba:
  6294. rts
  6295. L004abc:
  6296. addq.l #2,a0
  6297. move.l (a0)+,d2
  6298. add.l ($0066,a1),d2
  6299. move.w (a0)+,d0
  6300. cmpi.w #$0001,d5
  6301. beq.s L004ade
  6302. cmpi.w #$0002,d5
  6303. beq.s L004ade
  6304. cmpi.w #$0005,d5
  6305. beq.s L004ade
  6306. cmpi.w #$0008,d5
  6307. bne.s L004afc
  6308. L004ade:
  6309. bsr.w L0036c6
  6310. sub.l d2,d1
  6311. cmp.w #$00fe,d0
  6312. beq.s L004af0
  6313. cmp.w #$0004,d0
  6314. bhi.s L004af6
  6315. L004af0:
  6316. bsr.w L0037c2
  6317. bra.s L004afa
  6318. L004af6:
  6319. bsr.w L0036f8
  6320. L004afa:
  6321. move.b d1,(a5)+
  6322. L004afc:
  6323. rts
  6324. L004afe:
  6325. addq.l #2,a0
  6326. move.l (a0)+,d2
  6327. add.l ($006a,a1),d2
  6328. move.w (a0)+,d0
  6329. cmpi.w #$0001,d5
  6330. beq.s L004b20
  6331. cmpi.w #$0002,d5
  6332. beq.s L004b20
  6333. cmpi.w #$0005,d5
  6334. beq.s L004b20
  6335. cmpi.w #$0008,d5
  6336. bne.s L004b3e
  6337. L004b20:
  6338. bsr.w L0036c6
  6339. sub.l d2,d1
  6340. cmp.w #$00fe,d0
  6341. beq.s L004b32
  6342. cmp.w #$0004,d0
  6343. bhi.s L004b38
  6344. L004b32:
  6345. bsr.w L0037c2
  6346. bra.s L004b3c
  6347. L004b38:
  6348. bsr.w L0036f8
  6349. L004b3c:
  6350. move.b d1,(a5)+
  6351. L004b3e:
  6352. rts
  6353. L004b40:
  6354. addq.l #2,a0
  6355. move.l (a0)+,d2
  6356. add.l ($006e,a1),d2
  6357. move.w (a0)+,d0
  6358. cmpi.w #$0001,d5
  6359. beq.s L004b62
  6360. cmpi.w #$0002,d5
  6361. beq.s L004b62
  6362. cmpi.w #$0005,d5
  6363. beq.s L004b62
  6364. cmpi.w #$0008,d5
  6365. bne.s L004b80
  6366. L004b62:
  6367. bsr.w L0036c6
  6368. sub.l d2,d1
  6369. cmp.w #$00fe,d0
  6370. bhi.s L004b74
  6371. cmp.w #$0004,d0
  6372. bhi.s L004b7a
  6373. L004b74:
  6374. bsr.w L0037c2
  6375. bra.s L004b7e
  6376. L004b7a:
  6377. bsr.w L0036f8
  6378. L004b7e:
  6379. move.b d1,(a5)+
  6380. L004b80:
  6381. rts
  6382. L004b82:
  6383. addq.l #2,a0
  6384. move.l (a0)+,d2
  6385. add.l ($0072,a1),d2
  6386. move.w (a0)+,d0
  6387. cmpi.w #$0001,d5
  6388. beq.s L004ba4
  6389. cmpi.w #$0002,d5
  6390. beq.s L004ba4
  6391. cmpi.w #$0005,d5
  6392. beq.s L004ba4
  6393. cmpi.w #$0008,d5
  6394. bne.s L004bc2
  6395. L004ba4:
  6396. bsr.w L0036c6
  6397. sub.l d2,d1
  6398. cmp.w #$00fe,d0
  6399. beq.s L004bb6
  6400. cmp.w #$0004,d0
  6401. bhi.s L004bbc
  6402. L004bb6:
  6403. bsr.w L0037c2
  6404. bra.s L004bc0
  6405. L004bbc:
  6406. bsr.w L0036f8
  6407. L004bc0:
  6408. move.b d1,(a5)+
  6409. L004bc2:
  6410. rts
  6411. L004bc4:
  6412. addq.l #2,a0
  6413. move.w (a0)+,d0
  6414. bsr.w L0036c6
  6415. tst.w d0
  6416. beq.s L004be6
  6417. cmp.w #$0004,d0
  6418. bls.s L004be2
  6419. cmp.w #$00fe,d0
  6420. beq.s L004be2
  6421. move.w #$0002,d0
  6422. bra.s L004be6
  6423. L004be2:
  6424. move.w #$0001,d0
  6425. L004be6:
  6426. movea.l (End+$000090,pc),a3
  6427. cmpa.l (End+$00008c,pc),a3
  6428. beq.w L0037f2
  6429. move.l d1,-(a3)
  6430. move.w d0,-(a3)
  6431. lea.l (End+$000090,pc),a3
  6432. subq.l #6,(a3)
  6433. rts
  6434. L004bfe:
  6435. addq.l #2,a0
  6436. move.l (a0)+,d1
  6437. movea.l (End+$000090,pc),a3
  6438. cmpa.l (End+$00008c,pc),a3
  6439. beq.w L0037f2
  6440. move.l d1,-(a3)
  6441. move.w #$0000,-(a3)
  6442. lea.l (End+$000090,pc),a3
  6443. subq.l #6,(a3)
  6444. rts
  6445. L004c1c:
  6446. addq.l #2,a0
  6447. move.l (a0)+,d1
  6448. add.l ($004e,a1),d1
  6449. L004c24:
  6450. movea.l (End+$000090,pc),a3
  6451. cmpa.l (End+$00008c,pc),a3
  6452. beq.w L0037f2
  6453. move.l d1,-(a3)
  6454. move.w #$0001,-(a3)
  6455. lea.l (End+$000090,pc),a3
  6456. subq.l #6,(a3)
  6457. rts
  6458. L004c3e:
  6459. addq.l #2,a0
  6460. move.l (a0)+,d1
  6461. add.l ($0052,a1),d1
  6462. bra.s L004c24
  6463. L004c48:
  6464. addq.l #2,a0
  6465. move.l (a0)+,d1
  6466. add.l ($0056,a1),d1
  6467. bra.s L004c24
  6468. L004c52:
  6469. addq.l #2,a0
  6470. move.l (a0)+,d1
  6471. add.l ($005a,a1),d1
  6472. bra.s L004c24
  6473. L004c5c:
  6474. addq.l #2,a0
  6475. move.l (a0)+,d1
  6476. add.l ($005e,a1),d1
  6477. L004c64:
  6478. movea.l (End+$000090,pc),a3
  6479. cmpa.l (End+$00008c,pc),a3
  6480. beq.w L0037f2
  6481. move.l d1,-(a3)
  6482. move.w #$0002,-(a3)
  6483. lea.l (End+$000090,pc),a3
  6484. subq.l #6,(a3)
  6485. rts
  6486. L004c7e:
  6487. addq.l #2,a0
  6488. move.l (a0)+,d1
  6489. add.l ($0062,a1),d1
  6490. bra.s L004c64
  6491. L004c88:
  6492. addq.l #2,a0
  6493. move.l (a0)+,d1
  6494. add.l ($0066,a1),d1
  6495. bra.s L004c64
  6496. L004c92:
  6497. addq.l #2,a0
  6498. move.l (a0)+,d1
  6499. add.l ($006a,a1),d1
  6500. bra.s L004c64
  6501. L004c9c:
  6502. addq.l #2,a0
  6503. move.l (a0)+,d1
  6504. add.l ($006e,a1),d1
  6505. bra.s L004c64
  6506. L004ca6:
  6507. addq.l #2,a0
  6508. move.l (a0)+,d1
  6509. add.l ($0072,a1),d1
  6510. bra.s L004c64
  6511. L004cb0:
  6512. addq.l #2,a0
  6513. movea.l (End+$000090,pc),a3
  6514. cmpa.l (End+$000088,pc),a3
  6515. beq.w L0037f8
  6516. move.w (a3)+,d0
  6517. move.l (a3)+,d1
  6518. cmpi.w #$0001,d5
  6519. beq.s L004cda
  6520. cmpi.w #$0002,d5
  6521. beq.s L004cda
  6522. cmpi.w #$0005,d5
  6523. beq.s L004cda
  6524. cmpi.w #$0008,d5
  6525. bne.s L004cee
  6526. L004cda:
  6527. tst.w d0
  6528. beq.s L004ce6
  6529. bmi.s L004cea
  6530. bsr.w L0037c2
  6531. bra.s L004cea
  6532. L004ce6:
  6533. bsr.w L0036e2
  6534. L004cea:
  6535. clr.b (a5)+
  6536. move.b d1,(a5)+
  6537. L004cee:
  6538. lea.l (End+$000090,pc),a3
  6539. addq.l #6,(a3)
  6540. rts
  6541. L004cf6:
  6542. addq.l #2,a0
  6543. movea.l (End+$000090,pc),a3
  6544. cmpa.l (End+$000088,pc),a3
  6545. beq.w L0037f8
  6546. move.w (a3)+,d0
  6547. move.l (a3)+,d1
  6548. cmpi.w #$0001,d5
  6549. beq.s L004d20
  6550. cmpi.w #$0002,d5
  6551. beq.s L004d20
  6552. cmpi.w #$0005,d5
  6553. beq.s L004d20
  6554. cmpi.w #$0008,d5
  6555. bne.s L004d32
  6556. L004d20:
  6557. tst.w d0
  6558. beq.s L004d2c
  6559. bmi.s L004d30
  6560. bsr.w L0037c2
  6561. bra.s L004d30
  6562. L004d2c:
  6563. bsr.w L0036e2
  6564. L004d30:
  6565. move.b d1,(a5)+
  6566. L004d32:
  6567. lea.l (End+$000090,pc),a3
  6568. addq.l #6,(a3)
  6569. rts
  6570. L004d3a:
  6571. addq.l #2,a0
  6572. movea.l (End+$000090,pc),a3
  6573. cmpa.l (End+$000088,pc),a3
  6574. beq.w L0037f8
  6575. move.w (a3)+,d0
  6576. move.l (a3)+,d1
  6577. cmpi.w #$0001,d5
  6578. beq.s L004d64
  6579. cmpi.w #$0002,d5
  6580. beq.s L004d64
  6581. cmpi.w #$0005,d5
  6582. beq.s L004d64
  6583. cmpi.w #$0008,d5
  6584. bne.s L004d8c
  6585. L004d64:
  6586. tst.w d0
  6587. beq.s L004d82
  6588. bmi.s L004d86
  6589. cmpi.w #$0001,d0
  6590. beq.s L004d7c
  6591. cmpi.w #$0004,d5
  6592. bhi.s L004d7c
  6593. bsr.w L003724
  6594. bra.s L004d86
  6595. L004d7c:
  6596. bsr.w L0037c2
  6597. bra.s L004d86
  6598. L004d82:
  6599. bsr.w L00370e
  6600. L004d86:
  6601. move.w d1,-(sp)
  6602. move.b (sp)+,(a5)+
  6603. move.b d1,(a5)+
  6604. L004d8c:
  6605. lea.l (End+$000090,pc),a3
  6606. addq.l #6,(a3)
  6607. rts
  6608. L004d94:
  6609. addq.l #2,a0
  6610. movea.l (End+$000090,pc),a3
  6611. cmpa.l (End+$000088,pc),a3
  6612. beq.w L0037f8
  6613. move.w (a3)+,d0
  6614. move.l (a3)+,d1
  6615. cmpi.w #$0001,d5
  6616. beq.s L004dbe
  6617. cmpi.w #$0002,d5
  6618. beq.s L004dbe
  6619. cmpi.w #$0005,d5
  6620. beq.s L004dbe
  6621. cmpi.w #$0008,d5
  6622. bne.s L004e30
  6623. L004dbe:
  6624. tst.w d0
  6625. beq.s L004e24
  6626. bmi.s L004e24
  6627. cmpi.w #$0001,d0
  6628. beq.s L004e12
  6629. cmpi.w #$0004,d5
  6630. bls.s L004e24
  6631. move.l (-$0042,a6),d0
  6632. cmp.l (End+$000054,pc),d0
  6633. beq.w L002ea2
  6634. addq.l #4,(-$0042,a6)
  6635. move.l a4,d0
  6636. movea.l (-$0046,a6),a4
  6637. suba.l (-$004a,a6),a5
  6638. cmpa.l (End+$000038,pc),a5
  6639. bcc.s L004dfc
  6640. suba.l (-$0052,a6),a5
  6641. move.l a5,(a4)+
  6642. adda.l (-$0052,a6),a5
  6643. bra.s L004e06
  6644. L004dfc:
  6645. suba.l (-$004e,a6),a5
  6646. move.l a5,(a4)+
  6647. adda.l (-$004e,a6),a5
  6648. L004e06:
  6649. move.l a4,(-$0046,a6)
  6650. movea.l d0,a4
  6651. adda.l (-$004a,a6),a5
  6652. bra.s L004e24
  6653. L004e12:
  6654. subq.l #6,d7
  6655. bmi.w L00054e
  6656. addq.l #6,(-$005a,a6)
  6657. clr.w (a4)+
  6658. move.l a5,(a4)+
  6659. add.l (End+$000098,pc),d1
  6660. L004e24:
  6661. move.w a5,-(sp)
  6662. lsr.w (sp)+
  6663. bcc.s L004e2e
  6664. bsr.w L003924
  6665. L004e2e:
  6666. move.l d1,(a5)+
  6667. L004e30:
  6668. lea.l (End+$000090,pc),a3
  6669. addq.l #6,(a3)
  6670. rts
  6671. L004e38:
  6672. addq.l #2,a0
  6673. movea.l (End+$000090,pc),a3
  6674. cmpa.l (End+$000088,pc),a3
  6675. beq.w L0037f8
  6676. move.w (a3)+,d0
  6677. move.l (a3)+,d1
  6678. cmpi.w #$0001,d5
  6679. beq.s L004e62
  6680. cmpi.w #$0002,d5
  6681. beq.s L004e62
  6682. cmpi.w #$0005,d5
  6683. beq.s L004e62
  6684. cmpi.w #$0008,d5
  6685. bne.s L004e84
  6686. L004e62:
  6687. tst.w d0
  6688. beq.s L004e7a
  6689. bmi.s L004e7e
  6690. cmpi.w #$0001,d0
  6691. beq.s L004e74
  6692. cmpi.w #$0004,d5
  6693. bls.s L004e7a
  6694. L004e74:
  6695. bsr.w L0037c2
  6696. bra.s L004e7e
  6697. L004e7a:
  6698. bsr.w L003724
  6699. L004e7e:
  6700. move.w d1,-(sp)
  6701. move.b (sp)+,(a5)+
  6702. move.b d1,(a5)+
  6703. L004e84:
  6704. lea.l (End+$000090,pc),a3
  6705. addq.l #6,(a3)
  6706. rts
  6707. L004e8c:
  6708. addq.l #2,a0
  6709. movea.l (End+$000090,pc),a3
  6710. cmpa.l (End+$000088,pc),a3
  6711. beq.s L004e9e
  6712. move.w (a3)+,d2
  6713. move.l (a3)+,d0
  6714. rts
  6715. L004e9e:
  6716. addq.l #4,sp
  6717. bra.w L0037f8
  6718. L004ea4:
  6719. addq.l #2,a0
  6720. movea.l (End+$000090,pc),a3
  6721. cmpa.l (End+$000088,pc),a3
  6722. beq.s L004e9e
  6723. move.w (a3)+,d2
  6724. move.l (a3)+,d0
  6725. cmpa.l (End+$000088,pc),a3
  6726. beq.s L004e9e
  6727. move.w (a3)+,d3
  6728. move.l (a3)+,d1
  6729. rts
  6730. L004ec0:
  6731. tst.w d2
  6732. ble.s L004eca
  6733. bsr.w L0037b8
  6734. moveq.l #$ff,d2
  6735. L004eca:
  6736. rts
  6737. L004ecc:
  6738. moveq.l #$00,d4
  6739. tst.w d2
  6740. beq.s L004eda
  6741. bmi.s L004ee4
  6742. bsr.w L0037b8
  6743. bra.s L004ee4
  6744. L004eda:
  6745. tst.w d3
  6746. beq.s L004ee6
  6747. bmi.s L004ee4
  6748. bsr.w L0037b8
  6749. L004ee4:
  6750. moveq.l #$ff,d4
  6751. L004ee6:
  6752. rts
  6753. L004ee8:
  6754. bsr.s L004e8c
  6755. bsr.s L004ec0
  6756. tst.w d2
  6757. bmi.s L004ef2
  6758. neg.l d0
  6759. L004ef2:
  6760. move.l d0,-(a3)
  6761. move.w d2,-(a3)
  6762. rts
  6763. L004ef8:
  6764. bsr.s L004e8c
  6765. move.l d0,-(a3)
  6766. move.w d2,-(a3)
  6767. rts
  6768. L004f00:
  6769. bsr.s L004e8c
  6770. bsr.s L004ec0
  6771. tst.w d2
  6772. bmi.s L004f10
  6773. tst.l d0
  6774. seq.b d0
  6775. ext.w d0
  6776. ext.l d0
  6777. L004f10:
  6778. move.l d0,-(a3)
  6779. move.w d2,-(a3)
  6780. rts
  6781. L004f16:
  6782. bsr.w L004e8c
  6783. bsr.s L004ec0
  6784. tst.w d2
  6785. bmi.s L004f24
  6786. lsr.w #8,d0
  6787. ext.l d0
  6788. L004f24:
  6789. move.l d0,-(a3)
  6790. move.w d2,-(a3)
  6791. rts
  6792. L004f2a:
  6793. bsr.w L004e8c
  6794. bsr.s L004ec0
  6795. tst.w d2
  6796. bmi.s L004f3a
  6797. andi.l #$000000ff,d0
  6798. L004f3a:
  6799. move.l d0,-(a3)
  6800. move.w d2,-(a3)
  6801. rts
  6802. L004f40:
  6803. bsr.w L004e8c
  6804. bsr.w L004ec0
  6805. tst.w d2
  6806. bmi.s L004f50
  6807. clr.w d0
  6808. swap.w d0
  6809. L004f50:
  6810. move.l d0,-(a3)
  6811. move.w d2,-(a3)
  6812. rts
  6813. L004f56:
  6814. bsr.w L004e8c
  6815. bsr.w L004ec0
  6816. tst.w d2
  6817. bmi.s L004f68
  6818. andi.l #$0000ffff,d0
  6819. L004f68:
  6820. move.l d0,-(a3)
  6821. move.w d2,-(a3)
  6822. rts
  6823. L004f6e:
  6824. bsr.w L004ea4
  6825. bsr.w L004ecc
  6826. tst.l d4
  6827. bmi.s L004f7e
  6828. bsr.w L005264
  6829. L004f7e:
  6830. move.l d1,-(a3)
  6831. move.w d4,-(a3)
  6832. lea.l (End+$000090,pc),a3
  6833. addq.l #6,(a3)
  6834. rts
  6835. L004f8a:
  6836. bsr.w L004ea4
  6837. bsr.w L004ecc
  6838. tst.l d4
  6839. bmi.s L004fa6
  6840. tst.l d0
  6841. bne.s L004fa2
  6842. bsr.w L0037ae
  6843. moveq.l #$ff,d4
  6844. bra.s L004fa6
  6845. L004fa2:
  6846. bsr.w L0052a6
  6847. L004fa6:
  6848. move.l d1,-(a3)
  6849. move.w d4,-(a3)
  6850. lea.l (End+$000090,pc),a3
  6851. addq.l #6,(a3)
  6852. rts
  6853. L004fb2:
  6854. bsr.w L004ea4
  6855. bsr.w L004ecc
  6856. tst.l d4
  6857. bmi.s L004fce
  6858. tst.l d0
  6859. bne.s L004fca
  6860. bsr.w L0037ae
  6861. moveq.l #$ff,d4
  6862. bra.s L004fce
  6863. L004fca:
  6864. bsr.w L0052a6
  6865. L004fce:
  6866. move.l d0,-(a3)
  6867. move.w d4,-(a3)
  6868. lea.l (End+$000090,pc),a3
  6869. addq.l #6,(a3)
  6870. rts
  6871. L004fda:
  6872. bsr.w L004ea4
  6873. bsr.w L004ecc
  6874. tst.l d4
  6875. bmi.s L004fe8
  6876. lsr.l d0,d1
  6877. L004fe8:
  6878. move.l d1,-(a3)
  6879. move.w d4,-(a3)
  6880. lea.l (End+$000090,pc),a3
  6881. addq.l #6,(a3)
  6882. rts
  6883. L004ff4:
  6884. bsr.w L004ea4
  6885. bsr.w L004ecc
  6886. tst.l d4
  6887. bmi.s L005002
  6888. lsl.l d0,d1
  6889. L005002:
  6890. move.l d1,-(a3)
  6891. move.w d4,-(a3)
  6892. lea.l (End+$000090,pc),a3
  6893. addq.l #6,(a3)
  6894. rts
  6895. L00500e:
  6896. bsr.w L004ea4
  6897. bsr.w L004ecc
  6898. tst.l d4
  6899. bmi.s L00501c
  6900. asr.l d0,d1
  6901. L00501c:
  6902. move.l d1,-(a3)
  6903. move.w d4,-(a3)
  6904. lea.l (End+$000090,pc),a3
  6905. addq.l #6,(a3)
  6906. rts
  6907. L005028:
  6908. bsr.w L004ea4
  6909. tst.w d2
  6910. beq.s L00504a
  6911. bgt.s L005036
  6912. moveq.l #$ff,d4
  6913. bra.s L005050
  6914. L005036:
  6915. tst.w d3
  6916. bge.s L00503e
  6917. moveq.l #$ff,d4
  6918. bra.s L005050
  6919. L00503e:
  6920. cmp.w d2,d3
  6921. beq.s L00504a
  6922. bsr.w L0037b8
  6923. moveq.l #$ff,d4
  6924. bra.s L005050
  6925. L00504a:
  6926. move.w d3,d4
  6927. eor.w d2,d4
  6928. sub.l d0,d1
  6929. L005050:
  6930. move.l d1,-(a3)
  6931. move.w d4,-(a3)
  6932. lea.l (End+$000090,pc),a3
  6933. addq.l #6,(a3)
  6934. rts
  6935. L00505c:
  6936. bsr.w L004ea4
  6937. tst.w d2
  6938. beq.s L005078
  6939. bgt.s L00506a
  6940. moveq.l #$ff,d4
  6941. bra.s L00507e
  6942. L00506a:
  6943. tst.w d3
  6944. beq.s L005078
  6945. bmi.s L005074
  6946. bsr.w L0037b8
  6947. L005074:
  6948. moveq.l #$ff,d4
  6949. bra.s L00507e
  6950. L005078:
  6951. move.w d3,d4
  6952. eor.w d2,d4
  6953. add.l d0,d1
  6954. L00507e:
  6955. move.l d1,-(a3)
  6956. move.w d4,-(a3)
  6957. lea.l (End+$000090,pc),a3
  6958. addq.l #6,(a3)
  6959. rts
  6960. L00508a:
  6961. bsr.w L004ea4
  6962. bsr.w L004ecc
  6963. tst.l d4
  6964. bmi.s L00509e
  6965. cmp.l d0,d1
  6966. seq.b d1
  6967. ext.w d1
  6968. ext.l d1
  6969. L00509e:
  6970. move.l d1,-(a3)
  6971. move.w d4,-(a3)
  6972. lea.l (End+$000090,pc),a3
  6973. addq.l #6,(a3)
  6974. rts
  6975. L0050aa:
  6976. bsr.w L004ea4
  6977. bsr.w L004ecc
  6978. tst.l d4
  6979. bmi.s L0050be
  6980. cmp.l d0,d1
  6981. sne.b d1
  6982. ext.w d1
  6983. ext.l d1
  6984. L0050be:
  6985. move.l d1,-(a3)
  6986. move.w d4,-(a3)
  6987. lea.l (End+$000090,pc),a3
  6988. addq.l #6,(a3)
  6989. rts
  6990. L0050ca:
  6991. bsr.w L004ea4
  6992. bsr.w L004ecc
  6993. tst.l d4
  6994. bmi.s L0050de
  6995. cmp.l d0,d1
  6996. scs.b d1
  6997. ext.w d1
  6998. ext.l d1
  6999. L0050de:
  7000. move.l d1,-(a3)
  7001. move.w d4,-(a3)
  7002. lea.l (End+$000090,pc),a3
  7003. addq.l #6,(a3)
  7004. rts
  7005. L0050ea:
  7006. bsr.w L004ea4
  7007. bsr.w L004ecc
  7008. tst.l d4
  7009. bmi.s L0050fe
  7010. cmp.l d0,d1
  7011. sls.b d1
  7012. ext.w d1
  7013. ext.l d1
  7014. L0050fe:
  7015. move.l d1,-(a3)
  7016. move.w d4,-(a3)
  7017. lea.l (End+$000090,pc),a3
  7018. addq.l #6,(a3)
  7019. rts
  7020. L00510a:
  7021. bsr.w L004ea4
  7022. bsr.w L004ecc
  7023. tst.l d4
  7024. bmi.s L00511e
  7025. cmp.l d0,d1
  7026. shi.b d1
  7027. ext.w d1
  7028. ext.l d1
  7029. L00511e:
  7030. move.l d1,-(a3)
  7031. move.w d4,-(a3)
  7032. lea.l (End+$000090,pc),a3
  7033. addq.l #6,(a3)
  7034. rts
  7035. L00512a:
  7036. bsr.w L004ea4
  7037. bsr.w L004ecc
  7038. tst.l d4
  7039. bmi.s L00513e
  7040. cmp.l d0,d1
  7041. scc.b d1
  7042. ext.w d1
  7043. ext.l d1
  7044. L00513e:
  7045. move.l d1,-(a3)
  7046. move.w d4,-(a3)
  7047. lea.l (End+$000090,pc),a3
  7048. addq.l #6,(a3)
  7049. rts
  7050. L00514a:
  7051. bsr.w L004ea4
  7052. bsr.w L004ecc
  7053. tst.l d4
  7054. bmi.s L00515e
  7055. cmp.l d0,d1
  7056. slt.b d1
  7057. ext.w d1
  7058. ext.l d1
  7059. L00515e:
  7060. move.l d1,-(a3)
  7061. move.w d4,-(a3)
  7062. lea.l (End+$000090,pc),a3
  7063. addq.l #6,(a3)
  7064. rts
  7065. L00516a:
  7066. bsr.w L004ea4
  7067. bsr.w L004ecc
  7068. tst.l d4
  7069. bmi.s L00517e
  7070. cmp.l d0,d1
  7071. sle.b d1
  7072. ext.w d1
  7073. ext.l d1
  7074. L00517e:
  7075. move.l d1,-(a3)
  7076. move.w d4,-(a3)
  7077. lea.l (End+$000090,pc),a3
  7078. addq.l #6,(a3)
  7079. rts
  7080. L00518a:
  7081. bsr.w L004ea4
  7082. bsr.w L004ecc
  7083. tst.l d4
  7084. bmi.s L00519e
  7085. cmp.l d0,d1
  7086. sgt.b d1
  7087. ext.w d1
  7088. ext.l d1
  7089. L00519e:
  7090. move.l d1,-(a3)
  7091. move.w d4,-(a3)
  7092. lea.l (End+$000090,pc),a3
  7093. addq.l #6,(a3)
  7094. rts
  7095. L0051aa:
  7096. bsr.w L004ea4
  7097. bsr.w L004ecc
  7098. tst.l d4
  7099. bmi.s L0051be
  7100. cmp.l d0,d1
  7101. sge.b d1
  7102. ext.w d1
  7103. ext.l d1
  7104. L0051be:
  7105. move.l d1,-(a3)
  7106. move.w d4,-(a3)
  7107. lea.l (End+$000090,pc),a3
  7108. addq.l #6,(a3)
  7109. rts
  7110. L0051ca:
  7111. bsr.w L004ea4
  7112. bsr.w L004ecc
  7113. tst.l d4
  7114. bmi.s L0051d8
  7115. and.l d0,d1
  7116. L0051d8:
  7117. move.l d1,-(a3)
  7118. move.w d4,-(a3)
  7119. lea.l (End+$000090,pc),a3
  7120. addq.l #6,(a3)
  7121. rts
  7122. L0051e4:
  7123. bsr.w L004ea4
  7124. bsr.w L004ecc
  7125. tst.l d4
  7126. bmi.s L0051f2
  7127. eor.l d0,d1
  7128. L0051f2:
  7129. move.l d1,-(a3)
  7130. move.w d4,-(a3)
  7131. lea.l (End+$000090,pc),a3
  7132. addq.l #6,(a3)
  7133. rts
  7134. L0051fe:
  7135. bsr.w L004ea4
  7136. bsr.w L004ecc
  7137. tst.l d4
  7138. bmi.s L00520c
  7139. or.l d0,d1
  7140. L00520c:
  7141. move.l d1,-(a3)
  7142. move.w d4,-(a3)
  7143. lea.l (End+$000090,pc),a3
  7144. addq.l #6,(a3)
  7145. rts
  7146. L005218:
  7147. bra.w L0014ec
  7148. L00521c:
  7149. movem.l (a0),d0-d1
  7150. subq.w #1,d0
  7151. beq.s L005244
  7152. subq.w #1,d0
  7153. beq.s L00523e
  7154. subq.w #1,d0
  7155. beq.s L005238
  7156. subq.w #1,d0
  7157. bne.w L002e64
  7158. add.l ($005a,a1),d1
  7159. bra.s L005248
  7160. L005238:
  7161. add.l ($0056,a1),d1
  7162. bra.s L005248
  7163. L00523e:
  7164. add.l ($0052,a1),d1
  7165. bra.s L005248
  7166. L005244:
  7167. add.l ($004e,a1),d1
  7168. L005248:
  7169. tst.w (-$000e,a6)
  7170. beq.s L005252
  7171. bsr.w L0037e2
  7172. L005252:
  7173. addq.w #1,(-$000e,a6)
  7174. pea.l ($0008,a0)
  7175. lea.l (End+$000094,pc),a0
  7176. move.l d1,(a0)
  7177. movea.l (sp)+,a0
  7178. rts
  7179. L005264:
  7180. movem.l d2-d4,-(sp)
  7181. moveq.l #$00,d2
  7182. tst.l d0
  7183. bpl.s L005272
  7184. neg.l d0
  7185. not.w d2
  7186. L005272:
  7187. tst.l d1
  7188. bpl.s L00527a
  7189. neg.l d1
  7190. not.w d2
  7191. L00527a:
  7192. move.w d1,d3
  7193. mulu.w d0,d3
  7194. swap.w d0
  7195. move.w d1,d4
  7196. mulu.w d0,d4
  7197. swap.w d4
  7198. clr.w d4
  7199. add.l d4,d3
  7200. swap.w d0
  7201. swap.w d1
  7202. move.w d1,d4
  7203. mulu.w d0,d4
  7204. swap.w d4
  7205. clr.w d4
  7206. add.l d4,d3
  7207. tst.w d2
  7208. beq.s L00529e
  7209. neg.l d3
  7210. L00529e:
  7211. exg.l d1,d3
  7212. movem.l (sp)+,d2-d4
  7213. rts
  7214. L0052a6:
  7215. movem.l d2-d5,-(sp)
  7216. moveq.l #$00,d2
  7217. tst.l d0
  7218. bpl.s L0052b4
  7219. neg.l d0
  7220. not.w d2
  7221. L0052b4:
  7222. tst.l d1
  7223. bpl.s L0052bc
  7224. neg.l d1
  7225. not.w d2
  7226. L0052bc:
  7227. moveq.l #$00,d3
  7228. moveq.l #$00,d4
  7229. move.w #$001f,d5
  7230. L0052c4:
  7231. add.l d3,d3
  7232. roxl.l #1,d1
  7233. roxl.l #1,d4
  7234. cmp.l d0,d4
  7235. bcs.s L0052d2
  7236. sub.l d0,d4
  7237. addq.l #1,d3
  7238. L0052d2:
  7239. dbra.w d5,L0052c4
  7240. move.l d3,d1
  7241. move.l d4,d0
  7242. tst.w d2
  7243. bpl.s L0052e0
  7244. neg.l d1
  7245. L0052e0:
  7246. movem.l (sp)+,d2-d5
  7247. rts
  7248. L0052e6:
  7249. .dc.b 'Illegal SCD information in ',$00
  7250. L005302:
  7251. .dc.b 'Relative error in ',$00
  7252. L005315:
  7253. .dc.b 'Division by zero in ',$00
  7254. L00532a:
  7255. .dc.b 'Illegal expression in ',$00
  7256. L005341:
  7257. .dc.b 'Over flow in ',$00
  7258. L00534f:
  7259. .dc.b 'Calc stack over flow in ',$00
  7260. L005368:
  7261. .dc.b 'Calc stack under flow in ',$00
  7262. L005382:
  7263. .dc.b 'Duplicate exec address in ',$00
  7264. L00539d:
  7265. .dc.b ' in ',$00
  7266. L0053a2:
  7267. .dc.b ' at ',$00
  7268. L0053a7:
  7269. .dc.b ' (text)',$00
  7270. L0053af:
  7271. .dc.b ' (data)',$00
  7272. L0053b7:
  7273. .dc.b ' (rdata)',$00
  7274. L0053c0:
  7275. .dc.b ' (rldata)',$00
  7276. L0053ca:
  7277. .dc.b 'Can',$27,'t open file : ',$00
  7278. L0053dd:
  7279. .dc.b 'File I/O error : ',$00
  7280. L0053ef:
  7281. .dc.b 'Device full : ',$00
  7282. L0053fe:
  7283. .dc.b 'Using relocate table : ',$00
  7284. L005416:
  7285. .dc.b 'Relocate at odd address : ',$00
  7286. L005431:
  7287. .dc.b 'Exec address is not top of file : ',$00
  7288. L005454:
  7289. .dc.b 'Unmatch roffset size (?_?)!',$0a
  7290. .dc.b $0a,$00
  7291. L005472:
  7292. .dc.b 'Making executable file...',$0a,$00,$00
  7293. L00548e:
  7294. .dc.w L002c34-L00548e
  7295. .dc.w L003828-L00548e
  7296. .dc.w L00385c-L00548e
  7297. .dc.w L00385c-L00548e
  7298. .dc.w L00385c-L00548e
  7299. .dc.w L00385c-L00548e
  7300. .dc.w L00385c-L00548e
  7301. .dc.w L00385c-L00548e
  7302. .dc.w L00385c-L00548e
  7303. .dc.w L00385c-L00548e
  7304. .dc.w L00385c-L00548e
  7305. .dc.w L00385c-L00548e
  7306. .dc.w L0038ba-L00548e
  7307. .dc.w L003932-L00548e
  7308. .dc.w L003932-L00548e
  7309. .dc.w L003932-L00548e
  7310. .dc.w L003932-L00548e
  7311. .dc.w L003a7c-L00548e
  7312. .dc.w L003b16-L00548e
  7313. .dc.w L003b16-L00548e
  7314. .dc.w L003b16-L00548e
  7315. .dc.w L003b16-L00548e
  7316. .dc.w L003b16-L00548e
  7317. .dc.w L003b16-L00548e
  7318. .dc.w L003b16-L00548e
  7319. .dc.w L003b16-L00548e
  7320. .dc.w L003b16-L00548e
  7321. .dc.w L003b16-L00548e
  7322. .dc.w L003998-L00548e
  7323. .dc.w L003998-L00548e
  7324. .dc.w L003998-L00548e
  7325. .dc.w L003998-L00548e
  7326. .dc.w L003ac6-L00548e
  7327. .dc.w L003b16-L00548e
  7328. .dc.w L003b16-L00548e
  7329. .dc.w L003b16-L00548e
  7330. .dc.w L003b16-L00548e
  7331. .dc.w L003b5c-L00548e
  7332. .dc.w L003b94-L00548e
  7333. .dc.w L003bcc-L00548e
  7334. .dc.w L003b16-L00548e
  7335. .dc.w L003b16-L00548e
  7336. .dc.w L003b16-L00548e
  7337. .dc.w L0039e6-L00548e
  7338. .dc.w L0039e6-L00548e
  7339. .dc.w L0039e6-L00548e
  7340. .dc.w L0039e6-L00548e
  7341. .dc.w L003aee-L00548e
  7342. .dc.w L003c04-L00548e
  7343. .dc.w L003c42-L00548e
  7344. .dc.w L003c80-L00548e
  7345. .dc.w L003cbe-L00548e
  7346. .dc.w L003cfc-L00548e
  7347. .dc.w L003d6e-L00548e
  7348. .dc.w L003de0-L00548e
  7349. .dc.w L003e52-L00548e
  7350. .dc.w L003ec4-L00548e
  7351. .dc.w L003f36-L00548e
  7352. .dc.w L003966-L00548e
  7353. .dc.w L003966-L00548e
  7354. .dc.w L003966-L00548e
  7355. .dc.w L003966-L00548e
  7356. .dc.w L003aa2-L00548e
  7357. .dc.w L003b3a-L00548e
  7358. .dc.w L003b3a-L00548e
  7359. .dc.w L003b3a-L00548e
  7360. .dc.w L003b3a-L00548e
  7361. .dc.w L003b3a-L00548e
  7362. .dc.w L003b3a-L00548e
  7363. .dc.w L003b3a-L00548e
  7364. .dc.w L003b3a-L00548e
  7365. .dc.w L003b3a-L00548e
  7366. .dc.w L003b3a-L00548e
  7367. .dc.w L003998-L00548e
  7368. .dc.w L003998-L00548e
  7369. .dc.w L002e64-L00548e
  7370. .dc.w L002e64-L00548e
  7371. .dc.w L002e64-L00548e
  7372. .dc.w L002e64-L00548e
  7373. .dc.w L002e64-L00548e
  7374. .dc.w L0039e6-L00548e
  7375. .dc.w L0039e6-L00548e
  7376. .dc.w L0039e6-L00548e
  7377. .dc.w L0039e6-L00548e
  7378. .dc.w L003aee-L00548e
  7379. .dc.w L003c04-L00548e
  7380. .dc.w L003c42-L00548e
  7381. .dc.w L003c80-L00548e
  7382. .dc.w L003cbe-L00548e
  7383. .dc.w L003cfc-L00548e
  7384. .dc.w L003d6e-L00548e
  7385. .dc.w L003de0-L00548e
  7386. .dc.w L003e52-L00548e
  7387. .dc.w L003ec4-L00548e
  7388. .dc.w L003f36-L00548e
  7389. .dc.w L003966-L00548e
  7390. .dc.w L003966-L00548e
  7391. .dc.w L002e64-L00548e
  7392. .dc.w L002e64-L00548e
  7393. .dc.w L002e64-L00548e
  7394. .dc.w L002e64-L00548e
  7395. .dc.w L002e64-L00548e
  7396. .dc.w L0038e4-L00548e
  7397. .dc.w L00391a-L00548e
  7398. .dc.w L003fa8-L00548e
  7399. .dc.w L003fa8-L00548e
  7400. .dc.w L003fa8-L00548e
  7401. .dc.w L003fa8-L00548e
  7402. .dc.w L004102-L00548e
  7403. .dc.w L0041a4-L00548e
  7404. .dc.w L0041a4-L00548e
  7405. .dc.w L0041a4-L00548e
  7406. .dc.w L0041a4-L00548e
  7407. .dc.w L0041a4-L00548e
  7408. .dc.w L0041a4-L00548e
  7409. .dc.w L0041a4-L00548e
  7410. .dc.w L0041a4-L00548e
  7411. .dc.w L0041a4-L00548e
  7412. .dc.w L0041a4-L00548e
  7413. .dc.w L004016-L00548e
  7414. .dc.w L004016-L00548e
  7415. .dc.w L004016-L00548e
  7416. .dc.w L004016-L00548e
  7417. .dc.w L004150-L00548e
  7418. .dc.w L0041a4-L00548e
  7419. .dc.w L0041a4-L00548e
  7420. .dc.w L0041a4-L00548e
  7421. .dc.w L0041a4-L00548e
  7422. .dc.w L0041ee-L00548e
  7423. .dc.w L004228-L00548e
  7424. .dc.w L004262-L00548e
  7425. .dc.w L0041a4-L00548e
  7426. .dc.w L0041a4-L00548e
  7427. .dc.w L0041a4-L00548e
  7428. .dc.w L004068-L00548e
  7429. .dc.w L004068-L00548e
  7430. .dc.w L004068-L00548e
  7431. .dc.w L004068-L00548e
  7432. .dc.w L00417a-L00548e
  7433. .dc.w L00429c-L00548e
  7434. .dc.w L0042dc-L00548e
  7435. .dc.w L00431c-L00548e
  7436. .dc.w L00435c-L00548e
  7437. .dc.w L00439c-L00548e
  7438. .dc.w L004410-L00548e
  7439. .dc.w L004484-L00548e
  7440. .dc.w L0044f8-L00548e
  7441. .dc.w L00456c-L00548e
  7442. .dc.w L0045e0-L00548e
  7443. .dc.w L003fe0-L00548e
  7444. .dc.w L003fe0-L00548e
  7445. .dc.w L003fe0-L00548e
  7446. .dc.w L003fe0-L00548e
  7447. .dc.w L00412a-L00548e
  7448. .dc.w L0041ca-L00548e
  7449. .dc.w L0041ca-L00548e
  7450. .dc.w L0041ca-L00548e
  7451. .dc.w L0041ca-L00548e
  7452. .dc.w L0041ca-L00548e
  7453. .dc.w L0041ca-L00548e
  7454. .dc.w L0041ca-L00548e
  7455. .dc.w L0041ca-L00548e
  7456. .dc.w L0041ca-L00548e
  7457. .dc.w L0041ca-L00548e
  7458. .dc.w L004016-L00548e
  7459. .dc.w L004016-L00548e
  7460. .dc.w L002e64-L00548e
  7461. .dc.w L002e64-L00548e
  7462. .dc.w L002e64-L00548e
  7463. .dc.w L002e64-L00548e
  7464. .dc.w L002e64-L00548e
  7465. .dc.w L004068-L00548e
  7466. .dc.w L004068-L00548e
  7467. .dc.w L004068-L00548e
  7468. .dc.w L004068-L00548e
  7469. .dc.w L00417a-L00548e
  7470. .dc.w L00429c-L00548e
  7471. .dc.w L0042dc-L00548e
  7472. .dc.w L00431c-L00548e
  7473. .dc.w L00435c-L00548e
  7474. .dc.w L00439c-L00548e
  7475. .dc.w L004410-L00548e
  7476. .dc.w L004484-L00548e
  7477. .dc.w L0044f8-L00548e
  7478. .dc.w L00456c-L00548e
  7479. .dc.w L0045e0-L00548e
  7480. .dc.w L003fe0-L00548e
  7481. .dc.w L003fe0-L00548e
  7482. .dc.w L002e64-L00548e
  7483. .dc.w L002e64-L00548e
  7484. .dc.w L002e64-L00548e
  7485. .dc.w L002e64-L00548e
  7486. .dc.w L002e64-L00548e
  7487. .dc.w L004654-L00548e
  7488. .dc.w L00469e-L00548e
  7489. .dc.w L0046e8-L00548e
  7490. .dc.w L004732-L00548e
  7491. .dc.w L00477c-L00548e
  7492. .dc.w L0047c2-L00548e
  7493. .dc.w L004808-L00548e
  7494. .dc.w L00484e-L00548e
  7495. .dc.w L004894-L00548e
  7496. .dc.w L0048da-L00548e
  7497. .dc.w L004654-L00548e
  7498. .dc.w L00469e-L00548e
  7499. .dc.w L0046e8-L00548e
  7500. .dc.w L004732-L00548e
  7501. .dc.w L00477c-L00548e
  7502. .dc.w L0047c2-L00548e
  7503. .dc.w L004808-L00548e
  7504. .dc.w L00484e-L00548e
  7505. .dc.w L004894-L00548e
  7506. .dc.w L0048da-L00548e
  7507. .dc.w L004920-L00548e
  7508. .dc.w L004966-L00548e
  7509. .dc.w L0049ac-L00548e
  7510. .dc.w L0049f2-L00548e
  7511. .dc.w L004a38-L00548e
  7512. .dc.w L004a7a-L00548e
  7513. .dc.w L004abc-L00548e
  7514. .dc.w L004afe-L00548e
  7515. .dc.w L004b40-L00548e
  7516. .dc.w L004b82-L00548e
  7517. .dc.w L004bc4-L00548e
  7518. .dc.w L004bc4-L00548e
  7519. .dc.w L004bc4-L00548e
  7520. .dc.w L004bc4-L00548e
  7521. .dc.w L004bfe-L00548e
  7522. .dc.w L004c1c-L00548e
  7523. .dc.w L004c3e-L00548e
  7524. .dc.w L004c48-L00548e
  7525. .dc.w L004c52-L00548e
  7526. .dc.w L004c5c-L00548e
  7527. .dc.w L004c7e-L00548e
  7528. .dc.w L004c88-L00548e
  7529. .dc.w L004c92-L00548e
  7530. .dc.w L004c9c-L00548e
  7531. .dc.w L004ca6-L00548e
  7532. .dc.w L004cb0-L00548e
  7533. .dc.w L004d3a-L00548e
  7534. .dc.w L004d94-L00548e
  7535. .dc.w L004cf6-L00548e
  7536. .dc.w L004d94-L00548e
  7537. .dc.w L004e38-L00548e
  7538. .dc.w L004ee8-L00548e
  7539. .dc.w L004ef8-L00548e
  7540. .dc.w L004f00-L00548e
  7541. .dc.w L004f16-L00548e
  7542. .dc.w L004f2a-L00548e
  7543. .dc.w L004f40-L00548e
  7544. .dc.w L004f56-L00548e
  7545. .dc.w L002e64-L00548e
  7546. .dc.w L004f6e-L00548e
  7547. .dc.w L004f8a-L00548e
  7548. .dc.w L004fb2-L00548e
  7549. .dc.w L004fda-L00548e
  7550. .dc.w L004ff4-L00548e
  7551. .dc.w L00500e-L00548e
  7552. .dc.w L005028-L00548e
  7553. .dc.w L00505c-L00548e
  7554. .dc.w L00508a-L00548e
  7555. .dc.w L0050aa-L00548e
  7556. .dc.w L0050ca-L00548e
  7557. .dc.w L0050ea-L00548e
  7558. .dc.w L00510a-L00548e
  7559. .dc.w L00512a-L00548e
  7560. .dc.w L00514a-L00548e
  7561. .dc.w L00516a-L00548e
  7562. .dc.w L00518a-L00548e
  7563. .dc.w L0051aa-L00548e
  7564. .dc.w L0051ca-L00548e
  7565. .dc.w L0051e4-L00548e
  7566. .dc.w L0051fe-L00548e
  7567. .dc.w L002e64-L00548e
  7568. .dc.w L002e64-L00548e
  7569. .dc.w L005218-L00548e
  7570. .dc.w L005218-L00548e
  7571. .dc.w L005218-L00548e
  7572. .dc.w L005218-L00548e
  7573. .dc.w L005218-L00548e
  7574. .dc.w L005218-L00548e
  7575. .dc.w L005218-L00548e
  7576. .dc.w L005218-L00548e
  7577. .dc.w L005218-L00548e
  7578. .dc.w L005218-L00548e
  7579. .dc.w L005218-L00548e
  7580. .dc.w L005218-L00548e
  7581. .dc.w L005218-L00548e
  7582. .dc.w L005218-L00548e
  7583. .dc.w L005218-L00548e
  7584. .dc.w L005218-L00548e
  7585. .dc.w L005218-L00548e
  7586. .dc.w L005218-L00548e
  7587. .dc.w L005218-L00548e
  7588. .dc.w L005218-L00548e
  7589. .dc.w L005218-L00548e
  7590. .dc.w L005218-L00548e
  7591. .dc.w L005218-L00548e
  7592. .dc.w L005218-L00548e
  7593. .dc.w L005218-L00548e
  7594. .dc.w L005218-L00548e
  7595. .dc.w L002e64-L00548e
  7596. .dc.w L005218-L00548e
  7597. .dc.w L005218-L00548e
  7598. .dc.w L005218-L00548e
  7599. .dc.w L00521c-L00548e
  7600. .dc.w L005218-L00548e
  7601. .dc.w L002e64-L00548e
  7602. .dc.w L002e64-L00548e
  7603. .dc.w L002e64-L00548e
  7604. .dc.w L002e64-L00548e
  7605. .dc.w L002e64-L00548e
  7606. .dc.w L002e64-L00548e
  7607. .dc.w L002e64-L00548e
  7608. .dc.w L002e64-L00548e
  7609. .dc.w L002e64-L00548e
  7610. .dc.w L002e64-L00548e
  7611. .dc.w L005218-L00548e
  7612. .dc.w L005218-L00548e
  7613. L00570c:
  7614. move.b (End+$0005d1,pc),d0
  7615. beq.s L00571a
  7616. pea.l (L005e50,pc)
  7617. DOS _PRINT
  7618. addq.l #4,sp
  7619. L00571a:
  7620. move.w #$0020,-(sp) ;' '
  7621. pea.l (End+$00011c,pc)
  7622. DOS _CREATE
  7623. addq.l #6,sp
  7624. move.l d0,d7
  7625. bmi.w L0058be
  7626. bsr.w L0058e0
  7627. bsr.w L005908
  7628. moveq.l #$00,d5
  7629. moveq.l #$00,d6
  7630. movea.l (End+$0005c8,pc),a4
  7631. pea.l (L005e64,pc)
  7632. bsr.w L005de8
  7633. pea.l (End+$00009c,pc)
  7634. bsr.w L005de8
  7635. addq.l #4,sp
  7636. bsr.w L005dde
  7637. bsr.w L005de8
  7638. addq.l #4,sp
  7639. tst.w d5
  7640. bne.w L0058c4
  7641. move.l (End+$000094,pc),-(sp)
  7642. bsr.w L005940
  7643. moveq.l #$00,d1
  7644. move.l (End+$000004,pc),d2
  7645. pea.l (L005fd2,pc)
  7646. movem.l d1-d2,-(sp)
  7647. bsr.w L005ca0
  7648. add.l d2,d1
  7649. move.l (End+$000008,pc),d2
  7650. add.l (End+$000054,pc),d2
  7651. add.l (End+$000038,pc),d2
  7652. add.l (End+$00003c,pc),d2
  7653. pea.l (L005fd7,pc)
  7654. movem.l d1-d2,-(sp)
  7655. bsr.w L005ca0
  7656. add.l d2,d1
  7657. move.l (End+$00000c,pc),d2
  7658. pea.l (L005fdc,pc)
  7659. movem.l d1-d2,-(sp)
  7660. bsr.w L005ca0
  7661. add.l d2,d1
  7662. move.l (End+$000010,pc),d2
  7663. pea.l (L005fe0,pc)
  7664. movem.l d1-d2,-(sp)
  7665. bsr.w L005ca0
  7666. add.l d2,d1
  7667. move.l (End+$000014,pc),d2
  7668. pea.l (L005fe7,pc)
  7669. movem.l d1-d2,-(sp)
  7670. bsr.w L005ca0
  7671. moveq.l #$00,d1
  7672. move.l (End+$000018,pc),d2
  7673. pea.l (L005fed,pc)
  7674. movem.l d1-d2,-(sp)
  7675. bsr.w L005ca0
  7676. add.l d2,d1
  7677. move.l (End+$00001c,pc),d2
  7678. pea.l (L005ff3,pc)
  7679. movem.l d1-d2,-(sp)
  7680. bsr.w L005ca0
  7681. add.l d2,d1
  7682. move.l (End+$000020,pc),d2
  7683. pea.l (L005ff8,pc)
  7684. movem.l d1-d2,-(sp)
  7685. bsr.w L005ca0
  7686. add.l d2,d1
  7687. move.l (End+$000024,pc),d2
  7688. pea.l (L006000,pc)
  7689. movem.l d1-d2,-(sp)
  7690. bsr.w L005ca0
  7691. add.l d2,d1
  7692. move.l (End+$000028,pc),d2
  7693. pea.l (L006007,pc)
  7694. movem.l d1-d2,-(sp)
  7695. bsr.w L005ca0
  7696. add.l d2,d1
  7697. move.l (End+$00002c,pc),d2
  7698. pea.l (L00600e,pc)
  7699. movem.l d1-d2,-(sp)
  7700. bsr.w L005ca0
  7701. add.l d2,d1
  7702. move.l (End+$000030,pc),d2
  7703. pea.l (L006014,pc)
  7704. movem.l d1-d2,-(sp)
  7705. bsr.w L005ca0
  7706. add.l d2,d1
  7707. move.l (End+$000034,pc),d2
  7708. pea.l (L00601d,pc)
  7709. movem.l d1-d2,-(sp)
  7710. bsr.w L005ca0
  7711. bsr.w L005dde
  7712. bsr.w L005dde
  7713. lea.l ($00a0,sp),sp
  7714. tst.w d5
  7715. bne.s L0058c4
  7716. movea.l (End+$00006c,pc),a0
  7717. L005870:
  7718. move.l a0,d0
  7719. beq.s L0058aa
  7720. movea.l (a0),a1
  7721. pea.l (a1)
  7722. bsr.w L00595e
  7723. bsr.w L005aaa
  7724. bsr.w L005af8
  7725. bsr.w L005b9e
  7726. bsr.w L005bf0
  7727. bsr.w L005c48
  7728. addq.l #4,sp
  7729. tst.l ($0004,a0)
  7730. beq.s L0058aa
  7731. bsr.w L005dde
  7732. bsr.w L005dde
  7733. tst.w d5
  7734. bne.s L0058c4
  7735. movea.l ($0004,a0),a0
  7736. bra.s L005870
  7737. L0058aa:
  7738. bsr.w L005e16
  7739. tst.w d5
  7740. bne.s L0058c4
  7741. move.w d7,-(sp)
  7742. DOS _CLOSE
  7743. addq.l #2,sp
  7744. tst.l d0
  7745. bmi.s L0058c4
  7746. rts
  7747. L0058be:
  7748. pea.l (L005e2e,pc)
  7749. bra.s L0058c8
  7750. L0058c4:
  7751. pea.l (L005e41,pc)
  7752. L0058c8:
  7753. DOS _PRINT
  7754. pea.l (End+$00011c,pc)
  7755. DOS _PRINT
  7756. addq.l #8,sp
  7757. bsr.w L000c82
  7758. lea.l (End+$0005cc,pc),a0
  7759. move.w #$0001,(a0)
  7760. rts
  7761. L0058e0:
  7762. move.l a0,-(sp)
  7763. lea.l (End,pc),a0
  7764. moveq.l #$00,d0
  7765. sub.b ($007f,a0),d0
  7766. and.b #$0f,d0
  7767. sub.l d0,($0084,a0)
  7768. bmi.s L005900
  7769. add.l d0,($007c,a0)
  7770. moveq.l #$00,d0
  7771. L0058fc:
  7772. movea.l (sp)+,a0
  7773. rts
  7774. L005900:
  7775. add.l d0,($0084,a0)
  7776. moveq.l #$ff,d0
  7777. bra.s L0058fc
  7778. L005908:
  7779. move.l a6,-(sp)
  7780. lea.l (End,pc),a6
  7781. move.l ($0084,a6),d0
  7782. andi.l #$fffffc00,d0
  7783. beq.s L005930
  7784. move.l ($007c,a6),($05c8,a6)
  7785. add.l d0,($007c,a6)
  7786. sub.l d0,($0084,a6)
  7787. L005928:
  7788. move.l d0,($05c4,a6)
  7789. movea.l (sp)+,a6
  7790. rts
  7791. L005930:
  7792. pea.l ($019c,a6)
  7793. move.l (sp)+,($05c8,a6)
  7794. move.l #$00000400,d0
  7795. bra.s L005928
  7796. L005940:
  7797. link.w a6,#$0000
  7798. pea.l (L006025,pc)
  7799. bsr.w L005d5c
  7800. move.l ($0008,a6),-(sp)
  7801. bsr.w L005d9e
  7802. bsr.w L005dde
  7803. addq.l #8,sp
  7804. unlk a6
  7805. rts
  7806. L00595e:
  7807. link.w a6,#-$0100
  7808. move.l a0,-(sp)
  7809. movea.l ($0008,a6),a0
  7810. pea.l (L005e64,pc)
  7811. bsr.w L005de8
  7812. pea.l ($0010)
  7813. pea.l (a0)
  7814. bsr.w L005cf8
  7815. bsr.w L005dde
  7816. pea.l (L005e64,pc)
  7817. bsr.w L005de8
  7818. lea.l ($0010,sp),sp
  7819. pea.l (L005fcc,pc)
  7820. bsr.w L005d5c
  7821. move.l ($008e,a0),-(sp)
  7822. bsr.w L005d9e
  7823. addq.l #8,sp
  7824. bsr.w L005dde
  7825. pea.l (L005fd2,pc)
  7826. move.l ($0026,a0),-(sp)
  7827. move.l ($004e,a0),-(sp)
  7828. bsr.w L005ca0
  7829. pea.l (L005fd7,pc)
  7830. move.l ($002a,a0),-(sp)
  7831. move.l ($0052,a0),-(sp)
  7832. bsr.w L005ca0
  7833. pea.l (L005fdc,pc)
  7834. move.l ($002e,a0),-(sp)
  7835. move.l ($0056,a0),-(sp)
  7836. bsr.w L005ca0
  7837. pea.l (L005fe7,pc)
  7838. move.l ($0032,a0),-(sp)
  7839. move.l ($005a,a0),-(sp)
  7840. bsr.w L005ca0
  7841. move.l ($0036,a0),d0
  7842. beq.s L005a00
  7843. pea.l (L005fed,pc)
  7844. move.l d0,-(sp)
  7845. move.l ($005e,a0),d0
  7846. add.l #$00008000,d0
  7847. move.l d0,-(sp)
  7848. bsr.w L005ca0
  7849. lea.l ($000c,sp),sp
  7850. L005a00:
  7851. move.l ($003a,a0),d0
  7852. beq.s L005a20
  7853. pea.l (L005ff3,pc)
  7854. move.l d0,-(sp)
  7855. move.l ($0062,a0),d0
  7856. add.l #$00008000,d0
  7857. move.l d0,-(sp)
  7858. bsr.w L005ca0
  7859. lea.l ($000c,sp),sp
  7860. L005a20:
  7861. move.l ($003e,a0),d0
  7862. beq.s L005a40
  7863. pea.l (L006000,pc)
  7864. move.l d0,-(sp)
  7865. move.l ($0066,a0),d0
  7866. add.l #$00008000,d0
  7867. move.l d0,-(sp)
  7868. bsr.w L005ca0
  7869. lea.l ($000c,sp),sp
  7870. L005a40:
  7871. move.l ($0042,a0),d0
  7872. beq.s L005a60
  7873. pea.l (L006007,pc)
  7874. move.l d0,-(sp)
  7875. move.l ($006a,a0),d0
  7876. add.l #$00008000,d0
  7877. move.l d0,-(sp)
  7878. bsr.w L005ca0
  7879. lea.l ($000c,sp),sp
  7880. L005a60:
  7881. move.l ($0046,a0),d0
  7882. beq.s L005a80
  7883. pea.l (L00600e,pc)
  7884. move.l d0,-(sp)
  7885. move.l ($006e,a0),d0
  7886. add.l #$00008000,d0
  7887. move.l d0,-(sp)
  7888. bsr.w L005ca0
  7889. lea.l ($000c,sp),sp
  7890. L005a80:
  7891. move.l ($004a,a0),d0
  7892. beq.s L005aa0
  7893. pea.l (L00601d,pc)
  7894. move.l d0,-(sp)
  7895. move.l ($0072,a0),d0
  7896. add.l #$00008000,d0
  7897. move.l d0,-(sp)
  7898. bsr.w L005ca0
  7899. lea.l ($000c,sp),sp
  7900. L005aa0:
  7901. lea.l ($0030,sp),sp
  7902. movea.l (sp)+,a0
  7903. unlk a6
  7904. rts
  7905. L005aaa:
  7906. link.w a6,#$0000
  7907. movem.l a0-a2,-(sp)
  7908. movea.l ($0008,a6),a0
  7909. movea.l ($007e,a0),a1
  7910. tst.l (a1)
  7911. beq.s L005af0
  7912. pea.l (L005ea0,pc)
  7913. bsr.w L005de8
  7914. addq.l #4,sp
  7915. L005ac8:
  7916. tst.l (a1)+
  7917. beq.s L005af0
  7918. movea.l (a1)+,a2
  7919. move.l ($0004,a2),-(sp)
  7920. bsr.w L005d5c
  7921. pea.l (L006098,pc)
  7922. bsr.w L005de8
  7923. clr.l -(sp)
  7924. move.l (a2),-(sp)
  7925. bsr.w L005cf8
  7926. bsr.w L005dde
  7927. lea.l ($0010,sp),sp
  7928. bra.s L005ac8
  7929. L005af0:
  7930. movem.l (sp)+,a0-a2
  7931. unlk a6
  7932. rts
  7933. L005af8:
  7934. link.w a6,#$0000
  7935. movem.l a0-a3,-(sp)
  7936. movea.l ($0008,a6),a0
  7937. movea.l ($007a,a0),a1
  7938. tst.l (a1)
  7939. beq.w L005b96
  7940. pea.l (L005edc,pc)
  7941. bsr.w L005de8
  7942. addq.l #4,sp
  7943. L005b18:
  7944. tst.l (a1)+
  7945. beq.s L005b96
  7946. movea.l (a1)+,a2
  7947. cmpi.w #$00fc,($000a,a2)
  7948. beq.s L005b18
  7949. cmpi.w #$00fd,($000a,a2)
  7950. beq.s L005b18
  7951. cmpi.w #$00fe,($000a,a2)
  7952. beq.s L005b18
  7953. move.l ($0004,a2),-(sp)
  7954. bsr.w L005d5c
  7955. move.w ($000a,a2),d0
  7956. move.l ($000c,a2),d1
  7957. cmp.w #$0004,d0
  7958. bls.s L005b52
  7959. add.l #$00008000,d1
  7960. L005b52:
  7961. move.l d1,-(sp)
  7962. bsr.w L005d9e
  7963. bsr.w L005dd4
  7964. addq.l #8,sp
  7965. move.w ($000a,a2),d0
  7966. cmpi.w #$000a,d0
  7967. bls.s L005b6a
  7968. moveq.l #$00,d0
  7969. L005b6a:
  7970. add.w d0,d0
  7971. move.w (L005b80,pc,d0.w),d0
  7972. pea.l (L005b80,pc,d0.w)
  7973. bsr.w L005de8
  7974. addq.l #4,sp
  7975. bsr.w L005dde
  7976. bra.s L005b18
  7977. L005b80:
  7978. .dc.w $04aa,$04b4,$04be,$04c8
  7979. .dc.w $04d2,$04dc,$04e6,$04f0
  7980. .dc.w $04fa,$0504,$050e
  7981. L005b96:
  7982. movem.l (sp)+,a0-a3
  7983. unlk a6
  7984. rts
  7985. L005b9e:
  7986. link.w a6,#$0000
  7987. movem.l d1-d2/a0-a2,-(sp)
  7988. movea.l ($0008,a6),a0
  7989. movea.l ($007a,a0),a1
  7990. tst.l (a1)
  7991. beq.s L005be8
  7992. moveq.l #$00,d1
  7993. L005bb4:
  7994. tst.l (a1)
  7995. beq.s L005be8
  7996. movea.l (a1)+,a2
  7997. cmpi.w #$00fe,($000a,a2)
  7998. bne.s L005bb4
  7999. tst.w d1
  8000. bne.s L005bd2
  8001. pea.l (L005f18,pc)
  8002. bsr.w L005de8
  8003. addq.l #4,sp
  8004. moveq.l #$ff,d1
  8005. L005bd2:
  8006. move.l ($0004,a2),-(sp)
  8007. move.l ($0010,a2),-(sp)
  8008. move.l ($000c,a2),-(sp)
  8009. bsr.w L005ca0
  8010. lea.l ($000c,sp),sp
  8011. bra.s L005bb4
  8012. L005be8:
  8013. movem.l (sp)+,d1-d2/a0-a2
  8014. unlk a6
  8015. rts
  8016. L005bf0:
  8017. link.w a6,#$0000
  8018. movem.l d1-d2/a0-a2,-(sp)
  8019. movea.l ($0008,a6),a0
  8020. movea.l ($007a,a0),a1
  8021. tst.l (a1)
  8022. beq.s L005c40
  8023. moveq.l #$00,d1
  8024. L005c06:
  8025. tst.l (a1)
  8026. beq.s L005c40
  8027. movea.l (a1)+,a2
  8028. cmpi.w #$00fd,($000a,a2)
  8029. bne.s L005c06
  8030. tst.w d1
  8031. bne.s L005c24
  8032. pea.l (L005f54,pc)
  8033. bsr.w L005de8
  8034. addq.l #4,sp
  8035. moveq.l #$ff,d1
  8036. L005c24:
  8037. move.l ($0004,a2),-(sp)
  8038. move.l ($0010,a2),-(sp)
  8039. move.l ($000c,a2),d0
  8040. add.l #$00008000,d0
  8041. move.l d0,-(sp)
  8042. bsr.s L005ca0
  8043. lea.l ($000c,sp),sp
  8044. bra.s L005c06
  8045. L005c40:
  8046. movem.l (sp)+,d1-d2/a0-a2
  8047. unlk a6
  8048. rts
  8049. L005c48:
  8050. link.w a6,#$0000
  8051. movem.l d1-d2/a0-a2,-(sp)
  8052. movea.l ($0008,a6),a0
  8053. movea.l ($007a,a0),a1
  8054. tst.l (a1)
  8055. beq.s L005c98
  8056. moveq.l #$00,d1
  8057. L005c5e:
  8058. tst.l (a1)
  8059. beq.s L005c98
  8060. movea.l (a1)+,a2
  8061. cmpi.w #$00fc,($000a,a2)
  8062. bne.s L005c5e
  8063. tst.w d1
  8064. bne.s L005c7c
  8065. pea.l (L005f90,pc)
  8066. bsr.w L005de8
  8067. addq.l #4,sp
  8068. moveq.l #$ff,d1
  8069. L005c7c:
  8070. move.l ($0004,a2),-(sp)
  8071. move.l ($0010,a2),-(sp)
  8072. move.l ($000c,a2),d0
  8073. add.l #$00008000,d0
  8074. move.l d0,-(sp)
  8075. bsr.s L005ca0
  8076. lea.l ($000c,sp),sp
  8077. bra.s L005c5e
  8078. L005c98:
  8079. movem.l (sp)+,d1-d2/a0-a2
  8080. unlk a6
  8081. rts
  8082. L005ca0:
  8083. link.w a6,#$0000
  8084. move.l ($0010,a6),-(sp)
  8085. bsr.w L005d5c
  8086. addq.l #4,sp
  8087. tst.l ($000c,a6)
  8088. beq.s L005cf0
  8089. move.l ($0008,a6),-(sp)
  8090. bsr.w L005d9e
  8091. pea.l (L00609c,pc)
  8092. bsr.w L005de8
  8093. move.l ($0008,a6),d0
  8094. add.l ($000c,a6),d0
  8095. subq.l #1,d0
  8096. move.l d0,-(sp)
  8097. bsr.w L005d9e
  8098. pea.l (L0060a0,pc)
  8099. bsr.w L005de8
  8100. move.l ($000c,a6),-(sp)
  8101. bsr.w L005d9e
  8102. pea.l (L0060a0+$000003,pc)
  8103. bsr.w L005de8
  8104. lea.l ($0014,sp),sp
  8105. L005cf0:
  8106. bsr.w L005dde
  8107. unlk a6
  8108. rts
  8109. L005cf8:
  8110. link.w a6,#-$0100
  8111. movem.l a0-a2,-(sp)
  8112. movea.l ($0008,a6),a0
  8113. move.l ($000c,a6),d0
  8114. movea.l ($0008,a0),a1
  8115. lea.l (-$0100,a6),a2
  8116. addq.w #1,d0
  8117. L005d12:
  8118. subq.w #1,d0
  8119. move.b (a1)+,(a2)+
  8120. bne.s L005d12
  8121. subq.l #1,a2
  8122. tst.l ($0004,a0)
  8123. beq.s L005d2a
  8124. L005d20:
  8125. move.b #$09,(a2)+
  8126. subq.w #8,d0
  8127. bgt.s L005d20
  8128. clr.b (a2)
  8129. L005d2a:
  8130. pea.l (-$0100,a6)
  8131. bsr.w L005de8
  8132. addq.l #4,sp
  8133. tst.l ($0004,a0)
  8134. beq.s L005d54
  8135. pea.l (L0060a5,pc)
  8136. bsr.w L005de8
  8137. move.l ($0004,a0),(sp)
  8138. bsr.w L005de8
  8139. pea.l (L0060a0+$000003,pc)
  8140. bsr.w L005de8
  8141. addq.l #8,sp
  8142. L005d54:
  8143. movem.l (sp)+,a0-a2
  8144. unlk a6
  8145. rts
  8146. L005d5c:
  8147. link.w a6,#-$0100
  8148. movem.l a0-a1,-(sp)
  8149. movea.l ($0008,a6),a0
  8150. lea.l (-$0100,a6),a1
  8151. move.w #$0019,d0
  8152. L005d70:
  8153. subq.w #1,d0
  8154. move.b (a0)+,(a1)+
  8155. bne.s L005d70
  8156. subq.l #1,a1
  8157. L005d78:
  8158. move.b #$09,(a1)+
  8159. subq.w #8,d0
  8160. bgt.s L005d78
  8161. move.b #$20,(a1)+ ;' '
  8162. move.b #$3a,(a1)+ ;':'
  8163. move.b #$20,(a1)+ ;' '
  8164. clr.b (a1)
  8165. pea.l (-$0100,a6)
  8166. bsr.s L005de8
  8167. addq.l #4,sp
  8168. movem.l (sp)+,a0-a1
  8169. unlk a6
  8170. rts
  8171. L005d9e:
  8172. link.w a6,#-$0010
  8173. movem.l d1-d2/a0-a1,-(sp)
  8174. lea.l (-$0010,a6),a0
  8175. lea.l (L000cc4,pc),a1
  8176. move.l ($0008,a6),d1
  8177. moveq.l #$07,d0
  8178. L005db4:
  8179. rol.l #4,d1
  8180. moveq.l #$0f,d2
  8181. and.w d1,d2
  8182. move.b (a1,d2.w),(a0)+
  8183. dbra.w d0,L005db4
  8184. clr.b (a0)
  8185. pea.l (-$0010,a6)
  8186. bsr.s L005de8
  8187. addq.l #4,sp
  8188. movem.l (sp)+,d1-d2/a0-a1
  8189. unlk a6
  8190. rts
  8191. L005dd4:
  8192. pea.l (L0060a7,pc)
  8193. bsr.s L005de8
  8194. addq.l #4,sp
  8195. rts
  8196. L005dde:
  8197. pea.l (L005e62,pc)
  8198. bsr.s L005de8
  8199. addq.l #4,sp
  8200. rts
  8201. L005de8:
  8202. link.w a6,#$0000
  8203. movem.l d1/a0,-(sp)
  8204. tst.w d5
  8205. bmi.s L005e0e
  8206. movea.l ($0008,a6),a0
  8207. move.l (End+$0005c4,pc),d1
  8208. L005dfc:
  8209. move.b (a0)+,d0
  8210. beq.s L005e0e
  8211. move.b d0,(a4)+
  8212. addq.l #1,d6
  8213. cmp.l d6,d1
  8214. bne.s L005dfc
  8215. bsr.s L005e16
  8216. tst.w d5
  8217. beq.s L005dfc
  8218. L005e0e:
  8219. movem.l (sp)+,d1/a0
  8220. unlk a6
  8221. rts
  8222. L005e16:
  8223. movea.l (End+$0005c8,pc),a4
  8224. move.l d6,-(sp)
  8225. move.l a4,-(sp)
  8226. move.w d7,-(sp)
  8227. DOS _WRITE
  8228. addq.l #6,sp
  8229. cmp.l (sp)+,d0
  8230. beq.s L005e2a
  8231. moveq.l #$ff,d5
  8232. L005e2a:
  8233. moveq.l #$00,d6
  8234. rts
  8235. L005e2e:
  8236. .dc.b 'Can',$27,'t open file : ',$00
  8237. L005e41:
  8238. .dc.b 'Device full : ',$00
  8239. L005e50:
  8240. .dc.b 'Making map file...'
  8241. L005e62:
  8242. .dc.b $0a,$00
  8243. L005e64:
  8244. .dc.b '==========================================================',$0a,$00
  8245. L005ea0:
  8246. .dc.b '-------------------------- xref --------------------------',$0a,$00
  8247. L005edc:
  8248. .dc.b '-------------------------- xdef --------------------------',$0a,$00
  8249. L005f18:
  8250. .dc.b '-------------------------- comm --------------------------',$0a,$00
  8251. L005f54:
  8252. .dc.b '-------------------------- rcomm -------------------------',$0a,$00
  8253. L005f90:
  8254. .dc.b '-------------------------- rlcomm ------------------------',$0a,$00
  8255. L005fcc:
  8256. .dc.b 'align',$00
  8257. L005fd2:
  8258. .dc.b 'text',$00
  8259. L005fd7:
  8260. .dc.b 'data',$00
  8261. L005fdc:
  8262. .dc.b 'bss',$00
  8263. L005fe0:
  8264. .dc.b 'common',$00
  8265. L005fe7:
  8266. .dc.b 'stack',$00
  8267. L005fed:
  8268. .dc.b 'rdata',$00
  8269. L005ff3:
  8270. .dc.b 'rbss',$00
  8271. L005ff8:
  8272. .dc.b 'rcommon',$00
  8273. L006000:
  8274. .dc.b 'rstack',$00
  8275. L006007:
  8276. .dc.b 'rldata',$00
  8277. L00600e:
  8278. .dc.b 'rlbss',$00
  8279. L006014:
  8280. .dc.b 'rlcommon',$00
  8281. L00601d:
  8282. .dc.b 'rlstack',$00
  8283. L006025:
  8284. .dc.b 'exec',$00
  8285. L00602a:
  8286. .dc.b '(abs )',$00
  8287. L006034:
  8288. .dc.b '(text )',$00
  8289. L00603e:
  8290. .dc.b '(data )',$00
  8291. L006048:
  8292. .dc.b '(bss )',$00
  8293. L006052:
  8294. .dc.b '(stack )',$00
  8295. L00605c:
  8296. .dc.b '(rdata )',$00
  8297. L006066:
  8298. .dc.b '(rbss )',$00
  8299. L006070:
  8300. .dc.b '(rstack )',$00
  8301. L00607a:
  8302. .dc.b '(rldata )',$00
  8303. L006084:
  8304. .dc.b '(rlbss )',$00
  8305. L00608e:
  8306. .dc.b '(rlstack)',$00
  8307. L006098:
  8308. bvs.s L006106+$000002
  8309. move.l d0,d0
  8310. L00609c:
  8311. move.l ($2000,a5),d0
  8312. L0060a0:
  8313. move.l ($0029,a0),d0
  8314. L0060a4:
  8315. .dc.b $00
  8316. L0060a5:
  8317. .dc.b $28,$00
  8318. L0060a7:
  8319. .dc.b $20,$00,$00
  8320. L0060aa:
  8321. link.w a6,#-$000c
  8322. movem.l d1-d6/a0-a3,-(sp)
  8323. moveq.l #$00,d6
  8324. lea.l (End+$00006c,pc),a2
  8325. move.l (a2),d0
  8326. beq.s L0060ee
  8327. L0060bc:
  8328. movea.l d0,a2
  8329. movea.l (a2),a1
  8330. move.w #$0001,d5
  8331. movea.l ($0010,a1),a0
  8332. move.w (a0),d0
  8333. beq.s L0060e8
  8334. L0060cc:
  8335. move.w d0,d1
  8336. bsr.w L0014a4
  8337. bmi.w L0005e6
  8338. add.w d0,d0
  8339. lea.l (L0062fe,pc),a3
  8340. move.w (a3,d0.w),d0
  8341. jsr (a3,d0.w)
  8342. move.w (a0),d0
  8343. bne.s L0060cc
  8344. L0060e8:
  8345. addq.w #4,a2
  8346. move.l (a2),d0
  8347. bne.s L0060bc
  8348. L0060ee:
  8349. lea.l (End+$000054,pc),a0
  8350. move.l d6,(a0)
  8351. movem.l (sp)+,d1-d6/a0-a3
  8352. unlk a6
  8353. rts
  8354. L0060fc:
  8355. tst.l ($0002,a0)
  8356. bne.w L0005e6
  8357. addq.l #6,a0
  8358. L006106:
  8359. and.l #$000000ff,d1
  8360. move.l d1,d5
  8361. rts
  8362. L006110:
  8363. addq.l #2,a0
  8364. addq.l #2,a0
  8365. addq.l #2,a0
  8366. addq.l #4,a0
  8367. cmp.w #$0005,d5
  8368. beq.s L006124
  8369. cmp.w #$0008,d5
  8370. bne.s L006126
  8371. L006124:
  8372. addq.l #4,d6
  8373. L006126:
  8374. rts
  8375. L006128:
  8376. addq.l #2,a0
  8377. move.w (a0)+,d0
  8378. addq.l #4,a0
  8379. cmp.w #$0005,d5
  8380. beq.s L00613a
  8381. cmp.w #$0008,d5
  8382. bne.s L00614c
  8383. L00613a:
  8384. bsr.w L0036c6
  8385. cmp.w #$0004,d0
  8386. bls.s L00614c
  8387. cmp.w #$00fe,d0
  8388. beq.s L00614c
  8389. addq.l #4,d6
  8390. L00614c:
  8391. rts
  8392. L00614e:
  8393. addq.l #2,a0
  8394. move.w (a0)+,d0
  8395. cmp.w #$0005,d5
  8396. beq.s L00615e
  8397. cmp.w #$0008,d5
  8398. bne.s L006170
  8399. L00615e:
  8400. bsr.w L0036c6
  8401. cmp.w #$0004,d0
  8402. bls.s L006170
  8403. cmp.w #$00fe,d0
  8404. beq.s L006170
  8405. addq.l #4,d6
  8406. L006170:
  8407. rts
  8408. L006172:
  8409. addq.l #2,a0
  8410. move.w (a0)+,d0
  8411. bsr.w L0036c6
  8412. tst.w d0
  8413. beq.s L006194
  8414. cmp.w #$0004,d0
  8415. bls.s L006190
  8416. cmp.w #$00fe,d0
  8417. beq.s L006190
  8418. move.w #$0002,d0
  8419. bra.s L006194
  8420. L006190:
  8421. move.w #$0001,d0
  8422. L006194:
  8423. movea.l (End+$000090,pc),a3
  8424. cmpa.l (End+$00008c,pc),a3
  8425. beq.w L0037f2
  8426. move.l d1,-(a3)
  8427. move.w d0,-(a3)
  8428. lea.l (End+$000090,pc),a3
  8429. subq.l #6,(a3)
  8430. rts
  8431. L0061ac:
  8432. addq.l #2,a0
  8433. move.l (a0)+,d1
  8434. movea.l (End+$000090,pc),a3
  8435. cmpa.l (End+$00008c,pc),a3
  8436. beq.w L0037f2
  8437. move.l d1,-(a3)
  8438. move.w #$0000,-(a3)
  8439. lea.l (End+$000090,pc),a3
  8440. subq.l #6,(a3)
  8441. rts
  8442. L0061ca:
  8443. addq.l #2,a0
  8444. move.l (a0)+,d1
  8445. movea.l (End+$000090,pc),a3
  8446. cmpa.l (End+$00008c,pc),a3
  8447. beq.w L0037f2
  8448. move.l d1,-(a3)
  8449. move.w #$0001,-(a3)
  8450. lea.l (End+$000090,pc),a3
  8451. subq.l #6,(a3)
  8452. rts
  8453. L0061e8:
  8454. addq.l #2,a0
  8455. move.l (a0)+,d1
  8456. movea.l (End+$000090,pc),a3
  8457. cmpa.l (End+$00008c,pc),a3
  8458. beq.w L0037f2
  8459. move.l d1,-(a3)
  8460. move.w #$0002,-(a3)
  8461. lea.l (End+$000090,pc),a3
  8462. subq.l #6,(a3)
  8463. rts
  8464. L006206:
  8465. addq.l #2,a0
  8466. movea.l (End+$000090,pc),a3
  8467. cmpa.l (End+$000088,pc),a3
  8468. beq.w L0037f8
  8469. lea.l (End+$000090,pc),a3
  8470. addq.l #6,(a3)
  8471. rts
  8472. L00621c:
  8473. addq.l #2,a0
  8474. movea.l (End+$000090,pc),a3
  8475. cmpa.l (End+$000088,pc),a3
  8476. beq.w L0037f8
  8477. move.w (a3)+,d0
  8478. move.l (a3)+,d1
  8479. cmp.w #$0002,d0
  8480. bne.s L00623c
  8481. cmp.w #$0004,d5
  8482. bls.s L00623c
  8483. addq.l #4,d6
  8484. L00623c:
  8485. lea.l (End+$000090,pc),a3
  8486. addq.l #6,(a3)
  8487. rts
  8488. L006244:
  8489. addq.l #2,a0
  8490. movea.l (End+$000090,pc),a3
  8491. cmpa.l (End+$000088,pc),a3
  8492. beq.s L006272
  8493. move.w (a3)+,d2
  8494. move.l (a3)+,d0
  8495. rts
  8496. L006256:
  8497. addq.l #2,a0
  8498. movea.l (End+$000090,pc),a3
  8499. cmpa.l (End+$000088,pc),a3
  8500. beq.s L006272
  8501. move.w (a3)+,d2
  8502. move.l (a3)+,d0
  8503. cmpa.l (End+$000088,pc),a3
  8504. beq.s L006272
  8505. move.w (a3)+,d3
  8506. move.l (a3)+,d1
  8507. rts
  8508. L006272:
  8509. addq.l #4,sp
  8510. bra.w L0037f8
  8511. L006278:
  8512. tst.w d2
  8513. ble.s L00627e
  8514. moveq.l #$ff,d2
  8515. L00627e:
  8516. rts
  8517. L006280:
  8518. moveq.l #$00,d4
  8519. tst.w d2
  8520. beq.s L00628a
  8521. moveq.l #$ff,d4
  8522. bra.s L006290
  8523. L00628a:
  8524. tst.w d3
  8525. beq.s L006290
  8526. moveq.l #$ff,d4
  8527. L006290:
  8528. rts
  8529. L006292:
  8530. bsr.s L006244
  8531. bsr.s L006278
  8532. move.l d0,-(a3)
  8533. move.w d2,-(a3)
  8534. rts
  8535. L00629c:
  8536. bsr.s L006256
  8537. bsr.s L006280
  8538. move.l d1,-(a3)
  8539. move.w d4,-(a3)
  8540. lea.l (End+$000090,pc),a3
  8541. addq.l #6,(a3)
  8542. rts
  8543. L0062ac:
  8544. bsr.s L006256
  8545. tst.w d2
  8546. beq.s L0062c8
  8547. bgt.s L0062b8
  8548. moveq.l #$ff,d4
  8549. bra.s L0062cc
  8550. L0062b8:
  8551. tst.w d3
  8552. bge.s L0062c0
  8553. moveq.l #$ff,d4
  8554. bra.s L0062cc
  8555. L0062c0:
  8556. cmp.w d2,d3
  8557. beq.s L0062c8
  8558. moveq.l #$ff,d4
  8559. bra.s L0062cc
  8560. L0062c8:
  8561. move.w d3,d4
  8562. eor.w d2,d4
  8563. L0062cc:
  8564. move.l d1,-(a3)
  8565. move.w d4,-(a3)
  8566. lea.l (End+$000090,pc),a3
  8567. addq.l #6,(a3)
  8568. rts
  8569. L0062d8:
  8570. bsr.w L006256
  8571. tst.w d2
  8572. beq.s L0062ee
  8573. bgt.s L0062e6
  8574. moveq.l #$ff,d4
  8575. bra.s L0062f2
  8576. L0062e6:
  8577. tst.w d3
  8578. beq.s L0062ee
  8579. moveq.l #$ff,d4
  8580. bra.s L0062f2
  8581. L0062ee:
  8582. move.w d3,d4
  8583. eor.w d2,d4
  8584. L0062f2:
  8585. move.l d1,-(a3)
  8586. move.w d4,-(a3)
  8587. lea.l (End+$000090,pc),a3
  8588. addq.l #6,(a3)
  8589. rts
  8590. L0062fe:
  8591. .dc.w L0060e8-L0062fe
  8592. .dc.w L0014ec-L0062fe
  8593. .dc.w L0060fc-L0062fe
  8594. .dc.w L0060fc-L0062fe
  8595. .dc.w L0060fc-L0062fe
  8596. .dc.w L0060fc-L0062fe
  8597. .dc.w L0060fc-L0062fe
  8598. .dc.w L0060fc-L0062fe
  8599. .dc.w L0060fc-L0062fe
  8600. .dc.w L0060fc-L0062fe
  8601. .dc.w L0060fc-L0062fe
  8602. .dc.w L0060fc-L0062fe
  8603. .dc.w L0014ec-L0062fe
  8604. .dc.w L0014ec-L0062fe
  8605. .dc.w L0014ec-L0062fe
  8606. .dc.w L0014ec-L0062fe
  8607. .dc.w L0014ec-L0062fe
  8608. .dc.w L0014ec-L0062fe
  8609. .dc.w L0014ec-L0062fe
  8610. .dc.w L0014ec-L0062fe
  8611. .dc.w L0014ec-L0062fe
  8612. .dc.w L0014ec-L0062fe
  8613. .dc.w L0014ec-L0062fe
  8614. .dc.w L0014ec-L0062fe
  8615. .dc.w L0014ec-L0062fe
  8616. .dc.w L0014ec-L0062fe
  8617. .dc.w L0014ec-L0062fe
  8618. .dc.w L0014ec-L0062fe
  8619. .dc.w L0014ec-L0062fe
  8620. .dc.w L0014ec-L0062fe
  8621. .dc.w L0014ec-L0062fe
  8622. .dc.w L0014ec-L0062fe
  8623. .dc.w L0014ec-L0062fe
  8624. .dc.w L0014ec-L0062fe
  8625. .dc.w L0014ec-L0062fe
  8626. .dc.w L0014ec-L0062fe
  8627. .dc.w L0014ec-L0062fe
  8628. .dc.w L0014ec-L0062fe
  8629. .dc.w L0014ec-L0062fe
  8630. .dc.w L0014ec-L0062fe
  8631. .dc.w L0014ec-L0062fe
  8632. .dc.w L0014ec-L0062fe
  8633. .dc.w L0014ec-L0062fe
  8634. .dc.w L006116-L0062fe
  8635. .dc.w L006116-L0062fe
  8636. .dc.w L0014ec-L0062fe
  8637. .dc.w L00614e-L0062fe
  8638. .dc.w L0014ec-L0062fe
  8639. .dc.w L0014ec-L0062fe
  8640. .dc.w L0014ec-L0062fe
  8641. .dc.w L0014ec-L0062fe
  8642. .dc.w L0014ec-L0062fe
  8643. .dc.w L006114-L0062fe
  8644. .dc.w L006114-L0062fe
  8645. .dc.w L006114-L0062fe
  8646. .dc.w L006114-L0062fe
  8647. .dc.w L006114-L0062fe
  8648. .dc.w L006114-L0062fe
  8649. .dc.w L0014ec-L0062fe
  8650. .dc.w L0014ec-L0062fe
  8651. .dc.w L0014ec-L0062fe
  8652. .dc.w L0014ec-L0062fe
  8653. .dc.w L0014ec-L0062fe
  8654. .dc.w L0014ec-L0062fe
  8655. .dc.w L0014ec-L0062fe
  8656. .dc.w L0014ec-L0062fe
  8657. .dc.w L0014ec-L0062fe
  8658. .dc.w L0014ec-L0062fe
  8659. .dc.w L0014ec-L0062fe
  8660. .dc.w L0014ec-L0062fe
  8661. .dc.w L0014ec-L0062fe
  8662. .dc.w L0014ec-L0062fe
  8663. .dc.w L0014ec-L0062fe
  8664. .dc.w L0014ec-L0062fe
  8665. .dc.w L0014ec-L0062fe
  8666. .dc.w L0005e6-L0062fe
  8667. .dc.w L0005e6-L0062fe
  8668. .dc.w L0005e6-L0062fe
  8669. .dc.w L0005e6-L0062fe
  8670. .dc.w L0005e6-L0062fe
  8671. .dc.w L006116-L0062fe
  8672. .dc.w L006116-L0062fe
  8673. .dc.w L0014ec-L0062fe
  8674. .dc.w L00614e-L0062fe
  8675. .dc.w L0014ec-L0062fe
  8676. .dc.w L0014ec-L0062fe
  8677. .dc.w L0014ec-L0062fe
  8678. .dc.w L0014ec-L0062fe
  8679. .dc.w L0014ec-L0062fe
  8680. .dc.w L006114-L0062fe
  8681. .dc.w L006114-L0062fe
  8682. .dc.w L006114-L0062fe
  8683. .dc.w L006114-L0062fe
  8684. .dc.w L006114-L0062fe
  8685. .dc.w L006114-L0062fe
  8686. .dc.w L0014ec-L0062fe
  8687. .dc.w L0014ec-L0062fe
  8688. .dc.w L0005e6-L0062fe
  8689. .dc.w L0005e6-L0062fe
  8690. .dc.w L0005e6-L0062fe
  8691. .dc.w L0005e6-L0062fe
  8692. .dc.w L0005e6-L0062fe
  8693. .dc.w L0014ec-L0062fe
  8694. .dc.w L0014ec-L0062fe
  8695. .dc.w L0014ec-L0062fe
  8696. .dc.w L0014ec-L0062fe
  8697. .dc.w L0014ec-L0062fe
  8698. .dc.w L0014ec-L0062fe
  8699. .dc.w L0014ec-L0062fe
  8700. .dc.w L0014ec-L0062fe
  8701. .dc.w L0014ec-L0062fe
  8702. .dc.w L0014ec-L0062fe
  8703. .dc.w L0014ec-L0062fe
  8704. .dc.w L0014ec-L0062fe
  8705. .dc.w L0014ec-L0062fe
  8706. .dc.w L0014ec-L0062fe
  8707. .dc.w L0014ec-L0062fe
  8708. .dc.w L0014ec-L0062fe
  8709. .dc.w L0014ec-L0062fe
  8710. .dc.w L0014ec-L0062fe
  8711. .dc.w L0014ec-L0062fe
  8712. .dc.w L0014ec-L0062fe
  8713. .dc.w L0014ec-L0062fe
  8714. .dc.w L0014ec-L0062fe
  8715. .dc.w L0014ec-L0062fe
  8716. .dc.w L0014ec-L0062fe
  8717. .dc.w L0014ec-L0062fe
  8718. .dc.w L0014ec-L0062fe
  8719. .dc.w L0014ec-L0062fe
  8720. .dc.w L0014ec-L0062fe
  8721. .dc.w L0014ec-L0062fe
  8722. .dc.w L0014ec-L0062fe
  8723. .dc.w L0014ec-L0062fe
  8724. .dc.w L0014ec-L0062fe
  8725. .dc.w L006112-L0062fe
  8726. .dc.w L006112-L0062fe
  8727. .dc.w L0014ec-L0062fe
  8728. .dc.w L006128-L0062fe
  8729. .dc.w L0014ec-L0062fe
  8730. .dc.w L0014ec-L0062fe
  8731. .dc.w L0014ec-L0062fe
  8732. .dc.w L0014ec-L0062fe
  8733. .dc.w L0014ec-L0062fe
  8734. .dc.w L006110-L0062fe
  8735. .dc.w L006110-L0062fe
  8736. .dc.w L006110-L0062fe
  8737. .dc.w L006110-L0062fe
  8738. .dc.w L006110-L0062fe
  8739. .dc.w L006110-L0062fe
  8740. .dc.w L0014ec-L0062fe
  8741. .dc.w L0014ec-L0062fe
  8742. .dc.w L0014ec-L0062fe
  8743. .dc.w L0014ec-L0062fe
  8744. .dc.w L0014ec-L0062fe
  8745. .dc.w L0014ec-L0062fe
  8746. .dc.w L0014ec-L0062fe
  8747. .dc.w L0014ec-L0062fe
  8748. .dc.w L0014ec-L0062fe
  8749. .dc.w L0014ec-L0062fe
  8750. .dc.w L0014ec-L0062fe
  8751. .dc.w L0014ec-L0062fe
  8752. .dc.w L0014ec-L0062fe
  8753. .dc.w L0014ec-L0062fe
  8754. .dc.w L0014ec-L0062fe
  8755. .dc.w L0014ec-L0062fe
  8756. .dc.w L0014ec-L0062fe
  8757. .dc.w L0005e6-L0062fe
  8758. .dc.w L0005e6-L0062fe
  8759. .dc.w L0005e6-L0062fe
  8760. .dc.w L0005e6-L0062fe
  8761. .dc.w L0005e6-L0062fe
  8762. .dc.w L006112-L0062fe
  8763. .dc.w L006112-L0062fe
  8764. .dc.w L0014ec-L0062fe
  8765. .dc.w L006128-L0062fe
  8766. .dc.w L0014ec-L0062fe
  8767. .dc.w L0014ec-L0062fe
  8768. .dc.w L0014ec-L0062fe
  8769. .dc.w L0014ec-L0062fe
  8770. .dc.w L0014ec-L0062fe
  8771. .dc.w L006110-L0062fe
  8772. .dc.w L006110-L0062fe
  8773. .dc.w L006110-L0062fe
  8774. .dc.w L006110-L0062fe
  8775. .dc.w L006110-L0062fe
  8776. .dc.w L006110-L0062fe
  8777. .dc.w L0014ec-L0062fe
  8778. .dc.w L0014ec-L0062fe
  8779. .dc.w L0005e6-L0062fe
  8780. .dc.w L0005e6-L0062fe
  8781. .dc.w L0005e6-L0062fe
  8782. .dc.w L0005e6-L0062fe
  8783. .dc.w L0005e6-L0062fe
  8784. .dc.w L0014ec-L0062fe
  8785. .dc.w L0014ec-L0062fe
  8786. .dc.w L0014ec-L0062fe
  8787. .dc.w L0014ec-L0062fe
  8788. .dc.w L0014ec-L0062fe
  8789. .dc.w L0014ec-L0062fe
  8790. .dc.w L0014ec-L0062fe
  8791. .dc.w L0014ec-L0062fe
  8792. .dc.w L0014ec-L0062fe
  8793. .dc.w L0014ec-L0062fe
  8794. .dc.w L0014ec-L0062fe
  8795. .dc.w L0014ec-L0062fe
  8796. .dc.w L0014ec-L0062fe
  8797. .dc.w L0014ec-L0062fe
  8798. .dc.w L0014ec-L0062fe
  8799. .dc.w L0014ec-L0062fe
  8800. .dc.w L0014ec-L0062fe
  8801. .dc.w L0014ec-L0062fe
  8802. .dc.w L0014ec-L0062fe
  8803. .dc.w L0014ec-L0062fe
  8804. .dc.w L0014ec-L0062fe
  8805. .dc.w L0014ec-L0062fe
  8806. .dc.w L0014ec-L0062fe
  8807. .dc.w L0014ec-L0062fe
  8808. .dc.w L0014ec-L0062fe
  8809. .dc.w L0014ec-L0062fe
  8810. .dc.w L0014ec-L0062fe
  8811. .dc.w L0014ec-L0062fe
  8812. .dc.w L0014ec-L0062fe
  8813. .dc.w L0014ec-L0062fe
  8814. .dc.w L006172-L0062fe
  8815. .dc.w L006172-L0062fe
  8816. .dc.w L006172-L0062fe
  8817. .dc.w L006172-L0062fe
  8818. .dc.w L0061ac-L0062fe
  8819. .dc.w L0061ca-L0062fe
  8820. .dc.w L0061ca-L0062fe
  8821. .dc.w L0061ca-L0062fe
  8822. .dc.w L0061ca-L0062fe
  8823. .dc.w L0061e8-L0062fe
  8824. .dc.w L0061e8-L0062fe
  8825. .dc.w L0061e8-L0062fe
  8826. .dc.w L0061e8-L0062fe
  8827. .dc.w L0061e8-L0062fe
  8828. .dc.w L0061e8-L0062fe
  8829. .dc.w L006206-L0062fe
  8830. .dc.w L006206-L0062fe
  8831. .dc.w L00621c-L0062fe
  8832. .dc.w L006206-L0062fe
  8833. .dc.w L00621c-L0062fe
  8834. .dc.w L006206-L0062fe
  8835. .dc.w L006292-L0062fe
  8836. .dc.w L006292-L0062fe
  8837. .dc.w L006292-L0062fe
  8838. .dc.w L006292-L0062fe
  8839. .dc.w L006292-L0062fe
  8840. .dc.w L006292-L0062fe
  8841. .dc.w L006292-L0062fe
  8842. .dc.w L0005e6-L0062fe
  8843. .dc.w L00629c-L0062fe
  8844. .dc.w L00629c-L0062fe
  8845. .dc.w L00629c-L0062fe
  8846. .dc.w L00629c-L0062fe
  8847. .dc.w L00629c-L0062fe
  8848. .dc.w L00629c-L0062fe
  8849. .dc.w L0062ac-L0062fe
  8850. .dc.w L0062d8-L0062fe
  8851. .dc.w L00629c-L0062fe
  8852. .dc.w L00629c-L0062fe
  8853. .dc.w L00629c-L0062fe
  8854. .dc.w L00629c-L0062fe
  8855. .dc.w L00629c-L0062fe
  8856. .dc.w L00629c-L0062fe
  8857. .dc.w L00629c-L0062fe
  8858. .dc.w L00629c-L0062fe
  8859. .dc.w L00629c-L0062fe
  8860. .dc.w L00629c-L0062fe
  8861. .dc.w L00629c-L0062fe
  8862. .dc.w L00629c-L0062fe
  8863. .dc.w L00629c-L0062fe
  8864. .dc.w L0005e6-L0062fe
  8865. .dc.w L0005e6-L0062fe
  8866. .dc.w L0014ec-L0062fe
  8867. .dc.w L0014ec-L0062fe
  8868. .dc.w L0014ec-L0062fe
  8869. .dc.w L0014ec-L0062fe
  8870. .dc.w L0014ec-L0062fe
  8871. .dc.w L0014ec-L0062fe
  8872. .dc.w L0014ec-L0062fe
  8873. .dc.w L0014ec-L0062fe
  8874. .dc.w L0014ec-L0062fe
  8875. .dc.w L0014ec-L0062fe
  8876. .dc.w L0014ec-L0062fe
  8877. .dc.w L0014ec-L0062fe
  8878. .dc.w L0014ec-L0062fe
  8879. .dc.w L0014ec-L0062fe
  8880. .dc.w L0014ec-L0062fe
  8881. .dc.w L0014ec-L0062fe
  8882. .dc.w L0014ec-L0062fe
  8883. .dc.w L0014ec-L0062fe
  8884. .dc.w L0014ec-L0062fe
  8885. .dc.w L0014ec-L0062fe
  8886. .dc.w L0014ec-L0062fe
  8887. .dc.w L0014ec-L0062fe
  8888. .dc.w L0014ec-L0062fe
  8889. .dc.w L0014ec-L0062fe
  8890. .dc.w L0014ec-L0062fe
  8891. .dc.w L0014ec-L0062fe
  8892. .dc.w L0005e6-L0062fe
  8893. .dc.w L0014ec-L0062fe
  8894. .dc.w L0014ec-L0062fe
  8895. .dc.w L0014ec-L0062fe
  8896. .dc.w L0014ec-L0062fe
  8897. .dc.w L0014ec-L0062fe
  8898. .dc.w L0005e6-L0062fe
  8899. .dc.w L0005e6-L0062fe
  8900. .dc.w L0005e6-L0062fe
  8901. .dc.w L0005e6-L0062fe
  8902. .dc.w L0005e6-L0062fe
  8903. .dc.w L0005e6-L0062fe
  8904. .dc.w L0005e6-L0062fe
  8905. .dc.w L0005e6-L0062fe
  8906. .dc.w L0005e6-L0062fe
  8907. .dc.w L0005e6-L0062fe
  8908. .dc.w L0014ec-L0062fe
  8909. .dc.w L0014ec-L0062fe
  8910. L00657c:
  8911. link.w a6,#-$01c0
  8912. movem.l d1-d4/a3-a4,-(sp)
  8913. pea.l (-$0180,a6)
  8914. pea.l (a0)
  8915. DOS _NAMECK
  8916. addq.l #8,sp
  8917. tst.l d0
  8918. bne.w L006766
  8919. move.b (-$012a,a6),d1
  8920. movea.l a0,a1
  8921. L00659a:
  8922. tst.b (a1)+
  8923. bne.s L00659a
  8924. cmpi.b #$2e,(-$0002,a1) ;'.'
  8925. bne.s L0065a8
  8926. st.b d1
  8927. L0065a8:
  8928. lea.l (End+$000074,pc),a3
  8929. clr.b (-$0100,a6)
  8930. L0065b0:
  8931. pea.l (a0)
  8932. pea.l (-$0100,a6)
  8933. bsr.w L006876
  8934. addq.l #8,sp
  8935. tst.b d1
  8936. bne.s L0065ce
  8937. pea.l (L006804,pc)
  8938. pea.l (-$0100,a6)
  8939. bsr.w L006876
  8940. addq.l #8,sp
  8941. L0065ce:
  8942. move.w #$0020,-(sp) ;' '
  8943. pea.l (-$0100,a6)
  8944. pea.l (-$01c0,a6)
  8945. DOS _FILES
  8946. addq.l #6,sp
  8947. move.l d0,(sp)+
  8948. beq.s L0065fa
  8949. move.l (a3),d0
  8950. beq.w L006766
  8951. movea.l d0,a3
  8952. pea.l ($0004,a3)
  8953. pea.l (-$0100,a6)
  8954. bsr.w L006860
  8955. addq.l #8,sp
  8956. bra.s L0065b0
  8957. L0065fa:
  8958. pea.l (-$0100,a6)
  8959. pea.l (-$0080,a6)
  8960. bsr.w L006860
  8961. addq.l #8,sp
  8962. pea.l (-$0180,a6)
  8963. pea.l (-$0100,a6)
  8964. DOS _NAMECK
  8965. addq.l #8,sp
  8966. pea.l (-$0180,a6)
  8967. pea.l (-$0100,a6)
  8968. bsr.w L006860
  8969. addq.l #8,sp
  8970. pea.l (-$013d,a6)
  8971. pea.l (-$0100,a6)
  8972. bsr.w L006876
  8973. addq.l #8,sp
  8974. pea.l (-$012a,a6)
  8975. pea.l (-$0100,a6)
  8976. bsr.w L006876
  8977. addq.l #8,sp
  8978. pea.l (-$0100,a6)
  8979. bsr.w L0067bc
  8980. addq.l #4,sp
  8981. moveq.l #$ff,d4
  8982. move.l (End+$000064,pc),d0
  8983. beq.s L00667a
  8984. L006650:
  8985. movea.l d0,a4
  8986. move.l ($0004,a4),d0
  8987. beq.s L006660
  8988. cmp.l d0,d4
  8989. beq.s L006674
  8990. move.l d0,d4
  8991. bra.s L006662
  8992. L006660:
  8993. moveq.l #$ff,d4
  8994. L006662:
  8995. move.l (a4),-(sp)
  8996. pea.l (-$0100,a6)
  8997. bsr.w L0068a8
  8998. addq.l #8,sp
  8999. tst.l d0
  9000. beq.w L0067b8
  9001. L006674:
  9002. move.l ($008a,a4),d0
  9003. bne.s L006650
  9004. L00667a:
  9005. lea.l (End+$00007c,pc),a1
  9006. lea.l (End+$000084,pc),a2
  9007. moveq.l #$00,d1
  9008. move.w d1,-(sp)
  9009. pea.l (-$0100,a6)
  9010. DOS _OPEN
  9011. addq.l #6,sp
  9012. move.l d0,d3
  9013. bmi.w L006780
  9014. move.w #$0002,-(sp)
  9015. move.l d1,-(sp)
  9016. move.w d3,-(sp)
  9017. DOS _SEEK
  9018. move.l d0,d2
  9019. move.l d0,d7
  9020. move.w d1,($0006,sp)
  9021. DOS _SEEK
  9022. addq.l #8,sp
  9023. btst.l #$00,d2
  9024. bne.w L00677a
  9025. moveq.l #$20,d0 ;' '
  9026. cmp.l d0,d2
  9027. bcs.w L00677a
  9028. moveq.l #$10,d0
  9029. add.l d0,d2
  9030. sub.l d2,(a2)
  9031. bmi.w L00054e
  9032. movea.l (a1),a3
  9033. add.l d2,(a1)
  9034. sub.l d0,d2
  9035. move.l d2,-(sp)
  9036. pea.l (a3)
  9037. move.w d3,-(sp)
  9038. DOS _READ
  9039. lea.l ($000a,sp),sp
  9040. cmp.l d0,d2
  9041. bne.w L006780
  9042. move.w d3,-(sp)
  9043. DOS _CLOSE
  9044. addq.l #2,sp
  9045. tst.l d0
  9046. bmi.w L006780
  9047. move.l d1,(a3,d2.l)
  9048. cmpi.w #$d000,(a3)
  9049. beq.s L00670a
  9050. cmpi.w #$0068,(a3) ;'h'
  9051. beq.s L00670a
  9052. cmpi.w #$d100,(a3)
  9053. bne.w L006798
  9054. moveq.l #$02,d0
  9055. cmp.l ($0002,a3),d0
  9056. bne.w L006798
  9057. L00670a:
  9058. move.l a3,d1
  9059. pea.l (-$0080,a6)
  9060. bsr.w L006892
  9061. addq.l #4,sp
  9062. addq.l #8,d0
  9063. andi.w #$fffe,d0
  9064. sub.l d0,(a2)
  9065. bmi.w L00054e
  9066. movea.l (a1),a0
  9067. add.l d0,(a1)
  9068. pea.l (-$0080,a6)
  9069. pea.l (a0)
  9070. bsr.w L006860
  9071. addq.l #8,sp
  9072. pea.l (-$0100,a6)
  9073. bsr.w L006892
  9074. addq.l #4,sp
  9075. addq.l #8,d0
  9076. andi.w #$fffe,d0
  9077. sub.l d0,(a2)
  9078. bmi.w L00054e
  9079. movea.l (a1),a3
  9080. add.l d0,(a1)
  9081. pea.l (-$0100,a6)
  9082. pea.l (a3)
  9083. bsr.w L006860
  9084. addq.l #8,sp
  9085. movea.l a3,a1
  9086. movea.l d1,a2
  9087. moveq.l #$00,d0
  9088. L00675e:
  9089. movem.l (sp)+,d1-d4/a3-a4
  9090. unlk a6
  9091. rts
  9092. L006766:
  9093. pea.l (L006807,pc)
  9094. DOS _PRINT
  9095. pea.l (a0)
  9096. DOS _PRINT
  9097. addq.l #8,sp
  9098. bsr.w L000c82
  9099. moveq.l #$ff,d0
  9100. bra.s L00675e
  9101. L00677a:
  9102. pea.l (L006814,pc)
  9103. bra.s L006784
  9104. L006780:
  9105. pea.l (L006829,pc)
  9106. L006784:
  9107. DOS _PRINT
  9108. pea.l (-$0100,a6)
  9109. DOS _PRINT
  9110. addq.l #8,sp
  9111. bsr.w L000c82
  9112. move.w #$0001,-(sp)
  9113. DOS _EXIT2
  9114. L006798:
  9115. add.l #$00000010,d2
  9116. add.l d2,(a2)
  9117. sub.l d2,(a1)
  9118. pea.l (L00683b,pc)
  9119. DOS _PRINT
  9120. pea.l (-$0100,a6)
  9121. DOS _PRINT
  9122. addq.l #8,sp
  9123. bsr.w L000c82
  9124. moveq.l #$fe,d0
  9125. bra.s L00675e
  9126. L0067b8:
  9127. moveq.l #$01,d0
  9128. bra.s L00675e
  9129. L0067bc:
  9130. movem.l d0/a0-a1,-(sp)
  9131. movea.l ($0010,sp),a0
  9132. lea.l (a0),a1
  9133. L0067c6:
  9134. move.b (a0)+,d0
  9135. move.b d0,(a1)+
  9136. beq.s L0067de
  9137. bpl.s L0067e4
  9138. cmpi.b #$a0,d0
  9139. bcs.s L0067da
  9140. cmpi.b #$e0,d0
  9141. bcs.s L0067e4
  9142. L0067da:
  9143. move.b (a0)+,(a1)+
  9144. bne.s L0067c6
  9145. L0067de:
  9146. movem.l (sp)+,d0/a0-a1
  9147. rts
  9148. L0067e4:
  9149. bsr.s L0067f8
  9150. bne.s L0067c6
  9151. move.b (End+$0005dc,pc),(-$0001,a1)
  9152. L0067ee:
  9153. move.b (a0)+,d0
  9154. bsr.s L0067f8
  9155. beq.s L0067ee
  9156. subq.l #1,a0
  9157. bra.s L0067c6
  9158. L0067f8:
  9159. cmpi.b #$5c,d0 ;'\'
  9160. beq.s L006802
  9161. cmpi.b #$2f,d0 ;'/'
  9162. L006802:
  9163. rts
  9164. L006804:
  9165. .dc.b $2e,$6f,$00
  9166. L006807:
  9167. .dc.b 'Not found : ',$00
  9168. L006814:
  9169. .dc.b 'Illegal file size : ',$00
  9170. L006829:
  9171. .dc.b 'File I/O error : ',$00
  9172. L00683b:
  9173. .dc.b 'Not obj, arc file : ',$00
  9174. L006850:
  9175. .dc.b 'Already read : ',$00
  9176. L006860:
  9177. movem.l a0-a1,-(sp)
  9178. movem.l ($000c,sp),a0-a1
  9179. move.l a0,d0
  9180. L00686c:
  9181. move.b (a1)+,(a0)+
  9182. bne.s L00686c
  9183. movem.l (sp)+,a0-a1
  9184. rts
  9185. L006876:
  9186. movem.l a0-a1,-(sp)
  9187. movem.l ($000c,sp),a0-a1
  9188. move.l a0,d0
  9189. L006882:
  9190. tst.b (a0)+
  9191. bne.s L006882
  9192. subq.l #1,a0
  9193. L006888:
  9194. move.b (a1)+,(a0)+
  9195. bne.s L006888
  9196. movem.l (sp)+,a0-a1
  9197. rts
  9198. L006892:
  9199. move.l a0,-(sp)
  9200. movea.l ($0008,sp),a0
  9201. move.l a0,d0
  9202. L00689a:
  9203. tst.b (a0)+
  9204. bne.s L00689a
  9205. subq.l #1,a0
  9206. suba.l d0,a0
  9207. move.l a0,d0
  9208. movea.l (sp)+,a0
  9209. rts
  9210. L0068a8:
  9211. movem.l d1/a0-a1,-(sp)
  9212. movem.l ($0010,sp),a0-a1
  9213. L0068b2:
  9214. move.b (a1)+,d1
  9215. beq.s L0068c8
  9216. move.b (a0)+,d0
  9217. beq.s L0068c4
  9218. cmp.b d0,d1
  9219. beq.s L0068b2
  9220. bhi.s L0068c4
  9221. L0068c0:
  9222. moveq.l #$01,d0
  9223. bra.s L0068ce
  9224. L0068c4:
  9225. moveq.l #$ff,d0
  9226. bra.s L0068ce
  9227. L0068c8:
  9228. cmp.b (a0),d1
  9229. bcs.s L0068c0
  9230. moveq.l #$00,d0
  9231. L0068ce:
  9232. movem.l (sp)+,d1/a0-a1
  9233. rts
  9234. End:
  9235. .end Start