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.

pcm8.s 174KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547
  1. ;=============================================
  2. ; Filename pcm8.x
  3. ; Time Stamp Sun Dec 30 23:03:24 2018
  4. ;
  5. ; Base address 000000
  6. ; Exec address 006512
  7. ; Text size 006d4e byte(s)
  8. ; Data size 000000 byte(s)
  9. ; Bss size 000000 byte(s)
  10. ; 966 Labels
  11. ;
  12. ; Commandline dis -b2 -h -m68000 --sp -q1 -B -M -o120 -gpcm8.lab --overwrite pcm8.x pcm8.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. .dc.b '@CM8/048'
  22. Trap2Handler:
  23. ori.w #$0700,sr
  24. movem.l d1-d7/a0-a6,-(sp)
  25. cmpi.w #$0030,d0 ;'0'
  26. bcs.s OutputFuncs
  27. cmpi.w #$0070,d0 ;'p'
  28. bcs.s UnknownFunc
  29. cmpi.w #$00a0,d0
  30. bcc.w L0000be
  31. subi.w #$0040,d0
  32. OutputFuncs:
  33. moveq.l #$0f,d7
  34. and.w d0,d7
  35. cmpi.w #$0008,d7
  36. bcc.s UnknownFunc
  37. lsl.w #6,d7
  38. lea.l (L001682,pc),a6
  39. lea.l (a6,d7.w),a6
  40. andi.w #$00f0,d0
  41. tst.b ($0c32)
  42. beq.s L000048
  43. addq.w #8,d0
  44. L000048:
  45. move.b (L001961,pc),d7
  46. beq.s L000050
  47. addq.w #4,d0
  48. L000050:
  49. movea.l (JumpTable,pc,d0.w),a0
  50. jmp (a0)
  51. UnknownFunc:
  52. moveq.l #$00,d0
  53. movem.l (sp)+,d1-d7/a0-a6
  54. rte
  55. JumpTable:
  56. .dc.l L0004c6
  57. .dc.l L000a50
  58. .dc.l L000f54
  59. .dc.l L000f54
  60. .dc.l L0005a6
  61. .dc.l L000b42
  62. .dc.l L000f54
  63. .dc.l L000f54
  64. .dc.l L000686
  65. .dc.l L000c42
  66. .dc.l L000fd2
  67. .dc.l L000fd2
  68. .dc.l L000756
  69. .dc.l L000d30
  70. .dc.l L000fb4
  71. .dc.l L000fb4
  72. .dc.l L0007c4
  73. .dc.l L000df6
  74. .dc.l UnknownFunc
  75. .dc.l UnknownFunc
  76. .dc.l L000122
  77. .dc.l L000122
  78. .dc.l L000122
  79. .dc.l L000122
  80. L0000be:
  81. cmpi.w #$0200,d0
  82. bcc.w L0001fe
  83. cmpi.w #$0100,d0
  84. bcs.s L000104
  85. addq.b #5,d0
  86. bcs.s L0000ea
  87. cmpi.b #$08,d0
  88. bcc.s L000104
  89. tst.b ($0c32)
  90. bne.s L000104
  91. move.b (L001946,pc),d1
  92. beq.s L0000e4
  93. addq.b #3,d0
  94. L0000e4:
  95. cmp.b (L001961,pc),d1
  96. bne.s L0000f6
  97. L0000ea:
  98. ext.w d0
  99. add.w d0,d0
  100. move.w (L00010c,pc,d0.w),d0
  101. jmp (L00010c,pc,d0.w)
  102. L0000f6:
  103. move.b d1,(L001961)
  104. pea.l ($0000)
  105. bra.w L001a02
  106. L000104:
  107. moveq.l #$00,d0
  108. movem.l (sp)+,d1-d7/a0-a6
  109. rte
  110. L00010c:
  111. .dc.w L000138-L00010c
  112. .dc.w L00018a-L00010c
  113. .dc.w L0001ec-L00010c
  114. .dc.w L0001ee-L00010c
  115. .dc.w L0001f6-L00010c
  116. .dc.w L00030a-L00010c
  117. .dc.w L000422-L00010c
  118. .dc.w L000440-L00010c
  119. .dc.w L0009c8-L00010c
  120. .dc.w L0009d8-L00010c
  121. .dc.w L000a16-L00010c
  122. L000122:
  123. move.w ($001e,a6),d0
  124. swap.w d0
  125. move.w ($001c,a6),d0
  126. lsl.w #8,d0
  127. move.b (L00196e,pc),d0
  128. movem.l (sp)+,d1-d7/a0-a6
  129. rte
  130. L000138:
  131. moveq.l #$00,d0
  132. move.l (L00194e,pc),d0
  133. tst.l d1
  134. bmi.w L00021e
  135. swap.w d1
  136. andi.w #$0007,d1
  137. swap.w d1
  138. move.l d1,(L00194e)
  139. swap.w d1
  140. add.w d1,d1
  141. move.w (L00016a,pc,d1.w),d1
  142. move.w d1,(L001b84+$000002)
  143. move.w d1,(L001ba8+$000002)
  144. bra.w L00021e
  145. L00016a:
  146. .dc.w $f8ff,$f9ff,$faff,$fbff
  147. .dc.w $fcff,$fdff,$feff,$ffff
  148. L00017a:
  149. cmpi.w #$0002,d1
  150. bcs.s L000182
  151. moveq.l #$02,d1
  152. L000182:
  153. move.b d1,(L001945)
  154. bra.s L00019c
  155. L00018a:
  156. tst.w d1
  157. bmi.s L0001c8
  158. cmpi.w #$0002,d1
  159. bcs.s L000196
  160. moveq.l #$02,d1
  161. L000196:
  162. move.b d1,(L001944)
  163. L00019c:
  164. moveq.l #$00,d0
  165. move.b (L001944),d0
  166. move.w d0,d1
  167. add.w d0,d0
  168. add.w d1,d0
  169. add.b (L001945),d0
  170. move.b (L0001d0,pc,d0.w),(L001948)
  171. move.b (L0001d9,pc,d0.w),(L001946)
  172. move.b (L0001e2,pc,d0.w),(L001947)
  173. L0001c8:
  174. moveq.l #$00,d0
  175. move.b (L001948,pc),d0
  176. bra.s L00021e
  177. L0001d0:
  178. .dc.b $00,$00,$00,$00,$01,$02,$00,$02
  179. .dc.b $02
  180. L0001d9:
  181. .dc.b $ff,$ff,$ff,$ff,$00,$00,$ff,$00
  182. .dc.b $00
  183. L0001e2:
  184. .dc.b $ff,$ff,$ff,$ff,$00,$ff,$ff,$ff
  185. .dc.b $ff,$00
  186. L0001ec:
  187. bra.s L00021c
  188. L0001ee:
  189. st.b (L001942)
  190. bra.s L00021c
  191. L0001f6:
  192. sf.b (L001942)
  193. bra.s L00021c
  194. L0001fe:
  195. tst.w d0
  196. bmi.s L000268
  197. cmpi.w #$7f00,d0
  198. beq.s L000224
  199. cmpi.w #$7f02,d0
  200. beq.w L00017a
  201. cmpi.w #$7f03,d0
  202. beq.s L00023a
  203. cmpi.w #$7f04,d0
  204. beq.s L000252
  205. L00021c:
  206. moveq.l #$00,d0
  207. L00021e:
  208. movem.l (sp)+,d1-d7/a0-a6
  209. rte
  210. L000224:
  211. subq.w #2,d1
  212. beq.s L000232
  213. addq.w #2,d1
  214. sne.b (L001949)
  215. bra.s L00021c
  216. L000232:
  217. not.b (L001949)
  218. bra.s L00021c
  219. L00023a:
  220. cmpi.w #$0008,d1
  221. bhi.s L00024a
  222. moveq.l #$08,d0
  223. sub.w d1,d0
  224. move.w d0,(L00194c)
  225. L00024a:
  226. moveq.l #$08,d0
  227. sub.w (L00194c,pc),d0
  228. bra.s L00021e
  229. L000252:
  230. subq.w #2,d1
  231. beq.s L000260
  232. addq.w #2,d1
  233. sne.b (L00194b)
  234. bra.s L00021c
  235. L000260:
  236. not.b (L00194b)
  237. bra.s L00021c
  238. L000268:
  239. moveq.l #$ff,d0
  240. move.b (L001942,pc),d1
  241. bne.s L00021e
  242. moveq.l #$fe,d0
  243. lea.l (VectorOverrides,pc),a0
  244. moveq.l #$06,d1
  245. L000278:
  246. movea.l (a0)+,a1
  247. move.l (a0)+,d2
  248. cmp.l (a1),d2
  249. bne.s L00021e
  250. dbra.w d1,L000278
  251. st.b ($00e840c0)
  252. move.b #$10,($00e840c7)
  253. st.b ($00e840c0)
  254. move.b #$88,($00e92003)
  255. lea.l (VectorOverrides,pc),a0
  256. lea.l (L001662,pc),a1
  257. moveq.l #$06,d1
  258. L0002aa:
  259. movea.l (a0)+,a2
  260. addq.l #4,a0
  261. move.l (a1)+,(a2)
  262. dbra.w d1,L0002aa
  263. move.b #$40,(Start) ;'@'
  264. moveq.l #$00,d1
  265. move.w d1,($0c32)
  266. IOCS _ADPCMMOD
  267. pea.l (Start-$0000f0,pc)
  268. DOS _MFREE
  269. addq.l #4,sp
  270. bra.w L00021c
  271. VectorOverrides:
  272. .dc.l $00000580
  273. .dc.l Override_ADPCMOUT
  274. .dc.l $00000588
  275. .dc.l Override_ADPCMAOT
  276. .dc.l $00000590
  277. .dc.l Override_ADPCMLOT
  278. .dc.l $0000059c
  279. .dc.l Override_ADPCMMOD
  280. .dc.l $000001a8
  281. .dc.l DMAEndInterrupt
  282. .dc.l $000001ac
  283. .dc.l DMAErrorInterrupt
  284. .dc.l $00000088
  285. .dc.l Trap2Handler
  286. L00030a:
  287. move.b (L00195f,pc),d0
  288. bne.s L00033c
  289. lea.l (L0016a2,pc),a5
  290. moveq.l #$00,d5
  291. move.w d5,(a5)
  292. move.w d5,($0040,a5)
  293. move.w d5,($0080,a5)
  294. move.w d5,($00c0,a5)
  295. move.w d5,($0100,a5)
  296. move.w d5,($0140,a5)
  297. move.w d5,($0180,a5)
  298. move.w d5,($01c0,a5)
  299. moveq.l #$00,d0
  300. movem.l (sp)+,d1-d7/a0-a6
  301. rte
  302. L00033c:
  303. lea.l (L001682,pc),a5
  304. moveq.l #$00,d5
  305. move.l d5,(a5)
  306. move.l d5,($0004,a5)
  307. move.l d5,($0040,a5)
  308. move.l d5,($0044,a5)
  309. move.l d5,($0080,a5)
  310. move.l d5,($0084,a5)
  311. move.l d5,($00c0,a5)
  312. move.l d5,($00c4,a5)
  313. move.l d5,($0100,a5)
  314. move.l d5,($0104,a5)
  315. move.l d5,($0140,a5)
  316. move.l d5,($0144,a5)
  317. move.l d5,($0180,a5)
  318. move.l d5,($0184,a5)
  319. move.l d5,($01c0,a5)
  320. move.l d5,($01c4,a5)
  321. sf.b (L00195f)
  322. st.b (L00195e)
  323. moveq.l #$00,d0
  324. movem.l (sp)+,d1-d7/a0-a6
  325. rte
  326. L000394:
  327. move.b (L00195f,pc),d0
  328. bne.s L0003c8
  329. lea.l (L0016a2,pc),a5
  330. moveq.l #$00,d5
  331. move.w d5,(a5)
  332. move.w d5,($0040,a5)
  333. move.w d5,($0080,a5)
  334. move.w d5,($00c0,a5)
  335. move.w d5,($0100,a5)
  336. move.w d5,($0140,a5)
  337. move.w d5,($0180,a5)
  338. move.w d5,($01c0,a5)
  339. moveq.l #$00,d0
  340. movem.l (sp)+,d1-d7/a0-a6
  341. move.w (sp)+,sr
  342. rts
  343. L0003c8:
  344. lea.l (L001682,pc),a5
  345. moveq.l #$00,d5
  346. move.l d5,(a5)
  347. move.l d5,($0004,a5)
  348. move.l d5,($0040,a5)
  349. move.l d5,($0044,a5)
  350. move.l d5,($0080,a5)
  351. move.l d5,($0084,a5)
  352. move.l d5,($00c0,a5)
  353. move.l d5,($00c4,a5)
  354. move.l d5,($0100,a5)
  355. move.l d5,($0104,a5)
  356. move.l d5,($0140,a5)
  357. move.l d5,($0144,a5)
  358. move.l d5,($0180,a5)
  359. move.l d5,($0184,a5)
  360. move.l d5,($01c0,a5)
  361. move.l d5,($01c4,a5)
  362. sf.b (L00195f)
  363. st.b (L00195e)
  364. moveq.l #$00,d0
  365. movem.l (sp)+,d1-d7/a0-a6
  366. move.w (sp)+,sr
  367. rts
  368. L000422:
  369. st.b (L00195f)
  370. moveq.l #$00,d0
  371. movem.l (sp)+,d1-d7/a0-a6
  372. rte
  373. L000430:
  374. st.b (L00195f)
  375. moveq.l #$00,d0
  376. movem.l (sp)+,d1-d7/a0-a6
  377. move.w (sp)+,sr
  378. rts
  379. L000440:
  380. move.b (L00195f,pc),d0
  381. beq.s L00047a
  382. sf.b (L00195f)
  383. lea.l (L001682,pc),a5
  384. move.l (a5),d5
  385. or.l ($0040,a5),d5
  386. or.l ($0080,a5),d5
  387. or.l ($00c0,a5),d5
  388. or.l ($0100,a5),d5
  389. or.l ($0140,a5),d5
  390. or.l ($0180,a5),d5
  391. or.l ($01c0,a5),d5
  392. seq.b (L00195e)
  393. beq.s L00047a
  394. bsr.w L0007e4
  395. L00047a:
  396. moveq.l #$00,d0
  397. movem.l (sp)+,d1-d7/a0-a6
  398. rte
  399. L000482:
  400. move.b (L00195f,pc),d0
  401. beq.s L0004bc
  402. sf.b (L00195f)
  403. lea.l (L001682,pc),a5
  404. move.l (a5),d5
  405. or.l ($0040,a5),d5
  406. or.l ($0080,a5),d5
  407. or.l ($00c0,a5),d5
  408. or.l ($0100,a5),d5
  409. or.l ($0140,a5),d5
  410. or.l ($0180,a5),d5
  411. or.l ($01c0,a5),d5
  412. seq.b (L00195e)
  413. beq.s L0004bc
  414. bsr.w L0007e4
  415. L0004bc:
  416. moveq.l #$00,d0
  417. movem.l (sp)+,d1-d7/a0-a6
  418. move.w (sp)+,sr
  419. rts
  420. L0004c6:
  421. move.b (L001946,pc),d0
  422. bne.w L000a5e
  423. move.b (L00195f,pc),d0
  424. beq.s L00052a
  425. L0004d4:
  426. sf.b (L001961)
  427. lea.l (L001682,pc),a5
  428. moveq.l #$00,d5
  429. move.l d5,(a5)
  430. move.l d5,($0004,a5)
  431. move.l d5,($0040,a5)
  432. move.l d5,($0044,a5)
  433. move.l d5,($0080,a5)
  434. move.l d5,($0084,a5)
  435. move.l d5,($00c0,a5)
  436. move.l d5,($00c4,a5)
  437. move.l d5,($0100,a5)
  438. move.l d5,($0104,a5)
  439. move.l d5,($0140,a5)
  440. move.l d5,($0144,a5)
  441. move.l d5,($0180,a5)
  442. move.l d5,($0184,a5)
  443. move.l d5,($01c0,a5)
  444. move.l d5,($01c4,a5)
  445. sf.b (L00195f)
  446. st.b (L00195e)
  447. L00052a:
  448. tst.l d2
  449. bmi.w L0007c4
  450. beq.w L000782
  451. bsr.w L00086c
  452. beq.w L000782
  453. cmpi.w #$0005,($001c,a6)
  454. bne.s L000556
  455. moveq.l #$01,d0
  456. and.b d2,d0
  457. bne.w L000782
  458. move.l a1,d0
  459. andi.b #$01,d0
  460. bne.w L000782
  461. L000556:
  462. move.w ($0006,a6),d5
  463. add.w d5,(L00195a)
  464. moveq.l #$00,d5
  465. move.l d5,(a6)
  466. move.l d5,($0004,a6)
  467. move.b (L00194a,pc),d5
  468. beq.s L00058a
  469. btst.b #$03,($00e840c0)
  470. beq.s L00058a
  471. move.w (L00195e,pc),d5
  472. beq.s L00058e
  473. move.l #$ff000000,(L00195c)
  474. bra.s L00058e
  475. L00058a:
  476. bsr.w L0007e4
  477. L00058e:
  478. moveq.l #$00,d0
  479. move.w d0,($0020,a6)
  480. move.l d2,(a6)+
  481. move.l d0,(a6)+
  482. move.l a1,(a6)+
  483. move.l #End+$00d702,(a6)
  484. movem.l (sp)+,d1-d7/a0-a6
  485. rte
  486. L0005a6:
  487. move.b (L001946,pc),d0
  488. bne.w L000b50
  489. move.b (L00195f,pc),d0
  490. beq.s L00060a
  491. L0005b4:
  492. sf.b (L001961)
  493. lea.l (L001682,pc),a5
  494. moveq.l #$00,d5
  495. move.l d5,(a5)
  496. move.l d5,($0004,a5)
  497. move.l d5,($0040,a5)
  498. move.l d5,($0044,a5)
  499. move.l d5,($0080,a5)
  500. move.l d5,($0084,a5)
  501. move.l d5,($00c0,a5)
  502. move.l d5,($00c4,a5)
  503. move.l d5,($0100,a5)
  504. move.l d5,($0104,a5)
  505. move.l d5,($0140,a5)
  506. move.l d5,($0144,a5)
  507. move.l d5,($0180,a5)
  508. move.l d5,($0184,a5)
  509. move.l d5,($01c0,a5)
  510. move.l d5,($01c4,a5)
  511. sf.b (L00195f)
  512. st.b (L00195e)
  513. L00060a:
  514. tst.l d2
  515. bmi.w L0007c4
  516. tst.w d2
  517. beq.w L000782
  518. bsr.w L00086c
  519. beq.w L000782
  520. move.l a1,d0
  521. andi.b #$01,d0
  522. bne.w L000782
  523. move.w ($0006,a6),d5
  524. add.w d5,(L00195a)
  525. moveq.l #$00,d5
  526. move.l d5,(a6)
  527. move.l d5,($0004,a6)
  528. move.b (L00194a,pc),d5
  529. beq.s L00065c
  530. btst.b #$03,($00e840c0)
  531. beq.s L00065c
  532. move.w (L00195e,pc),d5
  533. beq.s L000660
  534. move.l #$ff000000,(L00195c)
  535. bra.s L000660
  536. L00065c:
  537. bsr.w L0007e4
  538. L000660:
  539. moveq.l #$01,d1
  540. move.w d1,($0020,a6)
  541. move.w d2,($0022,a6)
  542. movea.l (a1)+,a2
  543. move.w (a1)+,d1
  544. move.l a1,($0024,a6)
  545. move.l d1,(a6)+
  546. moveq.l #$00,d0
  547. move.l d0,(a6)+
  548. move.l a2,(a6)+
  549. move.l #End+$00d702,(a6)
  550. movem.l (sp)+,d1-d7/a0-a6
  551. rte
  552. L000686:
  553. move.b (L001946,pc),d0
  554. bne.w L000c50
  555. move.b (L00195f,pc),d0
  556. beq.s L0006ea
  557. L000694:
  558. sf.b (L001961)
  559. lea.l (L001682,pc),a5
  560. moveq.l #$00,d5
  561. move.l d5,(a5)
  562. move.l d5,($0004,a5)
  563. move.l d5,($0040,a5)
  564. move.l d5,($0044,a5)
  565. move.l d5,($0080,a5)
  566. move.l d5,($0084,a5)
  567. move.l d5,($00c0,a5)
  568. move.l d5,($00c4,a5)
  569. move.l d5,($0100,a5)
  570. move.l d5,($0104,a5)
  571. move.l d5,($0140,a5)
  572. move.l d5,($0144,a5)
  573. move.l d5,($0180,a5)
  574. move.l d5,($0184,a5)
  575. move.l d5,($01c0,a5)
  576. move.l d5,($01c4,a5)
  577. sf.b (L00195f)
  578. st.b (L00195e)
  579. L0006ea:
  580. bsr.w L00086c
  581. beq.w L000782
  582. move.l a1,d0
  583. andi.b #$01,d0
  584. bne.w L000782
  585. move.w ($0006,a6),d5
  586. add.w d5,(L00195a)
  587. moveq.l #$00,d5
  588. move.l d5,(a6)
  589. move.l d5,($0004,a6)
  590. move.b (L00194a,pc),d5
  591. beq.s L000730
  592. btst.b #$03,($00e840c0)
  593. beq.s L000730
  594. move.w (L00195e,pc),d5
  595. beq.s L000734
  596. move.l #$ff000000,(L00195c)
  597. bra.s L000734
  598. L000730:
  599. bsr.w L0007e4
  600. L000734:
  601. moveq.l #$02,d1
  602. move.w d1,($0020,a6)
  603. movea.l (a1)+,a2
  604. move.w (a1)+,d1
  605. move.l a1,($0024,a6)
  606. move.l d1,(a6)+
  607. moveq.l #$00,d0
  608. move.l d0,(a6)+
  609. move.l a2,(a6)+
  610. move.l #End+$00d702,(a6)
  611. movem.l (sp)+,d1-d7/a0-a6
  612. rte
  613. L000756:
  614. move.w d1,-(sp)
  615. move.b (sp)+,d0
  616. cmp.b #$07,d0
  617. bcc.s L000774
  618. cmp.b ($001d,a6),d0
  619. beq.s L000774
  620. cmpi.b #$05,d0
  621. bcc.s L000782
  622. cmpi.w #$0005,($001c,a6)
  623. bcc.s L000782
  624. L000774:
  625. bsr.w L00086c
  626. beq.s L000782
  627. moveq.l #$00,d0
  628. movem.l (sp)+,d1-d7/a0-a6
  629. rte
  630. L000782:
  631. move.w ($0006,a6),d5
  632. add.w d5,(L00195a)
  633. moveq.l #$00,d5
  634. move.l d5,(a6)
  635. move.l d5,($0004,a6)
  636. lea.l (L001682,pc),a5
  637. move.l (a5),d5
  638. or.l ($0040,a5),d5
  639. or.l ($0080,a5),d5
  640. or.l ($00c0,a5),d5
  641. or.l ($0100,a5),d5
  642. or.l ($0140,a5),d5
  643. or.l ($0180,a5),d5
  644. or.l ($01c0,a5),d5
  645. seq.b (L00195e)
  646. moveq.l #$00,d0
  647. movem.l (sp)+,d1-d7/a0-a6
  648. rte
  649. L0007c4:
  650. move.b (L00195e,pc),d0
  651. bne.w L0009c8
  652. move.w ($0020,a6),d0
  653. beq.s L0007dc
  654. neg.w d0
  655. ext.l d0
  656. movem.l (sp)+,d1-d7/a0-a6
  657. rte
  658. L0007dc:
  659. move.l (a6),d0
  660. movem.l (sp)+,d1-d7/a0-a6
  661. rte
  662. L0007e4:
  663. movea.l #$00e840c0,a5
  664. st.b (a5)
  665. move.b #$10,($0007,a5)
  666. st.b (a5)
  667. move.l #L00157a,($000c,a5)
  668. move.w #$0004,($000a,a5)
  669. move.l #L00157a,($001c,a5)
  670. move.w #$002c,($001a,a5) ;','
  671. move.l #$00e92003,($0014,a5)
  672. move.b #$32,($0005,a5) ;'2'
  673. move.b #$c8,($0007,a5)
  674. move.b #$02,($00e92001)
  675. btst.b #$07,($09da)
  676. beq.s L000852
  677. movea.l #$00e90003,a5
  678. L00083a:
  679. tst.b (a5)
  680. bmi.s L00083a
  681. move.b #$1b,(-$0002,a5)
  682. L000844:
  683. tst.b (a5)
  684. bmi.s L000844
  685. bclr.b #$07,($09da)
  686. move.b ($09da),(a5)
  687. L000852:
  688. move.w #$ffff,(L001952)
  689. move.l #$ff000000,(L00195c)
  690. st.b (L00194a)
  691. rts
  692. L00086c:
  693. moveq.l #$00,d7
  694. swap.w d1
  695. cmpi.b #$10,d1
  696. bcc.s L00087c
  697. ext.w d1
  698. move.w d1,($001e,a6)
  699. L00087c:
  700. swap.w d1
  701. move.w d1,-(sp)
  702. move.b (sp)+,d7
  703. cmpi.b #$07,d7
  704. bcc.s L00088c
  705. move.b d7,($001d,a6)
  706. L00088c:
  707. tst.b d1
  708. beq.s L0008d6
  709. cmpi.b #$04,d1
  710. bcc.s L00089c
  711. move.b d1,(L00196e)
  712. L00089c:
  713. move.w ($001c,a6),d7
  714. cmpi.w #$0007,d7
  715. bcc.s L0008d6
  716. add.w d7,d7
  717. move.w (L0008da,pc,d7.w),($0016,a6)
  718. lsl.w #3,d7
  719. tst.b (L00194b)
  720. bne.s L0008be
  721. ori.b #$08,d7
  722. bra.s L0008c2
  723. L0008be:
  724. or.b ($001f,a6),d7
  725. L0008c2:
  726. add.w d7,d7
  727. move.w (L0008e8,pc,d7.w),d7
  728. addi.l #L0008e8,d7
  729. move.l d7,($0018,a6)
  730. moveq.l #$ff,d7
  731. rts
  732. L0008d6:
  733. moveq.l #$00,d7
  734. rts
  735. L0008da:
  736. .dc.w $000c,$0010,$0018,$0020
  737. .dc.w $0030,$00c0,$0060
  738. L0008e8:
  739. .dc.w $27b8,$27f0,$2836,$286e
  740. .dc.w $28b2,$28f8,$2930,$2974
  741. .dc.w $2b5a,$29b2,$29ee,$2a2a
  742. .dc.w $2a62,$2aa2,$2ade,$2b1a
  743. .dc.w $2b8c,$2bc0,$2c02,$2c36
  744. .dc.w $2c76,$2cb8,$2cec,$2d2c
  745. .dc.w $2ef2,$2d66,$2d9e,$2dd6
  746. .dc.w $2e0a,$2e46,$2e7e,$2eb6
  747. .dc.w $2f20,$2f50,$2f8e,$2fbe
  748. .dc.w $2ffa,$3038,$3068,$30a4
  749. .dc.w $324a,$30da,$310e,$3142
  750. .dc.w $3172,$31aa,$31de,$3212
  751. .dc.w $3274,$32a2,$32de,$330c
  752. .dc.w $3346,$3382,$33b0,$33ea
  753. .dc.w $3580,$341e,$3450,$3482
  754. .dc.w $34b0,$34e6,$3518,$354a
  755. .dc.w $35a8,$366a,$3776,$3838
  756. .dc.w $3942,$3a4e,$3b10,$3c1a
  757. .dc.w $4304,$3cf6,$3dd0,$3eaa
  758. .dc.w $3f6c,$405e,$4138,$4212
  759. .dc.w $472e,$4766,$47ce,$4806
  760. .dc.w $486e,$48d6,$490e,$4976
  761. .dc.w $49ce,$4ad0,$4b28,$4b90
  762. .dc.w $4bc8,$4c30,$4c88,$4cd0
  763. .dc.w $51d0,$4d38,$5218,$4d3e
  764. .dc.w $4d44,$5260,$4d4a,$52a8
  765. .dc.w $5310,$5552,$55ba,$5632
  766. .dc.w $567a,$56f2,$575a,$57b2
  767. L0009c8:
  768. pea.l ($0000)
  769. bra.w L001a02
  770. L0009d0:
  771. pea.l ($0000)
  772. bra.w L001a78
  773. L0009d8:
  774. move.b #$20,($00e840c7) ;' '
  775. move.b #$88,($00e92003)
  776. st.b (L00195f)
  777. moveq.l #$00,d0
  778. movem.l (sp)+,d1-d7/a0-a6
  779. rte
  780. L0009f6:
  781. move.b #$20,($00e840c7) ;' '
  782. move.b #$88,($00e92003)
  783. st.b (L00195f)
  784. moveq.l #$00,d0
  785. movem.l (sp)+,d1-d7/a0-a6
  786. move.w (sp)+,sr
  787. rts
  788. L000a16:
  789. move.b (L00195f,pc),d0
  790. beq.s L000a2a
  791. move.b #$08,($00e840c7)
  792. sf.b (L00195f)
  793. L000a2a:
  794. moveq.l #$00,d0
  795. movem.l (sp)+,d1-d7/a0-a6
  796. rte
  797. L000a32:
  798. move.b (L00195f,pc),d0
  799. beq.s L000a46
  800. move.b #$08,($00e840c7)
  801. sf.b (L00195f)
  802. L000a46:
  803. moveq.l #$00,d0
  804. movem.l (sp)+,d1-d7/a0-a6
  805. move.w (sp)+,sr
  806. rts
  807. L000a50:
  808. move.b (L001946,pc),d0
  809. beq.w L0004d4
  810. move.b (L00195f,pc),d0
  811. beq.s L000abc
  812. L000a5e:
  813. st.b (L001961)
  814. move.b #$01,(L001962)
  815. lea.l (L001682,pc),a5
  816. moveq.l #$00,d5
  817. move.l d5,(a5)
  818. move.l d5,($0004,a5)
  819. move.l d5,($0040,a5)
  820. move.l d5,($0044,a5)
  821. move.l d5,($0080,a5)
  822. move.l d5,($0084,a5)
  823. move.l d5,($00c0,a5)
  824. move.l d5,($00c4,a5)
  825. move.l d5,($0100,a5)
  826. move.l d5,($0104,a5)
  827. move.l d5,($0140,a5)
  828. move.l d5,($0144,a5)
  829. move.l d5,($0180,a5)
  830. move.l d5,($0184,a5)
  831. move.l d5,($01c0,a5)
  832. move.l d5,($01c4,a5)
  833. sf.b (L00195f)
  834. st.b (L00195e)
  835. L000abc:
  836. tst.l d2
  837. bmi.w L000df6
  838. beq.w L000db0
  839. bsr.w L000ef8
  840. beq.w L000db0
  841. lea.l (L001682,pc),a5
  842. moveq.l #$00,d5
  843. move.l d5,(a5)
  844. move.l d5,($0004,a5)
  845. move.l d5,($0040,a5)
  846. move.l d5,($0044,a5)
  847. move.l d5,($0080,a5)
  848. move.l d5,($0084,a5)
  849. move.l d5,($00c0,a5)
  850. move.l d5,($00c4,a5)
  851. move.l d5,($0100,a5)
  852. move.l d5,($0104,a5)
  853. move.l d5,($0140,a5)
  854. move.l d5,($0144,a5)
  855. move.l d5,($0180,a5)
  856. move.l d5,($0184,a5)
  857. move.l d5,($01c0,a5)
  858. move.l d5,($01c4,a5)
  859. sf.b (L00195f)
  860. st.b (L00195e)
  861. bsr.w L000e1a
  862. moveq.l #$00,d0
  863. move.w d0,($0020,a6)
  864. move.b d0,(L001963)
  865. move.l d2,(a6)
  866. move.l d2,(L00196a)
  867. move.l a1,(L001966)
  868. movem.l (sp)+,d1-d7/a0-a6
  869. rte
  870. L000b42:
  871. move.b (L001946,pc),d0
  872. beq.w L0005b4
  873. move.b (L00195f,pc),d0
  874. beq.s L000bae
  875. L000b50:
  876. st.b (L001961)
  877. move.b #$01,(L001962)
  878. lea.l (L001682,pc),a5
  879. moveq.l #$00,d5
  880. move.l d5,(a5)
  881. move.l d5,($0004,a5)
  882. move.l d5,($0040,a5)
  883. move.l d5,($0044,a5)
  884. move.l d5,($0080,a5)
  885. move.l d5,($0084,a5)
  886. move.l d5,($00c0,a5)
  887. move.l d5,($00c4,a5)
  888. move.l d5,($0100,a5)
  889. move.l d5,($0104,a5)
  890. move.l d5,($0140,a5)
  891. move.l d5,($0144,a5)
  892. move.l d5,($0180,a5)
  893. move.l d5,($0184,a5)
  894. move.l d5,($01c0,a5)
  895. move.l d5,($01c4,a5)
  896. sf.b (L00195f)
  897. st.b (L00195e)
  898. L000bae:
  899. tst.l d2
  900. bmi.w L000df6
  901. tst.w d2
  902. beq.w L000db0
  903. bsr.w L000ef8
  904. beq.w L000db0
  905. move.l a1,d0
  906. andi.b #$01,d0
  907. bne.w L000db0
  908. lea.l (L001682,pc),a5
  909. moveq.l #$00,d5
  910. move.l d5,(a5)
  911. move.l d5,($0004,a5)
  912. move.l d5,($0040,a5)
  913. move.l d5,($0044,a5)
  914. move.l d5,($0080,a5)
  915. move.l d5,($0084,a5)
  916. move.l d5,($00c0,a5)
  917. move.l d5,($00c4,a5)
  918. move.l d5,($0100,a5)
  919. move.l d5,($0104,a5)
  920. move.l d5,($0140,a5)
  921. move.l d5,($0144,a5)
  922. move.l d5,($0180,a5)
  923. move.l d5,($0184,a5)
  924. move.l d5,($01c0,a5)
  925. move.l d5,($01c4,a5)
  926. sf.b (L00195f)
  927. st.b (L00195e)
  928. bsr.w L000e1a
  929. moveq.l #$01,d0
  930. move.w d0,($0020,a6)
  931. move.b d0,(L001963)
  932. move.l d0,(a6)
  933. move.w d2,(L00196a)
  934. move.l a1,(L001966)
  935. moveq.l #$00,d0
  936. movem.l (sp)+,d1-d7/a0-a6
  937. rte
  938. L000c42:
  939. move.b (L001946,pc),d0
  940. beq.w L000694
  941. move.b (L00195f,pc),d0
  942. beq.s L000cae
  943. L000c50:
  944. st.b (L001961)
  945. move.b #$01,(L001962)
  946. lea.l (L001682,pc),a5
  947. moveq.l #$00,d5
  948. move.l d5,(a5)
  949. move.l d5,($0004,a5)
  950. move.l d5,($0040,a5)
  951. move.l d5,($0044,a5)
  952. move.l d5,($0080,a5)
  953. move.l d5,($0084,a5)
  954. move.l d5,($00c0,a5)
  955. move.l d5,($00c4,a5)
  956. move.l d5,($0100,a5)
  957. move.l d5,($0104,a5)
  958. move.l d5,($0140,a5)
  959. move.l d5,($0144,a5)
  960. move.l d5,($0180,a5)
  961. move.l d5,($0184,a5)
  962. move.l d5,($01c0,a5)
  963. move.l d5,($01c4,a5)
  964. sf.b (L00195f)
  965. st.b (L00195e)
  966. L000cae:
  967. bsr.w L000ef8
  968. beq.w L000db0
  969. move.l a1,d0
  970. andi.b #$01,d0
  971. bne.w L000db0
  972. lea.l (L001682,pc),a5
  973. moveq.l #$00,d5
  974. move.l d5,(a5)
  975. move.l d5,($0004,a5)
  976. move.l d5,($0040,a5)
  977. move.l d5,($0044,a5)
  978. move.l d5,($0080,a5)
  979. move.l d5,($0084,a5)
  980. move.l d5,($00c0,a5)
  981. move.l d5,($00c4,a5)
  982. move.l d5,($0100,a5)
  983. move.l d5,($0104,a5)
  984. move.l d5,($0140,a5)
  985. move.l d5,($0144,a5)
  986. move.l d5,($0180,a5)
  987. move.l d5,($0184,a5)
  988. move.l d5,($01c0,a5)
  989. move.l d5,($01c4,a5)
  990. sf.b (L00195f)
  991. st.b (L00195e)
  992. bsr.w L000e1a
  993. moveq.l #$02,d0
  994. move.w d0,($0020,a6)
  995. move.b d0,(L001963)
  996. move.l d0,(a6)
  997. move.l a1,(L001966)
  998. moveq.l #$00,d0
  999. movem.l (sp)+,d1-d7/a0-a6
  1000. rte
  1001. L000d30:
  1002. move.w d1,-(sp)
  1003. move.b (sp)+,d0
  1004. cmp.b #$07,d0
  1005. bcc.s L000d4e
  1006. cmp.b ($001d,a6),d0
  1007. beq.s L000d4e
  1008. cmpi.b #$05,d0
  1009. bcc.s L000db0
  1010. cmpi.w #$0005,($001c,a6)
  1011. bcc.s L000db0
  1012. L000d4e:
  1013. bsr.w L000ef8
  1014. beq.s L000db0
  1015. move.l (a6),d0
  1016. beq.s L000da8
  1017. moveq.l #$00,d0
  1018. move.b (L001964,pc),d0
  1019. add.w d0,d0
  1020. add.w d0,d0
  1021. or.b (L001965,pc),d0
  1022. add.w d0,d0
  1023. lea.l (L000ed0,pc),a0
  1024. move.w (a0,d0.w),d1
  1025. movea.l #$00e9a005,a0
  1026. moveq.l #$f0,d0
  1027. and.b (a0),d0
  1028. or.b d1,d0
  1029. move.b d0,(a0)
  1030. move.b ($09da),d1
  1031. move.b d1,d0
  1032. add.b d1,d1
  1033. lsr.w #1,d1
  1034. cmp.b d0,d1
  1035. beq.s L000da8
  1036. movea.l #$00e90003,a4
  1037. L000d92:
  1038. tst.b (a4)
  1039. bmi.s L000d92
  1040. move.b #$1b,(-$0002,a4)
  1041. st.b d7
  1042. L000d9e:
  1043. tst.b (a4)
  1044. bmi.s L000d9e
  1045. move.b d1,($09da)
  1046. move.b d1,(a4)
  1047. L000da8:
  1048. moveq.l #$00,d0
  1049. movem.l (sp)+,d1-d7/a0-a6
  1050. rte
  1051. L000db0:
  1052. move.w ($0006,a6),d5
  1053. add.w d5,(L00195a)
  1054. moveq.l #$00,d5
  1055. move.l d5,(a6)
  1056. move.l d5,($0004,a6)
  1057. lea.l (L001682,pc),a5
  1058. move.l (a5),d5
  1059. or.l ($0040,a5),d5
  1060. or.l ($0080,a5),d5
  1061. or.l ($00c0,a5),d5
  1062. or.l ($0100,a5),d5
  1063. or.l ($0140,a5),d5
  1064. or.l ($0180,a5),d5
  1065. or.l ($01c0,a5),d5
  1066. seq.b (L00195e)
  1067. beq.w L0009c8
  1068. moveq.l #$00,d0
  1069. movem.l (sp)+,d1-d7/a0-a6
  1070. rte
  1071. L000df6:
  1072. move.b (L00195e,pc),d0
  1073. bne.w L0009c8
  1074. move.w ($0020,a6),d0
  1075. beq.s L000e0e
  1076. neg.w d0
  1077. ext.l d0
  1078. movem.l (sp)+,d1-d7/a0-a6
  1079. rte
  1080. L000e0e:
  1081. move.l (a6),d0
  1082. beq.s L000e14
  1083. moveq.l #$fd,d0
  1084. L000e14:
  1085. movem.l (sp)+,d1-d7/a0-a6
  1086. rte
  1087. L000e1a:
  1088. movea.l #$00e840c0,a5
  1089. st.b (a5)
  1090. move.b #$10,($0007,a5)
  1091. st.b (a5)
  1092. move.l #L00157a,($000c,a5)
  1093. move.w #$001a,($000a,a5)
  1094. move.l #L00157a,($001c,a5)
  1095. move.w #$0080,($001a,a5)
  1096. move.l #$00e92003,($0014,a5)
  1097. move.b #$32,($0005,a5) ;'2'
  1098. move.b #$c8,($0007,a5)
  1099. move.b #$02,($00e92001)
  1100. movem.l d0-d1,-(sp)
  1101. move.b (L001964,pc),d0
  1102. add.w d0,d0
  1103. add.w d0,d0
  1104. or.b (L001965,pc),d0
  1105. add.w d0,d0
  1106. move.w (L000ed0,pc,d0.w),d1
  1107. movea.l #$00e9a005,a5
  1108. moveq.l #$f0,d0
  1109. and.b (a5),d0
  1110. or.b d1,d0
  1111. move.b d0,(a5)
  1112. move.b ($09da),d1
  1113. move.b d1,d0
  1114. add.b d1,d1
  1115. lsr.w #1,d1
  1116. cmp.b d0,d1
  1117. beq.s L000eae
  1118. movea.l #$00e90003,a5
  1119. L000e9a:
  1120. tst.b (a5)
  1121. bmi.s L000e9a
  1122. move.b #$1b,(-$0002,a5)
  1123. L000ea4:
  1124. tst.b (a5)
  1125. bmi.s L000ea4
  1126. move.b d1,($09da)
  1127. move.b d1,(a5)
  1128. L000eae:
  1129. movem.l (sp)+,d0-d1
  1130. move.w #$ffff,(L001952)
  1131. st.b (L001962)
  1132. move.w #$0000,(L00195e)
  1133. st.b (L00194a)
  1134. rts
  1135. L000ed0:
  1136. .dc.w $0103,$0101,$0102,$0100
  1137. .dc.w $0107,$0105,$0106,$0104
  1138. .dc.w $0003,$0001,$0002,$0000
  1139. .dc.w $0007,$0005,$0006,$0004
  1140. .dc.w $000b,$0009,$000a,$0008
  1141. L000ef8:
  1142. swap.w d1
  1143. cmpi.b #$10,d1
  1144. bcc.s L000f06
  1145. ext.w d1
  1146. move.w d1,($001e,a6)
  1147. L000f06:
  1148. swap.w d1
  1149. move.w d1,-(sp)
  1150. move.b (sp)+,d7
  1151. cmpi.b #$07,d7
  1152. bcc.s L000f16
  1153. move.b d7,($001d,a6)
  1154. L000f16:
  1155. tst.b d1
  1156. beq.s L000f50
  1157. cmpi.b #$04,d1
  1158. bcc.s L000f26
  1159. move.b d1,(L00196e)
  1160. L000f26:
  1161. cmpi.w #$0005,($001c,a6)
  1162. bcc.s L000f50
  1163. move.b (L00196e,pc),d7
  1164. move.b d7,(L00196f)
  1165. move.b d7,(L001970)
  1166. move.b d7,(L001965)
  1167. move.b ($001d,a6),(L001964)
  1168. moveq.l #$ff,d7
  1169. rts
  1170. L000f50:
  1171. moveq.l #$00,d7
  1172. rts
  1173. L000f54:
  1174. lea.l (L001682,pc),a5
  1175. moveq.l #$00,d5
  1176. move.l d5,(a5)
  1177. move.l d5,($0004,a5)
  1178. move.l d5,($0040,a5)
  1179. move.l d5,($0044,a5)
  1180. move.l d5,($0080,a5)
  1181. move.l d5,($0084,a5)
  1182. move.l d5,($00c0,a5)
  1183. move.l d5,($00c4,a5)
  1184. move.l d5,($0100,a5)
  1185. move.l d5,($0104,a5)
  1186. move.l d5,($0140,a5)
  1187. move.l d5,($0144,a5)
  1188. move.l d5,($0180,a5)
  1189. move.l d5,($0184,a5)
  1190. move.l d5,($01c0,a5)
  1191. move.l d5,($01c4,a5)
  1192. sf.b (L00195f)
  1193. st.b (L00195e)
  1194. tst.l d2
  1195. ble.s L000fac
  1196. bsr.w L00102c
  1197. L000fac:
  1198. moveq.l #$00,d0
  1199. movem.l (sp)+,d1-d7/a0-a6
  1200. rte
  1201. L000fb4:
  1202. move.w d1,-(sp)
  1203. move.b (sp)+,d0
  1204. cmp.b #$07,d0
  1205. bcc.s L000fd2
  1206. cmp.b ($001d,a6),d0
  1207. beq.s L000fd2
  1208. cmpi.b #$05,d0
  1209. bcc.s L000fac
  1210. cmpi.w #$0005,($001c,a6)
  1211. bcc.s L000fac
  1212. L000fd2:
  1213. lea.l (L001682,pc),a5
  1214. moveq.l #$00,d5
  1215. move.l d5,(a5)
  1216. move.l d5,($0004,a5)
  1217. move.l d5,($0040,a5)
  1218. move.l d5,($0044,a5)
  1219. move.l d5,($0080,a5)
  1220. move.l d5,($0084,a5)
  1221. move.l d5,($00c0,a5)
  1222. move.l d5,($00c4,a5)
  1223. move.l d5,($0100,a5)
  1224. move.l d5,($0104,a5)
  1225. move.l d5,($0140,a5)
  1226. move.l d5,($0144,a5)
  1227. move.l d5,($0180,a5)
  1228. move.l d5,($0184,a5)
  1229. move.l d5,($01c0,a5)
  1230. move.l d5,($01c4,a5)
  1231. sf.b (L00195f)
  1232. st.b (L00195e)
  1233. bsr.s L00102c
  1234. moveq.l #$00,d0
  1235. movem.l (sp)+,d1-d7/a0-a6
  1236. rte
  1237. L00102c:
  1238. swap.w d1
  1239. cmpi.b #$10,d1
  1240. bcc.s L00103a
  1241. ext.w d1
  1242. move.w d1,($001e,a6)
  1243. L00103a:
  1244. swap.w d1
  1245. move.w d1,-(sp)
  1246. move.b (sp)+,d7
  1247. cmpi.b #$07,d7
  1248. bcc.s L00104a
  1249. move.b d7,($001d,a6)
  1250. L00104a:
  1251. tst.b d1
  1252. beq.s L00105a
  1253. cmpi.b #$04,d1
  1254. bcc.s L00105a
  1255. move.b d1,(L00196e)
  1256. L00105a:
  1257. rts
  1258. Override_ADPCMOUT:
  1259. move.w sr,-(sp)
  1260. ori.w #$0700,sr
  1261. cmpi.w #$0008,(L00194c)
  1262. bcc.w L0011cc
  1263. move.b (L001947,pc),d0
  1264. bne.w L00117e
  1265. move.b (L001961,pc),d0
  1266. beq.s L0010f8
  1267. sf.b (L001961)
  1268. movem.l d5/a5,-(sp)
  1269. lea.l (L001682,pc),a5
  1270. moveq.l #$00,d5
  1271. move.l d5,(a5)
  1272. move.l d5,($0004,a5)
  1273. move.l d5,($0040,a5)
  1274. move.l d5,($0044,a5)
  1275. move.l d5,($0080,a5)
  1276. move.l d5,($0084,a5)
  1277. move.l d5,($00c0,a5)
  1278. move.l d5,($00c4,a5)
  1279. move.l d5,($0100,a5)
  1280. move.l d5,($0104,a5)
  1281. move.l d5,($0140,a5)
  1282. move.l d5,($0144,a5)
  1283. move.l d5,($0180,a5)
  1284. move.l d5,($0184,a5)
  1285. move.l d5,($01c0,a5)
  1286. move.l d5,($01c4,a5)
  1287. sf.b (L00195f)
  1288. st.b (L00195e)
  1289. movem.l (sp)+,d5/a5
  1290. tst.l d2
  1291. beq.w L0014fa
  1292. tst.b d1
  1293. beq.w L0014fa
  1294. cmpi.b #$04,d1
  1295. bcc.w L0014fa
  1296. cmpi.w #$0500,d1
  1297. bcc.w L0014fa
  1298. bra.s L001114
  1299. L0010f8:
  1300. tst.l d2
  1301. beq.w L0011cc
  1302. tst.b d1
  1303. beq.w L0011cc
  1304. cmpi.b #$04,d1
  1305. bcc.w L0011cc
  1306. cmpi.w #$0500,d1
  1307. bcc.w L0011cc
  1308. L001114:
  1309. movem.l d1-d7/a0-a6,-(sp)
  1310. bsr.w L00153e
  1311. bmi.w L0011c8
  1312. swap.w d1
  1313. move.w #$0008,d1
  1314. swap.w d1
  1315. bsr.w L00086c
  1316. move.w ($0006,a6),d5
  1317. add.w d5,(L00195a)
  1318. moveq.l #$00,d5
  1319. move.l d5,(a6)
  1320. move.l d5,($0004,a6)
  1321. move.b (L00194a,pc),d5
  1322. beq.s L001160
  1323. btst.b #$03,($00e840c0)
  1324. beq.s L001160
  1325. move.w (L00195e,pc),d5
  1326. beq.s L001164
  1327. move.l #$ff000000,(L00195c)
  1328. bra.s L001164
  1329. L001160:
  1330. bsr.w L0007e4
  1331. L001164:
  1332. moveq.l #$00,d0
  1333. move.w d0,($0020,a6)
  1334. move.l d2,(a6)+
  1335. move.l d0,(a6)+
  1336. move.l a1,(a6)+
  1337. move.l #End+$00d702,(a6)
  1338. movem.l (sp)+,d1-d7/a0-a6
  1339. move.w (sp)+,sr
  1340. rts
  1341. L00117e:
  1342. st.b (L001961)
  1343. tst.l d2
  1344. beq.w L0014fa
  1345. tst.b d1
  1346. beq.w L0014fa
  1347. cmpi.b #$04,d1
  1348. bcc.w L0014fa
  1349. cmpi.w #$0500,d1
  1350. bcc.w L0014fa
  1351. movem.l d1-d7/a0-a6,-(sp)
  1352. move.w d1,(L001964)
  1353. bsr.w L000e1a
  1354. moveq.l #$00,d0
  1355. move.b d0,(L001963)
  1356. move.l d2,(L00196a)
  1357. move.l a1,(L001966)
  1358. move.b #$02,($0c32)
  1359. L0011c8:
  1360. movem.l (sp)+,d1-d7/a0-a6
  1361. L0011cc:
  1362. moveq.l #$00,d0
  1363. move.w (sp)+,sr
  1364. rts
  1365. Override_ADPCMAOT:
  1366. move.w sr,-(sp)
  1367. ori.w #$0700,sr
  1368. cmpi.w #$0008,(L00194c)
  1369. bcc.s L0011cc
  1370. move.b (L001947,pc),d0
  1371. bne.w L001300
  1372. move.b (L001961,pc),d0
  1373. beq.s L00126c
  1374. sf.b (L001961)
  1375. movem.l d5/a5,-(sp)
  1376. lea.l (L001682,pc),a5
  1377. moveq.l #$00,d5
  1378. move.l d5,(a5)
  1379. move.l d5,($0004,a5)
  1380. move.l d5,($0040,a5)
  1381. move.l d5,($0044,a5)
  1382. move.l d5,($0080,a5)
  1383. move.l d5,($0084,a5)
  1384. move.l d5,($00c0,a5)
  1385. move.l d5,($00c4,a5)
  1386. move.l d5,($0100,a5)
  1387. move.l d5,($0104,a5)
  1388. move.l d5,($0140,a5)
  1389. move.l d5,($0144,a5)
  1390. move.l d5,($0180,a5)
  1391. move.l d5,($0184,a5)
  1392. move.l d5,($01c0,a5)
  1393. move.l d5,($01c4,a5)
  1394. sf.b (L00195f)
  1395. st.b (L00195e)
  1396. movem.l (sp)+,d5/a5
  1397. tst.l d2
  1398. beq.w L0014fa
  1399. tst.b d1
  1400. beq.w L0014fa
  1401. cmpi.b #$04,d1
  1402. bcc.w L0014fa
  1403. cmpi.w #$0500,d1
  1404. bcc.w L0014fa
  1405. bra.s L001288
  1406. L00126c:
  1407. tst.l d2
  1408. beq.w L0011cc
  1409. tst.b d1
  1410. beq.w L0011cc
  1411. cmpi.b #$04,d1
  1412. bcc.w L0011cc
  1413. cmpi.w #$0500,d1
  1414. bcc.w L0011cc
  1415. L001288:
  1416. movem.l d1-d7/a0-a6,-(sp)
  1417. bsr.w L00153e
  1418. bmi.w L0011c8
  1419. swap.w d1
  1420. move.w #$0008,d1
  1421. swap.w d1
  1422. bsr.w L00086c
  1423. move.w ($0006,a6),d5
  1424. add.w d5,(L00195a)
  1425. moveq.l #$00,d5
  1426. move.l d5,(a6)
  1427. move.l d5,($0004,a6)
  1428. move.b (L00194a,pc),d5
  1429. beq.s L0012d4
  1430. btst.b #$03,($00e840c0)
  1431. beq.s L0012d4
  1432. move.w (L00195e,pc),d5
  1433. beq.s L0012d8
  1434. move.l #$ff000000,(L00195c)
  1435. bra.s L0012d8
  1436. L0012d4:
  1437. bsr.w L0007e4
  1438. L0012d8:
  1439. moveq.l #$01,d1
  1440. move.w d1,($0020,a6)
  1441. move.w d2,($0022,a6)
  1442. movea.l (a1)+,a2
  1443. move.w (a1)+,d1
  1444. move.l a1,($0024,a6)
  1445. move.l d1,(a6)+
  1446. moveq.l #$00,d0
  1447. move.l d0,(a6)+
  1448. move.l a2,(a6)+
  1449. move.l #End+$00d702,(a6)
  1450. movem.l (sp)+,d1-d7/a0-a6
  1451. move.w (sp)+,sr
  1452. rts
  1453. L001300:
  1454. st.b (L001961)
  1455. tst.l d2
  1456. beq.w L0014fa
  1457. tst.b d1
  1458. beq.w L0014fa
  1459. cmpi.b #$04,d1
  1460. bcc.w L0014fa
  1461. cmpi.w #$0500,d1
  1462. bcc.w L0014fa
  1463. movem.l d1-d7/a0-a6,-(sp)
  1464. move.w d1,(L001964)
  1465. bsr.w L000e1a
  1466. moveq.l #$01,d0
  1467. move.b d0,(L001963)
  1468. move.w d2,(L00196a)
  1469. move.l a1,(L001966)
  1470. move.b #$12,($0c32)
  1471. movem.l (sp)+,d1-d7/a0-a6
  1472. moveq.l #$00,d0
  1473. move.w (sp)+,sr
  1474. rts
  1475. Override_ADPCMLOT:
  1476. move.w sr,-(sp)
  1477. ori.w #$0700,sr
  1478. cmpi.w #$0008,(L00194c)
  1479. bcc.w L0011cc
  1480. move.b (L001947,pc),d0
  1481. bne.w L001474
  1482. move.b (L001961,pc),d0
  1483. beq.s L0013ea
  1484. sf.b (L001961)
  1485. movem.l d5/a5,-(sp)
  1486. lea.l (L001682,pc),a5
  1487. moveq.l #$00,d5
  1488. move.l d5,(a5)
  1489. move.l d5,($0004,a5)
  1490. move.l d5,($0040,a5)
  1491. move.l d5,($0044,a5)
  1492. move.l d5,($0080,a5)
  1493. move.l d5,($0084,a5)
  1494. move.l d5,($00c0,a5)
  1495. move.l d5,($00c4,a5)
  1496. move.l d5,($0100,a5)
  1497. move.l d5,($0104,a5)
  1498. move.l d5,($0140,a5)
  1499. move.l d5,($0144,a5)
  1500. move.l d5,($0180,a5)
  1501. move.l d5,($0184,a5)
  1502. move.l d5,($01c0,a5)
  1503. move.l d5,($01c4,a5)
  1504. sf.b (L00195f)
  1505. st.b (L00195e)
  1506. movem.l (sp)+,d5/a5
  1507. tst.b d1
  1508. beq.w L0014fa
  1509. cmpi.b #$04,d1
  1510. bcc.w L0014fa
  1511. cmpi.w #$0500,d1
  1512. bcc.w L0014fa
  1513. bra.s L001400
  1514. L0013ea:
  1515. tst.b d1
  1516. beq.w L0011cc
  1517. cmpi.b #$04,d1
  1518. bcc.w L0011cc
  1519. cmpi.w #$0500,d1
  1520. bcc.w L0011cc
  1521. L001400:
  1522. movem.l d1-d7/a0-a6,-(sp)
  1523. bsr.w L00153e
  1524. bmi.w L0011c8
  1525. swap.w d1
  1526. move.w #$0008,d1
  1527. swap.w d1
  1528. bsr.w L00086c
  1529. move.w ($0006,a6),d5
  1530. add.w d5,(L00195a)
  1531. moveq.l #$00,d5
  1532. move.l d5,(a6)
  1533. move.l d5,($0004,a6)
  1534. move.b (L00194a,pc),d5
  1535. beq.s L00144c
  1536. btst.b #$03,($00e840c0)
  1537. beq.s L00144c
  1538. move.w (L00195e,pc),d5
  1539. beq.s L001450
  1540. move.l #$ff000000,(L00195c)
  1541. bra.s L001450
  1542. L00144c:
  1543. bsr.w L0007e4
  1544. L001450:
  1545. moveq.l #$02,d1
  1546. move.w d1,($0020,a6)
  1547. movea.l (a1)+,a2
  1548. move.w (a1)+,d1
  1549. move.l a1,($0024,a6)
  1550. move.l d1,(a6)+
  1551. moveq.l #$00,d0
  1552. move.l d0,(a6)+
  1553. move.l a2,(a6)+
  1554. move.l #End+$00d702,(a6)
  1555. movem.l (sp)+,d1-d7/a0-a6
  1556. move.w (sp)+,sr
  1557. rts
  1558. L001474:
  1559. st.b (L001961)
  1560. tst.b d1
  1561. beq.s L0014fa
  1562. cmpi.b #$04,d1
  1563. bcc.s L0014fa
  1564. cmpi.w #$0500,d1
  1565. bcc.s L0014fa
  1566. movem.l d1-d7/a0-a6,-(sp)
  1567. move.w d1,(L001964)
  1568. bsr.w L000e1a
  1569. moveq.l #$02,d0
  1570. move.b d0,(L001963)
  1571. move.l a1,(L001966)
  1572. move.b #$22,($0c32) ;'"'
  1573. movem.l (sp)+,d1-d7/a0-a6
  1574. moveq.l #$00,d0
  1575. move.w (sp)+,sr
  1576. rts
  1577. Override_ADPCMMOD:
  1578. move.w sr,-(sp)
  1579. ori.w #$0700,sr
  1580. cmpi.w #$0003,d1
  1581. bcc.s L001504
  1582. move.b (L001947,pc),d0
  1583. cmp.b (L001961,pc),d0
  1584. bne.s L0014f4
  1585. movem.l d1-d7/a0-a6,-(sp)
  1586. tst.b d0
  1587. bne.s L0014e4
  1588. move.w d1,d0
  1589. beq.w L000394
  1590. subq.w #1,d0
  1591. beq.w L000430
  1592. bra.w L000482
  1593. L0014e4:
  1594. move.w d1,d0
  1595. beq.w L0009d0
  1596. subq.w #1,d0
  1597. beq.w L0009f6
  1598. bra.w L000a32
  1599. L0014f4:
  1600. move.b d0,(L001961)
  1601. L0014fa:
  1602. moveq.l #$00,d0
  1603. movem.l d0-d7/a0-a6,-(sp)
  1604. bra.w L001a78
  1605. L001504:
  1606. cmpi.l #$50434d38,d1 ;'PCM8'
  1607. bne.s L001530
  1608. movem.l a0-a1,-(sp)
  1609. lea.l (PCM8String,pc),a0
  1610. movea.l ($0088),a1
  1611. subq.l #8,a1
  1612. cmpm.l (a0)+,(a1)+
  1613. bne.s L00152c
  1614. cmpm.l (a0)+,(a1)+
  1615. bne.s L00152c
  1616. movem.l (sp)+,a0-a1
  1617. moveq.l #$30,d0 ;'0'
  1618. move.w (sp)+,sr
  1619. rts
  1620. L00152c:
  1621. movem.l (sp)+,a0-a1
  1622. L001530:
  1623. moveq.l #$ff,d0
  1624. move.w (sp)+,sr
  1625. rts
  1626. PCM8String:
  1627. .dc.b 'PCM8/048'
  1628. L00153e:
  1629. moveq.l #$ff,d3
  1630. move.w (L00194c,pc),d6
  1631. move.l #$01000000,d4
  1632. lea.l (L001842,pc),a6
  1633. moveq.l #$07,d0
  1634. L001550:
  1635. move.l (a6),d5
  1636. ble.s L001572
  1637. tst.w ($0020,a6)
  1638. bne.s L001564
  1639. cmp.l d5,d4
  1640. bcs.s L001564
  1641. move.l d5,d4
  1642. move.w d0,d3
  1643. movea.l a6,a0
  1644. L001564:
  1645. lea.l (-$0040,a6),a6
  1646. cmp.w d6,d0
  1647. dble.w d0,L001550
  1648. movea.l a0,a6
  1649. move.w d3,d0
  1650. L001572:
  1651. tst.w d0
  1652. rts
  1653. L001576:
  1654. moveq.l #$ff,d0
  1655. rts
  1656. L00157a:
  1657. .dc.b '������������������������������������������������������������'
  1658. .dc.b '����'
  1659. L0015fa:
  1660. .dc.l L001602
  1661. .dc.l L001632
  1662. L001602:
  1663. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1664. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1665. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1666. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1667. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1668. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1669. L001632:
  1670. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1671. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1672. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1673. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1674. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1675. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1676. L001662:
  1677. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1678. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1679. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1680. .dc.b $00,$00,$00,$00,$00,$00,$00,$00
  1681. L001682:
  1682. .dc.l $00000000,$00000000
  1683. .dc.l $00000000,$00000000
  1684. .dc.l $00000000,$00000000
  1685. .dc.l $00000000,$00000000
  1686. L0016a2:
  1687. .ds.b 416
  1688. L001842:
  1689. .ds.b 64
  1690. L001882:
  1691. .ds.b 192
  1692. L001942:
  1693. .dc.b $00,$00
  1694. L001944:
  1695. .dc.b $01
  1696. L001945:
  1697. .dc.b $01
  1698. L001946:
  1699. .dc.b $00
  1700. L001947:
  1701. .dc.b $00
  1702. L001948:
  1703. .dc.b $01
  1704. L001949:
  1705. .dc.b $00
  1706. L00194a:
  1707. .dc.b $00
  1708. L00194b:
  1709. .dc.b $ff
  1710. L00194c:
  1711. .dc.w $0000
  1712. L00194e:
  1713. .dc.b $00,$03
  1714. L001950:
  1715. .dc.w $df00
  1716. L001952:
  1717. .dc.w $ffff
  1718. L001954:
  1719. .dc.l EntryPoint
  1720. .dc.b $00,$00
  1721. L00195a:
  1722. .dc.w $0000
  1723. L00195c:
  1724. .dc.b $00,$00
  1725. L00195e:
  1726. .dc.b $ff
  1727. L00195f:
  1728. .dc.b $00,$00
  1729. L001961:
  1730. .dc.b $00
  1731. L001962:
  1732. .dc.b $00
  1733. L001963:
  1734. .dc.b $00
  1735. L001964:
  1736. .dc.b $00
  1737. L001965:
  1738. .dc.b $00
  1739. L001966:
  1740. .dc.l $00000000
  1741. L00196a:
  1742. .dc.l $00000000
  1743. L00196e:
  1744. .dc.b $03
  1745. L00196f:
  1746. .dc.b $03
  1747. L001970:
  1748. .dc.b $03,$00
  1749. DMAEndInterrupt:
  1750. ori.w #$0700,sr
  1751. addq.w #1,(L001952)
  1752. bgt.s L0019ee
  1753. movem.l d0-d7/a0-a6,-(sp)
  1754. L001982:
  1755. movea.l #$00e840c0,a5
  1756. btst.b #$03,(a5)
  1757. beq.s L001a08
  1758. move.b (L001949,pc),d0
  1759. bne.s L0019f0
  1760. L001994:
  1761. move.b ($0c32),d0
  1762. bne.w L002efc
  1763. move.l (L00195e,pc),d0
  1764. beq.w L001b10
  1765. tst.b d0
  1766. bne.w L002efc
  1767. st.b (a5)
  1768. tst.b (L00194a)
  1769. beq.s L0019ce
  1770. move.l #L00157a,($001c,a5)
  1771. move.w #$0080,($001a,a5)
  1772. move.b #$48,($0007,a5) ;'H'
  1773. sf.b (L00194a)
  1774. L0019ce:
  1775. move.w #$ffff,(L001952)
  1776. move.b (L001949,pc),d0
  1777. bne.s L0019e2
  1778. movem.l (sp)+,d0-d7/a0-a6
  1779. rte
  1780. L0019e2:
  1781. move.w #$0000,($00e82200)
  1782. movem.l (sp)+,d0-d7/a0-a6
  1783. L0019ee:
  1784. rte
  1785. L0019f0:
  1786. move.w #$0020,($00e82200) ;' '
  1787. bra.s L001994
  1788. DMAErrorInterrupt:
  1789. ori.w #$0700,sr
  1790. movem.l d0-d7/a0-a6,-(sp)
  1791. L001a02:
  1792. movea.l #$00e840c0,a5
  1793. L001a08:
  1794. st.b (a5)
  1795. move.b #$10,($0007,a5)
  1796. st.b (a5)
  1797. move.l #L00157a,($000c,a5)
  1798. move.l #$00e92003,($0014,a5)
  1799. move.w #$0080,($000a,a5)
  1800. move.b #$32,($0005,a5) ;'2'
  1801. move.b #$02,($00e92001)
  1802. move.b #$88,($00e92003)
  1803. moveq.l #$00,d0
  1804. lea.l (L001682,pc),a0
  1805. moveq.l #$07,d1
  1806. L001a46:
  1807. move.l d0,(a0)+
  1808. move.l d0,(a0)+
  1809. lea.l ($0038,a0),a0
  1810. dbra.w d1,L001a46
  1811. lea.l (L00195c,pc),a0
  1812. move.l #$0000ff00,(a0)
  1813. lea.l (L001962,pc),a0
  1814. move.l d0,(a0)+
  1815. move.l d0,(a0)+
  1816. move.l d0,(a0)
  1817. move.w d0,($0c32)
  1818. move.b d0,(L00194a)
  1819. bra.w L0019ce
  1820. L001a74:
  1821. movem.l d0-d7/a0-a6,-(sp)
  1822. L001a78:
  1823. movea.l #$00e840c0,a5
  1824. st.b (a5)
  1825. move.b #$10,($0007,a5)
  1826. st.b (a5)
  1827. move.l #L00157a,($000c,a5)
  1828. move.l #$00e92003,($0014,a5)
  1829. move.w #$0080,($000a,a5)
  1830. move.b #$32,($0005,a5) ;'2'
  1831. move.b #$02,($00e92001)
  1832. move.b #$88,($00e92003)
  1833. moveq.l #$00,d0
  1834. lea.l (L001682,pc),a0
  1835. moveq.l #$07,d1
  1836. L001abc:
  1837. move.l d0,(a0)+
  1838. move.l d0,(a0)+
  1839. lea.l ($0038,a0),a0
  1840. dbra.w d1,L001abc
  1841. lea.l (L00195c,pc),a0
  1842. move.l #$0000ff00,(a0)
  1843. lea.l (L001962,pc),a0
  1844. move.l d0,(a0)+
  1845. move.l d0,(a0)+
  1846. move.l d0,(a0)
  1847. move.w d0,($0c32)
  1848. move.b d0,(L00194a)
  1849. move.w #$ffff,(L001952)
  1850. move.b (L001949,pc),d0
  1851. bne.s L001afc
  1852. movem.l (sp)+,d0-d7/a0-a6
  1853. move.w (sp)+,sr
  1854. rts
  1855. L001afc:
  1856. move.w #$0000,($00e82200)
  1857. movem.l (sp)+,d0-d7/a0-a6
  1858. move.w (sp)+,sr
  1859. rts
  1860. L001b0c:
  1861. .dc.b $0b,$09,$0a,$08
  1862. L001b10:
  1863. movea.l #$00e88015,a0
  1864. moveq.l #$00,d0
  1865. movep.w (-$0002,a0),d0
  1866. move.l d0,-(sp)
  1867. and.w (L001950,pc),d0
  1868. movep.w d0,(-$0002,a0)
  1869. lea.l (L00196e,pc),a0
  1870. moveq.l #$00,d1
  1871. move.b ($0002,a0),d1
  1872. move.b (L001b0c,pc,d1.w),d1
  1873. move.b ($0001,a0),($0002,a0)
  1874. move.b (a0),($0001,a0)
  1875. movea.l #$00e9a005,a0
  1876. moveq.l #$f0,d0
  1877. and.b (a0),d0
  1878. or.b d1,d0
  1879. move.b d0,(a0)
  1880. lea.l (L0015fa,pc),a0
  1881. movea.l (a0)+,a6
  1882. movea.l (a0)+,a1
  1883. move.l a6,-(a0)
  1884. move.l a1,-(a0)
  1885. move.b (L00195c,pc),d0
  1886. beq.s L001b96
  1887. st.b (a5)
  1888. move.l #L00157a,($001c,a5)
  1889. move.w #$0030,($001a,a5) ;'0'
  1890. move.b #$48,($0007,a5) ;'H'
  1891. lea.l (L001954,pc),a0
  1892. moveq.l #$00,d2
  1893. move.l #EntryPoint,(a0)+
  1894. move.l d2,(a0)+
  1895. move.b d2,(a0)
  1896. L001b84:
  1897. andi.w #$fbff,sr
  1898. bra.w L002d22
  1899. L001b8c:
  1900. .dc.w $0000,$000f,$00f0,$f000
  1901. .dc.w $8888
  1902. L001b96:
  1903. st.b (a5)
  1904. move.l a6,($001c,a5)
  1905. move.w #$0030,($001a,a5) ;'0'
  1906. move.b #$48,($0007,a5) ;'H'
  1907. L001ba8:
  1908. andi.w #$fbff,sr
  1909. movem.w (L001b8c,pc),d2/d4-d6/a2
  1910. lea.l (L001882,pc),a1
  1911. lea.l (L001954,pc),a4
  1912. movea.l (a4)+,a0
  1913. move.w (a4)+,d0
  1914. movea.l #$0f000f00,a3
  1915. move.l a3,d7
  1916. move.w (a1)+,d1
  1917. sub.w d0,d1
  1918. bmi.s L001bdc
  1919. cmp.w (a0)+,d1
  1920. bcc.s L001bd6
  1921. move.b ($30,a0,d1.w),d2
  1922. adda.w d2,a0
  1923. L001bd6:
  1924. move.w (a0)+,d3
  1925. add.w (a0)+,d0
  1926. bra.s L001bee
  1927. L001bdc:
  1928. neg.w d1
  1929. cmp.w (a0)+,d1
  1930. bcc.s L001be8
  1931. move.b ($30,a0,d1.w),d2
  1932. adda.w d2,a0
  1933. L001be8:
  1934. move.w a2,d3
  1935. or.w (a0)+,d3
  1936. sub.w (a0)+,d0
  1937. L001bee:
  1938. adda.w (a0),a0
  1939. and.w d3,d7
  1940. move.w (a1)+,d1
  1941. sub.w d0,d1
  1942. bmi.s L001c08
  1943. cmp.w (a0)+,d1
  1944. bcc.s L001c02
  1945. move.b ($30,a0,d1.w),d2
  1946. adda.w d2,a0
  1947. L001c02:
  1948. move.w (a0)+,d3
  1949. add.w (a0)+,d0
  1950. bra.s L001c1a
  1951. L001c08:
  1952. neg.w d1
  1953. cmp.w (a0)+,d1
  1954. bcc.s L001c14
  1955. move.b ($30,a0,d1.w),d2
  1956. adda.w d2,a0
  1957. L001c14:
  1958. move.w a2,d3
  1959. or.w (a0)+,d3
  1960. sub.w (a0)+,d0
  1961. L001c1a:
  1962. adda.w (a0),a0
  1963. and.w d6,d3
  1964. or.w d3,d7
  1965. move.w (a1)+,d1
  1966. sub.w d0,d1
  1967. bmi.s L001c36
  1968. cmp.w (a0)+,d1
  1969. bcc.s L001c30
  1970. move.b ($30,a0,d1.w),d2
  1971. adda.w d2,a0
  1972. L001c30:
  1973. move.w (a0)+,d3
  1974. add.w (a0)+,d0
  1975. bra.s L001c48
  1976. L001c36:
  1977. neg.w d1
  1978. cmp.w (a0)+,d1
  1979. bcc.s L001c42
  1980. move.b ($30,a0,d1.w),d2
  1981. adda.w d2,a0
  1982. L001c42:
  1983. move.w a2,d3
  1984. or.w (a0)+,d3
  1985. sub.w (a0)+,d0
  1986. L001c48:
  1987. adda.w (a0),a0
  1988. and.w d4,d3
  1989. or.w d3,d7
  1990. move.w (a1)+,d1
  1991. sub.w d0,d1
  1992. bmi.s L001c64
  1993. cmp.w (a0)+,d1
  1994. bcc.s L001c5e
  1995. move.b ($30,a0,d1.w),d2
  1996. adda.w d2,a0
  1997. L001c5e:
  1998. move.w (a0)+,d3
  1999. add.w (a0)+,d0
  2000. bra.s L001c76
  2001. L001c64:
  2002. neg.w d1
  2003. cmp.w (a0)+,d1
  2004. bcc.s L001c70
  2005. move.b ($30,a0,d1.w),d2
  2006. adda.w d2,a0
  2007. L001c70:
  2008. move.w a2,d3
  2009. or.w (a0)+,d3
  2010. sub.w (a0)+,d0
  2011. L001c76:
  2012. adda.w (a0),a0
  2013. and.w d5,d3
  2014. or.w d3,d7
  2015. swap.w d7
  2016. move.w (a1)+,d1
  2017. sub.w d0,d1
  2018. bmi.s L001c94
  2019. cmp.w (a0)+,d1
  2020. bcc.s L001c8e
  2021. move.b ($30,a0,d1.w),d2
  2022. adda.w d2,a0
  2023. L001c8e:
  2024. move.w (a0)+,d3
  2025. add.w (a0)+,d0
  2026. bra.s L001ca6
  2027. L001c94:
  2028. neg.w d1
  2029. cmp.w (a0)+,d1
  2030. bcc.s L001ca0
  2031. move.b ($30,a0,d1.w),d2
  2032. adda.w d2,a0
  2033. L001ca0:
  2034. move.w a2,d3
  2035. or.w (a0)+,d3
  2036. sub.w (a0)+,d0
  2037. L001ca6:
  2038. adda.w (a0),a0
  2039. and.w d3,d7
  2040. move.w (a1)+,d1
  2041. sub.w d0,d1
  2042. bmi.s L001cc0
  2043. cmp.w (a0)+,d1
  2044. bcc.s L001cba
  2045. move.b ($30,a0,d1.w),d2
  2046. adda.w d2,a0
  2047. L001cba:
  2048. move.w (a0)+,d3
  2049. add.w (a0)+,d0
  2050. bra.s L001cd2
  2051. L001cc0:
  2052. neg.w d1
  2053. cmp.w (a0)+,d1
  2054. bcc.s L001ccc
  2055. move.b ($30,a0,d1.w),d2
  2056. adda.w d2,a0
  2057. L001ccc:
  2058. move.w a2,d3
  2059. or.w (a0)+,d3
  2060. sub.w (a0)+,d0
  2061. L001cd2:
  2062. adda.w (a0),a0
  2063. and.w d6,d3
  2064. or.w d3,d7
  2065. move.w (a1)+,d1
  2066. sub.w d0,d1
  2067. bmi.s L001cee
  2068. cmp.w (a0)+,d1
  2069. bcc.s L001ce8
  2070. move.b ($30,a0,d1.w),d2
  2071. adda.w d2,a0
  2072. L001ce8:
  2073. move.w (a0)+,d3
  2074. add.w (a0)+,d0
  2075. bra.s L001d00
  2076. L001cee:
  2077. neg.w d1
  2078. cmp.w (a0)+,d1
  2079. bcc.s L001cfa
  2080. move.b ($30,a0,d1.w),d2
  2081. adda.w d2,a0
  2082. L001cfa:
  2083. move.w a2,d3
  2084. or.w (a0)+,d3
  2085. sub.w (a0)+,d0
  2086. L001d00:
  2087. adda.w (a0),a0
  2088. and.w d4,d3
  2089. or.w d3,d7
  2090. move.w (a1)+,d1
  2091. sub.w d0,d1
  2092. bmi.s L001d1c
  2093. cmp.w (a0)+,d1
  2094. bcc.s L001d16
  2095. move.b ($30,a0,d1.w),d2
  2096. adda.w d2,a0
  2097. L001d16:
  2098. move.w (a0)+,d3
  2099. add.w (a0)+,d0
  2100. bra.s L001d2e
  2101. L001d1c:
  2102. neg.w d1
  2103. cmp.w (a0)+,d1
  2104. bcc.s L001d28
  2105. move.b ($30,a0,d1.w),d2
  2106. adda.w d2,a0
  2107. L001d28:
  2108. move.w a2,d3
  2109. or.w (a0)+,d3
  2110. sub.w (a0)+,d0
  2111. L001d2e:
  2112. adda.w (a0),a0
  2113. and.w d5,d3
  2114. or.w d3,d7
  2115. move.l d7,(a6)+
  2116. move.l a3,d7
  2117. move.w (a1)+,d1
  2118. sub.w d0,d1
  2119. bmi.s L001d4e
  2120. cmp.w (a0)+,d1
  2121. bcc.s L001d48
  2122. move.b ($30,a0,d1.w),d2
  2123. adda.w d2,a0
  2124. L001d48:
  2125. move.w (a0)+,d3
  2126. add.w (a0)+,d0
  2127. bra.s L001d60
  2128. L001d4e:
  2129. neg.w d1
  2130. cmp.w (a0)+,d1
  2131. bcc.s L001d5a
  2132. move.b ($30,a0,d1.w),d2
  2133. adda.w d2,a0
  2134. L001d5a:
  2135. move.w a2,d3
  2136. or.w (a0)+,d3
  2137. sub.w (a0)+,d0
  2138. L001d60:
  2139. adda.w (a0),a0
  2140. and.w d3,d7
  2141. move.w (a1)+,d1
  2142. sub.w d0,d1
  2143. bmi.s L001d7a
  2144. cmp.w (a0)+,d1
  2145. bcc.s L001d74
  2146. move.b ($30,a0,d1.w),d2
  2147. adda.w d2,a0
  2148. L001d74:
  2149. move.w (a0)+,d3
  2150. add.w (a0)+,d0
  2151. bra.s L001d8c
  2152. L001d7a:
  2153. neg.w d1
  2154. cmp.w (a0)+,d1
  2155. bcc.s L001d86
  2156. move.b ($30,a0,d1.w),d2
  2157. adda.w d2,a0
  2158. L001d86:
  2159. move.w a2,d3
  2160. or.w (a0)+,d3
  2161. sub.w (a0)+,d0
  2162. L001d8c:
  2163. adda.w (a0),a0
  2164. and.w d6,d3
  2165. or.w d3,d7
  2166. move.w (a1)+,d1
  2167. sub.w d0,d1
  2168. bmi.s L001da8
  2169. cmp.w (a0)+,d1
  2170. bcc.s L001da2
  2171. move.b ($30,a0,d1.w),d2
  2172. adda.w d2,a0
  2173. L001da2:
  2174. move.w (a0)+,d3
  2175. add.w (a0)+,d0
  2176. bra.s L001dba
  2177. L001da8:
  2178. neg.w d1
  2179. cmp.w (a0)+,d1
  2180. bcc.s L001db4
  2181. move.b ($30,a0,d1.w),d2
  2182. adda.w d2,a0
  2183. L001db4:
  2184. move.w a2,d3
  2185. or.w (a0)+,d3
  2186. sub.w (a0)+,d0
  2187. L001dba:
  2188. adda.w (a0),a0
  2189. and.w d4,d3
  2190. or.w d3,d7
  2191. move.w (a1)+,d1
  2192. sub.w d0,d1
  2193. bmi.s L001dd6
  2194. cmp.w (a0)+,d1
  2195. bcc.s L001dd0
  2196. move.b ($30,a0,d1.w),d2
  2197. adda.w d2,a0
  2198. L001dd0:
  2199. move.w (a0)+,d3
  2200. add.w (a0)+,d0
  2201. bra.s L001de8
  2202. L001dd6:
  2203. neg.w d1
  2204. cmp.w (a0)+,d1
  2205. bcc.s L001de2
  2206. move.b ($30,a0,d1.w),d2
  2207. adda.w d2,a0
  2208. L001de2:
  2209. move.w a2,d3
  2210. or.w (a0)+,d3
  2211. sub.w (a0)+,d0
  2212. L001de8:
  2213. adda.w (a0),a0
  2214. and.w d5,d3
  2215. or.w d3,d7
  2216. swap.w d7
  2217. move.w (a1)+,d1
  2218. sub.w d0,d1
  2219. bmi.s L001e06
  2220. cmp.w (a0)+,d1
  2221. bcc.s L001e00
  2222. move.b ($30,a0,d1.w),d2
  2223. adda.w d2,a0
  2224. L001e00:
  2225. move.w (a0)+,d3
  2226. add.w (a0)+,d0
  2227. bra.s L001e18
  2228. L001e06:
  2229. neg.w d1
  2230. cmp.w (a0)+,d1
  2231. bcc.s L001e12
  2232. move.b ($30,a0,d1.w),d2
  2233. adda.w d2,a0
  2234. L001e12:
  2235. move.w a2,d3
  2236. or.w (a0)+,d3
  2237. sub.w (a0)+,d0
  2238. L001e18:
  2239. adda.w (a0),a0
  2240. and.w d3,d7
  2241. move.w (a1)+,d1
  2242. sub.w d0,d1
  2243. bmi.s L001e32
  2244. cmp.w (a0)+,d1
  2245. bcc.s L001e2c
  2246. move.b ($30,a0,d1.w),d2
  2247. adda.w d2,a0
  2248. L001e2c:
  2249. move.w (a0)+,d3
  2250. add.w (a0)+,d0
  2251. bra.s L001e44
  2252. L001e32:
  2253. neg.w d1
  2254. cmp.w (a0)+,d1
  2255. bcc.s L001e3e
  2256. move.b ($30,a0,d1.w),d2
  2257. adda.w d2,a0
  2258. L001e3e:
  2259. move.w a2,d3
  2260. or.w (a0)+,d3
  2261. sub.w (a0)+,d0
  2262. L001e44:
  2263. adda.w (a0),a0
  2264. and.w d6,d3
  2265. or.w d3,d7
  2266. move.w (a1)+,d1
  2267. sub.w d0,d1
  2268. bmi.s L001e60
  2269. cmp.w (a0)+,d1
  2270. bcc.s L001e5a
  2271. move.b ($30,a0,d1.w),d2
  2272. adda.w d2,a0
  2273. L001e5a:
  2274. move.w (a0)+,d3
  2275. add.w (a0)+,d0
  2276. bra.s L001e72
  2277. L001e60:
  2278. neg.w d1
  2279. cmp.w (a0)+,d1
  2280. bcc.s L001e6c
  2281. move.b ($30,a0,d1.w),d2
  2282. adda.w d2,a0
  2283. L001e6c:
  2284. move.w a2,d3
  2285. or.w (a0)+,d3
  2286. sub.w (a0)+,d0
  2287. L001e72:
  2288. adda.w (a0),a0
  2289. and.w d4,d3
  2290. or.w d3,d7
  2291. move.w (a1)+,d1
  2292. sub.w d0,d1
  2293. bmi.s L001e8e
  2294. cmp.w (a0)+,d1
  2295. bcc.s L001e88
  2296. move.b ($30,a0,d1.w),d2
  2297. adda.w d2,a0
  2298. L001e88:
  2299. move.w (a0)+,d3
  2300. add.w (a0)+,d0
  2301. bra.s L001ea0
  2302. L001e8e:
  2303. neg.w d1
  2304. cmp.w (a0)+,d1
  2305. bcc.s L001e9a
  2306. move.b ($30,a0,d1.w),d2
  2307. adda.w d2,a0
  2308. L001e9a:
  2309. move.w a2,d3
  2310. or.w (a0)+,d3
  2311. sub.w (a0)+,d0
  2312. L001ea0:
  2313. adda.w (a0),a0
  2314. and.w d5,d3
  2315. or.w d3,d7
  2316. move.l d7,(a6)+
  2317. move.l a3,d7
  2318. move.w (a1)+,d1
  2319. sub.w d0,d1
  2320. bmi.s L001ec0
  2321. cmp.w (a0)+,d1
  2322. bcc.s L001eba
  2323. move.b ($30,a0,d1.w),d2
  2324. adda.w d2,a0
  2325. L001eba:
  2326. move.w (a0)+,d3
  2327. add.w (a0)+,d0
  2328. bra.s L001ed2
  2329. L001ec0:
  2330. neg.w d1
  2331. cmp.w (a0)+,d1
  2332. bcc.s L001ecc
  2333. move.b ($30,a0,d1.w),d2
  2334. adda.w d2,a0
  2335. L001ecc:
  2336. move.w a2,d3
  2337. or.w (a0)+,d3
  2338. sub.w (a0)+,d0
  2339. L001ed2:
  2340. adda.w (a0),a0
  2341. and.w d3,d7
  2342. move.w (a1)+,d1
  2343. sub.w d0,d1
  2344. bmi.s L001eec
  2345. cmp.w (a0)+,d1
  2346. bcc.s L001ee6
  2347. move.b ($30,a0,d1.w),d2
  2348. adda.w d2,a0
  2349. L001ee6:
  2350. move.w (a0)+,d3
  2351. add.w (a0)+,d0
  2352. bra.s L001efe
  2353. L001eec:
  2354. neg.w d1
  2355. cmp.w (a0)+,d1
  2356. bcc.s L001ef8
  2357. move.b ($30,a0,d1.w),d2
  2358. adda.w d2,a0
  2359. L001ef8:
  2360. move.w a2,d3
  2361. or.w (a0)+,d3
  2362. sub.w (a0)+,d0
  2363. L001efe:
  2364. adda.w (a0),a0
  2365. and.w d6,d3
  2366. or.w d3,d7
  2367. move.w (a1)+,d1
  2368. sub.w d0,d1
  2369. bmi.s L001f1a
  2370. cmp.w (a0)+,d1
  2371. bcc.s L001f14
  2372. move.b ($30,a0,d1.w),d2
  2373. adda.w d2,a0
  2374. L001f14:
  2375. move.w (a0)+,d3
  2376. add.w (a0)+,d0
  2377. bra.s L001f2c
  2378. L001f1a:
  2379. neg.w d1
  2380. cmp.w (a0)+,d1
  2381. bcc.s L001f26
  2382. move.b ($30,a0,d1.w),d2
  2383. adda.w d2,a0
  2384. L001f26:
  2385. move.w a2,d3
  2386. or.w (a0)+,d3
  2387. sub.w (a0)+,d0
  2388. L001f2c:
  2389. adda.w (a0),a0
  2390. and.w d4,d3
  2391. or.w d3,d7
  2392. move.w (a1)+,d1
  2393. sub.w d0,d1
  2394. bmi.s L001f48
  2395. cmp.w (a0)+,d1
  2396. bcc.s L001f42
  2397. move.b ($30,a0,d1.w),d2
  2398. adda.w d2,a0
  2399. L001f42:
  2400. move.w (a0)+,d3
  2401. add.w (a0)+,d0
  2402. bra.s L001f5a
  2403. L001f48:
  2404. neg.w d1
  2405. cmp.w (a0)+,d1
  2406. bcc.s L001f54
  2407. move.b ($30,a0,d1.w),d2
  2408. adda.w d2,a0
  2409. L001f54:
  2410. move.w a2,d3
  2411. or.w (a0)+,d3
  2412. sub.w (a0)+,d0
  2413. L001f5a:
  2414. adda.w (a0),a0
  2415. and.w d5,d3
  2416. or.w d3,d7
  2417. swap.w d7
  2418. move.w (a1)+,d1
  2419. sub.w d0,d1
  2420. bmi.s L001f78
  2421. cmp.w (a0)+,d1
  2422. bcc.s L001f72
  2423. move.b ($30,a0,d1.w),d2
  2424. adda.w d2,a0
  2425. L001f72:
  2426. move.w (a0)+,d3
  2427. add.w (a0)+,d0
  2428. bra.s L001f8a
  2429. L001f78:
  2430. neg.w d1
  2431. cmp.w (a0)+,d1
  2432. bcc.s L001f84
  2433. move.b ($30,a0,d1.w),d2
  2434. adda.w d2,a0
  2435. L001f84:
  2436. move.w a2,d3
  2437. or.w (a0)+,d3
  2438. sub.w (a0)+,d0
  2439. L001f8a:
  2440. adda.w (a0),a0
  2441. and.w d3,d7
  2442. move.w (a1)+,d1
  2443. sub.w d0,d1
  2444. bmi.s L001fa4
  2445. cmp.w (a0)+,d1
  2446. bcc.s L001f9e
  2447. move.b ($30,a0,d1.w),d2
  2448. adda.w d2,a0
  2449. L001f9e:
  2450. move.w (a0)+,d3
  2451. add.w (a0)+,d0
  2452. bra.s L001fb6
  2453. L001fa4:
  2454. neg.w d1
  2455. cmp.w (a0)+,d1
  2456. bcc.s L001fb0
  2457. move.b ($30,a0,d1.w),d2
  2458. adda.w d2,a0
  2459. L001fb0:
  2460. move.w a2,d3
  2461. or.w (a0)+,d3
  2462. sub.w (a0)+,d0
  2463. L001fb6:
  2464. adda.w (a0),a0
  2465. and.w d6,d3
  2466. or.w d3,d7
  2467. move.w (a1)+,d1
  2468. sub.w d0,d1
  2469. bmi.s L001fd2
  2470. cmp.w (a0)+,d1
  2471. bcc.s L001fcc
  2472. move.b ($30,a0,d1.w),d2
  2473. adda.w d2,a0
  2474. L001fcc:
  2475. move.w (a0)+,d3
  2476. add.w (a0)+,d0
  2477. bra.s L001fe4
  2478. L001fd2:
  2479. neg.w d1
  2480. cmp.w (a0)+,d1
  2481. bcc.s L001fde
  2482. move.b ($30,a0,d1.w),d2
  2483. adda.w d2,a0
  2484. L001fde:
  2485. move.w a2,d3
  2486. or.w (a0)+,d3
  2487. sub.w (a0)+,d0
  2488. L001fe4:
  2489. adda.w (a0),a0
  2490. and.w d4,d3
  2491. or.w d3,d7
  2492. move.w (a1)+,d1
  2493. sub.w d0,d1
  2494. bmi.s L002000
  2495. cmp.w (a0)+,d1
  2496. bcc.s L001ffa
  2497. move.b ($30,a0,d1.w),d2
  2498. adda.w d2,a0
  2499. L001ffa:
  2500. move.w (a0)+,d3
  2501. add.w (a0)+,d0
  2502. bra.s L002012
  2503. L002000:
  2504. neg.w d1
  2505. cmp.w (a0)+,d1
  2506. bcc.s L00200c
  2507. move.b ($30,a0,d1.w),d2
  2508. adda.w d2,a0
  2509. L00200c:
  2510. move.w a2,d3
  2511. or.w (a0)+,d3
  2512. sub.w (a0)+,d0
  2513. L002012:
  2514. adda.w (a0),a0
  2515. and.w d5,d3
  2516. or.w d3,d7
  2517. move.l d7,(a6)+
  2518. move.l a3,d7
  2519. move.w (a1)+,d1
  2520. sub.w d0,d1
  2521. bmi.s L002032
  2522. cmp.w (a0)+,d1
  2523. bcc.s L00202c
  2524. move.b ($30,a0,d1.w),d2
  2525. adda.w d2,a0
  2526. L00202c:
  2527. move.w (a0)+,d3
  2528. add.w (a0)+,d0
  2529. bra.s L002044
  2530. L002032:
  2531. neg.w d1
  2532. cmp.w (a0)+,d1
  2533. bcc.s L00203e
  2534. move.b ($30,a0,d1.w),d2
  2535. adda.w d2,a0
  2536. L00203e:
  2537. move.w a2,d3
  2538. or.w (a0)+,d3
  2539. sub.w (a0)+,d0
  2540. L002044:
  2541. adda.w (a0),a0
  2542. and.w d3,d7
  2543. move.w (a1)+,d1
  2544. sub.w d0,d1
  2545. bmi.s L00205e
  2546. cmp.w (a0)+,d1
  2547. bcc.s L002058
  2548. move.b ($30,a0,d1.w),d2
  2549. adda.w d2,a0
  2550. L002058:
  2551. move.w (a0)+,d3
  2552. add.w (a0)+,d0
  2553. bra.s L002070
  2554. L00205e:
  2555. neg.w d1
  2556. cmp.w (a0)+,d1
  2557. bcc.s L00206a
  2558. move.b ($30,a0,d1.w),d2
  2559. adda.w d2,a0
  2560. L00206a:
  2561. move.w a2,d3
  2562. or.w (a0)+,d3
  2563. sub.w (a0)+,d0
  2564. L002070:
  2565. adda.w (a0),a0
  2566. and.w d6,d3
  2567. or.w d3,d7
  2568. move.w (a1)+,d1
  2569. sub.w d0,d1
  2570. bmi.s L00208c
  2571. cmp.w (a0)+,d1
  2572. bcc.s L002086
  2573. move.b ($30,a0,d1.w),d2
  2574. adda.w d2,a0
  2575. L002086:
  2576. move.w (a0)+,d3
  2577. add.w (a0)+,d0
  2578. bra.s L00209e
  2579. L00208c:
  2580. neg.w d1
  2581. cmp.w (a0)+,d1
  2582. bcc.s L002098
  2583. move.b ($30,a0,d1.w),d2
  2584. adda.w d2,a0
  2585. L002098:
  2586. move.w a2,d3
  2587. or.w (a0)+,d3
  2588. sub.w (a0)+,d0
  2589. L00209e:
  2590. adda.w (a0),a0
  2591. and.w d4,d3
  2592. or.w d3,d7
  2593. move.w (a1)+,d1
  2594. sub.w d0,d1
  2595. bmi.s L0020ba
  2596. cmp.w (a0)+,d1
  2597. bcc.s L0020b4
  2598. move.b ($30,a0,d1.w),d2
  2599. adda.w d2,a0
  2600. L0020b4:
  2601. move.w (a0)+,d3
  2602. add.w (a0)+,d0
  2603. bra.s L0020cc
  2604. L0020ba:
  2605. neg.w d1
  2606. cmp.w (a0)+,d1
  2607. bcc.s L0020c6
  2608. move.b ($30,a0,d1.w),d2
  2609. adda.w d2,a0
  2610. L0020c6:
  2611. move.w a2,d3
  2612. or.w (a0)+,d3
  2613. sub.w (a0)+,d0
  2614. L0020cc:
  2615. adda.w (a0),a0
  2616. and.w d5,d3
  2617. or.w d3,d7
  2618. swap.w d7
  2619. move.w (a1)+,d1
  2620. sub.w d0,d1
  2621. bmi.s L0020ea
  2622. cmp.w (a0)+,d1
  2623. bcc.s L0020e4
  2624. move.b ($30,a0,d1.w),d2
  2625. adda.w d2,a0
  2626. L0020e4:
  2627. move.w (a0)+,d3
  2628. add.w (a0)+,d0
  2629. bra.s L0020fc
  2630. L0020ea:
  2631. neg.w d1
  2632. cmp.w (a0)+,d1
  2633. bcc.s L0020f6
  2634. move.b ($30,a0,d1.w),d2
  2635. adda.w d2,a0
  2636. L0020f6:
  2637. move.w a2,d3
  2638. or.w (a0)+,d3
  2639. sub.w (a0)+,d0
  2640. L0020fc:
  2641. adda.w (a0),a0
  2642. and.w d3,d7
  2643. move.w (a1)+,d1
  2644. sub.w d0,d1
  2645. bmi.s L002116
  2646. cmp.w (a0)+,d1
  2647. bcc.s L002110
  2648. move.b ($30,a0,d1.w),d2
  2649. adda.w d2,a0
  2650. L002110:
  2651. move.w (a0)+,d3
  2652. add.w (a0)+,d0
  2653. bra.s L002128
  2654. L002116:
  2655. neg.w d1
  2656. cmp.w (a0)+,d1
  2657. bcc.s L002122
  2658. move.b ($30,a0,d1.w),d2
  2659. adda.w d2,a0
  2660. L002122:
  2661. move.w a2,d3
  2662. or.w (a0)+,d3
  2663. sub.w (a0)+,d0
  2664. L002128:
  2665. adda.w (a0),a0
  2666. and.w d6,d3
  2667. or.w d3,d7
  2668. move.w (a1)+,d1
  2669. sub.w d0,d1
  2670. bmi.s L002144
  2671. cmp.w (a0)+,d1
  2672. bcc.s L00213e
  2673. move.b ($30,a0,d1.w),d2
  2674. adda.w d2,a0
  2675. L00213e:
  2676. move.w (a0)+,d3
  2677. add.w (a0)+,d0
  2678. bra.s L002156
  2679. L002144:
  2680. neg.w d1
  2681. cmp.w (a0)+,d1
  2682. bcc.s L002150
  2683. move.b ($30,a0,d1.w),d2
  2684. adda.w d2,a0
  2685. L002150:
  2686. move.w a2,d3
  2687. or.w (a0)+,d3
  2688. sub.w (a0)+,d0
  2689. L002156:
  2690. adda.w (a0),a0
  2691. and.w d4,d3
  2692. or.w d3,d7
  2693. move.w (a1)+,d1
  2694. sub.w d0,d1
  2695. bmi.s L002172
  2696. cmp.w (a0)+,d1
  2697. bcc.s L00216c
  2698. move.b ($30,a0,d1.w),d2
  2699. adda.w d2,a0
  2700. L00216c:
  2701. move.w (a0)+,d3
  2702. add.w (a0)+,d0
  2703. bra.s L002184
  2704. L002172:
  2705. neg.w d1
  2706. cmp.w (a0)+,d1
  2707. bcc.s L00217e
  2708. move.b ($30,a0,d1.w),d2
  2709. adda.w d2,a0
  2710. L00217e:
  2711. move.w a2,d3
  2712. or.w (a0)+,d3
  2713. sub.w (a0)+,d0
  2714. L002184:
  2715. adda.w (a0),a0
  2716. and.w d5,d3
  2717. or.w d3,d7
  2718. move.l d7,(a6)+
  2719. move.l a3,d7
  2720. move.w (a1)+,d1
  2721. sub.w d0,d1
  2722. bmi.s L0021a4
  2723. cmp.w (a0)+,d1
  2724. bcc.s L00219e
  2725. move.b ($30,a0,d1.w),d2
  2726. adda.w d2,a0
  2727. L00219e:
  2728. move.w (a0)+,d3
  2729. add.w (a0)+,d0
  2730. bra.s L0021b6
  2731. L0021a4:
  2732. neg.w d1
  2733. cmp.w (a0)+,d1
  2734. bcc.s L0021b0
  2735. move.b ($30,a0,d1.w),d2
  2736. adda.w d2,a0
  2737. L0021b0:
  2738. move.w a2,d3
  2739. or.w (a0)+,d3
  2740. sub.w (a0)+,d0
  2741. L0021b6:
  2742. adda.w (a0),a0
  2743. and.w d3,d7
  2744. move.w (a1)+,d1
  2745. sub.w d0,d1
  2746. bmi.s L0021d0
  2747. cmp.w (a0)+,d1
  2748. bcc.s L0021ca
  2749. move.b ($30,a0,d1.w),d2
  2750. adda.w d2,a0
  2751. L0021ca:
  2752. move.w (a0)+,d3
  2753. add.w (a0)+,d0
  2754. bra.s L0021e2
  2755. L0021d0:
  2756. neg.w d1
  2757. cmp.w (a0)+,d1
  2758. bcc.s L0021dc
  2759. move.b ($30,a0,d1.w),d2
  2760. adda.w d2,a0
  2761. L0021dc:
  2762. move.w a2,d3
  2763. or.w (a0)+,d3
  2764. sub.w (a0)+,d0
  2765. L0021e2:
  2766. adda.w (a0),a0
  2767. and.w d6,d3
  2768. or.w d3,d7
  2769. move.w (a1)+,d1
  2770. sub.w d0,d1
  2771. bmi.s L0021fe
  2772. cmp.w (a0)+,d1
  2773. bcc.s L0021f8
  2774. move.b ($30,a0,d1.w),d2
  2775. adda.w d2,a0
  2776. L0021f8:
  2777. move.w (a0)+,d3
  2778. add.w (a0)+,d0
  2779. bra.s L002210
  2780. L0021fe:
  2781. neg.w d1
  2782. cmp.w (a0)+,d1
  2783. bcc.s L00220a
  2784. move.b ($30,a0,d1.w),d2
  2785. adda.w d2,a0
  2786. L00220a:
  2787. move.w a2,d3
  2788. or.w (a0)+,d3
  2789. sub.w (a0)+,d0
  2790. L002210:
  2791. adda.w (a0),a0
  2792. and.w d4,d3
  2793. or.w d3,d7
  2794. move.w (a1)+,d1
  2795. sub.w d0,d1
  2796. bmi.s L00222c
  2797. cmp.w (a0)+,d1
  2798. bcc.s L002226
  2799. move.b ($30,a0,d1.w),d2
  2800. adda.w d2,a0
  2801. L002226:
  2802. move.w (a0)+,d3
  2803. add.w (a0)+,d0
  2804. bra.s L00223e
  2805. L00222c:
  2806. neg.w d1
  2807. cmp.w (a0)+,d1
  2808. bcc.s L002238
  2809. move.b ($30,a0,d1.w),d2
  2810. adda.w d2,a0
  2811. L002238:
  2812. move.w a2,d3
  2813. or.w (a0)+,d3
  2814. sub.w (a0)+,d0
  2815. L00223e:
  2816. adda.w (a0),a0
  2817. and.w d5,d3
  2818. or.w d3,d7
  2819. swap.w d7
  2820. move.w (a1)+,d1
  2821. sub.w d0,d1
  2822. bmi.s L00225c
  2823. cmp.w (a0)+,d1
  2824. bcc.s L002256
  2825. move.b ($30,a0,d1.w),d2
  2826. adda.w d2,a0
  2827. L002256:
  2828. move.w (a0)+,d3
  2829. add.w (a0)+,d0
  2830. bra.s L00226e
  2831. L00225c:
  2832. neg.w d1
  2833. cmp.w (a0)+,d1
  2834. bcc.s L002268
  2835. move.b ($30,a0,d1.w),d2
  2836. adda.w d2,a0
  2837. L002268:
  2838. move.w a2,d3
  2839. or.w (a0)+,d3
  2840. sub.w (a0)+,d0
  2841. L00226e:
  2842. adda.w (a0),a0
  2843. and.w d3,d7
  2844. move.w (a1)+,d1
  2845. sub.w d0,d1
  2846. bmi.s L002288
  2847. cmp.w (a0)+,d1
  2848. bcc.s L002282
  2849. move.b ($30,a0,d1.w),d2
  2850. adda.w d2,a0
  2851. L002282:
  2852. move.w (a0)+,d3
  2853. add.w (a0)+,d0
  2854. bra.s L00229a
  2855. L002288:
  2856. neg.w d1
  2857. cmp.w (a0)+,d1
  2858. bcc.s L002294
  2859. move.b ($30,a0,d1.w),d2
  2860. adda.w d2,a0
  2861. L002294:
  2862. move.w a2,d3
  2863. or.w (a0)+,d3
  2864. sub.w (a0)+,d0
  2865. L00229a:
  2866. adda.w (a0),a0
  2867. and.w d6,d3
  2868. or.w d3,d7
  2869. move.w (a1)+,d1
  2870. sub.w d0,d1
  2871. bmi.s L0022b6
  2872. cmp.w (a0)+,d1
  2873. bcc.s L0022b0
  2874. move.b ($30,a0,d1.w),d2
  2875. adda.w d2,a0
  2876. L0022b0:
  2877. move.w (a0)+,d3
  2878. add.w (a0)+,d0
  2879. bra.s L0022c8
  2880. L0022b6:
  2881. neg.w d1
  2882. cmp.w (a0)+,d1
  2883. bcc.s L0022c2
  2884. move.b ($30,a0,d1.w),d2
  2885. adda.w d2,a0
  2886. L0022c2:
  2887. move.w a2,d3
  2888. or.w (a0)+,d3
  2889. sub.w (a0)+,d0
  2890. L0022c8:
  2891. adda.w (a0),a0
  2892. and.w d4,d3
  2893. or.w d3,d7
  2894. move.w (a1)+,d1
  2895. sub.w d0,d1
  2896. bmi.s L0022e4
  2897. cmp.w (a0)+,d1
  2898. bcc.s L0022de
  2899. move.b ($30,a0,d1.w),d2
  2900. adda.w d2,a0
  2901. L0022de:
  2902. move.w (a0)+,d3
  2903. add.w (a0)+,d0
  2904. bra.s L0022f6
  2905. L0022e4:
  2906. neg.w d1
  2907. cmp.w (a0)+,d1
  2908. bcc.s L0022f0
  2909. move.b ($30,a0,d1.w),d2
  2910. adda.w d2,a0
  2911. L0022f0:
  2912. move.w a2,d3
  2913. or.w (a0)+,d3
  2914. sub.w (a0)+,d0
  2915. L0022f6:
  2916. adda.w (a0),a0
  2917. and.w d5,d3
  2918. or.w d3,d7
  2919. move.l d7,(a6)+
  2920. move.l a3,d7
  2921. move.w (a1)+,d1
  2922. sub.w d0,d1
  2923. bmi.s L002316
  2924. cmp.w (a0)+,d1
  2925. bcc.s L002310
  2926. move.b ($30,a0,d1.w),d2
  2927. adda.w d2,a0
  2928. L002310:
  2929. move.w (a0)+,d3
  2930. add.w (a0)+,d0
  2931. bra.s L002328
  2932. L002316:
  2933. neg.w d1
  2934. cmp.w (a0)+,d1
  2935. bcc.s L002322
  2936. move.b ($30,a0,d1.w),d2
  2937. adda.w d2,a0
  2938. L002322:
  2939. move.w a2,d3
  2940. or.w (a0)+,d3
  2941. sub.w (a0)+,d0
  2942. L002328:
  2943. adda.w (a0),a0
  2944. and.w d3,d7
  2945. move.w (a1)+,d1
  2946. sub.w d0,d1
  2947. bmi.s L002342
  2948. cmp.w (a0)+,d1
  2949. bcc.s L00233c
  2950. move.b ($30,a0,d1.w),d2
  2951. adda.w d2,a0
  2952. L00233c:
  2953. move.w (a0)+,d3
  2954. add.w (a0)+,d0
  2955. bra.s L002354
  2956. L002342:
  2957. neg.w d1
  2958. cmp.w (a0)+,d1
  2959. bcc.s L00234e
  2960. move.b ($30,a0,d1.w),d2
  2961. adda.w d2,a0
  2962. L00234e:
  2963. move.w a2,d3
  2964. or.w (a0)+,d3
  2965. sub.w (a0)+,d0
  2966. L002354:
  2967. adda.w (a0),a0
  2968. and.w d6,d3
  2969. or.w d3,d7
  2970. move.w (a1)+,d1
  2971. sub.w d0,d1
  2972. bmi.s L002370
  2973. cmp.w (a0)+,d1
  2974. bcc.s L00236a
  2975. move.b ($30,a0,d1.w),d2
  2976. adda.w d2,a0
  2977. L00236a:
  2978. move.w (a0)+,d3
  2979. add.w (a0)+,d0
  2980. bra.s L002382
  2981. L002370:
  2982. neg.w d1
  2983. cmp.w (a0)+,d1
  2984. bcc.s L00237c
  2985. move.b ($30,a0,d1.w),d2
  2986. adda.w d2,a0
  2987. L00237c:
  2988. move.w a2,d3
  2989. or.w (a0)+,d3
  2990. sub.w (a0)+,d0
  2991. L002382:
  2992. adda.w (a0),a0
  2993. and.w d4,d3
  2994. or.w d3,d7
  2995. move.w (a1)+,d1
  2996. sub.w d0,d1
  2997. bmi.s L00239e
  2998. cmp.w (a0)+,d1
  2999. bcc.s L002398
  3000. move.b ($30,a0,d1.w),d2
  3001. adda.w d2,a0
  3002. L002398:
  3003. move.w (a0)+,d3
  3004. add.w (a0)+,d0
  3005. bra.s L0023b0
  3006. L00239e:
  3007. neg.w d1
  3008. cmp.w (a0)+,d1
  3009. bcc.s L0023aa
  3010. move.b ($30,a0,d1.w),d2
  3011. adda.w d2,a0
  3012. L0023aa:
  3013. move.w a2,d3
  3014. or.w (a0)+,d3
  3015. sub.w (a0)+,d0
  3016. L0023b0:
  3017. adda.w (a0),a0
  3018. and.w d5,d3
  3019. or.w d3,d7
  3020. swap.w d7
  3021. move.w (a1)+,d1
  3022. sub.w d0,d1
  3023. bmi.s L0023ce
  3024. cmp.w (a0)+,d1
  3025. bcc.s L0023c8
  3026. move.b ($30,a0,d1.w),d2
  3027. adda.w d2,a0
  3028. L0023c8:
  3029. move.w (a0)+,d3
  3030. add.w (a0)+,d0
  3031. bra.s L0023e0
  3032. L0023ce:
  3033. neg.w d1
  3034. cmp.w (a0)+,d1
  3035. bcc.s L0023da
  3036. move.b ($30,a0,d1.w),d2
  3037. adda.w d2,a0
  3038. L0023da:
  3039. move.w a2,d3
  3040. or.w (a0)+,d3
  3041. sub.w (a0)+,d0
  3042. L0023e0:
  3043. adda.w (a0),a0
  3044. and.w d3,d7
  3045. move.w (a1)+,d1
  3046. sub.w d0,d1
  3047. bmi.s L0023fa
  3048. cmp.w (a0)+,d1
  3049. bcc.s L0023f4
  3050. move.b ($30,a0,d1.w),d2
  3051. adda.w d2,a0
  3052. L0023f4:
  3053. move.w (a0)+,d3
  3054. add.w (a0)+,d0
  3055. bra.s L00240c
  3056. L0023fa:
  3057. neg.w d1
  3058. cmp.w (a0)+,d1
  3059. bcc.s L002406
  3060. move.b ($30,a0,d1.w),d2
  3061. adda.w d2,a0
  3062. L002406:
  3063. move.w a2,d3
  3064. or.w (a0)+,d3
  3065. sub.w (a0)+,d0
  3066. L00240c:
  3067. adda.w (a0),a0
  3068. and.w d6,d3
  3069. or.w d3,d7
  3070. move.w (a1)+,d1
  3071. sub.w d0,d1
  3072. bmi.s L002428
  3073. cmp.w (a0)+,d1
  3074. bcc.s L002422
  3075. move.b ($30,a0,d1.w),d2
  3076. adda.w d2,a0
  3077. L002422:
  3078. move.w (a0)+,d3
  3079. add.w (a0)+,d0
  3080. bra.s L00243a
  3081. L002428:
  3082. neg.w d1
  3083. cmp.w (a0)+,d1
  3084. bcc.s L002434
  3085. move.b ($30,a0,d1.w),d2
  3086. adda.w d2,a0
  3087. L002434:
  3088. move.w a2,d3
  3089. or.w (a0)+,d3
  3090. sub.w (a0)+,d0
  3091. L00243a:
  3092. adda.w (a0),a0
  3093. and.w d4,d3
  3094. or.w d3,d7
  3095. move.w (a1)+,d1
  3096. sub.w d0,d1
  3097. bmi.s L002456
  3098. cmp.w (a0)+,d1
  3099. bcc.s L002450
  3100. move.b ($30,a0,d1.w),d2
  3101. adda.w d2,a0
  3102. L002450:
  3103. move.w (a0)+,d3
  3104. add.w (a0)+,d0
  3105. bra.s L002468
  3106. L002456:
  3107. neg.w d1
  3108. cmp.w (a0)+,d1
  3109. bcc.s L002462
  3110. move.b ($30,a0,d1.w),d2
  3111. adda.w d2,a0
  3112. L002462:
  3113. move.w a2,d3
  3114. or.w (a0)+,d3
  3115. sub.w (a0)+,d0
  3116. L002468:
  3117. adda.w (a0),a0
  3118. and.w d5,d3
  3119. or.w d3,d7
  3120. move.l d7,(a6)+
  3121. move.l a3,d7
  3122. move.w (a1)+,d1
  3123. sub.w d0,d1
  3124. bmi.s L002488
  3125. cmp.w (a0)+,d1
  3126. bcc.s L002482
  3127. move.b ($30,a0,d1.w),d2
  3128. adda.w d2,a0
  3129. L002482:
  3130. move.w (a0)+,d3
  3131. add.w (a0)+,d0
  3132. bra.s L00249a
  3133. L002488:
  3134. neg.w d1
  3135. cmp.w (a0)+,d1
  3136. bcc.s L002494
  3137. move.b ($30,a0,d1.w),d2
  3138. adda.w d2,a0
  3139. L002494:
  3140. move.w a2,d3
  3141. or.w (a0)+,d3
  3142. sub.w (a0)+,d0
  3143. L00249a:
  3144. adda.w (a0),a0
  3145. and.w d3,d7
  3146. move.w (a1)+,d1
  3147. sub.w d0,d1
  3148. bmi.s L0024b4
  3149. cmp.w (a0)+,d1
  3150. bcc.s L0024ae
  3151. move.b ($30,a0,d1.w),d2
  3152. adda.w d2,a0
  3153. L0024ae:
  3154. move.w (a0)+,d3
  3155. add.w (a0)+,d0
  3156. bra.s L0024c6
  3157. L0024b4:
  3158. neg.w d1
  3159. cmp.w (a0)+,d1
  3160. bcc.s L0024c0
  3161. move.b ($30,a0,d1.w),d2
  3162. adda.w d2,a0
  3163. L0024c0:
  3164. move.w a2,d3
  3165. or.w (a0)+,d3
  3166. sub.w (a0)+,d0
  3167. L0024c6:
  3168. adda.w (a0),a0
  3169. and.w d6,d3
  3170. or.w d3,d7
  3171. move.w (a1)+,d1
  3172. sub.w d0,d1
  3173. bmi.s L0024e2
  3174. cmp.w (a0)+,d1
  3175. bcc.s L0024dc
  3176. move.b ($30,a0,d1.w),d2
  3177. adda.w d2,a0
  3178. L0024dc:
  3179. move.w (a0)+,d3
  3180. add.w (a0)+,d0
  3181. bra.s L0024f4
  3182. L0024e2:
  3183. neg.w d1
  3184. cmp.w (a0)+,d1
  3185. bcc.s L0024ee
  3186. move.b ($30,a0,d1.w),d2
  3187. adda.w d2,a0
  3188. L0024ee:
  3189. move.w a2,d3
  3190. or.w (a0)+,d3
  3191. sub.w (a0)+,d0
  3192. L0024f4:
  3193. adda.w (a0),a0
  3194. and.w d4,d3
  3195. or.w d3,d7
  3196. move.w (a1)+,d1
  3197. sub.w d0,d1
  3198. bmi.s L002510
  3199. cmp.w (a0)+,d1
  3200. bcc.s L00250a
  3201. move.b ($30,a0,d1.w),d2
  3202. adda.w d2,a0
  3203. L00250a:
  3204. move.w (a0)+,d3
  3205. add.w (a0)+,d0
  3206. bra.s L002522
  3207. L002510:
  3208. neg.w d1
  3209. cmp.w (a0)+,d1
  3210. bcc.s L00251c
  3211. move.b ($30,a0,d1.w),d2
  3212. adda.w d2,a0
  3213. L00251c:
  3214. move.w a2,d3
  3215. or.w (a0)+,d3
  3216. sub.w (a0)+,d0
  3217. L002522:
  3218. adda.w (a0),a0
  3219. and.w d5,d3
  3220. or.w d3,d7
  3221. swap.w d7
  3222. move.w (a1)+,d1
  3223. sub.w d0,d1
  3224. bmi.s L002540
  3225. cmp.w (a0)+,d1
  3226. bcc.s L00253a
  3227. move.b ($30,a0,d1.w),d2
  3228. adda.w d2,a0
  3229. L00253a:
  3230. move.w (a0)+,d3
  3231. add.w (a0)+,d0
  3232. bra.s L002552
  3233. L002540:
  3234. neg.w d1
  3235. cmp.w (a0)+,d1
  3236. bcc.s L00254c
  3237. move.b ($30,a0,d1.w),d2
  3238. adda.w d2,a0
  3239. L00254c:
  3240. move.w a2,d3
  3241. or.w (a0)+,d3
  3242. sub.w (a0)+,d0
  3243. L002552:
  3244. adda.w (a0),a0
  3245. and.w d3,d7
  3246. move.w (a1)+,d1
  3247. sub.w d0,d1
  3248. bmi.s L00256c
  3249. cmp.w (a0)+,d1
  3250. bcc.s L002566
  3251. move.b ($30,a0,d1.w),d2
  3252. adda.w d2,a0
  3253. L002566:
  3254. move.w (a0)+,d3
  3255. add.w (a0)+,d0
  3256. bra.s L00257e
  3257. L00256c:
  3258. neg.w d1
  3259. cmp.w (a0)+,d1
  3260. bcc.s L002578
  3261. move.b ($30,a0,d1.w),d2
  3262. adda.w d2,a0
  3263. L002578:
  3264. move.w a2,d3
  3265. or.w (a0)+,d3
  3266. sub.w (a0)+,d0
  3267. L00257e:
  3268. adda.w (a0),a0
  3269. and.w d6,d3
  3270. or.w d3,d7
  3271. move.w (a1)+,d1
  3272. sub.w d0,d1
  3273. bmi.s L00259a
  3274. cmp.w (a0)+,d1
  3275. bcc.s L002594
  3276. move.b ($30,a0,d1.w),d2
  3277. adda.w d2,a0
  3278. L002594:
  3279. move.w (a0)+,d3
  3280. add.w (a0)+,d0
  3281. bra.s L0025ac
  3282. L00259a:
  3283. neg.w d1
  3284. cmp.w (a0)+,d1
  3285. bcc.s L0025a6
  3286. move.b ($30,a0,d1.w),d2
  3287. adda.w d2,a0
  3288. L0025a6:
  3289. move.w a2,d3
  3290. or.w (a0)+,d3
  3291. sub.w (a0)+,d0
  3292. L0025ac:
  3293. adda.w (a0),a0
  3294. and.w d4,d3
  3295. or.w d3,d7
  3296. move.w (a1)+,d1
  3297. sub.w d0,d1
  3298. bmi.s L0025c8
  3299. cmp.w (a0)+,d1
  3300. bcc.s L0025c2
  3301. move.b ($30,a0,d1.w),d2
  3302. adda.w d2,a0
  3303. L0025c2:
  3304. move.w (a0)+,d3
  3305. add.w (a0)+,d0
  3306. bra.s L0025da
  3307. L0025c8:
  3308. neg.w d1
  3309. cmp.w (a0)+,d1
  3310. bcc.s L0025d4
  3311. move.b ($30,a0,d1.w),d2
  3312. adda.w d2,a0
  3313. L0025d4:
  3314. move.w a2,d3
  3315. or.w (a0)+,d3
  3316. sub.w (a0)+,d0
  3317. L0025da:
  3318. adda.w (a0),a0
  3319. and.w d5,d3
  3320. or.w d3,d7
  3321. move.l d7,(a6)+
  3322. move.l a3,d7
  3323. move.w (a1)+,d1
  3324. sub.w d0,d1
  3325. bmi.s L0025fa
  3326. cmp.w (a0)+,d1
  3327. bcc.s L0025f4
  3328. move.b ($30,a0,d1.w),d2
  3329. adda.w d2,a0
  3330. L0025f4:
  3331. move.w (a0)+,d3
  3332. add.w (a0)+,d0
  3333. bra.s L00260c
  3334. L0025fa:
  3335. neg.w d1
  3336. cmp.w (a0)+,d1
  3337. bcc.s L002606
  3338. move.b ($30,a0,d1.w),d2
  3339. adda.w d2,a0
  3340. L002606:
  3341. move.w a2,d3
  3342. or.w (a0)+,d3
  3343. sub.w (a0)+,d0
  3344. L00260c:
  3345. adda.w (a0),a0
  3346. and.w d3,d7
  3347. move.w (a1)+,d1
  3348. sub.w d0,d1
  3349. bmi.s L002626
  3350. cmp.w (a0)+,d1
  3351. bcc.s L002620
  3352. move.b ($30,a0,d1.w),d2
  3353. adda.w d2,a0
  3354. L002620:
  3355. move.w (a0)+,d3
  3356. add.w (a0)+,d0
  3357. bra.s L002638
  3358. L002626:
  3359. neg.w d1
  3360. cmp.w (a0)+,d1
  3361. bcc.s L002632
  3362. move.b ($30,a0,d1.w),d2
  3363. adda.w d2,a0
  3364. L002632:
  3365. move.w a2,d3
  3366. or.w (a0)+,d3
  3367. sub.w (a0)+,d0
  3368. L002638:
  3369. adda.w (a0),a0
  3370. and.w d6,d3
  3371. or.w d3,d7
  3372. move.w (a1)+,d1
  3373. sub.w d0,d1
  3374. bmi.s L002654
  3375. cmp.w (a0)+,d1
  3376. bcc.s L00264e
  3377. move.b ($30,a0,d1.w),d2
  3378. adda.w d2,a0
  3379. L00264e:
  3380. move.w (a0)+,d3
  3381. add.w (a0)+,d0
  3382. bra.s L002666
  3383. L002654:
  3384. neg.w d1
  3385. cmp.w (a0)+,d1
  3386. bcc.s L002660
  3387. move.b ($30,a0,d1.w),d2
  3388. adda.w d2,a0
  3389. L002660:
  3390. move.w a2,d3
  3391. or.w (a0)+,d3
  3392. sub.w (a0)+,d0
  3393. L002666:
  3394. adda.w (a0),a0
  3395. and.w d4,d3
  3396. or.w d3,d7
  3397. move.w (a1)+,d1
  3398. sub.w d0,d1
  3399. bmi.s L002682
  3400. cmp.w (a0)+,d1
  3401. bcc.s L00267c
  3402. move.b ($30,a0,d1.w),d2
  3403. adda.w d2,a0
  3404. L00267c:
  3405. move.w (a0)+,d3
  3406. add.w (a0)+,d0
  3407. bra.s L002694
  3408. L002682:
  3409. neg.w d1
  3410. cmp.w (a0)+,d1
  3411. bcc.s L00268e
  3412. move.b ($30,a0,d1.w),d2
  3413. adda.w d2,a0
  3414. L00268e:
  3415. move.w a2,d3
  3416. or.w (a0)+,d3
  3417. sub.w (a0)+,d0
  3418. L002694:
  3419. adda.w (a0),a0
  3420. and.w d5,d3
  3421. or.w d3,d7
  3422. swap.w d7
  3423. move.w (a1)+,d1
  3424. sub.w d0,d1
  3425. bmi.s L0026b2
  3426. cmp.w (a0)+,d1
  3427. bcc.s L0026ac
  3428. move.b ($30,a0,d1.w),d2
  3429. adda.w d2,a0
  3430. L0026ac:
  3431. move.w (a0)+,d3
  3432. add.w (a0)+,d0
  3433. bra.s L0026c4
  3434. L0026b2:
  3435. neg.w d1
  3436. cmp.w (a0)+,d1
  3437. bcc.s L0026be
  3438. move.b ($30,a0,d1.w),d2
  3439. adda.w d2,a0
  3440. L0026be:
  3441. move.w a2,d3
  3442. or.w (a0)+,d3
  3443. sub.w (a0)+,d0
  3444. L0026c4:
  3445. adda.w (a0),a0
  3446. and.w d3,d7
  3447. move.w (a1)+,d1
  3448. sub.w d0,d1
  3449. bmi.s L0026de
  3450. cmp.w (a0)+,d1
  3451. bcc.s L0026d8
  3452. move.b ($30,a0,d1.w),d2
  3453. adda.w d2,a0
  3454. L0026d8:
  3455. move.w (a0)+,d3
  3456. add.w (a0)+,d0
  3457. bra.s L0026f0
  3458. L0026de:
  3459. neg.w d1
  3460. cmp.w (a0)+,d1
  3461. bcc.s L0026ea
  3462. move.b ($30,a0,d1.w),d2
  3463. adda.w d2,a0
  3464. L0026ea:
  3465. move.w a2,d3
  3466. or.w (a0)+,d3
  3467. sub.w (a0)+,d0
  3468. L0026f0:
  3469. adda.w (a0),a0
  3470. and.w d6,d3
  3471. or.w d3,d7
  3472. move.w (a1)+,d1
  3473. sub.w d0,d1
  3474. bmi.s L00270c
  3475. cmp.w (a0)+,d1
  3476. bcc.s L002706
  3477. move.b ($30,a0,d1.w),d2
  3478. adda.w d2,a0
  3479. L002706:
  3480. move.w (a0)+,d3
  3481. add.w (a0)+,d0
  3482. bra.s L00271e
  3483. L00270c:
  3484. neg.w d1
  3485. cmp.w (a0)+,d1
  3486. bcc.s L002718
  3487. move.b ($30,a0,d1.w),d2
  3488. adda.w d2,a0
  3489. L002718:
  3490. move.w a2,d3
  3491. or.w (a0)+,d3
  3492. sub.w (a0)+,d0
  3493. L00271e:
  3494. adda.w (a0),a0
  3495. and.w d4,d3
  3496. or.w d3,d7
  3497. move.w (a1)+,d1
  3498. sub.w d0,d1
  3499. bmi.s L00273a
  3500. cmp.w (a0)+,d1
  3501. bcc.s L002734
  3502. move.b ($30,a0,d1.w),d2
  3503. adda.w d2,a0
  3504. L002734:
  3505. move.w (a0)+,d3
  3506. add.w (a0)+,d0
  3507. bra.s L00274c
  3508. L00273a:
  3509. neg.w d1
  3510. cmp.w (a0)+,d1
  3511. bcc.s L002746
  3512. move.b ($30,a0,d1.w),d2
  3513. adda.w d2,a0
  3514. L002746:
  3515. move.w a2,d3
  3516. or.w (a0)+,d3
  3517. sub.w (a0)+,d0
  3518. L00274c:
  3519. adda.w (a0),a0
  3520. and.w d5,d3
  3521. or.w d3,d7
  3522. move.l d7,(a6)+
  3523. move.l a3,d7
  3524. move.w (a1)+,d1
  3525. sub.w d0,d1
  3526. bmi.s L00276c
  3527. cmp.w (a0)+,d1
  3528. bcc.s L002766
  3529. move.b ($30,a0,d1.w),d2
  3530. adda.w d2,a0
  3531. L002766:
  3532. move.w (a0)+,d3
  3533. add.w (a0)+,d0
  3534. bra.s L00277e
  3535. L00276c:
  3536. neg.w d1
  3537. cmp.w (a0)+,d1
  3538. bcc.s L002778
  3539. move.b ($30,a0,d1.w),d2
  3540. adda.w d2,a0
  3541. L002778:
  3542. move.w a2,d3
  3543. or.w (a0)+,d3
  3544. sub.w (a0)+,d0
  3545. L00277e:
  3546. adda.w (a0),a0
  3547. and.w d3,d7
  3548. move.w (a1)+,d1
  3549. sub.w d0,d1
  3550. bmi.s L002798
  3551. cmp.w (a0)+,d1
  3552. bcc.s L002792
  3553. move.b ($30,a0,d1.w),d2
  3554. adda.w d2,a0
  3555. L002792:
  3556. move.w (a0)+,d3
  3557. add.w (a0)+,d0
  3558. bra.s L0027aa
  3559. L002798:
  3560. neg.w d1
  3561. cmp.w (a0)+,d1
  3562. bcc.s L0027a4
  3563. move.b ($30,a0,d1.w),d2
  3564. adda.w d2,a0
  3565. L0027a4:
  3566. move.w a2,d3
  3567. or.w (a0)+,d3
  3568. sub.w (a0)+,d0
  3569. L0027aa:
  3570. adda.w (a0),a0
  3571. and.w d6,d3
  3572. or.w d3,d7
  3573. move.w (a1)+,d1
  3574. sub.w d0,d1
  3575. bmi.s L0027c6
  3576. cmp.w (a0)+,d1
  3577. bcc.s L0027c0
  3578. move.b ($30,a0,d1.w),d2
  3579. adda.w d2,a0
  3580. L0027c0:
  3581. move.w (a0)+,d3
  3582. add.w (a0)+,d0
  3583. bra.s L0027d8
  3584. L0027c6:
  3585. neg.w d1
  3586. cmp.w (a0)+,d1
  3587. bcc.s L0027d2
  3588. move.b ($30,a0,d1.w),d2
  3589. adda.w d2,a0
  3590. L0027d2:
  3591. move.w a2,d3
  3592. or.w (a0)+,d3
  3593. sub.w (a0)+,d0
  3594. L0027d8:
  3595. adda.w (a0),a0
  3596. and.w d4,d3
  3597. or.w d3,d7
  3598. move.w (a1)+,d1
  3599. sub.w d0,d1
  3600. bmi.s L0027f4
  3601. cmp.w (a0)+,d1
  3602. bcc.s L0027ee
  3603. move.b ($30,a0,d1.w),d2
  3604. adda.w d2,a0
  3605. L0027ee:
  3606. move.w (a0)+,d3
  3607. add.w (a0)+,d0
  3608. bra.s L002806
  3609. L0027f4:
  3610. neg.w d1
  3611. cmp.w (a0)+,d1
  3612. bcc.s L002800
  3613. move.b ($30,a0,d1.w),d2
  3614. adda.w d2,a0
  3615. L002800:
  3616. move.w a2,d3
  3617. or.w (a0)+,d3
  3618. sub.w (a0)+,d0
  3619. L002806:
  3620. adda.w (a0),a0
  3621. and.w d5,d3
  3622. or.w d3,d7
  3623. swap.w d7
  3624. move.w (a1)+,d1
  3625. sub.w d0,d1
  3626. bmi.s L002824
  3627. cmp.w (a0)+,d1
  3628. bcc.s L00281e
  3629. move.b ($30,a0,d1.w),d2
  3630. adda.w d2,a0
  3631. L00281e:
  3632. move.w (a0)+,d3
  3633. add.w (a0)+,d0
  3634. bra.s L002836
  3635. L002824:
  3636. neg.w d1
  3637. cmp.w (a0)+,d1
  3638. bcc.s L002830
  3639. move.b ($30,a0,d1.w),d2
  3640. adda.w d2,a0
  3641. L002830:
  3642. move.w a2,d3
  3643. or.w (a0)+,d3
  3644. sub.w (a0)+,d0
  3645. L002836:
  3646. adda.w (a0),a0
  3647. and.w d3,d7
  3648. move.w (a1)+,d1
  3649. sub.w d0,d1
  3650. bmi.s L002850
  3651. cmp.w (a0)+,d1
  3652. bcc.s L00284a
  3653. move.b ($30,a0,d1.w),d2
  3654. adda.w d2,a0
  3655. L00284a:
  3656. move.w (a0)+,d3
  3657. add.w (a0)+,d0
  3658. bra.s L002862
  3659. L002850:
  3660. neg.w d1
  3661. cmp.w (a0)+,d1
  3662. bcc.s L00285c
  3663. move.b ($30,a0,d1.w),d2
  3664. adda.w d2,a0
  3665. L00285c:
  3666. move.w a2,d3
  3667. or.w (a0)+,d3
  3668. sub.w (a0)+,d0
  3669. L002862:
  3670. adda.w (a0),a0
  3671. and.w d6,d3
  3672. or.w d3,d7
  3673. move.w (a1)+,d1
  3674. sub.w d0,d1
  3675. bmi.s L00287e
  3676. cmp.w (a0)+,d1
  3677. bcc.s L002878
  3678. move.b ($30,a0,d1.w),d2
  3679. adda.w d2,a0
  3680. L002878:
  3681. move.w (a0)+,d3
  3682. add.w (a0)+,d0
  3683. bra.s L002890
  3684. L00287e:
  3685. neg.w d1
  3686. cmp.w (a0)+,d1
  3687. bcc.s L00288a
  3688. move.b ($30,a0,d1.w),d2
  3689. adda.w d2,a0
  3690. L00288a:
  3691. move.w a2,d3
  3692. or.w (a0)+,d3
  3693. sub.w (a0)+,d0
  3694. L002890:
  3695. adda.w (a0),a0
  3696. and.w d4,d3
  3697. or.w d3,d7
  3698. move.w (a1)+,d1
  3699. sub.w d0,d1
  3700. bmi.s L0028ac
  3701. cmp.w (a0)+,d1
  3702. bcc.s L0028a6
  3703. move.b ($30,a0,d1.w),d2
  3704. adda.w d2,a0
  3705. L0028a6:
  3706. move.w (a0)+,d3
  3707. add.w (a0)+,d0
  3708. bra.s L0028be
  3709. L0028ac:
  3710. neg.w d1
  3711. cmp.w (a0)+,d1
  3712. bcc.s L0028b8
  3713. move.b ($30,a0,d1.w),d2
  3714. adda.w d2,a0
  3715. L0028b8:
  3716. move.w a2,d3
  3717. or.w (a0)+,d3
  3718. sub.w (a0)+,d0
  3719. L0028be:
  3720. adda.w (a0),a0
  3721. and.w d5,d3
  3722. or.w d3,d7
  3723. move.l d7,(a6)+
  3724. move.l a3,d7
  3725. move.w (a1)+,d1
  3726. sub.w d0,d1
  3727. bmi.s L0028de
  3728. cmp.w (a0)+,d1
  3729. bcc.s L0028d8
  3730. move.b ($30,a0,d1.w),d2
  3731. adda.w d2,a0
  3732. L0028d8:
  3733. move.w (a0)+,d3
  3734. add.w (a0)+,d0
  3735. bra.s L0028f0
  3736. L0028de:
  3737. neg.w d1
  3738. cmp.w (a0)+,d1
  3739. bcc.s L0028ea
  3740. move.b ($30,a0,d1.w),d2
  3741. adda.w d2,a0
  3742. L0028ea:
  3743. move.w a2,d3
  3744. or.w (a0)+,d3
  3745. sub.w (a0)+,d0
  3746. L0028f0:
  3747. adda.w (a0),a0
  3748. and.w d3,d7
  3749. move.w (a1)+,d1
  3750. sub.w d0,d1
  3751. bmi.s L00290a
  3752. cmp.w (a0)+,d1
  3753. bcc.s L002904
  3754. move.b ($30,a0,d1.w),d2
  3755. adda.w d2,a0
  3756. L002904:
  3757. move.w (a0)+,d3
  3758. add.w (a0)+,d0
  3759. bra.s L00291c
  3760. L00290a:
  3761. neg.w d1
  3762. cmp.w (a0)+,d1
  3763. bcc.s L002916
  3764. move.b ($30,a0,d1.w),d2
  3765. adda.w d2,a0
  3766. L002916:
  3767. move.w a2,d3
  3768. or.w (a0)+,d3
  3769. sub.w (a0)+,d0
  3770. L00291c:
  3771. adda.w (a0),a0
  3772. and.w d6,d3
  3773. or.w d3,d7
  3774. move.w (a1)+,d1
  3775. sub.w d0,d1
  3776. bmi.s L002938
  3777. cmp.w (a0)+,d1
  3778. bcc.s L002932
  3779. move.b ($30,a0,d1.w),d2
  3780. adda.w d2,a0
  3781. L002932:
  3782. move.w (a0)+,d3
  3783. add.w (a0)+,d0
  3784. bra.s L00294a
  3785. L002938:
  3786. neg.w d1
  3787. cmp.w (a0)+,d1
  3788. bcc.s L002944
  3789. move.b ($30,a0,d1.w),d2
  3790. adda.w d2,a0
  3791. L002944:
  3792. move.w a2,d3
  3793. or.w (a0)+,d3
  3794. sub.w (a0)+,d0
  3795. L00294a:
  3796. adda.w (a0),a0
  3797. and.w d4,d3
  3798. or.w d3,d7
  3799. move.w (a1)+,d1
  3800. sub.w d0,d1
  3801. bmi.s L002966
  3802. cmp.w (a0)+,d1
  3803. bcc.s L002960
  3804. move.b ($30,a0,d1.w),d2
  3805. adda.w d2,a0
  3806. L002960:
  3807. move.w (a0)+,d3
  3808. add.w (a0)+,d0
  3809. bra.s L002978
  3810. L002966:
  3811. neg.w d1
  3812. cmp.w (a0)+,d1
  3813. bcc.s L002972
  3814. move.b ($30,a0,d1.w),d2
  3815. adda.w d2,a0
  3816. L002972:
  3817. move.w a2,d3
  3818. or.w (a0)+,d3
  3819. sub.w (a0)+,d0
  3820. L002978:
  3821. adda.w (a0),a0
  3822. and.w d5,d3
  3823. or.w d3,d7
  3824. swap.w d7
  3825. move.w (a1)+,d1
  3826. sub.w d0,d1
  3827. bmi.s L002996
  3828. cmp.w (a0)+,d1
  3829. bcc.s L002990
  3830. move.b ($30,a0,d1.w),d2
  3831. adda.w d2,a0
  3832. L002990:
  3833. move.w (a0)+,d3
  3834. add.w (a0)+,d0
  3835. bra.s L0029a8
  3836. L002996:
  3837. neg.w d1
  3838. cmp.w (a0)+,d1
  3839. bcc.s L0029a2
  3840. move.b ($30,a0,d1.w),d2
  3841. adda.w d2,a0
  3842. L0029a2:
  3843. move.w a2,d3
  3844. or.w (a0)+,d3
  3845. sub.w (a0)+,d0
  3846. L0029a8:
  3847. adda.w (a0),a0
  3848. and.w d3,d7
  3849. move.w (a1)+,d1
  3850. sub.w d0,d1
  3851. bmi.s L0029c2
  3852. cmp.w (a0)+,d1
  3853. bcc.s L0029bc
  3854. move.b ($30,a0,d1.w),d2
  3855. adda.w d2,a0
  3856. L0029bc:
  3857. move.w (a0)+,d3
  3858. add.w (a0)+,d0
  3859. bra.s L0029d4
  3860. L0029c2:
  3861. neg.w d1
  3862. cmp.w (a0)+,d1
  3863. bcc.s L0029ce
  3864. move.b ($30,a0,d1.w),d2
  3865. adda.w d2,a0
  3866. L0029ce:
  3867. move.w a2,d3
  3868. or.w (a0)+,d3
  3869. sub.w (a0)+,d0
  3870. L0029d4:
  3871. adda.w (a0),a0
  3872. and.w d6,d3
  3873. or.w d3,d7
  3874. move.w (a1)+,d1
  3875. sub.w d0,d1
  3876. bmi.s L0029f0
  3877. cmp.w (a0)+,d1
  3878. bcc.s L0029ea
  3879. move.b ($30,a0,d1.w),d2
  3880. adda.w d2,a0
  3881. L0029ea:
  3882. move.w (a0)+,d3
  3883. add.w (a0)+,d0
  3884. bra.s L002a02
  3885. L0029f0:
  3886. neg.w d1
  3887. cmp.w (a0)+,d1
  3888. bcc.s L0029fc
  3889. move.b ($30,a0,d1.w),d2
  3890. adda.w d2,a0
  3891. L0029fc:
  3892. move.w a2,d3
  3893. or.w (a0)+,d3
  3894. sub.w (a0)+,d0
  3895. L002a02:
  3896. adda.w (a0),a0
  3897. and.w d4,d3
  3898. or.w d3,d7
  3899. move.w (a1)+,d1
  3900. sub.w d0,d1
  3901. bmi.s L002a1e
  3902. cmp.w (a0)+,d1
  3903. bcc.s L002a18
  3904. move.b ($30,a0,d1.w),d2
  3905. adda.w d2,a0
  3906. L002a18:
  3907. move.w (a0)+,d3
  3908. add.w (a0)+,d0
  3909. bra.s L002a30
  3910. L002a1e:
  3911. neg.w d1
  3912. cmp.w (a0)+,d1
  3913. bcc.s L002a2a
  3914. move.b ($30,a0,d1.w),d2
  3915. adda.w d2,a0
  3916. L002a2a:
  3917. move.w a2,d3
  3918. or.w (a0)+,d3
  3919. sub.w (a0)+,d0
  3920. L002a30:
  3921. adda.w (a0),a0
  3922. and.w d5,d3
  3923. or.w d3,d7
  3924. move.l d7,(a6)+
  3925. move.l a3,d7
  3926. move.w (a1)+,d1
  3927. sub.w d0,d1
  3928. bmi.s L002a50
  3929. cmp.w (a0)+,d1
  3930. bcc.s L002a4a
  3931. move.b ($30,a0,d1.w),d2
  3932. adda.w d2,a0
  3933. L002a4a:
  3934. move.w (a0)+,d3
  3935. add.w (a0)+,d0
  3936. bra.s L002a62
  3937. L002a50:
  3938. neg.w d1
  3939. cmp.w (a0)+,d1
  3940. bcc.s L002a5c
  3941. move.b ($30,a0,d1.w),d2
  3942. adda.w d2,a0
  3943. L002a5c:
  3944. move.w a2,d3
  3945. or.w (a0)+,d3
  3946. sub.w (a0)+,d0
  3947. L002a62:
  3948. adda.w (a0),a0
  3949. and.w d3,d7
  3950. move.w (a1)+,d1
  3951. sub.w d0,d1
  3952. bmi.s L002a7c
  3953. cmp.w (a0)+,d1
  3954. bcc.s L002a76
  3955. move.b ($30,a0,d1.w),d2
  3956. adda.w d2,a0
  3957. L002a76:
  3958. move.w (a0)+,d3
  3959. add.w (a0)+,d0
  3960. bra.s L002a8e
  3961. L002a7c:
  3962. neg.w d1
  3963. cmp.w (a0)+,d1
  3964. bcc.s L002a88
  3965. move.b ($30,a0,d1.w),d2
  3966. adda.w d2,a0
  3967. L002a88:
  3968. move.w a2,d3
  3969. or.w (a0)+,d3
  3970. sub.w (a0)+,d0
  3971. L002a8e:
  3972. adda.w (a0),a0
  3973. and.w d6,d3
  3974. or.w d3,d7
  3975. move.w (a1)+,d1
  3976. sub.w d0,d1
  3977. bmi.s L002aaa
  3978. cmp.w (a0)+,d1
  3979. bcc.s L002aa4
  3980. move.b ($30,a0,d1.w),d2
  3981. adda.w d2,a0
  3982. L002aa4:
  3983. move.w (a0)+,d3
  3984. add.w (a0)+,d0
  3985. bra.s L002abc
  3986. L002aaa:
  3987. neg.w d1
  3988. cmp.w (a0)+,d1
  3989. bcc.s L002ab6
  3990. move.b ($30,a0,d1.w),d2
  3991. adda.w d2,a0
  3992. L002ab6:
  3993. move.w a2,d3
  3994. or.w (a0)+,d3
  3995. sub.w (a0)+,d0
  3996. L002abc:
  3997. adda.w (a0),a0
  3998. and.w d4,d3
  3999. or.w d3,d7
  4000. move.w (a1)+,d1
  4001. sub.w d0,d1
  4002. bmi.s L002ad8
  4003. cmp.w (a0)+,d1
  4004. bcc.s L002ad2
  4005. move.b ($30,a0,d1.w),d2
  4006. adda.w d2,a0
  4007. L002ad2:
  4008. move.w (a0)+,d3
  4009. add.w (a0)+,d0
  4010. bra.s L002aea
  4011. L002ad8:
  4012. neg.w d1
  4013. cmp.w (a0)+,d1
  4014. bcc.s L002ae4
  4015. move.b ($30,a0,d1.w),d2
  4016. adda.w d2,a0
  4017. L002ae4:
  4018. move.w a2,d3
  4019. or.w (a0)+,d3
  4020. sub.w (a0)+,d0
  4021. L002aea:
  4022. adda.w (a0),a0
  4023. and.w d5,d3
  4024. or.w d3,d7
  4025. swap.w d7
  4026. move.w (a1)+,d1
  4027. sub.w d0,d1
  4028. bmi.s L002b08
  4029. cmp.w (a0)+,d1
  4030. bcc.s L002b02
  4031. move.b ($30,a0,d1.w),d2
  4032. adda.w d2,a0
  4033. L002b02:
  4034. move.w (a0)+,d3
  4035. add.w (a0)+,d0
  4036. bra.s L002b1a
  4037. L002b08:
  4038. neg.w d1
  4039. cmp.w (a0)+,d1
  4040. bcc.s L002b14
  4041. move.b ($30,a0,d1.w),d2
  4042. adda.w d2,a0
  4043. L002b14:
  4044. move.w a2,d3
  4045. or.w (a0)+,d3
  4046. sub.w (a0)+,d0
  4047. L002b1a:
  4048. adda.w (a0),a0
  4049. and.w d3,d7
  4050. move.w (a1)+,d1
  4051. sub.w d0,d1
  4052. bmi.s L002b34
  4053. cmp.w (a0)+,d1
  4054. bcc.s L002b2e
  4055. move.b ($30,a0,d1.w),d2
  4056. adda.w d2,a0
  4057. L002b2e:
  4058. move.w (a0)+,d3
  4059. add.w (a0)+,d0
  4060. bra.s L002b46
  4061. L002b34:
  4062. neg.w d1
  4063. cmp.w (a0)+,d1
  4064. bcc.s L002b40
  4065. move.b ($30,a0,d1.w),d2
  4066. adda.w d2,a0
  4067. L002b40:
  4068. move.w a2,d3
  4069. or.w (a0)+,d3
  4070. sub.w (a0)+,d0
  4071. L002b46:
  4072. adda.w (a0),a0
  4073. and.w d6,d3
  4074. or.w d3,d7
  4075. move.w (a1)+,d1
  4076. sub.w d0,d1
  4077. bmi.s L002b62
  4078. cmp.w (a0)+,d1
  4079. bcc.s L002b5c
  4080. move.b ($30,a0,d1.w),d2
  4081. adda.w d2,a0
  4082. L002b5c:
  4083. move.w (a0)+,d3
  4084. add.w (a0)+,d0
  4085. bra.s L002b74
  4086. L002b62:
  4087. neg.w d1
  4088. cmp.w (a0)+,d1
  4089. bcc.s L002b6e
  4090. move.b ($30,a0,d1.w),d2
  4091. adda.w d2,a0
  4092. L002b6e:
  4093. move.w a2,d3
  4094. or.w (a0)+,d3
  4095. sub.w (a0)+,d0
  4096. L002b74:
  4097. adda.w (a0),a0
  4098. and.w d4,d3
  4099. or.w d3,d7
  4100. move.w (a1)+,d1
  4101. sub.w d0,d1
  4102. bmi.s L002b90
  4103. cmp.w (a0)+,d1
  4104. bcc.s L002b8a
  4105. move.b ($30,a0,d1.w),d2
  4106. adda.w d2,a0
  4107. L002b8a:
  4108. move.w (a0)+,d3
  4109. add.w (a0)+,d0
  4110. bra.s L002ba2
  4111. L002b90:
  4112. neg.w d1
  4113. cmp.w (a0)+,d1
  4114. bcc.s L002b9c
  4115. move.b ($30,a0,d1.w),d2
  4116. adda.w d2,a0
  4117. L002b9c:
  4118. move.w a2,d3
  4119. or.w (a0)+,d3
  4120. sub.w (a0)+,d0
  4121. L002ba2:
  4122. adda.w (a0),a0
  4123. and.w d5,d3
  4124. or.w d3,d7
  4125. move.l d7,(a6)+
  4126. move.l a3,d7
  4127. move.w (a1)+,d1
  4128. sub.w d0,d1
  4129. bmi.s L002bc2
  4130. cmp.w (a0)+,d1
  4131. bcc.s L002bbc
  4132. move.b ($30,a0,d1.w),d2
  4133. adda.w d2,a0
  4134. L002bbc:
  4135. move.w (a0)+,d3
  4136. add.w (a0)+,d0
  4137. bra.s L002bd4
  4138. L002bc2:
  4139. neg.w d1
  4140. cmp.w (a0)+,d1
  4141. bcc.s L002bce
  4142. move.b ($30,a0,d1.w),d2
  4143. adda.w d2,a0
  4144. L002bce:
  4145. move.w a2,d3
  4146. or.w (a0)+,d3
  4147. sub.w (a0)+,d0
  4148. L002bd4:
  4149. adda.w (a0),a0
  4150. and.w d3,d7
  4151. move.w (a1)+,d1
  4152. sub.w d0,d1
  4153. bmi.s L002bee
  4154. cmp.w (a0)+,d1
  4155. bcc.s L002be8
  4156. move.b ($30,a0,d1.w),d2
  4157. adda.w d2,a0
  4158. L002be8:
  4159. move.w (a0)+,d3
  4160. add.w (a0)+,d0
  4161. bra.s L002c00
  4162. L002bee:
  4163. neg.w d1
  4164. cmp.w (a0)+,d1
  4165. bcc.s L002bfa
  4166. move.b ($30,a0,d1.w),d2
  4167. adda.w d2,a0
  4168. L002bfa:
  4169. move.w a2,d3
  4170. or.w (a0)+,d3
  4171. sub.w (a0)+,d0
  4172. L002c00:
  4173. adda.w (a0),a0
  4174. and.w d6,d3
  4175. or.w d3,d7
  4176. move.w (a1)+,d1
  4177. sub.w d0,d1
  4178. bmi.s L002c1c
  4179. cmp.w (a0)+,d1
  4180. bcc.s L002c16
  4181. move.b ($30,a0,d1.w),d2
  4182. adda.w d2,a0
  4183. L002c16:
  4184. move.w (a0)+,d3
  4185. add.w (a0)+,d0
  4186. bra.s L002c2e
  4187. L002c1c:
  4188. neg.w d1
  4189. cmp.w (a0)+,d1
  4190. bcc.s L002c28
  4191. move.b ($30,a0,d1.w),d2
  4192. adda.w d2,a0
  4193. L002c28:
  4194. move.w a2,d3
  4195. or.w (a0)+,d3
  4196. sub.w (a0)+,d0
  4197. L002c2e:
  4198. adda.w (a0),a0
  4199. and.w d4,d3
  4200. or.w d3,d7
  4201. move.w (a1)+,d1
  4202. sub.w d0,d1
  4203. bmi.s L002c4a
  4204. cmp.w (a0)+,d1
  4205. bcc.s L002c44
  4206. move.b ($30,a0,d1.w),d2
  4207. adda.w d2,a0
  4208. L002c44:
  4209. move.w (a0)+,d3
  4210. add.w (a0)+,d0
  4211. bra.s L002c5c
  4212. L002c4a:
  4213. neg.w d1
  4214. cmp.w (a0)+,d1
  4215. bcc.s L002c56
  4216. move.b ($30,a0,d1.w),d2
  4217. adda.w d2,a0
  4218. L002c56:
  4219. move.w a2,d3
  4220. or.w (a0)+,d3
  4221. sub.w (a0)+,d0
  4222. L002c5c:
  4223. adda.w (a0),a0
  4224. and.w d5,d3
  4225. or.w d3,d7
  4226. swap.w d7
  4227. move.w (a1)+,d1
  4228. sub.w d0,d1
  4229. bmi.s L002c7a
  4230. cmp.w (a0)+,d1
  4231. bcc.s L002c74
  4232. move.b ($30,a0,d1.w),d2
  4233. adda.w d2,a0
  4234. L002c74:
  4235. move.w (a0)+,d3
  4236. add.w (a0)+,d0
  4237. bra.s L002c8c
  4238. L002c7a:
  4239. neg.w d1
  4240. cmp.w (a0)+,d1
  4241. bcc.s L002c86
  4242. move.b ($30,a0,d1.w),d2
  4243. adda.w d2,a0
  4244. L002c86:
  4245. move.w a2,d3
  4246. or.w (a0)+,d3
  4247. sub.w (a0)+,d0
  4248. L002c8c:
  4249. adda.w (a0),a0
  4250. and.w d3,d7
  4251. move.w (a1)+,d1
  4252. sub.w d0,d1
  4253. bmi.s L002ca6
  4254. cmp.w (a0)+,d1
  4255. bcc.s L002ca0
  4256. move.b ($30,a0,d1.w),d2
  4257. adda.w d2,a0
  4258. L002ca0:
  4259. move.w (a0)+,d3
  4260. add.w (a0)+,d0
  4261. bra.s L002cb8
  4262. L002ca6:
  4263. neg.w d1
  4264. cmp.w (a0)+,d1
  4265. bcc.s L002cb2
  4266. move.b ($30,a0,d1.w),d2
  4267. adda.w d2,a0
  4268. L002cb2:
  4269. move.w a2,d3
  4270. or.w (a0)+,d3
  4271. sub.w (a0)+,d0
  4272. L002cb8:
  4273. adda.w (a0),a0
  4274. and.w d6,d3
  4275. or.w d3,d7
  4276. move.w (a1)+,d1
  4277. sub.w d0,d1
  4278. bmi.s L002cd4
  4279. cmp.w (a0)+,d1
  4280. bcc.s L002cce
  4281. move.b ($30,a0,d1.w),d2
  4282. adda.w d2,a0
  4283. L002cce:
  4284. move.w (a0)+,d3
  4285. add.w (a0)+,d0
  4286. bra.s L002ce6
  4287. L002cd4:
  4288. neg.w d1
  4289. cmp.w (a0)+,d1
  4290. bcc.s L002ce0
  4291. move.b ($30,a0,d1.w),d2
  4292. adda.w d2,a0
  4293. L002ce0:
  4294. move.w a2,d3
  4295. or.w (a0)+,d3
  4296. sub.w (a0)+,d0
  4297. L002ce6:
  4298. adda.w (a0),a0
  4299. and.w d4,d3
  4300. or.w d3,d7
  4301. move.w (a1)+,d1
  4302. sub.w d0,d1
  4303. bmi.s L002d02
  4304. cmp.w (a0)+,d1
  4305. bcc.s L002cfc
  4306. move.b ($30,a0,d1.w),d2
  4307. adda.w d2,a0
  4308. L002cfc:
  4309. move.w (a0)+,d3
  4310. add.w (a0)+,d0
  4311. bra.s L002d14
  4312. L002d02:
  4313. neg.w d1
  4314. cmp.w (a0)+,d1
  4315. bcc.s L002d0e
  4316. move.b ($30,a0,d1.w),d2
  4317. adda.w d2,a0
  4318. L002d0e:
  4319. move.w a2,d3
  4320. or.w (a0)+,d3
  4321. sub.w (a0)+,d0
  4322. L002d14:
  4323. adda.w (a0),a0
  4324. and.w d5,d3
  4325. or.w d3,d7
  4326. move.l d7,(a6)+
  4327. move.w (a4),d2
  4328. move.w d0,-(a4)
  4329. move.l a0,-(a4)
  4330. L002d22:
  4331. lea.l (L001942,pc),a5
  4332. move.w d2,d0
  4333. swap.w d0
  4334. move.w d2,d0
  4335. move.l d0,d1
  4336. move.l d0,d2
  4337. move.l d0,d3
  4338. move.l d0,d4
  4339. move.l d0,d5
  4340. move.l d0,d6
  4341. move.l d0,d7
  4342. movea.l d0,a0
  4343. movea.l d0,a1
  4344. movea.l d0,a2
  4345. movea.l d0,a3
  4346. movem.l d0-d7/a0-a3,-(a5)
  4347. movem.l d0-d7/a0-a3,-(a5)
  4348. movem.l d0-d7/a0-a3,-(a5)
  4349. movem.l d0-d7/a0-a3,-(a5)
  4350. move.b (L001949,pc),d0
  4351. bne.s L002da2
  4352. L002d58:
  4353. lea.l (L001682,pc),a6
  4354. moveq.l #$07,d7
  4355. L002d5e:
  4356. movem.l (a6),d0/d6/a0-a4
  4357. tst.l d0
  4358. ble.s L002d74
  4359. sub.l a3,d0
  4360. ble.s L002dac
  4361. jsr (a4)
  4362. movem.l d0/d6/a0-a1,(a6)
  4363. L002d70:
  4364. bset.l #$1f,d7
  4365. L002d74:
  4366. lea.l ($0040,a6),a6
  4367. dbra.w d7,L002d5e
  4368. ori.w #$0700,sr
  4369. tst.l d7
  4370. spl.b (L00195e)
  4371. move.l (sp)+,d0
  4372. movea.l #$00e88015,a0
  4373. movep.w d0,(-$0002,a0)
  4374. subq.w #1,(L001952)
  4375. bmi.w L0019ce
  4376. bra.w L001982
  4377. L002da2:
  4378. move.w #$0018,($00e82200)
  4379. bra.s L002d58
  4380. L002dac:
  4381. add.l a3,d0
  4382. lea.l (-$00c0,sp),sp
  4383. movea.l sp,a5
  4384. cmpi.w #$0005,($001c,a6)
  4385. bcc.w L002e3e
  4386. move.w a3,d1
  4387. subq.w #1,d1
  4388. L002dc2:
  4389. move.b (a0)+,(a5)+
  4390. subq.l #1,d0
  4391. bgt.s L002e04
  4392. move.w ($0020,a6),d0
  4393. beq.s L002e20
  4394. subq.w #1,d0
  4395. bne.s L002de0
  4396. subq.w #1,($0022,a6)
  4397. bls.s L002e20
  4398. move.l a1,-(sp)
  4399. movea.l ($0024,a6),a1
  4400. bra.s L002df6
  4401. L002de0:
  4402. move.l a1,-(sp)
  4403. movea.l ($0024,a6),a1
  4404. move.l (a1),d0
  4405. bne.s L002dee
  4406. L002dea:
  4407. movea.l (sp)+,a1
  4408. bra.s L002e20
  4409. L002dee:
  4410. btst.l #$01,d0
  4411. bne.s L002dea
  4412. movea.l d0,a1
  4413. L002df6:
  4414. movea.l (a1)+,a0
  4415. moveq.l #$00,d0
  4416. move.w (a1)+,d0
  4417. beq.s L002dea
  4418. move.l a1,($0024,a6)
  4419. movea.l (sp)+,a1
  4420. L002e04:
  4421. dbra.w d1,L002dc2
  4422. L002e08:
  4423. movea.l a0,a5
  4424. movea.l sp,a0
  4425. jsr (a4)
  4426. lea.l ($00c0,sp),sp
  4427. movea.l a5,a0
  4428. movem.l d0/d6/a0-a1,(a6)
  4429. bra.w L002d70
  4430. L002e1c:
  4431. move.b #$88,(a5)+
  4432. L002e20:
  4433. dbra.w d1,L002e1c
  4434. L002e24:
  4435. movea.l sp,a0
  4436. jsr (a4)
  4437. lea.l ($00c0,sp),sp
  4438. add.w d6,(L00195a)
  4439. moveq.l #$00,d0
  4440. move.l d0,(a6)
  4441. move.l d0,($0004,a6)
  4442. bra.w L002d70
  4443. L002e3e:
  4444. bhi.s L002ea4
  4445. moveq.l #$5f,d1 ;'_'
  4446. L002e42:
  4447. move.w (a0)+,(a5)+
  4448. subq.l #2,d0
  4449. bgt.s L002e92
  4450. move.w ($0020,a6),d0
  4451. beq.s L002e9e
  4452. subq.w #1,d0
  4453. bne.s L002e60
  4454. subq.w #1,($0022,a6)
  4455. bls.s L002e9e
  4456. move.l a1,-(sp)
  4457. movea.l ($0024,a6),a1
  4458. bra.s L002e76
  4459. L002e60:
  4460. move.l a1,-(sp)
  4461. movea.l ($0024,a6),a1
  4462. move.l (a1),d0
  4463. bne.s L002e6e
  4464. L002e6a:
  4465. movea.l (sp)+,a1
  4466. bra.s L002e9e
  4467. L002e6e:
  4468. btst.l #$01,d0
  4469. bne.s L002e6a
  4470. movea.l d0,a1
  4471. L002e76:
  4472. move.l (a1)+,d0
  4473. btst.l #$00,d0
  4474. bne.s L002e6a
  4475. movea.l d0,a0
  4476. moveq.l #$00,d0
  4477. move.w (a1)+,d0
  4478. beq.s L002e6a
  4479. btst.l #$00,d0
  4480. bne.s L002e6a
  4481. move.l a1,($0024,a6)
  4482. movea.l (sp)+,a1
  4483. L002e92:
  4484. dbra.w d1,L002e42
  4485. bra.w L002e08
  4486. L002e9a:
  4487. move.w (-$0002,a5),(a5)+
  4488. L002e9e:
  4489. dbra.w d1,L002e9a
  4490. bra.s L002e24
  4491. L002ea4:
  4492. moveq.l #$5f,d1 ;'_'
  4493. L002ea6:
  4494. move.b (a0)+,(a5)+
  4495. subq.l #1,d0
  4496. bgt.s L002ee8
  4497. move.w ($0020,a6),d0
  4498. beq.s L002ef4
  4499. subq.w #1,d0
  4500. bne.s L002ec4
  4501. subq.w #1,($0022,a6)
  4502. bls.s L002ef4
  4503. move.l a1,-(sp)
  4504. movea.l ($0024,a6),a1
  4505. bra.s L002eda
  4506. L002ec4:
  4507. move.l a1,-(sp)
  4508. movea.l ($0024,a6),a1
  4509. move.l (a1),d0
  4510. bne.s L002ed2
  4511. L002ece:
  4512. movea.l (sp)+,a1
  4513. bra.s L002ef4
  4514. L002ed2:
  4515. btst.l #$01,d0
  4516. bne.s L002ece
  4517. movea.l d0,a1
  4518. L002eda:
  4519. movea.l (a1)+,a0
  4520. moveq.l #$00,d0
  4521. move.w (a1)+,d0
  4522. beq.s L002ece
  4523. move.l a1,($0024,a6)
  4524. movea.l (sp)+,a1
  4525. L002ee8:
  4526. dbra.w d1,L002ea6
  4527. bra.w L002e08
  4528. L002ef0:
  4529. move.b (-$0001,a5),(a5)+
  4530. L002ef4:
  4531. dbra.w d1,L002ef0
  4532. bra.w L002e24
  4533. L002efc:
  4534. lea.l (L001962,pc),a1
  4535. move.w (a1),d6
  4536. beq.w L003028
  4537. bpl.w L001a08
  4538. moveq.l #$00,d0
  4539. move.b d0,(a1)
  4540. subq.b #1,d6
  4541. beq.w L002fe2
  4542. bpl.w L003008
  4543. move.l #$0000ff00,d1
  4544. move.l (L00196a,pc),d0
  4545. cmp.l d1,d0
  4546. bhi.s L002f5c
  4547. st.b (a5)
  4548. move.b #$10,($0007,a5)
  4549. st.b (a5)
  4550. move.l (L001966,pc),($000c,a5)
  4551. move.w d0,($000a,a5)
  4552. move.l #L00157a,($001c,a5)
  4553. move.w #$0080,($001a,a5)
  4554. move.b #$32,($0005,a5) ;'2'
  4555. move.b #$c8,($0007,a5)
  4556. move.b #$01,(a1)
  4557. L002f58:
  4558. bra.w L0019ce
  4559. L002f5c:
  4560. move.l #$00008000,d2
  4561. sub.l d2,d0
  4562. cmp.l d1,d0
  4563. bhi.s L002fa0
  4564. movea.l (L001966,pc),a0
  4565. st.b (a5)
  4566. move.b #$10,($0007,a5)
  4567. st.b (a5)
  4568. move.l a0,($000c,a5)
  4569. move.w d2,($000a,a5)
  4570. adda.l d2,a0
  4571. move.l a0,($001c,a5)
  4572. move.w d0,($001a,a5)
  4573. move.b #$32,($0005,a5) ;'2'
  4574. move.b #$c8,($0007,a5)
  4575. moveq.l #$00,d0
  4576. move.l d0,(L00196a)
  4577. move.w d0,(a1)
  4578. bra.s L002f58
  4579. L002fa0:
  4580. movea.l (L001966,pc),a0
  4581. st.b (a5)
  4582. move.b #$10,($0007,a5)
  4583. st.b (a5)
  4584. move.l a0,($000c,a5)
  4585. move.w d2,($000a,a5)
  4586. adda.l d2,a0
  4587. move.l a0,($001c,a5)
  4588. move.w d2,($001a,a5)
  4589. move.b #$32,($0005,a5) ;'2'
  4590. move.b #$c8,($0007,a5)
  4591. adda.l d2,a0
  4592. sub.l d2,d0
  4593. move.l a0,(L001966)
  4594. move.l d0,(L00196a)
  4595. clr.w (a1)
  4596. bra.w L002f58
  4597. L002fe2:
  4598. st.b (a5)
  4599. move.b #$10,($0007,a5)
  4600. st.b (a5)
  4601. move.l (L001966,pc),($001c,a5)
  4602. move.w (L00196a,pc),($001a,a5)
  4603. move.b #$3a,($0005,a5) ;':'
  4604. move.b #$88,($0007,a5)
  4605. bra.w L002f58
  4606. L003008:
  4607. st.b (a5)
  4608. move.b #$10,($0007,a5)
  4609. st.b (a5)
  4610. move.l (L001966,pc),($001c,a5)
  4611. move.b #$3e,($0005,a5) ;'>'
  4612. move.b #$88,($0007,a5)
  4613. bra.w L002f58
  4614. L003028:
  4615. movea.l (L001966,pc),a0
  4616. move.l (L00196a,pc),d0
  4617. beq.s L003082
  4618. cmp.l #$0000ff00,d0
  4619. bhi.s L003056
  4620. st.b (a5)
  4621. move.l a0,($001c,a5)
  4622. move.w d0,($001a,a5)
  4623. move.b #$48,($0007,a5) ;'H'
  4624. moveq.l #$00,d0
  4625. move.l d0,(L00196a)
  4626. bra.w L0019ce
  4627. L003056:
  4628. move.l #$00008000,d2
  4629. st.b (a5)
  4630. move.l a0,($001c,a5)
  4631. move.w d2,($001a,a5)
  4632. move.b #$48,($0007,a5) ;'H'
  4633. adda.l d2,a0
  4634. sub.l d2,d0
  4635. move.l a0,(L001966)
  4636. move.l d0,(L00196a)
  4637. clr.w (a1)
  4638. bra.w L0019ce
  4639. L003082:
  4640. st.b (a5)
  4641. move.l #L00157a,($001c,a5)
  4642. move.w #$0080,($001a,a5)
  4643. move.b #$48,($0007,a5) ;'H'
  4644. move.b #$01,(a1)
  4645. bra.w L0019ce
  4646. L0030a0:
  4647. swap.w d6
  4648. moveq.l #$0b,d4
  4649. L0030a4:
  4650. moveq.l #$00,d2
  4651. move.b (a0)+,d2
  4652. add.w d2,d2
  4653. adda.w d2,a1
  4654. add.w (-$6200,a1),d6
  4655. move.w d6,d5
  4656. asr.w #3,d5
  4657. add.w d5,(a2)+
  4658. add.w d5,(a2)+
  4659. add.w d5,(a2)+
  4660. add.w d5,(a2)+
  4661. add.w (a1),d6
  4662. move.w d6,d5
  4663. asr.w #3,d5
  4664. add.w d5,(a2)+
  4665. add.w d5,(a2)+
  4666. add.w d5,(a2)+
  4667. add.w d5,(a2)+
  4668. adda.w ($6200,a1),a1
  4669. dbra.w d4,L0030a4
  4670. swap.w d6
  4671. move.w d5,d6
  4672. rts
  4673. L0030d8:
  4674. swap.w d6
  4675. moveq.l #$0b,d4
  4676. L0030dc:
  4677. moveq.l #$00,d2
  4678. move.b (a0)+,d2
  4679. add.w d2,d2
  4680. adda.w d2,a1
  4681. add.w (-$6200,a1),d6
  4682. move.w d6,d5
  4683. asr.w #2,d5
  4684. move.w d5,d3
  4685. asr.w #2,d3
  4686. sub.w d3,d5
  4687. sub.w d5,(a2)+
  4688. sub.w d5,(a2)+
  4689. sub.w d5,(a2)+
  4690. sub.w d5,(a2)+
  4691. add.w (a1),d6
  4692. move.w d6,d5
  4693. asr.w #2,d5
  4694. move.w d5,d3
  4695. asr.w #2,d3
  4696. sub.w d3,d5
  4697. sub.w d5,(a2)+
  4698. sub.w d5,(a2)+
  4699. sub.w d5,(a2)+
  4700. sub.w d5,(a2)+
  4701. adda.w ($6200,a1),a1
  4702. dbra.w d4,L0030dc
  4703. swap.w d6
  4704. move.w d5,d6
  4705. neg.w d6
  4706. rts
  4707. L00311e:
  4708. swap.w d6
  4709. moveq.l #$0b,d4
  4710. L003122:
  4711. moveq.l #$00,d2
  4712. move.b (a0)+,d2
  4713. add.w d2,d2
  4714. adda.w d2,a1
  4715. add.w (-$6200,a1),d6
  4716. move.w d6,d5
  4717. asr.w #2,d5
  4718. add.w d5,(a2)+
  4719. add.w d5,(a2)+
  4720. add.w d5,(a2)+
  4721. add.w d5,(a2)+
  4722. add.w (a1),d6
  4723. move.w d6,d5
  4724. asr.w #2,d5
  4725. add.w d5,(a2)+
  4726. add.w d5,(a2)+
  4727. add.w d5,(a2)+
  4728. add.w d5,(a2)+
  4729. adda.w ($6200,a1),a1
  4730. dbra.w d4,L003122
  4731. swap.w d6
  4732. move.w d5,d6
  4733. rts
  4734. L003156:
  4735. swap.w d6
  4736. moveq.l #$0b,d4
  4737. L00315a:
  4738. moveq.l #$00,d2
  4739. move.b (a0)+,d2
  4740. add.w d2,d2
  4741. adda.w d2,a1
  4742. add.w (-$6200,a1),d6
  4743. move.w d6,d5
  4744. asr.w #2,d5
  4745. move.w d5,d3
  4746. asr.w #2,d3
  4747. add.w d3,d5
  4748. add.w d5,(a2)+
  4749. add.w d5,(a2)+
  4750. add.w d5,(a2)+
  4751. add.w d5,(a2)+
  4752. add.w (a1),d6
  4753. move.w d6,d5
  4754. asr.w #2,d5
  4755. move.w d5,d3
  4756. asr.w #2,d3
  4757. add.w d3,d5
  4758. add.w d5,(a2)+
  4759. add.w d5,(a2)+
  4760. add.w d5,(a2)+
  4761. add.w d5,(a2)+
  4762. adda.w ($6200,a1),a1
  4763. dbra.w d4,L00315a
  4764. swap.w d6
  4765. move.w d5,d6
  4766. rts
  4767. L00319a:
  4768. swap.w d6
  4769. moveq.l #$0b,d4
  4770. L00319e:
  4771. moveq.l #$00,d2
  4772. move.b (a0)+,d2
  4773. add.w d2,d2
  4774. adda.w d2,a1
  4775. add.w (-$6200,a1),d6
  4776. move.w d6,d5
  4777. asr.w #1,d5
  4778. move.w d5,d3
  4779. asr.w #2,d3
  4780. sub.w d3,d5
  4781. sub.w d5,(a2)+
  4782. sub.w d5,(a2)+
  4783. sub.w d5,(a2)+
  4784. sub.w d5,(a2)+
  4785. add.w (a1),d6
  4786. move.w d6,d5
  4787. asr.w #1,d5
  4788. move.w d5,d3
  4789. asr.w #2,d3
  4790. sub.w d3,d5
  4791. sub.w d5,(a2)+
  4792. sub.w d5,(a2)+
  4793. sub.w d5,(a2)+
  4794. sub.w d5,(a2)+
  4795. adda.w ($6200,a1),a1
  4796. dbra.w d4,L00319e
  4797. swap.w d6
  4798. move.w d5,d6
  4799. neg.w d6
  4800. rts
  4801. L0031e0:
  4802. swap.w d6
  4803. moveq.l #$0b,d4
  4804. L0031e4:
  4805. moveq.l #$00,d2
  4806. move.b (a0)+,d2
  4807. add.w d2,d2
  4808. adda.w d2,a1
  4809. add.w (-$6200,a1),d6
  4810. move.w d6,d5
  4811. asr.w #1,d5
  4812. add.w d5,(a2)+
  4813. add.w d5,(a2)+
  4814. add.w d5,(a2)+
  4815. add.w d5,(a2)+
  4816. add.w (a1),d6
  4817. move.w d6,d5
  4818. asr.w #1,d5
  4819. add.w d5,(a2)+
  4820. add.w d5,(a2)+
  4821. add.w d5,(a2)+
  4822. add.w d5,(a2)+
  4823. adda.w ($6200,a1),a1
  4824. dbra.w d4,L0031e4
  4825. swap.w d6
  4826. move.w d5,d6
  4827. rts
  4828. L003218:
  4829. swap.w d6
  4830. moveq.l #$0b,d4
  4831. L00321c:
  4832. moveq.l #$00,d2
  4833. move.b (a0)+,d2
  4834. add.w d2,d2
  4835. adda.w d2,a1
  4836. add.w (-$6200,a1),d6
  4837. move.w d6,d5
  4838. asr.w #1,d5
  4839. move.w d5,d3
  4840. asr.w #2,d3
  4841. add.w d3,d5
  4842. add.w d5,(a2)+
  4843. add.w d5,(a2)+
  4844. add.w d5,(a2)+
  4845. add.w d5,(a2)+
  4846. add.w (a1),d6
  4847. move.w d6,d5
  4848. asr.w #1,d5
  4849. move.w d5,d3
  4850. asr.w #2,d3
  4851. add.w d3,d5
  4852. add.w d5,(a2)+
  4853. add.w d5,(a2)+
  4854. add.w d5,(a2)+
  4855. add.w d5,(a2)+
  4856. adda.w ($6200,a1),a1
  4857. dbra.w d4,L00321c
  4858. swap.w d6
  4859. move.w d5,d6
  4860. rts
  4861. L00325c:
  4862. swap.w d6
  4863. moveq.l #$0b,d4
  4864. L003260:
  4865. moveq.l #$00,d2
  4866. move.b (a0)+,d2
  4867. add.w d2,d2
  4868. adda.w d2,a1
  4869. add.w (-$6200,a1),d6
  4870. move.w d6,d5
  4871. asr.w #2,d5
  4872. sub.w d6,d5
  4873. sub.w d5,(a2)+
  4874. sub.w d5,(a2)+
  4875. sub.w d5,(a2)+
  4876. sub.w d5,(a2)+
  4877. add.w (a1),d6
  4878. move.w d6,d5
  4879. asr.w #2,d5
  4880. sub.w d6,d5
  4881. sub.w d5,(a2)+
  4882. sub.w d5,(a2)+
  4883. sub.w d5,(a2)+
  4884. sub.w d5,(a2)+
  4885. adda.w ($6200,a1),a1
  4886. dbra.w d4,L003260
  4887. swap.w d6
  4888. move.w d5,d6
  4889. neg.w d6
  4890. rts
  4891. L00329a:
  4892. swap.w d6
  4893. moveq.l #$0b,d4
  4894. L00329e:
  4895. moveq.l #$00,d2
  4896. move.b (a0)+,d2
  4897. add.w d2,d2
  4898. adda.w d2,a1
  4899. add.w (-$6200,a1),d6
  4900. move.w d6,d5
  4901. asr.w #2,d5
  4902. add.w d6,d5
  4903. add.w d5,(a2)+
  4904. add.w d5,(a2)+
  4905. add.w d5,(a2)+
  4906. add.w d5,(a2)+
  4907. add.w (a1),d6
  4908. move.w d6,d5
  4909. asr.w #2,d5
  4910. add.w d6,d5
  4911. add.w d5,(a2)+
  4912. add.w d5,(a2)+
  4913. add.w d5,(a2)+
  4914. add.w d5,(a2)+
  4915. adda.w ($6200,a1),a1
  4916. dbra.w d4,L00329e
  4917. swap.w d6
  4918. move.w d5,d6
  4919. rts
  4920. L0032d6:
  4921. swap.w d6
  4922. moveq.l #$0b,d4
  4923. L0032da:
  4924. moveq.l #$00,d2
  4925. move.b (a0)+,d2
  4926. add.w d2,d2
  4927. adda.w d2,a1
  4928. add.w (-$6200,a1),d6
  4929. move.w d6,d5
  4930. asr.w #1,d5
  4931. add.w d6,d5
  4932. add.w d5,(a2)+
  4933. add.w d5,(a2)+
  4934. add.w d5,(a2)+
  4935. add.w d5,(a2)+
  4936. add.w (a1),d6
  4937. move.w d6,d5
  4938. asr.w #1,d5
  4939. add.w d6,d5
  4940. add.w d5,(a2)+
  4941. add.w d5,(a2)+
  4942. add.w d5,(a2)+
  4943. add.w d5,(a2)+
  4944. adda.w ($6200,a1),a1
  4945. dbra.w d4,L0032da
  4946. swap.w d6
  4947. move.w d5,d6
  4948. rts
  4949. L003312:
  4950. swap.w d6
  4951. moveq.l #$0b,d4
  4952. L003316:
  4953. moveq.l #$00,d2
  4954. move.b (a0)+,d2
  4955. add.w d2,d2
  4956. adda.w d2,a1
  4957. add.w (-$6200,a1),d6
  4958. move.w d6,d5
  4959. add.w d5,d5
  4960. add.w d5,(a2)+
  4961. add.w d5,(a2)+
  4962. add.w d5,(a2)+
  4963. add.w d5,(a2)+
  4964. add.w (a1),d6
  4965. move.w d6,d5
  4966. add.w d5,d5
  4967. add.w d5,(a2)+
  4968. add.w d5,(a2)+
  4969. add.w d5,(a2)+
  4970. add.w d5,(a2)+
  4971. adda.w ($6200,a1),a1
  4972. dbra.w d4,L003316
  4973. swap.w d6
  4974. move.w d5,d6
  4975. rts
  4976. L00334a:
  4977. swap.w d6
  4978. moveq.l #$0b,d4
  4979. L00334e:
  4980. moveq.l #$00,d2
  4981. move.b (a0)+,d2
  4982. add.w d2,d2
  4983. adda.w d2,a1
  4984. add.w (-$6200,a1),d6
  4985. move.w d6,d5
  4986. asr.w #1,d5
  4987. add.w d6,d5
  4988. add.w d6,d5
  4989. add.w d5,(a2)+
  4990. add.w d5,(a2)+
  4991. add.w d5,(a2)+
  4992. add.w d5,(a2)+
  4993. add.w (a1),d6
  4994. move.w d6,d5
  4995. asr.w #1,d5
  4996. add.w d6,d5
  4997. add.w d6,d5
  4998. add.w d5,(a2)+
  4999. add.w d5,(a2)+
  5000. add.w d5,(a2)+
  5001. add.w d5,(a2)+
  5002. adda.w ($6200,a1),a1
  5003. dbra.w d4,L00334e
  5004. swap.w d6
  5005. move.w d5,d6
  5006. rts
  5007. L00338a:
  5008. swap.w d6
  5009. moveq.l #$0b,d4
  5010. L00338e:
  5011. moveq.l #$00,d2
  5012. move.b (a0)+,d2
  5013. add.w d2,d2
  5014. adda.w d2,a1
  5015. add.w (-$6200,a1),d6
  5016. move.w d6,d5
  5017. add.w d5,d5
  5018. add.w d6,d5
  5019. add.w d5,(a2)+
  5020. add.w d5,(a2)+
  5021. add.w d5,(a2)+
  5022. add.w d5,(a2)+
  5023. add.w (a1),d6
  5024. move.w d6,d5
  5025. add.w d5,d5
  5026. add.w d6,d5
  5027. add.w d5,(a2)+
  5028. add.w d5,(a2)+
  5029. add.w d5,(a2)+
  5030. add.w d5,(a2)+
  5031. adda.w ($6200,a1),a1
  5032. dbra.w d4,L00338e
  5033. swap.w d6
  5034. move.w d5,d6
  5035. rts
  5036. L0033c6:
  5037. swap.w d6
  5038. moveq.l #$0b,d4
  5039. L0033ca:
  5040. moveq.l #$00,d2
  5041. move.b (a0)+,d2
  5042. add.w d2,d2
  5043. adda.w d2,a1
  5044. add.w (-$6200,a1),d6
  5045. move.w d6,d5
  5046. add.w d5,d5
  5047. add.w d5,d5
  5048. add.w d5,(a2)+
  5049. add.w d5,(a2)+
  5050. add.w d5,(a2)+
  5051. add.w d5,(a2)+
  5052. add.w (a1),d6
  5053. move.w d6,d5
  5054. add.w d5,d5
  5055. add.w d5,d5
  5056. add.w d5,(a2)+
  5057. add.w d5,(a2)+
  5058. add.w d5,(a2)+
  5059. add.w d5,(a2)+
  5060. adda.w ($6200,a1),a1
  5061. dbra.w d4,L0033ca
  5062. swap.w d6
  5063. move.w d5,d6
  5064. rts
  5065. L003402:
  5066. swap.w d6
  5067. moveq.l #$0b,d4
  5068. L003406:
  5069. moveq.l #$00,d2
  5070. move.b (a0)+,d2
  5071. add.w d2,d2
  5072. adda.w d2,a1
  5073. add.w (-$6200,a1),d6
  5074. move.w d6,d5
  5075. add.w d5,d5
  5076. add.w d5,d5
  5077. add.w d6,d5
  5078. add.w d5,(a2)+
  5079. add.w d5,(a2)+
  5080. add.w d5,(a2)+
  5081. add.w d5,(a2)+
  5082. add.w (a1),d6
  5083. move.w d6,d5
  5084. add.w d5,d5
  5085. add.w d5,d5
  5086. add.w d6,d5
  5087. add.w d5,(a2)+
  5088. add.w d5,(a2)+
  5089. add.w d5,(a2)+
  5090. add.w d5,(a2)+
  5091. adda.w ($6200,a1),a1
  5092. dbra.w d4,L003406
  5093. swap.w d6
  5094. move.w d5,d6
  5095. rts
  5096. L003442:
  5097. swap.w d6
  5098. moveq.l #$0b,d4
  5099. L003446:
  5100. moveq.l #$00,d2
  5101. move.b (a0)+,d2
  5102. add.w d2,d2
  5103. adda.w d2,a1
  5104. add.w (-$6200,a1),d6
  5105. add.w d6,(a2)+
  5106. add.w d6,(a2)+
  5107. add.w d6,(a2)+
  5108. add.w d6,(a2)+
  5109. add.w (a1),d6
  5110. add.w d6,(a2)+
  5111. add.w d6,(a2)+
  5112. add.w d6,(a2)+
  5113. add.w d6,(a2)+
  5114. adda.w ($6200,a1),a1
  5115. dbra.w d4,L003446
  5116. move.w d6,d5
  5117. swap.w d6
  5118. move.w d5,d6
  5119. rts
  5120. L003474:
  5121. swap.w d6
  5122. moveq.l #$0f,d4
  5123. L003478:
  5124. moveq.l #$00,d2
  5125. move.b (a0)+,d2
  5126. add.w d2,d2
  5127. adda.w d2,a1
  5128. add.w (-$6200,a1),d6
  5129. move.w d6,d5
  5130. asr.w #3,d5
  5131. add.w d5,(a2)+
  5132. add.w d5,(a2)+
  5133. add.w d5,(a2)+
  5134. add.w (a1),d6
  5135. move.w d6,d5
  5136. asr.w #3,d5
  5137. add.w d5,(a2)+
  5138. add.w d5,(a2)+
  5139. add.w d5,(a2)+
  5140. adda.w ($6200,a1),a1
  5141. dbra.w d4,L003478
  5142. swap.w d6
  5143. move.w d5,d6
  5144. rts
  5145. L0034a8:
  5146. swap.w d6
  5147. moveq.l #$0f,d4
  5148. L0034ac:
  5149. moveq.l #$00,d2
  5150. move.b (a0)+,d2
  5151. add.w d2,d2
  5152. adda.w d2,a1
  5153. add.w (-$6200,a1),d6
  5154. move.w d6,d5
  5155. asr.w #2,d5
  5156. move.w d5,d3
  5157. asr.w #2,d3
  5158. sub.w d3,d5
  5159. sub.w d5,(a2)+
  5160. sub.w d5,(a2)+
  5161. sub.w d5,(a2)+
  5162. add.w (a1),d6
  5163. move.w d6,d5
  5164. asr.w #2,d5
  5165. move.w d5,d3
  5166. asr.w #2,d3
  5167. sub.w d3,d5
  5168. sub.w d5,(a2)+
  5169. sub.w d5,(a2)+
  5170. sub.w d5,(a2)+
  5171. adda.w ($6200,a1),a1
  5172. dbra.w d4,L0034ac
  5173. swap.w d6
  5174. move.w d5,d6
  5175. neg.w d6
  5176. rts
  5177. L0034ea:
  5178. swap.w d6
  5179. moveq.l #$0f,d4
  5180. L0034ee:
  5181. moveq.l #$00,d2
  5182. move.b (a0)+,d2
  5183. add.w d2,d2
  5184. adda.w d2,a1
  5185. add.w (-$6200,a1),d6
  5186. move.w d6,d5
  5187. asr.w #2,d5
  5188. add.w d5,(a2)+
  5189. add.w d5,(a2)+
  5190. add.w d5,(a2)+
  5191. add.w (a1),d6
  5192. move.w d6,d5
  5193. asr.w #2,d5
  5194. add.w d5,(a2)+
  5195. add.w d5,(a2)+
  5196. add.w d5,(a2)+
  5197. adda.w ($6200,a1),a1
  5198. dbra.w d4,L0034ee
  5199. swap.w d6
  5200. move.w d5,d6
  5201. rts
  5202. L00351e:
  5203. swap.w d6
  5204. moveq.l #$0f,d4
  5205. L003522:
  5206. moveq.l #$00,d2
  5207. move.b (a0)+,d2
  5208. add.w d2,d2
  5209. adda.w d2,a1
  5210. add.w (-$6200,a1),d6
  5211. move.w d6,d5
  5212. asr.w #2,d5
  5213. move.w d5,d3
  5214. asr.w #2,d3
  5215. add.w d3,d5
  5216. add.w d5,(a2)+
  5217. add.w d5,(a2)+
  5218. add.w d5,(a2)+
  5219. add.w (a1),d6
  5220. move.w d6,d5
  5221. asr.w #2,d5
  5222. move.w d5,d3
  5223. asr.w #2,d3
  5224. add.w d3,d5
  5225. add.w d5,(a2)+
  5226. add.w d5,(a2)+
  5227. add.w d5,(a2)+
  5228. adda.w ($6200,a1),a1
  5229. dbra.w d4,L003522
  5230. swap.w d6
  5231. move.w d5,d6
  5232. rts
  5233. L00355e:
  5234. swap.w d6
  5235. moveq.l #$0f,d4
  5236. L003562:
  5237. moveq.l #$00,d2
  5238. move.b (a0)+,d2
  5239. add.w d2,d2
  5240. adda.w d2,a1
  5241. add.w (-$6200,a1),d6
  5242. move.w d6,d5
  5243. asr.w #1,d5
  5244. move.w d5,d3
  5245. asr.w #2,d3
  5246. sub.w d3,d5
  5247. sub.w d5,(a2)+
  5248. sub.w d5,(a2)+
  5249. sub.w d5,(a2)+
  5250. add.w (a1),d6
  5251. move.w d6,d5
  5252. asr.w #1,d5
  5253. move.w d5,d3
  5254. asr.w #2,d3
  5255. sub.w d3,d5
  5256. sub.w d5,(a2)+
  5257. sub.w d5,(a2)+
  5258. sub.w d5,(a2)+
  5259. adda.w ($6200,a1),a1
  5260. dbra.w d4,L003562
  5261. swap.w d6
  5262. move.w d5,d6
  5263. neg.w d6
  5264. rts
  5265. L0035a0:
  5266. swap.w d6
  5267. moveq.l #$0f,d4
  5268. L0035a4:
  5269. moveq.l #$00,d2
  5270. move.b (a0)+,d2
  5271. add.w d2,d2
  5272. adda.w d2,a1
  5273. add.w (-$6200,a1),d6
  5274. move.w d6,d5
  5275. asr.w #1,d5
  5276. add.w d5,(a2)+
  5277. add.w d5,(a2)+
  5278. add.w d5,(a2)+
  5279. add.w (a1),d6
  5280. move.w d6,d5
  5281. asr.w #1,d5
  5282. add.w d5,(a2)+
  5283. add.w d5,(a2)+
  5284. add.w d5,(a2)+
  5285. adda.w ($6200,a1),a1
  5286. dbra.w d4,L0035a4
  5287. swap.w d6
  5288. move.w d5,d6
  5289. rts
  5290. L0035d4:
  5291. swap.w d6
  5292. moveq.l #$0f,d4
  5293. L0035d8:
  5294. moveq.l #$00,d2
  5295. move.b (a0)+,d2
  5296. add.w d2,d2
  5297. adda.w d2,a1
  5298. add.w (-$6200,a1),d6
  5299. move.w d6,d5
  5300. asr.w #1,d5
  5301. move.w d5,d3
  5302. asr.w #2,d3
  5303. add.w d3,d5
  5304. add.w d5,(a2)+
  5305. add.w d5,(a2)+
  5306. add.w d5,(a2)+
  5307. add.w (a1),d6
  5308. move.w d6,d5
  5309. asr.w #1,d5
  5310. move.w d5,d3
  5311. asr.w #2,d3
  5312. add.w d3,d5
  5313. add.w d5,(a2)+
  5314. add.w d5,(a2)+
  5315. add.w d5,(a2)+
  5316. adda.w ($6200,a1),a1
  5317. dbra.w d4,L0035d8
  5318. swap.w d6
  5319. move.w d5,d6
  5320. rts
  5321. L003614:
  5322. swap.w d6
  5323. moveq.l #$0f,d4
  5324. L003618:
  5325. moveq.l #$00,d2
  5326. move.b (a0)+,d2
  5327. add.w d2,d2
  5328. adda.w d2,a1
  5329. add.w (-$6200,a1),d6
  5330. move.w d6,d5
  5331. asr.w #2,d5
  5332. sub.w d6,d5
  5333. sub.w d5,(a2)+
  5334. sub.w d5,(a2)+
  5335. sub.w d5,(a2)+
  5336. add.w (a1),d6
  5337. move.w d6,d5
  5338. asr.w #2,d5
  5339. sub.w d6,d5
  5340. sub.w d5,(a2)+
  5341. sub.w d5,(a2)+
  5342. sub.w d5,(a2)+
  5343. adda.w ($6200,a1),a1
  5344. dbra.w d4,L003618
  5345. swap.w d6
  5346. move.w d5,d6
  5347. neg.w d6
  5348. rts
  5349. L00364e:
  5350. swap.w d6
  5351. moveq.l #$0f,d4
  5352. L003652:
  5353. moveq.l #$00,d2
  5354. move.b (a0)+,d2
  5355. add.w d2,d2
  5356. adda.w d2,a1
  5357. add.w (-$6200,a1),d6
  5358. move.w d6,d5
  5359. asr.w #2,d5
  5360. add.w d6,d5
  5361. add.w d5,(a2)+
  5362. add.w d5,(a2)+
  5363. add.w d5,(a2)+
  5364. add.w (a1),d6
  5365. move.w d6,d5
  5366. asr.w #2,d5
  5367. add.w d6,d5
  5368. add.w d5,(a2)+
  5369. add.w d5,(a2)+
  5370. add.w d5,(a2)+
  5371. adda.w ($6200,a1),a1
  5372. dbra.w d4,L003652
  5373. swap.w d6
  5374. move.w d5,d6
  5375. rts
  5376. L003686:
  5377. swap.w d6
  5378. moveq.l #$0f,d4
  5379. L00368a:
  5380. moveq.l #$00,d2
  5381. move.b (a0)+,d2
  5382. add.w d2,d2
  5383. adda.w d2,a1
  5384. add.w (-$6200,a1),d6
  5385. move.w d6,d5
  5386. asr.w #1,d5
  5387. add.w d6,d5
  5388. add.w d5,(a2)+
  5389. add.w d5,(a2)+
  5390. add.w d5,(a2)+
  5391. add.w (a1),d6
  5392. move.w d6,d5
  5393. asr.w #1,d5
  5394. add.w d6,d5
  5395. add.w d5,(a2)+
  5396. add.w d5,(a2)+
  5397. add.w d5,(a2)+
  5398. adda.w ($6200,a1),a1
  5399. dbra.w d4,L00368a
  5400. swap.w d6
  5401. move.w d5,d6
  5402. rts
  5403. L0036be:
  5404. swap.w d6
  5405. moveq.l #$0f,d4
  5406. L0036c2:
  5407. moveq.l #$00,d2
  5408. move.b (a0)+,d2
  5409. add.w d2,d2
  5410. adda.w d2,a1
  5411. add.w (-$6200,a1),d6
  5412. move.w d6,d5
  5413. add.w d5,d5
  5414. add.w d5,(a2)+
  5415. add.w d5,(a2)+
  5416. add.w d5,(a2)+
  5417. add.w (a1),d6
  5418. move.w d6,d5
  5419. add.w d5,d5
  5420. add.w d5,(a2)+
  5421. add.w d5,(a2)+
  5422. add.w d5,(a2)+
  5423. adda.w ($6200,a1),a1
  5424. dbra.w d4,L0036c2
  5425. swap.w d6
  5426. move.w d5,d6
  5427. rts
  5428. L0036f2:
  5429. swap.w d6
  5430. moveq.l #$0f,d4
  5431. L0036f6:
  5432. moveq.l #$00,d2
  5433. move.b (a0)+,d2
  5434. add.w d2,d2
  5435. adda.w d2,a1
  5436. add.w (-$6200,a1),d6
  5437. move.w d6,d5
  5438. asr.w #1,d5
  5439. add.w d6,d5
  5440. add.w d6,d5
  5441. add.w d5,(a2)+
  5442. add.w d5,(a2)+
  5443. add.w d5,(a2)+
  5444. add.w (a1),d6
  5445. move.w d6,d5
  5446. asr.w #1,d5
  5447. add.w d6,d5
  5448. add.w d6,d5
  5449. add.w d5,(a2)+
  5450. add.w d5,(a2)+
  5451. add.w d5,(a2)+
  5452. adda.w ($6200,a1),a1
  5453. dbra.w d4,L0036f6
  5454. swap.w d6
  5455. move.w d5,d6
  5456. rts
  5457. L00372e:
  5458. swap.w d6
  5459. moveq.l #$0f,d4
  5460. L003732:
  5461. moveq.l #$00,d2
  5462. move.b (a0)+,d2
  5463. add.w d2,d2
  5464. adda.w d2,a1
  5465. add.w (-$6200,a1),d6
  5466. move.w d6,d5
  5467. add.w d5,d5
  5468. add.w d6,d5
  5469. add.w d5,(a2)+
  5470. add.w d5,(a2)+
  5471. add.w d5,(a2)+
  5472. add.w (a1),d6
  5473. move.w d6,d5
  5474. add.w d5,d5
  5475. add.w d6,d5
  5476. add.w d5,(a2)+
  5477. add.w d5,(a2)+
  5478. add.w d5,(a2)+
  5479. adda.w ($6200,a1),a1
  5480. dbra.w d4,L003732
  5481. swap.w d6
  5482. move.w d5,d6
  5483. rts
  5484. L003766:
  5485. swap.w d6
  5486. moveq.l #$0f,d4
  5487. L00376a:
  5488. moveq.l #$00,d2
  5489. move.b (a0)+,d2
  5490. add.w d2,d2
  5491. adda.w d2,a1
  5492. add.w (-$6200,a1),d6
  5493. move.w d6,d5
  5494. add.w d5,d5
  5495. add.w d5,d5
  5496. add.w d5,(a2)+
  5497. add.w d5,(a2)+
  5498. add.w d5,(a2)+
  5499. add.w (a1),d6
  5500. move.w d6,d5
  5501. add.w d5,d5
  5502. add.w d5,d5
  5503. add.w d5,(a2)+
  5504. add.w d5,(a2)+
  5505. add.w d5,(a2)+
  5506. adda.w ($6200,a1),a1
  5507. dbra.w d4,L00376a
  5508. swap.w d6
  5509. move.w d5,d6
  5510. rts
  5511. L00379e:
  5512. swap.w d6
  5513. moveq.l #$0f,d4
  5514. L0037a2:
  5515. moveq.l #$00,d2
  5516. move.b (a0)+,d2
  5517. add.w d2,d2
  5518. adda.w d2,a1
  5519. add.w (-$6200,a1),d6
  5520. move.w d6,d5
  5521. add.w d5,d5
  5522. add.w d5,d5
  5523. add.w d6,d5
  5524. add.w d5,(a2)+
  5525. add.w d5,(a2)+
  5526. add.w d5,(a2)+
  5527. add.w (a1),d6
  5528. move.w d6,d5
  5529. add.w d5,d5
  5530. add.w d5,d5
  5531. add.w d6,d5
  5532. add.w d5,(a2)+
  5533. add.w d5,(a2)+
  5534. add.w d5,(a2)+
  5535. adda.w ($6200,a1),a1
  5536. dbra.w d4,L0037a2
  5537. swap.w d6
  5538. move.w d5,d6
  5539. rts
  5540. L0037da:
  5541. swap.w d6
  5542. moveq.l #$0f,d4
  5543. L0037de:
  5544. moveq.l #$00,d2
  5545. move.b (a0)+,d2
  5546. add.w d2,d2
  5547. adda.w d2,a1
  5548. add.w (-$6200,a1),d6
  5549. add.w d6,(a2)+
  5550. add.w d6,(a2)+
  5551. add.w d6,(a2)+
  5552. add.w (a1),d6
  5553. add.w d6,(a2)+
  5554. add.w d6,(a2)+
  5555. add.w d6,(a2)+
  5556. adda.w ($6200,a1),a1
  5557. dbra.w d4,L0037de
  5558. move.w d6,d5
  5559. swap.w d6
  5560. move.w d5,d6
  5561. rts
  5562. L003808:
  5563. swap.w d6
  5564. moveq.l #$17,d4
  5565. L00380c:
  5566. moveq.l #$00,d2
  5567. move.b (a0)+,d2
  5568. add.w d2,d2
  5569. adda.w d2,a1
  5570. add.w (-$6200,a1),d6
  5571. move.w d6,d5
  5572. asr.w #3,d5
  5573. add.w d5,(a2)+
  5574. add.w d5,(a2)+
  5575. add.w (a1),d6
  5576. move.w d6,d5
  5577. asr.w #3,d5
  5578. add.w d5,(a2)+
  5579. add.w d5,(a2)+
  5580. adda.w ($6200,a1),a1
  5581. dbra.w d4,L00380c
  5582. swap.w d6
  5583. move.w d5,d6
  5584. rts
  5585. L003838:
  5586. swap.w d6
  5587. moveq.l #$17,d4
  5588. L00383c:
  5589. moveq.l #$00,d2
  5590. move.b (a0)+,d2
  5591. add.w d2,d2
  5592. adda.w d2,a1
  5593. add.w (-$6200,a1),d6
  5594. move.w d6,d5
  5595. asr.w #2,d5
  5596. move.w d5,d3
  5597. asr.w #2,d3
  5598. sub.w d3,d5
  5599. sub.w d5,(a2)+
  5600. sub.w d5,(a2)+
  5601. add.w (a1),d6
  5602. move.w d6,d5
  5603. asr.w #2,d5
  5604. move.w d5,d3
  5605. asr.w #2,d3
  5606. sub.w d3,d5
  5607. sub.w d5,(a2)+
  5608. sub.w d5,(a2)+
  5609. adda.w ($6200,a1),a1
  5610. dbra.w d4,L00383c
  5611. swap.w d6
  5612. move.w d5,d6
  5613. neg.w d6
  5614. rts
  5615. L003876:
  5616. swap.w d6
  5617. moveq.l #$17,d4
  5618. L00387a:
  5619. moveq.l #$00,d2
  5620. move.b (a0)+,d2
  5621. add.w d2,d2
  5622. adda.w d2,a1
  5623. add.w (-$6200,a1),d6
  5624. move.w d6,d5
  5625. asr.w #2,d5
  5626. add.w d5,(a2)+
  5627. add.w d5,(a2)+
  5628. add.w (a1),d6
  5629. move.w d6,d5
  5630. asr.w #2,d5
  5631. add.w d5,(a2)+
  5632. add.w d5,(a2)+
  5633. adda.w ($6200,a1),a1
  5634. dbra.w d4,L00387a
  5635. swap.w d6
  5636. move.w d5,d6
  5637. rts
  5638. L0038a6:
  5639. swap.w d6
  5640. moveq.l #$17,d4
  5641. L0038aa:
  5642. moveq.l #$00,d2
  5643. move.b (a0)+,d2
  5644. add.w d2,d2
  5645. adda.w d2,a1
  5646. add.w (-$6200,a1),d6
  5647. move.w d6,d5
  5648. asr.w #2,d5
  5649. move.w d5,d3
  5650. asr.w #2,d3
  5651. add.w d3,d5
  5652. add.w d5,(a2)+
  5653. add.w d5,(a2)+
  5654. add.w (a1),d6
  5655. move.w d6,d5
  5656. asr.w #2,d5
  5657. move.w d5,d3
  5658. asr.w #2,d3
  5659. add.w d3,d5
  5660. add.w d5,(a2)+
  5661. add.w d5,(a2)+
  5662. adda.w ($6200,a1),a1
  5663. dbra.w d4,L0038aa
  5664. swap.w d6
  5665. move.w d5,d6
  5666. rts
  5667. L0038e2:
  5668. swap.w d6
  5669. moveq.l #$17,d4
  5670. L0038e6:
  5671. moveq.l #$00,d2
  5672. move.b (a0)+,d2
  5673. add.w d2,d2
  5674. adda.w d2,a1
  5675. add.w (-$6200,a1),d6
  5676. move.w d6,d5
  5677. asr.w #1,d5
  5678. move.w d5,d3
  5679. asr.w #2,d3
  5680. sub.w d3,d5
  5681. sub.w d5,(a2)+
  5682. sub.w d5,(a2)+
  5683. add.w (a1),d6
  5684. move.w d6,d5
  5685. asr.w #1,d5
  5686. move.w d5,d3
  5687. asr.w #2,d3
  5688. sub.w d3,d5
  5689. sub.w d5,(a2)+
  5690. sub.w d5,(a2)+
  5691. adda.w ($6200,a1),a1
  5692. dbra.w d4,L0038e6
  5693. swap.w d6
  5694. move.w d5,d6
  5695. neg.w d6
  5696. rts
  5697. L003920:
  5698. swap.w d6
  5699. moveq.l #$17,d4
  5700. L003924:
  5701. moveq.l #$00,d2
  5702. move.b (a0)+,d2
  5703. add.w d2,d2
  5704. adda.w d2,a1
  5705. add.w (-$6200,a1),d6
  5706. move.w d6,d5
  5707. asr.w #1,d5
  5708. add.w d5,(a2)+
  5709. add.w d5,(a2)+
  5710. add.w (a1),d6
  5711. move.w d6,d5
  5712. asr.w #1,d5
  5713. add.w d5,(a2)+
  5714. add.w d5,(a2)+
  5715. adda.w ($6200,a1),a1
  5716. dbra.w d4,L003924
  5717. swap.w d6
  5718. move.w d5,d6
  5719. rts
  5720. L003950:
  5721. swap.w d6
  5722. moveq.l #$17,d4
  5723. L003954:
  5724. moveq.l #$00,d2
  5725. move.b (a0)+,d2
  5726. add.w d2,d2
  5727. adda.w d2,a1
  5728. add.w (-$6200,a1),d6
  5729. move.w d6,d5
  5730. asr.w #1,d5
  5731. move.w d5,d3
  5732. asr.w #2,d3
  5733. add.w d3,d5
  5734. add.w d5,(a2)+
  5735. add.w d5,(a2)+
  5736. add.w (a1),d6
  5737. move.w d6,d5
  5738. asr.w #1,d5
  5739. move.w d5,d3
  5740. asr.w #2,d3
  5741. add.w d3,d5
  5742. add.w d5,(a2)+
  5743. add.w d5,(a2)+
  5744. adda.w ($6200,a1),a1
  5745. dbra.w d4,L003954
  5746. swap.w d6
  5747. move.w d5,d6
  5748. rts
  5749. L00398c:
  5750. swap.w d6
  5751. moveq.l #$17,d4
  5752. L003990:
  5753. moveq.l #$00,d2
  5754. move.b (a0)+,d2
  5755. add.w d2,d2
  5756. adda.w d2,a1
  5757. add.w (-$6200,a1),d6
  5758. move.w d6,d5
  5759. asr.w #2,d5
  5760. sub.w d6,d5
  5761. sub.w d5,(a2)+
  5762. sub.w d5,(a2)+
  5763. add.w (a1),d6
  5764. move.w d6,d5
  5765. asr.w #2,d5
  5766. sub.w d6,d5
  5767. sub.w d5,(a2)+
  5768. sub.w d5,(a2)+
  5769. adda.w ($6200,a1),a1
  5770. dbra.w d4,L003990
  5771. swap.w d6
  5772. move.w d5,d6
  5773. neg.w d6
  5774. rts
  5775. L0039c2:
  5776. swap.w d6
  5777. moveq.l #$17,d4
  5778. L0039c6:
  5779. moveq.l #$00,d2
  5780. move.b (a0)+,d2
  5781. add.w d2,d2
  5782. adda.w d2,a1
  5783. add.w (-$6200,a1),d6
  5784. move.w d6,d5
  5785. asr.w #2,d5
  5786. add.w d6,d5
  5787. add.w d5,(a2)+
  5788. add.w d5,(a2)+
  5789. add.w (a1),d6
  5790. move.w d6,d5
  5791. asr.w #2,d5
  5792. add.w d6,d5
  5793. add.w d5,(a2)+
  5794. add.w d5,(a2)+
  5795. adda.w ($6200,a1),a1
  5796. dbra.w d4,L0039c6
  5797. swap.w d6
  5798. move.w d5,d6
  5799. rts
  5800. L0039f6:
  5801. swap.w d6
  5802. moveq.l #$17,d4
  5803. L0039fa:
  5804. moveq.l #$00,d2
  5805. move.b (a0)+,d2
  5806. add.w d2,d2
  5807. adda.w d2,a1
  5808. add.w (-$6200,a1),d6
  5809. move.w d6,d5
  5810. asr.w #1,d5
  5811. add.w d6,d5
  5812. add.w d5,(a2)+
  5813. add.w d5,(a2)+
  5814. add.w (a1),d6
  5815. move.w d6,d5
  5816. asr.w #1,d5
  5817. add.w d6,d5
  5818. add.w d5,(a2)+
  5819. add.w d5,(a2)+
  5820. adda.w ($6200,a1),a1
  5821. dbra.w d4,L0039fa
  5822. swap.w d6
  5823. move.w d5,d6
  5824. rts
  5825. L003a2a:
  5826. swap.w d6
  5827. moveq.l #$17,d4
  5828. L003a2e:
  5829. moveq.l #$00,d2
  5830. move.b (a0)+,d2
  5831. add.w d2,d2
  5832. adda.w d2,a1
  5833. add.w (-$6200,a1),d6
  5834. move.w d6,d5
  5835. add.w d5,d5
  5836. add.w d5,(a2)+
  5837. add.w d5,(a2)+
  5838. add.w (a1),d6
  5839. move.w d6,d5
  5840. add.w d5,d5
  5841. add.w d5,(a2)+
  5842. add.w d5,(a2)+
  5843. adda.w ($6200,a1),a1
  5844. dbra.w d4,L003a2e
  5845. swap.w d6
  5846. move.w d5,d6
  5847. rts
  5848. L003a5a:
  5849. swap.w d6
  5850. moveq.l #$17,d4
  5851. L003a5e:
  5852. moveq.l #$00,d2
  5853. move.b (a0)+,d2
  5854. add.w d2,d2
  5855. adda.w d2,a1
  5856. add.w (-$6200,a1),d6
  5857. move.w d6,d5
  5858. asr.w #1,d5
  5859. add.w d6,d5
  5860. add.w d6,d5
  5861. add.w d5,(a2)+
  5862. add.w d5,(a2)+
  5863. add.w (a1),d6
  5864. move.w d6,d5
  5865. asr.w #1,d5
  5866. add.w d6,d5
  5867. add.w d6,d5
  5868. add.w d5,(a2)+
  5869. add.w d5,(a2)+
  5870. adda.w ($6200,a1),a1
  5871. dbra.w d4,L003a5e
  5872. swap.w d6
  5873. move.w d5,d6
  5874. rts
  5875. L003a92:
  5876. swap.w d6
  5877. moveq.l #$17,d4
  5878. L003a96:
  5879. moveq.l #$00,d2
  5880. move.b (a0)+,d2
  5881. add.w d2,d2
  5882. adda.w d2,a1
  5883. add.w (-$6200,a1),d6
  5884. move.w d6,d5
  5885. add.w d5,d5
  5886. add.w d6,d5
  5887. add.w d5,(a2)+
  5888. add.w d5,(a2)+
  5889. add.w (a1),d6
  5890. move.w d6,d5
  5891. add.w d5,d5
  5892. add.w d6,d5
  5893. add.w d5,(a2)+
  5894. add.w d5,(a2)+
  5895. adda.w ($6200,a1),a1
  5896. dbra.w d4,L003a96
  5897. swap.w d6
  5898. move.w d5,d6
  5899. rts
  5900. L003ac6:
  5901. swap.w d6
  5902. moveq.l #$17,d4
  5903. L003aca:
  5904. moveq.l #$00,d2
  5905. move.b (a0)+,d2
  5906. add.w d2,d2
  5907. adda.w d2,a1
  5908. add.w (-$6200,a1),d6
  5909. move.w d6,d5
  5910. add.w d5,d5
  5911. add.w d5,d5
  5912. add.w d5,(a2)+
  5913. add.w d5,(a2)+
  5914. add.w (a1),d6
  5915. move.w d6,d5
  5916. add.w d5,d5
  5917. add.w d5,d5
  5918. add.w d5,(a2)+
  5919. add.w d5,(a2)+
  5920. adda.w ($6200,a1),a1
  5921. dbra.w d4,L003aca
  5922. swap.w d6
  5923. move.w d5,d6
  5924. rts
  5925. L003afa:
  5926. swap.w d6
  5927. moveq.l #$17,d4
  5928. L003afe:
  5929. moveq.l #$00,d2
  5930. move.b (a0)+,d2
  5931. add.w d2,d2
  5932. adda.w d2,a1
  5933. add.w (-$6200,a1),d6
  5934. move.w d6,d5
  5935. add.w d5,d5
  5936. add.w d5,d5
  5937. add.w d6,d5
  5938. add.w d5,(a2)+
  5939. add.w d5,(a2)+
  5940. add.w (a1),d6
  5941. move.w d6,d5
  5942. add.w d5,d5
  5943. add.w d5,d5
  5944. add.w d6,d5
  5945. add.w d5,(a2)+
  5946. add.w d5,(a2)+
  5947. adda.w ($6200,a1),a1
  5948. dbra.w d4,L003afe
  5949. swap.w d6
  5950. move.w d5,d6
  5951. rts
  5952. L003b32:
  5953. swap.w d6
  5954. moveq.l #$17,d4
  5955. L003b36:
  5956. moveq.l #$00,d2
  5957. move.b (a0)+,d2
  5958. add.w d2,d2
  5959. adda.w d2,a1
  5960. add.w (-$6200,a1),d6
  5961. add.w d6,(a2)+
  5962. add.w d6,(a2)+
  5963. add.w (a1),d6
  5964. add.w d6,(a2)+
  5965. add.w d6,(a2)+
  5966. adda.w ($6200,a1),a1
  5967. dbra.w d4,L003b36
  5968. move.w d6,d5
  5969. swap.w d6
  5970. move.w d5,d6
  5971. rts
  5972. L003b5c:
  5973. swap.w d6
  5974. moveq.l #$1f,d4
  5975. L003b60:
  5976. moveq.l #$00,d2
  5977. move.b (a0)+,d2
  5978. add.w d2,d2
  5979. adda.w d2,a1
  5980. add.w (-$6200,a1),d6
  5981. move.w d6,d5
  5982. asr.w #3,d5
  5983. add.w d5,(a2)+
  5984. add.w d5,(a2)+
  5985. add.w (a1),d6
  5986. move.w d6,d5
  5987. asr.w #3,d5
  5988. add.w d5,(a2)+
  5989. adda.w ($6200,a1),a1
  5990. dbra.w d4,L003b60
  5991. swap.w d6
  5992. move.w d5,d6
  5993. rts
  5994. L003b8a:
  5995. swap.w d6
  5996. moveq.l #$1f,d4
  5997. L003b8e:
  5998. moveq.l #$00,d2
  5999. move.b (a0)+,d2
  6000. add.w d2,d2
  6001. adda.w d2,a1
  6002. add.w (-$6200,a1),d6
  6003. move.w d6,d5
  6004. asr.w #2,d5
  6005. move.w d5,d3
  6006. asr.w #2,d3
  6007. sub.w d3,d5
  6008. sub.w d5,(a2)+
  6009. sub.w d5,(a2)+
  6010. add.w (a1),d6
  6011. move.w d6,d5
  6012. asr.w #2,d5
  6013. move.w d5,d3
  6014. asr.w #2,d3
  6015. sub.w d3,d5
  6016. sub.w d5,(a2)+
  6017. adda.w ($6200,a1),a1
  6018. dbra.w d4,L003b8e
  6019. swap.w d6
  6020. move.w d5,d6
  6021. neg.w d6
  6022. rts
  6023. L003bc6:
  6024. swap.w d6
  6025. moveq.l #$1f,d4
  6026. L003bca:
  6027. moveq.l #$00,d2
  6028. move.b (a0)+,d2
  6029. add.w d2,d2
  6030. adda.w d2,a1
  6031. add.w (-$6200,a1),d6
  6032. move.w d6,d5
  6033. asr.w #2,d5
  6034. add.w d5,(a2)+
  6035. add.w d5,(a2)+
  6036. add.w (a1),d6
  6037. move.w d6,d5
  6038. asr.w #2,d5
  6039. add.w d5,(a2)+
  6040. adda.w ($6200,a1),a1
  6041. dbra.w d4,L003bca
  6042. swap.w d6
  6043. move.w d5,d6
  6044. rts
  6045. L003bf4:
  6046. swap.w d6
  6047. moveq.l #$1f,d4
  6048. L003bf8:
  6049. moveq.l #$00,d2
  6050. move.b (a0)+,d2
  6051. add.w d2,d2
  6052. adda.w d2,a1
  6053. add.w (-$6200,a1),d6
  6054. move.w d6,d5
  6055. asr.w #2,d5
  6056. move.w d5,d3
  6057. asr.w #2,d3
  6058. add.w d3,d5
  6059. add.w d5,(a2)+
  6060. add.w d5,(a2)+
  6061. add.w (a1),d6
  6062. move.w d6,d5
  6063. asr.w #2,d5
  6064. move.w d5,d3
  6065. asr.w #2,d3
  6066. add.w d3,d5
  6067. add.w d5,(a2)+
  6068. adda.w ($6200,a1),a1
  6069. dbra.w d4,L003bf8
  6070. swap.w d6
  6071. move.w d5,d6
  6072. rts
  6073. L003c2e:
  6074. swap.w d6
  6075. moveq.l #$1f,d4
  6076. L003c32:
  6077. moveq.l #$00,d2
  6078. move.b (a0)+,d2
  6079. add.w d2,d2
  6080. adda.w d2,a1
  6081. add.w (-$6200,a1),d6
  6082. move.w d6,d5
  6083. asr.w #1,d5
  6084. move.w d5,d3
  6085. asr.w #2,d3
  6086. sub.w d3,d5
  6087. sub.w d5,(a2)+
  6088. sub.w d5,(a2)+
  6089. add.w (a1),d6
  6090. move.w d6,d5
  6091. asr.w #1,d5
  6092. move.w d5,d3
  6093. asr.w #2,d3
  6094. sub.w d3,d5
  6095. sub.w d5,(a2)+
  6096. adda.w ($6200,a1),a1
  6097. dbra.w d4,L003c32
  6098. swap.w d6
  6099. move.w d5,d6
  6100. neg.w d6
  6101. rts
  6102. L003c6a:
  6103. swap.w d6
  6104. moveq.l #$1f,d4
  6105. L003c6e:
  6106. moveq.l #$00,d2
  6107. move.b (a0)+,d2
  6108. add.w d2,d2
  6109. adda.w d2,a1
  6110. add.w (-$6200,a1),d6
  6111. move.w d6,d5
  6112. asr.w #1,d5
  6113. add.w d5,(a2)+
  6114. add.w d5,(a2)+
  6115. add.w (a1),d6
  6116. move.w d6,d5
  6117. asr.w #1,d5
  6118. add.w d5,(a2)+
  6119. adda.w ($6200,a1),a1
  6120. dbra.w d4,L003c6e
  6121. swap.w d6
  6122. move.w d5,d6
  6123. rts
  6124. L003c98:
  6125. swap.w d6
  6126. moveq.l #$1f,d4
  6127. L003c9c:
  6128. moveq.l #$00,d2
  6129. move.b (a0)+,d2
  6130. add.w d2,d2
  6131. adda.w d2,a1
  6132. add.w (-$6200,a1),d6
  6133. move.w d6,d5
  6134. asr.w #1,d5
  6135. move.w d5,d3
  6136. asr.w #2,d3
  6137. add.w d3,d5
  6138. add.w d5,(a2)+
  6139. add.w d5,(a2)+
  6140. add.w (a1),d6
  6141. move.w d6,d5
  6142. asr.w #1,d5
  6143. move.w d5,d3
  6144. asr.w #2,d3
  6145. add.w d3,d5
  6146. add.w d5,(a2)+
  6147. adda.w ($6200,a1),a1
  6148. dbra.w d4,L003c9c
  6149. swap.w d6
  6150. move.w d5,d6
  6151. rts
  6152. L003cd2:
  6153. swap.w d6
  6154. moveq.l #$1f,d4
  6155. L003cd6:
  6156. moveq.l #$00,d2
  6157. move.b (a0)+,d2
  6158. add.w d2,d2
  6159. adda.w d2,a1
  6160. add.w (-$6200,a1),d6
  6161. move.w d6,d5
  6162. asr.w #2,d5
  6163. sub.w d6,d5
  6164. sub.w d5,(a2)+
  6165. sub.w d5,(a2)+
  6166. add.w (a1),d6
  6167. move.w d6,d5
  6168. asr.w #2,d5
  6169. sub.w d6,d5
  6170. sub.w d5,(a2)+
  6171. adda.w ($6200,a1),a1
  6172. dbra.w d4,L003cd6
  6173. swap.w d6
  6174. move.w d5,d6
  6175. neg.w d6
  6176. rts
  6177. L003d06:
  6178. swap.w d6
  6179. moveq.l #$1f,d4
  6180. L003d0a:
  6181. moveq.l #$00,d2
  6182. move.b (a0)+,d2
  6183. add.w d2,d2
  6184. adda.w d2,a1
  6185. add.w (-$6200,a1),d6
  6186. move.w d6,d5
  6187. asr.w #2,d5
  6188. add.w d6,d5
  6189. add.w d5,(a2)+
  6190. add.w d5,(a2)+
  6191. add.w (a1),d6
  6192. move.w d6,d5
  6193. asr.w #2,d5
  6194. add.w d6,d5
  6195. add.w d5,(a2)+
  6196. adda.w ($6200,a1),a1
  6197. dbra.w d4,L003d0a
  6198. swap.w d6
  6199. move.w d5,d6
  6200. rts
  6201. L003d38:
  6202. swap.w d6
  6203. moveq.l #$1f,d4
  6204. L003d3c:
  6205. moveq.l #$00,d2
  6206. move.b (a0)+,d2
  6207. add.w d2,d2
  6208. adda.w d2,a1
  6209. add.w (-$6200,a1),d6
  6210. move.w d6,d5
  6211. asr.w #1,d5
  6212. add.w d6,d5
  6213. add.w d5,(a2)+
  6214. add.w d5,(a2)+
  6215. add.w (a1),d6
  6216. move.w d6,d5
  6217. asr.w #1,d5
  6218. add.w d6,d5
  6219. add.w d5,(a2)+
  6220. adda.w ($6200,a1),a1
  6221. dbra.w d4,L003d3c
  6222. swap.w d6
  6223. move.w d5,d6
  6224. rts
  6225. L003d6a:
  6226. swap.w d6
  6227. moveq.l #$1f,d4
  6228. L003d6e:
  6229. moveq.l #$00,d2
  6230. move.b (a0)+,d2
  6231. add.w d2,d2
  6232. adda.w d2,a1
  6233. add.w (-$6200,a1),d6
  6234. move.w d6,d5
  6235. add.w d5,d5
  6236. add.w d5,(a2)+
  6237. add.w d5,(a2)+
  6238. add.w (a1),d6
  6239. move.w d6,d5
  6240. add.w d5,d5
  6241. add.w d5,(a2)+
  6242. adda.w ($6200,a1),a1
  6243. dbra.w d4,L003d6e
  6244. swap.w d6
  6245. move.w d5,d6
  6246. rts
  6247. L003d98:
  6248. swap.w d6
  6249. moveq.l #$1f,d4
  6250. L003d9c:
  6251. moveq.l #$00,d2
  6252. move.b (a0)+,d2
  6253. add.w d2,d2
  6254. adda.w d2,a1
  6255. add.w (-$6200,a1),d6
  6256. move.w d6,d5
  6257. asr.w #1,d5
  6258. add.w d6,d5
  6259. add.w d6,d5
  6260. add.w d5,(a2)+
  6261. add.w d5,(a2)+
  6262. add.w (a1),d6
  6263. move.w d6,d5
  6264. asr.w #1,d5
  6265. add.w d6,d5
  6266. add.w d6,d5
  6267. add.w d5,(a2)+
  6268. adda.w ($6200,a1),a1
  6269. dbra.w d4,L003d9c
  6270. swap.w d6
  6271. move.w d5,d6
  6272. rts
  6273. L003dce:
  6274. swap.w d6
  6275. moveq.l #$1f,d4
  6276. L003dd2:
  6277. moveq.l #$00,d2
  6278. move.b (a0)+,d2
  6279. add.w d2,d2
  6280. adda.w d2,a1
  6281. add.w (-$6200,a1),d6
  6282. move.w d6,d5
  6283. add.w d5,d5
  6284. add.w d6,d5
  6285. add.w d5,(a2)+
  6286. add.w d5,(a2)+
  6287. add.w (a1),d6
  6288. move.w d6,d5
  6289. add.w d5,d5
  6290. add.w d6,d5
  6291. add.w d5,(a2)+
  6292. adda.w ($6200,a1),a1
  6293. dbra.w d4,L003dd2
  6294. swap.w d6
  6295. move.w d5,d6
  6296. rts
  6297. L003e00:
  6298. swap.w d6
  6299. moveq.l #$1f,d4
  6300. L003e04:
  6301. moveq.l #$00,d2
  6302. move.b (a0)+,d2
  6303. add.w d2,d2
  6304. adda.w d2,a1
  6305. add.w (-$6200,a1),d6
  6306. move.w d6,d5
  6307. add.w d5,d5
  6308. add.w d5,d5
  6309. add.w d5,(a2)+
  6310. add.w d5,(a2)+
  6311. add.w (a1),d6
  6312. move.w d6,d5
  6313. add.w d5,d5
  6314. add.w d5,d5
  6315. add.w d5,(a2)+
  6316. adda.w ($6200,a1),a1
  6317. dbra.w d4,L003e04
  6318. swap.w d6
  6319. move.w d5,d6
  6320. rts
  6321. L003e32:
  6322. swap.w d6
  6323. moveq.l #$1f,d4
  6324. L003e36:
  6325. moveq.l #$00,d2
  6326. move.b (a0)+,d2
  6327. add.w d2,d2
  6328. adda.w d2,a1
  6329. add.w (-$6200,a1),d6
  6330. move.w d6,d5
  6331. add.w d5,d5
  6332. add.w d5,d5
  6333. add.w d6,d5
  6334. add.w d5,(a2)+
  6335. add.w d5,(a2)+
  6336. add.w (a1),d6
  6337. move.w d6,d5
  6338. add.w d5,d5
  6339. add.w d5,d5
  6340. add.w d6,d5
  6341. add.w d5,(a2)+
  6342. adda.w ($6200,a1),a1
  6343. dbra.w d4,L003e36
  6344. swap.w d6
  6345. move.w d5,d6
  6346. rts
  6347. L003e68:
  6348. swap.w d6
  6349. moveq.l #$1f,d4
  6350. L003e6c:
  6351. moveq.l #$00,d2
  6352. move.b (a0)+,d2
  6353. add.w d2,d2
  6354. adda.w d2,a1
  6355. add.w (-$6200,a1),d6
  6356. add.w d6,(a2)+
  6357. add.w d6,(a2)+
  6358. add.w (a1),d6
  6359. add.w d6,(a2)+
  6360. adda.w ($6200,a1),a1
  6361. dbra.w d4,L003e6c
  6362. move.w d6,d5
  6363. swap.w d6
  6364. move.w d5,d6
  6365. rts
  6366. L003e90:
  6367. swap.w d6
  6368. moveq.l #$07,d4
  6369. L003e94:
  6370. moveq.l #$00,d2
  6371. move.b (a0)+,d2
  6372. add.w d2,d2
  6373. adda.w d2,a1
  6374. add.w (-$6200,a1),d6
  6375. move.w d6,d5
  6376. asr.w #3,d5
  6377. add.w d5,(a2)+
  6378. add.w (a1),d6
  6379. move.w d6,d5
  6380. asr.w #3,d5
  6381. add.w d5,(a2)+
  6382. moveq.l #$00,d2
  6383. move.b (a0)+,d2
  6384. add.w d2,d2
  6385. add.w ($6200,a1),d2
  6386. adda.w d2,a1
  6387. add.w (-$6200,a1),d6
  6388. move.w d6,d5
  6389. asr.w #3,d5
  6390. add.w d5,(a2)+
  6391. add.w (a1),d6
  6392. move.w d6,d5
  6393. asr.w #3,d5
  6394. add.w d5,(a2)+
  6395. moveq.l #$00,d2
  6396. move.b (a0)+,d2
  6397. add.w d2,d2
  6398. add.w ($6200,a1),d2
  6399. adda.w d2,a1
  6400. add.w (-$6200,a1),d6
  6401. move.w d6,d5
  6402. asr.w #3,d5
  6403. add.w d5,(a2)+
  6404. add.w (a1),d6
  6405. move.w d6,d5
  6406. asr.w #3,d5
  6407. add.w d5,(a2)+
  6408. moveq.l #$00,d2
  6409. move.b (a0)+,d2
  6410. add.w d2,d2
  6411. add.w ($6200,a1),d2
  6412. adda.w d2,a1
  6413. add.w (-$6200,a1),d6
  6414. move.w d6,d5
  6415. asr.w #3,d5
  6416. add.w d5,(a2)+
  6417. add.w (a1),d6
  6418. move.w d6,d5
  6419. asr.w #3,d5
  6420. add.w d5,(a2)+
  6421. moveq.l #$00,d2
  6422. move.b (a0)+,d2
  6423. add.w d2,d2
  6424. add.w ($6200,a1),d2
  6425. adda.w d2,a1
  6426. add.w (-$6200,a1),d6
  6427. move.w d6,d5
  6428. asr.w #3,d5
  6429. add.w d5,(a2)+
  6430. add.w (a1),d6
  6431. move.w d6,d5
  6432. asr.w #3,d5
  6433. add.w d5,(a2)+
  6434. moveq.l #$00,d2
  6435. move.b (a0)+,d2
  6436. add.w d2,d2
  6437. add.w ($6200,a1),d2
  6438. adda.w d2,a1
  6439. add.w (-$6200,a1),d6
  6440. move.w d6,d5
  6441. asr.w #3,d5
  6442. add.w d5,(a2)+
  6443. add.w (a1),d6
  6444. move.w d6,d5
  6445. asr.w #3,d5
  6446. add.w d5,(a2)+
  6447. adda.w ($6200,a1),a1
  6448. dbra.w d4,L003e94
  6449. swap.w d6
  6450. move.w d5,d6
  6451. rts
  6452. L003f52:
  6453. swap.w d6
  6454. moveq.l #$07,d4
  6455. L003f56:
  6456. moveq.l #$00,d2
  6457. move.b (a0)+,d2
  6458. add.w d2,d2
  6459. adda.w d2,a1
  6460. add.w (-$6200,a1),d6
  6461. move.w d6,d5
  6462. asr.w #2,d5
  6463. move.w d5,d3
  6464. asr.w #2,d3
  6465. sub.w d3,d5
  6466. sub.w d5,(a2)+
  6467. add.w (a1),d6
  6468. move.w d6,d5
  6469. asr.w #2,d5
  6470. move.w d5,d3
  6471. asr.w #2,d3
  6472. sub.w d3,d5
  6473. sub.w d5,(a2)+
  6474. moveq.l #$00,d2
  6475. move.b (a0)+,d2
  6476. add.w d2,d2
  6477. add.w ($6200,a1),d2
  6478. adda.w d2,a1
  6479. add.w (-$6200,a1),d6
  6480. move.w d6,d5
  6481. asr.w #2,d5
  6482. move.w d5,d3
  6483. asr.w #2,d3
  6484. sub.w d3,d5
  6485. sub.w d5,(a2)+
  6486. add.w (a1),d6
  6487. move.w d6,d5
  6488. asr.w #2,d5
  6489. move.w d5,d3
  6490. asr.w #2,d3
  6491. sub.w d3,d5
  6492. sub.w d5,(a2)+
  6493. moveq.l #$00,d2
  6494. move.b (a0)+,d2
  6495. add.w d2,d2
  6496. add.w ($6200,a1),d2
  6497. adda.w d2,a1
  6498. add.w (-$6200,a1),d6
  6499. move.w d6,d5
  6500. asr.w #2,d5
  6501. move.w d5,d3
  6502. asr.w #2,d3
  6503. sub.w d3,d5
  6504. sub.w d5,(a2)+
  6505. add.w (a1),d6
  6506. move.w d6,d5
  6507. asr.w #2,d5
  6508. move.w d5,d3
  6509. asr.w #2,d3
  6510. sub.w d3,d5
  6511. sub.w d5,(a2)+
  6512. moveq.l #$00,d2
  6513. move.b (a0)+,d2
  6514. add.w d2,d2
  6515. add.w ($6200,a1),d2
  6516. adda.w d2,a1
  6517. add.w (-$6200,a1),d6
  6518. move.w d6,d5
  6519. asr.w #2,d5
  6520. move.w d5,d3
  6521. asr.w #2,d3
  6522. sub.w d3,d5
  6523. sub.w d5,(a2)+
  6524. add.w (a1),d6
  6525. move.w d6,d5
  6526. asr.w #2,d5
  6527. move.w d5,d3
  6528. asr.w #2,d3
  6529. sub.w d3,d5
  6530. sub.w d5,(a2)+
  6531. moveq.l #$00,d2
  6532. move.b (a0)+,d2
  6533. add.w d2,d2
  6534. add.w ($6200,a1),d2
  6535. adda.w d2,a1
  6536. add.w (-$6200,a1),d6
  6537. move.w d6,d5
  6538. asr.w #2,d5
  6539. move.w d5,d3
  6540. asr.w #2,d3
  6541. sub.w d3,d5
  6542. sub.w d5,(a2)+
  6543. add.w (a1),d6
  6544. move.w d6,d5
  6545. asr.w #2,d5
  6546. move.w d5,d3
  6547. asr.w #2,d3
  6548. sub.w d3,d5
  6549. sub.w d5,(a2)+
  6550. moveq.l #$00,d2
  6551. move.b (a0)+,d2
  6552. add.w d2,d2
  6553. add.w ($6200,a1),d2
  6554. adda.w d2,a1
  6555. add.w (-$6200,a1),d6
  6556. move.w d6,d5
  6557. asr.w #2,d5
  6558. move.w d5,d3
  6559. asr.w #2,d3
  6560. sub.w d3,d5
  6561. sub.w d5,(a2)+
  6562. add.w (a1),d6
  6563. move.w d6,d5
  6564. asr.w #2,d5
  6565. move.w d5,d3
  6566. asr.w #2,d3
  6567. sub.w d3,d5
  6568. sub.w d5,(a2)+
  6569. adda.w ($6200,a1),a1
  6570. dbra.w d4,L003f56
  6571. swap.w d6
  6572. move.w d5,d6
  6573. neg.w d6
  6574. rts
  6575. L00405e:
  6576. swap.w d6
  6577. moveq.l #$07,d4
  6578. L004062:
  6579. moveq.l #$00,d2
  6580. move.b (a0)+,d2
  6581. add.w d2,d2
  6582. adda.w d2,a1
  6583. add.w (-$6200,a1),d6
  6584. move.w d6,d5
  6585. asr.w #2,d5
  6586. add.w d5,(a2)+
  6587. add.w (a1),d6
  6588. move.w d6,d5
  6589. asr.w #2,d5
  6590. add.w d5,(a2)+
  6591. moveq.l #$00,d2
  6592. move.b (a0)+,d2
  6593. add.w d2,d2
  6594. add.w ($6200,a1),d2
  6595. adda.w d2,a1
  6596. add.w (-$6200,a1),d6
  6597. move.w d6,d5
  6598. asr.w #2,d5
  6599. add.w d5,(a2)+
  6600. add.w (a1),d6
  6601. move.w d6,d5
  6602. asr.w #2,d5
  6603. add.w d5,(a2)+
  6604. moveq.l #$00,d2
  6605. move.b (a0)+,d2
  6606. add.w d2,d2
  6607. add.w ($6200,a1),d2
  6608. adda.w d2,a1
  6609. add.w (-$6200,a1),d6
  6610. move.w d6,d5
  6611. asr.w #2,d5
  6612. add.w d5,(a2)+
  6613. add.w (a1),d6
  6614. move.w d6,d5
  6615. asr.w #2,d5
  6616. add.w d5,(a2)+
  6617. moveq.l #$00,d2
  6618. move.b (a0)+,d2
  6619. add.w d2,d2
  6620. add.w ($6200,a1),d2
  6621. adda.w d2,a1
  6622. add.w (-$6200,a1),d6
  6623. move.w d6,d5
  6624. asr.w #2,d5
  6625. add.w d5,(a2)+
  6626. add.w (a1),d6
  6627. move.w d6,d5
  6628. asr.w #2,d5
  6629. add.w d5,(a2)+
  6630. moveq.l #$00,d2
  6631. move.b (a0)+,d2
  6632. add.w d2,d2
  6633. add.w ($6200,a1),d2
  6634. adda.w d2,a1
  6635. add.w (-$6200,a1),d6
  6636. move.w d6,d5
  6637. asr.w #2,d5
  6638. add.w d5,(a2)+
  6639. add.w (a1),d6
  6640. move.w d6,d5
  6641. asr.w #2,d5
  6642. add.w d5,(a2)+
  6643. moveq.l #$00,d2
  6644. move.b (a0)+,d2
  6645. add.w d2,d2
  6646. add.w ($6200,a1),d2
  6647. adda.w d2,a1
  6648. add.w (-$6200,a1),d6
  6649. move.w d6,d5
  6650. asr.w #2,d5
  6651. add.w d5,(a2)+
  6652. add.w (a1),d6
  6653. move.w d6,d5
  6654. asr.w #2,d5
  6655. add.w d5,(a2)+
  6656. adda.w ($6200,a1),a1
  6657. dbra.w d4,L004062
  6658. swap.w d6
  6659. move.w d5,d6
  6660. rts
  6661. L004120:
  6662. swap.w d6
  6663. moveq.l #$07,d4
  6664. L004124:
  6665. moveq.l #$00,d2
  6666. move.b (a0)+,d2
  6667. add.w d2,d2
  6668. adda.w d2,a1
  6669. add.w (-$6200,a1),d6
  6670. move.w d6,d5
  6671. asr.w #2,d5
  6672. move.w d5,d3
  6673. asr.w #2,d3
  6674. add.w d3,d5
  6675. add.w d5,(a2)+
  6676. add.w (a1),d6
  6677. move.w d6,d5
  6678. asr.w #2,d5
  6679. move.w d5,d3
  6680. asr.w #2,d3
  6681. add.w d3,d5
  6682. add.w d5,(a2)+
  6683. moveq.l #$00,d2
  6684. move.b (a0)+,d2
  6685. add.w d2,d2
  6686. add.w ($6200,a1),d2
  6687. adda.w d2,a1
  6688. add.w (-$6200,a1),d6
  6689. move.w d6,d5
  6690. asr.w #2,d5
  6691. move.w d5,d3
  6692. asr.w #2,d3
  6693. add.w d3,d5
  6694. add.w d5,(a2)+
  6695. add.w (a1),d6
  6696. move.w d6,d5
  6697. asr.w #2,d5
  6698. move.w d5,d3
  6699. asr.w #2,d3
  6700. add.w d3,d5
  6701. add.w d5,(a2)+
  6702. moveq.l #$00,d2
  6703. move.b (a0)+,d2
  6704. add.w d2,d2
  6705. add.w ($6200,a1),d2
  6706. adda.w d2,a1
  6707. add.w (-$6200,a1),d6
  6708. move.w d6,d5
  6709. asr.w #2,d5
  6710. move.w d5,d3
  6711. asr.w #2,d3
  6712. add.w d3,d5
  6713. add.w d5,(a2)+
  6714. add.w (a1),d6
  6715. move.w d6,d5
  6716. asr.w #2,d5
  6717. move.w d5,d3
  6718. asr.w #2,d3
  6719. add.w d3,d5
  6720. add.w d5,(a2)+
  6721. moveq.l #$00,d2
  6722. move.b (a0)+,d2
  6723. add.w d2,d2
  6724. add.w ($6200,a1),d2
  6725. adda.w d2,a1
  6726. add.w (-$6200,a1),d6
  6727. move.w d6,d5
  6728. asr.w #2,d5
  6729. move.w d5,d3
  6730. asr.w #2,d3
  6731. add.w d3,d5
  6732. add.w d5,(a2)+
  6733. add.w (a1),d6
  6734. move.w d6,d5
  6735. asr.w #2,d5
  6736. move.w d5,d3
  6737. asr.w #2,d3
  6738. add.w d3,d5
  6739. add.w d5,(a2)+
  6740. moveq.l #$00,d2
  6741. move.b (a0)+,d2
  6742. add.w d2,d2
  6743. add.w ($6200,a1),d2
  6744. adda.w d2,a1
  6745. add.w (-$6200,a1),d6
  6746. move.w d6,d5
  6747. asr.w #2,d5
  6748. move.w d5,d3
  6749. asr.w #2,d3
  6750. add.w d3,d5
  6751. add.w d5,(a2)+
  6752. add.w (a1),d6
  6753. move.w d6,d5
  6754. asr.w #2,d5
  6755. move.w d5,d3
  6756. asr.w #2,d3
  6757. add.w d3,d5
  6758. add.w d5,(a2)+
  6759. moveq.l #$00,d2
  6760. move.b (a0)+,d2
  6761. add.w d2,d2
  6762. add.w ($6200,a1),d2
  6763. adda.w d2,a1
  6764. add.w (-$6200,a1),d6
  6765. move.w d6,d5
  6766. asr.w #2,d5
  6767. move.w d5,d3
  6768. asr.w #2,d3
  6769. add.w d3,d5
  6770. add.w d5,(a2)+
  6771. add.w (a1),d6
  6772. move.w d6,d5
  6773. asr.w #2,d5
  6774. move.w d5,d3
  6775. asr.w #2,d3
  6776. add.w d3,d5
  6777. add.w d5,(a2)+
  6778. adda.w ($6200,a1),a1
  6779. dbra.w d4,L004124
  6780. swap.w d6
  6781. move.w d5,d6
  6782. rts
  6783. L00422a:
  6784. swap.w d6
  6785. moveq.l #$07,d4
  6786. L00422e:
  6787. moveq.l #$00,d2
  6788. move.b (a0)+,d2
  6789. add.w d2,d2
  6790. adda.w d2,a1
  6791. add.w (-$6200,a1),d6
  6792. move.w d6,d5
  6793. asr.w #1,d5
  6794. move.w d5,d3
  6795. asr.w #2,d3
  6796. sub.w d3,d5
  6797. sub.w d5,(a2)+
  6798. add.w (a1),d6
  6799. move.w d6,d5
  6800. asr.w #1,d5
  6801. move.w d5,d3
  6802. asr.w #2,d3
  6803. sub.w d3,d5
  6804. sub.w d5,(a2)+
  6805. moveq.l #$00,d2
  6806. move.b (a0)+,d2
  6807. add.w d2,d2
  6808. add.w ($6200,a1),d2
  6809. adda.w d2,a1
  6810. add.w (-$6200,a1),d6
  6811. move.w d6,d5
  6812. asr.w #1,d5
  6813. move.w d5,d3
  6814. asr.w #2,d3
  6815. sub.w d3,d5
  6816. sub.w d5,(a2)+
  6817. add.w (a1),d6
  6818. move.w d6,d5
  6819. asr.w #1,d5
  6820. move.w d5,d3
  6821. asr.w #2,d3
  6822. sub.w d3,d5
  6823. sub.w d5,(a2)+
  6824. moveq.l #$00,d2
  6825. move.b (a0)+,d2
  6826. add.w d2,d2
  6827. add.w ($6200,a1),d2
  6828. adda.w d2,a1
  6829. add.w (-$6200,a1),d6
  6830. move.w d6,d5
  6831. asr.w #1,d5
  6832. move.w d5,d3
  6833. asr.w #2,d3
  6834. sub.w d3,d5
  6835. sub.w d5,(a2)+
  6836. add.w (a1),d6
  6837. move.w d6,d5
  6838. asr.w #1,d5
  6839. move.w d5,d3
  6840. asr.w #2,d3
  6841. sub.w d3,d5
  6842. sub.w d5,(a2)+
  6843. moveq.l #$00,d2
  6844. move.b (a0)+,d2
  6845. add.w d2,d2
  6846. add.w ($6200,a1),d2
  6847. adda.w d2,a1
  6848. add.w (-$6200,a1),d6
  6849. move.w d6,d5
  6850. asr.w #1,d5
  6851. move.w d5,d3
  6852. asr.w #2,d3
  6853. sub.w d3,d5
  6854. sub.w d5,(a2)+
  6855. add.w (a1),d6
  6856. move.w d6,d5
  6857. asr.w #1,d5
  6858. move.w d5,d3
  6859. asr.w #2,d3
  6860. sub.w d3,d5
  6861. sub.w d5,(a2)+
  6862. moveq.l #$00,d2
  6863. move.b (a0)+,d2
  6864. add.w d2,d2
  6865. add.w ($6200,a1),d2
  6866. adda.w d2,a1
  6867. add.w (-$6200,a1),d6
  6868. move.w d6,d5
  6869. asr.w #1,d5
  6870. move.w d5,d3
  6871. asr.w #2,d3
  6872. sub.w d3,d5
  6873. sub.w d5,(a2)+
  6874. add.w (a1),d6
  6875. move.w d6,d5
  6876. asr.w #1,d5
  6877. move.w d5,d3
  6878. asr.w #2,d3
  6879. sub.w d3,d5
  6880. sub.w d5,(a2)+
  6881. moveq.l #$00,d2
  6882. move.b (a0)+,d2
  6883. add.w d2,d2
  6884. add.w ($6200,a1),d2
  6885. adda.w d2,a1
  6886. add.w (-$6200,a1),d6
  6887. move.w d6,d5
  6888. asr.w #1,d5
  6889. move.w d5,d3
  6890. asr.w #2,d3
  6891. sub.w d3,d5
  6892. sub.w d5,(a2)+
  6893. add.w (a1),d6
  6894. move.w d6,d5
  6895. asr.w #1,d5
  6896. move.w d5,d3
  6897. asr.w #2,d3
  6898. sub.w d3,d5
  6899. sub.w d5,(a2)+
  6900. adda.w ($6200,a1),a1
  6901. dbra.w d4,L00422e
  6902. swap.w d6
  6903. move.w d5,d6
  6904. neg.w d6
  6905. rts
  6906. L004336:
  6907. swap.w d6
  6908. moveq.l #$07,d4
  6909. L00433a:
  6910. moveq.l #$00,d2
  6911. move.b (a0)+,d2
  6912. add.w d2,d2
  6913. adda.w d2,a1
  6914. add.w (-$6200,a1),d6
  6915. move.w d6,d5
  6916. asr.w #1,d5
  6917. add.w d5,(a2)+
  6918. add.w (a1),d6
  6919. move.w d6,d5
  6920. asr.w #1,d5
  6921. add.w d5,(a2)+
  6922. moveq.l #$00,d2
  6923. move.b (a0)+,d2
  6924. add.w d2,d2
  6925. add.w ($6200,a1),d2
  6926. adda.w d2,a1
  6927. add.w (-$6200,a1),d6
  6928. move.w d6,d5
  6929. asr.w #1,d5
  6930. add.w d5,(a2)+
  6931. add.w (a1),d6
  6932. move.w d6,d5
  6933. asr.w #1,d5
  6934. add.w d5,(a2)+
  6935. moveq.l #$00,d2
  6936. move.b (a0)+,d2
  6937. add.w d2,d2
  6938. add.w ($6200,a1),d2
  6939. adda.w d2,a1
  6940. add.w (-$6200,a1),d6
  6941. move.w d6,d5
  6942. asr.w #1,d5
  6943. add.w d5,(a2)+
  6944. add.w (a1),d6
  6945. move.w d6,d5
  6946. asr.w #1,d5
  6947. add.w d5,(a2)+
  6948. moveq.l #$00,d2
  6949. move.b (a0)+,d2
  6950. add.w d2,d2
  6951. add.w ($6200,a1),d2
  6952. adda.w d2,a1
  6953. add.w (-$6200,a1),d6
  6954. move.w d6,d5
  6955. asr.w #1,d5
  6956. add.w d5,(a2)+
  6957. add.w (a1),d6
  6958. move.w d6,d5
  6959. asr.w #1,d5
  6960. add.w d5,(a2)+
  6961. moveq.l #$00,d2
  6962. move.b (a0)+,d2
  6963. add.w d2,d2
  6964. add.w ($6200,a1),d2
  6965. adda.w d2,a1
  6966. add.w (-$6200,a1),d6
  6967. move.w d6,d5
  6968. asr.w #1,d5
  6969. add.w d5,(a2)+
  6970. add.w (a1),d6
  6971. move.w d6,d5
  6972. asr.w #1,d5
  6973. add.w d5,(a2)+
  6974. moveq.l #$00,d2
  6975. move.b (a0)+,d2
  6976. add.w d2,d2
  6977. add.w ($6200,a1),d2
  6978. adda.w d2,a1
  6979. add.w (-$6200,a1),d6
  6980. move.w d6,d5
  6981. asr.w #1,d5
  6982. add.w d5,(a2)+
  6983. add.w (a1),d6
  6984. move.w d6,d5
  6985. asr.w #1,d5
  6986. add.w d5,(a2)+
  6987. adda.w ($6200,a1),a1
  6988. dbra.w d4,L00433a
  6989. swap.w d6
  6990. move.w d5,d6
  6991. rts
  6992. L0043f8:
  6993. swap.w d6
  6994. moveq.l #$07,d4
  6995. L0043fc:
  6996. moveq.l #$00,d2
  6997. move.b (a0)+,d2
  6998. add.w d2,d2
  6999. adda.w d2,a1
  7000. add.w (-$6200,a1),d6
  7001. move.w d6,d5
  7002. asr.w #1,d5
  7003. move.w d5,d3
  7004. asr.w #2,d3
  7005. add.w d3,d5
  7006. add.w d5,(a2)+
  7007. add.w (a1),d6
  7008. move.w d6,d5
  7009. asr.w #1,d5
  7010. move.w d5,d3
  7011. asr.w #2,d3
  7012. add.w d3,d5
  7013. add.w d5,(a2)+
  7014. moveq.l #$00,d2
  7015. move.b (a0)+,d2
  7016. add.w d2,d2
  7017. add.w ($6200,a1),d2
  7018. adda.w d2,a1
  7019. add.w (-$6200,a1),d6
  7020. move.w d6,d5
  7021. asr.w #1,d5
  7022. move.w d5,d3
  7023. asr.w #2,d3
  7024. add.w d3,d5
  7025. add.w d5,(a2)+
  7026. add.w (a1),d6
  7027. move.w d6,d5
  7028. asr.w #1,d5
  7029. move.w d5,d3
  7030. asr.w #2,d3
  7031. add.w d3,d5
  7032. add.w d5,(a2)+
  7033. moveq.l #$00,d2
  7034. move.b (a0)+,d2
  7035. add.w d2,d2
  7036. add.w ($6200,a1),d2
  7037. adda.w d2,a1
  7038. add.w (-$6200,a1),d6
  7039. move.w d6,d5
  7040. asr.w #1,d5
  7041. move.w d5,d3
  7042. asr.w #2,d3
  7043. add.w d3,d5
  7044. add.w d5,(a2)+
  7045. add.w (a1),d6
  7046. move.w d6,d5
  7047. asr.w #1,d5
  7048. move.w d5,d3
  7049. asr.w #2,d3
  7050. add.w d3,d5
  7051. add.w d5,(a2)+
  7052. moveq.l #$00,d2
  7053. move.b (a0)+,d2
  7054. add.w d2,d2
  7055. add.w ($6200,a1),d2
  7056. adda.w d2,a1
  7057. add.w (-$6200,a1),d6
  7058. move.w d6,d5
  7059. asr.w #1,d5
  7060. move.w d5,d3
  7061. asr.w #2,d3
  7062. add.w d3,d5
  7063. add.w d5,(a2)+
  7064. add.w (a1),d6
  7065. move.w d6,d5
  7066. asr.w #1,d5
  7067. move.w d5,d3
  7068. asr.w #2,d3
  7069. add.w d3,d5
  7070. add.w d5,(a2)+
  7071. moveq.l #$00,d2
  7072. move.b (a0)+,d2
  7073. add.w d2,d2
  7074. add.w ($6200,a1),d2
  7075. adda.w d2,a1
  7076. add.w (-$6200,a1),d6
  7077. move.w d6,d5
  7078. asr.w #1,d5
  7079. move.w d5,d3
  7080. asr.w #2,d3
  7081. add.w d3,d5
  7082. add.w d5,(a2)+
  7083. add.w (a1),d6
  7084. move.w d6,d5
  7085. asr.w #1,d5
  7086. move.w d5,d3
  7087. asr.w #2,d3
  7088. add.w d3,d5
  7089. add.w d5,(a2)+
  7090. moveq.l #$00,d2
  7091. move.b (a0)+,d2
  7092. add.w d2,d2
  7093. add.w ($6200,a1),d2
  7094. adda.w d2,a1
  7095. add.w (-$6200,a1),d6
  7096. move.w d6,d5
  7097. asr.w #1,d5
  7098. move.w d5,d3
  7099. asr.w #2,d3
  7100. add.w d3,d5
  7101. add.w d5,(a2)+
  7102. add.w (a1),d6
  7103. move.w d6,d5
  7104. asr.w #1,d5
  7105. move.w d5,d3
  7106. asr.w #2,d3
  7107. add.w d3,d5
  7108. add.w d5,(a2)+
  7109. adda.w ($6200,a1),a1
  7110. dbra.w d4,L0043fc
  7111. swap.w d6
  7112. move.w d5,d6
  7113. rts
  7114. L004502:
  7115. swap.w d6
  7116. moveq.l #$07,d4
  7117. L004506:
  7118. moveq.l #$00,d2
  7119. move.b (a0)+,d2
  7120. add.w d2,d2
  7121. adda.w d2,a1
  7122. add.w (-$6200,a1),d6
  7123. move.w d6,d5
  7124. asr.w #2,d5
  7125. sub.w d6,d5
  7126. sub.w d5,(a2)+
  7127. add.w (a1),d6
  7128. move.w d6,d5
  7129. asr.w #2,d5
  7130. sub.w d6,d5
  7131. sub.w d5,(a2)+
  7132. moveq.l #$00,d2
  7133. move.b (a0)+,d2
  7134. add.w d2,d2
  7135. add.w ($6200,a1),d2
  7136. adda.w d2,a1
  7137. add.w (-$6200,a1),d6
  7138. move.w d6,d5
  7139. asr.w #2,d5
  7140. sub.w d6,d5
  7141. sub.w d5,(a2)+
  7142. add.w (a1),d6
  7143. move.w d6,d5
  7144. asr.w #2,d5
  7145. sub.w d6,d5
  7146. sub.w d5,(a2)+
  7147. moveq.l #$00,d2
  7148. move.b (a0)+,d2
  7149. add.w d2,d2
  7150. add.w ($6200,a1),d2
  7151. adda.w d2,a1
  7152. add.w (-$6200,a1),d6
  7153. move.w d6,d5
  7154. asr.w #2,d5
  7155. sub.w d6,d5
  7156. sub.w d5,(a2)+
  7157. add.w (a1),d6
  7158. move.w d6,d5
  7159. asr.w #2,d5
  7160. sub.w d6,d5
  7161. sub.w d5,(a2)+
  7162. moveq.l #$00,d2
  7163. move.b (a0)+,d2
  7164. add.w d2,d2
  7165. add.w ($6200,a1),d2
  7166. adda.w d2,a1
  7167. add.w (-$6200,a1),d6
  7168. move.w d6,d5
  7169. asr.w #2,d5
  7170. sub.w d6,d5
  7171. sub.w d5,(a2)+
  7172. add.w (a1),d6
  7173. move.w d6,d5
  7174. asr.w #2,d5
  7175. sub.w d6,d5
  7176. sub.w d5,(a2)+
  7177. moveq.l #$00,d2
  7178. move.b (a0)+,d2
  7179. add.w d2,d2
  7180. add.w ($6200,a1),d2
  7181. adda.w d2,a1
  7182. add.w (-$6200,a1),d6
  7183. move.w d6,d5
  7184. asr.w #2,d5
  7185. sub.w d6,d5
  7186. sub.w d5,(a2)+
  7187. add.w (a1),d6
  7188. move.w d6,d5
  7189. asr.w #2,d5
  7190. sub.w d6,d5
  7191. sub.w d5,(a2)+
  7192. moveq.l #$00,d2
  7193. move.b (a0)+,d2
  7194. add.w d2,d2
  7195. add.w ($6200,a1),d2
  7196. adda.w d2,a1
  7197. add.w (-$6200,a1),d6
  7198. move.w d6,d5
  7199. asr.w #2,d5
  7200. sub.w d6,d5
  7201. sub.w d5,(a2)+
  7202. add.w (a1),d6
  7203. move.w d6,d5
  7204. asr.w #2,d5
  7205. sub.w d6,d5
  7206. sub.w d5,(a2)+
  7207. adda.w ($6200,a1),a1
  7208. dbra.w d4,L004506
  7209. swap.w d6
  7210. move.w d5,d6
  7211. neg.w d6
  7212. rts
  7213. L0045de:
  7214. swap.w d6
  7215. moveq.l #$07,d4
  7216. L0045e2:
  7217. moveq.l #$00,d2
  7218. move.b (a0)+,d2
  7219. add.w d2,d2
  7220. adda.w d2,a1
  7221. add.w (-$6200,a1),d6
  7222. move.w d6,d5
  7223. asr.w #2,d5
  7224. add.w d6,d5
  7225. add.w d5,(a2)+
  7226. add.w (a1),d6
  7227. move.w d6,d5
  7228. asr.w #2,d5
  7229. add.w d6,d5
  7230. add.w d5,(a2)+
  7231. moveq.l #$00,d2
  7232. move.b (a0)+,d2
  7233. add.w d2,d2
  7234. add.w ($6200,a1),d2
  7235. adda.w d2,a1
  7236. add.w (-$6200,a1),d6
  7237. move.w d6,d5
  7238. asr.w #2,d5
  7239. add.w d6,d5
  7240. add.w d5,(a2)+
  7241. add.w (a1),d6
  7242. move.w d6,d5
  7243. asr.w #2,d5
  7244. add.w d6,d5
  7245. add.w d5,(a2)+
  7246. moveq.l #$00,d2
  7247. move.b (a0)+,d2
  7248. add.w d2,d2
  7249. add.w ($6200,a1),d2
  7250. adda.w d2,a1
  7251. add.w (-$6200,a1),d6
  7252. move.w d6,d5
  7253. asr.w #2,d5
  7254. add.w d6,d5
  7255. add.w d5,(a2)+
  7256. add.w (a1),d6
  7257. move.w d6,d5
  7258. asr.w #2,d5
  7259. add.w d6,d5
  7260. add.w d5,(a2)+
  7261. moveq.l #$00,d2
  7262. move.b (a0)+,d2
  7263. add.w d2,d2
  7264. add.w ($6200,a1),d2
  7265. adda.w d2,a1
  7266. add.w (-$6200,a1),d6
  7267. move.w d6,d5
  7268. asr.w #2,d5
  7269. add.w d6,d5
  7270. add.w d5,(a2)+
  7271. add.w (a1),d6
  7272. move.w d6,d5
  7273. asr.w #2,d5
  7274. add.w d6,d5
  7275. add.w d5,(a2)+
  7276. moveq.l #$00,d2
  7277. move.b (a0)+,d2
  7278. add.w d2,d2
  7279. add.w ($6200,a1),d2
  7280. adda.w d2,a1
  7281. add.w (-$6200,a1),d6
  7282. move.w d6,d5
  7283. asr.w #2,d5
  7284. add.w d6,d5
  7285. add.w d5,(a2)+
  7286. add.w (a1),d6
  7287. move.w d6,d5
  7288. asr.w #2,d5
  7289. add.w d6,d5
  7290. add.w d5,(a2)+
  7291. moveq.l #$00,d2
  7292. move.b (a0)+,d2
  7293. add.w d2,d2
  7294. add.w ($6200,a1),d2
  7295. adda.w d2,a1
  7296. add.w (-$6200,a1),d6
  7297. move.w d6,d5
  7298. asr.w #2,d5
  7299. add.w d6,d5
  7300. add.w d5,(a2)+
  7301. add.w (a1),d6
  7302. move.w d6,d5
  7303. asr.w #2,d5
  7304. add.w d6,d5
  7305. add.w d5,(a2)+
  7306. adda.w ($6200,a1),a1
  7307. dbra.w d4,L0045e2
  7308. swap.w d6
  7309. move.w d5,d6
  7310. rts
  7311. L0046b8:
  7312. swap.w d6
  7313. moveq.l #$07,d4
  7314. L0046bc:
  7315. moveq.l #$00,d2
  7316. move.b (a0)+,d2
  7317. add.w d2,d2
  7318. adda.w d2,a1
  7319. add.w (-$6200,a1),d6
  7320. move.w d6,d5
  7321. asr.w #1,d5
  7322. add.w d6,d5
  7323. add.w d5,(a2)+
  7324. add.w (a1),d6
  7325. move.w d6,d5
  7326. asr.w #1,d5
  7327. add.w d6,d5
  7328. add.w d5,(a2)+
  7329. moveq.l #$00,d2
  7330. move.b (a0)+,d2
  7331. add.w d2,d2
  7332. add.w ($6200,a1),d2
  7333. adda.w d2,a1
  7334. add.w (-$6200,a1),d6
  7335. move.w d6,d5
  7336. asr.w #1,d5
  7337. add.w d6,d5
  7338. add.w d5,(a2)+
  7339. add.w (a1),d6
  7340. move.w d6,d5
  7341. asr.w #1,d5
  7342. add.w d6,d5
  7343. add.w d5,(a2)+
  7344. moveq.l #$00,d2
  7345. move.b (a0)+,d2
  7346. add.w d2,d2
  7347. add.w ($6200,a1),d2
  7348. adda.w d2,a1
  7349. add.w (-$6200,a1),d6
  7350. move.w d6,d5
  7351. asr.w #1,d5
  7352. add.w d6,d5
  7353. add.w d5,(a2)+
  7354. add.w (a1),d6
  7355. move.w d6,d5
  7356. asr.w #1,d5
  7357. add.w d6,d5
  7358. add.w d5,(a2)+
  7359. moveq.l #$00,d2
  7360. move.b (a0)+,d2
  7361. add.w d2,d2
  7362. add.w ($6200,a1),d2
  7363. adda.w d2,a1
  7364. add.w (-$6200,a1),d6
  7365. move.w d6,d5
  7366. asr.w #1,d5
  7367. add.w d6,d5
  7368. add.w d5,(a2)+
  7369. add.w (a1),d6
  7370. move.w d6,d5
  7371. asr.w #1,d5
  7372. add.w d6,d5
  7373. add.w d5,(a2)+
  7374. moveq.l #$00,d2
  7375. move.b (a0)+,d2
  7376. add.w d2,d2
  7377. add.w ($6200,a1),d2
  7378. adda.w d2,a1
  7379. add.w (-$6200,a1),d6
  7380. move.w d6,d5
  7381. asr.w #1,d5
  7382. add.w d6,d5
  7383. add.w d5,(a2)+
  7384. add.w (a1),d6
  7385. move.w d6,d5
  7386. asr.w #1,d5
  7387. add.w d6,d5
  7388. add.w d5,(a2)+
  7389. moveq.l #$00,d2
  7390. move.b (a0)+,d2
  7391. add.w d2,d2
  7392. add.w ($6200,a1),d2
  7393. adda.w d2,a1
  7394. add.w (-$6200,a1),d6
  7395. move.w d6,d5
  7396. asr.w #1,d5
  7397. add.w d6,d5
  7398. add.w d5,(a2)+
  7399. add.w (a1),d6
  7400. move.w d6,d5
  7401. asr.w #1,d5
  7402. add.w d6,d5
  7403. add.w d5,(a2)+
  7404. adda.w ($6200,a1),a1
  7405. dbra.w d4,L0046bc
  7406. swap.w d6
  7407. move.w d5,d6
  7408. rts
  7409. L004792:
  7410. swap.w d6
  7411. moveq.l #$07,d4
  7412. L004796:
  7413. moveq.l #$00,d2
  7414. move.b (a0)+,d2
  7415. add.w d2,d2
  7416. adda.w d2,a1
  7417. add.w (-$6200,a1),d6
  7418. move.w d6,d5
  7419. add.w d5,d5
  7420. add.w d5,(a2)+
  7421. add.w (a1),d6
  7422. move.w d6,d5
  7423. add.w d5,d5
  7424. add.w d5,(a2)+
  7425. moveq.l #$00,d2
  7426. move.b (a0)+,d2
  7427. add.w d2,d2
  7428. add.w ($6200,a1),d2
  7429. adda.w d2,a1
  7430. add.w (-$6200,a1),d6
  7431. move.w d6,d5
  7432. add.w d5,d5
  7433. add.w d5,(a2)+
  7434. add.w (a1),d6
  7435. move.w d6,d5
  7436. add.w d5,d5
  7437. add.w d5,(a2)+
  7438. moveq.l #$00,d2
  7439. move.b (a0)+,d2
  7440. add.w d2,d2
  7441. add.w ($6200,a1),d2
  7442. adda.w d2,a1
  7443. add.w (-$6200,a1),d6
  7444. move.w d6,d5
  7445. add.w d5,d5
  7446. add.w d5,(a2)+
  7447. add.w (a1),d6
  7448. move.w d6,d5
  7449. add.w d5,d5
  7450. add.w d5,(a2)+
  7451. moveq.l #$00,d2
  7452. move.b (a0)+,d2
  7453. add.w d2,d2
  7454. add.w ($6200,a1),d2
  7455. adda.w d2,a1
  7456. add.w (-$6200,a1),d6
  7457. move.w d6,d5
  7458. add.w d5,d5
  7459. add.w d5,(a2)+
  7460. add.w (a1),d6
  7461. move.w d6,d5
  7462. add.w d5,d5
  7463. add.w d5,(a2)+
  7464. moveq.l #$00,d2
  7465. move.b (a0)+,d2
  7466. add.w d2,d2
  7467. add.w ($6200,a1),d2
  7468. adda.w d2,a1
  7469. add.w (-$6200,a1),d6
  7470. move.w d6,d5
  7471. add.w d5,d5
  7472. add.w d5,(a2)+
  7473. add.w (a1),d6
  7474. move.w d6,d5
  7475. add.w d5,d5
  7476. add.w d5,(a2)+
  7477. moveq.l #$00,d2
  7478. move.b (a0)+,d2
  7479. add.w d2,d2
  7480. add.w ($6200,a1),d2
  7481. adda.w d2,a1
  7482. add.w (-$6200,a1),d6
  7483. move.w d6,d5
  7484. add.w d5,d5
  7485. add.w d5,(a2)+
  7486. add.w (a1),d6
  7487. move.w d6,d5
  7488. add.w d5,d5
  7489. add.w d5,(a2)+
  7490. adda.w ($6200,a1),a1
  7491. dbra.w d4,L004796
  7492. swap.w d6
  7493. move.w d5,d6
  7494. rts
  7495. L004854:
  7496. swap.w d6
  7497. moveq.l #$07,d4
  7498. L004858:
  7499. moveq.l #$00,d2
  7500. move.b (a0)+,d2
  7501. add.w d2,d2
  7502. adda.w d2,a1
  7503. add.w (-$6200,a1),d6
  7504. move.w d6,d5
  7505. asr.w #1,d5
  7506. add.w d6,d5
  7507. add.w d6,d5
  7508. add.w d5,(a2)+
  7509. add.w (a1),d6
  7510. move.w d6,d5
  7511. asr.w #1,d5
  7512. add.w d6,d5
  7513. add.w d6,d5
  7514. add.w d5,(a2)+
  7515. moveq.l #$00,d2
  7516. move.b (a0)+,d2
  7517. add.w d2,d2
  7518. add.w ($6200,a1),d2
  7519. adda.w d2,a1
  7520. add.w (-$6200,a1),d6
  7521. move.w d6,d5
  7522. asr.w #1,d5
  7523. add.w d6,d5
  7524. add.w d6,d5
  7525. add.w d5,(a2)+
  7526. add.w (a1),d6
  7527. move.w d6,d5
  7528. asr.w #1,d5
  7529. add.w d6,d5
  7530. add.w d6,d5
  7531. add.w d5,(a2)+
  7532. moveq.l #$00,d2
  7533. move.b (a0)+,d2
  7534. add.w d2,d2
  7535. add.w ($6200,a1),d2
  7536. adda.w d2,a1
  7537. add.w (-$6200,a1),d6
  7538. move.w d6,d5
  7539. asr.w #1,d5
  7540. add.w d6,d5
  7541. add.w d6,d5
  7542. add.w d5,(a2)+
  7543. add.w (a1),d6
  7544. move.w d6,d5
  7545. asr.w #1,d5
  7546. add.w d6,d5
  7547. add.w d6,d5
  7548. add.w d5,(a2)+
  7549. moveq.l #$00,d2
  7550. move.b (a0)+,d2
  7551. add.w d2,d2
  7552. add.w ($6200,a1),d2
  7553. adda.w d2,a1
  7554. add.w (-$6200,a1),d6
  7555. move.w d6,d5
  7556. asr.w #1,d5
  7557. add.w d6,d5
  7558. add.w d6,d5
  7559. add.w d5,(a2)+
  7560. add.w (a1),d6
  7561. move.w d6,d5
  7562. asr.w #1,d5
  7563. add.w d6,d5
  7564. add.w d6,d5
  7565. add.w d5,(a2)+
  7566. moveq.l #$00,d2
  7567. move.b (a0)+,d2
  7568. add.w d2,d2
  7569. add.w ($6200,a1),d2
  7570. adda.w d2,a1
  7571. add.w (-$6200,a1),d6
  7572. move.w d6,d5
  7573. asr.w #1,d5
  7574. add.w d6,d5
  7575. add.w d6,d5
  7576. add.w d5,(a2)+
  7577. add.w (a1),d6
  7578. move.w d6,d5
  7579. asr.w #1,d5
  7580. add.w d6,d5
  7581. add.w d6,d5
  7582. add.w d5,(a2)+
  7583. moveq.l #$00,d2
  7584. move.b (a0)+,d2
  7585. add.w d2,d2
  7586. add.w ($6200,a1),d2
  7587. adda.w d2,a1
  7588. add.w (-$6200,a1),d6
  7589. move.w d6,d5
  7590. asr.w #1,d5
  7591. add.w d6,d5
  7592. add.w d6,d5
  7593. add.w d5,(a2)+
  7594. add.w (a1),d6
  7595. move.w d6,d5
  7596. asr.w #1,d5
  7597. add.w d6,d5
  7598. add.w d6,d5
  7599. add.w d5,(a2)+
  7600. adda.w ($6200,a1),a1
  7601. dbra.w d4,L004858
  7602. swap.w d6
  7603. move.w d5,d6
  7604. rts
  7605. L004946:
  7606. swap.w d6
  7607. moveq.l #$07,d4
  7608. L00494a:
  7609. moveq.l #$00,d2
  7610. move.b (a0)+,d2
  7611. add.w d2,d2
  7612. adda.w d2,a1
  7613. add.w (-$6200,a1),d6
  7614. move.w d6,d5
  7615. add.w d5,d5
  7616. add.w d6,d5
  7617. add.w d5,(a2)+
  7618. add.w (a1),d6
  7619. move.w d6,d5
  7620. add.w d5,d5
  7621. add.w d6,d5
  7622. add.w d5,(a2)+
  7623. moveq.l #$00,d2
  7624. move.b (a0)+,d2
  7625. add.w d2,d2
  7626. add.w ($6200,a1),d2
  7627. adda.w d2,a1
  7628. add.w (-$6200,a1),d6
  7629. move.w d6,d5
  7630. add.w d5,d5
  7631. add.w d6,d5
  7632. add.w d5,(a2)+
  7633. add.w (a1),d6
  7634. move.w d6,d5
  7635. add.w d5,d5
  7636. add.w d6,d5
  7637. add.w d5,(a2)+
  7638. moveq.l #$00,d2
  7639. move.b (a0)+,d2
  7640. add.w d2,d2
  7641. add.w ($6200,a1),d2
  7642. adda.w d2,a1
  7643. add.w (-$6200,a1),d6
  7644. move.w d6,d5
  7645. add.w d5,d5
  7646. add.w d6,d5
  7647. add.w d5,(a2)+
  7648. add.w (a1),d6
  7649. move.w d6,d5
  7650. add.w d5,d5
  7651. add.w d6,d5
  7652. add.w d5,(a2)+
  7653. moveq.l #$00,d2
  7654. move.b (a0)+,d2
  7655. add.w d2,d2
  7656. add.w ($6200,a1),d2
  7657. adda.w d2,a1
  7658. add.w (-$6200,a1),d6
  7659. move.w d6,d5
  7660. add.w d5,d5
  7661. add.w d6,d5
  7662. add.w d5,(a2)+
  7663. add.w (a1),d6
  7664. move.w d6,d5
  7665. add.w d5,d5
  7666. add.w d6,d5
  7667. add.w d5,(a2)+
  7668. moveq.l #$00,d2
  7669. move.b (a0)+,d2
  7670. add.w d2,d2
  7671. add.w ($6200,a1),d2
  7672. adda.w d2,a1
  7673. add.w (-$6200,a1),d6
  7674. move.w d6,d5
  7675. add.w d5,d5
  7676. add.w d6,d5
  7677. add.w d5,(a2)+
  7678. add.w (a1),d6
  7679. move.w d6,d5
  7680. add.w d5,d5
  7681. add.w d6,d5
  7682. add.w d5,(a2)+
  7683. moveq.l #$00,d2
  7684. move.b (a0)+,d2
  7685. add.w d2,d2
  7686. add.w ($6200,a1),d2
  7687. adda.w d2,a1
  7688. add.w (-$6200,a1),d6
  7689. move.w d6,d5
  7690. add.w d5,d5
  7691. add.w d6,d5
  7692. add.w d5,(a2)+
  7693. add.w (a1),d6
  7694. move.w d6,d5
  7695. add.w d5,d5
  7696. add.w d6,d5
  7697. add.w d5,(a2)+
  7698. adda.w ($6200,a1),a1
  7699. dbra.w d4,L00494a
  7700. swap.w d6
  7701. move.w d5,d6
  7702. rts
  7703. L004a20:
  7704. swap.w d6
  7705. moveq.l #$07,d4
  7706. L004a24:
  7707. moveq.l #$00,d2
  7708. move.b (a0)+,d2
  7709. add.w d2,d2
  7710. adda.w d2,a1
  7711. add.w (-$6200,a1),d6
  7712. move.w d6,d5
  7713. add.w d5,d5
  7714. add.w d5,d5
  7715. add.w d5,(a2)+
  7716. add.w (a1),d6
  7717. move.w d6,d5
  7718. add.w d5,d5
  7719. add.w d5,d5
  7720. add.w d5,(a2)+
  7721. moveq.l #$00,d2
  7722. move.b (a0)+,d2
  7723. add.w d2,d2
  7724. add.w ($6200,a1),d2
  7725. adda.w d2,a1
  7726. add.w (-$6200,a1),d6
  7727. move.w d6,d5
  7728. add.w d5,d5
  7729. add.w d5,d5
  7730. add.w d5,(a2)+
  7731. add.w (a1),d6
  7732. move.w d6,d5
  7733. add.w d5,d5
  7734. add.w d5,d5
  7735. add.w d5,(a2)+
  7736. moveq.l #$00,d2
  7737. move.b (a0)+,d2
  7738. add.w d2,d2
  7739. add.w ($6200,a1),d2
  7740. adda.w d2,a1
  7741. add.w (-$6200,a1),d6
  7742. move.w d6,d5
  7743. add.w d5,d5
  7744. add.w d5,d5
  7745. add.w d5,(a2)+
  7746. add.w (a1),d6
  7747. move.w d6,d5
  7748. add.w d5,d5
  7749. add.w d5,d5
  7750. add.w d5,(a2)+
  7751. moveq.l #$00,d2
  7752. move.b (a0)+,d2
  7753. add.w d2,d2
  7754. add.w ($6200,a1),d2
  7755. adda.w d2,a1
  7756. add.w (-$6200,a1),d6
  7757. move.w d6,d5
  7758. add.w d5,d5
  7759. add.w d5,d5
  7760. add.w d5,(a2)+
  7761. add.w (a1),d6
  7762. move.w d6,d5
  7763. add.w d5,d5
  7764. add.w d5,d5
  7765. add.w d5,(a2)+
  7766. moveq.l #$00,d2
  7767. move.b (a0)+,d2
  7768. add.w d2,d2
  7769. add.w ($6200,a1),d2
  7770. adda.w d2,a1
  7771. add.w (-$6200,a1),d6
  7772. move.w d6,d5
  7773. add.w d5,d5
  7774. add.w d5,d5
  7775. add.w d5,(a2)+
  7776. add.w (a1),d6
  7777. move.w d6,d5
  7778. add.w d5,d5
  7779. add.w d5,d5
  7780. add.w d5,(a2)+
  7781. moveq.l #$00,d2
  7782. move.b (a0)+,d2
  7783. add.w d2,d2
  7784. add.w ($6200,a1),d2
  7785. adda.w d2,a1
  7786. add.w (-$6200,a1),d6
  7787. move.w d6,d5
  7788. add.w d5,d5
  7789. add.w d5,d5
  7790. add.w d5,(a2)+
  7791. add.w (a1),d6
  7792. move.w d6,d5
  7793. add.w d5,d5
  7794. add.w d5,d5
  7795. add.w d5,(a2)+
  7796. adda.w ($6200,a1),a1
  7797. dbra.w d4,L004a24
  7798. swap.w d6
  7799. move.w d5,d6
  7800. rts
  7801. L004afa:
  7802. swap.w d6
  7803. moveq.l #$07,d4
  7804. L004afe:
  7805. moveq.l #$00,d2
  7806. move.b (a0)+,d2
  7807. add.w d2,d2
  7808. adda.w d2,a1
  7809. add.w (-$6200,a1),d6
  7810. move.w d6,d5
  7811. add.w d5,d5
  7812. add.w d5,d5
  7813. add.w d6,d5
  7814. add.w d5,(a2)+
  7815. add.w (a1),d6
  7816. move.w d6,d5
  7817. add.w d5,d5
  7818. add.w d5,d5
  7819. add.w d6,d5
  7820. add.w d5,(a2)+
  7821. moveq.l #$00,d2
  7822. move.b (a0)+,d2
  7823. add.w d2,d2
  7824. add.w ($6200,a1),d2
  7825. adda.w d2,a1
  7826. add.w (-$6200,a1),d6
  7827. move.w d6,d5
  7828. add.w d5,d5
  7829. add.w d5,d5
  7830. add.w d6,d5
  7831. add.w d5,(a2)+
  7832. add.w (a1),d6
  7833. move.w d6,d5
  7834. add.w d5,d5
  7835. add.w d5,d5
  7836. add.w d6,d5
  7837. add.w d5,(a2)+
  7838. moveq.l #$00,d2
  7839. move.b (a0)+,d2
  7840. add.w d2,d2
  7841. add.w ($6200,a1),d2
  7842. adda.w d2,a1
  7843. add.w (-$6200,a1),d6
  7844. move.w d6,d5
  7845. add.w d5,d5
  7846. add.w d5,d5
  7847. add.w d6,d5
  7848. add.w d5,(a2)+
  7849. add.w (a1),d6
  7850. move.w d6,d5
  7851. add.w d5,d5
  7852. add.w d5,d5
  7853. add.w d6,d5
  7854. add.w d5,(a2)+
  7855. moveq.l #$00,d2
  7856. move.b (a0)+,d2
  7857. add.w d2,d2
  7858. add.w ($6200,a1),d2
  7859. adda.w d2,a1
  7860. add.w (-$6200,a1),d6
  7861. move.w d6,d5
  7862. add.w d5,d5
  7863. add.w d5,d5
  7864. add.w d6,d5
  7865. add.w d5,(a2)+
  7866. add.w (a1),d6
  7867. move.w d6,d5
  7868. add.w d5,d5
  7869. add.w d5,d5
  7870. add.w d6,d5
  7871. add.w d5,(a2)+
  7872. moveq.l #$00,d2
  7873. move.b (a0)+,d2
  7874. add.w d2,d2
  7875. add.w ($6200,a1),d2
  7876. adda.w d2,a1
  7877. add.w (-$6200,a1),d6
  7878. move.w d6,d5
  7879. add.w d5,d5
  7880. add.w d5,d5
  7881. add.w d6,d5
  7882. add.w d5,(a2)+
  7883. add.w (a1),d6
  7884. move.w d6,d5
  7885. add.w d5,d5
  7886. add.w d5,d5
  7887. add.w d6,d5
  7888. add.w d5,(a2)+
  7889. moveq.l #$00,d2
  7890. move.b (a0)+,d2
  7891. add.w d2,d2
  7892. add.w ($6200,a1),d2
  7893. adda.w d2,a1
  7894. add.w (-$6200,a1),d6
  7895. move.w d6,d5
  7896. add.w d5,d5
  7897. add.w d5,d5
  7898. add.w d6,d5
  7899. add.w d5,(a2)+
  7900. add.w (a1),d6
  7901. move.w d6,d5
  7902. add.w d5,d5
  7903. add.w d5,d5
  7904. add.w d6,d5
  7905. add.w d5,(a2)+
  7906. adda.w ($6200,a1),a1
  7907. dbra.w d4,L004afe
  7908. swap.w d6
  7909. move.w d5,d6
  7910. rts
  7911. L004bec:
  7912. swap.w d6
  7913. moveq.l #$00,d2
  7914. move.b (a0)+,d2
  7915. add.w d2,d2
  7916. adda.w d2,a1
  7917. add.w (-$6200,a1),d6
  7918. add.w d6,(a2)+
  7919. add.w (a1),d6
  7920. add.w d6,(a2)+
  7921. moveq.l #$00,d2
  7922. move.b (a0)+,d2
  7923. add.w d2,d2
  7924. add.w ($6200,a1),d2
  7925. adda.w d2,a1
  7926. add.w (-$6200,a1),d6
  7927. add.w d6,(a2)+
  7928. add.w (a1),d6
  7929. add.w d6,(a2)+
  7930. moveq.l #$00,d2
  7931. move.b (a0)+,d2
  7932. add.w d2,d2
  7933. add.w ($6200,a1),d2
  7934. adda.w d2,a1
  7935. add.w (-$6200,a1),d6
  7936. add.w d6,(a2)+
  7937. add.w (a1),d6
  7938. add.w d6,(a2)+
  7939. moveq.l #$00,d2
  7940. move.b (a0)+,d2
  7941. add.w d2,d2
  7942. add.w ($6200,a1),d2
  7943. adda.w d2,a1
  7944. add.w (-$6200,a1),d6
  7945. add.w d6,(a2)+
  7946. add.w (a1),d6
  7947. add.w d6,(a2)+
  7948. moveq.l #$00,d2
  7949. move.b (a0)+,d2
  7950. add.w d2,d2
  7951. add.w ($6200,a1),d2
  7952. adda.w d2,a1
  7953. add.w (-$6200,a1),d6
  7954. add.w d6,(a2)+
  7955. add.w (a1),d6
  7956. add.w d6,(a2)+
  7957. moveq.l #$00,d2
  7958. move.b (a0)+,d2
  7959. add.w d2,d2
  7960. add.w ($6200,a1),d2
  7961. adda.w d2,a1
  7962. add.w (-$6200,a1),d6
  7963. add.w d6,(a2)+
  7964. add.w (a1),d6
  7965. add.w d6,(a2)+
  7966. moveq.l #$00,d2
  7967. move.b (a0)+,d2
  7968. add.w d2,d2
  7969. add.w ($6200,a1),d2
  7970. adda.w d2,a1
  7971. add.w (-$6200,a1),d6
  7972. add.w d6,(a2)+
  7973. add.w (a1),d6
  7974. add.w d6,(a2)+
  7975. moveq.l #$00,d2
  7976. move.b (a0)+,d2
  7977. add.w d2,d2
  7978. add.w ($6200,a1),d2
  7979. adda.w d2,a1
  7980. add.w (-$6200,a1),d6
  7981. add.w d6,(a2)+
  7982. add.w (a1),d6
  7983. add.w d6,(a2)+
  7984. moveq.l #$00,d2
  7985. move.b (a0)+,d2
  7986. add.w d2,d2
  7987. add.w ($6200,a1),d2
  7988. adda.w d2,a1
  7989. add.w (-$6200,a1),d6
  7990. add.w d6,(a2)+
  7991. add.w (a1),d6
  7992. add.w d6,(a2)+
  7993. moveq.l #$00,d2
  7994. move.b (a0)+,d2
  7995. add.w d2,d2
  7996. add.w ($6200,a1),d2
  7997. adda.w d2,a1
  7998. add.w (-$6200,a1),d6
  7999. add.w d6,(a2)+
  8000. add.w (a1),d6
  8001. add.w d6,(a2)+
  8002. moveq.l #$00,d2
  8003. move.b (a0)+,d2
  8004. add.w d2,d2
  8005. add.w ($6200,a1),d2
  8006. adda.w d2,a1
  8007. add.w (-$6200,a1),d6
  8008. add.w d6,(a2)+
  8009. add.w (a1),d6
  8010. add.w d6,(a2)+
  8011. moveq.l #$00,d2
  8012. move.b (a0)+,d2
  8013. add.w d2,d2
  8014. add.w ($6200,a1),d2
  8015. adda.w d2,a1
  8016. add.w (-$6200,a1),d6
  8017. add.w d6,(a2)+
  8018. add.w (a1),d6
  8019. add.w d6,(a2)+
  8020. moveq.l #$00,d2
  8021. move.b (a0)+,d2
  8022. add.w d2,d2
  8023. add.w ($6200,a1),d2
  8024. adda.w d2,a1
  8025. add.w (-$6200,a1),d6
  8026. add.w d6,(a2)+
  8027. add.w (a1),d6
  8028. add.w d6,(a2)+
  8029. moveq.l #$00,d2
  8030. move.b (a0)+,d2
  8031. add.w d2,d2
  8032. add.w ($6200,a1),d2
  8033. adda.w d2,a1
  8034. add.w (-$6200,a1),d6
  8035. add.w d6,(a2)+
  8036. add.w (a1),d6
  8037. add.w d6,(a2)+
  8038. moveq.l #$00,d2
  8039. move.b (a0)+,d2
  8040. add.w d2,d2
  8041. add.w ($6200,a1),d2
  8042. adda.w d2,a1
  8043. add.w (-$6200,a1),d6
  8044. add.w d6,(a2)+
  8045. add.w (a1),d6
  8046. add.w d6,(a2)+
  8047. moveq.l #$00,d2
  8048. move.b (a0)+,d2
  8049. add.w d2,d2
  8050. add.w ($6200,a1),d2
  8051. adda.w d2,a1
  8052. add.w (-$6200,a1),d6
  8053. add.w d6,(a2)+
  8054. add.w (a1),d6
  8055. add.w d6,(a2)+
  8056. moveq.l #$00,d2
  8057. move.b (a0)+,d2
  8058. add.w d2,d2
  8059. add.w ($6200,a1),d2
  8060. adda.w d2,a1
  8061. add.w (-$6200,a1),d6
  8062. add.w d6,(a2)+
  8063. add.w (a1),d6
  8064. add.w d6,(a2)+
  8065. moveq.l #$00,d2
  8066. move.b (a0)+,d2
  8067. add.w d2,d2
  8068. add.w ($6200,a1),d2
  8069. adda.w d2,a1
  8070. add.w (-$6200,a1),d6
  8071. add.w d6,(a2)+
  8072. add.w (a1),d6
  8073. add.w d6,(a2)+
  8074. moveq.l #$00,d2
  8075. move.b (a0)+,d2
  8076. add.w d2,d2
  8077. add.w ($6200,a1),d2
  8078. adda.w d2,a1
  8079. add.w (-$6200,a1),d6
  8080. add.w d6,(a2)+
  8081. add.w (a1),d6
  8082. add.w d6,(a2)+
  8083. moveq.l #$00,d2
  8084. move.b (a0)+,d2
  8085. add.w d2,d2
  8086. add.w ($6200,a1),d2
  8087. adda.w d2,a1
  8088. add.w (-$6200,a1),d6
  8089. add.w d6,(a2)+
  8090. add.w (a1),d6
  8091. add.w d6,(a2)+
  8092. moveq.l #$00,d2
  8093. move.b (a0)+,d2
  8094. add.w d2,d2
  8095. add.w ($6200,a1),d2
  8096. adda.w d2,a1
  8097. add.w (-$6200,a1),d6
  8098. add.w d6,(a2)+
  8099. add.w (a1),d6
  8100. add.w d6,(a2)+
  8101. moveq.l #$00,d2
  8102. move.b (a0)+,d2
  8103. add.w d2,d2
  8104. add.w ($6200,a1),d2
  8105. adda.w d2,a1
  8106. add.w (-$6200,a1),d6
  8107. add.w d6,(a2)+
  8108. add.w (a1),d6
  8109. add.w d6,(a2)+
  8110. moveq.l #$00,d2
  8111. move.b (a0)+,d2
  8112. add.w d2,d2
  8113. add.w ($6200,a1),d2
  8114. adda.w d2,a1
  8115. add.w (-$6200,a1),d6
  8116. add.w d6,(a2)+
  8117. add.w (a1),d6
  8118. add.w d6,(a2)+
  8119. moveq.l #$00,d2
  8120. move.b (a0)+,d2
  8121. add.w d2,d2
  8122. add.w ($6200,a1),d2
  8123. adda.w d2,a1
  8124. add.w (-$6200,a1),d6
  8125. add.w d6,(a2)+
  8126. add.w (a1),d6
  8127. add.w d6,(a2)+
  8128. moveq.l #$00,d2
  8129. move.b (a0)+,d2
  8130. add.w d2,d2
  8131. add.w ($6200,a1),d2
  8132. adda.w d2,a1
  8133. add.w (-$6200,a1),d6
  8134. add.w d6,(a2)+
  8135. add.w (a1),d6
  8136. add.w d6,(a2)+
  8137. moveq.l #$00,d2
  8138. move.b (a0)+,d2
  8139. add.w d2,d2
  8140. add.w ($6200,a1),d2
  8141. adda.w d2,a1
  8142. add.w (-$6200,a1),d6
  8143. add.w d6,(a2)+
  8144. add.w (a1),d6
  8145. add.w d6,(a2)+
  8146. moveq.l #$00,d2
  8147. move.b (a0)+,d2
  8148. add.w d2,d2
  8149. add.w ($6200,a1),d2
  8150. adda.w d2,a1
  8151. add.w (-$6200,a1),d6
  8152. add.w d6,(a2)+
  8153. add.w (a1),d6
  8154. add.w d6,(a2)+
  8155. moveq.l #$00,d2
  8156. move.b (a0)+,d2
  8157. add.w d2,d2
  8158. add.w ($6200,a1),d2
  8159. adda.w d2,a1
  8160. add.w (-$6200,a1),d6
  8161. add.w d6,(a2)+
  8162. add.w (a1),d6
  8163. add.w d6,(a2)+
  8164. moveq.l #$00,d2
  8165. move.b (a0)+,d2
  8166. add.w d2,d2
  8167. add.w ($6200,a1),d2
  8168. adda.w d2,a1
  8169. add.w (-$6200,a1),d6
  8170. add.w d6,(a2)+
  8171. add.w (a1),d6
  8172. add.w d6,(a2)+
  8173. moveq.l #$00,d2
  8174. move.b (a0)+,d2
  8175. add.w d2,d2
  8176. add.w ($6200,a1),d2
  8177. adda.w d2,a1
  8178. add.w (-$6200,a1),d6
  8179. add.w d6,(a2)+
  8180. add.w (a1),d6
  8181. add.w d6,(a2)+
  8182. moveq.l #$00,d2
  8183. move.b (a0)+,d2
  8184. add.w d2,d2
  8185. add.w ($6200,a1),d2
  8186. adda.w d2,a1
  8187. add.w (-$6200,a1),d6
  8188. add.w d6,(a2)+
  8189. add.w (a1),d6
  8190. add.w d6,(a2)+
  8191. moveq.l #$00,d2
  8192. move.b (a0)+,d2
  8193. add.w d2,d2
  8194. add.w ($6200,a1),d2
  8195. adda.w d2,a1
  8196. add.w (-$6200,a1),d6
  8197. add.w d6,(a2)+
  8198. add.w (a1),d6
  8199. add.w d6,(a2)+
  8200. moveq.l #$00,d2
  8201. move.b (a0)+,d2
  8202. add.w d2,d2
  8203. add.w ($6200,a1),d2
  8204. adda.w d2,a1
  8205. add.w (-$6200,a1),d6
  8206. add.w d6,(a2)+
  8207. add.w (a1),d6
  8208. add.w d6,(a2)+
  8209. moveq.l #$00,d2
  8210. move.b (a0)+,d2
  8211. add.w d2,d2
  8212. add.w ($6200,a1),d2
  8213. adda.w d2,a1
  8214. add.w (-$6200,a1),d6
  8215. add.w d6,(a2)+
  8216. add.w (a1),d6
  8217. add.w d6,(a2)+
  8218. moveq.l #$00,d2
  8219. move.b (a0)+,d2
  8220. add.w d2,d2
  8221. add.w ($6200,a1),d2
  8222. adda.w d2,a1
  8223. add.w (-$6200,a1),d6
  8224. add.w d6,(a2)+
  8225. add.w (a1),d6
  8226. add.w d6,(a2)+
  8227. moveq.l #$00,d2
  8228. move.b (a0)+,d2
  8229. add.w d2,d2
  8230. add.w ($6200,a1),d2
  8231. adda.w d2,a1
  8232. add.w (-$6200,a1),d6
  8233. add.w d6,(a2)+
  8234. add.w (a1),d6
  8235. add.w d6,(a2)+
  8236. moveq.l #$00,d2
  8237. move.b (a0)+,d2
  8238. add.w d2,d2
  8239. add.w ($6200,a1),d2
  8240. adda.w d2,a1
  8241. add.w (-$6200,a1),d6
  8242. add.w d6,(a2)+
  8243. add.w (a1),d6
  8244. add.w d6,(a2)+
  8245. moveq.l #$00,d2
  8246. move.b (a0)+,d2
  8247. add.w d2,d2
  8248. add.w ($6200,a1),d2
  8249. adda.w d2,a1
  8250. add.w (-$6200,a1),d6
  8251. add.w d6,(a2)+
  8252. add.w (a1),d6
  8253. add.w d6,(a2)+
  8254. moveq.l #$00,d2
  8255. move.b (a0)+,d2
  8256. add.w d2,d2
  8257. add.w ($6200,a1),d2
  8258. adda.w d2,a1
  8259. add.w (-$6200,a1),d6
  8260. add.w d6,(a2)+
  8261. add.w (a1),d6
  8262. add.w d6,(a2)+
  8263. moveq.l #$00,d2
  8264. move.b (a0)+,d2
  8265. add.w d2,d2
  8266. add.w ($6200,a1),d2
  8267. adda.w d2,a1
  8268. add.w (-$6200,a1),d6
  8269. add.w d6,(a2)+
  8270. add.w (a1),d6
  8271. add.w d6,(a2)+
  8272. moveq.l #$00,d2
  8273. move.b (a0)+,d2
  8274. add.w d2,d2
  8275. add.w ($6200,a1),d2
  8276. adda.w d2,a1
  8277. add.w (-$6200,a1),d6
  8278. add.w d6,(a2)+
  8279. add.w (a1),d6
  8280. add.w d6,(a2)+
  8281. moveq.l #$00,d2
  8282. move.b (a0)+,d2
  8283. add.w d2,d2
  8284. add.w ($6200,a1),d2
  8285. adda.w d2,a1
  8286. add.w (-$6200,a1),d6
  8287. add.w d6,(a2)+
  8288. add.w (a1),d6
  8289. add.w d6,(a2)+
  8290. moveq.l #$00,d2
  8291. move.b (a0)+,d2
  8292. add.w d2,d2
  8293. add.w ($6200,a1),d2
  8294. adda.w d2,a1
  8295. add.w (-$6200,a1),d6
  8296. add.w d6,(a2)+
  8297. add.w (a1),d6
  8298. add.w d6,(a2)+
  8299. moveq.l #$00,d2
  8300. move.b (a0)+,d2
  8301. add.w d2,d2
  8302. add.w ($6200,a1),d2
  8303. adda.w d2,a1
  8304. add.w (-$6200,a1),d6
  8305. add.w d6,(a2)+
  8306. add.w (a1),d6
  8307. add.w d6,(a2)+
  8308. moveq.l #$00,d2
  8309. move.b (a0)+,d2
  8310. add.w d2,d2
  8311. add.w ($6200,a1),d2
  8312. adda.w d2,a1
  8313. add.w (-$6200,a1),d6
  8314. add.w d6,(a2)+
  8315. add.w (a1),d6
  8316. add.w d6,(a2)+
  8317. moveq.l #$00,d2
  8318. move.b (a0)+,d2
  8319. add.w d2,d2
  8320. add.w ($6200,a1),d2
  8321. adda.w d2,a1
  8322. add.w (-$6200,a1),d6
  8323. add.w d6,(a2)+
  8324. add.w (a1),d6
  8325. add.w d6,(a2)+
  8326. moveq.l #$00,d2
  8327. move.b (a0)+,d2
  8328. add.w d2,d2
  8329. add.w ($6200,a1),d2
  8330. adda.w d2,a1
  8331. add.w (-$6200,a1),d6
  8332. add.w d6,(a2)+
  8333. add.w (a1),d6
  8334. add.w d6,(a2)+
  8335. moveq.l #$00,d2
  8336. move.b (a0)+,d2
  8337. add.w d2,d2
  8338. add.w ($6200,a1),d2
  8339. adda.w d2,a1
  8340. add.w (-$6200,a1),d6
  8341. add.w d6,(a2)+
  8342. add.w (a1),d6
  8343. add.w d6,(a2)+
  8344. adda.w ($6200,a1),a1
  8345. move.w d6,d5
  8346. swap.w d6
  8347. move.w d5,d6
  8348. rts
  8349. L005016:
  8350. moveq.l #$0b,d4
  8351. L005018:
  8352. move.w (a0)+,d6
  8353. asr.w #3,d6
  8354. add.w d6,(a2)+
  8355. move.w (a0)+,d6
  8356. asr.w #3,d6
  8357. add.w d6,(a2)+
  8358. move.w (a0)+,d6
  8359. asr.w #3,d6
  8360. add.w d6,(a2)+
  8361. move.w (a0)+,d6
  8362. asr.w #3,d6
  8363. add.w d6,(a2)+
  8364. move.w (a0)+,d6
  8365. asr.w #3,d6
  8366. add.w d6,(a2)+
  8367. move.w (a0)+,d6
  8368. asr.w #3,d6
  8369. add.w d6,(a2)+
  8370. move.w (a0)+,d6
  8371. asr.w #3,d6
  8372. add.w d6,(a2)+
  8373. move.w (a0)+,d6
  8374. asr.w #3,d6
  8375. add.w d6,(a2)+
  8376. dbra.w d4,L005018
  8377. rts
  8378. L00504e:
  8379. moveq.l #$0b,d4
  8380. L005050:
  8381. move.w (a0)+,d6
  8382. asr.w #2,d6
  8383. move.w d6,d5
  8384. asr.w #2,d5
  8385. sub.w d5,d6
  8386. add.w d6,(a2)+
  8387. move.w (a0)+,d6
  8388. asr.w #2,d6
  8389. move.w d6,d5
  8390. asr.w #2,d5
  8391. sub.w d5,d6
  8392. add.w d6,(a2)+
  8393. move.w (a0)+,d6
  8394. asr.w #2,d6
  8395. move.w d6,d5
  8396. asr.w #2,d5
  8397. sub.w d5,d6
  8398. add.w d6,(a2)+
  8399. move.w (a0)+,d6
  8400. asr.w #2,d6
  8401. move.w d6,d5
  8402. asr.w #2,d5
  8403. sub.w d5,d6
  8404. add.w d6,(a2)+
  8405. move.w (a0)+,d6
  8406. asr.w #2,d6
  8407. move.w d6,d5
  8408. asr.w #2,d5
  8409. sub.w d5,d6
  8410. add.w d6,(a2)+
  8411. move.w (a0)+,d6
  8412. asr.w #2,d6
  8413. move.w d6,d5
  8414. asr.w #2,d5
  8415. sub.w d5,d6
  8416. add.w d6,(a2)+
  8417. move.w (a0)+,d6
  8418. asr.w #2,d6
  8419. move.w d6,d5
  8420. asr.w #2,d5
  8421. sub.w d5,d6
  8422. add.w d6,(a2)+
  8423. move.w (a0)+,d6
  8424. asr.w #2,d6
  8425. move.w d6,d5
  8426. asr.w #2,d5
  8427. sub.w d5,d6
  8428. add.w d6,(a2)+
  8429. dbra.w d4,L005050
  8430. rts
  8431. L0050b6:
  8432. moveq.l #$0b,d4
  8433. L0050b8:
  8434. move.w (a0)+,d6
  8435. asr.w #2,d6
  8436. add.w d6,(a2)+
  8437. move.w (a0)+,d6
  8438. asr.w #2,d6
  8439. add.w d6,(a2)+
  8440. move.w (a0)+,d6
  8441. asr.w #2,d6
  8442. add.w d6,(a2)+
  8443. move.w (a0)+,d6
  8444. asr.w #2,d6
  8445. add.w d6,(a2)+
  8446. move.w (a0)+,d6
  8447. asr.w #2,d6
  8448. add.w d6,(a2)+
  8449. move.w (a0)+,d6
  8450. asr.w #2,d6
  8451. add.w d6,(a2)+
  8452. move.w (a0)+,d6
  8453. asr.w #2,d6
  8454. add.w d6,(a2)+
  8455. move.w (a0)+,d6
  8456. asr.w #2,d6
  8457. add.w d6,(a2)+
  8458. dbra.w d4,L0050b8
  8459. rts
  8460. L0050ee:
  8461. moveq.l #$0b,d4
  8462. L0050f0:
  8463. move.w (a0)+,d6
  8464. asr.w #2,d6
  8465. move.w d6,d5
  8466. asr.w #2,d5
  8467. add.w d5,d6
  8468. add.w d6,(a2)+
  8469. move.w (a0)+,d6
  8470. asr.w #2,d6
  8471. move.w d6,d5
  8472. asr.w #2,d5
  8473. add.w d5,d6
  8474. add.w d6,(a2)+
  8475. move.w (a0)+,d6
  8476. asr.w #2,d6
  8477. move.w d6,d5
  8478. asr.w #2,d5
  8479. add.w d5,d6
  8480. add.w d6,(a2)+
  8481. move.w (a0)+,d6
  8482. asr.w #2,d6
  8483. move.w d6,d5
  8484. asr.w #2,d5
  8485. add.w d5,d6
  8486. add.w d6,(a2)+
  8487. move.w (a0)+,d6
  8488. asr.w #2,d6
  8489. move.w d6,d5
  8490. asr.w #2,d5
  8491. add.w d5,d6
  8492. add.w d6,(a2)+
  8493. move.w (a0)+,d6
  8494. asr.w #2,d6
  8495. move.w d6,d5
  8496. asr.w #2,d5
  8497. add.w d5,d6
  8498. add.w d6,(a2)+
  8499. move.w (a0)+,d6
  8500. asr.w #2,d6
  8501. move.w d6,d5
  8502. asr.w #2,d5
  8503. add.w d5,d6
  8504. add.w d6,(a2)+
  8505. move.w (a0)+,d6
  8506. asr.w #2,d6
  8507. move.w d6,d5
  8508. asr.w #2,d5
  8509. add.w d5,d6
  8510. add.w d6,(a2)+
  8511. dbra.w d4,L0050f0
  8512. rts
  8513. L005156:
  8514. moveq.l #$0b,d4
  8515. L005158:
  8516. move.w (a0)+,d6
  8517. asr.w #1,d6
  8518. move.w d6,d5
  8519. asr.w #2,d5
  8520. sub.w d5,d6
  8521. add.w d6,(a2)+
  8522. move.w (a0)+,d6
  8523. asr.w #1,d6
  8524. move.w d6,d5
  8525. asr.w #2,d5
  8526. sub.w d5,d6
  8527. add.w d6,(a2)+
  8528. move.w (a0)+,d6
  8529. asr.w #1,d6
  8530. move.w d6,d5
  8531. asr.w #2,d5
  8532. sub.w d5,d6
  8533. add.w d6,(a2)+
  8534. move.w (a0)+,d6
  8535. asr.w #1,d6
  8536. move.w d6,d5
  8537. asr.w #2,d5
  8538. sub.w d5,d6
  8539. add.w d6,(a2)+
  8540. move.w (a0)+,d6
  8541. asr.w #1,d6
  8542. move.w d6,d5
  8543. asr.w #2,d5
  8544. sub.w d5,d6
  8545. add.w d6,(a2)+
  8546. move.w (a0)+,d6
  8547. asr.w #1,d6
  8548. move.w d6,d5
  8549. asr.w #2,d5
  8550. sub.w d5,d6
  8551. add.w d6,(a2)+
  8552. move.w (a0)+,d6
  8553. asr.w #1,d6
  8554. move.w d6,d5
  8555. asr.w #2,d5
  8556. sub.w d5,d6
  8557. add.w d6,(a2)+
  8558. move.w (a0)+,d6
  8559. asr.w #1,d6
  8560. move.w d6,d5
  8561. asr.w #2,d5
  8562. sub.w d5,d6
  8563. add.w d6,(a2)+
  8564. dbra.w d4,L005158
  8565. rts
  8566. L0051be:
  8567. moveq.l #$0b,d4
  8568. L0051c0:
  8569. move.w (a0)+,d6
  8570. asr.w #1,d6
  8571. add.w d6,(a2)+
  8572. move.w (a0)+,d6
  8573. asr.w #1,d6
  8574. add.w d6,(a2)+
  8575. move.w (a0)+,d6
  8576. asr.w #1,d6
  8577. add.w d6,(a2)+
  8578. move.w (a0)+,d6
  8579. asr.w #1,d6
  8580. add.w d6,(a2)+
  8581. move.w (a0)+,d6
  8582. asr.w #1,d6
  8583. add.w d6,(a2)+
  8584. move.w (a0)+,d6
  8585. asr.w #1,d6
  8586. add.w d6,(a2)+
  8587. move.w (a0)+,d6
  8588. asr.w #1,d6
  8589. add.w d6,(a2)+
  8590. move.w (a0)+,d6
  8591. asr.w #1,d6
  8592. add.w d6,(a2)+
  8593. dbra.w d4,L0051c0
  8594. rts
  8595. L0051f6:
  8596. moveq.l #$0b,d4
  8597. L0051f8:
  8598. move.w (a0)+,d6
  8599. asr.w #1,d6
  8600. move.w d6,d5
  8601. asr.w #2,d5
  8602. add.w d5,d6
  8603. add.w d6,(a2)+
  8604. move.w (a0)+,d6
  8605. asr.w #1,d6
  8606. move.w d6,d5
  8607. asr.w #2,d5
  8608. add.w d5,d6
  8609. add.w d6,(a2)+
  8610. move.w (a0)+,d6
  8611. asr.w #1,d6
  8612. move.w d6,d5
  8613. asr.w #2,d5
  8614. add.w d5,d6
  8615. add.w d6,(a2)+
  8616. move.w (a0)+,d6
  8617. asr.w #1,d6
  8618. move.w d6,d5
  8619. asr.w #2,d5
  8620. add.w d5,d6
  8621. add.w d6,(a2)+
  8622. move.w (a0)+,d6
  8623. asr.w #1,d6
  8624. move.w d6,d5
  8625. asr.w #2,d5
  8626. add.w d5,d6
  8627. add.w d6,(a2)+
  8628. move.w (a0)+,d6
  8629. asr.w #1,d6
  8630. move.w d6,d5
  8631. asr.w #2,d5
  8632. add.w d5,d6
  8633. add.w d6,(a2)+
  8634. move.w (a0)+,d6
  8635. asr.w #1,d6
  8636. move.w d6,d5
  8637. asr.w #2,d5
  8638. add.w d5,d6
  8639. add.w d6,(a2)+
  8640. move.w (a0)+,d6
  8641. asr.w #1,d6
  8642. move.w d6,d5
  8643. asr.w #2,d5
  8644. add.w d5,d6
  8645. add.w d6,(a2)+
  8646. dbra.w d4,L0051f8
  8647. rts
  8648. L00525e:
  8649. moveq.l #$0b,d4
  8650. L005260:
  8651. move.w (a0)+,d6
  8652. move.w d6,d5
  8653. asr.w #2,d5
  8654. sub.w d5,d6
  8655. add.w d6,(a2)+
  8656. move.w (a0)+,d6
  8657. move.w d6,d5
  8658. asr.w #2,d5
  8659. sub.w d5,d6
  8660. add.w d6,(a2)+
  8661. move.w (a0)+,d6
  8662. move.w d6,d5
  8663. asr.w #2,d5
  8664. sub.w d5,d6
  8665. add.w d6,(a2)+
  8666. move.w (a0)+,d6
  8667. move.w d6,d5
  8668. asr.w #2,d5
  8669. sub.w d5,d6
  8670. add.w d6,(a2)+
  8671. move.w (a0)+,d6
  8672. move.w d6,d5
  8673. asr.w #2,d5
  8674. sub.w d5,d6
  8675. add.w d6,(a2)+
  8676. move.w (a0)+,d6
  8677. move.w d6,d5
  8678. asr.w #2,d5
  8679. sub.w d5,d6
  8680. add.w d6,(a2)+
  8681. move.w (a0)+,d6
  8682. move.w d6,d5
  8683. asr.w #2,d5
  8684. sub.w d5,d6
  8685. add.w d6,(a2)+
  8686. move.w (a0)+,d6
  8687. move.w d6,d5
  8688. asr.w #2,d5
  8689. sub.w d5,d6
  8690. add.w d6,(a2)+
  8691. dbra.w d4,L005260
  8692. rts
  8693. L0052b6:
  8694. movem.w (a0)+,d1-d6
  8695. add.w d1,(a2)+
  8696. add.w d2,(a2)+
  8697. add.w d3,(a2)+
  8698. add.w d4,(a2)+
  8699. add.w d5,(a2)+
  8700. add.w d6,(a2)+
  8701. movem.w (a0)+,d1-d6
  8702. add.w d1,(a2)+
  8703. add.w d2,(a2)+
  8704. add.w d3,(a2)+
  8705. add.w d4,(a2)+
  8706. add.w d5,(a2)+
  8707. add.w d6,(a2)+
  8708. movem.w (a0)+,d1-d6
  8709. add.w d1,(a2)+
  8710. add.w d2,(a2)+
  8711. add.w d3,(a2)+
  8712. add.w d4,(a2)+
  8713. add.w d5,(a2)+
  8714. add.w d6,(a2)+
  8715. movem.w (a0)+,d1-d6
  8716. add.w d1,(a2)+
  8717. add.w d2,(a2)+
  8718. add.w d3,(a2)+
  8719. add.w d4,(a2)+
  8720. add.w d5,(a2)+
  8721. add.w d6,(a2)+
  8722. movem.w (a0)+,d1-d6
  8723. add.w d1,(a2)+
  8724. add.w d2,(a2)+
  8725. add.w d3,(a2)+
  8726. add.w d4,(a2)+
  8727. add.w d5,(a2)+
  8728. add.w d6,(a2)+
  8729. movem.w (a0)+,d1-d6
  8730. add.w d1,(a2)+
  8731. add.w d2,(a2)+
  8732. add.w d3,(a2)+
  8733. add.w d4,(a2)+
  8734. add.w d5,(a2)+
  8735. add.w d6,(a2)+
  8736. movem.w (a0)+,d1-d6
  8737. add.w d1,(a2)+
  8738. add.w d2,(a2)+
  8739. add.w d3,(a2)+
  8740. add.w d4,(a2)+
  8741. add.w d5,(a2)+
  8742. add.w d6,(a2)+
  8743. movem.w (a0)+,d1-d6
  8744. add.w d1,(a2)+
  8745. add.w d2,(a2)+
  8746. add.w d3,(a2)+
  8747. add.w d4,(a2)+
  8748. add.w d5,(a2)+
  8749. add.w d6,(a2)+
  8750. movem.w (a0)+,d1-d6
  8751. add.w d1,(a2)+
  8752. add.w d2,(a2)+
  8753. add.w d3,(a2)+
  8754. add.w d4,(a2)+
  8755. add.w d5,(a2)+
  8756. add.w d6,(a2)+
  8757. movem.w (a0)+,d1-d6
  8758. add.w d1,(a2)+
  8759. add.w d2,(a2)+
  8760. add.w d3,(a2)+
  8761. add.w d4,(a2)+
  8762. add.w d5,(a2)+
  8763. add.w d6,(a2)+
  8764. movem.w (a0)+,d1-d6
  8765. add.w d1,(a2)+
  8766. add.w d2,(a2)+
  8767. add.w d3,(a2)+
  8768. add.w d4,(a2)+
  8769. add.w d5,(a2)+
  8770. add.w d6,(a2)+
  8771. movem.w (a0)+,d1-d6
  8772. add.w d1,(a2)+
  8773. add.w d2,(a2)+
  8774. add.w d3,(a2)+
  8775. add.w d4,(a2)+
  8776. add.w d5,(a2)+
  8777. add.w d6,(a2)+
  8778. movem.w (a0)+,d1-d6
  8779. add.w d1,(a2)+
  8780. add.w d2,(a2)+
  8781. add.w d3,(a2)+
  8782. add.w d4,(a2)+
  8783. add.w d5,(a2)+
  8784. add.w d6,(a2)+
  8785. movem.w (a0)+,d1-d6
  8786. add.w d1,(a2)+
  8787. add.w d2,(a2)+
  8788. add.w d3,(a2)+
  8789. add.w d4,(a2)+
  8790. add.w d5,(a2)+
  8791. add.w d6,(a2)+
  8792. movem.w (a0)+,d1-d6
  8793. add.w d1,(a2)+
  8794. add.w d2,(a2)+
  8795. add.w d3,(a2)+
  8796. add.w d4,(a2)+
  8797. add.w d5,(a2)+
  8798. add.w d6,(a2)+
  8799. movem.w (a0)+,d1-d6
  8800. add.w d1,(a2)+
  8801. add.w d2,(a2)+
  8802. add.w d3,(a2)+
  8803. add.w d4,(a2)+
  8804. add.w d5,(a2)+
  8805. add.w d6,(a2)+
  8806. rts
  8807. L0053b8:
  8808. moveq.l #$0b,d4
  8809. L0053ba:
  8810. move.w (a0)+,d6
  8811. move.w d6,d5
  8812. asr.w #2,d5
  8813. add.w d5,d6
  8814. add.w d6,(a2)+
  8815. move.w (a0)+,d6
  8816. move.w d6,d5
  8817. asr.w #2,d5
  8818. add.w d5,d6
  8819. add.w d6,(a2)+
  8820. move.w (a0)+,d6
  8821. move.w d6,d5
  8822. asr.w #2,d5
  8823. add.w d5,d6
  8824. add.w d6,(a2)+
  8825. move.w (a0)+,d6
  8826. move.w d6,d5
  8827. asr.w #2,d5
  8828. add.w d5,d6
  8829. add.w d6,(a2)+
  8830. move.w (a0)+,d6
  8831. move.w d6,d5
  8832. asr.w #2,d5
  8833. add.w d5,d6
  8834. add.w d6,(a2)+
  8835. move.w (a0)+,d6
  8836. move.w d6,d5
  8837. asr.w #2,d5
  8838. add.w d5,d6
  8839. add.w d6,(a2)+
  8840. move.w (a0)+,d6
  8841. move.w d6,d5
  8842. asr.w #2,d5
  8843. add.w d5,d6
  8844. add.w d6,(a2)+
  8845. move.w (a0)+,d6
  8846. move.w d6,d5
  8847. asr.w #2,d5
  8848. add.w d5,d6
  8849. add.w d6,(a2)+
  8850. dbra.w d4,L0053ba
  8851. rts
  8852. L005410:
  8853. moveq.l #$0b,d4
  8854. L005412:
  8855. move.w (a0)+,d6
  8856. move.w d6,d5
  8857. add.w d6,d6
  8858. asr.w #1,d5
  8859. sub.w d5,d6
  8860. add.w d6,(a2)+
  8861. move.w (a0)+,d6
  8862. move.w d6,d5
  8863. add.w d6,d6
  8864. asr.w #1,d5
  8865. sub.w d5,d6
  8866. add.w d6,(a2)+
  8867. move.w (a0)+,d6
  8868. move.w d6,d5
  8869. add.w d6,d6
  8870. asr.w #1,d5
  8871. sub.w d5,d6
  8872. add.w d6,(a2)+
  8873. move.w (a0)+,d6
  8874. move.w d6,d5
  8875. add.w d6,d6
  8876. asr.w #1,d5
  8877. sub.w d5,d6
  8878. add.w d6,(a2)+
  8879. move.w (a0)+,d6
  8880. move.w d6,d5
  8881. add.w d6,d6
  8882. asr.w #1,d5
  8883. sub.w d5,d6
  8884. add.w d6,(a2)+
  8885. move.w (a0)+,d6
  8886. move.w d6,d5
  8887. add.w d6,d6
  8888. asr.w #1,d5
  8889. sub.w d5,d6
  8890. add.w d6,(a2)+
  8891. move.w (a0)+,d6
  8892. move.w d6,d5
  8893. add.w d6,d6
  8894. asr.w #1,d5
  8895. sub.w d5,d6
  8896. add.w d6,(a2)+
  8897. move.w (a0)+,d6
  8898. move.w d6,d5
  8899. add.w d6,d6
  8900. asr.w #1,d5
  8901. sub.w d5,d6
  8902. add.w d6,(a2)+
  8903. dbra.w d4,L005412
  8904. rts
  8905. L005478:
  8906. moveq.l #$0b,d4
  8907. L00547a:
  8908. move.w (a0)+,d6
  8909. add.w d6,d6
  8910. add.w d6,(a2)+
  8911. move.w (a0)+,d6
  8912. add.w d6,d6
  8913. add.w d6,(a2)+
  8914. move.w (a0)+,d6
  8915. add.w d6,d6
  8916. add.w d6,(a2)+
  8917. move.w (a0)+,d6
  8918. add.w d6,d6
  8919. add.w d6,(a2)+
  8920. move.w (a0)+,d6
  8921. add.w d6,d6
  8922. add.w d6,(a2)+
  8923. move.w (a0)+,d6
  8924. add.w d6,d6
  8925. add.w d6,(a2)+
  8926. move.w (a0)+,d6
  8927. add.w d6,d6
  8928. add.w d6,(a2)+
  8929. move.w (a0)+,d6
  8930. add.w d6,d6
  8931. add.w d6,(a2)+
  8932. dbra.w d4,L00547a
  8933. rts
  8934. L0054b0:
  8935. moveq.l #$0b,d4
  8936. L0054b2:
  8937. move.w (a0)+,d6
  8938. move.w d6,d5
  8939. add.w d6,d6
  8940. asr.w #1,d5
  8941. add.w d5,d6
  8942. add.w d6,(a2)+
  8943. move.w (a0)+,d6
  8944. move.w d6,d5
  8945. add.w d6,d6
  8946. asr.w #1,d5
  8947. add.w d5,d6
  8948. add.w d6,(a2)+
  8949. move.w (a0)+,d6
  8950. move.w d6,d5
  8951. add.w d6,d6
  8952. asr.w #1,d5
  8953. add.w d5,d6
  8954. add.w d6,(a2)+
  8955. move.w (a0)+,d6
  8956. move.w d6,d5
  8957. add.w d6,d6
  8958. asr.w #1,d5
  8959. add.w d5,d6
  8960. add.w d6,(a2)+
  8961. move.w (a0)+,d6
  8962. move.w d6,d5
  8963. add.w d6,d6
  8964. asr.w #1,d5
  8965. add.w d5,d6
  8966. add.w d6,(a2)+
  8967. move.w (a0)+,d6
  8968. move.w d6,d5
  8969. add.w d6,d6
  8970. asr.w #1,d5
  8971. add.w d5,d6
  8972. add.w d6,(a2)+
  8973. move.w (a0)+,d6
  8974. move.w d6,d5
  8975. add.w d6,d6
  8976. asr.w #1,d5
  8977. add.w d5,d6
  8978. add.w d6,(a2)+
  8979. move.w (a0)+,d6
  8980. move.w d6,d5
  8981. add.w d6,d6
  8982. asr.w #1,d5
  8983. add.w d5,d6
  8984. add.w d6,(a2)+
  8985. dbra.w d4,L0054b2
  8986. rts
  8987. L005518:
  8988. moveq.l #$0b,d4
  8989. L00551a:
  8990. move.w (a0)+,d6
  8991. move.w d6,d5
  8992. add.w d5,d6
  8993. add.w d5,d6
  8994. add.w d6,(a2)+
  8995. move.w (a0)+,d6
  8996. move.w d6,d5
  8997. add.w d5,d6
  8998. add.w d5,d6
  8999. add.w d6,(a2)+
  9000. move.w (a0)+,d6
  9001. move.w d6,d5
  9002. add.w d5,d6
  9003. add.w d5,d6
  9004. add.w d6,(a2)+
  9005. move.w (a0)+,d6
  9006. move.w d6,d5
  9007. add.w d5,d6
  9008. add.w d5,d6
  9009. add.w d6,(a2)+
  9010. move.w (a0)+,d6
  9011. move.w d6,d5
  9012. add.w d5,d6
  9013. add.w d5,d6
  9014. add.w d6,(a2)+
  9015. move.w (a0)+,d6
  9016. move.w d6,d5
  9017. add.w d5,d6
  9018. add.w d5,d6
  9019. add.w d6,(a2)+
  9020. move.w (a0)+,d6
  9021. move.w d6,d5
  9022. add.w d5,d6
  9023. add.w d5,d6
  9024. add.w d6,(a2)+
  9025. move.w (a0)+,d6
  9026. move.w d6,d5
  9027. add.w d5,d6
  9028. add.w d5,d6
  9029. add.w d6,(a2)+
  9030. dbra.w d4,L00551a
  9031. rts
  9032. L005570:
  9033. moveq.l #$0b,d4
  9034. L005572:
  9035. move.w (a0)+,d6
  9036. add.w d6,d6
  9037. add.w d6,d6
  9038. add.w d6,(a2)+
  9039. move.w (a0)+,d6
  9040. add.w d6,d6
  9041. add.w d6,d6
  9042. add.w d6,(a2)+
  9043. move.w (a0)+,d6
  9044. add.w d6,d6
  9045. add.w d6,d6
  9046. add.w d6,(a2)+
  9047. move.w (a0)+,d6
  9048. add.w d6,d6
  9049. add.w d6,d6
  9050. add.w d6,(a2)+
  9051. move.w (a0)+,d6
  9052. add.w d6,d6
  9053. add.w d6,d6
  9054. add.w d6,(a2)+
  9055. move.w (a0)+,d6
  9056. add.w d6,d6
  9057. add.w d6,d6
  9058. add.w d6,(a2)+
  9059. move.w (a0)+,d6
  9060. add.w d6,d6
  9061. add.w d6,d6
  9062. add.w d6,(a2)+
  9063. move.w (a0)+,d6
  9064. add.w d6,d6
  9065. add.w d6,d6
  9066. add.w d6,(a2)+
  9067. dbra.w d4,L005572
  9068. rts
  9069. L0055b8:
  9070. moveq.l #$0b,d4
  9071. L0055ba:
  9072. move.w (a0)+,d6
  9073. move.w d6,d5
  9074. add.w d6,d6
  9075. add.w d6,d6
  9076. add.w d5,d6
  9077. add.w d6,(a2)+
  9078. move.w (a0)+,d6
  9079. move.w d6,d5
  9080. add.w d6,d6
  9081. add.w d6,d6
  9082. add.w d5,d6
  9083. add.w d6,(a2)+
  9084. move.w (a0)+,d6
  9085. move.w d6,d5
  9086. add.w d6,d6
  9087. add.w d6,d6
  9088. add.w d5,d6
  9089. add.w d6,(a2)+
  9090. move.w (a0)+,d6
  9091. move.w d6,d5
  9092. add.w d6,d6
  9093. add.w d6,d6
  9094. add.w d5,d6
  9095. add.w d6,(a2)+
  9096. move.w (a0)+,d6
  9097. move.w d6,d5
  9098. add.w d6,d6
  9099. add.w d6,d6
  9100. add.w d5,d6
  9101. add.w d6,(a2)+
  9102. move.w (a0)+,d6
  9103. move.w d6,d5
  9104. add.w d6,d6
  9105. add.w d6,d6
  9106. add.w d5,d6
  9107. add.w d6,(a2)+
  9108. move.w (a0)+,d6
  9109. move.w d6,d5
  9110. add.w d6,d6
  9111. add.w d6,d6
  9112. add.w d5,d6
  9113. add.w d6,(a2)+
  9114. move.w (a0)+,d6
  9115. move.w d6,d5
  9116. add.w d6,d6
  9117. add.w d6,d6
  9118. add.w d5,d6
  9119. add.w d6,(a2)+
  9120. dbra.w d4,L0055ba
  9121. rts
  9122. L005620:
  9123. lea.l (Table1,pc),a3
  9124. bra.s L005636
  9125. L005626:
  9126. lea.l (Table2,pc),a3
  9127. bra.s L005636
  9128. L00562c:
  9129. lea.l (Table3,pc),a3
  9130. bra.s L005636
  9131. L005632:
  9132. lea.l (Table4,pc),a3
  9133. L005636:
  9134. moveq.l #$00,d6
  9135. move.b (a0)+,d6
  9136. move.b (a3,d6.w),d6
  9137. ext.w d6
  9138. add.w d6,(a2)+
  9139. moveq.l #$00,d6
  9140. move.b (a0)+,d6
  9141. move.b (a3,d6.w),d6
  9142. ext.w d6
  9143. add.w d6,(a2)+
  9144. moveq.l #$00,d6
  9145. move.b (a0)+,d6
  9146. move.b (a3,d6.w),d6
  9147. ext.w d6
  9148. add.w d6,(a2)+
  9149. moveq.l #$00,d6
  9150. move.b (a0)+,d6
  9151. move.b (a3,d6.w),d6
  9152. ext.w d6
  9153. add.w d6,(a2)+
  9154. moveq.l #$00,d6
  9155. move.b (a0)+,d6
  9156. move.b (a3,d6.w),d6
  9157. ext.w d6
  9158. add.w d6,(a2)+
  9159. moveq.l #$00,d6
  9160. move.b (a0)+,d6
  9161. move.b (a3,d6.w),d6
  9162. ext.w d6
  9163. add.w d6,(a2)+
  9164. moveq.l #$00,d6
  9165. move.b (a0)+,d6
  9166. move.b (a3,d6.w),d6
  9167. ext.w d6
  9168. add.w d6,(a2)+
  9169. moveq.l #$00,d6
  9170. move.b (a0)+,d6
  9171. move.b (a3,d6.w),d6
  9172. ext.w d6
  9173. add.w d6,(a2)+
  9174. moveq.l #$00,d6
  9175. move.b (a0)+,d6
  9176. move.b (a3,d6.w),d6
  9177. ext.w d6
  9178. add.w d6,(a2)+
  9179. moveq.l #$00,d6
  9180. move.b (a0)+,d6
  9181. move.b (a3,d6.w),d6
  9182. ext.w d6
  9183. add.w d6,(a2)+
  9184. moveq.l #$00,d6
  9185. move.b (a0)+,d6
  9186. move.b (a3,d6.w),d6
  9187. ext.w d6
  9188. add.w d6,(a2)+
  9189. moveq.l #$00,d6
  9190. move.b (a0)+,d6
  9191. move.b (a3,d6.w),d6
  9192. ext.w d6
  9193. add.w d6,(a2)+
  9194. moveq.l #$00,d6
  9195. move.b (a0)+,d6
  9196. move.b (a3,d6.w),d6
  9197. ext.w d6
  9198. add.w d6,(a2)+
  9199. moveq.l #$00,d6
  9200. move.b (a0)+,d6
  9201. move.b (a3,d6.w),d6
  9202. ext.w d6
  9203. add.w d6,(a2)+
  9204. moveq.l #$00,d6
  9205. move.b (a0)+,d6
  9206. move.b (a3,d6.w),d6
  9207. ext.w d6
  9208. add.w d6,(a2)+
  9209. moveq.l #$00,d6
  9210. move.b (a0)+,d6
  9211. move.b (a3,d6.w),d6
  9212. ext.w d6
  9213. add.w d6,(a2)+
  9214. moveq.l #$00,d6
  9215. move.b (a0)+,d6
  9216. move.b (a3,d6.w),d6
  9217. ext.w d6
  9218. add.w d6,(a2)+
  9219. moveq.l #$00,d6
  9220. move.b (a0)+,d6
  9221. move.b (a3,d6.w),d6
  9222. ext.w d6
  9223. add.w d6,(a2)+
  9224. moveq.l #$00,d6
  9225. move.b (a0)+,d6
  9226. move.b (a3,d6.w),d6
  9227. ext.w d6
  9228. add.w d6,(a2)+
  9229. moveq.l #$00,d6
  9230. move.b (a0)+,d6
  9231. move.b (a3,d6.w),d6
  9232. ext.w d6
  9233. add.w d6,(a2)+
  9234. moveq.l #$00,d6
  9235. move.b (a0)+,d6
  9236. move.b (a3,d6.w),d6
  9237. ext.w d6
  9238. add.w d6,(a2)+
  9239. moveq.l #$00,d6
  9240. move.b (a0)+,d6
  9241. move.b (a3,d6.w),d6
  9242. ext.w d6
  9243. add.w d6,(a2)+
  9244. moveq.l #$00,d6
  9245. move.b (a0)+,d6
  9246. move.b (a3,d6.w),d6
  9247. ext.w d6
  9248. add.w d6,(a2)+
  9249. moveq.l #$00,d6
  9250. move.b (a0)+,d6
  9251. move.b (a3,d6.w),d6
  9252. ext.w d6
  9253. add.w d6,(a2)+
  9254. moveq.l #$00,d6
  9255. move.b (a0)+,d6
  9256. move.b (a3,d6.w),d6
  9257. ext.w d6
  9258. add.w d6,(a2)+
  9259. moveq.l #$00,d6
  9260. move.b (a0)+,d6
  9261. move.b (a3,d6.w),d6
  9262. ext.w d6
  9263. add.w d6,(a2)+
  9264. moveq.l #$00,d6
  9265. move.b (a0)+,d6
  9266. move.b (a3,d6.w),d6
  9267. ext.w d6
  9268. add.w d6,(a2)+
  9269. moveq.l #$00,d6
  9270. move.b (a0)+,d6
  9271. move.b (a3,d6.w),d6
  9272. ext.w d6
  9273. add.w d6,(a2)+
  9274. moveq.l #$00,d6
  9275. move.b (a0)+,d6
  9276. move.b (a3,d6.w),d6
  9277. ext.w d6
  9278. add.w d6,(a2)+
  9279. moveq.l #$00,d6
  9280. move.b (a0)+,d6
  9281. move.b (a3,d6.w),d6
  9282. ext.w d6
  9283. add.w d6,(a2)+
  9284. moveq.l #$00,d6
  9285. move.b (a0)+,d6
  9286. move.b (a3,d6.w),d6
  9287. ext.w d6
  9288. add.w d6,(a2)+
  9289. moveq.l #$00,d6
  9290. move.b (a0)+,d6
  9291. move.b (a3,d6.w),d6
  9292. ext.w d6
  9293. add.w d6,(a2)+
  9294. moveq.l #$00,d6
  9295. move.b (a0)+,d6
  9296. move.b (a3,d6.w),d6
  9297. ext.w d6
  9298. add.w d6,(a2)+
  9299. moveq.l #$00,d6
  9300. move.b (a0)+,d6
  9301. move.b (a3,d6.w),d6
  9302. ext.w d6
  9303. add.w d6,(a2)+
  9304. moveq.l #$00,d6
  9305. move.b (a0)+,d6
  9306. move.b (a3,d6.w),d6
  9307. ext.w d6
  9308. add.w d6,(a2)+
  9309. moveq.l #$00,d6
  9310. move.b (a0)+,d6
  9311. move.b (a3,d6.w),d6
  9312. ext.w d6
  9313. add.w d6,(a2)+
  9314. moveq.l #$00,d6
  9315. move.b (a0)+,d6
  9316. move.b (a3,d6.w),d6
  9317. ext.w d6
  9318. add.w d6,(a2)+
  9319. moveq.l #$00,d6
  9320. move.b (a0)+,d6
  9321. move.b (a3,d6.w),d6
  9322. ext.w d6
  9323. add.w d6,(a2)+
  9324. moveq.l #$00,d6
  9325. move.b (a0)+,d6
  9326. move.b (a3,d6.w),d6
  9327. ext.w d6
  9328. add.w d6,(a2)+
  9329. moveq.l #$00,d6
  9330. move.b (a0)+,d6
  9331. move.b (a3,d6.w),d6
  9332. ext.w d6
  9333. add.w d6,(a2)+
  9334. moveq.l #$00,d6
  9335. move.b (a0)+,d6
  9336. move.b (a3,d6.w),d6
  9337. ext.w d6
  9338. add.w d6,(a2)+
  9339. moveq.l #$00,d6
  9340. move.b (a0)+,d6
  9341. move.b (a3,d6.w),d6
  9342. ext.w d6
  9343. add.w d6,(a2)+
  9344. moveq.l #$00,d6
  9345. move.b (a0)+,d6
  9346. move.b (a3,d6.w),d6
  9347. ext.w d6
  9348. add.w d6,(a2)+
  9349. moveq.l #$00,d6
  9350. move.b (a0)+,d6
  9351. move.b (a3,d6.w),d6
  9352. ext.w d6
  9353. add.w d6,(a2)+
  9354. moveq.l #$00,d6
  9355. move.b (a0)+,d6
  9356. move.b (a3,d6.w),d6
  9357. ext.w d6
  9358. add.w d6,(a2)+
  9359. moveq.l #$00,d6
  9360. move.b (a0)+,d6
  9361. move.b (a3,d6.w),d6
  9362. ext.w d6
  9363. add.w d6,(a2)+
  9364. moveq.l #$00,d6
  9365. move.b (a0)+,d6
  9366. move.b (a3,d6.w),d6
  9367. ext.w d6
  9368. add.w d6,(a2)+
  9369. moveq.l #$00,d6
  9370. move.b (a0)+,d6
  9371. move.b (a3,d6.w),d6
  9372. ext.w d6
  9373. add.w d6,(a2)+
  9374. moveq.l #$00,d6
  9375. move.b (a0)+,d6
  9376. move.b (a3,d6.w),d6
  9377. ext.w d6
  9378. add.w d6,(a2)+
  9379. moveq.l #$00,d6
  9380. move.b (a0)+,d6
  9381. move.b (a3,d6.w),d6
  9382. ext.w d6
  9383. add.w d6,(a2)+
  9384. moveq.l #$00,d6
  9385. move.b (a0)+,d6
  9386. move.b (a3,d6.w),d6
  9387. ext.w d6
  9388. add.w d6,(a2)+
  9389. moveq.l #$00,d6
  9390. move.b (a0)+,d6
  9391. move.b (a3,d6.w),d6
  9392. ext.w d6
  9393. add.w d6,(a2)+
  9394. moveq.l #$00,d6
  9395. move.b (a0)+,d6
  9396. move.b (a3,d6.w),d6
  9397. ext.w d6
  9398. add.w d6,(a2)+
  9399. moveq.l #$00,d6
  9400. move.b (a0)+,d6
  9401. move.b (a3,d6.w),d6
  9402. ext.w d6
  9403. add.w d6,(a2)+
  9404. moveq.l #$00,d6
  9405. move.b (a0)+,d6
  9406. move.b (a3,d6.w),d6
  9407. ext.w d6
  9408. add.w d6,(a2)+
  9409. moveq.l #$00,d6
  9410. move.b (a0)+,d6
  9411. move.b (a3,d6.w),d6
  9412. ext.w d6
  9413. add.w d6,(a2)+
  9414. moveq.l #$00,d6
  9415. move.b (a0)+,d6
  9416. move.b (a3,d6.w),d6
  9417. ext.w d6
  9418. add.w d6,(a2)+
  9419. moveq.l #$00,d6
  9420. move.b (a0)+,d6
  9421. move.b (a3,d6.w),d6
  9422. ext.w d6
  9423. add.w d6,(a2)+
  9424. moveq.l #$00,d6
  9425. move.b (a0)+,d6
  9426. move.b (a3,d6.w),d6
  9427. ext.w d6
  9428. add.w d6,(a2)+
  9429. moveq.l #$00,d6
  9430. move.b (a0)+,d6
  9431. move.b (a3,d6.w),d6
  9432. ext.w d6
  9433. add.w d6,(a2)+
  9434. moveq.l #$00,d6
  9435. move.b (a0)+,d6
  9436. move.b (a3,d6.w),d6
  9437. ext.w d6
  9438. add.w d6,(a2)+
  9439. moveq.l #$00,d6
  9440. move.b (a0)+,d6
  9441. move.b (a3,d6.w),d6
  9442. ext.w d6
  9443. add.w d6,(a2)+
  9444. moveq.l #$00,d6
  9445. move.b (a0)+,d6
  9446. move.b (a3,d6.w),d6
  9447. ext.w d6
  9448. add.w d6,(a2)+
  9449. moveq.l #$00,d6
  9450. move.b (a0)+,d6
  9451. move.b (a3,d6.w),d6
  9452. ext.w d6
  9453. add.w d6,(a2)+
  9454. moveq.l #$00,d6
  9455. move.b (a0)+,d6
  9456. move.b (a3,d6.w),d6
  9457. ext.w d6
  9458. add.w d6,(a2)+
  9459. moveq.l #$00,d6
  9460. move.b (a0)+,d6
  9461. move.b (a3,d6.w),d6
  9462. ext.w d6
  9463. add.w d6,(a2)+
  9464. moveq.l #$00,d6
  9465. move.b (a0)+,d6
  9466. move.b (a3,d6.w),d6
  9467. ext.w d6
  9468. add.w d6,(a2)+
  9469. moveq.l #$00,d6
  9470. move.b (a0)+,d6
  9471. move.b (a3,d6.w),d6
  9472. ext.w d6
  9473. add.w d6,(a2)+
  9474. moveq.l #$00,d6
  9475. move.b (a0)+,d6
  9476. move.b (a3,d6.w),d6
  9477. ext.w d6
  9478. add.w d6,(a2)+
  9479. moveq.l #$00,d6
  9480. move.b (a0)+,d6
  9481. move.b (a3,d6.w),d6
  9482. ext.w d6
  9483. add.w d6,(a2)+
  9484. moveq.l #$00,d6
  9485. move.b (a0)+,d6
  9486. move.b (a3,d6.w),d6
  9487. ext.w d6
  9488. add.w d6,(a2)+
  9489. moveq.l #$00,d6
  9490. move.b (a0)+,d6
  9491. move.b (a3,d6.w),d6
  9492. ext.w d6
  9493. add.w d6,(a2)+
  9494. moveq.l #$00,d6
  9495. move.b (a0)+,d6
  9496. move.b (a3,d6.w),d6
  9497. ext.w d6
  9498. add.w d6,(a2)+
  9499. moveq.l #$00,d6
  9500. move.b (a0)+,d6
  9501. move.b (a3,d6.w),d6
  9502. ext.w d6
  9503. add.w d6,(a2)+
  9504. moveq.l #$00,d6
  9505. move.b (a0)+,d6
  9506. move.b (a3,d6.w),d6
  9507. ext.w d6
  9508. add.w d6,(a2)+
  9509. moveq.l #$00,d6
  9510. move.b (a0)+,d6
  9511. move.b (a3,d6.w),d6
  9512. ext.w d6
  9513. add.w d6,(a2)+
  9514. moveq.l #$00,d6
  9515. move.b (a0)+,d6
  9516. move.b (a3,d6.w),d6
  9517. ext.w d6
  9518. add.w d6,(a2)+
  9519. moveq.l #$00,d6
  9520. move.b (a0)+,d6
  9521. move.b (a3,d6.w),d6
  9522. ext.w d6
  9523. add.w d6,(a2)+
  9524. moveq.l #$00,d6
  9525. move.b (a0)+,d6
  9526. move.b (a3,d6.w),d6
  9527. ext.w d6
  9528. add.w d6,(a2)+
  9529. moveq.l #$00,d6
  9530. move.b (a0)+,d6
  9531. move.b (a3,d6.w),d6
  9532. ext.w d6
  9533. add.w d6,(a2)+
  9534. moveq.l #$00,d6
  9535. move.b (a0)+,d6
  9536. move.b (a3,d6.w),d6
  9537. ext.w d6
  9538. add.w d6,(a2)+
  9539. moveq.l #$00,d6
  9540. move.b (a0)+,d6
  9541. move.b (a3,d6.w),d6
  9542. ext.w d6
  9543. add.w d6,(a2)+
  9544. moveq.l #$00,d6
  9545. move.b (a0)+,d6
  9546. move.b (a3,d6.w),d6
  9547. ext.w d6
  9548. add.w d6,(a2)+
  9549. moveq.l #$00,d6
  9550. move.b (a0)+,d6
  9551. move.b (a3,d6.w),d6
  9552. ext.w d6
  9553. add.w d6,(a2)+
  9554. moveq.l #$00,d6
  9555. move.b (a0)+,d6
  9556. move.b (a3,d6.w),d6
  9557. ext.w d6
  9558. add.w d6,(a2)+
  9559. moveq.l #$00,d6
  9560. move.b (a0)+,d6
  9561. move.b (a3,d6.w),d6
  9562. ext.w d6
  9563. add.w d6,(a2)+
  9564. moveq.l #$00,d6
  9565. move.b (a0)+,d6
  9566. move.b (a3,d6.w),d6
  9567. ext.w d6
  9568. add.w d6,(a2)+
  9569. moveq.l #$00,d6
  9570. move.b (a0)+,d6
  9571. move.b (a3,d6.w),d6
  9572. ext.w d6
  9573. add.w d6,(a2)+
  9574. moveq.l #$00,d6
  9575. move.b (a0)+,d6
  9576. move.b (a3,d6.w),d6
  9577. ext.w d6
  9578. add.w d6,(a2)+
  9579. moveq.l #$00,d6
  9580. move.b (a0)+,d6
  9581. move.b (a3,d6.w),d6
  9582. ext.w d6
  9583. add.w d6,(a2)+
  9584. moveq.l #$00,d6
  9585. move.b (a0)+,d6
  9586. move.b (a3,d6.w),d6
  9587. ext.w d6
  9588. add.w d6,(a2)+
  9589. moveq.l #$00,d6
  9590. move.b (a0)+,d6
  9591. move.b (a3,d6.w),d6
  9592. ext.w d6
  9593. add.w d6,(a2)+
  9594. moveq.l #$00,d6
  9595. move.b (a0)+,d6
  9596. move.b (a3,d6.w),d6
  9597. ext.w d6
  9598. add.w d6,(a2)+
  9599. moveq.l #$00,d6
  9600. move.b (a0)+,d6
  9601. move.b (a3,d6.w),d6
  9602. ext.w d6
  9603. add.w d6,(a2)+
  9604. moveq.l #$00,d6
  9605. move.b (a0)+,d6
  9606. move.b (a3,d6.w),d6
  9607. ext.w d6
  9608. add.w d6,(a2)+
  9609. moveq.l #$00,d6
  9610. move.b (a0)+,d6
  9611. move.b (a3,d6.w),d6
  9612. ext.w d6
  9613. add.w d6,(a2)+
  9614. rts
  9615. L005ab8:
  9616. moveq.l #$0b,d4
  9617. L005aba:
  9618. move.b (a0)+,d6
  9619. ext.w d6
  9620. asr.w #3,d6
  9621. add.w d6,(a2)+
  9622. move.b (a0)+,d6
  9623. ext.w d6
  9624. asr.w #3,d6
  9625. add.w d6,(a2)+
  9626. move.b (a0)+,d6
  9627. ext.w d6
  9628. asr.w #3,d6
  9629. add.w d6,(a2)+
  9630. move.b (a0)+,d6
  9631. ext.w d6
  9632. asr.w #3,d6
  9633. add.w d6,(a2)+
  9634. move.b (a0)+,d6
  9635. ext.w d6
  9636. asr.w #3,d6
  9637. add.w d6,(a2)+
  9638. move.b (a0)+,d6
  9639. ext.w d6
  9640. asr.w #3,d6
  9641. add.w d6,(a2)+
  9642. move.b (a0)+,d6
  9643. ext.w d6
  9644. asr.w #3,d6
  9645. add.w d6,(a2)+
  9646. move.b (a0)+,d6
  9647. ext.w d6
  9648. asr.w #3,d6
  9649. add.w d6,(a2)+
  9650. dbra.w d4,L005aba
  9651. rts
  9652. L005b00:
  9653. moveq.l #$0b,d4
  9654. L005b02:
  9655. move.b (a0)+,d6
  9656. ext.w d6
  9657. asr.w #2,d6
  9658. add.w d6,(a2)+
  9659. move.b (a0)+,d6
  9660. ext.w d6
  9661. asr.w #2,d6
  9662. add.w d6,(a2)+
  9663. move.b (a0)+,d6
  9664. ext.w d6
  9665. asr.w #2,d6
  9666. add.w d6,(a2)+
  9667. move.b (a0)+,d6
  9668. ext.w d6
  9669. asr.w #2,d6
  9670. add.w d6,(a2)+
  9671. move.b (a0)+,d6
  9672. ext.w d6
  9673. asr.w #2,d6
  9674. add.w d6,(a2)+
  9675. move.b (a0)+,d6
  9676. ext.w d6
  9677. asr.w #2,d6
  9678. add.w d6,(a2)+
  9679. move.b (a0)+,d6
  9680. ext.w d6
  9681. asr.w #2,d6
  9682. add.w d6,(a2)+
  9683. move.b (a0)+,d6
  9684. ext.w d6
  9685. asr.w #2,d6
  9686. add.w d6,(a2)+
  9687. dbra.w d4,L005b02
  9688. rts
  9689. L005b48:
  9690. moveq.l #$0b,d4
  9691. L005b4a:
  9692. move.b (a0)+,d6
  9693. ext.w d6
  9694. asr.w #1,d6
  9695. add.w d6,(a2)+
  9696. move.b (a0)+,d6
  9697. ext.w d6
  9698. asr.w #1,d6
  9699. add.w d6,(a2)+
  9700. move.b (a0)+,d6
  9701. ext.w d6
  9702. asr.w #1,d6
  9703. add.w d6,(a2)+
  9704. move.b (a0)+,d6
  9705. ext.w d6
  9706. asr.w #1,d6
  9707. add.w d6,(a2)+
  9708. move.b (a0)+,d6
  9709. ext.w d6
  9710. asr.w #1,d6
  9711. add.w d6,(a2)+
  9712. move.b (a0)+,d6
  9713. ext.w d6
  9714. asr.w #1,d6
  9715. add.w d6,(a2)+
  9716. move.b (a0)+,d6
  9717. ext.w d6
  9718. asr.w #1,d6
  9719. add.w d6,(a2)+
  9720. move.b (a0)+,d6
  9721. ext.w d6
  9722. asr.w #1,d6
  9723. add.w d6,(a2)+
  9724. dbra.w d4,L005b4a
  9725. rts
  9726. L005b90:
  9727. moveq.l #$0b,d4
  9728. L005b92:
  9729. move.b (a0)+,d6
  9730. ext.w d6
  9731. move.w d6,d5
  9732. asr.w #2,d5
  9733. sub.w d5,d6
  9734. add.w d6,(a2)+
  9735. move.b (a0)+,d6
  9736. ext.w d6
  9737. move.w d6,d5
  9738. asr.w #2,d5
  9739. sub.w d5,d6
  9740. add.w d6,(a2)+
  9741. move.b (a0)+,d6
  9742. ext.w d6
  9743. move.w d6,d5
  9744. asr.w #2,d5
  9745. sub.w d5,d6
  9746. add.w d6,(a2)+
  9747. move.b (a0)+,d6
  9748. ext.w d6
  9749. move.w d6,d5
  9750. asr.w #2,d5
  9751. sub.w d5,d6
  9752. add.w d6,(a2)+
  9753. move.b (a0)+,d6
  9754. ext.w d6
  9755. move.w d6,d5
  9756. asr.w #2,d5
  9757. sub.w d5,d6
  9758. add.w d6,(a2)+
  9759. move.b (a0)+,d6
  9760. ext.w d6
  9761. move.w d6,d5
  9762. asr.w #2,d5
  9763. sub.w d5,d6
  9764. add.w d6,(a2)+
  9765. move.b (a0)+,d6
  9766. ext.w d6
  9767. move.w d6,d5
  9768. asr.w #2,d5
  9769. sub.w d5,d6
  9770. add.w d6,(a2)+
  9771. move.b (a0)+,d6
  9772. ext.w d6
  9773. move.w d6,d5
  9774. asr.w #2,d5
  9775. sub.w d5,d6
  9776. add.w d6,(a2)+
  9777. dbra.w d4,L005b92
  9778. rts
  9779. L005bf8:
  9780. move.b (a0)+,d6
  9781. ext.w d6
  9782. add.w d6,(a2)+
  9783. move.b (a0)+,d6
  9784. ext.w d6
  9785. add.w d6,(a2)+
  9786. move.b (a0)+,d6
  9787. ext.w d6
  9788. add.w d6,(a2)+
  9789. move.b (a0)+,d6
  9790. ext.w d6
  9791. add.w d6,(a2)+
  9792. move.b (a0)+,d6
  9793. ext.w d6
  9794. add.w d6,(a2)+
  9795. move.b (a0)+,d6
  9796. ext.w d6
  9797. add.w d6,(a2)+
  9798. move.b (a0)+,d6
  9799. ext.w d6
  9800. add.w d6,(a2)+
  9801. move.b (a0)+,d6
  9802. ext.w d6
  9803. add.w d6,(a2)+
  9804. move.b (a0)+,d6
  9805. ext.w d6
  9806. add.w d6,(a2)+
  9807. move.b (a0)+,d6
  9808. ext.w d6
  9809. add.w d6,(a2)+
  9810. move.b (a0)+,d6
  9811. ext.w d6
  9812. add.w d6,(a2)+
  9813. move.b (a0)+,d6
  9814. ext.w d6
  9815. add.w d6,(a2)+
  9816. move.b (a0)+,d6
  9817. ext.w d6
  9818. add.w d6,(a2)+
  9819. move.b (a0)+,d6
  9820. ext.w d6
  9821. add.w d6,(a2)+
  9822. move.b (a0)+,d6
  9823. ext.w d6
  9824. add.w d6,(a2)+
  9825. move.b (a0)+,d6
  9826. ext.w d6
  9827. add.w d6,(a2)+
  9828. move.b (a0)+,d6
  9829. ext.w d6
  9830. add.w d6,(a2)+
  9831. move.b (a0)+,d6
  9832. ext.w d6
  9833. add.w d6,(a2)+
  9834. move.b (a0)+,d6
  9835. ext.w d6
  9836. add.w d6,(a2)+
  9837. move.b (a0)+,d6
  9838. ext.w d6
  9839. add.w d6,(a2)+
  9840. move.b (a0)+,d6
  9841. ext.w d6
  9842. add.w d6,(a2)+
  9843. move.b (a0)+,d6
  9844. ext.w d6
  9845. add.w d6,(a2)+
  9846. move.b (a0)+,d6
  9847. ext.w d6
  9848. add.w d6,(a2)+
  9849. move.b (a0)+,d6
  9850. ext.w d6
  9851. add.w d6,(a2)+
  9852. move.b (a0)+,d6
  9853. ext.w d6
  9854. add.w d6,(a2)+
  9855. move.b (a0)+,d6
  9856. ext.w d6
  9857. add.w d6,(a2)+
  9858. move.b (a0)+,d6
  9859. ext.w d6
  9860. add.w d6,(a2)+
  9861. move.b (a0)+,d6
  9862. ext.w d6
  9863. add.w d6,(a2)+
  9864. move.b (a0)+,d6
  9865. ext.w d6
  9866. add.w d6,(a2)+
  9867. move.b (a0)+,d6
  9868. ext.w d6
  9869. add.w d6,(a2)+
  9870. move.b (a0)+,d6
  9871. ext.w d6
  9872. add.w d6,(a2)+
  9873. move.b (a0)+,d6
  9874. ext.w d6
  9875. add.w d6,(a2)+
  9876. move.b (a0)+,d6
  9877. ext.w d6
  9878. add.w d6,(a2)+
  9879. move.b (a0)+,d6
  9880. ext.w d6
  9881. add.w d6,(a2)+
  9882. move.b (a0)+,d6
  9883. ext.w d6
  9884. add.w d6,(a2)+
  9885. move.b (a0)+,d6
  9886. ext.w d6
  9887. add.w d6,(a2)+
  9888. move.b (a0)+,d6
  9889. ext.w d6
  9890. add.w d6,(a2)+
  9891. move.b (a0)+,d6
  9892. ext.w d6
  9893. add.w d6,(a2)+
  9894. move.b (a0)+,d6
  9895. ext.w d6
  9896. add.w d6,(a2)+
  9897. move.b (a0)+,d6
  9898. ext.w d6
  9899. add.w d6,(a2)+
  9900. move.b (a0)+,d6
  9901. ext.w d6
  9902. add.w d6,(a2)+
  9903. move.b (a0)+,d6
  9904. ext.w d6
  9905. add.w d6,(a2)+
  9906. move.b (a0)+,d6
  9907. ext.w d6
  9908. add.w d6,(a2)+
  9909. move.b (a0)+,d6
  9910. ext.w d6
  9911. add.w d6,(a2)+
  9912. move.b (a0)+,d6
  9913. ext.w d6
  9914. add.w d6,(a2)+
  9915. move.b (a0)+,d6
  9916. ext.w d6
  9917. add.w d6,(a2)+
  9918. move.b (a0)+,d6
  9919. ext.w d6
  9920. add.w d6,(a2)+
  9921. move.b (a0)+,d6
  9922. ext.w d6
  9923. add.w d6,(a2)+
  9924. move.b (a0)+,d6
  9925. ext.w d6
  9926. add.w d6,(a2)+
  9927. move.b (a0)+,d6
  9928. ext.w d6
  9929. add.w d6,(a2)+
  9930. move.b (a0)+,d6
  9931. ext.w d6
  9932. add.w d6,(a2)+
  9933. move.b (a0)+,d6
  9934. ext.w d6
  9935. add.w d6,(a2)+
  9936. move.b (a0)+,d6
  9937. ext.w d6
  9938. add.w d6,(a2)+
  9939. move.b (a0)+,d6
  9940. ext.w d6
  9941. add.w d6,(a2)+
  9942. move.b (a0)+,d6
  9943. ext.w d6
  9944. add.w d6,(a2)+
  9945. move.b (a0)+,d6
  9946. ext.w d6
  9947. add.w d6,(a2)+
  9948. move.b (a0)+,d6
  9949. ext.w d6
  9950. add.w d6,(a2)+
  9951. move.b (a0)+,d6
  9952. ext.w d6
  9953. add.w d6,(a2)+
  9954. move.b (a0)+,d6
  9955. ext.w d6
  9956. add.w d6,(a2)+
  9957. move.b (a0)+,d6
  9958. ext.w d6
  9959. add.w d6,(a2)+
  9960. move.b (a0)+,d6
  9961. ext.w d6
  9962. add.w d6,(a2)+
  9963. move.b (a0)+,d6
  9964. ext.w d6
  9965. add.w d6,(a2)+
  9966. move.b (a0)+,d6
  9967. ext.w d6
  9968. add.w d6,(a2)+
  9969. move.b (a0)+,d6
  9970. ext.w d6
  9971. add.w d6,(a2)+
  9972. move.b (a0)+,d6
  9973. ext.w d6
  9974. add.w d6,(a2)+
  9975. move.b (a0)+,d6
  9976. ext.w d6
  9977. add.w d6,(a2)+
  9978. move.b (a0)+,d6
  9979. ext.w d6
  9980. add.w d6,(a2)+
  9981. move.b (a0)+,d6
  9982. ext.w d6
  9983. add.w d6,(a2)+
  9984. move.b (a0)+,d6
  9985. ext.w d6
  9986. add.w d6,(a2)+
  9987. move.b (a0)+,d6
  9988. ext.w d6
  9989. add.w d6,(a2)+
  9990. move.b (a0)+,d6
  9991. ext.w d6
  9992. add.w d6,(a2)+
  9993. move.b (a0)+,d6
  9994. ext.w d6
  9995. add.w d6,(a2)+
  9996. move.b (a0)+,d6
  9997. ext.w d6
  9998. add.w d6,(a2)+
  9999. move.b (a0)+,d6
  10000. ext.w d6
  10001. add.w d6,(a2)+
  10002. move.b (a0)+,d6
  10003. ext.w d6
  10004. add.w d6,(a2)+
  10005. move.b (a0)+,d6
  10006. ext.w d6
  10007. add.w d6,(a2)+
  10008. move.b (a0)+,d6
  10009. ext.w d6
  10010. add.w d6,(a2)+
  10011. move.b (a0)+,d6
  10012. ext.w d6
  10013. add.w d6,(a2)+
  10014. move.b (a0)+,d6
  10015. ext.w d6
  10016. add.w d6,(a2)+
  10017. move.b (a0)+,d6
  10018. ext.w d6
  10019. add.w d6,(a2)+
  10020. move.b (a0)+,d6
  10021. ext.w d6
  10022. add.w d6,(a2)+
  10023. move.b (a0)+,d6
  10024. ext.w d6
  10025. add.w d6,(a2)+
  10026. move.b (a0)+,d6
  10027. ext.w d6
  10028. add.w d6,(a2)+
  10029. move.b (a0)+,d6
  10030. ext.w d6
  10031. add.w d6,(a2)+
  10032. move.b (a0)+,d6
  10033. ext.w d6
  10034. add.w d6,(a2)+
  10035. move.b (a0)+,d6
  10036. ext.w d6
  10037. add.w d6,(a2)+
  10038. move.b (a0)+,d6
  10039. ext.w d6
  10040. add.w d6,(a2)+
  10041. move.b (a0)+,d6
  10042. ext.w d6
  10043. add.w d6,(a2)+
  10044. move.b (a0)+,d6
  10045. ext.w d6
  10046. add.w d6,(a2)+
  10047. move.b (a0)+,d6
  10048. ext.w d6
  10049. add.w d6,(a2)+
  10050. move.b (a0)+,d6
  10051. ext.w d6
  10052. add.w d6,(a2)+
  10053. move.b (a0)+,d6
  10054. ext.w d6
  10055. add.w d6,(a2)+
  10056. move.b (a0)+,d6
  10057. ext.w d6
  10058. add.w d6,(a2)+
  10059. move.b (a0)+,d6
  10060. ext.w d6
  10061. add.w d6,(a2)+
  10062. move.b (a0)+,d6
  10063. ext.w d6
  10064. add.w d6,(a2)+
  10065. move.b (a0)+,d6
  10066. ext.w d6
  10067. add.w d6,(a2)+
  10068. rts
  10069. L005e3a:
  10070. moveq.l #$0b,d4
  10071. L005e3c:
  10072. move.b (a0)+,d6
  10073. ext.w d6
  10074. move.w d6,d5
  10075. asr.w #2,d5
  10076. add.w d5,d6
  10077. add.w d6,(a2)+
  10078. move.b (a0)+,d6
  10079. ext.w d6
  10080. move.w d6,d5
  10081. asr.w #2,d5
  10082. add.w d5,d6
  10083. add.w d6,(a2)+
  10084. move.b (a0)+,d6
  10085. ext.w d6
  10086. move.w d6,d5
  10087. asr.w #2,d5
  10088. add.w d5,d6
  10089. add.w d6,(a2)+
  10090. move.b (a0)+,d6
  10091. ext.w d6
  10092. move.w d6,d5
  10093. asr.w #2,d5
  10094. add.w d5,d6
  10095. add.w d6,(a2)+
  10096. move.b (a0)+,d6
  10097. ext.w d6
  10098. move.w d6,d5
  10099. asr.w #2,d5
  10100. add.w d5,d6
  10101. add.w d6,(a2)+
  10102. move.b (a0)+,d6
  10103. ext.w d6
  10104. move.w d6,d5
  10105. asr.w #2,d5
  10106. add.w d5,d6
  10107. add.w d6,(a2)+
  10108. move.b (a0)+,d6
  10109. ext.w d6
  10110. move.w d6,d5
  10111. asr.w #2,d5
  10112. add.w d5,d6
  10113. add.w d6,(a2)+
  10114. move.b (a0)+,d6
  10115. ext.w d6
  10116. move.w d6,d5
  10117. asr.w #2,d5
  10118. add.w d5,d6
  10119. add.w d6,(a2)+
  10120. dbra.w d4,L005e3c
  10121. rts
  10122. L005ea2:
  10123. moveq.l #$0b,d4
  10124. L005ea4:
  10125. move.b (a0)+,d6
  10126. ext.w d6
  10127. move.w d6,d5
  10128. add.w d6,d6
  10129. asr.w #1,d5
  10130. sub.w d5,d6
  10131. add.w d6,(a2)+
  10132. move.b (a0)+,d6
  10133. ext.w d6
  10134. move.w d6,d5
  10135. add.w d6,d6
  10136. asr.w #1,d5
  10137. sub.w d5,d6
  10138. add.w d6,(a2)+
  10139. move.b (a0)+,d6
  10140. ext.w d6
  10141. move.w d6,d5
  10142. add.w d6,d6
  10143. asr.w #1,d5
  10144. sub.w d5,d6
  10145. add.w d6,(a2)+
  10146. move.b (a0)+,d6
  10147. ext.w d6
  10148. move.w d6,d5
  10149. add.w d6,d6
  10150. asr.w #1,d5
  10151. sub.w d5,d6
  10152. add.w d6,(a2)+
  10153. move.b (a0)+,d6
  10154. ext.w d6
  10155. move.w d6,d5
  10156. add.w d6,d6
  10157. asr.w #1,d5
  10158. sub.w d5,d6
  10159. add.w d6,(a2)+
  10160. move.b (a0)+,d6
  10161. ext.w d6
  10162. move.w d6,d5
  10163. add.w d6,d6
  10164. asr.w #1,d5
  10165. sub.w d5,d6
  10166. add.w d6,(a2)+
  10167. move.b (a0)+,d6
  10168. ext.w d6
  10169. move.w d6,d5
  10170. add.w d6,d6
  10171. asr.w #1,d5
  10172. sub.w d5,d6
  10173. add.w d6,(a2)+
  10174. move.b (a0)+,d6
  10175. ext.w d6
  10176. move.w d6,d5
  10177. add.w d6,d6
  10178. asr.w #1,d5
  10179. sub.w d5,d6
  10180. add.w d6,(a2)+
  10181. dbra.w d4,L005ea4
  10182. rts
  10183. L005f1a:
  10184. moveq.l #$0b,d4
  10185. L005f1c:
  10186. move.b (a0)+,d6
  10187. ext.w d6
  10188. add.w d6,d6
  10189. add.w d6,(a2)+
  10190. move.b (a0)+,d6
  10191. ext.w d6
  10192. add.w d6,d6
  10193. add.w d6,(a2)+
  10194. move.b (a0)+,d6
  10195. ext.w d6
  10196. add.w d6,d6
  10197. add.w d6,(a2)+
  10198. move.b (a0)+,d6
  10199. ext.w d6
  10200. add.w d6,d6
  10201. add.w d6,(a2)+
  10202. move.b (a0)+,d6
  10203. ext.w d6
  10204. add.w d6,d6
  10205. add.w d6,(a2)+
  10206. move.b (a0)+,d6
  10207. ext.w d6
  10208. add.w d6,d6
  10209. add.w d6,(a2)+
  10210. move.b (a0)+,d6
  10211. ext.w d6
  10212. add.w d6,d6
  10213. add.w d6,(a2)+
  10214. move.b (a0)+,d6
  10215. ext.w d6
  10216. add.w d6,d6
  10217. add.w d6,(a2)+
  10218. dbra.w d4,L005f1c
  10219. rts
  10220. L005f62:
  10221. moveq.l #$0b,d4
  10222. L005f64:
  10223. move.b (a0)+,d6
  10224. ext.w d6
  10225. move.w d6,d5
  10226. add.w d6,d6
  10227. asr.w #1,d5
  10228. add.w d5,d6
  10229. add.w d6,(a2)+
  10230. move.b (a0)+,d6
  10231. ext.w d6
  10232. move.w d6,d5
  10233. add.w d6,d6
  10234. asr.w #1,d5
  10235. add.w d5,d6
  10236. add.w d6,(a2)+
  10237. move.b (a0)+,d6
  10238. ext.w d6
  10239. move.w d6,d5
  10240. add.w d6,d6
  10241. asr.w #1,d5
  10242. add.w d5,d6
  10243. add.w d6,(a2)+
  10244. move.b (a0)+,d6
  10245. ext.w d6
  10246. move.w d6,d5
  10247. add.w d6,d6
  10248. asr.w #1,d5
  10249. add.w d5,d6
  10250. add.w d6,(a2)+
  10251. move.b (a0)+,d6
  10252. ext.w d6
  10253. move.w d6,d5
  10254. add.w d6,d6
  10255. asr.w #1,d5
  10256. add.w d5,d6
  10257. add.w d6,(a2)+
  10258. move.b (a0)+,d6
  10259. ext.w d6
  10260. move.w d6,d5
  10261. add.w d6,d6
  10262. asr.w #1,d5
  10263. add.w d5,d6
  10264. add.w d6,(a2)+
  10265. move.b (a0)+,d6
  10266. ext.w d6
  10267. move.w d6,d5
  10268. add.w d6,d6
  10269. asr.w #1,d5
  10270. add.w d5,d6
  10271. add.w d6,(a2)+
  10272. move.b (a0)+,d6
  10273. ext.w d6
  10274. move.w d6,d5
  10275. add.w d6,d6
  10276. asr.w #1,d5
  10277. add.w d5,d6
  10278. add.w d6,(a2)+
  10279. dbra.w d4,L005f64
  10280. rts
  10281. L005fda:
  10282. moveq.l #$0b,d4
  10283. L005fdc:
  10284. move.b (a0)+,d6
  10285. ext.w d6
  10286. move.w d6,d5
  10287. add.w d5,d6
  10288. add.w d5,d6
  10289. add.w d6,(a2)+
  10290. move.b (a0)+,d6
  10291. ext.w d6
  10292. move.w d6,d5
  10293. add.w d5,d6
  10294. add.w d5,d6
  10295. add.w d6,(a2)+
  10296. move.b (a0)+,d6
  10297. ext.w d6
  10298. move.w d6,d5
  10299. add.w d5,d6
  10300. add.w d5,d6
  10301. add.w d6,(a2)+
  10302. move.b (a0)+,d6
  10303. ext.w d6
  10304. move.w d6,d5
  10305. add.w d5,d6
  10306. add.w d5,d6
  10307. add.w d6,(a2)+
  10308. move.b (a0)+,d6
  10309. ext.w d6
  10310. move.w d6,d5
  10311. add.w d5,d6
  10312. add.w d5,d6
  10313. add.w d6,(a2)+
  10314. move.b (a0)+,d6
  10315. ext.w d6
  10316. move.w d6,d5
  10317. add.w d5,d6
  10318. add.w d5,d6
  10319. add.w d6,(a2)+
  10320. move.b (a0)+,d6
  10321. ext.w d6
  10322. move.w d6,d5
  10323. add.w d5,d6
  10324. add.w d5,d6
  10325. add.w d6,(a2)+
  10326. move.b (a0)+,d6
  10327. ext.w d6
  10328. move.w d6,d5
  10329. add.w d5,d6
  10330. add.w d5,d6
  10331. add.w d6,(a2)+
  10332. dbra.w d4,L005fdc
  10333. rts
  10334. L006042:
  10335. moveq.l #$0b,d4
  10336. L006044:
  10337. move.b (a0)+,d6
  10338. ext.w d6
  10339. add.w d6,d6
  10340. add.w d6,d6
  10341. add.w d6,(a2)+
  10342. move.b (a0)+,d6
  10343. ext.w d6
  10344. add.w d6,d6
  10345. add.w d6,d6
  10346. add.w d6,(a2)+
  10347. move.b (a0)+,d6
  10348. ext.w d6
  10349. add.w d6,d6
  10350. add.w d6,d6
  10351. add.w d6,(a2)+
  10352. move.b (a0)+,d6
  10353. ext.w d6
  10354. add.w d6,d6
  10355. add.w d6,d6
  10356. add.w d6,(a2)+
  10357. move.b (a0)+,d6
  10358. ext.w d6
  10359. add.w d6,d6
  10360. add.w d6,d6
  10361. add.w d6,(a2)+
  10362. move.b (a0)+,d6
  10363. ext.w d6
  10364. add.w d6,d6
  10365. add.w d6,d6
  10366. add.w d6,(a2)+
  10367. move.b (a0)+,d6
  10368. ext.w d6
  10369. add.w d6,d6
  10370. add.w d6,d6
  10371. add.w d6,(a2)+
  10372. move.b (a0)+,d6
  10373. ext.w d6
  10374. add.w d6,d6
  10375. add.w d6,d6
  10376. add.w d6,(a2)+
  10377. dbra.w d4,L006044
  10378. rts
  10379. L00609a:
  10380. moveq.l #$0b,d4
  10381. L00609c:
  10382. move.b (a0)+,d6
  10383. ext.w d6
  10384. move.w d6,d5
  10385. add.w d6,d6
  10386. add.w d6,d6
  10387. add.w d5,d6
  10388. add.w d6,(a2)+
  10389. move.b (a0)+,d6
  10390. ext.w d6
  10391. move.w d6,d5
  10392. add.w d6,d6
  10393. add.w d6,d6
  10394. add.w d5,d6
  10395. add.w d6,(a2)+
  10396. move.b (a0)+,d6
  10397. ext.w d6
  10398. move.w d6,d5
  10399. add.w d6,d6
  10400. add.w d6,d6
  10401. add.w d5,d6
  10402. add.w d6,(a2)+
  10403. move.b (a0)+,d6
  10404. ext.w d6
  10405. move.w d6,d5
  10406. add.w d6,d6
  10407. add.w d6,d6
  10408. add.w d5,d6
  10409. add.w d6,(a2)+
  10410. move.b (a0)+,d6
  10411. ext.w d6
  10412. move.w d6,d5
  10413. add.w d6,d6
  10414. add.w d6,d6
  10415. add.w d5,d6
  10416. add.w d6,(a2)+
  10417. move.b (a0)+,d6
  10418. ext.w d6
  10419. move.w d6,d5
  10420. add.w d6,d6
  10421. add.w d6,d6
  10422. add.w d5,d6
  10423. add.w d6,(a2)+
  10424. move.b (a0)+,d6
  10425. ext.w d6
  10426. move.w d6,d5
  10427. add.w d6,d6
  10428. add.w d6,d6
  10429. add.w d5,d6
  10430. add.w d6,(a2)+
  10431. move.b (a0)+,d6
  10432. ext.w d6
  10433. move.w d6,d5
  10434. add.w d6,d6
  10435. add.w d6,d6
  10436. add.w d5,d6
  10437. add.w d6,(a2)+
  10438. dbra.w d4,L00609c
  10439. rts
  10440. Table1:
  10441. .dc.b $00,$00,$00,$00,$00,$00,$01,$01
  10442. .dc.b $01,$01,$01,$02,$02,$02,$02,$02
  10443. .dc.b $03,$03,$03,$03,$03,$03,$04,$04
  10444. .dc.b $04,$04,$04,$05,$05,$05,$05,$05
  10445. .dc.b $06,$06,$06,$06,$06,$06,$07,$07
  10446. .dc.b $07,$07,$07,$08,$08,$08,$08,$08
  10447. .dc.b $09,$09,$09,$09,$09,$09,$0a,$0a
  10448. .dc.b $0a,$0a,$0a,$0b,$0b,$0b,$0b,$0b
  10449. .dc.b $0c,$0c,$0c,$0c,$0c,$0c,$0d,$0d
  10450. .dc.b $0d,$0d,$0d,$0e,$0e,$0e,$0e,$0e
  10451. .dc.b $0f,$0f,$0f,$0f,$0f,$0f,$10,$10
  10452. .dc.b $10,$10,$10,$11,$11,$11,$11,$11
  10453. .dc.b $12,$12,$12,$12,$12,$12,$13,$13
  10454. .dc.b $13,$13,$13,$14,$14,$14,$14,$14
  10455. .dc.b $15,$15,$15,$15,$15,$15,$16,$16
  10456. .dc.b $16,$16,$16,$17,$17,$17,$17,$17
  10457. .dc.b $e8,$e9,$e9,$e9,$e9,$e9,$ea,$ea
  10458. .dc.b $ea,$ea,$ea,$eb,$eb,$eb,$eb,$eb
  10459. .dc.b $eb,$ec,$ec,$ec,$ec,$ec,$ed,$ed
  10460. .dc.b $ed,$ed,$ed,$ee,$ee,$ee,$ee,$ee
  10461. .dc.b $ee,$ef,$ef,$ef,$ef,$ef,$f0,$f0
  10462. .dc.b $f0,$f0,$f0,$f1,$f1,$f1,$f1,$f1
  10463. .dc.b $f1,$f2,$f2,$f2,$f2,$f2,$f3,$f3
  10464. .dc.b $f3,$f3,$f3,$f4,$f4,$f4,$f4,$f4
  10465. .dc.b $f4,$f5,$f5,$f5,$f5,$f5,$f6,$f6
  10466. .dc.b $f6,$f6,$f6,$f7,$f7,$f7,$f7,$f7
  10467. .dc.b $f7,$f8,$f8,$f8,$f8,$f8,$f9,$f9
  10468. .dc.b $f9,$f9,$f9,$fa,$fa,$fa,$fa,$fa
  10469. .dc.b $fa,$fb,$fb,$fb,$fb,$fb,$fc,$fc
  10470. .dc.b $fc,$fc,$fc,$fd,$fd,$fd,$fd,$fd
  10471. .dc.b $fd,$fe,$fe,$fe,$fe,$fe,$ff,$ff
  10472. .dc.b $ff,$ff,$ff,$00,$00,$00,$00,$00
  10473. Table2:
  10474. .dc.b $00,$00,$00,$00,$01,$01,$01,$02
  10475. .dc.b $02,$02,$03,$03,$03,$04,$04,$04
  10476. .dc.b $05,$05,$05,$05,$06,$06,$06,$07
  10477. .dc.b $07,$07,$08,$08,$08,$09,$09,$09
  10478. .dc.b $0a,$0a,$0a,$0a,$0b,$0b,$0b,$0c
  10479. .dc.b $0c,$0c,$0d,$0d,$0d,$0e,$0e,$0e
  10480. .dc.b $0f,$0f,$0f,$0f,$10,$10,$10,$11
  10481. .dc.b $11,$11,$12,$12,$12,$13,$13,$13
  10482. .dc.b $14,$14,$14,$14,$15,$15,$15,$16
  10483. .dc.b $16,$16,$17,$17,$17,$18,$18,$18
  10484. .dc.b $19,$19,$19,$19,$1a,$1a,$1a,$1b
  10485. .dc.b $1b,$1b,$1c,$1c,$1c,$1d,$1d,$1d
  10486. .dc.b $1e,$1e,$1e,$1e,$1f,$1f,$1f,$20
  10487. .dc.b $20,$20,$21,$21,$21,$22,$22,$22
  10488. .dc.b $23,$23,$23,$23,$24,$24,$24,$25
  10489. .dc.b $25,$25,$26,$26,$26,$27,$27,$27
  10490. .dc.b $d8,$d9,$d9,$d9,$da,$da,$da,$db
  10491. .dc.b $db,$db,$dc,$dc,$dc,$dd,$dd,$dd
  10492. .dc.b $dd,$de,$de,$de,$df,$df,$df,$e0
  10493. .dc.b $e0,$e0,$e1,$e1,$e1,$e2,$e2,$e2
  10494. .dc.b $e2,$e3,$e3,$e3,$e4,$e4,$e4,$e5
  10495. .dc.b $e5,$e5,$e6,$e6,$e6,$e7,$e7,$e7
  10496. .dc.b $e7,$e8,$e8,$e8,$e9,$e9,$e9,$ea
  10497. .dc.b $ea,$ea,$eb,$eb,$eb,$ec,$ec,$ec
  10498. .dc.b $ec,$ed,$ed,$ed,$ee,$ee,$ee,$ef
  10499. .dc.b $ef,$ef,$f0,$f0,$f0,$f1,$f1,$f1
  10500. .dc.b $f1,$f2,$f2,$f2,$f3,$f3,$f3,$f4
  10501. .dc.b $f4,$f4,$f5,$f5,$f5,$f6,$f6,$f6
  10502. .dc.b $f6,$f7,$f7,$f7,$f8,$f8,$f8,$f9
  10503. .dc.b $f9,$f9,$fa,$fa,$fa,$fb,$fb,$fb
  10504. .dc.b $fb,$fc,$fc,$fc,$fd,$fd,$fd,$fe
  10505. .dc.b $fe,$fe,$ff,$ff,$ff,$00,$00,$00
  10506. Table3:
  10507. .dc.b $00,$00,$00,$01,$01,$01,$02,$02
  10508. .dc.b $03,$03,$03,$04,$04,$04,$05,$05
  10509. .dc.b $06,$06,$06,$07,$07,$07,$08,$08
  10510. .dc.b $09,$09,$09,$0a,$0a,$0a,$0b,$0b
  10511. .dc.b $0c,$0c,$0c,$0d,$0d,$0d,$0e,$0e
  10512. .dc.b $0f,$0f,$0f,$10,$10,$10,$11,$11
  10513. .dc.b $12,$12,$12,$13,$13,$13,$14,$14
  10514. .dc.b $15,$15,$15,$16,$16,$16,$17,$17
  10515. .dc.b $18,$18,$18,$19,$19,$19,$1a,$1a
  10516. .dc.b $1b,$1b,$1b,$1c,$1c,$1c,$1d,$1d
  10517. .dc.b $1e,$1e,$1e,$1f,$1f,$1f,$20,$20
  10518. .dc.b $21,$21,$21,$22,$22,$22,$23,$23
  10519. .dc.b $24,$24,$24,$25,$25,$25,$26,$26
  10520. .dc.b $27,$27,$27,$28,$28,$28,$29,$29
  10521. .dc.b $2a,$2a,$2a,$2b,$2b,$2b,$2c,$2c
  10522. .dc.b $2d,$2d,$2d,$2e,$2e,$2e,$2f,$2f
  10523. .dc.b $d0,$d1,$d1,$d2,$d2,$d2,$d3,$d3
  10524. .dc.b $d3,$d4,$d4,$d5,$d5,$d5,$d6,$d6
  10525. .dc.b $d6,$d7,$d7,$d8,$d8,$d8,$d9,$d9
  10526. .dc.b $d9,$da,$da,$db,$db,$db,$dc,$dc
  10527. .dc.b $dc,$dd,$dd,$de,$de,$de,$df,$df
  10528. .dc.b $df,$e0,$e0,$e1,$e1,$e1,$e2,$e2
  10529. .dc.b $e2,$e3,$e3,$e4,$e4,$e4,$e5,$e5
  10530. .dc.b $e5,$e6,$e6,$e7,$e7,$e7,$e8,$e8
  10531. .dc.b $e8,$e9,$e9,$ea,$ea,$ea,$eb,$eb
  10532. .dc.b $eb,$ec,$ec,$ed,$ed,$ed,$ee,$ee
  10533. .dc.b $ee,$ef,$ef,$f0,$f0,$f0,$f1,$f1
  10534. .dc.b $f1,$f2,$f2,$f3,$f3,$f3,$f4,$f4
  10535. .dc.b $f4,$f5,$f5,$f6,$f6,$f6,$f7,$f7
  10536. .dc.b $f7,$f8,$f8,$f9,$f9,$f9,$fa,$fa
  10537. .dc.b $fa,$fb,$fb,$fc,$fc,$fc,$fd,$fd
  10538. .dc.b $fd,$fe,$fe,$ff,$ff,$ff,$00,$00
  10539. Table4:
  10540. .dc.b $00,$00,$01,$01,$02,$03,$03,$04
  10541. .dc.b $05,$05,$06,$06,$07,$08,$08,$09
  10542. .dc.b $0a,$0a,$0b,$0b,$0c,$0d,$0d,$0e
  10543. .dc.b $0f,$0f,$10,$10,$11,$12,$12,$13
  10544. .dc.b $14,$14,$15,$15,$16,$17,$17,$18
  10545. .dc.b $19,$19,$1a,$1a,$1b,$1c,$1c,$1d
  10546. .dc.b $1e,$1e,$1f,$1f,$20,$21,$21,$22
  10547. .dc.b $23,$23,$24,$24,$25,$26,$26,$27
  10548. .dc.b $28,$28,$29,$29,$2a,$2b,$2b,$2c
  10549. .dc.b $2d,$2d,$2e,$2e,$2f,$30,$30,$31
  10550. .dc.b $32,$32,$33,$33,$34,$35,$35,$36
  10551. .dc.b $37,$37,$38,$38,$39,$3a,$3a,$3b
  10552. .dc.b $3c,$3c,$3d,$3d,$3e,$3f,$3f,$40
  10553. .dc.b $41,$41,$42,$42,$43,$44,$44,$45
  10554. .dc.b $46,$46,$47,$47,$48,$49,$49,$4a
  10555. .dc.b $4b,$4b,$4c,$4c,$4d,$4e,$4e,$4f
  10556. .dc.b $b0,$b1,$b2,$b2,$b3,$b4,$b4,$b5
  10557. .dc.b $b5,$b6,$b7,$b7,$b8,$b9,$b9,$ba
  10558. .dc.b $ba,$bb,$bc,$bc,$bd,$be,$be,$bf
  10559. .dc.b $bf,$c0,$c1,$c1,$c2,$c3,$c3,$c4
  10560. .dc.b $c4,$c5,$c6,$c6,$c7,$c8,$c8,$c9
  10561. .dc.b $c9,$ca,$cb,$cb,$cc,$cd,$cd,$ce
  10562. .dc.b $ce,$cf,$d0,$d0,$d1,$d2,$d2,$d3
  10563. .dc.b $d3,$d4,$d5,$d5,$d6,$d7,$d7,$d8
  10564. .dc.b $d8,$d9,$da,$da,$db,$dc,$dc,$dd
  10565. .dc.b $dd,$de,$df,$df,$e0,$e1,$e1,$e2
  10566. .dc.b $e2,$e3,$e4,$e4,$e5,$e6,$e6,$e7
  10567. .dc.b $e7,$e8,$e9,$e9,$ea,$eb,$eb,$ec
  10568. .dc.b $ec,$ed,$ee,$ee,$ef,$f0,$f0,$f1
  10569. .dc.b $f1,$f2,$f3,$f3,$f4,$f5,$f5,$f6
  10570. .dc.b $f6,$f7,$f8,$f8,$f9,$fa,$fa,$fb
  10571. .dc.b $fb,$fc,$fd,$fd,$fe,$ff,$ff,$00
  10572. EntryPoint:
  10573. move.l ($0008,a0),d7
  10574. subi.l #End+$01b302,d7
  10575. pea.l ($0000)
  10576. DOS _SUPER
  10577. move.l d0,(sp)
  10578. pea.l (HelloString,pc)
  10579. DOS _PRINT
  10580. addq.l #4,sp
  10581. bsr.w ParseCmdlineArgs
  10582. bmi.s ErrExitPrintHelp
  10583. beq.s L0065a0
  10584. bsr.w CheckPCM8Loaded
  10585. bne.s ErrExitNotLoaded
  10586. moveq.l #$ff,d0
  10587. trap #2
  10588. tst.l d0
  10589. bmi.s ErrExitCannotUnlock
  10590. pea.l (CanceledString,pc)
  10591. L006546:
  10592. DOS _PRINT
  10593. addq.l #4,sp
  10594. DOS _SUPER
  10595. addq.l #4,sp
  10596. DOS _EXIT
  10597. ErrExitCannotUnlock:
  10598. addq.w #1,d0
  10599. bmi.s ErrExitVectorInUse
  10600. pea.l (CannotUnlockString,pc)
  10601. bra.s PrintErrAndExit
  10602. ErrExitVectorInUse:
  10603. addq.w #1,d0
  10604. bmi.s ErrExitCannotCancel
  10605. pea.l (VectorAlreadyInUseString,pc)
  10606. bra.s PrintErrAndExit
  10607. ErrExitCannotCancel:
  10608. pea.l (CannotCancelString,pc)
  10609. bra.s PrintErrAndExit
  10610. ErrExitNotLoaded:
  10611. pea.l (NotLoadedString,pc)
  10612. bra.s PrintErrAndExit
  10613. ErrExitPrintHelp:
  10614. pea.l (HelpString,pc)
  10615. bra.s PrintErrAndExit
  10616. ErrExitOutOfMem:
  10617. pea.l (OutOfMemoryString,pc)
  10618. bra.s PrintErrAndExit
  10619. ErrExitAlreadyLoaded:
  10620. pea.l (AlreadyLoadedString,pc)
  10621. bra.s PrintErrAndExit
  10622. ErrExitCouldNotLoad:
  10623. pea.l (CouldNotLoadString,pc)
  10624. PrintErrAndExit:
  10625. DOS _PRINT
  10626. addq.l #4,sp
  10627. DOS _SUPER
  10628. addq.l #4,sp
  10629. move.w #$0001,-(sp)
  10630. DOS _EXIT2
  10631. L006594:
  10632. bsr.w L00681e
  10633. bmi.s ErrExitAlreadyLoaded
  10634. pea.l (SettingChangedString,pc)
  10635. bra.s L006546
  10636. L0065a0:
  10637. bsr.s CheckPCM8Loaded
  10638. beq.s L006594
  10639. tst.l d7
  10640. bmi.s ErrExitOutOfMem
  10641. move.l ($0088),d0
  10642. cmpi.l #$00f00000,d0
  10643. bcs.s ErrExitCouldNotLoad
  10644. bsr.w L0068cc
  10645. lea.l (EntryPoint),a0
  10646. lea.l (End+$019b02),a1
  10647. lea.l ($00c2,a1),a2
  10648. move.w #$041d,d0
  10649. L0065cc:
  10650. move.w (a0)+,(a1)+
  10651. dbra.w d0,L0065cc
  10652. jmp (a2)
  10653. L0065d4:
  10654. bsr.w Sub006b3e
  10655. bsr.w L006886
  10656. tst.l d0
  10657. bmi.s ErrExitCouldNotLoad
  10658. bsr.w L00681e
  10659. DOS _SUPER
  10660. addq.l #4,sp
  10661. clr.w -(sp)
  10662. move.l #$00020850,-(sp)
  10663. DOS _KEEPPR
  10664. CheckPCM8Loaded:
  10665. movea.l ($0088),a0
  10666. cmpi.w #$5043,(-$0008,a0) ;'PC'
  10667. bne.s L006614
  10668. cmpi.b #$2f,(-$0004,a0) ;'/'
  10669. bne.s L006614
  10670. move.w (-$0006,a0),d0
  10671. cmpi.w #$4d38,d0 ;'M8'
  10672. beq.s L006614
  10673. cmpi.w #$4d34,d0 ;'M4'
  10674. L006614:
  10675. rts
  10676. ParseCmdlineArgs:
  10677. addq.l #1,a2
  10678. lea.l (L0067bc,pc),a0
  10679. L00661c:
  10680. bsr.w L0067c4
  10681. beq.w L0066ca
  10682. cmpi.b #$2d,d0 ;'-'
  10683. beq.s L0066a0
  10684. cmpi.b #$2f,d0 ;'/'
  10685. beq.s L0066a0
  10686. andi.b #$df,d0
  10687. cmpi.b #$4d,d0 ;'M'
  10688. beq.w L006780
  10689. tst.b (a0)
  10690. bne.w L0066c6
  10691. cmpi.b #$4f,d0 ;'O'
  10692. beq.s L006678
  10693. cmpi.b #$46,d0 ;'F'
  10694. bne.s L0066c6
  10695. moveq.l #$df,d0
  10696. and.b (a2)+,d0
  10697. cmpi.b #$4e,d0 ;'N'
  10698. beq.s L006668
  10699. cmpi.b #$55,d0 ;'U'
  10700. bne.s L0066c6
  10701. moveq.l #$df,d0
  10702. and.b (a2)+,d0
  10703. cmpi.b #$4e,d0 ;'N'
  10704. bne.s L0066c6
  10705. L006668:
  10706. moveq.l #$df,d0
  10707. and.b (a2)+,d0
  10708. cmpi.b #$43,d0 ;'C'
  10709. bne.s L0066c6
  10710. L006672:
  10711. move.b #$32,(a0) ;'2'
  10712. bra.s L00661c
  10713. L006678:
  10714. moveq.l #$df,d0
  10715. and.b (a2)+,d0
  10716. cmpi.b #$4e,d0 ;'N'
  10717. beq.s L006698
  10718. cmpi.b #$46,d0 ;'F'
  10719. bne.s L0066c6
  10720. moveq.l #$df,d0
  10721. and.b (a2)+,d0
  10722. cmpi.b #$46,d0 ;'F'
  10723. bne.s L0066c6
  10724. L006692:
  10725. move.b #$30,(a0) ;'0'
  10726. bra.s L00661c
  10727. L006698:
  10728. move.b #$31,(a0) ;'1'
  10729. bra.w L00661c
  10730. L0066a0:
  10731. move.b (a2)+,d0
  10732. andi.b #$df,d0
  10733. cmpi.b #$52,d0 ;'R'
  10734. beq.s L0066ce
  10735. cmpi.b #$44,d0 ;'D'
  10736. beq.s L0066dc
  10737. cmpi.b #$4c,d0 ;'L'
  10738. beq.w L006760
  10739. cmpi.b #$49,d0 ;'I'
  10740. beq.s L006710
  10741. cmpi.b #$56,d0 ;'V'
  10742. beq.s L00672c
  10743. L0066c6:
  10744. moveq.l #$ff,d0
  10745. rts
  10746. L0066ca:
  10747. moveq.l #$00,d0
  10748. rts
  10749. L0066ce:
  10750. tst.w (a0)
  10751. bne.s L0066c6
  10752. bsr.w L0067c4
  10753. bne.s L0066c6
  10754. moveq.l #$01,d0
  10755. rts
  10756. L0066dc:
  10757. tst.b ($0001,a0)
  10758. bne.s L0066c6
  10759. move.b (a2)+,d0
  10760. cmpi.b #$30,d0 ;'0'
  10761. beq.s L006708
  10762. cmpi.b #$31,d0 ;'1'
  10763. beq.s L006708
  10764. cmpi.b #$2d,d0 ;'-'
  10765. beq.s L006702
  10766. cmpi.b #$2b,d0 ;'+'
  10767. beq.s L006706
  10768. subq.l #1,a2
  10769. moveq.l #$32,d0 ;'2'
  10770. bra.s L006708
  10771. L006702:
  10772. moveq.l #$30,d0 ;'0'
  10773. bra.s L006708
  10774. L006706:
  10775. moveq.l #$31,d0 ;'1'
  10776. L006708:
  10777. move.b d0,($0001,a0)
  10778. bra.w L00661c
  10779. L006710:
  10780. tst.b ($0003,a0)
  10781. bne.s L0066c6
  10782. move.b (a2)+,d0
  10783. cmpi.b #$30,d0 ;'0'
  10784. bcs.s L0066c6
  10785. cmpi.b #$38,d0 ;'8'
  10786. bhi.s L0066c6
  10787. move.b d0,($0003,a0)
  10788. bra.w L00661c
  10789. L00672c:
  10790. tst.b ($0002,a0)
  10791. bne.s L0066c6
  10792. move.b (a2)+,d0
  10793. cmpi.b #$30,d0 ;'0'
  10794. beq.s L006758
  10795. cmpi.b #$31,d0 ;'1'
  10796. beq.s L006758
  10797. cmpi.b #$2d,d0 ;'-'
  10798. beq.s L006752
  10799. cmpi.b #$2b,d0 ;'+'
  10800. beq.s L006756
  10801. subq.l #1,a2
  10802. moveq.l #$32,d0 ;'2'
  10803. bra.s L006758
  10804. L006752:
  10805. moveq.l #$30,d0 ;'0'
  10806. bra.s L006758
  10807. L006756:
  10808. moveq.l #$31,d0 ;'1'
  10809. L006758:
  10810. move.b d0,($0002,a0)
  10811. bra.w L00661c
  10812. L006760:
  10813. tst.b (a0)
  10814. bne.w L0066c6
  10815. move.b (a2)+,d0
  10816. subi.b #$30,d0 ;'0'
  10817. beq.w L006692
  10818. subq.b #1,d0
  10819. beq.w L006698
  10820. subq.b #1,d0
  10821. beq.w L006672
  10822. bra.w L0066c6
  10823. L006780:
  10824. moveq.l #$df,d0
  10825. and.b (a2)+,d0
  10826. cmpi.b #$41,d0 ;'A'
  10827. bne.w L0066c6
  10828. moveq.l #$df,d0
  10829. and.b (a2)+,d0
  10830. cmpi.b #$53,d0 ;'S'
  10831. bne.w L0066c6
  10832. moveq.l #$df,d0
  10833. and.b (a2)+,d0
  10834. cmpi.b #$4b,d0 ;'K'
  10835. bne.w L0066c6
  10836. cmpi.b #$3a,(a2)+ ;':'
  10837. bne.w L0066c6
  10838. bsr.s L0067d6
  10839. bmi.w L0066c6
  10840. lea.l (L0067c0,pc),a1
  10841. move.l d1,(a1)
  10842. bra.w L00661c
  10843. L0067bc:
  10844. .dc.l $00000000
  10845. L0067c0:
  10846. .dc.l $ffffffff
  10847. L0067c4:
  10848. move.b (a2)+,d0
  10849. beq.s L0067d4
  10850. cmpi.b #$20,d0 ;' '
  10851. beq.s L0067c4
  10852. cmpi.b #$09,d0
  10853. beq.s L0067c4
  10854. L0067d4:
  10855. rts
  10856. L0067d6:
  10857. moveq.l #$00,d1
  10858. move.b (a2)+,d0
  10859. L0067da:
  10860. cmpi.b #$30,d0 ;'0'
  10861. bcs.s L00681a
  10862. cmpi.b #$39,d0 ;'9'
  10863. bhi.s L0067ec
  10864. subi.b #$30,d0 ;'0'
  10865. bra.s L006800
  10866. L0067ec:
  10867. andi.b #$df,d0
  10868. cmpi.b #$41,d0 ;'A'
  10869. bcs.s L00681a
  10870. cmpi.b #$46,d0 ;'F'
  10871. bhi.s L00681a
  10872. subi.b #$37,d0 ;'7'
  10873. L006800:
  10874. lsl.l #4,d1
  10875. add.b d0,d1
  10876. move.b (a2)+,d0
  10877. beq.s L006814
  10878. cmpi.b #$20,d0 ;' '
  10879. beq.s L006814
  10880. cmpi.b #$09,d0
  10881. bne.s L0067da
  10882. L006814:
  10883. subq.l #1,a2
  10884. moveq.l #$00,d0
  10885. rts
  10886. L00681a:
  10887. moveq.l #$ff,d0
  10888. rts
  10889. L00681e:
  10890. move.l (L0067bc,pc),d2
  10891. bne.s L00682e
  10892. move.l (L0067c0,pc),d0
  10893. bpl.s L00682e
  10894. moveq.l #$ff,d0
  10895. rts
  10896. L00682e:
  10897. swap.w d2
  10898. moveq.l #$00,d1
  10899. move.b d2,d1
  10900. beq.s L006840
  10901. sub.b #$30,d1 ;'0'
  10902. move.w #$7f00,d0
  10903. trap #2
  10904. L006840:
  10905. lsr.w #8,d2
  10906. moveq.l #$00,d1
  10907. move.b d2,d1
  10908. beq.s L006852
  10909. sub.b #$30,d1 ;'0'
  10910. move.w #$7f02,d0
  10911. trap #2
  10912. L006852:
  10913. swap.w d2
  10914. moveq.l #$00,d1
  10915. move.b d2,d1
  10916. beq.s L006864
  10917. sub.b #$30,d1 ;'0'
  10918. move.w #$7f03,d0
  10919. trap #2
  10920. L006864:
  10921. lsr.w #8,d2
  10922. moveq.l #$00,d1
  10923. move.b d2,d1
  10924. beq.s L006876
  10925. sub.b #$30,d1 ;'0'
  10926. move.w #$7f04,d0
  10927. trap #2
  10928. L006876:
  10929. move.l (L0067c0,pc),d1
  10930. bmi.s L006882
  10931. move.w #$01fb,d0
  10932. trap #2
  10933. L006882:
  10934. moveq.l #$00,d0
  10935. rts
  10936. L006886:
  10937. move.w sr,-(sp)
  10938. ori.w #$0700,sr
  10939. move.l ($0088),d0
  10940. cmpi.l #$00f00000,d0
  10941. bcs.s L0068c6
  10942. moveq.l #$00,d1
  10943. IOCS _ADPCMMOD
  10944. lea.l (VectorOverrides),a0
  10945. lea.l (L001662),a1
  10946. moveq.l #$06,d1
  10947. L0068ac:
  10948. movea.l (a0)+,a2
  10949. move.l (a2),(a1)+
  10950. move.l (a0)+,(a2)
  10951. dbra.w d1,L0068ac
  10952. move.b #$50,(Start) ;'P'
  10953. moveq.l #$00,d0
  10954. jmp (L001a74)
  10955. L0068c6:
  10956. moveq.l #$ff,d0
  10957. move.w (sp)+,sr
  10958. rts
  10959. L0068cc:
  10960. lea.l (L001682),a0
  10961. lea.l (L001882),a1
  10962. moveq.l #$30,d1 ;'0'
  10963. moveq.l #$07,d0
  10964. L0068dc:
  10965. move.w #$0004,($001c,a0)
  10966. move.w #$0008,($001e,a0)
  10967. move.l a1,($0010,a0)
  10968. move.l d1,($0014,a0)
  10969. lea.l ($0040,a0),a0
  10970. dbra.w d0,L0068dc
  10971. rts
  10972. HelloString:
  10973. .dc.b 'X68k PCM8 polyphonic PCM driver v0.48b (c)1991-93 H.Etoh',$0d,$0a,$00
  10974. HelpString:
  10975. .dc.b '使用法: PCM8 [option]',$0d,$0a
  10976. .dc.b $09,'-R',$09,'解除',$0d,$0a
  10977. .dc.b $09,'-D',$09,'動作表示オン/オフ',$0d,$0a
  10978. .dc.b $09,'-V',$09,'音量可変オン/オフ',$0d,$0a
  10979. .dc.b $09,'-Inum',$09,'IOCS同時再生最大数設定',$0d,$0a
  10980. .dc.b $09,'ON',$09,'ポリ・モード',$09,'<default>',$0d,$0a
  10981. .dc.b $09,'FNC',$09,'ファンクション限定ポリ・モード',$0d,$0a
  10982. .dc.b $09,'OFF',$09,'モノ・モード',$0d,$0a
  10983. .dc.b $09,'< 組み込み状態での設定変更が可能です >',$0d,$0a,$00
  10984. CanceledString:
  10985. .dc.b '(( 解除しました ))',$0d,$0a,$00
  10986. NotLoadedString:
  10987. .dc.b '(( 組み込まれていません ))',$0d,$0a,$00
  10988. AlreadyLoadedString:
  10989. .dc.b '(( 既に組み込まれています ))',$0d,$0a,$00
  10990. CouldNotLoadString:
  10991. .dc.b '(( 組み込みを拒否されました ))',$0d,$0a,$00
  10992. SettingChangedString:
  10993. .dc.b '(( 設定を変更しました ))',$0d,$0a,$00
  10994. CannotUnlockString:
  10995. .dc.b '(( 占有されています、解除出来ません ))',$0d,$0a,$00
  10996. VectorAlreadyInUseString:
  10997. .dc.b '(( ベクタが変更されています、解除出来ません ))',$0d,$0a,$00
  10998. CannotCancelString:
  10999. .dc.b '(( 解除出来ません ))',$0d,$0a,$00
  11000. OutOfMemoryString:
  11001. .dc.b '(( メモリが不足しています ))',$0d,$0a,$00
  11002. Sub006b3e:
  11003. lea.l (EntryPoint),a1
  11004. lea.l (Table5,pc),a0
  11005. moveq.l #$30,d7 ;'0'
  11006. L006b4a:
  11007. move.w (a0)+,d1
  11008. movea.l a1,a3
  11009. moveq.l #$00,d2
  11010. moveq.l #$07,d6
  11011. L006b52:
  11012. add.w d1,d2
  11013. move.w d2,d3
  11014. lsr.w #3,d3
  11015. move.w d3,(a3)+
  11016. neg.w d3
  11017. move.w d3,($000e,a3)
  11018. add.w d1,d2
  11019. dbra.w d6,L006b52
  11020. lea.l ($0020,a1),a1
  11021. dbra.w d7,L006b4a
  11022. lea.l (End+$00d702),a6
  11023. lea.l (EntryPoint),a5
  11024. movea.l a6,a0
  11025. movea.l a5,a3
  11026. moveq.l #$30,d2 ;'0'
  11027. moveq.l #$09,d1
  11028. lea.l (L006ccc,pc),a4
  11029. moveq.l #$00,d7
  11030. moveq.l #$30,d6 ;'0'
  11031. L006b8a:
  11032. moveq.l #$00,d5
  11033. L006b8c:
  11034. moveq.l #$0f,d0
  11035. and.w d5,d0
  11036. add.w d0,d0
  11037. move.w (a3,d0.w),(-$6200,a0)
  11038. move.w (a4,d0.w),d3
  11039. add.w d7,d3
  11040. bpl.s L006ba6
  11041. moveq.l #$00,d3
  11042. movea.l a5,a2
  11043. bra.s L006bb4
  11044. L006ba6:
  11045. cmp.w d2,d3
  11046. ble.s L006bac
  11047. move.w d2,d3
  11048. L006bac:
  11049. move.w d3,d0
  11050. lsl.w #5,d0
  11051. lea.l (a5,d0.w),a2
  11052. L006bb4:
  11053. moveq.l #$f0,d0
  11054. and.w d5,d0
  11055. lsr.w #3,d0
  11056. move.w (a2,d0.w),(a0)+
  11057. add.w (a4,d0.w),d3
  11058. bpl.s L006bca
  11059. lea.l ($0002,a6),a1
  11060. bra.s L006bd6
  11061. L006bca:
  11062. cmp.w d2,d3
  11063. ble.s L006bd0
  11064. move.w d2,d3
  11065. L006bd0:
  11066. lsl.w d1,d3
  11067. lea.l ($02,a6,d3.w),a1
  11068. L006bd6:
  11069. suba.l a0,a1
  11070. move.w a1,($61fe,a0)
  11071. addq.b #1,d5
  11072. bne.s L006b8c
  11073. addq.w #1,d7
  11074. lea.l ($0020,a3),a3
  11075. dbra.w d6,L006b8a
  11076. lea.l (EntryPoint),a1
  11077. lea.l (Table5,pc),a0
  11078. lea.l (-$0126,sp),sp
  11079. movea.l a0,a2
  11080. movea.l a1,a4
  11081. movea.l sp,a1
  11082. moveq.l #$32,d4 ;'2'
  11083. moveq.l #$00,d1
  11084. moveq.l #$30,d0 ;'0'
  11085. L006c04:
  11086. move.w (a0)+,d2
  11087. move.w d2,d3
  11088. asl.w #3,d2
  11089. sub.w d3,d2
  11090. asr.w #2,d2
  11091. addq.w #1,d2
  11092. move.w d2,(a1)+
  11093. addq.w #1,d2
  11094. moveq.l #$fe,d3
  11095. and.w d3,d2
  11096. move.w d2,(a1)+
  11097. move.w d1,(a1)+
  11098. add.w d4,d1
  11099. add.w d2,d1
  11100. dbra.w d0,L006c04
  11101. movea.l a2,a0
  11102. movea.l sp,a1
  11103. movea.l a1,a3
  11104. moveq.l #$00,d1
  11105. moveq.l #$30,d0 ;'0'
  11106. L006c2e:
  11107. move.w (a1)+,(a4)+
  11108. move.w (a1)+,d2
  11109. add.w d2,d2
  11110. add.w d2,d2
  11111. move.w (a1)+,d3
  11112. move.w (a0)+,d7
  11113. lea.l (L006c94,pc),a2
  11114. moveq.l #$07,d4
  11115. L006c40:
  11116. addq.w #6,d3
  11117. move.w d1,d5
  11118. add.w (a2)+,d5
  11119. bpl.s L006c4c
  11120. moveq.l #$00,d5
  11121. bra.s L006c54
  11122. L006c4c:
  11123. cmpi.w #$0031,d5 ;'1'
  11124. bcs.s L006c54
  11125. moveq.l #$30,d5 ;'0'
  11126. L006c54:
  11127. move.w d5,d6
  11128. add.w d5,d5
  11129. add.w d6,d5
  11130. add.w d5,d5
  11131. move.w (a2)+,(a4)+
  11132. move.w d7,d6
  11133. muls.w (a2)+,d6
  11134. asr.w #3,d6
  11135. move.w d6,(a4)+
  11136. move.w ($04,a3,d5.w),d6
  11137. sub.w d3,d6
  11138. move.w d6,(a4)+
  11139. dbra.w d4,L006c40
  11140. move.w d7,d6
  11141. move.b (a2)+,d3
  11142. moveq.l #$00,d4
  11143. L006c78:
  11144. cmp.w d6,d4
  11145. bls.s L006c80
  11146. add.w d7,d6
  11147. move.b (a2)+,d3
  11148. L006c80:
  11149. move.b d3,(a4)+
  11150. addq.w #4,d4
  11151. cmp.w d2,d4
  11152. bcs.s L006c78
  11153. addq.w #1,d1
  11154. dbra.w d0,L006c2e
  11155. lea.l ($0126,sp),sp
  11156. rts
  11157. L006c94:
  11158. .dc.w $0008,$7777,$000f,$ffff
  11159. .dc.w $0000,$0001,$ffff,$1111
  11160. .dc.w $0003,$ffff,$2222,$0005
  11161. .dc.w $ffff,$3333,$0007,$0002
  11162. .dc.w $4444,$0009,$0004,$5555
  11163. .dc.w $000b,$0006,$6666,$000d
  11164. .dc.w $060c,$1218,$1e24,$2a00
  11165. L006ccc:
  11166. .dc.w $ffff,$ffff,$ffff,$ffff
  11167. .dc.w $0002,$0004,$0006,$0008
  11168. .dc.w $ffff,$ffff,$ffff,$ffff
  11169. .dc.w $0002,$0004,$0006,$0008
  11170. Table5:
  11171. .dc.w $0010,$0011,$0013,$0015
  11172. .dc.w $0017,$0019,$001c,$001f
  11173. .dc.w $0022,$0025,$0029,$002d
  11174. .dc.w $0032,$0037,$003c,$0042
  11175. .dc.w $0049,$0050,$0058,$0061
  11176. .dc.w $006b,$0076,$0082,$008f
  11177. .dc.w $009d,$00ad,$00be,$00d1
  11178. .dc.w $00e6,$00fd,$0117,$0133
  11179. .dc.w $0151,$0173,$0198,$01c1
  11180. .dc.w $01ee,$0220,$0256,$0292
  11181. .dc.w $02d4,$031c,$036c,$03c3
  11182. .dc.w $0424,$048e,$0502,$0583
  11183. .dc.w $0610
  11184. End:
  11185. .end EntryPoint